ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/include/map.h
(Generate patch)

Comparing deliantra/server/include/map.h (file contents):
Revision 1.115 by root, Wed Nov 4 14:45:30 2009 UTC vs.
Revision 1.131 by root, Sun Apr 4 02:51:56 2010 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 (©) 2005,2006,2007,2008 Marc Alexander Lehmann / Robin Redeker / the Deliantra team 4 * Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5 * Copyright (©) 2002-2005,2007 Mark Wedel & Crossfire Development Team 5 * Copyright (©) 2002-2005 Mark Wedel & Crossfire Development Team
6 * Copyright (©) 1992,2007 Frank Tore Johansen 6 * Copyright (©) 1992 Frank Tore Johansen
7 * 7 *
8 * Deliantra is free software: you can redistribute it and/or modify it under 8 * Deliantra is free software: you can redistribute it and/or modify it under
9 * the terms of the Affero GNU General Public License as published by the 9 * the terms of the Affero GNU General Public License as published by the
10 * Free Software Foundation, either version 3 of the License, or (at your 10 * Free Software Foundation, either version 3 of the License, or (at your
11 * option) any later version. 11 * option) any later version.
30#ifndef MAP_H 30#ifndef MAP_H
31#define MAP_H 31#define MAP_H
32 32
33#include <tr1/unordered_map> 33#include <tr1/unordered_map>
34 34
35//+GPL
36
35#include "region.h" 37#include "region.h"
36#include "cfperl.h" 38#include "cfperl.h"
37 39
38/* We set this size - this is to make magic map work properly on 40/* We set this size - this is to make magic map work properly on
39 * tiled maps. There is no requirement that this matches the 41 * tiled maps. There is no requirement that this matches the
91/* These are used in the MapLook flags element. They are not used in 93/* These are used in the MapLook flags element. They are not used in
92 * in the object flags structure. 94 * in the object flags structure.
93 */ 95 */
94#define P_BLOCKSVIEW 0x01 96#define P_BLOCKSVIEW 0x01
95#define P_NO_MAGIC 0x02 /* Spells (some) can't pass this object */ 97#define P_NO_MAGIC 0x02 /* Spells (some) can't pass this object */
96#define P_PLAYER 0x04 /* a player (or something seeing these objects) is on this mapspace */ 98#define P_NO_CLERIC 0x04 /* no clerical spells cast here */
97#define P_SAFE 0x08 /* If this is set the map tile is a safe space, 99#define P_SAFE 0x08 /* If this is set the map tile is a safe space,
98 * that means, nothing harmful can be done, 100 * that means, nothing harmful can be done,
99 * such as: bombs, potion usage, alchemy, spells 101 * such as: bombs, potion usage, alchemy, spells
100 * this was introduced to make shops safer 102 * this was introduced to make shops safer
101 * but is useful in other situations */ 103 * but is useful in other situations */
104
105#define P_PLAYER 0x10 /* a player (or something seeing these objects) is on this mapspace */
102#define P_IS_ALIVE 0x10 /* something alive is on this space */ 106#define P_IS_ALIVE 0x20 /* something alive is on this space */
103#define P_NO_CLERIC 0x20 /* no clerical spells cast here */
104
105#define P_UPTODATE 0x80 /* this space is up to date */ 107#define P_UPTODATE 0x80 // this space is up to date
106 108
107/* The following two values are not stored in the MapLook flags, but instead 109/* The following two values are not stored in the MapLook flags, but instead
108 * used in the get_map_flags value - that function is used to return 110 * used in the get_map_flags value - that function is used to return
109 * the flag value, as well as other conditions - using a more general 111 * the flag value, as well as other conditions - using a more general
110 * function that does more of the work can hopefully be used to replace 112 * function that does more of the work can hopefully be used to replace
121 */ 123 */
122INTERFACE_CLASS (mapspace) 124INTERFACE_CLASS (mapspace)
123struct mapspace 125struct mapspace
124{ 126{
125 object *ACC (RW, bot); 127 object *ACC (RW, bot);
126 object *ACC (RW, top); /* lowest/highest object on this space */ 128 object *ACC (RW, top); /* lowest/highest object on this space */
127 object *ACC (RW, faces_obj[MAP_LAYERS]);/* face objects for the 3 layers */ 129 object *ACC (RW, faces_obj[MAP_LAYERS]);/* face objects for the 3 layers */
128 uint32_t smell; // the last count a player was seen here, or 0
129 static uint32_t smellcount; // global smell counter
130 uint8 flags_; /* flags about this space (see the P_ values above) */ 130 uint8 flags_; /* flags about this space (see the P_ values above) */
131 sint8 ACC (RW, light); /* How much light this space provides */ 131 sint8 ACC (RW, light); /* How much light this space provides */
132 MoveType ACC (RW, move_block); /* What movement types this space blocks */ 132 MoveType ACC (RW, move_block); /* What movement types this space blocks */
133 MoveType ACC (RW, move_slow); /* What movement types this space slows */ 133 MoveType ACC (RW, move_slow); /* What movement types this space slows */
134 MoveType ACC (RW, move_on); /* What movement types are activated */ 134 MoveType ACC (RW, move_on); /* What movement types are activated */
135 MoveType ACC (RW, move_off); /* What movement types are activated */ 135 MoveType ACC (RW, move_off); /* What movement types are activated */
136 uint16_t ACC (RW, items_); // saturates at 64k
137 uint32_t ACC (RW, volume_); // ~dm³ (not cm³) (factor is actually 1024)
138 uint32_t ACC (RW, smell); // the last count a player was seen here, or 0
139 static uint32_t ACC (RW, smellcount); // global smell counter
140
141 uint32_t pad1_, pad2_; // pad to 64 bytes on 64 bit systems
142
143//-GPL
136 144
137 void update_ (); 145 void update_ ();
138 MTH void update () 146 MTH void update ()
139 { 147 {
140 if (expect_false (!(flags_ & P_UPTODATE))) 148 // we take advantage of the fact that 0x80 is the sign bit
149 // to generate more efficient code on many cpus
150 assert (sint8 (P_UPTODATE) < 0);
151 assert (sint8 (-1 & ~P_UPTODATE) >= 0);
152
153 if (expect_false (sint8 (flags_) >= 0))
141 update_ (); 154 update_ ();
155
156 // must be true by now (gcc seems content with only the second test)
157 assume (sint8 (flags_) < 0);
158 assume (flags_ & P_UPTODATE);
142 } 159 }
143 160
144 MTH uint8 flags () 161 MTH uint8 flags ()
145 { 162 {
146 update (); 163 update ();
163 op = 0; 180 op = 0;
164 181
165 return op; 182 return op;
166 } 183 }
167 184
185 MTH uint32 items()
186 {
187 update ();
188 return items_;
189 }
190
168 // return the item volume on this mapspace in cm³ 191 // return the item volume on this mapspace in cm³
169 MTH uint64 volume () const; 192 MTH uint64 volume ()
193 {
194 update ();
195 return volume_ * 1024;
196 }
170 197
171 bool blocks (MoveType mt) const 198 bool blocks (MoveType mt) const
172 { 199 {
173 return move_block && (mt & move_block) == mt; 200 return move_block && (mt & move_block) == mt;
174 } 201 }
177 { 204 {
178 return blocks (op->move_type); 205 return blocks (op->move_type);
179 } 206 }
180}; 207};
181 208
182// a rectangular area of a map 209// a rectangular area of a map, used my split_to_tiles/unordered_mapwalk
183struct maprect 210struct maprect
184{ 211{
185 maptile *m; 212 maptile *m;
186 int x0, y0; 213 int x0, y0;
187 int x1, y1; 214 int x1, y1;
188 int dx, dy; // offset to go from local coordinates to original tile */ 215 int dx, dy; // offset to go from local coordinates to original tile */
189}; 216};
217
218//+GPL
190 219
191struct shopitems : zero_initialised 220struct shopitems : zero_initialised
192{ 221{
193 const char *name; /* name of the item in question, null if it is the default item */ 222 const char *name; /* name of the item in question, null if it is the default item */
194 const char *name_pl; /* plural name */ 223 const char *name_pl; /* plural name */
252 static sint8 outdoor_darkness; /* the global darkness level outside */ 281 static sint8 outdoor_darkness; /* the global darkness level outside */
253 282
254 uint16 ACC (RW, enter_x); /* enter_x and enter_y are default entrance location */ 283 uint16 ACC (RW, enter_x); /* enter_x and enter_y are default entrance location */
255 uint16 ACC (RW, enter_y); /* on the map if none are set in the exit */ 284 uint16 ACC (RW, enter_y); /* on the map if none are set in the exit */
256 oblinkpt *buttons; /* Linked list of linked lists of buttons */ 285 oblinkpt *buttons; /* Linked list of linked lists of buttons */
257 sint16 ACC (RW, temp); /* base temperature of this tile (F) */
258 sint16 ACC (RW, pressure); /* barometric pressure (mb) */
259 sint8 ACC (RW, humid); /* humitidy of this tile */
260 sint8 ACC (RW, windspeed); /* windspeed of this tile */
261 sint8 ACC (RW, winddir); /* direction of wind */
262 sint8 ACC (RW, sky); /* sky conditions */
263 int ACC (RW, worldpartx), ACC (RW, worldparty); /*Highly fasten conversion between worldmap and weathermap */
264 struct shopitems *shopitems; /* a semi-colon seperated list of item-types the map's shop will trade in */ 286 struct shopitems *shopitems; /* a semi-colon seperated list of item-types the map's shop will trade in */
265 shstr ACC (RW, shoprace); /* the preffered race of the local shopkeeper */ 287 shstr ACC (RW, shoprace); /* the preffered race of the local shopkeeper */
266 double ACC (RW, shopgreed); /* how much our shopkeeper overcharges */ 288 double ACC (RW, shopgreed); /* how much our shopkeeper overcharges */
267 sint64 ACC (RW, shopmin); /* minimum price a shop will trade for */ 289 sint64 ACC (RW, shopmin); /* minimum price a shop will trade for */
268 sint64 ACC (RW, shopmax); /* maximum price a shop will offer */ 290 sint64 ACC (RW, shopmax); /* maximum price a shop will offer */
269 shstr ACC (RW, msg); /* Message map creator may have left */ 291 shstr ACC (RW, msg); /* Message map creator may have left */
270 shstr ACC (RW, maplore); /* Map lore information */ 292 shstr ACC (RW, maplore); /* Map lore information */
271 shstr ACC (RW, tile_path[4]); /* path to adjoining maps */ 293 shstr ACC (RW, tile_path[4]); /* path to adjoining maps */
272 maptile *ACC (RW, tile_map[4]); /* Next map, linked list */ 294 maptile *ACC (RW, tile_map[4]); /* Next map, linked list */
273 shstr ACC (RW, path); /* Filename of the map */ 295 shstr ACC (RW, path); /* Filename of the map */
274 int ACC (RW, max_nrof); // maximum nrof of any single item on a mapspace
275 uint64 ACC (RW, max_volume); // maximum volume for all items on a mapspace 296 uint64 ACC (RW, max_volume); // maximum volume for all items on a mapspace
297 int ACC (RW, max_items); // maximum number of items on a mapspace
298
299//-GPL
276 300
277 // the maptile:: is neccessary here for the perl interface to work 301 // the maptile:: is neccessary here for the perl interface to work
278 MTH sint8 darklevel (sint8 outside = maptile::outdoor_darkness) const 302 MTH sint8 darklevel (sint8 outside = maptile::outdoor_darkness) const
279 { 303 {
280 return clamp (outdoor ? darkness + outside : darkness, 0, MAX_DARKNESS); 304 return clamp (outdoor ? darkness + outside : darkness, 0, MAX_DARKNESS);
288 // allocates all (empty) mapspace 312 // allocates all (empty) mapspace
289 MTH void alloc (); 313 MTH void alloc ();
290 // deallocates the mapspaces (and destroys all objects) 314 // deallocates the mapspaces (and destroys all objects)
291 MTH void clear (); 315 MTH void clear ();
292 316
317 MTH void post_load (); // update cached values in mapspaces etc.
293 MTH void fix_auto_apply (); 318 MTH void fix_auto_apply ();
294 MTH void do_decay_objects (); 319 MTH void do_decay_objects ();
295 MTH void update_buttons (); 320 MTH void update_buttons ();
296 MTH int change_map_light (int change); 321 MTH int change_map_light (int change);
297 MTH int estimate_difficulty () const; 322 MTH int estimate_difficulty () const;
298 323
299 MTH void play_sound (faceidx sound, int x, int y) const; 324 MTH void play_sound (faceidx sound, int x, int y) const;
300 MTH void say_msg (const char *msg, int x, int y) const; 325 MTH void say_msg (const_utf8_string msg, int x, int y) const;
301 326
302 // connected links 327 // connected links
303 oblinkpt *find_link (shstr_tmp id); 328 oblinkpt *find_link (shstr_tmp id);
304 MTH void trigger (shstr_tmp id, int state = 1, object *activator = 0, object *originator = 0); 329 MTH void trigger (shstr_tmp id, int state = 1, object *activator = 0, object *originator = 0);
305 330
323 bool _load_objects (object_thawer &thawer); 348 bool _load_objects (object_thawer &thawer);
324 MTH bool _load_objects (object_thawer *thawer) { return _load_objects (*thawer); } 349 MTH bool _load_objects (object_thawer *thawer) { return _load_objects (*thawer); }
325 350
326 // save objects into the given file (uses IO_ flags) 351 // save objects into the given file (uses IO_ flags)
327 bool _save_objects (object_freezer &freezer, int flags); 352 bool _save_objects (object_freezer &freezer, int flags);
328 MTH bool _save_objects (const char *path, int flags); 353 MTH bool _save_objects (const_octet_string path, int flags);
329 354
330 // save the header pseudo object _only_ 355 // save the header pseudo object _only_
331 bool _save_header (object_freezer &freezer); 356 bool _save_header (object_freezer &freezer);
332 MTH bool _save_header (const char *path); 357 MTH bool _save_header (const_octet_string path);
333 358
334 maptile (); 359 maptile ();
335 maptile (int w, int h); 360 maptile (int w, int h);
336 ~maptile (); 361 ~maptile ();
337 362
364 } 389 }
365 390
366 void make_map_floor (char **layout, char *floorstyle, random_map_params *RP); 391 void make_map_floor (char **layout, char *floorstyle, random_map_params *RP);
367 bool generate_random_map (random_map_params *RP); 392 bool generate_random_map (random_map_params *RP);
368 393
369 static maptile *find_async (const char *path, maptile *original = 0, bool load = true);//PERL 394 static maptile *find_async (const_utf8_string path, maptile *original = 0, bool load = true);//PERL
370 static maptile *find_sync (const char *path, maptile *original = 0);//PERL 395 static maptile *find_sync (const_utf8_string path, maptile *original = 0);//PERL
371 static maptile *find_style_sync (const char *dir, const char *file = 0);//PERL 396 static maptile *find_style_sync (const_utf8_string dir, const_utf8_string file = 0);//PERL
372 object *pick_random_object (rand_gen &gen = rndm) const; 397 object *pick_random_object (rand_gen &gen = rndm) const;
373 398
374 mapspace &at (uint32 x, uint32 y) const { return spaces [x * height + y]; } 399 mapspace &at (uint32 x, uint32 y) const { return spaces [x * height + y]; }
375 400
376 // return an array of maprects corresponding 401 // return an array of maprects corresponding
377 // to the given rectangular area. the last rect will have 402 // to the given rectangular area. the last rect will have
378 // a 0 map pointer. 403 // a 0 map pointer.
379 // the array will be stored in a static memory area,
380 // so recursion is not atm. supported
381 maprect *split_to_tiles (int x0, int y0, int x1, int y1); 404 maprect *split_to_tiles (dynbuf &buf, int x0, int y0, int x1, int y1);
405
406 MTH bool is_in_shop (int x, int y) const;
382}; 407};
408
409inline bool
410object::is_in_shop () const
411{
412 return is_on_map ()
413 && map->is_in_shop (x, y);
414}
415
416//+GPL
383 417
384/* This is used by get_rangevector to determine where the other 418/* This is used by get_rangevector to determine where the other
385 * creature is. get_rangevector takes into account map tiling, 419 * creature is. get_rangevector takes into account map tiling,
386 * so you just can not look the the map coordinates and get the 420 * so you just can not look the the map coordinates and get the
387 * righte value. distance_x/y are distance away, which 421 * righte value. distance_x/y are distance away, which
418 return 452 return
419 (IN_RANGE_EXC (x, 0, map->width) && IN_RANGE_EXC (y, 0, map->height)) 453 (IN_RANGE_EXC (x, 0, map->width) && IN_RANGE_EXC (y, 0, map->height))
420 || !(get_map_flags (map, &map, x, y, &x, &y) & P_OUT_OF_MAP); 454 || !(get_map_flags (map, &map, x, y, &x, &y) & P_OUT_OF_MAP);
421} 455}
422// comaptibility cruft end 456// comaptibility cruft end
457
458//-GPL
423 459
424inline mapspace & 460inline mapspace &
425object::ms () const 461object::ms () const
426{ 462{
427 return map->at (x, y); 463 return map->at (x, y);
518 554
519#define ordered_mapwalk_end \ 555#define ordered_mapwalk_end \
520 } \ 556 } \
521 } 557 }
522 558
559extern dynbuf mapwalk_buf; // can be used in simple non-recursive situations
560
523// loop over every space in the given maprect, 561// loop over every space in the given maprect,
524// setting m, nx, ny to the map and -coordinate and dx, dy to the offset relative to dx0,dy0 562// setting m, nx, ny to the map and -coordinate and dx, dy to the offset relative to dx0,dy0
525// the iterator code must be a single statement following this macro call, similar to "if" 563// the iterator code must be a single statement following this macro call, similar to "if"
526// "continue" will skip to the next space 564// "continue" will skip to the next space
527#define rect_mapwalk(rect,dx0,dy0) \ 565#define rect_mapwalk(rect,dx0,dy0) \
533 571
534// same as ordered_mapwalk, but the walk will not follow any particular 572// same as ordered_mapwalk, but the walk will not follow any particular
535// order (unorded), but is likely faster. 573// order (unorded), but is likely faster.
536// m will be set to the map (never 0!), nx, ny to the map coord, dx, dy to the offset relative to op 574// m will be set to the map (never 0!), nx, ny to the map coord, dx, dy to the offset relative to op
537// "continue" will skip to the next space 575// "continue" will skip to the next space
538#define unordered_mapwalk_at(map,ox,oy,dx0,dy0,dx1,dy1) \ 576#define unordered_mapwalk_at(buf,map,ox,oy,dx0,dy0,dx1,dy1) \
539 for (maprect *r_e_c_t = (map)->split_to_tiles ( \ 577 for (maprect *r_e_c_t = (map)->split_to_tiles (buf, \
540 (ox) + (dx0) , (oy) + (dy0) , \ 578 (ox) + (dx0) , (oy) + (dy0) , \
541 (ox) + (dx1) + 1, (oy) + (dy1) + 1); \ 579 (ox) + (dx1) + 1, (oy) + (dy1) + 1); \
542 r_e_c_t->m; \ 580 r_e_c_t->m; \
543 ++r_e_c_t) \ 581 ++r_e_c_t) \
544 rect_mapwalk (r_e_c_t, (ox), (oy)) 582 rect_mapwalk (r_e_c_t, (ox), (oy))
545 583
546#define unordered_mapwalk(op,dx0,dy0,dx1,dy1) \ 584#define unordered_mapwalk(buf,op,dx0,dy0,dx1,dy1) \
547 unordered_mapwalk_at (op->map, op->x, op->y, dx0, dy0, dx1, dy1) 585 unordered_mapwalk_at (buf,op->map, op->x, op->y, dx0, dy0, dx1, dy1)
548 586
549#endif 587#endif
550 588

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines