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

Comparing deliantra/server/common/object.C (file contents):
Revision 1.302 by root, Tue Nov 10 00:01:31 2009 UTC vs.
Revision 1.314 by root, Fri Mar 26 00:59:20 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,2009 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 (©) 2001,2007 Mark Wedel & Crossfire Development Team 5 * Copyright (©) 2001 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.
26#include <stdio.h> 26#include <stdio.h>
27#include <sys/types.h> 27#include <sys/types.h>
28#include <sys/uio.h> 28#include <sys/uio.h>
29#include <object.h> 29#include <object.h>
30#include <sproto.h> 30#include <sproto.h>
31#include <loader.h>
32 31
33#include <bitset> 32#include <bitset>
34 33
35UUID UUID::cur; 34UUID UUID::cur;
36static uint64_t seq_next_save; 35static uint64_t seq_next_save;
77 CALL_CALL ("cf::write_uuid", G_DISCARD); 76 CALL_CALL ("cf::write_uuid", G_DISCARD);
78 CALL_END; 77 CALL_END;
79} 78}
80 79
81static void 80static void
82read_uuid (void) 81read_uuid ()
83{ 82{
84 char filename[MAX_BUF]; 83 char filename[MAX_BUF];
85 84
86 sprintf (filename, "%s/uuid", settings.localdir); 85 sprintf (filename, "%s/uuid", settings.localdir);
87 86
248 * Improvements made with merge: Better checking on potion, and also 247 * Improvements made with merge: Better checking on potion, and also
249 * check weight 248 * check weight
250 */ 249 */
251bool object::can_merge_slow (object *ob1, object *ob2) 250bool object::can_merge_slow (object *ob1, object *ob2)
252{ 251{
253 /* A couple quicksanity checks */ 252 /* A couple quick sanity checks */
254 if (ob1 == ob2 253 if (ob1 == ob2
255 || ob1->type != ob2->type 254 || ob1->type != ob2->type
256 || fabs (ob1->speed - ob2->speed) >= MIN_ACTIVE_SPEED
257 || ob1->value != ob2->value 255 || ob1->value != ob2->value
258 || ob1->name != ob2->name) 256 || ob1->name != ob2->name
257 || fabs (ob1->speed - ob2->speed) >= MIN_ACTIVE_SPEED)
259 return 0; 258 return 0;
260 259
261 /* Do not merge objects if nrof would overflow, assume nrof 260 /* Do not merge objects if nrof would overflow, assume nrof
262 * is always 0 .. 2**31-1 */ 261 * is always 0 .. 2**31-1 */
263 if (ob1->nrof > 0x7fffffff - ob2->nrof) 262 if (ob1->nrof > 0x7fffffff - ob2->nrof)
284 || ob1->magic != ob2->magic 283 || ob1->magic != ob2->magic
285 || ob1->slaying != ob2->slaying 284 || ob1->slaying != ob2->slaying
286 || ob1->skill != ob2->skill 285 || ob1->skill != ob2->skill
287 || ob1->value != ob2->value 286 || ob1->value != ob2->value
288 || ob1->animation_id != ob2->animation_id 287 || ob1->animation_id != ob2->animation_id
289 || (ob1->face != ob2->face && !ob1->animation_id) // face and animation are dependent on each other 288 || (ob1->face != ob2->face && !ob1->animation_id) // face and animation are dependend on each other
290 || ob1->client_type != ob2->client_type 289 || ob1->client_type != ob2->client_type
291 || ob1->materialname != ob2->materialname 290 || ob1->material != ob2->material
292 || ob1->lore != ob2->lore 291 || ob1->lore != ob2->lore
293 || ob1->subtype != ob2->subtype 292 || ob1->subtype != ob2->subtype
294 || ob1->move_type != ob2->move_type 293 || ob1->move_type != ob2->move_type
295 || ob1->move_block != ob2->move_block 294 || ob1->move_block != ob2->move_block
296 || ob1->move_allow != ob2->move_allow 295 || ob1->move_allow != ob2->move_allow
521 520
522 return 0; 521 return 0;
523} 522}
524 523
525/* 524/*
525 * Returns the object which has the uuid equal to the argument.
526 * MOAR VERRRY slow.
527 */
528
529object *
530find_object_uuid (UUID i)
531{
532 for_all_objects (op)
533 if (op->uuid == i)
534 return op;
535
536 return 0;
537}
538
539/*
526 * Returns the first object which has a name equal to the argument. 540 * Returns the first object which has a name equal to the argument.
527 * Used only by the patch command, but not all that useful. 541 * Used only by the patch command, but not all that useful.
528 * Enables features like "patch <name-of-other-player> food 999" 542 * Enables features like "patch <name-of-other-player> food 999"
529 */ 543 */
530object * 544object *
687 tail = new_link; 701 tail = new_link;
688 } 702 }
689 } 703 }
690 } 704 }
691 705
692 if (speed < 0)
693 dst->speed_left -= rndm ();
694
695 dst->activate (); 706 dst->activate ();
696} 707}
697 708
698void 709void
699object::instantiate () 710object::instantiate ()
700{ 711{
701 if (!uuid.seq) // HACK 712 if (!uuid.seq) // HACK
702 uuid = UUID::gen (); 713 uuid = UUID::gen ();
703 714
715 // TODO: unclean state changes, should nt be done in copy_to AND instantiate
716 if (flag [FLAG_RANDOM_SPEED] && speed)
717 speed_left = - speed - rndm (); // TODO animation
718 else
704 speed_left = -0.1f; 719 speed_left = -1.;
720
705 /* copy the body_info to the body_used - this is only really 721 /* copy the body_info to the body_used - this is only really
706 * need for monsters, but doesn't hurt to do it for everything. 722 * need for monsters, but doesn't hurt to do it for everything.
707 * by doing so, when a monster is created, it has good starting 723 * by doing so, when a monster is created, it has good starting
708 * values for the body_used info, so when items are created 724 * values for the body_used info, so when items are created
709 * for it, they can be properly equipped. 725 * for it, they can be properly equipped.
717object * 733object *
718object::clone () 734object::clone ()
719{ 735{
720 object *neu = create (); 736 object *neu = create ();
721 copy_to (neu); 737 copy_to (neu);
738
739 // TODO: unclean state changes, should not be done in clone AND instantiate
740 if (neu->flag [FLAG_RANDOM_SPEED] && neu->speed)
741 neu->speed_left = - neu->speed - rndm (); // TODO animation
742
722 neu->map = map; // not copied by copy_to 743 neu->map = map; // not copied by copy_to
723 return neu; 744 return neu;
724} 745}
725 746
726/* 747/*
844object::object () 865object::object ()
845{ 866{
846 SET_FLAG (this, FLAG_REMOVED); 867 SET_FLAG (this, FLAG_REMOVED);
847 868
848 //expmul = 1.0; declared const for the time being 869 //expmul = 1.0; declared const for the time being
849 face = blank_face; 870 face = blank_face;
871 material = MATERIAL_NULL;
850} 872}
851 873
852object::~object () 874object::~object ()
853{ 875{
854 unlink (); 876 unlink ();
1125 1147
1126 above = 0; 1148 above = 0;
1127 below = 0; 1149 below = 0;
1128 env = 0; 1150 env = 0;
1129 1151
1130 /* NO_FIX_PLAYER is set when a great many changes are being 1152 if (pl && pl->is_player ())
1131 * made to players inventory. If set, avoiding the call
1132 * to save cpu time.
1133 */
1134 if (pl)
1135 if (pl->is_player () && (glow_radius || !QUERY_FLAG (pl, FLAG_NO_FIX_PLAYER)))
1136 { 1153 {
1137 pl->update_stats (); 1154 pl->contr->queue_stats_update ();
1138 1155
1139 if (glow_radius && pl->is_on_map ()) 1156 if (glow_radius && pl->is_on_map ())
1140 update_all_los (pl->map, pl->x, pl->y); 1157 update_all_los (pl->map, pl->x, pl->y);
1141 } 1158 }
1142 } 1159 }
1143 else if (map) 1160 else if (map)
1144 { 1161 {
1145 map->dirty = true; 1162 map->dirty = true;
1146 mapspace &ms = this->ms (); 1163 mapspace &ms = this->ms ();
1266 1283
1267 object *prev = this; 1284 object *prev = this;
1268 1285
1269 for (archetype *at = (archetype *)arch->more; at; at = (archetype *)at->more) 1286 for (archetype *at = (archetype *)arch->more; at; at = (archetype *)at->more)
1270 { 1287 {
1271 object *op = arch_to_object (at); 1288 object *op = at->instance ();
1272 1289
1273 op->name = name; 1290 op->name = name;
1274 op->name_pl = name_pl; 1291 op->name_pl = name_pl;
1275 op->title = title; 1292 op->title = title;
1276 1293
1314 * Passing 0 for flag gives proper default values, so flag really only needs 1331 * Passing 0 for flag gives proper default values, so flag really only needs
1315 * to be set if special handling is needed. 1332 * to be set if special handling is needed.
1316 * 1333 *
1317 * Return value: 1334 * Return value:
1318 * new object if 'op' was merged with other object 1335 * new object if 'op' was merged with other object
1319 * NULL if 'op' was destroyed 1336 * NULL if there was an error (destroyed, blocked etc.)
1320 * just 'op' otherwise 1337 * just 'op' otherwise
1321 */ 1338 */
1322object * 1339object *
1323insert_ob_in_map (object *op, maptile *m, object *originator, int flag) 1340insert_ob_in_map (object *op, maptile *m, object *originator, int flag)
1324{ 1341{
1551 1568
1552 for (object *tmp = op->ms ().bot; tmp; tmp = tmp->above) 1569 for (object *tmp = op->ms ().bot; tmp; tmp = tmp->above)
1553 if (tmp->arch->archname == archname) /* same archetype */ 1570 if (tmp->arch->archname == archname) /* same archetype */
1554 tmp->destroy (); 1571 tmp->destroy ();
1555 1572
1556 object *tmp = arch_to_object (archetype::find (archname)); 1573 object *tmp = archetype::find (archname)->instance ();
1557 1574
1558 tmp->x = op->x; 1575 tmp->x = op->x;
1559 tmp->y = op->y; 1576 tmp->y = op->y;
1560 1577
1561 insert_ob_in_map (tmp, op->map, op, 0); 1578 insert_ob_in_map (tmp, op->map, op, 0);
1737 if (op->glow_radius && is_on_map ()) 1754 if (op->glow_radius && is_on_map ())
1738 { 1755 {
1739 update_stats (); 1756 update_stats ();
1740 update_all_los (map, x, y); 1757 update_all_los (map, x, y);
1741 } 1758 }
1742 else if (is_player () && !flag [FLAG_NO_FIX_PLAYER]) 1759 else if (is_player ())
1743 // if this is a player's inventory, update stats 1760 // if this is a player's inventory, update stats
1744 update_stats (); 1761 contr->queue_stats_update ();
1745 1762
1746 INVOKE_OBJECT (INSERT, this); 1763 INVOKE_OBJECT (INSERT, this);
1747 1764
1748 return op; 1765 return op;
1749} 1766}
2560 // TODO: this does not seem to serve any purpose anymore? 2577 // TODO: this does not seem to serve any purpose anymore?
2561#if 0 2578#if 0
2562 // insert the "Close Container" object. 2579 // insert the "Close Container" object.
2563 if (archetype *closer = new_container->other_arch) 2580 if (archetype *closer = new_container->other_arch)
2564 { 2581 {
2565 object *closer = arch_to_object (new_container->other_arch); 2582 object *closer = new_container->other_arch->instance ();
2566 closer->flag [FLAG_NO_MAP_SAVE] = 1; 2583 closer->flag [FLAG_NO_MAP_SAVE] = 1;
2567 new_container->insert (closer); 2584 new_container->insert (closer);
2568 } 2585 }
2569#endif 2586#endif
2570 2587
2676 2693
2677 insert (force); 2694 insert (force);
2678 } 2695 }
2679} 2696}
2680 2697
2698void object::change_move_type (MoveType mt)
2699{
2700 if (move_type == mt)
2701 return;
2702
2703 if (is_on_map ())
2704 {
2705 // we are on the map, so handle move_on/off effects
2706 remove ();
2707 move_type = mt;
2708 map->insert (this, x, y, this);
2709 }
2710 else
2711 move_type = mt;
2712}
2713

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines