1 files changed, 135 insertions, 0 deletions
diff --git a/libxsde/xsde/cxx/sequence-base.cxx b/libxsde/xsde/cxx/sequence-base.cxx
new file mode 100644
index 0000000..03f33f5
--- /dev/null
+++ b/libxsde/xsde/cxx/sequence-base.cxx
@@ -0,0 +1,135 @@
+// file      : xsde/cxx/sequence-base.cxx
+// author    : Boris Kolpackov <boris@codesynthesis.com>
+// copyright : Copyright (c) 2005-2009 Code Synthesis Tools CC
+// license   : GNU GPL v2 + exceptions; see accompanying LICENSE file
+
+#include <string.h> // memcpy, memmove
+
+#include <xsde/cxx/sequence-base.hxx>
+
+namespace xsde
+{
+  namespace cxx
+  {
+    void sequence_base::
+    erase_ (void* vp, size_t es, move_forward_func mv)
+    {
+      char* p = static_cast<char*> (vp);
+      char* d = static_cast<char*> (data_);
+
+      if (mv)
+        mv (p, size_ - 1 - (p - d) / es);
+      else
+        memmove (p, p + es, (size_ - 1) * es - (p - d));
+
+      --size_;
+    }
+
+#ifdef XSDE_EXCEPTIONS
+    struct guard
+    {
+      guard (void* p) : p_ (p) {}
+      ~guard () {if (p_) operator delete (p_);}
+
+      void
+      release () { p_ = 0; }
+
+    private:
+      void* p_;
+    };
+
+    void sequence_base::
+    grow_ (size_t n, size_t es, move_func mv)
+    {
+      size_t c = n == 0 ? (capacity_ != 0 ? capacity_ * 2 : 8) : n;
+      void* d = operator new (c * es);
+
+      if (size_)
+      {
+        if (mv)
+        {
+          guard g (d);
+          mv (d, data_, size_);
+          g.release ();
+        }
+        else
+          memcpy (d, data_, size_ * es);
+      }
+
+      if (data_)
+        operator delete (data_);
+
+      data_ = d;
+      capacity_ = c;
+    }
+
+    void* sequence_base::
+    insert_ (void* vp, size_t es, move_func mv, move_backward_func mvb)
+    {
+      size_t i = static_cast<char*> (vp) - static_cast<char*> (data_);
+
+      if (capacity_ < size_ + 1)
+        grow_ (0, es, mv);
+
+      char* d = static_cast<char*> (data_);
+      char* p = d + i;
+
+      if (mvb)
+        mvb (p, size_ - i / es, size_); // increments size_
+      else
+      {
+        memmove (p + es, p, size_ * es - i);
+        ++size_;
+      }
+
+      return p;
+    }
+#else
+    sequence_base::error sequence_base::
+    grow_ (size_t n, size_t es, move_func mv)
+    {
+      size_t c = n == 0 ? (capacity_ != 0 ? capacity_ * 2 : 8) : n;
+      void* d = operator new (c * es);
+
+      if (d == 0)
+        return error_no_memory;
+
+      if (size_)
+      {
+        if (mv)
+          mv (d, data_, size_);
+        else
+          memcpy (d, data_, size_ * es);
+      }
+
+      if (data_)
+        operator delete (data_);
+
+      data_ = d;
+      capacity_ = c;
+
+      return error_none;
+    }
+
+    void* sequence_base::
+    insert_ (void* vp, size_t es, move_func mv, move_backward_func mvb)
+    {
+      size_t i = static_cast<char*> (vp) - static_cast<char*> (data_);
+
+      if (capacity_ < size_ + 1 && grow_ (0, es, mv) != error_none)
+        return 0;
+
+      char* d = static_cast<char*> (data_);
+      char* p = d + i;
+
+      if (mvb)
+        mvb (p, size_ - i / es);
+      else
+        memmove (p + es, p, size_ * es - i);
+
+      ++size_;
+      return p;
+    }
+#endif
+  }
+}