… | |
… | |
357 | /* |
357 | /* |
358 | * Used by: Crossedit: dump. Server DM commands: dumpbelow, dump. |
358 | * Used by: Crossedit: dump. Server DM commands: dumpbelow, dump. |
359 | * Some error messages. |
359 | * Some error messages. |
360 | * The result of the dump is stored in the static global errmsg array. |
360 | * The result of the dump is stored in the static global errmsg array. |
361 | */ |
361 | */ |
362 | |
|
|
363 | char * |
362 | char * |
364 | dump_object (object *op) |
363 | dump_object (object *op) |
365 | { |
364 | { |
366 | if (!op) |
365 | if (!op) |
367 | return strdup ("[NULLOBJ]"); |
366 | return strdup ("[NULLOBJ]"); |
368 | |
367 | |
369 | object_freezer freezer; |
368 | object_freezer freezer; |
370 | save_object (freezer, op, 1); |
369 | op->write (freezer); |
371 | return freezer.as_string (); |
370 | return freezer.as_string (); |
372 | } |
371 | } |
373 | |
372 | |
374 | /* |
373 | /* |
375 | * get_nearest_part(multi-object, object 2) returns the part of the |
374 | * get_nearest_part(multi-object, object 2) returns the part of the |
… | |
… | |
522 | } |
521 | } |
523 | } |
522 | } |
524 | } |
523 | } |
525 | |
524 | |
526 | dst->set_speed (dst->speed); |
525 | dst->set_speed (dst->speed); |
|
|
526 | } |
|
|
527 | |
|
|
528 | void |
|
|
529 | object::instantiate () |
|
|
530 | { |
|
|
531 | if (!uuid.seq) // HACK |
|
|
532 | uuid = gen_uuid (); |
|
|
533 | |
|
|
534 | speed_left = -0.1f; |
|
|
535 | /* copy the body_info to the body_used - this is only really |
|
|
536 | * need for monsters, but doesn't hurt to do it for everything. |
|
|
537 | * by doing so, when a monster is created, it has good starting |
|
|
538 | * values for the body_used info, so when items are created |
|
|
539 | * for it, they can be properly equipped. |
|
|
540 | */ |
|
|
541 | memcpy (body_used, body_info, sizeof (body_used)); |
|
|
542 | |
|
|
543 | attachable::instantiate (); |
527 | } |
544 | } |
528 | |
545 | |
529 | object * |
546 | object * |
530 | object::clone () |
547 | object::clone () |
531 | { |
548 | { |
… | |
… | |
589 | * UP_OBJ_FACE: only the objects face has changed. |
606 | * UP_OBJ_FACE: only the objects face has changed. |
590 | */ |
607 | */ |
591 | void |
608 | void |
592 | update_object (object *op, int action) |
609 | update_object (object *op, int action) |
593 | { |
610 | { |
594 | MoveType move_on, move_off, move_block, move_slow; |
|
|
595 | |
|
|
596 | if (op == NULL) |
611 | if (op == NULL) |
597 | { |
612 | { |
598 | /* this should never happen */ |
613 | /* this should never happen */ |
599 | LOG (llevDebug, "update_object() called for NULL object.\n"); |
614 | LOG (llevDebug, "update_object() called for NULL object.\n"); |
600 | return; |
615 | return; |
… | |
… | |
964 | } |
979 | } |
965 | else if (map) |
980 | else if (map) |
966 | { |
981 | { |
967 | if (type == PLAYER) |
982 | if (type == PLAYER) |
968 | { |
983 | { |
|
|
984 | // leaving a spot always closes any open container on the ground |
|
|
985 | if (container && !container->env) |
|
|
986 | // this causes spurious floorbox updates, but it ensures |
|
|
987 | // that the CLOSE event is being sent. |
|
|
988 | close_container (); |
|
|
989 | |
969 | --map->players; |
990 | --map->players; |
970 | map->touch (); |
991 | map->touch (); |
971 | } |
992 | } |
972 | |
993 | |
973 | map->dirty = true; |
994 | map->dirty = true; |
… | |
… | |
1268 | * looks like instead of lots of conditions here. |
1289 | * looks like instead of lots of conditions here. |
1269 | * makes things faster, and effectively the same result. |
1290 | * makes things faster, and effectively the same result. |
1270 | */ |
1291 | */ |
1271 | |
1292 | |
1272 | /* Have object 'fall below' other objects that block view. |
1293 | /* Have object 'fall below' other objects that block view. |
1273 | * Unless those objects are exits, type 66 |
1294 | * Unless those objects are exits. |
1274 | * If INS_ON_TOP is used, don't do this processing |
1295 | * If INS_ON_TOP is used, don't do this processing |
1275 | * Need to find the object that in fact blocks view, otherwise |
1296 | * Need to find the object that in fact blocks view, otherwise |
1276 | * stacking is a bit odd. |
1297 | * stacking is a bit odd. |
1277 | */ |
1298 | */ |
1278 | if (!(flag & INS_ON_TOP) |
1299 | if (!(flag & INS_ON_TOP) |
1279 | && ms.flags () & P_BLOCKSVIEW |
1300 | && ms.flags () & P_BLOCKSVIEW |
1280 | && (op->face && !op->face->visibility)) |
1301 | && (op->face && !faces [op->face].visibility)) |
1281 | { |
1302 | { |
1282 | for (last = top; last != floor; last = last->below) |
1303 | for (last = top; last != floor; last = last->below) |
1283 | if (QUERY_FLAG (last, FLAG_BLOCKSVIEW) && (last->type != EXIT)) |
1304 | if (QUERY_FLAG (last, FLAG_BLOCKSVIEW) && (last->type != EXIT)) |
1284 | break; |
1305 | break; |
1285 | |
1306 | |
… | |
… | |
1408 | tmp1->x = op->x; |
1429 | tmp1->x = op->x; |
1409 | tmp1->y = op->y; |
1430 | tmp1->y = op->y; |
1410 | insert_ob_in_map (tmp1, op->map, op, 0); |
1431 | insert_ob_in_map (tmp1, op->map, op, 0); |
1411 | } |
1432 | } |
1412 | |
1433 | |
|
|
1434 | // XXX: function not returning object* |
1413 | object * |
1435 | object * |
1414 | object::insert_at (object *where, object *originator, int flags) |
1436 | object::insert_at (object *where, object *originator, int flags) |
1415 | { |
1437 | { |
1416 | where->map->insert (this, where->x, where->y, originator, flags); |
1438 | where->map->insert (this, where->x, where->y, originator, flags); |
1417 | } |
1439 | } |
… | |
… | |
2328 | insert_ob_in_ob (object_create_clone (item), dst); |
2350 | insert_ob_in_ob (object_create_clone (item), dst); |
2329 | |
2351 | |
2330 | return dst; |
2352 | return dst; |
2331 | } |
2353 | } |
2332 | |
2354 | |
2333 | /* GROS - Creates an object using a string representing its content. */ |
|
|
2334 | /* Basically, we save the content of the string to a temp file, then call */ |
|
|
2335 | /* load_object on it. I admit it is a highly inefficient way to make things, */ |
|
|
2336 | /* but it was simple to make and allows reusing the load_object function. */ |
|
|
2337 | /* Remember not to use load_object_str in a time-critical situation. */ |
|
|
2338 | /* Also remember that multiparts objects are not supported for now. */ |
|
|
2339 | object * |
|
|
2340 | load_object_str (const char *obstr) |
|
|
2341 | { |
|
|
2342 | object *op; |
|
|
2343 | char filename[MAX_BUF]; |
|
|
2344 | |
|
|
2345 | sprintf (filename, "%s/cfloadobstr2044", settings.tmpdir); |
|
|
2346 | |
|
|
2347 | FILE *tempfile = fopen (filename, "w"); |
|
|
2348 | |
|
|
2349 | if (tempfile == NULL) |
|
|
2350 | { |
|
|
2351 | LOG (llevError, "Error - Unable to access load object temp file\n"); |
|
|
2352 | return NULL; |
|
|
2353 | } |
|
|
2354 | |
|
|
2355 | fprintf (tempfile, obstr); |
|
|
2356 | fclose (tempfile); |
|
|
2357 | |
|
|
2358 | op = object::create (); |
|
|
2359 | |
|
|
2360 | object_thawer thawer (filename); |
|
|
2361 | |
|
|
2362 | if (thawer) |
|
|
2363 | load_object (thawer, op, 0); |
|
|
2364 | |
|
|
2365 | LOG (llevDebug, " load str completed, object=%s\n", &op->name); |
|
|
2366 | CLEAR_FLAG (op, FLAG_REMOVED); |
|
|
2367 | |
|
|
2368 | return op; |
|
|
2369 | } |
|
|
2370 | |
|
|
2371 | /* This returns the first object in who's inventory that |
2355 | /* This returns the first object in who's inventory that |
2372 | * has the same type and subtype match. |
2356 | * has the same type and subtype match. |
2373 | * returns NULL if no match. |
2357 | * returns NULL if no match. |
2374 | */ |
2358 | */ |
2375 | object * |
2359 | object * |
… | |
… | |
2627 | shstr unknown ("unknown"); |
2611 | shstr unknown ("unknown"); |
2628 | |
2612 | |
2629 | return name_to_material (unknown); |
2613 | return name_to_material (unknown); |
2630 | } |
2614 | } |
2631 | |
2615 | |
|
|
2616 | void |
|
|
2617 | object::open_container (object *new_container) |
|
|
2618 | { |
|
|
2619 | if (container == new_container) |
|
|
2620 | return; |
|
|
2621 | |
|
|
2622 | if (object *old_container = container) |
|
|
2623 | { |
|
|
2624 | if (INVOKE_OBJECT (CLOSE, old_container, ARG_OBJECT (this))) |
|
|
2625 | return; |
|
|
2626 | |
|
|
2627 | #if 0 |
|
|
2628 | // remove the "Close old_container" object. |
|
|
2629 | if (object *closer = old_container->inv) |
|
|
2630 | if (closer->type == CLOSE_CON) |
|
|
2631 | closer->destroy (); |
|
|
2632 | #endif |
|
|
2633 | |
|
|
2634 | old_container->flag [FLAG_APPLIED] = 0; |
|
|
2635 | container = 0; |
|
|
2636 | |
|
|
2637 | esrv_update_item (UPD_FLAGS, this, old_container); |
|
|
2638 | new_draw_info_format (NDI_UNIQUE, 0, this, "You close %s.", query_name (old_container)); |
|
|
2639 | } |
|
|
2640 | |
|
|
2641 | if (new_container) |
|
|
2642 | { |
|
|
2643 | if (INVOKE_OBJECT (OPEN, new_container, ARG_OBJECT (this))) |
|
|
2644 | return; |
|
|
2645 | |
|
|
2646 | // TODO: this does not seem to serve any purpose anymore? |
|
|
2647 | #if 0 |
|
|
2648 | // insert the "Close Container" object. |
|
|
2649 | if (archetype *closer = new_container->other_arch) |
|
|
2650 | { |
|
|
2651 | object *closer = arch_to_object (new_container->other_arch); |
|
|
2652 | closer->flag [FLAG_NO_MAP_SAVE] = 1; |
|
|
2653 | new_container->insert (closer); |
|
|
2654 | } |
|
|
2655 | #endif |
|
|
2656 | |
|
|
2657 | new_draw_info_format (NDI_UNIQUE, 0, this, "You open %s.", query_name (new_container)); |
|
|
2658 | |
|
|
2659 | new_container->flag [FLAG_APPLIED] = 1; |
|
|
2660 | container = new_container; |
|
|
2661 | |
|
|
2662 | esrv_update_item (UPD_FLAGS, this, new_container); |
|
|
2663 | esrv_send_inventory (this, new_container); |
|
|
2664 | } |
|
|
2665 | } |
|
|
2666 | |
|
|
2667 | |