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

Comparing deliantra/server/common/loader.C (file contents):
Revision 1.169 by root, Sun May 1 16:58:15 2011 UTC vs.
Revision 1.185 by root, Wed Dec 5 19:03:26 2018 UTC

 /*
  * This file is part of Deliantra, the Roguelike Realtime MMORPG.
  *
+ * Copyright (©) 2018 Marc Alexander Lehmann / the Deliantra team
- * Copyright (©) 2005,2006,2007,2008,2009,2010,2011 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
+ * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012,2013,2014,2015,2016 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
  * Copyright (©) 2002 Mark Wedel & Crossfire Development Team
  * Copyright (©) 1992 Frank Tore Johansen
  *
  * Deliantra is free software: you can redistribute it and/or modify it under
  * the terms of the Affero GNU General Public License as published by the
  * Free Software Foundation, either version 3 of the License, or (at your
  * option) any later version.
  *
  * This program is distributed in the hope that it will be useful,
  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  * GNU General Public License for more details.
  *
  * You should have received a copy of the Affero GNU General Public License
  * and the GNU General Public License along with this program. If not, see
  * <http://www.gnu.org/licenses/>.
  *
  * The authors can be reached via e-mail to <support@deliantra.net>
  */
 #include <global.h>
 #include <sproto.h>
   "spell_glyph",                /* 205 */
   NULL
 };
 /* This function checks the object after it has been loaded (when we
  * get the 'end' in the input stream).  This function can be used to
  * deal with legacy objects where fields may have changed.  It can also be used
  * to check for objects to make sure there are no common errors.
  */
 void
 object::post_load_check ()
             LOG (llevError, "ITEMBUG: %s: body_shield %d != -1\n", debug_desc (), slot [body_shield].info);
             slot [body_shield].info = -1;
           }
         break;
+      case CONTAINER:
+        if (nrof)
+          {
+            LOG (llevError, "ITEMBUG: %s: stackable container (nrof %d)\n", debug_desc (), (int)nrof);
+            nrof = 0;
+          }
+        break;
       case PLAYER:
         if (slot [body_shield].info != 1)
           {
             LOG (llevError, "ITEMBUG: %s: body_shield %d != 1\n", debug_desc (), slot [body_shield].info);
             slot [body_shield].info = 1;
    * this isn't perfect (things won't be properly pluralised), but works to
    * that degree (5 heart is still quite understandable).  But the case we
    * also have to catch is if this object is not using the normal name for
    * the object.  In that case, we also want to use the loaded name.
    * Otherwise, what happens is that the the plural name will lose
    * information (appear as just 'hearts' and not 'goblins heart')
    */
   if (arch && name != arch->object::name && name_pl == arch->object::name_pl)
     name_pl = 0;
   if (!name_pl)
     }
   // if the object has an animation, try to provide a default face
   if (has_anim ())
     {
-      const animation &anim_ob = anim ();
       if (anim_speed)
         // if this item is time-animated, force the last frame
         animate_object (this, 0);
       else if (flag [FLAG_MONSTER])
         // if it is a monster, set appropriate facing
         {
           negate = 1;
           str++;
         }
-      for (const flagstr *f = move_flags; f < move_flags + array_length (move_flags); ++f)
+      for (const flagstr *f = move_flags; f < move_flags + ecb_array_length (move_flags); ++f)
         {
           if (!strcmp (f->name, str))
             {
               if (negate)
                 mt &= ~f->flags;
 bool
 object::parse_kv (object_thawer &f)
 {
   object *op_inv = inv;
-  key_value *last_kv = kv.first;
   for (;;)
     {
       switch (f.kw)
         {
             f.delayed_deref (this, owner, f.get_str ());
             break;
           case KW_animation:
             {
-              this->clr_flag (FLAG_ANIMATE);
+              clr_flag (FLAG_ANIMATE);
               animation_id = 0;
-              if (f.has_value () && (animation_id = find_animation (f.get_str ())))
+              if (f.has_value () && (animation_id = animation::find (f.get_str ()).number))
-                this->set_flag (FLAG_ANIMATE); //TODO: should not be forced to true here
+                set_flag (FLAG_ANIMATE); //TODO: should not be forced to true here
             }
             break;
           case KW_last_heal:  f.get (last_heal);  break;
           case KW_last_sp:    f.get (last_sp);    break;
           case KW_move_type:            set_move (move_type , f); break;
           case KW_move_on:              set_move (move_on   , f); break;
           case KW_move_off:             set_move (move_off  , f); break;
           case KW_move_slow:            set_move (move_slow , f); break;
-            /* These are all legacy - any new objects should use the move_ .. values */
-          case KW_no_pass:
-            {
-              if (f.get_sint32 ())
-                move_block = MOVE_ALL;
-              else
-                move_block = 0;
-            }
-            break;
-            /* These are all legacy - any new objects should use the move_ .. values */
-          case KW_walk_on:
-            {
-              if (f.get_sint32 ())
-                move_on |= MOVE_WALK;
-              else
-                move_on &= ~MOVE_WALK;
-            }
-            break;
-            /* These are all legacy - any new objects should use the move_ .. values */
-          case KW_walk_off:
-            {
-              if (f.get_sint32 ())
-                move_off |= MOVE_WALK;
-              else
-                move_off &= ~MOVE_WALK;
-            }
-            break;
-            /* These are all legacy - any new objects should use the move_ .. values */
-          case KW_fly_on:
-            {
-              if (f.get_sint32 ())
-                move_on |= MOVE_FLY_LOW;
-              else
-                move_on &= ~MOVE_FLY_LOW;
-            }
-            break;
-            /* These are all legacy - any new objects should use the move_ .. values */
-          case KW_fly_off:
-            {
-              if (f.get_sint32 ())
-                move_off |= MOVE_FLY_LOW;
-              else
-                move_off &= ~MOVE_FLY_LOW;
-            }
-            break;
             //TODO: remove these after converting archetypes
           case KW_can_use_wand:
             GET_FLAG (this, FLAG_USE_RANGE);
             break;
-            /* These are all legacy - any new objects should use the move_ .. values */
-          case KW_flying:
-            {
-              if (f.get_sint32 ())
-                move_type |= MOVE_FLY_LOW;
-              else
-                move_type &= ~MOVE_FLY_LOW;
-            }
-            break;
           case KW_identified:
             GET_FLAG (this, FLAG_IDENTIFIED);
             //TODO: move to check_object or so
             if (this->flag [FLAG_IDENTIFIED])
           case KW_changing:             GET_FLAG (this, FLAG_CHANGING); break;
           case KW_splitting:            GET_FLAG (this, FLAG_SPLITTING); break;
           case KW_hitback:              GET_FLAG (this, FLAG_HITBACK); break;
           case KW_startequip:           GET_FLAG (this, FLAG_STARTEQUIP); break;
           case KW_blocksview:           GET_FLAG (this, FLAG_BLOCKSVIEW); break;
+          case KW_is_transparent_floor: GET_FLAG (this, FLAG_IS_TRANSPARENT_FLOOR); break;
           case KW_undead:               GET_FLAG (this, FLAG_UNDEAD); break;
           case KW_scared:               GET_FLAG (this, FLAG_SCARED); break;
           case KW_unaggressive:         GET_FLAG (this, FLAG_UNAGGRESSIVE); break;
           case KW_reflect_missile:      GET_FLAG (this, FLAG_REFL_MISSILE); break;
           case KW_reflect_spell:        GET_FLAG (this, FLAG_REFL_SPELL); break;
     KW_NULL,
     KW_applied,
     KW_unpaid,
     KW_can_use_shield,
     KW_no_pick,
-    KW_NULL, // walk_on
+    KW_is_transparent_floor,
     /* 10 */
     KW_NULL, // no_pass
     KW_is_animated,
     KW_NULL, // slow_move
     KW_NULL, // flying
       *ptr++ = '\n';
       f.alloc (ptr - cur);
     }
-#define CMP_OUT(v)    if (expect_false (op->v != arch->v)) f.put (KW (v), op->v)
+#define CMP_OUT(v)    if (ecb_expect_false (op->v != arch->v)) f.put (KW (v), op->v)
-#define CMP_OUT2(k,v) if (expect_false (op->v != arch->v)) f.put (KW (k), op->v)
+#define CMP_OUT2(k,v) if (ecb_expect_false (op->v != arch->v)) f.put (KW (k), op->v)
   CMP_OUT (x);
   CMP_OUT (y);
   CMP_OUT (type);
       static int    last_speed_left_len = sizeof ("sl 0\n") - 1;
       if (last_speed_left != op->speed_left)
         {
           last_speed_left = op->speed_left;
+          // .7g loses precision even for float, but gives nice round numbers and smaller files
+          // maybe hex format or a raw binary dump of the float is good enough, more exact, and much faster?
+          // (printf is typically very slow)
           last_speed_left_len = sizeof ("sl ") - 1
                               + sprintf (last_speed_left_str + sizeof ("sl ") - 1, "%.7g\n", last_speed_left);
         }
       f.add (last_speed_left_str, last_speed_left_len);
   CMP_OUT (level);
   CMP_OUT (attacktype);
   // using memcmp here seems to be a loss - is gcc vectorising?
   for (int i = 0; i < NROFATTACKS; i++)
-    if (expect_false (op->resist[i] != arch->resist[i]))
+    if (ecb_expect_false (op->resist[i] != arch->resist[i]))
       f.put (resist_save[i], op->resist[i]);
   CMP_OUT (path_attuned);
   CMP_OUT (path_repelled);
   CMP_OUT (path_denied);
   CMP_OUT (last_grace);
   CMP_OUT (last_eat);
   CMP_OUT (glow_radius);
   if (op->flag [FLAG_IS_LINKED])
-    if (auto (ol, op->find_link ()))
+    if (auto ol = op->find_link ())
       f.put (KW(connected), ol->id);
   CMP_OUT (randomitems);
   CMP_OUT2 (container, weight_limit);
     f.put (flag_names [FLAG_OBJ_ORIGINAL], op->flag [FLAG_OBJ_ORIGINAL] ? CS(1) : CS(0));
   diff.reset (FLAG_OBJ_ORIGINAL);
   // quickly test whether any other flags differ
-  if (expect_true (diff.any ()))
+  if (ecb_expect_true (diff.any ()))
     for (int i = 0; i < NUM_FLAGS; i++)
-      if (expect_false (diff [i]))
+      if (ecb_expect_false (diff [i]))
         f.put (flag_names [i], op->flag [i] ? CS(1) : CS(0));
 #else
   // use sgi extensions
   for (int i = diff._Find_first (); i < diff.size (); i = diff._Find_next (i))
     f.put (flag_names [i], op->flag [i] ? CS(1) : CS(0));
 #endif
   // save body locations. gcc's memcmp does an abysmal job when used
-  for (int i = 0; i < NUM_BODY_LOCATIONS; i++)
+  for (int i = 0; i < NUM_BODY_LOCATIONS; ++i)
-    if (expect_false (op->slot[i].info != arch->slot[i].info))
+    if (ecb_expect_false (op->slot[i].info != arch->slot[i].info))
       f.put (body_locations[i].kw, op->slot[i].info);
 }
 /*
  * Dumps all variables in an object to a file.
  * the only place this is not set is when saving the player.
  */
 bool
 object::write (object_freezer &f)
 {
-  if (expect_false (is_arch ()))
+  if (ecb_expect_false (is_arch ()))
     {
       f.put (KW(object), arch->archname);
       write_diff (f, this, archetype::empty);
     }
   else

Diff Legend

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

Comparing deliantra/server/common/loader.C (file contents): Revision 1.169 by root, Sun May 1 16:58:15 2011 UTC vs. Revision 1.185 by root, Wed Dec 5 19:03:26 2018 UTC

Diff Legend

Comparing deliantra/server/common/loader.C (file contents):
Revision 1.169 by root, Sun May 1 16:58:15 2011 UTC vs.
Revision 1.185 by root, Wed Dec 5 19:03:26 2018 UTC