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.123 by root, Fri Jan 26 20:59:56 2007 UTC vs.
Revision 1.133 by root, Fri Feb 16 19:43:40 2007 UTC

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
363char * 362char *
364dump_object (object *op) 363dump_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
528void
529object::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
529object * 546object *
530object::clone () 547object::clone ()
531{ 548{
819 836
820 if (flag [FLAG_IS_LINKED]) 837 if (flag [FLAG_IS_LINKED])
821 remove_button_link (this); 838 remove_button_link (this);
822 839
823 if (flag [FLAG_FRIENDLY]) 840 if (flag [FLAG_FRIENDLY])
841 {
824 remove_friendly_object (this); 842 remove_friendly_object (this);
843
844 if (type == GOLEM
845 && owner
846 && owner->type == PLAYER
847 && owner->contr->ranges[range_golem] == this)
848 owner->contr->ranges[range_golem] = 0;
849 }
825 850
826 if (!flag [FLAG_REMOVED]) 851 if (!flag [FLAG_REMOVED])
827 remove (); 852 remove ();
828 853
829 destroy_inv (true); 854 destroy_inv (true);
903 * object will have no environment. If the object previously had an 928 * object will have no environment. If the object previously had an
904 * environment, the x and y coordinates will be updated to 929 * environment, the x and y coordinates will be updated to
905 * the previous environment. 930 * the previous environment.
906 */ 931 */
907void 932void
908object::remove_slow () 933object::do_remove ()
909{ 934{
910 object *tmp, *last = 0; 935 object *tmp, *last = 0;
911 object *otmp; 936 object *otmp;
912 937
913 if (QUERY_FLAG (this, FLAG_REMOVED)) 938 if (QUERY_FLAG (this, FLAG_REMOVED))
956 } 981 }
957 else if (map) 982 else if (map)
958 { 983 {
959 if (type == PLAYER) 984 if (type == PLAYER)
960 { 985 {
986 // leaving a spot always closes any open container on the ground
987 if (container && !container->env)
988 // this causes spurious floorbox updates, but it ensures
989 // that the CLOSE event is being sent.
990 close_container ();
991
961 --map->players; 992 --map->players;
962 map->touch (); 993 map->touch ();
963 } 994 }
964 995
965 map->dirty = true; 996 map->dirty = true;
1967 } 1998 }
1968 1999
1969 if (!index) 2000 if (!index)
1970 return -1; 2001 return -1;
1971 2002
1972 return altern[RANDOM () % index]; 2003 return altern [rndm (index)];
1973} 2004}
1974 2005
1975/* 2006/*
1976 * find_first_free_spot(archetype, maptile, x, y) works like 2007 * find_first_free_spot(archetype, maptile, x, y) works like
1977 * find_free_spot(), but it will search max number of squares. 2008 * find_free_spot(), but it will search max number of squares.
1998{ 2029{
1999 arr += begin; 2030 arr += begin;
2000 end -= begin; 2031 end -= begin;
2001 2032
2002 while (--end) 2033 while (--end)
2003 swap (arr [end], arr [RANDOM () % (end + 1)]); 2034 swap (arr [end], arr [rndm (end + 1)]);
2004} 2035}
2005 2036
2006/* new function to make monster searching more efficient, and effective! 2037/* new function to make monster searching more efficient, and effective!
2007 * This basically returns a randomized array (in the passed pointer) of 2038 * This basically returns a randomized array (in the passed pointer) of
2008 * the spaces to find monsters. In this way, it won't always look for 2039 * the spaces to find monsters. In this way, it won't always look for
2320 insert_ob_in_ob (object_create_clone (item), dst); 2351 insert_ob_in_ob (object_create_clone (item), dst);
2321 2352
2322 return dst; 2353 return dst;
2323} 2354}
2324 2355
2325/* GROS - Creates an object using a string representing its content. */
2326/* Basically, we save the content of the string to a temp file, then call */
2327/* load_object on it. I admit it is a highly inefficient way to make things, */
2328/* but it was simple to make and allows reusing the load_object function. */
2329/* Remember not to use load_object_str in a time-critical situation. */
2330/* Also remember that multiparts objects are not supported for now. */
2331object *
2332load_object_str (const char *obstr)
2333{
2334 object *op;
2335 char filename[MAX_BUF];
2336
2337 sprintf (filename, "%s/cfloadobstr2044", settings.tmpdir);
2338
2339 FILE *tempfile = fopen (filename, "w");
2340
2341 if (tempfile == NULL)
2342 {
2343 LOG (llevError, "Error - Unable to access load object temp file\n");
2344 return NULL;
2345 }
2346
2347 fprintf (tempfile, obstr);
2348 fclose (tempfile);
2349
2350 op = object::create ();
2351
2352 object_thawer thawer (filename);
2353
2354 if (thawer)
2355 load_object (thawer, op, 0);
2356
2357 LOG (llevDebug, " load str completed, object=%s\n", &op->name);
2358 CLEAR_FLAG (op, FLAG_REMOVED);
2359
2360 return op;
2361}
2362
2363/* This returns the first object in who's inventory that 2356/* This returns the first object in who's inventory that
2364 * has the same type and subtype match. 2357 * has the same type and subtype match.
2365 * returns NULL if no match. 2358 * returns NULL if no match.
2366 */ 2359 */
2367object * 2360object *
2570{ 2563{
2571 char flagdesc[512]; 2564 char flagdesc[512];
2572 char info2[256 * 4]; 2565 char info2[256 * 4];
2573 char *p = info; 2566 char *p = info;
2574 2567
2575 p += snprintf (p, 512, "{cnt:%d,uuid:<1,%" PRIx64 ">,name:\"%s\"%s%s,flags:[%s],type:%d}", 2568 p += snprintf (p, 512, "{cnt:%d,uuid:<1.%" PRIx64 ">,name:\"%s\"%s%s,flags:[%s],type:%d}",
2576 count, uuid.seq, 2569 count, uuid.seq,
2577 &name, 2570 &name,
2578 title ? "\",title:\"" : "", 2571 title ? "\",title:\"" : "",
2579 title ? (const char *)title : "", 2572 title ? (const char *)title : "",
2580 flag_desc (flagdesc, 512), type); 2573 flag_desc (flagdesc, 512), type);
2600{ 2593{
2601 static char info[256 * 4]; 2594 static char info[256 * 4];
2602 return debug_desc (info); 2595 return debug_desc (info);
2603} 2596}
2604 2597
2598struct region *
2599object::region () const
2600{
2601 return map ? map->region (x, y)
2602 : region::default_region ();
2603}
2604
2605const materialtype_t *
2606object::dominant_material () const
2607{
2608 if (materialtype_t *mat = name_to_material (materialname))
2609 return mat;
2610
2611 // omfg this is slow, this has to be temporary :)
2612 shstr unknown ("unknown");
2613
2614 return name_to_material (unknown);
2615}
2616
2617void
2618object::open_container (object *new_container)
2619{
2620 if (container == new_container)
2621 return;
2622
2623 if (object *old_container = container)
2624 {
2625 if (INVOKE_OBJECT (CLOSE, old_container, ARG_OBJECT (this)))
2626 return;
2627
2628#if 0
2629 // remove the "Close old_container" object.
2630 if (object *closer = old_container->inv)
2631 if (closer->type == CLOSE_CON)
2632 closer->destroy ();
2633#endif
2634
2635 old_container->flag [FLAG_APPLIED] = 0;
2636 container = 0;
2637
2638 esrv_update_item (UPD_FLAGS, this, old_container);
2639 new_draw_info_format (NDI_UNIQUE, 0, this, "You close %s.", query_name (old_container));
2640 }
2641
2642 if (new_container)
2643 {
2644 if (INVOKE_OBJECT (OPEN, new_container, ARG_OBJECT (this)))
2645 return;
2646
2647 // TODO: this does not seem to serve any purpose anymore?
2648#if 0
2649 // insert the "Close Container" object.
2650 if (archetype *closer = new_container->other_arch)
2651 {
2652 object *closer = arch_to_object (new_container->other_arch);
2653 closer->flag [FLAG_NO_MAP_SAVE] = 1;
2654 new_container->insert (closer);
2655 }
2656#endif
2657
2658 new_draw_info_format (NDI_UNIQUE, 0, this, "You open %s.", query_name (new_container));
2659
2660 new_container->flag [FLAG_APPLIED] = 1;
2661 container = new_container;
2662
2663 esrv_update_item (UPD_FLAGS, this, new_container);
2664 esrv_send_inventory (this, new_container);
2665 }
2666}
2667
2668

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines