--- deliantra/server/include/shstr.h	2007/07/01 05:00:18	1.17
+++ deliantra/server/include/shstr.h	2008/12/31 18:29:44	1.27
@@ -1,9 +1,9 @@
 /*
- * This file is part of Crossfire TRT, the Roguelike Realtime MORPG.
+ * This file is part of Deliantra, the Roguelike Realtime MMORPG.
  * 
- * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team
+ * Copyright (©) 2005,2006,2007,2008 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
  * 
- * Crossfire TRT is free software: you can redistribute it and/or modify
+ * Deliantra is free software: you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
  * the Free Software Foundation, either version 3 of the License, or
  * (at your option) any later version.
@@ -16,76 +16,155 @@
  * You should have received a copy of 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 <crossfire@schmorp.de>
+ * The authors can be reached via e-mail to <support@deliantra.net>
  */
 
 #ifndef SHSTR_H__
 #define SHSTR_H__
 
+#include <cstring>
 #include <sstream>
 
-#include "util.h"
+#include "traits.h"
+
+extern size_t shstr_alloc;
 
 extern int buf_overflow (const char *buf1, const char *buf2, int bufsize);
 
-struct shstr
+template<int size>
+struct shstr_vec
+{
+  uint32_t len;
+  uint32_t refcnt;
+  char string[size];
+};
+
+// this class is a non-refcounted shared string
+// it cannot be used to create or store shared strings, but
+// it can be used to apss shared strings around, i.e. as function arguments
+// or return values. their lifetime must not span a gc () call, i.e.
+// they are only valid as temporary values within the same server tick.
+struct shstr_tmp
 {
-  static const char *null;
+  static shstr_vec<sizeof ("(null)")> nullvec;
+  static const char *null () { return nullvec.string; } // this is the null pointer value
 
   const char *s;
 
-  static int &refcnt (const char *s)
+  static unsigned int &length (const char *s)
   {
-    return *((int *)s - 1);
+    return *((unsigned int *)s - 2);
   }
 
-  static int &length (const char *s)
+  int length () const
   {
-    return *((int *)s - 2);
+    return length (s);
   }
 
-  int &refcnt () const
+  // returns whether this shared string begins with the given prefix,
+  // used mainly for searches when users give only the start of a name.
+  bool starts_with (const char *prefix) const
   {
-    return refcnt (s);
+    int plen = strlen (prefix);
+
+    return length () >= plen && !strncasecmp (s, prefix, plen);
   }
 
-  int length () const
+  bool contains (const char *substring) const
   {
-    return length (s);
+    return strstr (s, substring);
   }
 
-  // returns wether this shared string begins with the given prefix,
-  // used mainly for searched when users give only the start of a name.
-  bool begins_with (const char *prefix) const
+  shstr_tmp ()
+  : s (null ())
   {
-    int plen = strlen (prefix);
-    return !strncasecmp (s, prefix, plen) && length () >= plen;
   }
 
-  static const char *find (const char *s);
-  static const char *intern (const char *s);
+  shstr_tmp (const shstr_tmp &sh)
+  : s (sh.s)
+  {
+  }
 
-  static void gc (); // garbage collect a few strings
+  shstr_tmp operator =(const shstr_tmp &sh)
+  {
+    s = sh.s;
+
+    return *this;
+  }
 
   // this is used for informational messages and the like
   const char *operator &() const { return s; }
 
-  const char &operator [](int i) const { return s[i]; }
-  operator const char *() const { return s == null ? 0 : s; }
+  operator const char *() const { return s == null () ? 0 : s; }
+
+protected:
+  // dummy is there so it isn't used as type converter accidentally
+  shstr_tmp (int dummy, const char *s)
+  : s(s)
+  {
+  }
+};
+
+inline bool operator ==(const shstr_tmp &a, const shstr_tmp &b)
+{
+  return a.s == b.s;
+}
+
+inline bool operator !=(const shstr_tmp &a, const shstr_tmp &b)
+{
+  return a.s != b.s;
+}
+
+inline int strlen (const shstr_tmp &sh)
+{
+  return sh.length ();
+}
+
+// undefined external reference to catch people using strcmp when they shouldn't
+int strcmp (const shstr_tmp &a, const shstr_tmp &b);
+
+static std::ostream &operator <<(std::ostream &o, shstr_tmp sh)
+{
+  o.write (sh.s, sh.length ());
+
+  return o;
+}
+
+struct shstr : shstr_tmp
+{
+  static unsigned int &refcnt (const char *s)
+  {
+    return *((unsigned int *)s - 1);
+  }
+
+  unsigned int &refcnt () const
+  {
+    return refcnt (s);
+  }
 
   shstr ()
-  : s (null)
   {
   }
 
+  static const char *find (const char *s);
+  static const char *intern (const char *s);
+
+  static void gc (); // garbage collect a few strings
+
   shstr (const shstr &sh)
-  : s (sh.s)
+  : shstr_tmp (sh)
   {
     ++refcnt ();
   }
 
-  explicit shstr (const char *s)
-  : s (intern (s))
+  shstr (const shstr_tmp &sh)
+  : shstr_tmp (sh)
+  {
+    ++refcnt ();
+  }
+
+  explicit shstr (const char *str)
+  : shstr_tmp (0, is_constant (str) && !str ? null () : intern (str))
   {
   }
 
@@ -94,7 +173,11 @@
     --refcnt ();
   }
 
