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

Comparing deliantra/server/random_maps/style.C (file contents):
Revision 1.12 by root, Sat Dec 30 10:16:11 2006 UTC vs.
Revision 1.25 by root, Mon Jun 4 13:04:00 2007 UTC

1/* 1/*
2 CrossFire, A Multiplayer game for X-windows 2 * CrossFire, A Multiplayer game for X-windows
3 3 *
4 * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
4 Copyright (C) 2002 Mark Wedel & Crossfire Development Team 5 * Copyright (C) 2002 Mark Wedel & Crossfire Development Team
5 Copyright (C) 1992 Frank Tore Johansen 6 * Copyright (C) 1992 Frank Tore Johansen
6 7 *
7 This program is free software; you can redistribute it and/or modify 8 * This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by 9 * it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or 10 * the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version. 11 * (at your option) any later version.
11 12 *
12 This program is distributed in the hope that it will be useful, 13 * This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of 14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details. 16 * GNU General Public License for more details.
16 17 *
17 You should have received a copy of the GNU General Public License 18 * You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software 19 * along with this program; if not, write to the Free Software
19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 20 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 21 *
21 The authors can be reached via e-mail at <crossfire@schmorp.de> 22 * The authors can be reached via e-mail at <crossfire@schmorp.de>
22*/ 23 */
23
24 24
25#include <global.h> 25#include <global.h>
26#include <random_map.h> 26#include <random_map.h>
27#include <dirent.h> 27#include <dirent.h>
28#include <sys/stat.h> 28#include <sys/stat.h>
29#include <unistd.h> 29#include <unistd.h>
30#include "../include/autoconf.h" 30#include "../include/autoconf.h"
31 31
32// NAME_MAX may not be defined on POSIX systems
33#ifndef NAME_MAX
34# define NAME_MAX 255
35#endif
32 36
33static int 37static int
34pointer_strcmp (const void *p1, const void *p2) 38pointer_strcmp (const void *p1, const void *p2)
35{ 39{
36 const char *s1 = *(const char **) p1; 40 const char *s1 = *(const char **) p1;
… …
61 int entries = 0, entry_size = 0; 65 int entries = 0, entry_size = 0;
62 char name[NAME_MAX + 1], **rn = NULL; 66 char name[NAME_MAX + 1], **rn = NULL;
63 struct stat sb; 67 struct stat sb;
64 68
65 dp = opendir (dir); 69 dp = opendir (dir);
66 if (dp == NULL) 70 if (!dp)
67 return -1; 71 return -1;
68 72
69 while ((d = readdir (dp)) != NULL) 73 while ((d = readdir (dp)))
70 { 74 {
71 sprintf (name, "%s/%s", dir, d->d_name); 75 sprintf (name, "%s/%s", dir, d->d_name);
72 if (skip_dirs) 76 if (skip_dirs)
73 { 77 {
74 stat (name, &sb); 78 stat (name, &sb);
75 if (S_ISDIR (sb.st_mode)) 79 if (S_ISDIR (sb.st_mode))
76 {
77 continue; 80 continue;
78 }
79 } 81 }
80 82
81 if (entries == entry_size) 83 if (entries == entry_size)
82 { 84 {
83 entry_size += 10; 85 entry_size += 10;
… …
93 95
94 *namelist = rn; 96 *namelist = rn;
95 return entries; 97 return entries;
96} 98}
97 99
98
99
100
101
102/* this function loads and returns the map requested.
103 * dirname, for example, is "/styles/wallstyles", stylename, is,
104 * for example, "castle", difficulty is -1 when difficulty is
105 * irrelevant to the style. If dirname is given, but stylename
106 * isn't, and difficult is -1, it returns a random style map.
107 * Otherwise, it tries to match the difficulty given with a style
108 * file, named style_name_# where # is an integer
109 */
110
111maptile *
112load_style_map (char *style_name)
113{
114 maptile *style_map = maptile::find_map (style_name, 0);
115 style_map->load ();
116 return style_map;
117}
118
119maptile * 100maptile *
120find_style (const char *dirname, const char *stylename, int difficulty) 101find_style (const char *dirname, const char *stylename, int difficulty)
121{ 102{
122 char style_file_path[256]; 103 char style_file_path[1024];
123 char style_file_full_path[256]; 104 char style_file_full_path[1024];
124 maptile *style_map = NULL; 105 maptile *style_map = NULL;
125 struct stat file_stat; 106 struct stat file_stat;
126 int i, only_subdirs = 0; 107 int i, only_subdirs = 0;
127 108
128 /* if stylename exists, set style_file_path to that file. */ 109 /* if stylename exists, set style_file_path to that file. */
… …
130 sprintf (style_file_path, "%s/%s", dirname, stylename); 111 sprintf (style_file_path, "%s/%s", dirname, stylename);
131 else /* otherwise, just use the dirname. We'll pick a random stylefile. */ 112 else /* otherwise, just use the dirname. We'll pick a random stylefile. */
132 sprintf (style_file_path, "%s", dirname); 113 sprintf (style_file_path, "%s", dirname);
133 114
134 /* is what we were given a directory, or a file? */ 115 /* is what we were given a directory, or a file? */
135 sprintf (style_file_full_path, "%s/maps%s", settings.datadir, style_file_path); 116 sprintf (style_file_full_path, "%s/maps%s.map", settings.datadir, style_file_path);
117
136 if (stat (style_file_full_path, &file_stat) == 0 && !S_ISDIR (file_stat.st_mode)) 118 if (stat (style_file_full_path, &file_stat) == 0 && !S_ISDIR (file_stat.st_mode))
137 {
138 style_map = load_style_map (style_file_path); 119 style_map = maptile::find_sync (style_file_path);
139 } 120
140 if (style_map == NULL) /* maybe we were given a directory! */ 121 if (!style_map) /* maybe we were given a directory! */
141 { 122 {
142 char **namelist; 123 char **namelist;
143 int n; 124 int n;
144 char style_dir_full_path[256]; 125 char style_dir_full_path[256];
145 126
… …
166 * it properly. 147 * it properly.
167 */ 148 */
168 if (difficulty == -1) 149 if (difficulty == -1)
169 { /* pick a random style from this dir. */ 150 { /* pick a random style from this dir. */
170 if (only_subdirs) 151 if (only_subdirs)
171 style_map = NULL; 152 style_map = 0;
172 else 153 else
173 { 154 {
174 strcat (style_file_path, "/"); 155 strcat (style_file_path, "/");
175 strcat (style_file_path, namelist[RANDOM () % n]); 156 strcat (style_file_path, namelist[rndm (n)]);
176 style_map = load_style_map (style_file_path); 157 style_map = maptile::find_sync (style_file_path);
177 } 158 }
178 } 159 }
179 else 160 else
180 { /* find the map closest in difficulty */ 161 { /* find the map closest in difficulty */
181 int min_dist = 32000, min_index = -1; 162 int min_dist = 32000, min_index = -1;
… …
188 if ((mfile_name - 1) == NULL) 169 if ((mfile_name - 1) == NULL)
189 { /* since there isn't a sequence, */ 170 { /* since there isn't a sequence, */
190 int q; 171 int q;
191 172
192 /*pick one at random to recurse */ 173 /*pick one at random to recurse */
193 style_map = find_style (style_file_path, namelist[RANDOM () % n], difficulty); 174 style_map = find_style (style_file_path, namelist[rndm (n)], difficulty);
194 for (q = 0; q < n; q++) 175 for (q = 0; q < n; q++)
195 free (namelist[q]); 176 free (namelist[q]);
196 free (namelist); 177 free (namelist);
197 return style_map; 178 return style_map;
198 } 179 }
… …
204 min_dist = dist; 185 min_dist = dist;
205 min_index = i; 186 min_index = i;
206 } 187 }
207 } 188 }
208 } 189 }
190
209 /* presumably now we've found the "best" match for the 191 /* presumably now we've found the "best" match for the
210 difficulty. */ 192 difficulty. */
211 strcat (style_file_path, "/"); 193 strcat (style_file_path, "/");
212 strcat (style_file_path, namelist[min_index]); 194 strcat (style_file_path, namelist[min_index]);
213 style_map = load_style_map (style_file_path); 195 style_map = maptile::find_sync (style_file_path);
214 } 196 }
197
215 for (i = 0; i < n; i++) 198 for (i = 0; i < n; i++)
216 free (namelist[i]); 199 free (namelist[i]);
200
217 free (namelist); 201 free (namelist);
218 } 202 }
203
204 if (style_map)
205 {
206 style_map->load_sync ();
207 style_map->deactivate ();
208 }
209
219 return style_map; 210 return style_map;
220
221} 211}
222
223/* picks a random object from a style map.
224 * Redone by MSW so it should be faster and not use static
225 * variables to generate tables.
226 */
227object *
228pick_random_object (maptile *style)
229{
230 int x, y, limit = 0;
231 object *new_obj;
232
233 /* while returning a null object will result in a crash, that
234 * is actually preferable to an infinite loop. That is because
235 * most servers will automatically restart in case of crash.
236 * Change the logic on getting the random space - shouldn't make
237 * any difference, but this seems clearer to me.
238 */
239 do
240 {
241 limit++;
242 x = RANDOM () % style->width;
243 y = RANDOM () % style->height;
244 new_obj = GET_MAP_OB (style, x, y);
245 }
246 while (new_obj == NULL && limit < 1000);
247
248 if (new_obj->head)
249 return new_obj->head;
250 else
251 return new_obj;
252}
253

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines