--- deliantra/server/common/utils.C	2006/12/25 14:54:44	1.31
+++ deliantra/server/common/utils.C	2007/01/06 14:42:29	1.36
@@ -1,6 +1,7 @@
 /*
     CrossFire, A Multiplayer game for X-windows
 
+    Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
     Copyright (C) 2002 Mark Wedel & Crossfire Development Team
     Copyright (C) 1992 Frank Tore Johansen
 
@@ -197,73 +198,72 @@
   return (RANDOM () % diff + min);
 }
 
-/* decay and destroy persihable items in a map */
-
+/* decay and destroy perishable items in a map */
 void
-decay_objects (maptile *m)
+maptile::decay_objects ()
 {
-  int x, y, destroy;
-  object *op, *otmp;
-
-  if (m->unique)
+  if (!spaces)
     return;
 
-  for (x = 0; x < m->width; x++)
-    for (y = 0; y < m->height; y++)
-      for (op = GET_MAP_OB (m, x, y); op; op = otmp)
-        {
-          destroy = 0;
-          otmp = op->above;
-          if (QUERY_FLAG (op, FLAG_IS_FLOOR) && QUERY_FLAG (op, FLAG_UNIQUE))
-            break;
-          if (QUERY_FLAG (op, FLAG_IS_FLOOR)
-              || QUERY_FLAG (op, FLAG_OBJ_ORIGINAL)
-              || QUERY_FLAG (op, FLAG_OBJ_SAVE_ON_OVL)
-              || QUERY_FLAG (op, FLAG_UNIQUE)
-              || QUERY_FLAG (op, FLAG_OVERLAY_FLOOR)
-              || QUERY_FLAG (op, FLAG_UNPAID)
-              || op->is_alive ())
-            continue;
+  for (mapspace *ms = spaces + size (); ms-- > spaces; )
+    for (object *above, *op = ms->bot; op; op = above)
+      {
+        above = op->above;
 
-          /* otherwise, we decay and destroy */
-          if (op->is_weapon ())
-            {
-              op->stats.dam--;
-              if (op->stats.dam < 0)
-                destroy = 1;
-            }
-          else if (op->is_armor ())
-            {
-              op->stats.ac--;
-              if (op->stats.ac < 0)
-                destroy = 1;
-            }
-          else if (op->type == FOOD)
-            {
-              op->stats.food -= rndm (5, 20);
-              if (op->stats.food < 0)
-                destroy = 1;
-            }
-          else
-            {
-              if (op->material & M_PAPER || op->material & M_LEATHER ||
-                  op->material & M_WOOD || op->material & M_ORGANIC || op->material & M_CLOTH || op->material & M_LIQUID)
-                destroy = 1;
-              if (op->material & M_IRON && rndm (1, 5) == 1)
-                destroy = 1;
-              if (op->material & M_GLASS && rndm (1, 2) == 1)
-                destroy = 1;
-              if ((op->material & M_STONE || op->material & M_ADAMANT) && rndm (1, 10) == 1)
-                destroy = 1;
-              if ((op->material & M_SOFT_METAL || op->material & M_BONE) && rndm (1, 3) == 1)
-                destroy = 1;
-              if (op->material & M_ICE && m->temp > 32)
-                destroy = 1;
-            }
-          /* adjust overall chance below */
-          if (destroy && rndm (0, 1))
-            op->destroy ();
-        }
+        bool destroy = 0;
+
+        // do not decay anything above unique floor tiles (yet :)
+        if (QUERY_FLAG (op, FLAG_IS_FLOOR) && QUERY_FLAG (op, FLAG_UNIQUE))
+          break;
+
+        if (QUERY_FLAG (op, FLAG_IS_FLOOR)
+            || QUERY_FLAG (op, FLAG_OBJ_ORIGINAL)
+            || QUERY_FLAG (op, FLAG_OBJ_SAVE_ON_OVL)
+            || QUERY_FLAG (op, FLAG_UNIQUE)
+            || QUERY_FLAG (op, FLAG_OVERLAY_FLOOR)
+            || QUERY_FLAG (op, FLAG_UNPAID)
+            || op->is_alive ())
+          ; // do not decay
+        else if (op->is_weapon ())
+          {
+            op->stats.dam--;
+            if (op->stats.dam < 0)
+              destroy = 1;
+          }
+        else if (op->is_armor ())
+          {
+            op->stats.ac--;
+            if (op->stats.ac < 0)
+              destroy = 1;
+          }
+        else if (op->type == FOOD)
+          {
+            op->stats.food -= rndm (5, 20);
+            if (op->stats.food < 0)
+              destroy = 1;
+          }
+        else
+          {
+            int mat = op->material;
+
+            if (mat & M_PAPER
+                || mat & M_LEATHER
+                || mat & M_WOOD
+                || mat & M_ORGANIC
+                || mat & M_CLOTH
+                || mat & M_LIQUID
+                || (mat & M_IRON  && rndm (1, 5) == 1)
+                || (mat & M_GLASS && rndm (1, 2) == 1)
+                || ((mat & M_STONE      || mat & M_ADAMANT) && rndm (1, 10) == 1)
+                || ((mat & M_SOFT_METAL || mat & M_BONE)    && rndm (1, 3)  == 1)
+                || (mat & M_ICE && temp > 32))
+              destroy = 1;
+          }
+
+        /* adjust overall chance below */
+        if (destroy && rndm (0, 1))
+          op->destroy ();
+      }
 }
 
 /* convert materialname to materialtype_t */
@@ -600,3 +600,13 @@
   return tstamp (tv.tv_sec) + tstamp (tv.tv_usec) * tstamp (1e-6);
 }
 
+int
+similar_direction (int a, int b)
+{
+  if (!a || !b)
+    return 0;
+
+  int diff = (b - a) & 7;
+  return diff <= 1 || diff >= 7;
+}
+