ACE/ace/ETCL/ETCL_Interpreter.cpp

   1 // -*- C++ -*-
   2 #include "ace/Guard_T.h"
   3 #include "ace/Truncate.h"
   4 #include "ace/OS_NS_string.h"
   5
   6 #include "ace/ETCL/ETCL_Interpreter.h"
   7 #include "ace/ETCL/ETCL_Constraint.h"
   8
   9 ACE_BEGIN_VERSIONED_NAMESPACE_DECL
  10
  11 ETCL_Parser_Export ACE_SYNCH_MUTEX ETCL_Interpreter::parserMutex__;
  12
  13 ETCL_Interpreter::ETCL_Interpreter ()
  14   : root_ (0)
  15 {
  16 }
  17
  18 ETCL_Interpreter::~ETCL_Interpreter ()
  19 {
  20   delete this->root_;
  21 }
  22
  23 int
  24 ETCL_Interpreter::build_tree (const char* constraints)
  25 {
  26   ACE_GUARD_RETURN (ACE_SYNCH_MUTEX,
  27                     guard,
  28                     ETCL_Interpreter::parserMutex__,
  29                     -1);
  30
  31   Lex_String_Input::reset ((char*)constraints);
  32
  33   yyval.constraint = 0;
  34   int return_value = ::yyparse ();
  35
  36   if (return_value == 0 && yyval.constraint != 0)
  37     {
  38       this->root_ = yyval.constraint;
  39     }
  40   else
  41     {
  42       this->root_ = 0;
  43     }
  44
  45   return return_value;
  46 }
  47
  48 int
  49 ETCL_Interpreter::is_empty_string (const char* str)
  50 {
  51   int return_value = 0;
  52
  53   if (str != 0)
  54     {
  55       int i = 0;
  56
  57       while (str[i] != '\0')
  58         {
  59           if (str[i] != ' ')
  60             {
  61               break;
  62             }
  63
  64           ++i;
  65         }
  66
  67       if (str[i] == '\0')
  68         {
  69           return_value = 1;
  70         }
  71     }
  72
  73   return return_value;
  74 }
  75
  76 char* Lex_String_Input::string_ = 0;
  77 char* Lex_String_Input::current_ = 0;
  78 char* Lex_String_Input::end_ = 0;
  79
  80 // Routine to have Lex read its input from the constraint string.
  81
  82 int
  83 Lex_String_Input::copy_into (char* buf,
  84                              int max_size)
  85 {
  86   int const chars_left =
  87     ACE_Utils::truncate_cast<int> (
  88       Lex_String_Input::end_ - Lex_String_Input::current_);
  89
  90   int const n = max_size > chars_left ? chars_left : max_size;
  91
  92   if (n > 0)
  93     {
  94       ACE_OS::memcpy (buf,
  95                       Lex_String_Input::current_,
  96                       n);
  97       Lex_String_Input::current_ += n;
  98     }
  99
 100   return n;
 101 }
 102
 103 void
 104 Lex_String_Input::reset (char* input_string)
 105 {
 106   Lex_String_Input::string_ = input_string;
 107   Lex_String_Input::current_ = input_string;
 108   Lex_String_Input::end_ =
 109     input_string + ACE_OS::strlen (Lex_String_Input::string_);
 110 }
 111
 112 ACE_END_VERSIONED_NAMESPACE_DECL