diff options
Diffstat (limited to 'TAO/orbsvcs/orbsvcs/Trader/Interpreter.cpp')
-rw-r--r-- | TAO/orbsvcs/orbsvcs/Trader/Interpreter.cpp | 101 |
1 files changed, 0 insertions, 101 deletions
diff --git a/TAO/orbsvcs/orbsvcs/Trader/Interpreter.cpp b/TAO/orbsvcs/orbsvcs/Trader/Interpreter.cpp deleted file mode 100644 index ff6f7b4a1e4..00000000000 --- a/TAO/orbsvcs/orbsvcs/Trader/Interpreter.cpp +++ /dev/null @@ -1,101 +0,0 @@ -// $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 |