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 }
|