3 Copyright (C) 2010-2013 celeron55, Perttu Ahola <celeron55@gmail.com>
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU Lesser General Public License as published by
7 the Free Software Foundation; either version 2.1 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public License along
16 with this program; if not, write to the Free Software Foundation, Inc.,
17 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
20 #include "util/numeric.h"
23 #include "mapgen_v5.h"
24 #include "mapgen_v6.h"
25 #include "mapgen_v7.h"
28 NoiseParams nparams_caveliquids(0, 1, v3f(150.0, 150.0, 150.0), 776, 3, 0.6, 2.0);
34 CavesRandomWalk::CavesRandomWalk(
35 INodeDefManager *ndef,
36 GenerateNotifier *gennotify,
39 content_t water_source,
40 content_t lava_source)
45 this->gennotify = gennotify;
47 this->water_level = water_level;
48 this->np_caveliquids = &nparams_caveliquids;
49 this->lava_depth = DEFAULT_LAVA_DEPTH;
51 c_water_source = water_source;
52 if (c_water_source == CONTENT_IGNORE)
53 c_water_source = ndef->getId("mapgen_water_source");
54 if (c_water_source == CONTENT_IGNORE)
55 c_water_source = CONTENT_AIR;
57 c_lava_source = lava_source;
58 if (c_lava_source == CONTENT_IGNORE)
59 c_lava_source = ndef->getId("mapgen_lava_source");
60 if (c_lava_source == CONTENT_IGNORE)
61 c_lava_source = CONTENT_AIR;
65 void CavesRandomWalk::makeCave(MMVManip *vm, v3s16 nmin, v3s16 nmax,
66 PseudoRandom *ps, bool is_large_cave, int max_stone_height, s16 *heightmap)
73 this->node_min = nmin;
74 this->node_max = nmax;
75 this->heightmap = heightmap;
76 this->large_cave = is_large_cave;
78 this->ystride = nmax.X - nmin.X + 1;
80 // Set initial parameters from randomness
81 dswitchint = ps->range(1, 14);
82 flooded = ps->range(1, 2) == 2;
85 part_max_length_rs = ps->range(2, 4);
86 tunnel_routepoints = ps->range(5, ps->range(15, 30));
87 min_tunnel_diameter = 5;
88 max_tunnel_diameter = ps->range(7, ps->range(8, 24));
90 part_max_length_rs = ps->range(2, 9);
91 tunnel_routepoints = ps->range(10, ps->range(15, 30));
92 min_tunnel_diameter = 2;
93 max_tunnel_diameter = ps->range(2, 6);
96 large_cave_is_flat = (ps->range(0, 1) == 0);
98 main_direction = v3f(0, 0, 0);
100 // Allowed route area size in nodes
101 ar = node_max - node_min + v3s16(1, 1, 1);
102 // Area starting point in nodes
106 //(this should be more than the maximum radius of the tunnel)
108 s16 more = MYMAX(MAP_BLOCKSIZE - max_tunnel_diameter / 2 - insure, 1);
109 ar += v3s16(1,0,1) * more * 2;
110 of -= v3s16(1,0,1) * more;
113 // Allow half a diameter + 7 over stone surface
114 route_y_max = -of.Y + max_stone_y + max_tunnel_diameter / 2 + 7;
116 // Limit maximum to area
117 route_y_max = rangelim(route_y_max, 0, ar.Y - 1);
121 if (node_min.Y < water_level && node_max.Y > water_level) {
122 minpos = water_level - max_tunnel_diameter / 3 - of.Y;
123 route_y_max = water_level + max_tunnel_diameter / 3 - of.Y;
125 route_y_min = ps->range(minpos, minpos + max_tunnel_diameter);
126 route_y_min = rangelim(route_y_min, 0, route_y_max);
129 s16 route_start_y_min = route_y_min;
130 s16 route_start_y_max = route_y_max;
132 route_start_y_min = rangelim(route_start_y_min, 0, ar.Y - 1);
133 route_start_y_max = rangelim(route_start_y_max, route_start_y_min, ar.Y - 1);
135 // Randomize starting position
137 (float)(ps->next() % ar.X) + 0.5,
138 (float)(ps->range(route_start_y_min, route_start_y_max)) + 0.5,
139 (float)(ps->next() % ar.Z) + 0.5
142 // Add generation notify begin event
144 v3s16 abs_pos(of.X + orp.X, of.Y + orp.Y, of.Z + orp.Z);
145 GenNotifyType notifytype = large_cave ?
146 GENNOTIFY_LARGECAVE_BEGIN : GENNOTIFY_CAVE_BEGIN;
147 gennotify->addEvent(notifytype, abs_pos);
150 // Generate some tunnel starting from orp
151 for (u16 j = 0; j < tunnel_routepoints; j++)
152 makeTunnel(j % dswitchint == 0);
154 // Add generation notify end event
156 v3s16 abs_pos(of.X + orp.X, of.Y + orp.Y, of.Z + orp.Z);
157 GenNotifyType notifytype = large_cave ?
158 GENNOTIFY_LARGECAVE_END : GENNOTIFY_CAVE_END;
159 gennotify->addEvent(notifytype, abs_pos);
164 void CavesRandomWalk::makeTunnel(bool dirswitch)
166 if (dirswitch && !large_cave) {
167 main_direction = v3f(
168 ((float)(ps->next() % 20) - (float)10) / 10,
169 ((float)(ps->next() % 20) - (float)10) / 30,
170 ((float)(ps->next() % 20) - (float)10) / 10
172 main_direction *= (float)ps->range(0, 10) / 10;
176 s16 min_d = min_tunnel_diameter;
177 s16 max_d = max_tunnel_diameter;
178 rs = ps->range(min_d, max_d);
179 s16 rs_part_max_length_rs = rs * part_max_length_rs;
184 rs_part_max_length_rs,
185 rs_part_max_length_rs / 2,
186 rs_part_max_length_rs
190 rs_part_max_length_rs,
191 ps->range(1, rs_part_max_length_rs),
192 rs_part_max_length_rs
197 // Jump downward sometimes
198 if (!large_cave && ps->range(0, 12) == 0) {
200 (float)(ps->next() % (maxlen.X * 1)) - (float)maxlen.X / 2,
201 (float)(ps->next() % (maxlen.Y * 2)) - (float)maxlen.Y,
202 (float)(ps->next() % (maxlen.Z * 1)) - (float)maxlen.Z / 2
206 (float)(ps->next() % (maxlen.X * 1)) - (float)maxlen.X / 2,
207 (float)(ps->next() % (maxlen.Y * 1)) - (float)maxlen.Y / 2,
208 (float)(ps->next() % (maxlen.Z * 1)) - (float)maxlen.Z / 2
212 // Do not make caves that are above ground.
213 // It is only necessary to check the startpoint and endpoint.
214 v3s16 p1 = v3s16(orp.X, orp.Y, orp.Z) + of + rs / 2;
215 v3s16 p2 = v3s16(vec.X, vec.Y, vec.Z) + p1;
216 if (isPosAboveSurface(p1) || isPosAboveSurface(p2))
219 vec += main_direction;
224 else if (rp.X >= ar.X)
227 if (rp.Y < route_y_min)
229 else if (rp.Y >= route_y_max)
230 rp.Y = route_y_max - 1;
234 else if (rp.Z >= ar.Z)
239 float veclen = vec.getLength();
243 // Every second section is rough
244 bool randomize_xz = (ps->range(1, 2) == 1);
247 for (float f = 0; f < 1.0; f += 1.0 / veclen)
248 carveRoute(vec, f, randomize_xz);
254 void CavesRandomWalk::carveRoute(v3f vec, float f, bool randomize_xz)
256 MapNode airnode(CONTENT_AIR);
257 MapNode waternode(c_water_source);
258 MapNode lavanode(c_lava_source);
260 v3s16 startp(orp.X, orp.Y, orp.Z);
263 float nval = NoisePerlin3D(np_caveliquids, startp.X,
264 startp.Y, startp.Z, seed);
265 MapNode liquidnode = (nval < 0.40 && node_max.Y < lava_depth) ?
266 lavanode : waternode;
268 v3f fp = orp + vec * f;
269 fp.X += 0.1 * ps->range(-10, 10);
270 fp.Z += 0.1 * ps->range(-10, 10);
271 v3s16 cp(fp.X, fp.Y, fp.Z);
276 d0 += ps->range(-1, 1);
277 d1 += ps->range(-1, 1);
280 bool flat_cave_floor = !large_cave && ps->range(0, 2) == 2;
282 for (s16 z0 = d0; z0 <= d1; z0++) {
283 s16 si = rs / 2 - MYMAX(0, abs(z0) - rs / 7 - 1);
284 for (s16 x0 = -si - ps->range(0,1); x0 <= si - 1 + ps->range(0,1); x0++) {
285 s16 maxabsxz = MYMAX(abs(x0), abs(z0));
287 s16 si2 = rs / 2 - MYMAX(0, maxabsxz - rs / 7 - 1);
289 for (s16 y0 = -si2; y0 <= si2; y0++) {
290 // Make better floors in small caves
291 if (flat_cave_floor && y0 <= -rs / 2 && rs <= 7)
294 if (large_cave_is_flat) {
295 // Make large caves not so tall
296 if (rs > 7 && abs(y0) >= rs / 3)
300 v3s16 p(cp.X + x0, cp.Y + y0, cp.Z + z0);
303 if (vm->m_area.contains(p) == false)
306 u32 i = vm->m_area.index(p);
307 content_t c = vm->m_data[i].getContent();
308 if (!ndef->get(c).is_ground_content)
312 int full_ymin = node_min.Y - MAP_BLOCKSIZE;
313 int full_ymax = node_max.Y + MAP_BLOCKSIZE;
315 if (flooded && full_ymin < water_level && full_ymax > water_level)
316 vm->m_data[i] = (p.Y <= water_level) ? waternode : airnode;
317 else if (flooded && full_ymax < water_level)
318 vm->m_data[i] = (p.Y < startp.Y - 4) ? liquidnode : airnode;
320 vm->m_data[i] = airnode;
322 if (c == CONTENT_IGNORE)
325 vm->m_data[i] = airnode;
326 vm->m_flags[i] |= VMANIP_FLAG_CAVE;
334 inline bool CavesRandomWalk::isPosAboveSurface(v3s16 p)
336 if (heightmap != NULL &&
337 p.Z >= node_min.Z && p.Z <= node_max.Z &&
338 p.X >= node_min.X && p.X <= node_max.X) {
339 u32 index = (p.Z - node_min.Z) * ystride + (p.X - node_min.X);
340 if (heightmap[index] < p.Y)
342 } else if (p.Y > water_level) {
354 CavesV6::CavesV6(INodeDefManager *ndef, GenerateNotifier *gennotify,
355 int water_level, content_t water_source, content_t lava_source)
360 this->gennotify = gennotify;
361 this->water_level = water_level;
363 c_water_source = water_source;
364 if (c_water_source == CONTENT_IGNORE)
365 c_water_source = ndef->getId("mapgen_water_source");
366 if (c_water_source == CONTENT_IGNORE)
367 c_water_source = CONTENT_AIR;
369 c_lava_source = lava_source;
370 if (c_lava_source == CONTENT_IGNORE)
371 c_lava_source = ndef->getId("mapgen_lava_source");
372 if (c_lava_source == CONTENT_IGNORE)
373 c_lava_source = CONTENT_AIR;
377 void CavesV6::makeCave(MMVManip *vm, v3s16 nmin, v3s16 nmax,
378 PseudoRandom *ps, PseudoRandom *ps2,
379 bool is_large_cave, int max_stone_height, s16 *heightmap)
388 this->node_min = nmin;
389 this->node_max = nmax;
390 this->heightmap = heightmap;
391 this->large_cave = is_large_cave;
393 this->ystride = nmax.X - nmin.X + 1;
395 // Set initial parameters from randomness
396 min_tunnel_diameter = 2;
397 max_tunnel_diameter = ps->range(2, 6);
398 dswitchint = ps->range(1, 14);
400 part_max_length_rs = ps->range(2, 4);
401 tunnel_routepoints = ps->range(5, ps->range(15, 30));
402 min_tunnel_diameter = 5;
403 max_tunnel_diameter = ps->range(7, ps->range(8, 24));
405 part_max_length_rs = ps->range(2, 9);
406 tunnel_routepoints = ps->range(10, ps->range(15, 30));
408 large_cave_is_flat = (ps->range(0, 1) == 0);
410 main_direction = v3f(0, 0, 0);
412 // Allowed route area size in nodes
413 ar = node_max - node_min + v3s16(1, 1, 1);
414 // Area starting point in nodes
418 //(this should be more than the maximum radius of the tunnel)
419 const s16 max_spread_amount = MAP_BLOCKSIZE;
421 s16 more = MYMAX(max_spread_amount - max_tunnel_diameter / 2 - insure, 1);
422 ar += v3s16(1, 0, 1) * more * 2;
423 of -= v3s16(1, 0, 1) * more;
426 // Allow half a diameter + 7 over stone surface
427 route_y_max = -of.Y + max_stone_height + max_tunnel_diameter / 2 + 7;
429 // Limit maximum to area
430 route_y_max = rangelim(route_y_max, 0, ar.Y - 1);
434 if (node_min.Y < water_level && node_max.Y > water_level) {
435 minpos = water_level - max_tunnel_diameter / 3 - of.Y;
436 route_y_max = water_level + max_tunnel_diameter / 3 - of.Y;
438 route_y_min = ps->range(minpos, minpos + max_tunnel_diameter);
439 route_y_min = rangelim(route_y_min, 0, route_y_max);
442 s16 route_start_y_min = route_y_min;
443 s16 route_start_y_max = route_y_max;
445 route_start_y_min = rangelim(route_start_y_min, 0, ar.Y - 1);
446 route_start_y_max = rangelim(route_start_y_max, route_start_y_min, ar.Y - 1);
448 // Randomize starting position
450 (float)(ps->next() % ar.X) + 0.5,
451 (float)(ps->range(route_start_y_min, route_start_y_max)) + 0.5,
452 (float)(ps->next() % ar.Z) + 0.5
455 // Add generation notify begin event
456 if (gennotify != NULL) {
457 v3s16 abs_pos(of.X + orp.X, of.Y + orp.Y, of.Z + orp.Z);
458 GenNotifyType notifytype = large_cave ?
459 GENNOTIFY_LARGECAVE_BEGIN : GENNOTIFY_CAVE_BEGIN;
460 gennotify->addEvent(notifytype, abs_pos);
463 // Generate some tunnel starting from orp
464 for (u16 j = 0; j < tunnel_routepoints; j++)
465 makeTunnel(j % dswitchint == 0);
467 // Add generation notify end event
468 if (gennotify != NULL) {
469 v3s16 abs_pos(of.X + orp.X, of.Y + orp.Y, of.Z + orp.Z);
470 GenNotifyType notifytype = large_cave ?
471 GENNOTIFY_LARGECAVE_END : GENNOTIFY_CAVE_END;
472 gennotify->addEvent(notifytype, abs_pos);
477 void CavesV6::makeTunnel(bool dirswitch)
479 if (dirswitch && !large_cave) {
480 main_direction = v3f(
481 ((float)(ps->next() % 20) - (float)10) / 10,
482 ((float)(ps->next() % 20) - (float)10) / 30,
483 ((float)(ps->next() % 20) - (float)10) / 10
485 main_direction *= (float)ps->range(0, 10) / 10;
489 s16 min_d = min_tunnel_diameter;
490 s16 max_d = max_tunnel_diameter;
491 rs = ps->range(min_d, max_d);
492 s16 rs_part_max_length_rs = rs * part_max_length_rs;
497 rs_part_max_length_rs,
498 rs_part_max_length_rs / 2,
499 rs_part_max_length_rs
503 rs_part_max_length_rs,
504 ps->range(1, rs_part_max_length_rs),
505 rs_part_max_length_rs
510 (float)(ps->next() % maxlen.X) - (float)maxlen.X / 2,
511 (float)(ps->next() % maxlen.Y) - (float)maxlen.Y / 2,
512 (float)(ps->next() % maxlen.Z) - (float)maxlen.Z / 2
515 // Jump downward sometimes
516 if (!large_cave && ps->range(0, 12) == 0) {
518 (float)(ps->next() % maxlen.X) - (float)maxlen.X / 2,
519 (float)(ps->next() % (maxlen.Y * 2)) - (float)maxlen.Y,
520 (float)(ps->next() % maxlen.Z) - (float)maxlen.Z / 2
524 // Do not make caves that are entirely above ground, to fix shadow bugs
525 // caused by overgenerated large caves.
526 // It is only necessary to check the startpoint and endpoint.
527 v3s16 p1 = v3s16(orp.X, orp.Y, orp.Z) + of + rs / 2;
528 v3s16 p2 = v3s16(vec.X, vec.Y, vec.Z) + p1;
530 // If startpoint and endpoint are above ground, disable placement of nodes
531 // in carveRoute while still running all PseudoRandom calls to ensure caves
532 // are consistent with existing worlds.
533 bool tunnel_above_ground =
534 p1.Y > getSurfaceFromHeightmap(p1) &&
535 p2.Y > getSurfaceFromHeightmap(p2);
537 vec += main_direction;
542 else if (rp.X >= ar.X)
545 if (rp.Y < route_y_min)
547 else if (rp.Y >= route_y_max)
548 rp.Y = route_y_max - 1;
552 else if (rp.Z >= ar.Z)
557 float veclen = vec.getLength();
558 // As odd as it sounds, veclen is *exactly* 0.0 sometimes, causing a FPE
562 // Every second section is rough
563 bool randomize_xz = (ps2->range(1, 2) == 1);
566 for (float f = 0; f < 1.0; f += 1.0 / veclen)
567 carveRoute(vec, f, randomize_xz, tunnel_above_ground);
573 void CavesV6::carveRoute(v3f vec, float f, bool randomize_xz,
574 bool tunnel_above_ground)
576 MapNode airnode(CONTENT_AIR);
577 MapNode waternode(c_water_source);
578 MapNode lavanode(c_lava_source);
580 v3s16 startp(orp.X, orp.Y, orp.Z);
583 v3f fp = orp + vec * f;
584 fp.X += 0.1 * ps->range(-10, 10);
585 fp.Z += 0.1 * ps->range(-10, 10);
586 v3s16 cp(fp.X, fp.Y, fp.Z);
591 d0 += ps->range(-1, 1);
592 d1 += ps->range(-1, 1);
595 for (s16 z0 = d0; z0 <= d1; z0++) {
596 s16 si = rs / 2 - MYMAX(0, abs(z0) - rs / 7 - 1);
597 for (s16 x0 = -si - ps->range(0,1); x0 <= si - 1 + ps->range(0,1); x0++) {
598 if (tunnel_above_ground)
601 s16 maxabsxz = MYMAX(abs(x0), abs(z0));
602 s16 si2 = rs / 2 - MYMAX(0, maxabsxz - rs / 7 - 1);
603 for (s16 y0 = -si2; y0 <= si2; y0++) {
604 if (large_cave_is_flat) {
605 // Make large caves not so tall
606 if (rs > 7 && abs(y0) >= rs / 3)
610 v3s16 p(cp.X + x0, cp.Y + y0, cp.Z + z0);
613 if (vm->m_area.contains(p) == false)
616 u32 i = vm->m_area.index(p);
617 content_t c = vm->m_data[i].getContent();
618 if (!ndef->get(c).is_ground_content)
622 int full_ymin = node_min.Y - MAP_BLOCKSIZE;
623 int full_ymax = node_max.Y + MAP_BLOCKSIZE;
625 if (full_ymin < water_level && full_ymax > water_level) {
626 vm->m_data[i] = (p.Y <= water_level) ? waternode : airnode;
627 } else if (full_ymax < water_level) {
628 vm->m_data[i] = (p.Y < startp.Y - 2) ? lavanode : airnode;
630 vm->m_data[i] = airnode;
633 if (c == CONTENT_IGNORE || c == CONTENT_AIR)
636 vm->m_data[i] = airnode;
637 vm->m_flags[i] |= VMANIP_FLAG_CAVE;
645 inline s16 CavesV6::getSurfaceFromHeightmap(v3s16 p)
647 if (heightmap != NULL &&
648 p.Z >= node_min.Z && p.Z <= node_max.Z &&
649 p.X >= node_min.X && p.X <= node_max.X) {
650 u32 index = (p.Z - node_min.Z) * ystride + (p.X - node_min.X);
651 return heightmap[index];