src/mapgen/dungeongen.cpp

   1 /*
   2 Minetest
   3 Copyright (C) 2010-2018 celeron55, Perttu Ahola <celeron55@gmail.com>
   4 Copyright (C) 2015-2018 paramat
   5
   6 This program is free software; you can redistribute it and/or modify
   7 it under the terms of the GNU Lesser General Public License as published by
   8 the Free Software Foundation; either version 2.1 of the License, or
   9 (at your option) any later version.
  10
  11 This program is distributed in the hope that it will be useful,
  12 but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 GNU Lesser General Public License for more details.
  15
  16 You should have received a copy of the GNU Lesser General Public License along
  17 with this program; if not, write to the Free Software Foundation, Inc.,
  18 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  19 */
  20
  21 #include "dungeongen.h"
  22 #include <cmath>
  23 #include "mapgen.h"
  24 #include "voxel.h"
  25 #include "noise.h"
  26 #include "mapblock.h"
  27 #include "mapnode.h"
  28 #include "map.h"
  29 #include "nodedef.h"
  30 #include "settings.h"
  31
  32 //#define DGEN_USE_TORCHES
  33
  34
  35 ///////////////////////////////////////////////////////////////////////////////
  36
  37
  38 DungeonGen::DungeonGen(const NodeDefManager *ndef,
  39         GenerateNotifier *gennotify, DungeonParams *dparams)
  40 {
  41         assert(ndef);
  42
  43         this->ndef      = ndef;
  44         this->gennotify = gennotify;
  45
  46 #ifdef DGEN_USE_TORCHES
  47         c_torch  = ndef->getId("default:torch");
  48 #endif
  49
  50         if (dparams) {
  51                 dp = *dparams;
  52         } else {
  53                 // Default dungeon parameters
  54                 dp.seed = 0;
  55
  56                 dp.c_wall     = ndef->getId("mapgen_cobble");
  57                 dp.c_alt_wall = ndef->getId("mapgen_mossycobble");
  58                 dp.c_stair    = ndef->getId("mapgen_stair_cobble");
  59
  60                 dp.diagonal_dirs       = false;
  61                 dp.only_in_ground      = true;
  62                 dp.holesize            = v3s16(1, 2, 1);
  63                 dp.corridor_len_min    = 1;
  64                 dp.corridor_len_max    = 13;
  65                 dp.room_size_min       = v3s16(4, 4, 4);
  66                 dp.room_size_max       = v3s16(8, 6, 8);
  67                 dp.room_size_large_min = v3s16(8, 8, 8);
  68                 dp.room_size_large_max = v3s16(16, 16, 16);
  69                 dp.large_room_chance   = 1;
  70                 dp.num_rooms           = 8;
  71                 dp.num_dungeons        = 1;
  72                 dp.notifytype          = GENNOTIFY_DUNGEON;
  73
  74                 dp.np_alt_wall =
  75                         NoiseParams(-0.4, 1.0, v3f(40.0, 40.0, 40.0), 32474, 6, 1.1, 2.0);
  76         }
  77 }
  78
  79
  80 void DungeonGen::generate(MMVManip *vm, u32 bseed, v3s16 nmin, v3s16 nmax)
  81 {
  82         if (dp.num_dungeons == 0)
  83                 return;
  84
  85         assert(vm);
  86
  87         //TimeTaker t("gen dungeons");
  88
  89         static const bool preserve_ignore = !g_settings->getBool("projecting_dungeons");
  90
  91         this->vm = vm;
  92         this->blockseed = bseed;
  93         random.seed(bseed + 2);
  94
  95         // Dungeon generator doesn't modify places which have this set
  96         vm->clearFlag(VMANIP_FLAG_DUNGEON_INSIDE | VMANIP_FLAG_DUNGEON_PRESERVE);
  97
  98         if (dp.only_in_ground) {
  99                 // Set all air and liquid drawtypes to be untouchable to make dungeons
 100                 // open to air and liquids.
 101                 // Optionally set ignore to be untouchable to prevent projecting dungeons.
 102                 // Like randomwalk caves, preserve nodes that have 'is_ground_content = false',
 103                 // to avoid dungeons that generate out beyond the edge of a mapchunk destroying
 104                 // nodes added by mods in 'register_on_generated()'.
 105                 for (s16 z = nmin.Z; z <= nmax.Z; z++) {
 106                         for (s16 y = nmin.Y; y <= nmax.Y; y++) {
 107                                 u32 i = vm->m_area.index(nmin.X, y, z);
 108                                 for (s16 x = nmin.X; x <= nmax.X; x++) {
 109                                         content_t c = vm->m_data[i].getContent();
 110                                         NodeDrawType dtype = ndef->get(c).drawtype;
 111                                         if (dtype == NDT_AIRLIKE || dtype == NDT_LIQUID ||
 112                                                         (preserve_ignore && c == CONTENT_IGNORE) ||
 113                                                         !ndef->get(c).is_ground_content)
 114                                                 vm->m_flags[i] |= VMANIP_FLAG_DUNGEON_PRESERVE;
 115                                         i++;
 116                                 }
 117                         }
 118                 }
 119         }
 120
 121         // Add them
 122         for (u32 i = 0; i < dp.num_dungeons; i++)
 123                 makeDungeon(v3s16(1, 1, 1) * MAP_BLOCKSIZE);
 124
 125         // Optionally convert some structure to alternative structure
 126         if (dp.c_alt_wall == CONTENT_IGNORE)
 127                 return;
 128
 129         for (s16 z = nmin.Z; z <= nmax.Z; z++)
 130         for (s16 y = nmin.Y; y <= nmax.Y; y++) {
 131                 u32 i = vm->m_area.index(nmin.X, y, z);
 132                 for (s16 x = nmin.X; x <= nmax.X; x++) {
 133                         if (vm->m_data[i].getContent() == dp.c_wall) {
 134                                 if (NoisePerlin3D(&dp.np_alt_wall, x, y, z, blockseed) > 0.0f)
 135                                         vm->m_data[i].setContent(dp.c_alt_wall);
 136                         }
 137                         i++;
 138                 }
 139         }
 140
 141         //printf("== gen dungeons: %dms\n", t.stop());
 142 }
 143
 144
 145 void DungeonGen::makeDungeon(v3s16 start_padding)
 146 {
 147         const v3s16 &areasize = vm->m_area.getExtent();
 148         v3s16 roomsize;
 149         v3s16 roomplace;
 150
 151         /*
 152                 Find place for first room.
 153         */
 154         bool fits = false;
 155         for (u32 i = 0; i < 100 && !fits; i++) {
 156                 if (dp.large_room_chance >= 1) {
 157                         roomsize.Z = random.range(dp.room_size_large_min.Z, dp.room_size_large_max.Z);
 158                         roomsize.Y = random.range(dp.room_size_large_min.Y, dp.room_size_large_max.Y);
 159                         roomsize.X = random.range(dp.room_size_large_min.X, dp.room_size_large_max.X);
 160                 } else {
 161                         roomsize.Z = random.range(dp.room_size_min.Z, dp.room_size_max.Z);
 162                         roomsize.Y = random.range(dp.room_size_min.Y, dp.room_size_max.Y);
 163                         roomsize.X = random.range(dp.room_size_min.X, dp.room_size_max.X);
 164                 }
 165
 166                 // start_padding is used to disallow starting the generation of
 167                 // a dungeon in a neighboring generation chunk
 168                 roomplace = vm->m_area.MinEdge + start_padding;
 169                 roomplace.Z += random.range(0, areasize.Z - roomsize.Z - start_padding.Z);
 170                 roomplace.Y += random.range(0, areasize.Y - roomsize.Y - start_padding.Y);
 171                 roomplace.X += random.range(0, areasize.X - roomsize.X - start_padding.X);
 172
 173                 /*
 174                         Check that we're not putting the room to an unknown place,
 175                         otherwise it might end up floating in the air
 176                 */
 177                 fits = true;
 178                 for (s16 z = 0; z < roomsize.Z; z++)
 179                 for (s16 y = 0; y < roomsize.Y; y++)
 180                 for (s16 x = 0; x < roomsize.X; x++) {
 181                         v3s16 p = roomplace + v3s16(x, y, z);
 182                         u32 vi = vm->m_area.index(p);
 183                         if ((vm->m_flags[vi] & VMANIP_FLAG_DUNGEON_UNTOUCHABLE) ||
 184                                         vm->m_data[vi].getContent() == CONTENT_IGNORE) {
 185                                 fits = false;
 186                                 break;
 187                         }
 188                 }
 189         }
 190         // No place found
 191         if (!fits)
 192                 return;
 193
 194         /*
 195                 Stores the center position of the last room made, so that
 196                 a new corridor can be started from the last room instead of
 197                 the new room, if chosen so.
 198         */
 199         v3s16 last_room_center = roomplace + v3s16(roomsize.X / 2, 1, roomsize.Z / 2);
 200
 201         for (u32 i = 0; i < dp.num_rooms; i++) {
 202                 // Make a room to the determined place
 203                 makeRoom(roomsize, roomplace);
 204
 205                 v3s16 room_center = roomplace + v3s16(roomsize.X / 2, 1, roomsize.Z / 2);
 206                 if (gennotify)
 207                         gennotify->addEvent(dp.notifytype, room_center);
 208
 209 #ifdef DGEN_USE_TORCHES
 210                 // Place torch at room center (for testing)
 211                 vm->m_data[vm->m_area.index(room_center)] = MapNode(c_torch);
 212 #endif
 213
 214                 // Quit if last room
 215                 if (i + 1 == dp.num_rooms)
 216                         break;
 217
 218                 // Determine walker start position
 219
 220                 bool start_in_last_room = (random.range(0, 2) != 0);
 221
 222                 v3s16 walker_start_place;
 223
 224                 if (start_in_last_room) {
 225                         walker_start_place = last_room_center;
 226                 } else {
 227                         walker_start_place = room_center;
 228                         // Store center of current room as the last one
 229                         last_room_center = room_center;
 230                 }
 231
 232                 // Create walker and find a place for a door
 233                 v3s16 doorplace;
 234                 v3s16 doordir;
 235
 236                 m_pos = walker_start_place;
 237                 if (!findPlaceForDoor(doorplace, doordir))
 238                         return;
 239
 240                 if (random.range(0, 1) == 0)
 241                         // Make the door
 242                         makeDoor(doorplace, doordir);
 243                 else
 244                         // Don't actually make a door
 245                         doorplace -= doordir;
 246
 247                 // Make a random corridor starting from the door
 248                 v3s16 corridor_end;
 249                 v3s16 corridor_end_dir;
 250                 makeCorridor(doorplace, doordir, corridor_end, corridor_end_dir);
 251
 252                 // Find a place for a random sized room
 253                 if (dp.large_room_chance > 1 && random.range(1, dp.large_room_chance) == 1) {
 254                         // Large room
 255                         roomsize.Z = random.range(dp.room_size_large_min.Z, dp.room_size_large_max.Z);
 256                         roomsize.Y = random.range(dp.room_size_large_min.Y, dp.room_size_large_max.Y);
 257                         roomsize.X = random.range(dp.room_size_large_min.X, dp.room_size_large_max.X);
 258                 } else {
 259                         roomsize.Z = random.range(dp.room_size_min.Z, dp.room_size_max.Z);
 260                         roomsize.Y = random.range(dp.room_size_min.Y, dp.room_size_max.Y);
 261                         roomsize.X = random.range(dp.room_size_min.X, dp.room_size_max.X);
 262                 }
 263
 264                 m_pos = corridor_end;
 265                 m_dir = corridor_end_dir;
 266                 if (!findPlaceForRoomDoor(roomsize, doorplace, doordir, roomplace))
 267                         return;
 268
 269                 if (random.range(0, 1) == 0)
 270                         // Make the door
 271                         makeDoor(doorplace, doordir);
 272                 else
 273                         // Don't actually make a door
 274                         roomplace -= doordir;
 275         }
 276 }
 277
 278
 279 void DungeonGen::makeRoom(v3s16 roomsize, v3s16 roomplace)
 280 {
 281         MapNode n_wall(dp.c_wall);
 282         MapNode n_air(CONTENT_AIR);
 283
 284         // Make +-X walls
 285         for (s16 z = 0; z < roomsize.Z; z++)
 286         for (s16 y = 0; y < roomsize.Y; y++) {
 287                 {
 288                         v3s16 p = roomplace + v3s16(0, y, z);
 289                         if (!vm->m_area.contains(p))
 290                                 continue;
 291                         u32 vi = vm->m_area.index(p);
 292                         if (vm->m_flags[vi] & VMANIP_FLAG_DUNGEON_UNTOUCHABLE)
 293                                 continue;
 294                         vm->m_data[vi] = n_wall;
 295                 }
 296                 {
 297                         v3s16 p = roomplace + v3s16(roomsize.X - 1, y, z);
 298                         if (!vm->m_area.contains(p))
 299                                 continue;
 300                         u32 vi = vm->m_area.index(p);
 301                         if (vm->m_flags[vi] & VMANIP_FLAG_DUNGEON_UNTOUCHABLE)
 302                                 continue;
 303                         vm->m_data[vi] = n_wall;
 304                 }
 305         }
 306
 307         // Make +-Z walls
 308         for (s16 x = 0; x < roomsize.X; x++)
 309         for (s16 y = 0; y < roomsize.Y; y++) {
 310                 {
 311                         v3s16 p = roomplace + v3s16(x, y, 0);
 312                         if (!vm->m_area.contains(p))
 313                                 continue;
 314                         u32 vi = vm->m_area.index(p);
 315                         if (vm->m_flags[vi] & VMANIP_FLAG_DUNGEON_UNTOUCHABLE)
 316                                 continue;
 317                         vm->m_data[vi] = n_wall;
 318                 }
 319                 {
 320                         v3s16 p = roomplace + v3s16(x, y, roomsize.Z - 1);
 321                         if (!vm->m_area.contains(p))
 322                                 continue;
 323                         u32 vi = vm->m_area.index(p);
 324                         if (vm->m_flags[vi] & VMANIP_FLAG_DUNGEON_UNTOUCHABLE)
 325                                 continue;
 326                         vm->m_data[vi] = n_wall;
 327                 }
 328         }
 329
 330         // Make +-Y walls (floor and ceiling)
 331         for (s16 z = 0; z < roomsize.Z; z++)
 332         for (s16 x = 0; x < roomsize.X; x++) {
 333                 {
 334                         v3s16 p = roomplace + v3s16(x, 0, z);
 335                         if (!vm->m_area.contains(p))
 336                                 continue;
 337                         u32 vi = vm->m_area.index(p);
 338                         if (vm->m_flags[vi] & VMANIP_FLAG_DUNGEON_UNTOUCHABLE)
 339                                 continue;
 340                         vm->m_data[vi] = n_wall;
 341                 }
 342                 {
 343                         v3s16 p = roomplace + v3s16(x,roomsize. Y - 1, z);
 344                         if (!vm->m_area.contains(p))
 345                                 continue;
 346                         u32 vi = vm->m_area.index(p);
 347                         if (vm->m_flags[vi] & VMANIP_FLAG_DUNGEON_UNTOUCHABLE)
 348                                 continue;
 349                         vm->m_data[vi] = n_wall;
 350                 }
 351         }
 352
 353         // Fill with air
 354         for (s16 z = 1; z < roomsize.Z - 1; z++)
 355         for (s16 y = 1; y < roomsize.Y - 1; y++)
 356         for (s16 x = 1; x < roomsize.X - 1; x++) {
 357                 v3s16 p = roomplace + v3s16(x, y, z);
 358                 if (!vm->m_area.contains(p))
 359                         continue;
 360                 u32 vi = vm->m_area.index(p);
 361                 vm->m_flags[vi] |= VMANIP_FLAG_DUNGEON_UNTOUCHABLE;
 362                 vm->m_data[vi] = n_air;
 363         }
 364 }
 365
 366
 367 void DungeonGen::makeFill(v3s16 place, v3s16 size,
 368         u8 avoid_flags, MapNode n, u8 or_flags)
 369 {
 370         for (s16 z = 0; z < size.Z; z++)
 371         for (s16 y = 0; y < size.Y; y++)
 372         for (s16 x = 0; x < size.X; x++) {
 373                 v3s16 p = place + v3s16(x, y, z);
 374                 if (!vm->m_area.contains(p))
 375                         continue;
 376                 u32 vi = vm->m_area.index(p);
 377                 if (vm->m_flags[vi] & avoid_flags)
 378                         continue;
 379                 vm->m_flags[vi] |= or_flags;
 380                 vm->m_data[vi] = n;
 381         }
 382 }
 383
 384
 385 void DungeonGen::makeHole(v3s16 place)
 386 {
 387         makeFill(place, dp.holesize, 0, MapNode(CONTENT_AIR),
 388                 VMANIP_FLAG_DUNGEON_INSIDE);
 389 }
 390
 391
 392 void DungeonGen::makeDoor(v3s16 doorplace, v3s16 doordir)
 393 {
 394         makeHole(doorplace);
 395
 396 #ifdef DGEN_USE_TORCHES
 397         // Place torch (for testing)
 398         vm->m_data[vm->m_area.index(doorplace)] = MapNode(c_torch);
 399 #endif
 400 }
 401
 402
 403 void DungeonGen::makeCorridor(v3s16 doorplace, v3s16 doordir,
 404         v3s16 &result_place, v3s16 &result_dir)
 405 {
 406         makeHole(doorplace);
 407         v3s16 p0 = doorplace;
 408         v3s16 dir = doordir;
 409         u32 length = random.range(dp.corridor_len_min, dp.corridor_len_max);
 410         u32 partlength = random.range(dp.corridor_len_min, dp.corridor_len_max);
 411         u32 partcount = 0;
 412         s16 make_stairs = 0;
 413
 414         if (random.next() % 2 == 0 && partlength >= 3)
 415                 make_stairs = random.next() % 2 ? 1 : -1;
 416
 417         for (u32 i = 0; i < length; i++) {
 418                 v3s16 p = p0 + dir;
 419                 if (partcount != 0)
 420                         p.Y += make_stairs;
 421
 422                 // Check segment of minimum size corridor is in voxelmanip
 423                 if (vm->m_area.contains(p) && vm->m_area.contains(p + v3s16(0, 1, 0))) {
 424                         if (make_stairs) {
 425                                 makeFill(p + v3s16(-1, -1, -1),
 426                                         dp.holesize + v3s16(2, 3, 2),
 427                                         VMANIP_FLAG_DUNGEON_UNTOUCHABLE,
 428                                         MapNode(dp.c_wall),
 429                                         0);
 430                                 makeFill(p, dp.holesize, VMANIP_FLAG_DUNGEON_UNTOUCHABLE,
 431                                         MapNode(CONTENT_AIR), VMANIP_FLAG_DUNGEON_INSIDE);
 432                                 makeFill(p - dir, dp.holesize, VMANIP_FLAG_DUNGEON_UNTOUCHABLE,
 433                                         MapNode(CONTENT_AIR), VMANIP_FLAG_DUNGEON_INSIDE);
 434
 435                                 // TODO: fix stairs code so it works 100%
 436                                 // (quite difficult)
 437
 438                                 // exclude stairs from the bottom step
 439                                 // exclude stairs from diagonal steps
 440                                 if (((dir.X ^ dir.Z) & 1) &&
 441                                                 (((make_stairs ==  1) && i != 0) ||
 442                                                 ((make_stairs == -1) && i != length - 1))) {
 443                                         // rotate face 180 deg if
 444                                         // making stairs backwards
 445                                         int facedir = dir_to_facedir(dir * make_stairs);
 446                                         v3s16 ps = p;
 447                                         u16 stair_width = (dir.Z != 0) ? dp.holesize.X : dp.holesize.Z;
 448                                         // Stair width direction vector
 449                                         v3s16 swv = (dir.Z != 0) ? v3s16(1, 0, 0) : v3s16(0, 0, 1);
 450
 451                                         for (u16 st = 0; st < stair_width; st++) {
 452                                                 if (make_stairs == -1) {
 453                                                         u32 vi = vm->m_area.index(ps.X - dir.X, ps.Y - 1, ps.Z - dir.Z);
 454                                                         if (vm->m_area.contains(ps + v3s16(-dir.X, -1, -dir.Z)) &&
 455                                                                         vm->m_data[vi].getContent() == dp.c_wall) {
 456                                                                 vm->m_flags[vi] |= VMANIP_FLAG_DUNGEON_UNTOUCHABLE;
 457                                                                 vm->m_data[vi] = MapNode(dp.c_stair, 0, facedir);
 458                                                         }
 459                                                 } else if (make_stairs == 1) {
 460                                                         u32 vi = vm->m_area.index(ps.X, ps.Y - 1, ps.Z);
 461                                                         if (vm->m_area.contains(ps + v3s16(0, -1, 0)) &&
 462                                                                         vm->m_data[vi].getContent() == dp.c_wall) {
 463                                                                 vm->m_flags[vi] |= VMANIP_FLAG_DUNGEON_UNTOUCHABLE;
 464                                                                 vm->m_data[vi] = MapNode(dp.c_stair, 0, facedir);
 465                                                         }
 466                                                 }
 467                                                 ps += swv;
 468                                         }
 469                                 }
 470                         } else {
 471                                 makeFill(p + v3s16(-1, -1, -1),
 472                                         dp.holesize + v3s16(2, 2, 2),
 473                                         VMANIP_FLAG_DUNGEON_UNTOUCHABLE,
 474                                         MapNode(dp.c_wall),
 475                                         0);
 476                                 makeHole(p);
 477                         }
 478
 479                         p0 = p;
 480                 } else {
 481                         // Can't go here, turn away
 482                         dir = turn_xz(dir, random.range(0, 1));
 483                         make_stairs = -make_stairs;
 484                         partcount = 0;
 485                         partlength = random.range(1, length);
 486                         continue;
 487                 }
 488
 489                 partcount++;
 490                 if (partcount >= partlength) {
 491                         partcount = 0;
 492
 493                         random_turn(random, dir);
 494
 495                         partlength = random.range(1, length);
 496
 497                         make_stairs = 0;
 498                         if (random.next() % 2 == 0 && partlength >= 3)
 499                                 make_stairs = random.next() % 2 ? 1 : -1;
 500                 }
 501         }
 502         result_place = p0;
 503         result_dir = dir;
 504 }
 505
 506
 507 bool DungeonGen::findPlaceForDoor(v3s16 &result_place, v3s16 &result_dir)
 508 {
 509         for (u32 i = 0; i < 100; i++) {
 510                 v3s16 p = m_pos + m_dir;
 511                 v3s16 p1 = p + v3s16(0, 1, 0);
 512                 if (!vm->m_area.contains(p) || !vm->m_area.contains(p1) || i % 4 == 0) {
 513                         randomizeDir();
 514                         continue;
 515                 }
 516                 if (vm->getNodeNoExNoEmerge(p).getContent() == dp.c_wall &&
 517                                 vm->getNodeNoExNoEmerge(p1).getContent() == dp.c_wall) {
 518                         // Found wall, this is a good place!
 519                         result_place = p;
 520                         result_dir = m_dir;
 521                         // Randomize next direction
 522                         randomizeDir();
 523                         return true;
 524                 }
 525                 /*
 526                         Determine where to move next
 527                 */
 528                 // Jump one up if the actual space is there
 529                 if (vm->getNodeNoExNoEmerge(p +
 530                                 v3s16(0, 0, 0)).getContent() == dp.c_wall &&
 531                                 vm->getNodeNoExNoEmerge(p +
 532                                 v3s16(0, 1, 0)).getContent() == CONTENT_AIR &&
 533                                 vm->getNodeNoExNoEmerge(p +
 534                                 v3s16(0, 2, 0)).getContent() == CONTENT_AIR)
 535                         p += v3s16(0,1,0);
 536                 // Jump one down if the actual space is there
 537                 if (vm->getNodeNoExNoEmerge(p +
 538                                 v3s16(0, 1, 0)).getContent() == dp.c_wall &&
 539                                 vm->getNodeNoExNoEmerge(p +
 540                                 v3s16(0, 0, 0)).getContent() == CONTENT_AIR &&
 541                                 vm->getNodeNoExNoEmerge(p +
 542                                 v3s16(0, -1, 0)).getContent() == CONTENT_AIR)
 543                         p += v3s16(0, -1, 0);
 544                 // Check if walking is now possible
 545                 if (vm->getNodeNoExNoEmerge(p).getContent() != CONTENT_AIR ||
 546                                 vm->getNodeNoExNoEmerge(p +
 547                                 v3s16(0, 1, 0)).getContent() != CONTENT_AIR) {
 548                         // Cannot continue walking here
 549                         randomizeDir();
 550                         continue;
 551                 }
 552                 // Move there
 553                 m_pos = p;
 554         }
 555         return false;
 556 }
 557
 558
 559 bool DungeonGen::findPlaceForRoomDoor(v3s16 roomsize, v3s16 &result_doorplace,
 560         v3s16 &result_doordir, v3s16 &result_roomplace)
 561 {
 562         for (s16 trycount = 0; trycount < 30; trycount++) {
 563                 v3s16 doorplace;
 564                 v3s16 doordir;
 565                 bool r = findPlaceForDoor(doorplace, doordir);
 566                 if (!r)
 567                         continue;
 568                 v3s16 roomplace;
 569                 // X east, Z north, Y up
 570                 if (doordir == v3s16(1, 0, 0)) // X+
 571                         roomplace = doorplace +
 572                                 v3s16(0, -1, random.range(-roomsize.Z + 2, -2));
 573                 if (doordir == v3s16(-1, 0, 0)) // X-
 574                         roomplace = doorplace +
 575                                 v3s16(-roomsize.X + 1, -1, random.range(-roomsize.Z + 2, -2));
 576                 if (doordir == v3s16(0, 0, 1)) // Z+
 577                         roomplace = doorplace +
 578                                 v3s16(random.range(-roomsize.X + 2, -2), -1, 0);
 579                 if (doordir == v3s16(0, 0, -1)) // Z-
 580                         roomplace = doorplace +
 581                                 v3s16(random.range(-roomsize.X + 2, -2), -1, -roomsize.Z + 1);
 582
 583                 // Check fit
 584                 bool fits = true;
 585                 for (s16 z = 1; z < roomsize.Z - 1; z++)
 586                 for (s16 y = 1; y < roomsize.Y - 1; y++)
 587                 for (s16 x = 1; x < roomsize.X - 1; x++) {
 588                         v3s16 p = roomplace + v3s16(x, y, z);
 589                         if (!vm->m_area.contains(p)) {
 590                                 fits = false;
 591                                 break;
 592                         }
 593                         if (vm->m_flags[vm->m_area.index(p)] & VMANIP_FLAG_DUNGEON_INSIDE) {
 594                                 fits = false;
 595                                 break;
 596                         }
 597                 }
 598                 if (!fits) {
 599                         // Find new place
 600                         continue;
 601                 }
 602                 result_doorplace = doorplace;
 603                 result_doordir   = doordir;
 604                 result_roomplace = roomplace;
 605                 return true;
 606         }
 607         return false;
 608 }
 609
 610
 611 v3s16 rand_ortho_dir(PseudoRandom &random, bool diagonal_dirs)
 612 {
 613         // Make diagonal directions somewhat rare
 614         if (diagonal_dirs && (random.next() % 4 == 0)) {
 615                 v3s16 dir;
 616                 int trycount = 0;
 617
 618                 do {
 619                         trycount++;
 620
 621                         dir.Z = random.next() % 3 - 1;
 622                         dir.Y = 0;
 623                         dir.X = random.next() % 3 - 1;
 624                 } while ((dir.X == 0 || dir.Z == 0) && trycount < 10);
 625
 626                 return dir;
 627         }
 628
 629         if (random.next() % 2 == 0)
 630                 return random.next() % 2 ? v3s16(-1, 0, 0) : v3s16(1, 0, 0);
 631
 632         return random.next() % 2 ? v3s16(0, 0, -1) : v3s16(0, 0, 1);
 633 }
 634
 635
 636 v3s16 turn_xz(v3s16 olddir, int t)
 637 {
 638         v3s16 dir;
 639         if (t == 0) {
 640                 // Turn right
 641                 dir.X = olddir.Z;
 642                 dir.Z = -olddir.X;
 643                 dir.Y = olddir.Y;
 644         } else {
 645                 // Turn left
 646                 dir.X = -olddir.Z;
 647                 dir.Z = olddir.X;
 648                 dir.Y = olddir.Y;
 649         }
 650         return dir;
 651 }
 652
 653
 654 void random_turn(PseudoRandom &random, v3s16 &dir)
 655 {
 656         int turn = random.range(0, 2);
 657         if (turn == 0) {
 658                 // Go straight: nothing to do
 659                 return;
 660         } else if (turn == 1) {
 661                 // Turn right
 662                 dir = turn_xz(dir, 0);
 663         } else {
 664                 // Turn left
 665                 dir = turn_xz(dir, 1);
 666         }
 667 }
 668
 669
 670 int dir_to_facedir(v3s16 d)
 671 {
 672         if (abs(d.X) > abs(d.Z))
 673                 return d.X < 0 ? 3 : 1;
 674
 675         return d.Z < 0 ? 2 : 0;
 676 }