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.9 by root, Mon Dec 25 14:43:23 2006 UTC vs.
Revision 1.13 by root, Sun Dec 31 10:28:36 2006 UTC

… …
93 93
94 *namelist = rn; 94 *namelist = rn;
95 return entries; 95 return entries;
96} 96}
97 97
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
111/* remove extern, so visible to command_style_map_info function */
112maptile *styles = NULL;
113
114
115maptile *
116load_style_map (char *style_name)
117{
118 maptile *style_map;
119
120 /* Given a file. See if its in memory */
121 for (style_map = styles; style_map != NULL; style_map = style_map->next)
122 {
123 if (!strcmp (style_name, style_map->path))
124 return style_map;
125 }
126 style_map = load_original_map (style_name, MAP_STYLE);
127 /* Remove it from global list, put it on our local list */
128 if (style_map)
129 {
130 maptile *tmp;
131
132 if (style_map == first_map)
133 first_map = style_map->next;
134 else
135 {
136 for (tmp = first_map; tmp && tmp->next != style_map; tmp = tmp->next);
137 if (tmp)
138 tmp->next = style_map->next;
139 }
140 style_map->next = styles;
141 styles = style_map;
142 }
143 return style_map;
144}
145
146maptile * 98maptile *
147find_style (const char *dirname, const char *stylename, int difficulty) 99find_style (const char *dirname, const char *stylename, int difficulty)
148{ 100{
149 char style_file_path[256]; 101 char style_file_path[256];
150 char style_file_full_path[256]; 102 char style_file_full_path[256];
… …
159 sprintf (style_file_path, "%s", dirname); 111 sprintf (style_file_path, "%s", dirname);
160 112
161 /* is what we were given a directory, or a file? */ 113 /* is what we were given a directory, or a file? */
162 sprintf (style_file_full_path, "%s/maps%s", settings.datadir, style_file_path); 114 sprintf (style_file_full_path, "%s/maps%s", settings.datadir, style_file_path);
163 if (stat (style_file_full_path, &file_stat) == 0 && !S_ISDIR (file_stat.st_mode)) 115 if (stat (style_file_full_path, &file_stat) == 0 && !S_ISDIR (file_stat.st_mode))
164 {
165 style_map = load_style_map (style_file_path); 116 style_map = maptile::load_map_sync (style_file_path);
166 } 117
167 if (style_map == NULL) /* maybe we were given a directory! */ 118 if (!style_map) /* maybe we were given a directory! */
168 { 119 {
169 char **namelist; 120 char **namelist;
170 int n; 121 int n;
171 char style_dir_full_path[256]; 122 char style_dir_full_path[256];
172 123
… …
193 * it properly. 144 * it properly.
194 */ 145 */
195 if (difficulty == -1) 146 if (difficulty == -1)
196 { /* pick a random style from this dir. */ 147 { /* pick a random style from this dir. */
197 if (only_subdirs) 148 if (only_subdirs)
198 style_map = NULL; 149 style_map = 0;
199 else 150 else
200 { 151 {
201 strcat (style_file_path, "/"); 152 strcat (style_file_path, "/");
202 strcat (style_file_path, namelist[RANDOM () % n]); 153 strcat (style_file_path, namelist[RANDOM () % n]);
203 style_map = load_style_map (style_file_path); 154 style_map = maptile::load_map_sync (style_file_path);
204 } 155 }
205 } 156 }
206 else 157 else
207 { /* find the map closest in difficulty */ 158 { /* find the map closest in difficulty */
208 int min_dist = 32000, min_index = -1; 159 int min_dist = 32000, min_index = -1;
… …
235 } 186 }
236 /* presumably now we've found the "best" match for the 187 /* presumably now we've found the "best" match for the
237 difficulty. */ 188 difficulty. */
238 strcat (style_file_path, "/"); 189 strcat (style_file_path, "/");
239 strcat (style_file_path, namelist[min_index]); 190 strcat (style_file_path, namelist[min_index]);
240 style_map = load_style_map (style_file_path); 191 style_map = maptile::load_map_sync (style_file_path);
241 } 192 }
193
242 for (i = 0; i < n; i++) 194 for (i = 0; i < n; i++)
243 free (namelist[i]); 195 free (namelist[i]);
196
244 free (namelist); 197 free (namelist);
245 } 198 }
199
246 return style_map; 200 return style_map;
247 201
248} 202}
249
250 203
251/* picks a random object from a style map. 204/* picks a random object from a style map.
252 * Redone by MSW so it should be faster and not use static 205 * Redone by MSW so it should be faster and not use static
253 * variables to generate tables. 206 * variables to generate tables.
254 */ 207 */
… …
270 x = RANDOM () % style->width; 223 x = RANDOM () % style->width;
271 y = RANDOM () % style->height; 224 y = RANDOM () % style->height;
272 new_obj = GET_MAP_OB (style, x, y); 225 new_obj = GET_MAP_OB (style, x, y);
273 } 226 }
274 while (new_obj == NULL && limit < 1000); 227 while (new_obj == NULL && limit < 1000);
228
275 if (new_obj->head) 229 if (new_obj->head)
276 return new_obj->head; 230 return new_obj->head;
277 else 231 else
278 return new_obj; 232 return new_obj;
279} 233}
280 234
281
282void
283free_style_maps (void)
284{
285 maptile *next;
286 int style_maps = 0;
287
288 /* delete_map will try to free it from the linked list,
289 * but won't find it, so we need to do it ourselves
290 */
291 while (styles)
292 {
293 next = styles->next;
294 delete_map (styles);
295 styles = next;
296 style_maps++;
297 }
298 LOG (llevDebug, "free_style_maps: Freed %d maps\n", style_maps);
299}

Diff Legend

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