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.294 by root, Thu Nov 5 15:43:21 2009 UTC vs.
Revision 1.305 by root, Wed Nov 11 04:45:22 2009 UTC

52 0, 52 0,
53 -1, -1, 0, 1, 1, 1, 0, -1, 53 -1, -1, 0, 1, 1, 1, 0, -1,
54 -2, -2, -2, -1, 0, 1, 2, 2, 2, 2, 2, 1, 0, -1, -2, -2, 54 -2, -2, -2, -1, 0, 1, 2, 2, 2, 2, 2, 1, 0, -1, -2, -2,
55 -3, -3, -3, -3, -2, -1, 0, 1, 2, 3, 3, 3, 3, 3, 3, 3, 2, 1, 0, -1, -2, -3, -3, -3 55 -3, -3, -3, -3, -2, -1, 0, 1, 2, 3, 3, 3, 3, 3, 3, 3, 2, 1, 0, -1, -2, -3, -3, -3
56}; 56};
57int maxfree[SIZEOFFREE] = {
58 0,
59 9, 10, 13, 14, 17, 18, 21, 22,
60 25, 26, 27, 30, 31, 32, 33, 36, 37, 39, 39, 42, 43, 44, 45, 48,
61 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49
62};
63int freedir[SIZEOFFREE] = { 57int freedir[SIZEOFFREE] = {
64 0, 58 0,
65 1, 2, 3, 4, 5, 6, 7, 8, 59 1, 2, 3, 4, 5, 6, 7, 8,
66 1, 2, 2, 2, 3, 4, 4, 4, 5, 6, 6, 6, 7, 8, 8, 8, 60 1, 2, 2, 2, 3, 4, 4, 4, 5, 6, 6, 6, 7, 8, 8, 8,
67 1, 2, 2, 2, 2, 2, 3, 4, 4, 4, 4, 4, 5, 6, 6, 6, 6, 6, 7, 8, 8, 8, 8, 8 61 1, 2, 2, 2, 2, 2, 3, 4, 4, 4, 4, 4, 5, 6, 6, 6, 6, 6, 7, 8, 8, 8, 8, 8
62};
63
64static int maxfree[SIZEOFFREE] = {
65 0,
66 9, 10, 13, 14, 17, 18, 21, 22,
67 25, 26, 27, 30, 31, 32, 33, 36, 37, 39, 39, 42, 43, 44, 45, 48,
68 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49
68}; 69};
69 70
70static void 71static void
71write_uuid (uval64 skip, bool sync) 72write_uuid (uval64 skip, bool sync)
72{ 73{
100 101
101 LOG (llevError, "FATAL: cannot open %s for reading!\n", filename); 102 LOG (llevError, "FATAL: cannot open %s for reading!\n", filename);
102 _exit (1); 103 _exit (1);
103 } 104 }
104 105
105 UUID::BUF buf; 106 char buf [UUID::MAX_LEN];
106 buf[0] = 0; 107 buf[0] = 0;
107 fgets (buf, sizeof (buf), fp); 108 fgets (buf, sizeof (buf), fp);
108 109
109 if (!UUID::cur.parse (buf)) 110 if (!UUID::cur.parse (buf))
110 { 111 {
137 138
138void 139void
139UUID::init () 140UUID::init ()
140{ 141{
141 read_uuid (); 142 read_uuid ();
143}
144
145bool
146UUID::parse (const char *s)
147{
148 if (*s++ != '<' || *s++ != '1' || *s++ != '.')
149 return false;
150
151 seq = 0;
152
153 while (*s != '>')
154 {
155 if (*s < '0')
156 return false;
157
158 // this gives nice branchless code with gcc
159 assert ('0' < 'a' && '0' == 48 && 'a' == 97);
160 int digit = (*s + (*s & 0x40 ? 9 : 0)) & 15;
161
162 seq = (seq << 4) | digit;
163
164 ++s;
165 }
166
167 return true;
168}
169
170char *
171UUID::append (char *buf) const
172{
173 *buf++ = '<';
174 *buf++ = '1';
175 *buf++ = '.';
176
177 uint64_t seq = this->seq;
178 const int bits = 64;
179 char nz = 0;
180 static const char tohex [] = "0123456789abcdef";
181
182 // assert (len >= 3 + bits / 4 + 1 + 1);
183 for (int i = bits / 4; --i; )
184 {
185 uint8_t digit = seq >> (bits - 4);
186
187 *buf = tohex [digit];
188 nz |= digit;
189 buf += nz ? 1 : 0;
190 seq <<= 4;
191 }
192
193 // last digit is special - always emit
194 uint8_t digit = seq >> (bits - 4);
195 *buf++ = tohex [digit];
196
197 *buf++ = '>';
198
199 return buf;
200}
201
202char *
203UUID::c_str () const
204{
205 static char buf [MAX_LEN];
206 *append (buf) = 0;
207 return buf;
142} 208}
143 209
144/* Returns TRUE if every key_values in wants has a partner with the same value in has. */ 210/* Returns TRUE if every key_values in wants has a partner with the same value in has. */
145static bool 211static bool
146compare_ob_value_lists_one (const object *wants, const object *has) 212compare_ob_value_lists_one (const object *wants, const object *has)
185bool object::can_merge_slow (object *ob1, object *ob2) 251bool object::can_merge_slow (object *ob1, object *ob2)
186{ 252{
187 /* A couple quicksanity checks */ 253 /* A couple quicksanity checks */
188 if (ob1 == ob2 254 if (ob1 == ob2
189 || ob1->type != ob2->type 255 || ob1->type != ob2->type
190 || ob1->speed != ob2->speed 256 || fabs (ob1->speed - ob2->speed) >= MIN_ACTIVE_SPEED
191 || ob1->value != ob2->value 257 || ob1->value != ob2->value
192 || ob1->name != ob2->name) 258 || ob1->name != ob2->name)
193 return 0; 259 return 0;
194 260
195 /* Do not merge objects if nrof would overflow, assume nrof 261 /* Do not merge objects if nrof would overflow, assume nrof
220 || ob1->skill != ob2->skill 286 || ob1->skill != ob2->skill
221 || ob1->value != ob2->value 287 || ob1->value != ob2->value
222 || ob1->animation_id != ob2->animation_id 288 || ob1->animation_id != ob2->animation_id
223 || (ob1->face != ob2->face && !ob1->animation_id) // face and animation are dependent on each other 289 || (ob1->face != ob2->face && !ob1->animation_id) // face and animation are dependent on each other
224 || ob1->client_type != ob2->client_type 290 || ob1->client_type != ob2->client_type
225 || ob1->materialname != ob2->materialname 291 || ob1->material != ob2->material
226 || ob1->lore != ob2->lore 292 || ob1->lore != ob2->lore
227 || ob1->subtype != ob2->subtype 293 || ob1->subtype != ob2->subtype
228 || ob1->move_type != ob2->move_type 294 || ob1->move_type != ob2->move_type
229 || ob1->move_block != ob2->move_block 295 || ob1->move_block != ob2->move_block
230 || ob1->move_allow != ob2->move_allow 296 || ob1->move_allow != ob2->move_allow
231 || ob1->move_on != ob2->move_on 297 || ob1->move_on != ob2->move_on
232 || ob1->move_off != ob2->move_off 298 || ob1->move_off != ob2->move_off
233 || ob1->move_slow != ob2->move_slow 299 || ob1->move_slow != ob2->move_slow
234 || ob1->move_slow_penalty != ob2->move_slow_penalty 300 || fabs (ob1->move_slow_penalty - ob2->move_slow_penalty) >= (1.f / 1024.f)
235 || memcmp (&ob1->resist, &ob2->resist, sizeof (ob1->resist)) 301 || memcmp (&ob1->resist, &ob2->resist, sizeof (ob1->resist))
236 || memcmp (&ob1->stats , &ob2->stats , sizeof (ob1->stats))) 302 || memcmp (&ob1->stats , &ob2->stats , sizeof (ob1->stats)))
237 return 0; 303 return 0;
238 304
239 if ((ob1->flag ^ ob2->flag) 305 if ((ob1->flag ^ ob2->flag)
441{ 507{
442 return dump_object (this); 508 return dump_object (this);
443} 509}
444 510
445/* 511/*
446 * get_nearest_part(multi-object, object 2) returns the part of the
447 * multi-object 1 which is closest to the second object.
448 * If it's not a multi-object, it is returned.
449 */
450object *
451get_nearest_part (object *op, const object *pl)
452{
453 object *tmp, *closest;
454 int last_dist, i;
455
456 if (!op->more)
457 return op;
458
459 for (last_dist = distance (op, pl), closest = op, tmp = op->more;
460 tmp;
461 tmp = tmp->more)
462 if ((i = distance (tmp, pl)) < last_dist)
463 closest = tmp, last_dist = i;
464
465 return closest;
466}
467
468/*
469 * Returns the object which has the count-variable equal to the argument. 512 * Returns the object which has the count-variable equal to the argument.
470 * VERRRY slow. 513 * VERRRY slow.
471 */ 514 */
472object * 515object *
473find_object (tag_t i) 516find_object (tag_t i)
701 * This function needs to be called whenever the speed of an object changes. 744 * This function needs to be called whenever the speed of an object changes.
702 */ 745 */
703void 746void
704object::set_speed (float speed) 747object::set_speed (float speed)
705{ 748{
706 if (flag [FLAG_FREED] && speed)
707 {
708 LOG (llevError, "Object %s is freed but has speed.\n", &name);
709 speed = 0;
710 }
711
712 this->speed = speed; 749 this->speed = speed;
713 750
714 if (has_active_speed ()) 751 if (has_active_speed ())
715 activate (); 752 activate ();
716 else 753 else
766 803
767 if (!(m.flags_ & P_UPTODATE)) 804 if (!(m.flags_ & P_UPTODATE))
768 /* nop */; 805 /* nop */;
769 else if (action == UP_OBJ_INSERT) 806 else if (action == UP_OBJ_INSERT)
770 { 807 {
808#if 0
771 // this is likely overkill, TODO: revisit (schmorp) 809 // this is likely overkill, TODO: revisit (schmorp)
772 if ((QUERY_FLAG (op, FLAG_BLOCKSVIEW) && !(m.flags_ & P_BLOCKSVIEW)) 810 if ((QUERY_FLAG (op, FLAG_BLOCKSVIEW) && !(m.flags_ & P_BLOCKSVIEW))
773 || (QUERY_FLAG (op, FLAG_NO_MAGIC) && !(m.flags_ & P_NO_MAGIC)) 811 || (QUERY_FLAG (op, FLAG_NO_MAGIC) && !(m.flags_ & P_NO_MAGIC))
774 || (op->is_player () && !(m.flags_ & P_PLAYER)) 812 || (op->is_player () && !(m.flags_ & P_PLAYER))
775 || (op->type == SAFE_GROUND && !(m.flags_ & P_SAFE)) 813 || (op->type == SAFE_GROUND && !(m.flags_ & P_SAFE))
780 || (m.move_slow | op->move_slow) != m.move_slow 818 || (m.move_slow | op->move_slow) != m.move_slow
781 /* This isn't perfect, but I don't expect a lot of objects to 819 /* This isn't perfect, but I don't expect a lot of objects to
782 * have move_allow right now. 820 * have move_allow right now.
783 */ 821 */
784 || ((m.move_block | op->move_block) & ~op->move_allow) != m.move_block 822 || ((m.move_block | op->move_block) & ~op->move_allow) != m.move_block
785 || 1) // the above is not strong enough a test to skip updating. los maybe? TODO (Schmorp)
786 m.invalidate (); 823 m.invalidate ();
824#else
825 // the above is not strong enough a test to skip updating. los maybe? TODO (schmorp)
826 m.invalidate ();
827#endif
787 } 828 }
788 /* if the object is being removed, we can't make intelligent 829 /* if the object is being removed, we can't make intelligent
789 * decisions, because remove_ob can't really pass the object 830 * decisions, because remove_ob can't really pass the object
790 * that is being removed. 831 * that is being removed.
791 */ 832 */
803object::object () 844object::object ()
804{ 845{
805 SET_FLAG (this, FLAG_REMOVED); 846 SET_FLAG (this, FLAG_REMOVED);
806 847
807 //expmul = 1.0; declared const for the time being 848 //expmul = 1.0; declared const for the time being
808 face = blank_face; 849 face = blank_face;
850 material = MATERIAL_NULL;
809} 851}
810 852
811object::~object () 853object::~object ()
812{ 854{
813 unlink (); 855 unlink ();
1084 1126
1085 above = 0; 1127 above = 0;
1086 below = 0; 1128 below = 0;
1087 env = 0; 1129 env = 0;
1088 1130
1089 /* NO_FIX_PLAYER is set when a great many changes are being 1131 if (pl && pl->is_player ())
1090 * made to players inventory. If set, avoiding the call
1091 * to save cpu time.
1092 */
1093 if (pl)
1094 if (pl->is_player () && (glow_radius || !QUERY_FLAG (pl, FLAG_NO_FIX_PLAYER)))
1095 { 1132 {
1096 pl->update_stats (); 1133 pl->contr->queue_stats_update ();
1097 1134
1098 if (glow_radius && pl->is_on_map ()) 1135 if (glow_radius && pl->is_on_map ())
1099 update_all_los (pl->map, pl->x, pl->y); 1136 update_all_los (pl->map, pl->x, pl->y);
1100 } 1137 }
1101 } 1138 }
1102 else if (map) 1139 else if (map)
1103 { 1140 {
1104 map->dirty = true; 1141 map->dirty = true;
1105 mapspace &ms = this->ms (); 1142 mapspace &ms = this->ms ();
1527 return where->env->insert (this); 1564 return where->env->insert (this);
1528 else 1565 else
1529 return where->map->insert (this, where->x, where->y, originator, flags); 1566 return where->map->insert (this, where->x, where->y, originator, flags);
1530} 1567}
1531 1568
1569// check whether we can put this into the map, respect max_volume, max_items
1570bool
1571object::can_drop_at (maptile *m, int x, int y, object *originator)
1572{
1573 mapspace &ms = m->at (x, y);
1574
1575 int items = ms.items ();
1576
1577 if (!items // testing !items ensures we can drop at least one item
1578 || (items < m->max_items
1579 && ms.volume () < m->max_volume))
1580 return true;
1581
1582 if (originator && originator->is_player ())
1583 originator->contr->failmsg (format (
1584 "No matter how hard you try, you just cannot put the %s here H<Try to remove some items from the floor first.>",
1585 query_name ()
1586 ));
1587
1588 return false;
1589}
1590
1532/* 1591/*
1533 * decrease(object, number) decreases a specified number from 1592 * decrease(object, number) decreases a specified number from
1534 * the amount of an object. If the amount reaches 0, the object 1593 * the amount of an object. If the amount reaches 0, the object
1535 * is subsequently removed and freed. 1594 * is subsequently removed and freed.
1536 * 1595 *
1674 if (op->glow_radius && is_on_map ()) 1733 if (op->glow_radius && is_on_map ())
1675 { 1734 {
1676 update_stats (); 1735 update_stats ();
1677 update_all_los (map, x, y); 1736 update_all_los (map, x, y);
1678 } 1737 }
1679 else if (is_player () && !flag [FLAG_NO_FIX_PLAYER]) 1738 else if (is_player ())
1680 // if this is a player's inventory, update stats 1739 // if this is a player's inventory, update stats
1681 update_stats (); 1740 contr->queue_stats_update ();
1682 1741
1683 INVOKE_OBJECT (INSERT, this); 1742 INVOKE_OBJECT (INSERT, this);
1684 1743
1685 return op; 1744 return op;
1686} 1745}
2173 * This basically means that if direction is 15, then it could either go 2232 * This basically means that if direction is 15, then it could either go
2174 * direction 4, 14, or 16 to get back to where we are. 2233 * direction 4, 14, or 16 to get back to where we are.
2175 * Moved from spell_util.c to object.c with the other related direction 2234 * Moved from spell_util.c to object.c with the other related direction
2176 * functions. 2235 * functions.
2177 */ 2236 */
2178const int reduction_dir[SIZEOFFREE][3] = { 2237static const int reduction_dir[SIZEOFFREE][3] = {
2179 {0, 0, 0}, /* 0 */ 2238 {0, 0, 0}, /* 0 */
2180 {0, 0, 0}, /* 1 */ 2239 {0, 0, 0}, /* 1 */
2181 {0, 0, 0}, /* 2 */ 2240 {0, 0, 0}, /* 2 */
2182 {0, 0, 0}, /* 3 */ 2241 {0, 0, 0}, /* 3 */
2183 {0, 0, 0}, /* 4 */ 2242 {0, 0, 0}, /* 4 */
2454{ 2513{
2455 return map ? map->region (x, y) 2514 return map ? map->region (x, y)
2456 : region::default_region (); 2515 : region::default_region ();
2457} 2516}
2458 2517
2459const materialtype_t *
2460object::dominant_material () const
2461{
2462 if (materialtype_t *mt = name_to_material (materialname))
2463 return mt;
2464
2465 return name_to_material (shstr_unknown);
2466}
2467
2468void 2518void
2469object::open_container (object *new_container) 2519object::open_container (object *new_container)
2470{ 2520{
2471 if (container == new_container) 2521 if (container == new_container)
2472 return; 2522 return;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines