1 files changed, 101 insertions, 0 deletions
diff --git a/TAO/orbsvcs/orbsvcs/Trader/Interpreter.cpp b/TAO/orbsvcs/orbsvcs/Trader/Interpreter.cpp
new file mode 100644
index 00000000000..ff6f7b4a1e4
--- /dev/null
+++ b/TAO/orbsvcs/orbsvcs/Trader/Interpreter.cpp
@@ -0,0 +1,101 @@
+// $Id$
+
+#include "orbsvcs/Trader/Interpreter.h"
+#include "ace/OS_NS_string.h"
+
+TAO_BEGIN_VERSIONED_NAMESPACE_DECL
+
+TAO_SYNCH_MUTEX TAO_Interpreter::parserMutex__;
+
+TAO_Interpreter::TAO_Interpreter (void)
+  : root_ (0)
+{
+}
+
+TAO_Interpreter::~TAO_Interpreter (void)
+{
+  delete root_;
+}
+
+int
+TAO_Interpreter::build_tree (const char* constraints)
+{
+  ACE_GUARD_RETURN (TAO_SYNCH_MUTEX,
+                    guard,
+                    TAO_Interpreter::parserMutex__,
+                    -1);
+
+  TAO_Lex_String_Input::reset ((char*)constraints);
+  int return_value = 0;
+
+  yyval.constraint_ = 0;
+  return_value = ::yyparse ();
+
+  if (return_value == 0 && yyval.constraint_ != 0)
+    this->root_ = yyval.constraint_;
+  else
+    {
+      while (yylex () > 0)
+        continue;
+      this->root_ = 0;
+    }
+
+  return return_value;
+}
+
+int
+TAO_Interpreter::is_empty_string (const char* str)
+{
+  int return_value = 0;
+
+  if (str != 0)
+    {
+      int i = 0;
+      while (str[i] != '\0')
+        {
+          if (str[i] != ' ')
+            break;
+
+          i++;
+        }
+
+      if (str[i] == '\0')
+        return_value = 1;
+    }
+
+  return return_value;
+}
+
+char* TAO_Lex_String_Input::string_ = 0;
+char* TAO_Lex_String_Input::current_ = 0;
+char* TAO_Lex_String_Input::end_ = 0;
+
+// Routine to have Lex read its input from the constraint string.
+
+int
+TAO_Lex_String_Input::copy_into (char* buf, int max_size)
+{
+  int chars_left =  TAO_Lex_String_Input::end_ - TAO_Lex_String_Input::current_;
+  int n = max_size > chars_left ? chars_left : max_size;
+
+  if (n > 0)
+    {
+      ACE_OS:: memcpy (buf,
+                       TAO_Lex_String_Input::current_,
+                       n);
+      TAO_Lex_String_Input::current_ += n;
+    }
+
+  return n;
+}
+
+void
+TAO_Lex_String_Input::reset (char* input_string)
+{
+  TAO_Lex_String_Input::string_ = input_string;
+  TAO_Lex_String_Input::current_ = input_string;
+  TAO_Lex_String_Input::end_ = input_string +
+    ACE_OS::strlen (TAO_Lex_String_Input::string_);
+}
+
+TAO_END_VERSIONED_NAMESPACE_DECL