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

Comparing deliantra/server/common/region.C (file contents):
Revision 1.22 by root, Thu Feb 1 19:15:56 2007 UTC vs.
Revision 1.38 by root, Sun May 4 15:23:04 2008 UTC

1/* 1/*
2 * CrossFire, A Multiplayer game for X-windows 2 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
3 * 3 *
4 * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team 4 * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5 * Copyright (C) 2001-2003 Mark Wedel & Crossfire Development Team 5 * Copyright (©) 2001-2003,2007 Mark Wedel & Crossfire Development Team
6 * Copyright (C) 1992 Frank Tore Johansen 6 * Copyright (©) 1992,2007 Frank Tore Johansen
7 * 7 *
8 * This program is free software; you can redistribute it and/or modify 8 * Deliantra is free software: you can redistribute it and/or modify
9 * 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
10 * the Free Software Foundation; either version 2 of the License, or 10 * the Free Software Foundation, either version 3 of the License, or
11 * (at your option) any later version. 11 * (at your option) any later version.
12 * 12 *
13 * 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,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of 14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details. 16 * GNU General Public License for more details.
17 * 17 *
18 * 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
19 * along with this program; if not, write to the Free Software 19 * along with this program. If not, see <http://www.gnu.org/licenses/>.
20 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 * 20 *
22 * The authors can be reached via e-mail at <crossfire@schmorp.de> 21 * The authors can be reached via e-mail to <support@deliantra.net>
23 */ 22 */
24 23
25#include <global.h> 24#include <global.h>
26#include <unistd.h> 25#include <unistd.h>
27
28#include "loader.h"
29 26
30regionvec regions; 27regionvec regions;
31 28
32region * 29region *
33region::default_region () 30region::default_region ()
… …
117 } 114 }
118 115
119 return default_region (); 116 return default_region ();
120} 117}
121 118
119void
120region::do_destroy ()
121{
122 regions.erase (this);
123
124 attachable::do_destroy ();
125
126 refcnt_dec ();
127}
128
122/* 129/*
123 * returns 1 if the player is in the region reg, or a child region thereof 130 * returns 1 if the player is in the region reg, or a child region thereof
124 * otherwise returns 0 131 * otherwise returns 0
125 * if passed a NULL region returns -1 132 * if passed a NULL region returns -1
126 */ 133 */
127
128static int 134static int
129region_is_child_of_region (const region * child, const region * r) 135region_is_child_of_region (const region * child, const region * r)
130{ 136{
131 137
132 if (r == NULL) 138 if (r == NULL)
… …
150 * created by this function. 156 * created by this function.
151 */ 157 */
152object * 158object *
153get_jail_exit (object *op) 159get_jail_exit (object *op)
154{ 160{
155 region *reg;
156 object *exit;
157
158 if (op->type != PLAYER) 161 if (op->type != PLAYER)
159 { 162 {
160 LOG (llevError, "region.c: get_jail_exit called against non-player object.\n"); 163 LOG (llevError, "region.c: get_jail_exit called against non-player object.\n");
161 return NULL; 164 return NULL;
162 } 165 }
163 166
164 reg = op->region (); 167 region *reg = op->region ();
165 while (reg) 168 while (reg)
166 { 169 {
167 if (reg->jailmap) 170 if (reg->jailmap)
168 { 171 {
169 exit = object::create (); 172 object *exit = object::create ();
170 EXIT_PATH (exit) = reg->jailmap; 173 EXIT_PATH (exit) = reg->jailmap;
171 /* damned exits reset savebed and remove teleports, so the prisoner can't escape */ 174 /* damned exits reset savebed and remove teleports, so the prisoner can't escape */
172 SET_FLAG (exit, FLAG_DAMNED); 175 SET_FLAG (exit, FLAG_DAMNED);
173 EXIT_X (exit) = reg->jailx; 176 EXIT_X (exit) = reg->jailx;
174 EXIT_Y (exit) = reg->jaily; 177 EXIT_Y (exit) = reg->jaily;
… …
181 LOG (llevError, "No suitable jailmap for region %s was found.\n", &reg->name); 184 LOG (llevError, "No suitable jailmap for region %s was found.\n", &reg->name);
182 185
183 return 0; 186 return 0;
184} 187}
185 188
186region *loader_region::get_region (const char *name) 189region *
190region::read (object_thawer &f)
187{ 191{
192 assert (f.kw == KW_region);
193
188 region *rgn = new region; 194 region *rgn = new region;
189 rgn->name = name; 195 rgn->refcnt_inc ();
190 return rgn;
191}
192 196
193void loader_region::put_region (region *rgn) 197 f.get (rgn->name);
194{ 198 f.next ();
195 for_all_regions (old)
196 if (old->name == rgn->name)
197 {
198 // replace, copy new values (ugly)
199 rgn->index = old->index;
200 *old = *rgn;
201 delete rgn;
202 199
203 return;
204 }
205
206 // just append
207 regions.push_back (rgn);
208}
209
210bool
211loader_base::parse_region (object_thawer &thawer, region *rgn)
212{
213 for (;;) 200 for (;;)
214 { 201 {
215 keyword kw = thawer.get_kv ();
216
217 switch (kw) 202 switch (f.kw)
218 { 203 {
219 case KW_parent: 204 case KW_parent:
220 rgn->parent = region::find (thawer.get_str ()); 205 rgn->parent = region::find (f.get_str ());
221 break;
222
223 case KW_longname:
224 thawer.get (rgn->longname);
225 break; 206 break;
226 207
227 case KW_jail_map: 208 case KW_msg: f.get_ml (KW_endmsg, rgn->msg); break;
228 thawer.get (rgn->jailmap); 209 case KW_longname: f.get (rgn->longname); break;
229 break; 210 case KW_jail_map: f.get (rgn->jailmap); break;
211 case KW_jail_x: f.get (rgn->jailx); break;
212 case KW_jail_y: f.get (rgn->jaily); break;
213 case KW_portal_map: f.get (rgn->portalmap);break;
214 case KW_portal_x: f.get (rgn->portalx); break;
215 case KW_portal_y: f.get (rgn->portaly); break;
216 case KW_fallback: f.get (rgn->fallback); break;
217 case KW_chance: f.get (rgn->treasure_density); break;
230 218
231 case KW_jail_x:
232 thawer.get (rgn->jailx);
233 break;
234
235 case KW_jail_y:
236 thawer.get (rgn->jaily);
237 break;
238
239 case KW_msg: 219 case KW_randomitems:
240 thawer.get_ml (KW_endmsg, rgn->msg); 220 rgn->treasure = treasurelist::get (f.get_str ());
241 break;
242
243 case KW_fallback:
244 thawer.get (rgn->fallback);
245 break; 221 break;
246 222
247 case KW_end: 223 case KW_end:
224 f.next ();
225
226 // cannot use find as that will request the default region
227 for_all_regions (old)
228 if (old->name == rgn->name)
229 {
230 old->destroy ();
231 break;
232 }
233
234 // just append
235 regions.push_back (rgn);
248 return true; 236 return rgn;
237
238 case KW_ERROR:
239 rgn->set_key_text (f.kw_str, f.value);
240 //fprintf (stderr, "region addkv(%s,%s)\n", f.kw_str, f.value);//D
241 break;
249 242
250 default: 243 default:
251 if (!thawer.parse_error (kw, "region", rgn->name)) 244 if (!f.parse_error ("region", rgn->name))
245 {
246 rgn->destroy ();
252 return false; 247 return 0;
248 }
253 break; 249 break;
254 } 250 }
251
252 f.next ();
255 } 253 }
256} 254}
257 255
258/* 256/*
259 * First initialises the archtype hash-table (init_archetable()). 257 * First initialises the archtype hash-table (init_archetable()).
260 * Reads and parses the archetype file (with the first and second-pass 258 * Reads and parses the archetype file (with the first and second-pass
261 * functions). 259 * functions).
262 * Then initialises treasures by calling load_treasures().
263 */ 260 */
264void 261void
265init_regions (void) 262init_regions (void)
266{ 263{
267 char filename[MAX_BUF];
268 int comp;
269
270 if (!regions.size ()) 264 if (!regions.size ())
271 { 265 {
272 // make sure one region is always available 266 // make sure one region is always available
273 region *rgn = new region; 267 region *rgn = new region;
274 rgn->name = "<builtin>"; 268 rgn->name = "<builtin>";
275 rgn->longname = "Built-in Region"; 269 rgn->longname = "Built-in Region";
276 regions.push_back (rgn); 270 regions.push_back (rgn);
277 } 271 }
278
279 sprintf (filename, "%s/%s/%s", settings.datadir, settings.mapdir, settings.regions);
280 LOG (llevDebug, "Reading regions from %s...\n", filename);
281
282 loader_region loader;
283
284 if (!loader.load (filename))
285 {
286 LOG (llevError, "Can't open regions file %s in init_regions.\n", filename);
287 return;
288 }
289
290 LOG (llevDebug, " done\n");
291} 272}
273

Diff Legend

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