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.304 by root, Tue Nov 10 16:29:20 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 ();
1527 return where->env->insert (this); 1569 return where->env->insert (this);
1528 else 1570 else
1529 return where->map->insert (this, where->x, where->y, originator, flags); 1571 return where->map->insert (this, where->x, where->y, originator, flags);
1530} 1572}
1531 1573
1574// check whether we can put this into the map, respect max_volume, max_items
1575bool
1576object::can_drop_at (maptile *m, int x, int y, object *originator)
1577{
1578 mapspace &ms = m->at (x, y);
1579
1580 int items = ms.items ();
1581
1582 if (!items // testing !items ensures we can drop at least one item
1583 || (items < m->max_items
1584 && ms.volume () < m->max_volume))
1585 return true;
1586
1587 if (originator && originator->is_player ())
1588 originator->contr->failmsg (format (
1589 "No matter how hard you try, you just cannot put the %s here H<Try to remove some items from the floor first.>",
1590 query_name ()
1591 ));
1592
1593 return false;
1594}
1595
1532/* 1596/*
1533 * decrease(object, number) decreases a specified number from 1597 * decrease(object, number) decreases a specified number from
1534 * the amount of an object. If the amount reaches 0, the object 1598 * the amount of an object. If the amount reaches 0, the object
1535 * is subsequently removed and freed. 1599 * is subsequently removed and freed.
1536 * 1600 *
2173 * This basically means that if direction is 15, then it could either go 2237 * 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. 2238 * 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 2239 * Moved from spell_util.c to object.c with the other related direction
2176 * functions. 2240 * functions.
2177 */ 2241 */
2178const int reduction_dir[SIZEOFFREE][3] = { 2242static const int reduction_dir[SIZEOFFREE][3] = {
2179 {0, 0, 0}, /* 0 */ 2243 {0, 0, 0}, /* 0 */
2180 {0, 0, 0}, /* 1 */ 2244 {0, 0, 0}, /* 1 */
2181 {0, 0, 0}, /* 2 */ 2245 {0, 0, 0}, /* 2 */
2182 {0, 0, 0}, /* 3 */ 2246 {0, 0, 0}, /* 3 */
2183 {0, 0, 0}, /* 4 */ 2247 {0, 0, 0}, /* 4 */
2454{ 2518{
2455 return map ? map->region (x, y) 2519 return map ? map->region (x, y)
2456 : region::default_region (); 2520 : region::default_region ();
2457} 2521}
2458 2522
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 2523void
2469object::open_container (object *new_container) 2524object::open_container (object *new_container)
2470{ 2525{
2471 if (container == new_container) 2526 if (container == new_container)
2472 return; 2527 return;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines