--- deliantra/server/include/util.h	2006/09/04 11:07:59	1.3
+++ deliantra/server/include/util.h	2006/09/04 17:16:19	1.4
@@ -16,5 +16,40 @@
   void operator delete [] (void *p, size_t s);
 };
 
+struct str_hash
+{
+  std::size_t operator ()(const char *s) const
+  {
+    unsigned long hash = 0;
+    unsigned int i = 0;
+
+    /* use the one-at-a-time hash function, which supposedly is
+     * better than the djb2-like one used by perl5.005, but
+     * certainly is better then the bug used here before.
+     * see http://burtleburtle.net/bob/hash/doobs.html
+     */
+    while (*s)
+      {
+        hash += *s++;
+        hash += hash << 10;
+        hash ^= hash >>  6;
+      }
+
+    hash += hash <<  3;
+    hash ^= hash >> 11;
+    hash += hash << 15;
+
+    return hash;
+  }
+};
+
+struct str_equal
+{
+  bool operator ()(const char *a, const char *b) const
+  {
+    return !strcmp (a, b);
+  }
+};
+
 #endif