(file) Return to WQLParser.cpp CVS log (file) (dir) Up to [Pegasus] / pegasus / src / Pegasus / WQL

  1 karl  1.20 //%2006////////////////////////////////////////////////////////////////////////
  2 mike  1.2  //
  3 karl  1.12 // Copyright (c) 2000, 2001, 2002 BMC Software; Hewlett-Packard Development
  4            // Company, L.P.; IBM Corp.; The Open Group; Tivoli Systems.
  5            // Copyright (c) 2003 BMC Software; Hewlett-Packard Development Company, L.P.;
  6 karl  1.11 // IBM Corp.; EMC Corporation, The Open Group.
  7 karl  1.12 // Copyright (c) 2004 BMC Software; Hewlett-Packard Development Company, L.P.;
  8            // IBM Corp.; EMC Corporation; VERITAS Software Corporation; The Open Group.
  9 karl  1.16 // Copyright (c) 2005 Hewlett-Packard Development Company, L.P.; IBM Corp.;
 10            // EMC Corporation; VERITAS Software Corporation; The Open Group.
 11 karl  1.20 // Copyright (c) 2006 Hewlett-Packard Development Company, L.P.; IBM Corp.;
 12            // EMC Corporation; Symantec Corporation; The Open Group.
 13 mike  1.2  //
 14            // Permission is hereby granted, free of charge, to any person obtaining a copy
 15 kumpf 1.6  // of this software and associated documentation files (the "Software"), to
 16            // deal in the Software without restriction, including without limitation the
 17            // rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
 18 mike  1.2  // sell copies of the Software, and to permit persons to whom the Software is
 19            // furnished to do so, subject to the following conditions:
 20            // 
 21 kumpf 1.6  // THE ABOVE COPYRIGHT NOTICE AND THIS PERMISSION NOTICE SHALL BE INCLUDED IN
 22 mike  1.2  // ALL COPIES OR SUBSTANTIAL PORTIONS OF THE SOFTWARE. THE SOFTWARE IS PROVIDED
 23            // "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
 24 kumpf 1.6  // LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
 25            // PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
 26            // HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
 27 mike  1.2  // ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
 28            // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 29            //
 30            //==============================================================================
 31            //
 32            //%/////////////////////////////////////////////////////////////////////////////
 33            
 34            #include <Pegasus/Common/Config.h>
 35 kumpf 1.7  #include <Pegasus/Common/InternalException.h>
 36 kumpf 1.4  #include <Pegasus/Common/Tracer.h>
 37 kumpf 1.5  #include <Pegasus/Common/PegasusVersion.h>
 38 mike  1.21 #include <Pegasus/Common/Mutex.h>
 39 mike  1.2  #include <iostream>
 40            #include "WQLParser.h"
 41            #include "WQLParserState.h"
 42            
 43            PEGASUS_USING_STD;
 44            
 45            extern int WQL_parse();
 46 kumpf 1.10 extern void WQL_restart (FILE *input_file);
 47 mike  1.2  
 48            PEGASUS_NAMESPACE_BEGIN
 49            
 50 karl  1.17 WQLParserState* globalParserState = 0; 
 51 humberto 1.13 static Mutex WQL_mutex;
 52 mike     1.2  
 53               void WQLParser::parse(
 54 mike     1.3      const char* text,
 55 mike     1.2      WQLSelectStatement& statement)
 56               {
 57 kumpf    1.4      PEG_METHOD_ENTER(TRC_WQL,"WQLParser::parse");
 58 humberto 1.13     
 59 karl     1.24      AutoMutex mtx(WQL_mutex);
 60 kumpf    1.4  
 61 mike     1.3      if (!text)
 62 kumpf    1.4      {
 63                       PEG_METHOD_EXIT();
 64 karl     1.24         throw NullPointer();
 65 kumpf    1.4      }
 66 mike     1.3  
 67                   statement.clear();
 68 mike     1.2  
 69 karl     1.17     globalParserState = new WQLParserState;
 70 mike     1.2      globalParserState->error = false;
 71                   globalParserState->text = text;
 72 a.dunfey 1.22     globalParserState->textSize = (Uint32)(strlen(text) + 1);
 73 mike     1.2      globalParserState->offset = 0;
 74                   globalParserState->statement = &statement;
 75               
 76                   WQL_parse();
 77               
 78                   if (globalParserState->error)
 79                   {
 80 karl     1.24         String errorMessage = globalParserState->errorMessage;
 81                       cleanup();
 82                       delete globalParserState;
 83 kumpf    1.4          PEG_METHOD_EXIT();
 84 karl     1.24         throw ParseError(errorMessage);
 85 mike     1.2      }
 86               
 87                   cleanup();
 88 karl     1.17     delete globalParserState;
 89 kumpf    1.4      PEG_METHOD_EXIT();
 90 mike     1.2  }
 91               
 92 mike     1.3  void WQLParser::parse(
 93 mike     1.19     const Buffer& text,
 94 mike     1.3      WQLSelectStatement& statement)
 95               {
 96 kumpf    1.4      PEG_METHOD_ENTER(TRC_WQL,"WQLParser::parse");
 97               
 98 kumpf    1.23     parse(text.getData(), statement);
 99 mike     1.3  
100 kumpf    1.4      PEG_METHOD_EXIT();
101 mike     1.3  }
102               
103               void WQLParser::parse(
104                   const String& text,
105                   WQLSelectStatement& statement)
106               {
107 kumpf    1.4      PEG_METHOD_ENTER(TRC_WQL,"WQLParser::parse");
108               
109 kumpf    1.9      parse(text.getCString(), statement);
110 kumpf    1.4  
111                   PEG_METHOD_EXIT();
112 mike     1.3  }
113               
114 mike     1.2  void WQLParser::cleanup()
115               {
116 kumpf    1.4      PEG_METHOD_ENTER(TRC_WQL,"WQLParser::cleanup");
117               
118 mike     1.2      Array<char*>& arr = globalParserState->outstandingStrings;
119               
120                   for (Uint32 i = 0, n = arr.size(); i < n; i++)
121 karl     1.24         delete [] arr[i];
122 mike     1.2  
123                   arr.clear();
124 kumpf    1.4  
125                   PEG_METHOD_EXIT();
126 mike     1.2  }
127               
128               PEGASUS_NAMESPACE_END
129               
130               PEGASUS_USING_PEGASUS;
131               
132 kumpf    1.8  int WQL_error(const char* errorMessage)
133 mike     1.2  {
134 kumpf    1.4      PEG_METHOD_ENTER(TRC_WQL,"WQL_error");
135               
136 mike     1.2      globalParserState->error = true;
137                   globalParserState->errorMessage = errorMessage;
138 kumpf    1.10 
139                   //
140                   //  flex does not automatically flush the input buffer in case of error
141                   //
142                   WQL_restart (0);
143 kumpf    1.4  
144                   PEG_METHOD_EXIT();
145 mike     1.2      return -1;
146               }
147               
148               int WQLInput(char* buffer, int& numRead, int numRequested)
149               {
150 kumpf    1.4      PEG_METHOD_ENTER(TRC_WQL,"WQLInput");
151 mike     1.2      //
152                   // Be sure to account for the null terminator (the size of the text will
153                   // be one or more; this is fixed checked beforehand by WQLParser::parse()).
154                   //
155               
156                   int remaining = 
157 karl     1.24         globalParserState->textSize - globalParserState->offset - 1;
158 mike     1.2  
159                   if (remaining == 0)
160                   {
161 karl     1.24         numRead = 0;
162 kumpf    1.4          PEG_METHOD_EXIT();
163 karl     1.24         return 0;
164 mike     1.2      }
165               
166                   if (remaining < numRequested)
167 karl     1.24         numRequested = remaining;
168 mike     1.2  
169                   memcpy(buffer, 
170 karl     1.24     globalParserState->text + globalParserState->offset, 
171                   numRequested);
172 mike     1.2  
173                   globalParserState->offset += numRequested;
174                   numRead = numRequested;
175               
176 kumpf    1.4      PEG_METHOD_EXIT();
177 mike     1.2      return numRead;
178               }

No CVS admin address has been configured
Powered by
ViewCVS 0.9.2