1 files changed, 159 insertions, 0 deletions
diff --git a/libxsde/xsde/cxx/parser/non-validating/hex-binary.cxx b/libxsde/xsde/cxx/parser/non-validating/hex-binary.cxx
new file mode 100644
index 0000000..a7cc8b4
--- /dev/null
+++ b/libxsde/xsde/cxx/parser/non-validating/hex-binary.cxx
@@ -0,0 +1,159 @@
+// file      : xsde/cxx/parser/non-validating/hex-binary.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 <xsde/cxx/config.hxx>
+
+#include <xsde/cxx/parser/non-validating/hex-binary.hxx>
+
+static unsigned char
+hex_decode (char c)
+{
+  unsigned char r = 0xFF;
+
+  if (c >= '0' && c <= '9')
+    r = static_cast<unsigned char> (c - '0');
+  else if (c >= 'A' && c <= 'F')
+    r = static_cast<unsigned char> (10 + (c - 'A'));
+  else if (c >= 'a' && c <= 'f')
+    r = static_cast<unsigned char> (10 + (c - 'a'));
+
+  return r;
+}
+
+namespace xsde
+{
+  namespace cxx
+  {
+    namespace parser
+    {
+      namespace non_validating
+      {
+        hex_binary_pimpl::
+        ~hex_binary_pimpl ()
+        {
+          if (!base_)
+            delete buf_;
+        }
+
+        void hex_binary_pimpl::
+        _reset ()
+        {
+          hex_binary_pskel::_reset ();
+
+          if (!base_)
+          {
+            delete buf_;
+            buf_ = 0;
+          }
+        }
+
+        hex_binary_pimpl::
+        hex_binary_pimpl (bool base)
+            : base_ (base), buf_ (0)
+        {
+        }
+
+        void hex_binary_pimpl::
+        pre_impl (buffer* b)
+        {
+          buf_ = b;
+        }
+
+        void hex_binary_pimpl::
+        _pre ()
+        {
+          if (buf_ == 0)
+          {
+            buf_ = new buffer ();
+
+#ifndef XSDE_EXCEPTIONS
+            if (buf_ == 0)
+            {
+              _sys_error (sys_error::no_memory);
+              return;
+            }
+#endif
+          }
+
+#ifdef XSDE_EXCEPTIONS
+          str_.assign ("", 0);
+#else
+          if (str_.assign ("", 0))
+            _sys_error (sys_error::no_memory);
+#endif
+        }
+
+        void hex_binary_pimpl::
+        _characters (const ro_string& s)
+        {
+          if (str_.size () == 0)
+          {
+            ro_string tmp (s.data (), s.size ());
+
+            if (trim_left (tmp) != 0)
+            {
+#ifdef XSDE_EXCEPTIONS
+              str_.append (tmp.data (), tmp.size ());
+#else
+              if (str_.append (tmp.data (), tmp.size ()))
+                _sys_error (sys_error::no_memory);
+#endif
+            }
+          }
+          else
+          {
+#ifdef XSDE_EXCEPTIONS
+            str_.append (s.data (), s.size ());
+#else
+            if (str_.append (s.data (), s.size ()))
+              _sys_error (sys_error::no_memory);
+#endif
+          }
+        }
+
+        buffer* hex_binary_pimpl::
+        post_hex_binary ()
+        {
+          ro_string tmp (str_);
+          ro_string::size_type size = trim_right (tmp);
+
+          size_t n = size / 2;
+
+#ifdef XSDE_EXCEPTIONS
+          buf_->size (n);
+#else
+          if (buf_->size (n))
+          {
+            _sys_error (sys_error::no_memory);
+            return 0;
+          }
+#endif
+
+          if (n != 0)
+          {
+            const char* src = tmp.data ();
+            char* dst = buf_->data ();
+            size_t i = 0;
+
+            for (; i < n; ++i)
+            {
+              unsigned char h = hex_decode (src[2 * i]);
+              unsigned char l = hex_decode (src[2 * i + 1]);
+
+              if (h == 0xFF || l == 0xFF)
+                break;
+
+              dst[i] = (h << 4) | l;
+            }
+          }
+
+          buffer* r = buf_;
+          buf_ = 0;
+          return r;
+        }
+      }
+    }
+  }
+}