]> git.lizzy.rs Git - dragonfireclient.git/blob - src/cavegen.cpp
Fix formspec field labels
[dragonfireclient.git] / src / cavegen.cpp
1 /*
2 Minetest
3 Copyright (C) 2010-2013 celeron55, Perttu Ahola <celeron55@gmail.com>
4
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.
9
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.
14
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.
18 */
19
20 #include "util/numeric.h"
21 #include "map.h"
22 #include "mapgen.h"
23 #include "mapgen_v6.h"
24 #include "mapgen_v7.h"
25 #include "cavegen.h"
26
27 NoiseParams nparams_caveliquids =
28         {0, 1, v3f(150.0, 150.0, 150.0), 776, 3, 0.6};
29
30
31 ///////////////////////////////////////////////////////////////////////////////
32
33
34 CaveV6::CaveV6(MapgenV6 *mg, PseudoRandom *ps, PseudoRandom *ps2, bool is_large_cave) {
35         this->mg   = mg;
36         this->vm   = mg->vm;
37         this->ndef = mg->ndef;
38         this->water_level = mg->water_level;
39         this->large_cave = is_large_cave;
40         this->ps  = ps;
41         this->ps2 = ps2;
42         this->c_water_source = mg->c_water_source;
43         this->c_lava_source  = mg->c_lava_source;
44
45         min_tunnel_diameter = 2;
46         max_tunnel_diameter = ps->range(2, 6);
47         dswitchint = ps->range(1, 14);
48         flooded = true;
49         
50         if (large_cave) {
51                 part_max_length_rs = ps->range(2,4);
52                 tunnel_routepoints = ps->range(5, ps->range(15,30));
53                 min_tunnel_diameter = 5;
54                 max_tunnel_diameter = ps->range(7, ps->range(8,24));
55         } else {
56                 part_max_length_rs = ps->range(2,9);
57                 tunnel_routepoints = ps->range(10, ps->range(15,30));
58         }
59         
60         large_cave_is_flat = (ps->range(0,1) == 0);
61 }
62
63
64 void CaveV6::makeCave(v3s16 nmin, v3s16 nmax, int max_stone_height) {
65         node_min = nmin;
66         node_max = nmax;
67         max_stone_y = max_stone_height;
68         main_direction = v3f(0, 0, 0);
69
70         // Allowed route area size in nodes
71         ar = node_max - node_min + v3s16(1, 1, 1);
72         // Area starting point in nodes
73         of = node_min;
74
75         // Allow a bit more
76         //(this should be more than the maximum radius of the tunnel)
77         const s16 max_spread_amount = MAP_BLOCKSIZE;
78         s16 insure = 10;
79         s16 more = MYMAX(max_spread_amount - max_tunnel_diameter / 2 - insure, 1);
80         ar += v3s16(1,0,1) * more * 2;
81         of -= v3s16(1,0,1) * more;
82
83         route_y_min = 0;
84         // Allow half a diameter + 7 over stone surface
85         route_y_max = -of.Y + max_stone_y + max_tunnel_diameter / 2 + 7;
86
87         // Limit maximum to area
88         route_y_max = rangelim(route_y_max, 0, ar.Y - 1);
89
90         if (large_cave) {
91                 s16 min = 0;
92                 if (node_min.Y < water_level && node_max.Y > water_level) {
93                         min = water_level - max_tunnel_diameter/3 - of.Y;
94                         route_y_max = water_level + max_tunnel_diameter/3 - of.Y;
95                 }
96                 route_y_min = ps->range(min, min + max_tunnel_diameter);
97                 route_y_min = rangelim(route_y_min, 0, route_y_max);
98         }
99
100         s16 route_start_y_min = route_y_min;
101         s16 route_start_y_max = route_y_max;
102
103         route_start_y_min = rangelim(route_start_y_min, 0, ar.Y-1);
104         route_start_y_max = rangelim(route_start_y_max, route_start_y_min, ar.Y-1);
105
106         // Randomize starting position
107         orp = v3f(
108                 (float)(ps->next() % ar.X) + 0.5,
109                 (float)(ps->range(route_start_y_min, route_start_y_max)) + 0.5,
110                 (float)(ps->next() % ar.Z) + 0.5
111         );
112
113         int notifytype = large_cave ? GENNOTIFY_LARGECAVE_BEGIN : GENNOTIFY_CAVE_BEGIN;
114         if (mg->gennotify & (1 << notifytype)) {
115                 std::vector <v3s16> *nvec = mg->gen_notifications[notifytype];
116                 nvec->push_back(v3s16(of.X + orp.X, of.Y + orp.Y, of.Z + orp.Z));
117         }
118
119         // Generate some tunnel starting from orp
120         for (u16 j = 0; j < tunnel_routepoints; j++)
121                 makeTunnel(j % dswitchint == 0);
122
123         notifytype = large_cave ? GENNOTIFY_LARGECAVE_END : GENNOTIFY_CAVE_END;
124         if (mg->gennotify & (1 << notifytype)) {
125                 std::vector <v3s16> *nvec = mg->gen_notifications[notifytype];
126                 nvec->push_back(v3s16(of.X + orp.X, of.Y + orp.Y, of.Z + orp.Z));
127         }
128 }
129
130
131 void CaveV6::makeTunnel(bool dirswitch) {
132         if (dirswitch && !large_cave) {
133                 main_direction = v3f(
134                         ((float)(ps->next() % 20) - (float)10) / 10,
135                         ((float)(ps->next() % 20) - (float)10) / 30,
136                         ((float)(ps->next() % 20) - (float)10) / 10
137                 );
138                 main_direction *= (float)ps->range(0, 10) / 10;
139         }
140
141         // Randomize size
142         s16 min_d = min_tunnel_diameter;
143         s16 max_d = max_tunnel_diameter;
144         rs = ps->range(min_d, max_d);
145
146         v3s16 maxlen;
147         if (large_cave) {
148                 maxlen = v3s16(
149                         rs * part_max_length_rs,
150                         rs * part_max_length_rs / 2,
151                         rs * part_max_length_rs
152                 );
153         } else {
154                 maxlen = v3s16(
155                         rs * part_max_length_rs,
156                         ps->range(1, rs * part_max_length_rs),
157                         rs * part_max_length_rs
158                 );
159         }
160
161         v3f vec(
162                 (float)(ps->next() % (maxlen.X * 1)) - (float)maxlen.X / 2,
163                 (float)(ps->next() % (maxlen.Y * 1)) - (float)maxlen.Y / 2,
164                 (float)(ps->next() % (maxlen.Z * 1)) - (float)maxlen.Z / 2
165         );
166
167         // Jump downward sometimes
168         if (!large_cave && ps->range(0, 12) == 0) {
169                 vec = v3f(
170                         (float)(ps->next() % (maxlen.X * 1)) - (float)maxlen.X / 2,
171                         (float)(ps->next() % (maxlen.Y * 2)) - (float)maxlen.Y,
172                         (float)(ps->next() % (maxlen.Z * 1)) - (float)maxlen.Z / 2
173                 );
174         }
175
176         vec += main_direction;
177
178         v3f rp = orp + vec;
179         if (rp.X < 0)
180                 rp.X = 0;
181         else if (rp.X >= ar.X)
182                 rp.X = ar.X - 1;
183         
184         if (rp.Y < route_y_min)
185                 rp.Y = route_y_min;
186         else if (rp.Y >= route_y_max)
187                 rp.Y = route_y_max - 1;
188         
189         if (rp.Z < 0)
190                 rp.Z = 0;
191         else if (rp.Z >= ar.Z)
192                 rp.Z = ar.Z - 1;
193         
194         vec = rp - orp;
195
196         float veclen = vec.getLength();
197         // As odd as it sounds, veclen is *exactly* 0.0 sometimes, causing a FPE
198         if (veclen < 0.05)
199                 veclen = 1.0;
200                 
201         // Every second section is rough
202         bool randomize_xz = (ps2->range(1, 2) == 1);
203
204         // Carve routes
205         for (float f = 0; f < 1.0; f += 1.0 / veclen)
206                 carveRoute(vec, f, randomize_xz);
207         
208         orp = rp;
209 }
210
211
212 void CaveV6::carveRoute(v3f vec, float f, bool randomize_xz) {
213         MapNode airnode(CONTENT_AIR);
214         MapNode waternode(c_water_source);
215         MapNode lavanode(c_lava_source);
216         
217         v3s16 startp(orp.X, orp.Y, orp.Z);
218         startp += of;
219         
220         v3f fp = orp + vec * f;
221         fp.X += 0.1 * ps->range(-10, 10);
222         fp.Z += 0.1 * ps->range(-10, 10);
223         v3s16 cp(fp.X, fp.Y, fp.Z);
224
225         s16 d0 = -rs/2;
226         s16 d1 = d0 + rs;
227         if (randomize_xz) {
228                 d0 += ps->range(-1, 1);
229                 d1 += ps->range(-1, 1);
230         }
231         
232         for (s16 z0 = d0; z0 <= d1; z0++) {
233                 s16 si = rs / 2 - MYMAX(0, abs(z0) - rs / 7 - 1);
234                 for (s16 x0 = -si - ps->range(0,1); x0 <= si - 1 + ps->range(0,1); x0++) {
235                         s16 maxabsxz = MYMAX(abs(x0), abs(z0));
236                         s16 si2 = rs / 2 - MYMAX(0, maxabsxz - rs / 7 - 1);
237                         for (s16 y0 = -si2; y0 <= si2; y0++) {                          
238                                 if (large_cave_is_flat) {
239                                         // Make large caves not so tall
240                                         if (rs > 7 && abs(y0) >= rs / 3)
241                                                 continue;
242                                 }
243
244                                 v3s16 p(cp.X + x0, cp.Y + y0, cp.Z + z0);
245                                 p += of;
246
247                                 if (vm->m_area.contains(p) == false)
248                                         continue;
249
250                                 u32 i = vm->m_area.index(p);
251                                 content_t c = vm->m_data[i].getContent();
252                                 if (!ndef->get(c).is_ground_content)
253                                         continue;
254
255                                 if (large_cave) {
256                                         int full_ymin = node_min.Y - MAP_BLOCKSIZE;
257                                         int full_ymax = node_max.Y + MAP_BLOCKSIZE;
258
259                                         if (flooded && full_ymin < water_level && full_ymax > water_level) {
260                                                 vm->m_data[i] = (p.Y <= water_level) ? waternode : airnode;
261                                         } else if (flooded && full_ymax < water_level) {
262                                                 vm->m_data[i] = (p.Y < startp.Y - 2) ? lavanode : airnode;
263                                         } else {
264                                                 vm->m_data[i] = airnode;
265                                         }
266                                 } else {
267                                         // Don't replace air or water or lava or ignore
268                                         if (c == CONTENT_IGNORE || c == CONTENT_AIR ||
269                                                 c == c_water_source || c == c_lava_source)
270                                                 continue;
271
272                                         vm->m_data[i] = airnode;
273                                         vm->m_flags[i] |= VMANIP_FLAG_CAVE;
274                                 }
275                         }
276                 }
277         }
278 }
279
280
281 ///////////////////////////////////////// Caves V7
282
283 CaveV7::CaveV7(MapgenV7 *mg, PseudoRandom *ps, bool is_large_cave) {
284         this->mg   = mg;
285         this->vm   = mg->vm;
286         this->ndef = mg->ndef;
287         this->water_level = mg->water_level;
288         this->large_cave  = is_large_cave;
289         this->ps = ps;
290         this->c_water_source = mg->c_water_source;
291         this->c_lava_source  = mg->c_lava_source;
292         this->c_ice          = mg->c_ice;
293         this->np_caveliquids = &nparams_caveliquids;
294
295         dswitchint = ps->range(1, 14);
296         flooded    = ps->range(1, 2) == 2;
297         
298         if (large_cave) {
299                 part_max_length_rs = ps->range(2, 4);
300                 tunnel_routepoints = ps->range(5, ps->range(15, 30));
301                 min_tunnel_diameter = 5;
302                 max_tunnel_diameter = ps->range(7, ps->range(8, 24));
303         } else {
304                 part_max_length_rs = ps->range(2, 9);
305                 tunnel_routepoints = ps->range(10, ps->range(15, 30));
306                 min_tunnel_diameter = 2;
307                 max_tunnel_diameter = ps->range(2, 6);
308         }
309         
310         large_cave_is_flat = (ps->range(0, 1) == 0);
311 }
312
313
314 void CaveV7::makeCave(v3s16 nmin, v3s16 nmax, int max_stone_height) {
315         node_min = nmin;
316         node_max = nmax;
317         max_stone_y = max_stone_height;
318         main_direction = v3f(0, 0, 0);
319
320         // Allowed route area size in nodes
321         ar = node_max - node_min + v3s16(1, 1, 1);
322         // Area starting point in nodes
323         of = node_min;
324
325         // Allow a bit more
326         //(this should be more than the maximum radius of the tunnel)
327         s16 insure = 10;
328         s16 more = MYMAX(MAP_BLOCKSIZE - max_tunnel_diameter / 2 - insure, 1);
329         ar += v3s16(1,0,1) * more * 2;
330         of -= v3s16(1,0,1) * more;
331
332         route_y_min = 0;
333         // Allow half a diameter + 7 over stone surface
334         route_y_max = -of.Y + max_stone_y + max_tunnel_diameter / 2 + 7;
335
336         // Limit maximum to area
337         route_y_max = rangelim(route_y_max, 0, ar.Y - 1);
338
339         if (large_cave) {
340                 s16 min = 0;
341                 if (node_min.Y < water_level && node_max.Y > water_level) {
342                         min = water_level - max_tunnel_diameter/3 - of.Y;
343                         route_y_max = water_level + max_tunnel_diameter/3 - of.Y;
344                 }
345                 route_y_min = ps->range(min, min + max_tunnel_diameter);
346                 route_y_min = rangelim(route_y_min, 0, route_y_max);
347         }
348
349         s16 route_start_y_min = route_y_min;
350         s16 route_start_y_max = route_y_max;
351
352         route_start_y_min = rangelim(route_start_y_min, 0, ar.Y - 1);
353         route_start_y_max = rangelim(route_start_y_max, route_start_y_min, ar.Y - 1);
354
355         // Randomize starting position
356         orp = v3f(
357                 (float)(ps->next() % ar.X) + 0.5,
358                 (float)(ps->range(route_start_y_min, route_start_y_max)) + 0.5,
359                 (float)(ps->next() % ar.Z) + 0.5
360         );
361
362         int notifytype = large_cave ? GENNOTIFY_LARGECAVE_BEGIN : GENNOTIFY_CAVE_BEGIN;
363         if (mg->gennotify & (1 << notifytype)) {
364                 std::vector <v3s16> *nvec = mg->gen_notifications[notifytype];
365                 nvec->push_back(v3s16(of.X + orp.X, of.Y + orp.Y, of.Z + orp.Z));
366         }
367
368         // Generate some tunnel starting from orp
369         for (u16 j = 0; j < tunnel_routepoints; j++)
370                 makeTunnel(j % dswitchint == 0);
371
372         notifytype = large_cave ? GENNOTIFY_LARGECAVE_END : GENNOTIFY_CAVE_END;
373         if (mg->gennotify & (1 << notifytype)) {
374                 std::vector <v3s16> *nvec = mg->gen_notifications[notifytype];
375                 nvec->push_back(v3s16(of.X + orp.X, of.Y + orp.Y, of.Z + orp.Z));
376         }
377 }
378
379
380 void CaveV7::makeTunnel(bool dirswitch) {
381         if (dirswitch && !large_cave) {
382                 main_direction = v3f(
383                         ((float)(ps->next() % 20) - (float)10) / 10,
384                         ((float)(ps->next() % 20) - (float)10) / 30,
385                         ((float)(ps->next() % 20) - (float)10) / 10
386                 );
387                 main_direction *= (float)ps->range(0, 10) / 10;
388         }
389
390         // Randomize size
391         s16 min_d = min_tunnel_diameter;
392         s16 max_d = max_tunnel_diameter;
393         rs = ps->range(min_d, max_d);
394
395         v3s16 maxlen;
396         if (large_cave) {
397                 maxlen = v3s16(
398                         rs * part_max_length_rs,
399                         rs * part_max_length_rs / 2,
400                         rs * part_max_length_rs
401                 );
402         } else {
403                 maxlen = v3s16(
404                         rs * part_max_length_rs,
405                         ps->range(1, rs * part_max_length_rs),
406                         rs * part_max_length_rs
407                 );
408         }
409
410         v3f vec;
411         // Jump downward sometimes
412         if (!large_cave && ps->range(0, 12) == 0) {
413                 vec = v3f(
414                         (float)(ps->next() % (maxlen.X * 1)) - (float)maxlen.X / 2,
415                         (float)(ps->next() % (maxlen.Y * 2)) - (float)maxlen.Y,
416                         (float)(ps->next() % (maxlen.Z * 1)) - (float)maxlen.Z / 2
417                 );
418         } else {
419                 vec = v3f(
420                         (float)(ps->next() % (maxlen.X * 1)) - (float)maxlen.X / 2,
421                         (float)(ps->next() % (maxlen.Y * 1)) - (float)maxlen.Y / 2,
422                         (float)(ps->next() % (maxlen.Z * 1)) - (float)maxlen.Z / 2
423                 );
424         }
425
426         // Do not make large caves that are above ground.
427         // It is only necessary to check the startpoint and endpoint.
428         if (large_cave) {
429                 v3s16 orpi(orp.X, orp.Y, orp.Z);
430                 v3s16 veci(vec.X, vec.Y, vec.Z);
431                 v3s16 p;
432                 
433                 p = orpi + veci + of + rs / 2;
434                 if (p.Z >= node_min.Z && p.Z <= node_max.Z &&
435                         p.X >= node_min.X && p.X <= node_max.X) {
436                         u32 index = (p.Z - node_min.Z) * mg->ystride + (p.X - node_min.X);
437                         s16 h = mg->ridge_heightmap[index];
438                         if (h < p.Y)
439                                 return;
440                 } else if (p.Y > water_level) {
441                         return; // If it's not in our heightmap, use a simple heuristic
442                 }
443                 
444                 p = orpi + of + rs / 2;
445                 if (p.Z >= node_min.Z && p.Z <= node_max.Z &&
446                         p.X >= node_min.X && p.X <= node_max.X) {
447                         u32 index = (p.Z - node_min.Z) * mg->ystride + (p.X - node_min.X);
448                         s16 h = mg->ridge_heightmap[index];
449                         if (h < p.Y)
450                                 return;
451                 } else if (p.Y > water_level) { 
452                         return;
453                 }
454         }
455
456         vec += main_direction;
457
458         v3f rp = orp + vec;
459         if (rp.X < 0)
460                 rp.X = 0;
461         else if (rp.X >= ar.X)
462                 rp.X = ar.X - 1;
463         
464         if (rp.Y < route_y_min)
465                 rp.Y = route_y_min;
466         else if (rp.Y >= route_y_max)
467                 rp.Y = route_y_max - 1;
468         
469         if (rp.Z < 0)
470                 rp.Z = 0;
471         else if (rp.Z >= ar.Z)
472                 rp.Z = ar.Z - 1;
473         
474         vec = rp - orp;
475
476         float veclen = vec.getLength();
477         if (veclen < 0.05)
478                 veclen = 1.0;
479                 
480         // Every second section is rough
481         bool randomize_xz = (ps->range(1, 2) == 1);
482
483         // Make a ravine every once in a while if it's long enough
484         //float xylen = vec.X * vec.X + vec.Z * vec.Z;
485         //disable ravines for now
486         bool is_ravine = false; //(xylen > 500.0) && !large_cave && (ps->range(1, 8) == 1);
487
488         // Carve routes
489         for (float f = 0; f < 1.0; f += 1.0 / veclen)
490                 carveRoute(vec, f, randomize_xz, is_ravine);
491         
492         orp = rp;
493 }
494
495
496 void CaveV7::carveRoute(v3f vec, float f, bool randomize_xz, bool is_ravine) {
497         MapNode airnode(CONTENT_AIR);
498         MapNode waternode(c_water_source);
499         MapNode lavanode(c_lava_source);
500         
501         v3s16 startp(orp.X, orp.Y, orp.Z);
502         startp += of;
503         
504         float nval = NoisePerlin3D(np_caveliquids, startp.X,
505                                                         startp.Y, startp.Z, mg->seed);
506         MapNode liquidnode = nval < 0.40 ? lavanode : waternode;
507         
508         v3f fp = orp + vec * f;
509         fp.X += 0.1 * ps->range(-10, 10);
510         fp.Z += 0.1 * ps->range(-10, 10);
511         v3s16 cp(fp.X, fp.Y, fp.Z);
512
513         s16 d0 = -rs/2;
514         s16 d1 = d0 + rs;
515         if (randomize_xz) {
516                 d0 += ps->range(-1, 1);
517                 d1 += ps->range(-1, 1);
518         }
519         
520         bool flat_cave_floor = !large_cave && ps->range(0, 2) == 2;
521         bool should_make_cave_hole = ps->range(1, 10) == 1;
522         
523         for (s16 z0 = d0; z0 <= d1; z0++) {
524                 s16 si = rs / 2 - MYMAX(0, abs(z0) - rs / 7 - 1);
525                 for (s16 x0 = -si - ps->range(0,1); x0 <= si - 1 + ps->range(0,1); x0++) {
526                         s16 maxabsxz = MYMAX(abs(x0), abs(z0));
527         
528                         s16 si2 = is_ravine ? MYMIN(ps->range(25, 26), ar.Y) :
529                                                                  rs / 2 - MYMAX(0, maxabsxz - rs / 7 - 1);
530                         
531                         for (s16 y0 = -si2; y0 <= si2; y0++) {
532                                 // Make better floors in small caves
533                                 if(flat_cave_floor && y0 <= -rs/2 && rs<=7)
534                                         continue;
535                                 
536                                 if (large_cave_is_flat) {
537                                         // Make large caves not so tall
538                                         if (rs > 7 && abs(y0) >= rs / 3)
539                                                 continue;
540                                 }
541
542                                 v3s16 p(cp.X + x0, cp.Y + y0, cp.Z + z0);
543                                 p += of;
544                                 
545                                 if (!is_ravine && mg->heightmap && should_make_cave_hole &&
546                                         p.X <= node_max.X && p.Z <= node_max.Z) {
547                                         int maplen = node_max.X - node_min.X + 1;
548                                         int idx = (p.Z - node_min.Z) * maplen + (p.X - node_min.X);
549                                         if (p.Y >= mg->heightmap[idx] - 2)
550                                                 continue;
551                                 }
552
553                                 if (vm->m_area.contains(p) == false)
554                                         continue;
555
556                                 u32 i = vm->m_area.index(p);
557                                 
558                                 // Don't replace air, water, lava, or ice
559                                 content_t c = vm->m_data[i].getContent();
560                                 if (!ndef->get(c).is_ground_content || c == CONTENT_AIR ||
561                                         c == c_water_source || c == c_lava_source || c == c_ice)
562                                         continue;
563                                         
564                                 if (large_cave) {
565                                         int full_ymin = node_min.Y - MAP_BLOCKSIZE;
566                                         int full_ymax = node_max.Y + MAP_BLOCKSIZE;
567
568                                         if (flooded && full_ymin < water_level && full_ymax > water_level)
569                                                 vm->m_data[i] = (p.Y <= water_level) ? waternode : airnode;
570                                         else if (flooded && full_ymax < water_level)
571                                                 vm->m_data[i] = (p.Y < startp.Y - 4) ? liquidnode : airnode;
572                                         else
573                                                 vm->m_data[i] = airnode;
574                                 } else {
575                                         if (c == CONTENT_IGNORE)
576                                                 continue;
577                                         
578                                         vm->m_data[i] = airnode;
579                                         vm->m_flags[i] |= VMANIP_FLAG_CAVE;
580                                 }
581                         }
582                 }
583         }
584 }