ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/random_maps/layout.C
(Generate patch)

Comparing deliantra/server/random_maps/layout.C (file contents):
Revision 1.21 by root, Sun Jul 4 01:01:42 2010 UTC vs.
Revision 1.33 by root, Sat Nov 17 23:33:18 2018 UTC

1/* 1/*
2 * This file is part of Deliantra, the Roguelike Realtime MMORPG. 2 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
3 * 3 *
4 * Copyright (©) 2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team 4 * Copyright (©) 2010,2011,2012,2013,2014,2015,2016 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5 * Copyright (©) Crossfire Development Team (restored, original file without copyright notice) 5 * Copyright (©) 1994-2004 Crossfire Development Team (restored, original file without copyright notice)
6 * 6 *
7 * Deliantra is free software: you can redistribute it and/or modify it under 7 * Deliantra is free software: you can redistribute it and/or modify it under
8 * the terms of the Affero GNU General Public License as published by the 8 * the terms of the Affero GNU General Public License as published by the
9 * Free Software Foundation, either version 3 of the License, or (at your 9 * Free Software Foundation, either version 3 of the License, or (at your
10 * option) any later version. 10 * option) any later version.
11 * 11 *
12 * This program is distributed in the hope that it will be useful, 12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of 13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details. 15 * GNU General Public License for more details.
16 * 16 *
17 * You should have received a copy of the Affero GNU General Public License 17 * You should have received a copy of the Affero GNU General Public License
18 * and the GNU General Public License along with this program. If not, see 18 * and the GNU General Public License along with this program. If not, see
19 * <http://www.gnu.org/licenses/>. 19 * <http://www.gnu.org/licenses/>.
20 * 20 *
21 * The authors can be reached via e-mail to <support@deliantra.net> 21 * The authors can be reached via e-mail to <support@deliantra.net>
22 */ 22 */
23 23
24#include <global.h> 24#include <global.h>
25#include <random_map.h> 25#include <rmg.h>
26#include <rproto.h> 26#include <rproto.h>
27 27
28void 28ecb_noinline void
29layout::alloc (int w, int h) 29layout::alloc (int w, int h)
30{ 30{
31 assert (sizeof (cell) == 1); 31 assert (sizeof (cell) == 1);
32 32
33 this->w = w; 33 this->w = w;
74layout::~layout () 74layout::~layout ()
75{ 75{
76 sfree ((char *)data, size); 76 sfree ((char *)data, size);
77} 77}
78 78
79void 79ecb_noinline void
80layout::fill (char fill) 80layout::fill (char fill)
81{ 81{
82 //memset (data [0], fill, w * h); // only when contiguous :/ 82 //memset (data [0], fill, w * h); // only when contiguous :/
83 fill_rect (0, 0, w, h, fill); 83 fill_rect (0, 0, w, h, fill);
84} 84}
85 85
86void 86ecb_noinline void
87layout::replace (char from, char to)
88{
89 for (int x = 0; x < w; ++x)
90 for (int y = 0; y < h; ++y)
91 if (data [x][y] == from)
92 data [x][y] = to;
93}
94
95ecb_noinline void
87layout::rect (int x1, int y1, int x2, int y2, char fill) 96layout::rect (int x1, int y1, int x2, int y2, char fill)
88{ 97{
89 --x2; 98 --x2;
90 99
91 memset (data [x1] + y1, fill, y2 - y1); 100 memset (data [x1] + y1, fill, y2 - y1);
93 102
94 while (++x1 < x2) 103 while (++x1 < x2)
95 data [x1][y1] = data [x1][y2 - 1] = fill; 104 data [x1][y1] = data [x1][y2 - 1] = fill;
96} 105}
97 106
98void 107ecb_noinline void
99layout::fill_rect (int x1, int y1, int x2, int y2, char fill) 108layout::fill_rect (int x1, int y1, int x2, int y2, char fill)
100{ 109{
101 for (; x1 < x2; ++x1) 110 for (; x1 < x2; ++x1)
102 memset (data [x1] + y1, fill, y2 - y1); 111 memset (data [x1] + y1, fill, y2 - y1);
103} 112}
104 113
114void
105void layout::border (char fill) 115layout::border (char fill)
106{ 116{
107 rect (0, 0, w, h, fill); 117 rect (0, 0, w, h, fill);
108} 118}
109 119
110void 120ecb_noinline void
111layout::fill_rand (int percent) 121layout::fill_rand (int percent)
112{ 122{
113 percent = lerp (percent, 0, 100, 0, 256); 123 percent = lerp (percent, 0, 100, 0, 256);
114 124
115 for (int x = w - 1; --x > 0; ) 125 for (int x = 0; x < w; ++x)
116 for (int y = h - 1; --y > 0; ) 126 for (int y = 0; y < h; ++y)
117 data [x][y] = rmg_rndm (256) > percent ? 0 : '#'; 127 data [x][y] = rmg_rndm (256) > percent ? 0 : '#';
118} 128}
119 129
120///////////////////////////////////////////////////////////////////////////// 130/////////////////////////////////////////////////////////////////////////////
121 131
122// erode by cellular automata 132// erode by cellular automata
123void 133ecb_noinline void
124layout::erode_1_2 (int c1, int c2, int repeat) 134layout::erode_1_2 (int c1, int c2, int repeat)
125{ 135{
126 layout neu (w, h); 136 layout neu (w, h);
127 137
128 while (repeat--) 138 while (repeat--)
194///////////////////////////////////////////////////////////////////////////// 204/////////////////////////////////////////////////////////////////////////////
195// isolation remover - ensures single connected area 205// isolation remover - ensures single connected area
196 206
197typedef fixed_stack<point> pointlist; 207typedef fixed_stack<point> pointlist;
198 208
199static void noinline 209ecb_noinline static void
200push_flood_fill (layout &dist, pointlist &seeds, int x, int y) 210push_flood_fill (layout &dist, pointlist &seeds, int x, int y)
201{ 211{
202 if (dist [x][y]) 212 if (dist [x][y])
203 return; 213 return;
204 214
220 if (x > 0 && !dist [x - 1][y]) push_flood_fill (dist, seeds, x - 1, y); 230 if (x > 0 && !dist [x - 1][y]) push_flood_fill (dist, seeds, x - 1, y);
221 if (x < dist.w - 1 && !dist [x + 1][y]) push_flood_fill (dist, seeds, x + 1, y); 231 if (x < dist.w - 1 && !dist [x + 1][y]) push_flood_fill (dist, seeds, x + 1, y);
222 } 232 }
223} 233}
224 234
225static inline void 235static void inline
226make_tunnel (layout &dist, pointlist &seeds, int x, int y, U8 d, int perturb) 236make_tunnel (layout &dist, pointlist &seeds, int x, int y, U8 d, int perturb)
227{ 237{
228 for (;;) 238 for (;;)
229 { 239 {
230 point neigh[4]; 240 point neigh[4];
265 seeds.push (point (x, y)); 275 seeds.push (point (x, y));
266} 276}
267 277
268// isolation remover, works on a "distance" map 278// isolation remover, works on a "distance" map
269// the map must be initialised with 0 == rooms, 255 = walls 279// the map must be initialised with 0 == rooms, 255 = walls
270static void noinline 280ecb_noinline static void
271isolation_remover (layout &dist, unsigned int perturb = 2) 281isolation_remover (layout &dist, unsigned int perturb = 2)
272{ 282{
273 // dist contains 283 // dist contains
274 // 0 == invisited rooms 284 // 0 == invisited rooms
275 // 1 == visited rooms 285 // 1 == visited rooms
302 seeds.push (point (x, y)); 312 seeds.push (point (x, y));
303 313
304 // phase 2, while we have seeds, if 314 // phase 2, while we have seeds, if
305 // seed is empty, floodfill, else grow 315 // seed is empty, floodfill, else grow
306 316
317 int rem_index = 0; // used to remove "somewhat ordered"
318
307 while (seeds.size) 319 while (seeds.size)
308 { 320 {
309 coroapi::cede_to_tick (); 321 coroapi::cede_to_tick ();
310 322
323 int i = perturb
324 ? rmg_rndm (max (0, seeds.size - 8), seeds.size - 1)
325 : rem_index ++ % seeds.size;
326
311 point p = seeds.remove (rmg_rndm (seeds.size)); 327 point p = seeds.remove (i);
312 328
313 x = p.x; 329 x = p.x;
314 y = p.y; 330 y = p.y;
315 331
316 if (!dist [x][y]) 332 if (!dist [x][y])
358void 374void
359layout::doorify () 375layout::doorify ()
360{ 376{
361 int ndoors = w * h / 60; /* reasonable number of doors. */ 377 int ndoors = w * h / 60; /* reasonable number of doors. */
362 378
379 coroapi::cede_to_tick ();
380
363 fixed_stack<point> doorloc (w * h); 381 fixed_stack<point> doorloc (w * h);
364 382
365 /* make a list of possible door locations */ 383 /* make a list of possible door locations */
366 for (int i = 1; i < w - 1; i++) 384 for (int i = 1; i < w - 1; i++)
367 for (int j = 1; j < h - 1; j++) 385 for (int j = 1; j < h - 1; j++)
449//-GPL 467//-GPL
450 468
451void 469void
452layout::rotate (int rotation) 470layout::rotate (int rotation)
453{ 471{
472 coroapi::cede_to_tick ();
473
454 switch (rotation & 3) 474 switch (rotation & 3)
455 { 475 {
456 case 2: /* a reflection */ 476 case 2: /* a reflection */
457 { 477 {
458 layout new_layout (w, h); 478 layout new_layout (w, h);
513 * 1 match on (i+1, j) 533 * 1 match on (i+1, j)
514 * 2 match on (i, j+1) 534 * 2 match on (i, j+1)
515 * 4 match on (i+1, j+1) 535 * 4 match on (i+1, j+1)
516 * and the possible combinations thereof. 536 * and the possible combinations thereof.
517 */ 537 */
518static int noinline 538ecb_noinline static int
519calc_pattern (char ch, layout &maze, int i, int j) 539calc_pattern (char ch, layout &maze, int i, int j)
520{ 540{
521 int pattern = 0; 541 int pattern = 0;
522 542
523 if (i + 1 < maze.w && maze[i + 1][j] == ch) 543 if (i + 1 < maze.w && maze[i + 1][j] == ch)
610{ 630{
611 layout new_layout (w * 2 - 1, h * 2 - 1); 631 layout new_layout (w * 2 - 1, h * 2 - 1);
612 632
613 new_layout.clear (); 633 new_layout.clear ();
614 634
635 coroapi::cede_to_tick ();
636
615 for (int i = 0; i < w; i++) 637 for (int i = 0; i < w; i++)
616 for (int j = 0; j < h; j++) 638 for (int j = 0; j < h; j++)
617 switch (data [i][j]) 639 switch (data [i][j])
618 { 640 {
619 case '#': expand_wall (new_layout, i, j, *this); break; 641 case '#': expand_wall (new_layout, i, j, *this); break;
620 case 'D': expand_door (new_layout, i, j, *this); break; 642 case 'D': expand_door (new_layout, i, j, *this); break;
621 default: expand_misc (new_layout, i, j, *this); break; 643 default: expand_misc (new_layout, i, j, *this); break;
622 } 644 }
623 645
624 swap (new_layout); 646 swap (new_layout);
625} 647}
701 723
702 return -1; 724 return -1;
703} 725}
704 726
705int 727int
706make_wall (char **maze, int x, int y, int dir) 728make_wall (layout &maze, int x, int y, int dir)
707{ 729{
708 maze[x][y] = 'D'; /* mark a door */ 730 maze[x][y] = 'D'; /* mark a door */
709 731
710 switch (dir) 732 switch (dir)
711 { 733 {
728 750
729void 751void
730layout::roomify () 752layout::roomify ()
731{ 753{
732 int tries = w * h / 30; 754 int tries = w * h / 30;
755
756 coroapi::cede_to_tick ();
733 757
734 for (int ti = 0; ti < tries; ti++) 758 for (int ti = 0; ti < tries; ti++)
735 { 759 {
736 /* starting location for looking at creating a door */ 760 /* starting location for looking at creating a door */
737 int dx = rmg_rndm (w); 761 int dx = rmg_rndm (w);
829} 853}
830 854
831static void 855static void
832gen_mixed_ (layout &maze, random_map_params *RP) 856gen_mixed_ (layout &maze, random_map_params *RP)
833{ 857{
834 int dir; 858 if (maze.w > maze.h && maze.w > 16)
835
836 if (maze.w < 20 && maze.h < 20 && !rmg_rndm (3))
837 dir = 2; // stop recursion randomly
838 else
839 dir = maze.w > maze.h;
840
841 if (dir == 0 && maze.w > 16)
842 { 859 {
843 int m = rmg_rndm (8, maze.w - 8); 860 int m = rmg_rndm (8, maze.w - 8);
844 861
845 layout m1 (maze, 0, 0, m , maze.h); gen_mixed_ (m1, RP); 862 layout m1 (maze, 0, 0, m , maze.h); gen_mixed_ (m1, RP);
846 layout m2 (maze, m, 0, maze.w, maze.h); gen_mixed_ (m2, RP); 863 layout m2 (maze, m, 0, maze.w, maze.h); gen_mixed_ (m2, RP);
847 } 864 }
848 else if (dir == 1 && maze.h > 16) 865 else if (maze.h > 16)
849 { 866 {
850 int m = rmg_rndm (8, maze.h - 8); 867 int m = rmg_rndm (8, maze.h - 8);
851 868
852 layout m1 (maze, 0, 0, maze.w, m ); gen_mixed_ (m1, RP); 869 layout m1 (maze, 0, 0, maze.w, m ); gen_mixed_ (m1, RP);
853 layout m2 (maze, 0, m, maze.w, maze.h); gen_mixed_ (m2, RP); 870 layout m2 (maze, 0, m, maze.w, maze.h); gen_mixed_ (m2, RP);
859 if (RP->map_layout_style == LAYOUT_MULTIPLE) 876 if (RP->map_layout_style == LAYOUT_MULTIPLE)
860 ++RP->map_layout_style; 877 ++RP->map_layout_style;
861 878
862 maze.generate (RP); 879 maze.generate (RP);
863 } 880 }
881
882 coroapi::cede_to_tick ();
864} 883}
865 884
866// recursive subdivision with random sublayouts 885// recursive subdivision with random sublayouts
867static void 886static void
868gen_mixed (layout &maze, random_map_params *RP) 887gen_mixed (layout &maze, random_map_params *RP)
870 random_map_params &rp = *new random_map_params (RP); 889 random_map_params &rp = *new random_map_params (RP);
871 gen_mixed_ (maze, &rp); 890 gen_mixed_ (maze, &rp);
872 delete &rp; 891 delete &rp;
873 892
874 maze.border (); 893 maze.border ();
894
895 // exits currently do not work so well, as they
896 // are currently often found together, so nuke entrances
897 maze.replace ('<', ' ');
898
875 maze.isolation_remover (0); 899 maze.isolation_remover (0);
876} 900}
877 901
878//+GPL 902//+GPL
879 903
989static struct demo 1013static struct demo
990{ 1014{
991 demo () 1015 demo ()
992 { 1016 {
993 rmg_rndm.seed (time (0)); 1017 rmg_rndm.seed (time (0));
1018 extern void hack();hack ();
994 1019
995 for(int i=1;i<100;i++) 1020 for(int i=1;i<100;i++)
996 { 1021 {
997 layout maze (40, 30); 1022 layout maze (40, 30);
998 gen_village (maze); 1023 maze.fill_rand (99);
999 maze.doorify (); 1024 maze.border ();
1025 maze.isolation_remover (2);
1000 maze.print (); 1026 maze.print ();
1001 exit(0);
1002 } 1027 }
1003 1028
1004 exit (1); 1029 exit (1);
1005 } 1030 }
1006} demo; 1031} demo;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines