[ViewVC] Diff of: cvs/deliantra/server/common/object.C

Comparing deliantra/server/common/object.C (file contents):
Revision 1.208 by root, Mon Apr 21 06:16:01 2008 UTC vs.
Revision 1.220 by root, Thu Apr 24 00:30:52 2008 UTC

 #include <global.h>
 #include <stdio.h>
 #include <sys/types.h>
 #include <sys/uio.h>
 #include <object.h>
-#include <funcpoint.h>
 #include <sproto.h>
 #include <loader.h>
 #include <bitset>
   /* Everything passes, must be OK. */
   return 1;
 }
+// find player who can see this object
+object *
+object::visible_to () const
+{
+  if (client_visible () && !flag [FLAG_REMOVED])
+    {
+      // see if we are in a container of sorts
+      if (env)
+        {
+          // the player inventory itself is always visible
+          if (env->type == PLAYER)
+            return env;
+          // else a player could have our env open
+          object *envest = env->outer_env ();
+          // the player itself is always on a map, so we will find him here
+          // even if our inv is in a player.
+          if (envest->is_on_map ())
+            if (object *pl = envest->ms ().player ())
+              if (pl->container == env)
+                return pl;
+        }
+      else
+        {
+          // maybe there is a player standing on the same mapspace
+          // this will catch the case where "this" is a player
+          if (object *pl = ms ().player ())
+            if (!pl->container || this == pl->container)
+              return pl;
+        }
+    }
+  return 0;
+}
 // adjust weight per container type ("of holding")
 static sint32
 weight_adjust (object *op, sint32 weight)
 {
   return op->type == CONTAINER
 {
   while (op)
     {
       weight = weight_adjust (op, weight);
+      if (!weight)
+        return;
       op->carrying += weight;
+      if (object *pl = op->visible_to ())
+        if (pl != op) // player is handled lazily
+          esrv_update_item (UPD_WEIGHT, pl, op);
       op = op->env;
     }
 }
 /*
         op->update_weight ();
       sum += op->total_weight ();
     }
-  carrying = weight_adjust (this, sum);
+  sum = weight_adjust (this, sum);
+  if (sum != carrying)
+    {
+      carrying = sum;
+      if (object *pl = visible_to ())
+        if (pl != this) // player is handled lazily
+          esrv_update_item (UPD_WEIGHT, pl, this);
+    }
 }
 /*
  * Used by: Server DM commands: dumpbelow, dump. Some error messages.
  */
 object::destroy_inv (bool drop_to_ground)
 {
   // need to check first, because the checks below might segfault
   // as we might be on an invalid mapspace and crossfire code
   // is too buggy to ensure that the inventory is empty.
-  // corollary: if you create arrows etc. with stuff in tis inventory,
+  // corollary: if you create arrows etc. with stuff in its inventory,
   // cf will crash below with off-map x and y
   if (!inv)
     return;
   /* Only if the space blocks everything do we not process -
       || map->nodrop
       || ms ().move_block == MOVE_ALL)
     {
       while (inv)
         {
-          inv->destroy_inv (drop_to_ground);
+          inv->destroy_inv (false);
           inv->destroy ();
         }
     }
   else
     {                       /* Put objects in inventory onto this space */
               || op->flag [FLAG_NO_DROP]
               || op->type == RUNE
               || op->type == TRAP
               || op->flag [FLAG_IS_A_TEMPLATE]
               || op->flag [FLAG_DESTROY_ON_DEATH])
-            op->destroy ();
+            op->destroy (true);
           else
             map->insert (op, x, y);
         }
     }
 }
 }
 void
 object::do_destroy ()
 {
-  attachable::do_destroy ();
   if (flag [FLAG_IS_LINKED])
     remove_button_link (this);
   if (flag [FLAG_FRIENDLY])
     remove_friendly_object (this);
-  if (!flag [FLAG_REMOVED])
-    remove ();
+  remove ();
-  destroy_inv (true);
+  attachable::do_destroy ();
   deactivate ();
   unlink ();
   flag [FLAG_FREED] = 1;
 object::destroy (bool destroy_inventory)
 {
   if (destroyed ())
     return;
+  if (!is_head () && !head->destroyed ())
+    {
+      LOG (llevError | logBacktrace, "tried to destroy the tail of an object");
+      head->destroy (destroy_inventory);
+    }
-  if (destroy_inventory)
+  destroy_inv (!destroy_inventory);
-    destroy_inv (false);
   if (is_head ())
     if (sound_destroy)
       play_sound (sound_destroy);
     else if (flag [FLAG_MONSTER])
 object::do_remove ()
 {
   object *tmp, *last = 0;
   object *otmp;
-  if (QUERY_FLAG (this, FLAG_REMOVED))
+  if (flag [FLAG_REMOVED])
     return;
-  SET_FLAG (this, FLAG_REMOVED);
   INVOKE_OBJECT (REMOVE, this);
+  flag [FLAG_REMOVED] = true;
   if (more)
     more->remove ();
   /*
    * In this case, the object to be removed is in someones
    * inventory.
    */
   if (env)
     {
+      if (object *pl = visible_to ())
+        esrv_del_item (pl->contr, count);
       adjust_weight (env, -total_weight ());
       *(above ? &above->below : &env->inv) = below;
       if (below)
       if ((otmp = in_player ()) && otmp->contr && !QUERY_FLAG (otmp, FLAG_NO_FIX_PLAYER))
         otmp->update_stats ();
     }
   else if (map)
     {
-      if (type == PLAYER)
-        {
-          // leaving a spot always closes any open container on the ground
-          if (container && !container->env)
-            // this causes spurious floorbox updates, but it ensures
-            // that the CLOSE event is being sent.
-            close_container ();
-          --map->players;
-          map->touch ();
-        }
       map->dirty = true;
       mapspace &ms = this->ms ();
+      if (object *pl = ms.player ())
+        {
+          if (type == PLAYER) // this == pl(!)
+            {
+              // leaving a spot always closes any open container on the ground
+              if (container && !container->env)
+                // this causes spurious floorbox updates, but it ensures
+                // that the CLOSE event is being sent.
+                close_container ();
+              --map->players;
+              map->touch ();
+            }
+          else if (pl->container == this)
+            {
+              // removing a container should close it
+              close_container ();
+            }
+          esrv_del_item (pl->contr, count);
+        }
       /* link the object above us */
       if (above)
         above->below = below;
       else
              * removed (most likely destroyed), update the player view
              * appropriately.
              */
             pl->close_container ();
-          pl->contr->ns->floorbox_update ();
+          //TODO: the floorbox prev/next might need updating
+          esrv_del_item (pl->contr, count);
         }
       for (tmp = ms.bot; tmp; tmp = tmp->above)
         {
           /* No point updating the players look faces if he is the object
   if (!top)
     for (top = op; top && top->above; top = top->above)
       ;
   for (; top; top = top->below)
-    {
-      if (top == op)
-        continue;
-      if (object::can_merge (op, top))
+    if (object::can_merge (op, top))
-        {
+      {
-          top->nrof += op->nrof;
+        top->nrof += op->nrof;
-/*      CLEAR_FLAG(top,FLAG_STARTEQUIP);*/
+        if (object *pl = top->visible_to ())
-          op->weight = 0;       /* Don't want any adjustements now */
+          esrv_update_item (UPD_NROF, pl, top);
+        op->weight   = 0; // cancel the addition above
+        op->carrying = 0; // must be 0 already
-          op->destroy ();
+        op->destroy (1);
-          return top;
+        return top;
-        }
+      }
-    }
   return 0;
 }
 void
 object *
 insert_ob_in_map (object *op, maptile *m, object *originator, int flag)
 {
   assert (!op->flag [FLAG_FREED]);
-  object *top, *floor = NULL;
   op->remove ();
   /* Ideally, the caller figures this out.  However, it complicates a lot
    * of areas of callers (eg, anything that uses find_free_spot would now
    * need extra work
    */
   if (!xy_normalise (m, op->x, op->y))
     {
-      op->destroy ();
+      op->destroy (1);
       return 0;
     }
   if (object *more = op->more)
     if (!insert_ob_in_map (more, m, originator, flag))
    */
   if (op->nrof && !(flag & INS_NO_MERGE))
     for (object *tmp = ms.bot; tmp; tmp = tmp->above)
       if (object::can_merge (op, tmp))
         {
+          // TODO: we atcually want to update tmp, not op,
+          // but some caller surely breaks when we return tmp
+          // from here :/
           op->nrof += tmp->nrof;
           tmp->destroy (1);
         }
   CLEAR_FLAG (op, FLAG_APPLIED);        /* hack for fixing F_APPLIED in items of dead people */
       /* since *below* originator, no need to update top */
       originator->below = op;
     }
   else
     {
+      object *top, *floor = NULL;
       top = ms.bot;
       /* If there are other objects, then */
       if (top)
         {
     }
   op->map->dirty = true;
   if (object *pl = ms.player ())
-    pl->contr->ns->floorbox_update ();
+    //TODO: the floorbox prev/next might need updating
+    esrv_send_item (pl, op);
   /* If this object glows, it may affect lighting conditions that are
    * visible to others on this map.  But update_all_los is really
    * an inefficient way to do this, as it means los for all players
    * on the map will get recalculated.  The players could very well
   else
     return where->map->insert (this, where->x, where->y, originator, flags);
 }
 /*
- * get_split_ob(ob,nr) splits up ob into two parts.  The part which
- * is returned contains nr objects, and the remaining parts contains
- * the rest (or is removed and freed if that number is 0).
- * On failure, NULL is returned, and the reason put into the
- * global static errmsg array.
- */
-object *
-object::split_nr (sint32 nr)
-{
-  if (nrof < nr)
-    return 0;
-  else if (nrof == nr)
-    {
-      remove ();
-      return this;
-    }
-  else
-    {
-      decrease_nr (nr);
-      object *op = object_create_clone (this);
-      op->nrof = nr;
-      return op;
-    }
-}
-//TODO: remove, but semantics differs from split_nr
-object *
-get_split_ob (object *orig_ob, uint32 nr)
-{
-  if (orig_ob->nrof < nr)
-    {
-      sprintf (errmsg, "There are only %d %ss.", orig_ob->nrof ? orig_ob->nrof : 1, &orig_ob->name);
-      return 0;
-    }
-  return orig_ob->split_nr (nr);
-}
-// find player who can see this object
-static object *
-visible_to (object *op)
-{
-  if (!op->flag [FLAG_REMOVED])
-    {
-      // see if we are in a container of sorts
-      if (object *env = op->env)
-        {
-          // the player inventory itself is always visible
-          if (env->type == PLAYER)
-            return env;
-          // else a player could have our env open
-          env = env->outer_env ();
-          // the player itself is always on a map, so we will find him here
-          // even if our inv is in a player.
-          if (env->is_on_map ())
-            if (object *pl = env->ms ().player ())
-              if (pl->container == op->env)
-                return pl;
-        }
-      else
-        {
-          // maybe there is a player standing on the same mapspace
-          if (object *pl = env->ms ().player ())
-            return pl;
-        }
-    }
-  return 0;
-}
-/*
- * decrease_ob_nr(object, number) decreases a specified number from
+ * decrease(object, number) decreases a specified number from
  * the amount of an object. If the amount reaches 0, the object
  * is subsequently removed and freed.
  *
  * Return value: 'op' if something is left, NULL if the amount reached 0
  */
 bool
-object::decrease_nr (sint32 nr)
+object::decrease (sint32 nr)
 {
+  if (!nr)
+    return true;
   nr = min (nr, nrof);
-  if (!nr)
-    return 1;
   nrof -= nr;
-  object *visible = visible_to (this);
   if (nrof)
     {
       adjust_weight (env, -weight * nr); // carrying == 0
-      if (visible)
+      if (object *pl = visible_to ())
-        esrv_send_item (visible, this);
+        esrv_update_item (UPD_NROF, pl, this);
-      return 1;
+      return true;
     }
   else
     {
-      if (visible)
-        esrv_del_item (visible->contr, count);
-      this->destroy (1);
+      destroy (1);
-      return 0;
+      return false;
     }
 }
-//TODO: remove
+/*
+ * split(ob,nr) splits up ob into two parts.  The part which
+ * is returned contains nr objects, and the remaining parts contains
+ * the rest (or is removed and returned if that number is 0).
+ * On failure, NULL is returned.
+ */
 object *
-decrease_ob_nr (object *op, uint32 i)
+object::split (sint32 nr)
 {
-  return op->decrease_nr (i) ? op : 0;
+  int have = number_of ();
+  if (have < nr)
+    return 0;
+  else if (have == nr)
+    {
+      remove ();
+      return this;
+    }
+  else
+    {
+      decrease (nr);
+      object *op = object_create_clone (this);
+      op->nrof = nr;
+      return op;
+    }
 }
 object *
 insert_ob_in_ob (object *op, object *where)
 {
       if (object::can_merge (tmp, op))
         {
           /* return the original object and remove inserted object
              (client needs the original object) */
           tmp->nrof += op->nrof;
+          if (object *pl = tmp->visible_to ())
+            esrv_update_item (UPD_NROF, pl, tmp);
+          adjust_weight (this, op->total_weight ());
           op->destroy (1);
           op = tmp;
           goto inserted;
         }
   inv = op;
   op->flag [FLAG_REMOVED] = 0;
+  if (object *pl = op->visible_to ())
+    esrv_send_item (pl, op);
   adjust_weight (this, op->total_weight ());
 inserted:
   /* reset the light list and los of the players on the map */
   if (op->glow_radius && map && map->darkness)
     update_all_los (map, x, y);
-  if (object *otmp = in_player ())
+  // if this is a player's inventory, update stats
-    if (otmp->contr && !QUERY_FLAG (otmp, FLAG_NO_FIX_PLAYER))
+  if (type == PLAYER && !flag [FLAG_NO_FIX_PLAYER])
-      otmp->update_stats ();
+    update_stats ();
   INVOKE_OBJECT (INSERT, this);
   return op;
 }
                  &name,
                  title ? "\",title:\"" : "",
                  title ? (const char *)title : "",
                  flag_desc (flagdesc, 512), type);
-  if (!this->flag[FLAG_REMOVED] && env)
+  if (!flag[FLAG_REMOVED] && env)
     p += snprintf (p, 256, "(in %s)", env->debug_desc (info2));
   if (map)
     p += snprintf (p, 256, "(on %s@%d+%d)", &map->path, x, y);
 object::open_container (object *new_container)
 {
   if (container == new_container)
     return;
-  if (object *old_container = container)
+  object *old_container = container;
+  if (old_container)
     {
       if (INVOKE_OBJECT (CLOSE, old_container, ARG_OBJECT (this)))
         return;
 #if 0
       if (object *closer = old_container->inv)
         if (closer->type == CLOSE_CON)
           closer->destroy ();
 #endif
+      // make sure the container is available
+      esrv_send_item (this, old_container);
-      old_container->flag [FLAG_APPLIED] = 0;
+      old_container->flag [FLAG_APPLIED] = false;
       container = 0;
+      // client needs item update to make it work, client bug requires this to be separate
       esrv_update_item (UPD_FLAGS, this, old_container);
       new_draw_info_format (NDI_UNIQUE, 0, this, "You close %s.", query_name (old_container));
       play_sound (sound_find ("chest_close"));
     }
   if (new_container)
         }
 #endif
       new_draw_info_format (NDI_UNIQUE, 0, this, "You open %s.", query_name (new_container));
+      // make sure the container is available, client bug requires this to be separate
+      esrv_send_item (this, new_container);
-      new_container->flag [FLAG_APPLIED] = 1;
+      new_container->flag [FLAG_APPLIED] = true;
       container = new_container;
+      // client needs flag change
       esrv_update_item (UPD_FLAGS, this, new_container);
       esrv_send_inventory (this, new_container);
       play_sound (sound_find ("chest_open"));
     }
+//  else if (!old_container->env && contr && contr->ns)
+//    contr->ns->floorbox_reset ();
 }
 object *
 object::force_find (const shstr name)
 {

Diff Legend

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines

Comparing deliantra/server/common/object.C (file contents): Revision 1.208 by root, Mon Apr 21 06:16:01 2008 UTC vs. Revision 1.220 by root, Thu Apr 24 00:30:52 2008 UTC

Diff Legend

Comparing deliantra/server/common/object.C (file contents):
Revision 1.208 by root, Mon Apr 21 06:16:01 2008 UTC vs.
Revision 1.220 by root, Thu Apr 24 00:30:52 2008 UTC