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

Comparing deliantra/server/common/map.C (file contents):
Revision 1.199 by root, Tue May 4 22:26:49 2010 UTC vs.
Revision 1.211 by root, Sat May 7 14:13:48 2011 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,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team 4 * Copyright (©) 2005,2006,2007,2008,2009,2010,2011 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5 * Copyright (©) 2001-2003 Mark Wedel & Crossfire Development Team 5 * Copyright (©) 2001-2003 Mark Wedel & Crossfire Development Team
6 * Copyright (©) 1992 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
311 case KW_arch: 311 case KW_arch:
312 if (object *op = object::read (f, this)) 312 if (object *op = object::read (f, this))
313 { 313 {
314 // TODO: why? 314 // TODO: why?
315 if (op->inv) 315 if (op->inv)
316 {
317 op->carrying = 0;
316 op->update_weight (); 318 op->update_weight ();
319 }
317 320
318 if (IN_RANGE_EXC (op->x, 0, width) && IN_RANGE_EXC (op->y, 0, height)) 321 if (IN_RANGE_EXC (op->x, 0, width) && IN_RANGE_EXC (op->y, 0, height))
319 { 322 {
320 // we insert manually because 323 // we insert manually because
321 // a) its way faster 324 // a) its way faster
358} 361}
359 362
360void 363void
361maptile::activate () 364maptile::activate ()
362{ 365{
363 if (spaces) 366 if (state != MAP_INACTIVE)
367 return;
368
364 for (mapspace *ms = spaces + size (); ms-- > spaces; ) 369 for (mapspace *ms = spaces + size (); ms-- > spaces; )
365 for (object *op = ms->bot; op; op = op->above) 370 for (object *op = ms->bot; op; op = op->above)
366 op->activate_recursive (); 371 op->activate_recursive ();
372
373 state = MAP_ACTIVE;
374
375 activate_physics ();
367} 376}
368 377
369void 378void
370maptile::deactivate () 379maptile::deactivate ()
371{ 380{
372 if (spaces) 381 if (state != MAP_ACTIVE)
382 return;
383
373 for (mapspace *ms = spaces + size (); ms-- > spaces; ) 384 for (mapspace *ms = spaces + size (); ms-- > spaces; )
374 for (object *op = ms->bot; op; op = op->above) 385 for (object *op = ms->bot; op; op = op->above)
375 op->deactivate_recursive (); 386 op->deactivate_recursive ();
387
388 state = MAP_INACTIVE;
376} 389}
377 390
378bool 391bool
379maptile::_save_objects (object_freezer &f, int flags) 392maptile::_save_objects (object_freezer &f, int flags)
380{ 393{
424} 437}
425 438
426void 439void
427maptile::init () 440maptile::init ()
428{ 441{
429 in_memory = MAP_SWAPPED; 442 state = MAP_SWAPPED;
430 443
431 /* The maps used to pick up default x and y values from the 444 /* The maps used to pick up default x and y values from the
432 * map archetype. Mimic that behaviour. 445 * map archetype. Mimic that behaviour.
433 */ 446 */
434 width = 16; 447 width = 16;
611 { 624 {
612 case KW_msg: 625 case KW_msg:
613 thawer.get_ml (KW_endmsg, msg); 626 thawer.get_ml (KW_endmsg, msg);
614 break; 627 break;
615 628
616 case KW_lore: // CF+ extension 629 case KW_lore: // deliantra extension
617 thawer.get_ml (KW_endlore, maplore); 630 thawer.get_ml (KW_endlore, maplore);
618 break; 631 break;
619 632
620 case KW_maplore: 633 case KW_maplore:
621 thawer.get_ml (KW_endmaplore, maplore); 634 thawer.get_ml (KW_endmaplore, maplore);
662 675
663 case KW_tile_path_1: thawer.get (tile_path [0]); break; 676 case KW_tile_path_1: thawer.get (tile_path [0]); break;
664 case KW_tile_path_2: thawer.get (tile_path [1]); break; 677 case KW_tile_path_2: thawer.get (tile_path [1]); break;
665 case KW_tile_path_3: thawer.get (tile_path [2]); break; 678 case KW_tile_path_3: thawer.get (tile_path [2]); break;
666 case KW_tile_path_4: thawer.get (tile_path [3]); break; 679 case KW_tile_path_4: thawer.get (tile_path [3]); break;
680 case KW_tile_path_5: thawer.get (tile_path [4]); break;
681 case KW_tile_path_6: thawer.get (tile_path [5]); break;
667 682
668 case KW_ERROR: 683 case KW_ERROR:
669 set_key_text (thawer.kw_str, thawer.value); 684 set_key_text (thawer.kw_str, thawer.value);
670 break; 685 break;
671 686
754 769
755 if (tile_path [0]) MAP_OUT2 (tile_path_1, tile_path [0]); 770 if (tile_path [0]) MAP_OUT2 (tile_path_1, tile_path [0]);
756 if (tile_path [1]) MAP_OUT2 (tile_path_2, tile_path [1]); 771 if (tile_path [1]) MAP_OUT2 (tile_path_2, tile_path [1]);
757 if (tile_path [2]) MAP_OUT2 (tile_path_3, tile_path [2]); 772 if (tile_path [2]) MAP_OUT2 (tile_path_3, tile_path [2]);
758 if (tile_path [3]) MAP_OUT2 (tile_path_4, tile_path [3]); 773 if (tile_path [3]) MAP_OUT2 (tile_path_4, tile_path [3]);
774 if (tile_path [4]) MAP_OUT2 (tile_path_5, tile_path [4]);
775 if (tile_path [5]) MAP_OUT2 (tile_path_6, tile_path [5]);
759 776
760 freezer.put (this); 777 freezer.put (this);
761 freezer.put (KW(end)); 778 freezer.put (KW(end));
762 779
763 return true; 780 return true;
820 msg = 0; 837 msg = 0;
821 maplore = 0; 838 maplore = 0;
822 shoprace = 0; 839 shoprace = 0;
823 delete [] shopitems, shopitems = 0; 840 delete [] shopitems, shopitems = 0;
824 841
825 for (int i = 0; i < 4; i++) 842 for (int i = 0; i < array_length (tile_path); i++)
826 tile_path [i] = 0; 843 tile_path [i] = 0;
827} 844}
828 845
829maptile::~maptile () 846maptile::~maptile ()
830{ 847{
837 /* We need to look through all the maps and see if any maps 854 /* We need to look through all the maps and see if any maps
838 * are pointing at this one for tiling information. Since 855 * are pointing at this one for tiling information. Since
839 * tiling can be asymetric, we just can not look to see which 856 * tiling can be asymetric, we just can not look to see which
840 * maps this map tiles with and clears those. 857 * maps this map tiles with and clears those.
841 */ 858 */
842 for (int i = 0; i < 4; i++) 859 for (int i = 0; i < array_length (tile_path); i++)
843 if (tile_map[i] == m) 860 if (tile_map[i] == m)
844 tile_map[i] = 0; 861 tile_map[i] = 0;
845} 862}
846 863
847void 864void
1178 middle = 0; 1195 middle = 0;
1179 1196
1180 if (top == middle) 1197 if (top == middle)
1181 middle = 0; 1198 middle = 0;
1182 1199
1200 // dire hack to handle "transparent" floors - currently only open_space
1201 if (floor && floor->arch->archname == shstr_quad_open_space)
1202 {
1203 floor->set_anim_frame (0);
1204
1205 if (maptile *m = floor->map->tile_map [TILE_DOWN])
1206 {
1207 // mirror the floor - very unreliable because usually outdated,
1208 // but somewhta works because floors do not change often :/
1209 mapspace &ms = m->at (floor->x, floor->y);
1210 ms.update ();
1211
1212 if (object *floor2 = ms.faces_obj [2])
1213 if (floor2->arch->archname != shstr_quad_open_space && !middle)
1214 {
1215 floor->set_anim_frame (1);
1216 middle = floor;
1217 floor = floor2;
1218 }
1219 }
1220 }
1221
1183#if 0 1222#if 0
1184 faces_obj [0] = top; 1223 faces_obj [0] = top;
1185 faces_obj [1] = middle; 1224 faces_obj [1] = middle;
1186 faces_obj [2] = floor; 1225 faces_obj [2] = floor;
1187#endif 1226#endif
1190maptile * 1229maptile *
1191maptile::tile_available (int dir, bool load) 1230maptile::tile_available (int dir, bool load)
1192{ 1231{
1193 if (tile_path[dir]) 1232 if (tile_path[dir])
1194 { 1233 {
1234 // map is there and we don't need to load it OR it's loaded => return what we have
1195 if (tile_map[dir] && (!load || tile_map[dir]->in_memory == MAP_ACTIVE)) 1235 if (tile_map[dir] && (!load || tile_map[dir]->linkable ()))
1196 return tile_map[dir]; 1236 return tile_map[dir];
1197 1237
1238 // well, try to locate it then, if possible - maybe it's there already
1198 if ((tile_map[dir] = find_async (tile_path[dir], this, load))) 1239 if ((tile_map[dir] = find_async (tile_path[dir], this, load)))
1199 return tile_map[dir]; 1240 return tile_map[dir];
1200 } 1241 }
1201 1242
1202 return 0; 1243 return 0;
1326 if (map1 == map2) 1367 if (map1 == map2)
1327 { 1368 {
1328 *dx = 0; 1369 *dx = 0;
1329 *dy = 0; 1370 *dy = 0;
1330 } 1371 }
1331 else if (map1->tile_available (0, false) == map2) 1372 else if (map1->tile_available (TILE_NORTH, false) == map2)
1332 { /* up */ 1373 {
1333 *dx = 0; 1374 *dx = 0;
1334 *dy = -map2->height; 1375 *dy = -map2->height;
1335 } 1376 }
1336 else if (map1->tile_available (1, false) == map2) 1377 else if (map1->tile_available (TILE_EAST , false) == map2)
1337 { /* right */ 1378 {
1338 *dx = map1->width; 1379 *dx = map1->width;
1339 *dy = 0; 1380 *dy = 0;
1340 } 1381 }
1341 else if (map1->tile_available (2, false) == map2) 1382 else if (map1->tile_available (TILE_SOUTH, false) == map2)
1342 { /* down */ 1383 {
1343 *dx = 0; 1384 *dx = 0;
1344 *dy = map1->height; 1385 *dy = map1->height;
1345 } 1386 }
1346 else if (map1->tile_available (3, false) == map2) 1387 else if (map1->tile_available (TILE_WEST , false) == map2)
1347 { /* left */ 1388 {
1348 *dx = -map2->width; 1389 *dx = -map2->width;
1349 *dy = 0; 1390 *dy = 0;
1350 } 1391 }
1351 else if (map1->tile_map[0] && map1->tile_map[0]->tile_available (1, false) == map2) 1392 else if (map1->tile_map[TILE_NORTH] && map1->tile_map[TILE_NORTH]->tile_available (TILE_EAST , false) == map2)
1352 { /* up right */ 1393 { /* up right */
1353 *dx = map1->tile_map[0]->width; 1394 *dx = +map1->tile_map[TILE_NORTH]->width;
1354 *dy = -map1->tile_map[0]->height; 1395 *dy = -map1->tile_map[TILE_NORTH]->height;
1355 } 1396 }
1356 else if (map1->tile_map[0] && map1->tile_map[0]->tile_available (3, false) == map2) 1397 else if (map1->tile_map[TILE_NORTH] && map1->tile_map[TILE_NORTH]->tile_available (TILE_WEST , false) == map2)
1357 { /* up left */ 1398 { /* up left */
1358 *dx = -map2->width; 1399 *dx = -map2->width;
1359 *dy = -map1->tile_map[0]->height; 1400 *dy = -map1->tile_map[TILE_NORTH]->height;
1360 } 1401 }
1361 else if (map1->tile_map[1] && map1->tile_map[1]->tile_available (0, false) == map2) 1402 else if (map1->tile_map[TILE_EAST ] && map1->tile_map[TILE_EAST ]->tile_available (TILE_NORTH, false) == map2)
1362 { /* right up */ 1403 { /* right up */
1363 *dx = map1->width; 1404 *dx = +map1->width;
1364 *dy = -map2->height; 1405 *dy = -map2->height;
1365 } 1406 }
1366 else if (map1->tile_map[1] && map1->tile_map[1]->tile_available (2, false) == map2) 1407 else if (map1->tile_map[TILE_EAST ] && map1->tile_map[TILE_EAST ]->tile_available (TILE_SOUTH, false) == map2)
1367 { /* right down */ 1408 { /* right down */
1368 *dx = map1->width; 1409 *dx = +map1->width;
1369 *dy = map1->tile_map[1]->height; 1410 *dy = +map1->tile_map[TILE_EAST]->height;
1370 } 1411 }
1371 else if (map1->tile_map[2] && map1->tile_map[2]->tile_available (1, false) == map2) 1412 else if (map1->tile_map[TILE_SOUTH] && map1->tile_map[TILE_SOUTH]->tile_available (TILE_EAST , false) == map2)
1372 { /* down right */ 1413 { /* down right */
1373 *dx = map1->tile_map[2]->width; 1414 *dx = +map1->tile_map[TILE_SOUTH]->width;
1374 *dy = map1->height; 1415 *dy = +map1->height;
1375 } 1416 }
1376 else if (map1->tile_map[2] && map1->tile_map[2]->tile_available (3, false) == map2) 1417 else if (map1->tile_map[TILE_SOUTH] && map1->tile_map[TILE_SOUTH]->tile_available (TILE_WEST , false) == map2)
1377 { /* down left */ 1418 { /* down left */
1378 *dx = -map2->width; 1419 *dx = -map2->width;
1379 *dy = map1->height; 1420 *dy = +map1->height;
1380 } 1421 }
1381 else if (map1->tile_map[3] && map1->tile_map[3]->tile_available (0, false) == map2) 1422 else if (map1->tile_map[TILE_WEST ] && map1->tile_map[TILE_WEST ]->tile_available (TILE_NORTH, false) == map2)
1382 { /* left up */ 1423 { /* left up */
1383 *dx = -map1->tile_map[3]->width; 1424 *dx = -map1->tile_map[TILE_WEST]->width;
1384 *dy = -map2->height; 1425 *dy = -map2->height;
1385 } 1426 }
1386 else if (map1->tile_map[3] && map1->tile_map[3]->tile_available (2, false) == map2) 1427 else if (map1->tile_map[TILE_WEST ] && map1->tile_map[TILE_WEST ]->tile_available (TILE_SOUTH, false) == map2)
1387 { /* left down */ 1428 { /* left down */
1388 *dx = -map1->tile_map[3]->width; 1429 *dx = -map1->tile_map[TILE_WEST]->width;
1389 *dy = map1->tile_map[3]->height; 1430 *dy = +map1->tile_map[TILE_WEST]->height;
1390 } 1431 }
1391 else 1432 else
1392 return 0; 1433 return 0;
1393 1434
1394 return 1; 1435 return 1;
1626split_to_tiles (dynbuf &buf, maptile *m, int x0, int y0, int x1, int y1, int dx, int dy) 1667split_to_tiles (dynbuf &buf, maptile *m, int x0, int y0, int x1, int y1, int dx, int dy)
1627{ 1668{
1628 // clip to map to the left 1669 // clip to map to the left
1629 if (x0 < 0) 1670 if (x0 < 0)
1630 { 1671 {
1631 if (maptile *tile = m->tile_available (TILE_LEFT, 1)) 1672 if (maptile *tile = m->tile_available (TILE_WEST, 1))
1632 split_to_tiles (buf, tile, x0 + tile->width, y0, min (x1 + tile->width, tile->width), y1, dx - tile->width, dy); 1673 split_to_tiles (buf, tile, x0 + tile->width, y0, min (x1 + tile->width, tile->width), y1, dx - tile->width, dy);
1633 1674
1634 if (x1 < 0) // entirely to the left 1675 if (x1 < 0) // entirely to the left
1635 return; 1676 return;
1636 1677
1638 } 1679 }
1639 1680
1640 // clip to map to the right 1681 // clip to map to the right
1641 if (x1 > m->width) 1682 if (x1 > m->width)
1642 { 1683 {
1643 if (maptile *tile = m->tile_available (TILE_RIGHT, 1)) 1684 if (maptile *tile = m->tile_available (TILE_EAST, 1))
1644 split_to_tiles (buf, tile, max (x0 - m->width, 0), y0, x1 - m->width, y1, dx + m->width, dy); 1685 split_to_tiles (buf, tile, max (x0 - m->width, 0), y0, x1 - m->width, y1, dx + m->width, dy);
1645 1686
1646 if (x0 > m->width) // entirely to the right 1687 if (x0 > m->width) // entirely to the right
1647 return; 1688 return;
1648 1689
1650 } 1691 }
1651 1692
1652 // clip to map above 1693 // clip to map above
1653 if (y0 < 0) 1694 if (y0 < 0)
1654 { 1695 {
1655 if (maptile *tile = m->tile_available (TILE_UP, 1)) 1696 if (maptile *tile = m->tile_available (TILE_NORTH, 1))
1656 split_to_tiles (buf, tile, x0, y0 + tile->height, x1, min (y1 + tile->height, tile->height), dx, dy - tile->height); 1697 split_to_tiles (buf, tile, x0, y0 + tile->height, x1, min (y1 + tile->height, tile->height), dx, dy - tile->height);
1657 1698
1658 if (y1 < 0) // entirely above 1699 if (y1 < 0) // entirely above
1659 return; 1700 return;
1660 1701
1662 } 1703 }
1663 1704
1664 // clip to map below 1705 // clip to map below
1665 if (y1 > m->height) 1706 if (y1 > m->height)
1666 { 1707 {
1667 if (maptile *tile = m->tile_available (TILE_DOWN, 1)) 1708 if (maptile *tile = m->tile_available (TILE_SOUTH, 1))
1668 split_to_tiles (buf, tile, x0, max (y0 - m->height, 0), x1, y1 - m->height, dx, dy + m->height); 1709 split_to_tiles (buf, tile, x0, max (y0 - m->height, 0), x1, y1 - m->height, dx, dy + m->height);
1669 1710
1670 if (y0 > m->height) // entirely below 1711 if (y0 > m->height) // entirely below
1671 return; 1712 return;
1672 1713

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines