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.139 by root, Sat Apr 21 17:34:22 2007 UTC vs.
Revision 1.156 by root, Fri May 18 01:01:01 2007 UTC

1/* 1/*
2 * CrossFire, A Multiplayer game for X-windows 2 * CrossFire, A Multiplayer game
3 * 3 *
4 * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team 4 * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
5 * Copyright (C) 2001 Mark Wedel & Crossfire Development Team 5 * Copyright (C) 2001 Mark Wedel & Crossfire Development Team
6 * Copyright (C) 1992 Frank Tore Johansen 6 * Copyright (C) 1992 Frank Tore Johansen
7 * 7 *
29#include <stdio.h> 29#include <stdio.h>
30#include <sys/types.h> 30#include <sys/types.h>
31#include <sys/uio.h> 31#include <sys/uio.h>
32#include <object.h> 32#include <object.h>
33#include <funcpoint.h> 33#include <funcpoint.h>
34#include <sproto.h>
34#include <loader.h> 35#include <loader.h>
35 36
36#include <bitset> 37#include <bitset>
37 38
38int nrofallocobjects = 0; 39int nrofallocobjects = 0;
324sum_weight (object *op) 325sum_weight (object *op)
325{ 326{
326 long sum; 327 long sum;
327 object *inv; 328 object *inv;
328 329
329 for (sum = 0, inv = op->inv; inv != NULL; inv = inv->below) 330 for (sum = 0, inv = op->inv; inv; inv = inv->below)
330 { 331 {
331 if (inv->inv) 332 if (inv->inv)
332 sum_weight (inv); 333 sum_weight (inv);
334
333 sum += inv->carrying + inv->weight * (inv->nrof ? inv->nrof : 1); 335 sum += inv->carrying + inv->weight * (inv->nrof ? inv->nrof : 1);
334 } 336 }
335 337
336 if (op->type == CONTAINER && op->stats.Str) 338 if (op->type == CONTAINER && op->stats.Str)
337 sum = (sum * (100 - op->stats.Str)) / 100; 339 sum = (sum * (100 - op->stats.Str)) / 100;
446 */ 448 */
447 while (owner->owner) 449 while (owner->owner)
448 owner = owner->owner; 450 owner = owner->owner;
449 451
450 this->owner = owner; 452 this->owner = owner;
453}
454
455int
456object::slottype () const
457{
458 if (type == SKILL)
459 {
460 if (IS_COMBAT_SKILL (subtype)) return slot_combat;
461 if (IS_RANGED_SKILL (subtype)) return slot_ranged;
462 }
463 else
464 {
465 if (slot [body_combat].info) return slot_combat;
466 if (slot [body_range ].info) return slot_ranged;
467 }
468
469 return slot_none;
470}
471
472bool
473object::change_weapon (object *ob)
474{
475 if (current_weapon == ob)
476 return true;
477
478 if (chosen_skill)
479 chosen_skill->flag [FLAG_APPLIED] = false;
480
481 current_weapon = ob;
482 chosen_skill = !ob || ob->type == SKILL ? ob : find_skill_by_name (this, ob->skill);
483
484 if (chosen_skill)
485 chosen_skill->flag [FLAG_APPLIED] = true;
486
487 update_stats ();
488
489 if (ob)
490 {
491 // now check wether any body locations became invalid, in which case
492 // we cannot apply the weapon at the moment.
493 for (int i = 0; i < NUM_BODY_LOCATIONS; ++i)
494 if (slot[i].used < 0)
495 {
496 current_weapon = chosen_skill = 0;
497 update_stats ();
498
499 new_draw_info_format (NDI_UNIQUE, 0, this,
500 "You try to balance all your items at once, "
501 "but the %s is just too much for your body. "
502 "[You need to unapply some items first.]", &ob->name);
503 return false;
504 }
505
506 //new_draw_info_format (NDI_UNIQUE, 0, this, "You switch to your %s.", &ob->name);
507 }
508 else
509 ;//new_draw_info_format (NDI_UNIQUE, 0, this, "You unwield your weapons.");
510
511 if (ob && !ob->flag [FLAG_APPLIED] && ob->type != SPELL)
512 {
513 LOG (llevError | logBacktrace, "%s changed to unapplied weapon %s",
514 &name, ob->debug_desc ());
515 return false;
516 }
517
518 return true;
451} 519}
452 520
453/* Zero the key_values on op, decrementing the shared-string 521/* Zero the key_values on op, decrementing the shared-string
454 * refcounts and freeing the links. 522 * refcounts and freeing the links.
455 */ 523 */
537 * need for monsters, but doesn't hurt to do it for everything. 605 * need for monsters, but doesn't hurt to do it for everything.
538 * by doing so, when a monster is created, it has good starting 606 * by doing so, when a monster is created, it has good starting
539 * values for the body_used info, so when items are created 607 * values for the body_used info, so when items are created
540 * for it, they can be properly equipped. 608 * for it, they can be properly equipped.
541 */ 609 */
542 memcpy (body_used, body_info, sizeof (body_used)); 610 for (int i = NUM_BODY_LOCATIONS; i--; )
611 slot[i].used = slot[i].info;
543 612
544 attachable::instantiate (); 613 attachable::instantiate ();
545} 614}
546 615
547object * 616object *
835 904
836 if (flag [FLAG_IS_LINKED]) 905 if (flag [FLAG_IS_LINKED])
837 remove_button_link (this); 906 remove_button_link (this);
838 907
839 if (flag [FLAG_FRIENDLY]) 908 if (flag [FLAG_FRIENDLY])
840 {
841 remove_friendly_object (this); 909 remove_friendly_object (this);
842
843 if (type == GOLEM
844 && owner
845 && owner->type == PLAYER
846 && owner->contr->ranges[range_golem] == this)
847 owner->contr->ranges[range_golem] = 0;
848 }
849 910
850 if (!flag [FLAG_REMOVED]) 911 if (!flag [FLAG_REMOVED])
851 remove (); 912 remove ();
852 913
853 destroy_inv (true); 914 destroy_inv (true);
1176object * 1237object *
1177insert_ob_in_map (object *op, maptile *m, object *originator, int flag) 1238insert_ob_in_map (object *op, maptile *m, object *originator, int flag)
1178{ 1239{
1179 assert (!op->flag [FLAG_FREED]); 1240 assert (!op->flag [FLAG_FREED]);
1180 1241
1181 object *tmp, *top, *floor = NULL; 1242 object *top, *floor = NULL;
1182 1243
1183 op->remove (); 1244 op->remove ();
1184 1245
1185#if 0 1246#if 0
1186 if (!m->active != !op->active) 1247 if (!m->active != !op->active)
1202#endif 1263#endif
1203 return op; 1264 return op;
1204 } 1265 }
1205 1266
1206 if (object *more = op->more) 1267 if (object *more = op->more)
1207 {
1208 if (!insert_ob_in_map (more, m, originator, flag)) 1268 if (!insert_ob_in_map (more, m, originator, flag))
1209 {
1210 if (!op->head)
1211 LOG (llevError, "BUG: insert_ob_in_map(): inserting op->more killed op\n");
1212
1213 return 0; 1269 return 0;
1214 }
1215 }
1216 1270
1217 CLEAR_FLAG (op, FLAG_REMOVED); 1271 CLEAR_FLAG (op, FLAG_REMOVED);
1218 1272
1219 /* Ideally, the caller figures this out. However, it complicates a lot 1273 /* Ideally, the caller figures this out. However, it complicates a lot
1220 * of areas of callers (eg, anything that uses find_free_spot would now 1274 * of areas of callers (eg, anything that uses find_free_spot would now
1227 mapspace &ms = op->ms (); 1281 mapspace &ms = op->ms ();
1228 1282
1229 /* this has to be done after we translate the coordinates. 1283 /* this has to be done after we translate the coordinates.
1230 */ 1284 */
1231 if (op->nrof && !(flag & INS_NO_MERGE)) 1285 if (op->nrof && !(flag & INS_NO_MERGE))
1232 for (tmp = ms.bot; tmp; tmp = tmp->above) 1286 for (object *tmp = ms.bot; tmp; tmp = tmp->above)
1233 if (object::can_merge (op, tmp)) 1287 if (object::can_merge (op, tmp))
1234 { 1288 {
1235 op->nrof += tmp->nrof; 1289 op->nrof += tmp->nrof;
1236 tmp->destroy (); 1290 tmp->destroy ();
1237 } 1291 }
1406 * blocked() and wall() work properly), and these flags are updated by 1460 * blocked() and wall() work properly), and these flags are updated by
1407 * update_object(). 1461 * update_object().
1408 */ 1462 */
1409 1463
1410 /* if this is not the head or flag has been passed, don't check walk on status */ 1464 /* if this is not the head or flag has been passed, don't check walk on status */
1411 if (!(flag & INS_NO_WALK_ON) && !op->head) 1465 if (!(flag & INS_NO_WALK_ON) && op->head_ () == op)
1412 { 1466 {
1413 if (check_move_on (op, originator)) 1467 if (check_move_on (op, originator))
1414 return 0; 1468 return 0;
1415 1469
1416 /* If we are a multi part object, lets work our way through the check 1470 /* If we are a multi part object, lets work our way through the check
1417 * walk on's. 1471 * walk on's.
1418 */ 1472 */
1419 for (tmp = op->more; tmp != NULL; tmp = tmp->more) 1473 for (object *tmp = op->more; tmp; tmp = tmp->more)
1420 if (check_move_on (tmp, originator)) 1474 if (check_move_on (tmp, originator))
1421 return 0; 1475 return 0;
1422 } 1476 }
1423 1477
1424 return op; 1478 return op;
1605 LOG (llevError, "Trying to put object in NULL.\n%s\n", dump); 1659 LOG (llevError, "Trying to put object in NULL.\n%s\n", dump);
1606 free (dump); 1660 free (dump);
1607 return op; 1661 return op;
1608 } 1662 }
1609 1663
1610 if (where->head) 1664 if (where->head_ () != where)
1611 { 1665 {
1612 LOG (llevDebug, "Warning: Tried to insert object into wrong part of multipart object.\n"); 1666 LOG (llevError | logBacktrace, "Warning: Tried to insert object into wrong part of multipart object.\n");
1613 where = where->head; 1667 where = where->head;
1614 } 1668 }
1615 1669
1616 return where->insert (op); 1670 return where->insert (op);
1617} 1671}
1945 for (object *tmp = op->inv; tmp != NULL; tmp = tmp->below) 1999 for (object *tmp = op->inv; tmp != NULL; tmp = tmp->below)
1946 { 2000 {
1947 CLEAR_FLAG (tmp, flag); 2001 CLEAR_FLAG (tmp, flag);
1948 unflag_inv (tmp, flag); 2002 unflag_inv (tmp, flag);
1949 } 2003 }
1950}
1951
1952/*
1953 * set_cheat(object) sets the cheat flag (WAS_WIZ) in the object and in
1954 * all it's inventory (recursively).
1955 * If checksums are used, a player will get set_cheat called for
1956 * him/her-self and all object carried by a call to this function.
1957 */
1958void
1959set_cheat (object *op)
1960{
1961 SET_FLAG (op, FLAG_WAS_WIZ);
1962 flag_inv (op, FLAG_WAS_WIZ);
1963} 2004}
1964 2005
1965/* 2006/*
1966 * find_free_spot(object, map, x, y, start, stop) will search for 2007 * find_free_spot(object, map, x, y, start, stop) will search for
1967 * a spot at the given map and coordinates which will be able to contain 2008 * a spot at the given map and coordinates which will be able to contain
2085 object *tmp; 2126 object *tmp;
2086 maptile *mp; 2127 maptile *mp;
2087 2128
2088 MoveType blocked, move_type; 2129 MoveType blocked, move_type;
2089 2130
2090 if (exclude && exclude->head) 2131 if (exclude && exclude->head_ () != exclude)
2091 { 2132 {
2092 exclude = exclude->head; 2133 exclude = exclude->head;
2093 move_type = exclude->move_type; 2134 move_type = exclude->move_type;
2094 } 2135 }
2095 else 2136 else
2118 max = maxfree[i]; 2159 max = maxfree[i];
2119 else if (mflags & P_IS_ALIVE) 2160 else if (mflags & P_IS_ALIVE)
2120 { 2161 {
2121 for (tmp = ms.bot; tmp; tmp = tmp->above) 2162 for (tmp = ms.bot; tmp; tmp = tmp->above)
2122 if ((tmp->flag [FLAG_MONSTER] || tmp->type == PLAYER) 2163 if ((tmp->flag [FLAG_MONSTER] || tmp->type == PLAYER)
2123 && (tmp != exclude || (tmp->head && tmp->head != exclude))) 2164 && (tmp != exclude || (tmp->head_ () != tmp && tmp->head_ () != exclude)))
2124 break; 2165 break;
2125 2166
2126 if (tmp) 2167 if (tmp)
2127 return freedir[i]; 2168 return freedir[i];
2128 } 2169 }
2323 * create clone from object to another 2364 * create clone from object to another
2324 */ 2365 */
2325object * 2366object *
2326object_create_clone (object *asrc) 2367object_create_clone (object *asrc)
2327{ 2368{
2328 object *dst = 0, *tmp, *src, *part, *prev, *item; 2369 object *dst = 0, *tmp, *src, *prev, *item;
2329 2370
2330 if (!asrc) 2371 if (!asrc)
2331 return 0; 2372 return 0;
2332 2373
2333 src = asrc;
2334 if (src->head)
2335 src = src->head; 2374 src = asrc->head_ ();
2336 2375
2337 prev = 0; 2376 prev = 0;
2338 for (part = src; part; part = part->more) 2377 for (object *part = src; part; part = part->more)
2339 { 2378 {
2340 tmp = part->clone (); 2379 tmp = part->clone ();
2341 tmp->x -= src->x; 2380 tmp->x -= src->x;
2342 tmp->y -= src->y; 2381 tmp->y -= src->y;
2343 2382
2591} 2630}
2592 2631
2593const char * 2632const char *
2594object::debug_desc () const 2633object::debug_desc () const
2595{ 2634{
2596 static char info[256 * 4]; 2635 static char info[3][256 * 4];
2636 static int info_idx;
2637
2597 return debug_desc (info); 2638 return debug_desc (info [++info_idx % 3]);
2598}
2599
2600const char *
2601object::debug_desc2 () const
2602{
2603 static char info[256 * 4];
2604 return debug_desc (info);
2605} 2639}
2606 2640
2607struct region * 2641struct region *
2608object::region () const 2642object::region () const
2609{ 2643{

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines