summaryrefslogtreecommitdiff
path: root/trunk/TAO/orbsvcs/PSS/PSDL_Interpreter.cpp
blob: 0ee126084bc1cd3db06f2d5a8d5d7f30fdf92e81 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
// -*- C++ -*-
// $Id$

#include "PSDL_Interpreter.h"
#include "PSDL_Node.h"
#include "PSDL_y.h"

ACE_RCSID(PSDL, PSDL_Interpreter, "$Id$")

TAO_SYNCH_MUTEX TAO_PSDL_Interpreter::parserMutex__;

TAO_PSDL_Interpreter::TAO_PSDL_Interpreter (void)
  : root_ (0)
{
}

TAO_PSDL_Interpreter::~TAO_PSDL_Interpreter (void)
{
  delete this->root_;
}

int
TAO_PSDL_Interpreter::build_tree (const char* nodes)
{
  ACE_GUARD_RETURN (TAO_SYNCH_MUTEX,
                    guard,
                    TAO_PSDL_Interpreter::parserMutex__,
                    -1);

  TAO_Lex_String_Input::reset ((char*)nodes);

  yyval = 0;
  void *result_ptr = 0;
  int return_value = TAO_PSDL_yyparse (result_ptr);

  if (return_value == 0 && yyval != 0)
    {
      this->root_ = yyval;
    }
  else
    {
      this->root_ = 0;
    }

  return return_value;
}

int
TAO_PSDL_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 node 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_);
}