-  const shstr &operator =(const shstr &sh)
+  using shstr_tmp::operator &;
+  using shstr_tmp::operator const char *;
+
+  // (note: not the copy constructor)
+  shstr &operator =(const shstr_tmp &sh)
   {
     --refcnt ();
     s = sh.s;
@@ -103,83 +186,57 @@
     return *this;
   }
 
-  const shstr &operator =(const char *str)
+  // here it comes
+  shstr &operator =(const shstr &sh)
   {
-    --refcnt ();
-
-    // this optimises the important case of str == constant 0
-    if (is_constant (str))
-      s = str ? intern (str) : null;
-    else
-      s = intern (str);
-
-    return *this;
+    return (*this) = (shstr_tmp)sh;
   }
 
-  bool operator ==(const shstr &b)
+  // shstr_tmp doesn't have this one
+  shstr &operator =(const char *str)
   {
-    return s == b.s;
-  }
+    --refcnt ();
+    s = is_constant (str) && !str ? null () : intern (str);
 
-  bool operator !=(const shstr &b)
-  {
-    return !(*this == b);
+    return *this;
   }
 };
 
-inline int strlen (const shstr &sh)
-{
-  return sh.length ();
-}
-
-inline int strcmp (const shstr &a, const shstr &b)
-{
-  // TODO: use this to find all the occurences of people using strcmp
-  // all uses should be bogus, as we should be never interested in
-  // comparing shstr's alphabetically
-#if 0
-  extern void do_not_use_strcmp_to_compare_shstr_values ();
-  do_not_use_strcmp_to_compare_shstr_values ();
-#endif
-  return a != b;
-}
-
-static std::ostream &operator <<(std::ostream &o, const shstr &sh)
-{
-  o.write (sh.s, sh.length ());
-  return o;
-}
-
-// only good for mass comparisons to shstr objects
+// only good for mass comparisons to shstr objects, or very
+// temporary passing, basically a non-refcounted shstr
 struct shstr_cmp
 {
   const char *s;
 
-  explicit shstr_cmp (const char *s)
-  : s (shstr::find (s))
+  explicit shstr_cmp (const char *str)
+  : s (shstr::find (str))
   {
   }
 
-  shstr_cmp (const shstr_cmp &sh)
+  shstr_cmp (shstr_tmp sh)
   : s (sh.s)
   {
   }
 
-  shstr_cmp &operator =(const shstr_cmp sh) { s = sh.s; return *this; }
+  // this is used for informational messages and the like
+  const char *operator &() const { return s; }
+
   operator const char *() const { return s; }
 };
 
-inline bool operator ==(const shstr_cmp &a, const shstr &b)
+inline bool operator ==(const shstr_cmp &a, const shstr_tmp &b)
 {
   return a.s == b.s;
 }
 
-inline bool operator ==(const shstr &a, const shstr_cmp &b)
+inline bool operator ==(const shstr_tmp &a, const shstr_cmp &b)
 {
-  return b == a;
+  return a.s == b.s;
 }
 
-extern const shstr undead_name;	/* Used in hit_player() in main.c */
+#define def(str) extern const shstr shstr_ ## str;
+# include "shstrinc.h"
+#undef def
 
 #endif