1*b1cdbd2cSJim Jagielski /**************************************************************
2*b1cdbd2cSJim Jagielski  *
3*b1cdbd2cSJim Jagielski  * Licensed to the Apache Software Foundation (ASF) under one
4*b1cdbd2cSJim Jagielski  * or more contributor license agreements.  See the NOTICE file
5*b1cdbd2cSJim Jagielski  * distributed with this work for additional information
6*b1cdbd2cSJim Jagielski  * regarding copyright ownership.  The ASF licenses this file
7*b1cdbd2cSJim Jagielski  * to you under the Apache License, Version 2.0 (the
8*b1cdbd2cSJim Jagielski  * "License"); you may not use this file except in compliance
9*b1cdbd2cSJim Jagielski  * with the License.  You may obtain a copy of the License at
10*b1cdbd2cSJim Jagielski  *
11*b1cdbd2cSJim Jagielski  *   http://www.apache.org/licenses/LICENSE-2.0
12*b1cdbd2cSJim Jagielski  *
13*b1cdbd2cSJim Jagielski  * Unless required by applicable law or agreed to in writing,
14*b1cdbd2cSJim Jagielski  * software distributed under the License is distributed on an
15*b1cdbd2cSJim Jagielski  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16*b1cdbd2cSJim Jagielski  * KIND, either express or implied.  See the License for the
17*b1cdbd2cSJim Jagielski  * specific language governing permissions and limitations
18*b1cdbd2cSJim Jagielski  * under the License.
19*b1cdbd2cSJim Jagielski  *
20*b1cdbd2cSJim Jagielski  *************************************************************/
21*b1cdbd2cSJim Jagielski 
22*b1cdbd2cSJim Jagielski #include <precomp.h>
23*b1cdbd2cSJim Jagielski #include "pe_expr.hxx"
24*b1cdbd2cSJim Jagielski 
25*b1cdbd2cSJim Jagielski 
26*b1cdbd2cSJim Jagielski // NOT FULLY DECLARED SERVICES
27*b1cdbd2cSJim Jagielski 
28*b1cdbd2cSJim Jagielski 
29*b1cdbd2cSJim Jagielski namespace cpp {
30*b1cdbd2cSJim Jagielski 
31*b1cdbd2cSJim Jagielski 
32*b1cdbd2cSJim Jagielski 
PE_Expression(Cpp_PE * i_pParent)33*b1cdbd2cSJim Jagielski PE_Expression::PE_Expression( Cpp_PE * i_pParent )
34*b1cdbd2cSJim Jagielski 	:   Cpp_PE(i_pParent),
35*b1cdbd2cSJim Jagielski         pStati( new PeStatusArray<PE_Expression> ),
36*b1cdbd2cSJim Jagielski         aResult_Text(100),
37*b1cdbd2cSJim Jagielski         nBracketCounter(0)
38*b1cdbd2cSJim Jagielski {
39*b1cdbd2cSJim Jagielski 	Setup_StatusFunctions();
40*b1cdbd2cSJim Jagielski }
41*b1cdbd2cSJim Jagielski 
42*b1cdbd2cSJim Jagielski 
~PE_Expression()43*b1cdbd2cSJim Jagielski PE_Expression::~PE_Expression()
44*b1cdbd2cSJim Jagielski {
45*b1cdbd2cSJim Jagielski }
46*b1cdbd2cSJim Jagielski 
47*b1cdbd2cSJim Jagielski void
Call_Handler(const cpp::Token & i_rTok)48*b1cdbd2cSJim Jagielski PE_Expression::Call_Handler( const cpp::Token & i_rTok )
49*b1cdbd2cSJim Jagielski {
50*b1cdbd2cSJim Jagielski 	pStati->Cur().Call_Handler(i_rTok.TypeId(), i_rTok.Text());
51*b1cdbd2cSJim Jagielski 
52*b1cdbd2cSJim Jagielski #if 0
53*b1cdbd2cSJim Jagielski 	switch (i_rTok.TypeId())
54*b1cdbd2cSJim Jagielski     {
55*b1cdbd2cSJim Jagielski 		case Tid_SwBracket_Left:	SetTokenResult(done, stay);
56*b1cdbd2cSJim Jagielski 									nBracketCounter++;
57*b1cdbd2cSJim Jagielski 									bBlockOpened = true;
58*b1cdbd2cSJim Jagielski 									break;
59*b1cdbd2cSJim Jagielski 		case Tid_SwBracket_Right:	SetTokenResult(done, stay);
60*b1cdbd2cSJim Jagielski 									nBracketCounter--;
61*b1cdbd2cSJim Jagielski 									break;
62*b1cdbd2cSJim Jagielski 		case Tid_Semicolon:			if (nBracketCounter == 0)
63*b1cdbd2cSJim Jagielski                                         SetTokenResult(done, pop_success);
64*b1cdbd2cSJim Jagielski                                     else
65*b1cdbd2cSJim Jagielski                                         SetTokenResult(done, stay);
66*b1cdbd2cSJim Jagielski 									break;
67*b1cdbd2cSJim Jagielski 		default:
68*b1cdbd2cSJim Jagielski 									if  ( bBlockOpened AND nBracketCounter == 0 )
69*b1cdbd2cSJim Jagielski 									{
70*b1cdbd2cSJim Jagielski 										SetTokenResult(not_done, pop_success);
71*b1cdbd2cSJim Jagielski 									}
72*b1cdbd2cSJim Jagielski 									else
73*b1cdbd2cSJim Jagielski 									{
74*b1cdbd2cSJim Jagielski 										SetTokenResult(done, stay);
75*b1cdbd2cSJim Jagielski 									}
76*b1cdbd2cSJim Jagielski 	}	// end switch
77*b1cdbd2cSJim Jagielski #endif // 0
78*b1cdbd2cSJim Jagielski }
79*b1cdbd2cSJim Jagielski 
80*b1cdbd2cSJim Jagielski void
Setup_StatusFunctions()81*b1cdbd2cSJim Jagielski PE_Expression::Setup_StatusFunctions()
82*b1cdbd2cSJim Jagielski {
83*b1cdbd2cSJim Jagielski 	typedef CallFunction<PE_Expression>::F_Tok	F_Tok;
84*b1cdbd2cSJim Jagielski 
85*b1cdbd2cSJim Jagielski 	static F_Tok stateF_std[] =			    { &PE_Expression::On_std_SwBracket_Left,
86*b1cdbd2cSJim Jagielski 											  &PE_Expression::On_std_SwBracket_Right,
87*b1cdbd2cSJim Jagielski 											  &PE_Expression::On_std_ArrayBracket_Left,
88*b1cdbd2cSJim Jagielski 											  &PE_Expression::On_std_ArrayBracket_Right,
89*b1cdbd2cSJim Jagielski 											  &PE_Expression::On_std_Bracket_Left,
90*b1cdbd2cSJim Jagielski 											  &PE_Expression::On_std_Bracket_Right,
91*b1cdbd2cSJim Jagielski 											  &PE_Expression::On_std_Semicolon,
92*b1cdbd2cSJim Jagielski                                               &PE_Expression::On_std_Comma };
93*b1cdbd2cSJim Jagielski 	static INT16 stateT_std[] =       	    { Tid_SwBracket_Left,
94*b1cdbd2cSJim Jagielski 											  Tid_SwBracket_Right,
95*b1cdbd2cSJim Jagielski 											  Tid_ArrayBracket_Left,
96*b1cdbd2cSJim Jagielski 											  Tid_ArrayBracket_Right,
97*b1cdbd2cSJim Jagielski 											  Tid_Bracket_Left,
98*b1cdbd2cSJim Jagielski 											  Tid_Bracket_Right,
99*b1cdbd2cSJim Jagielski 											  Tid_Semicolon,
100*b1cdbd2cSJim Jagielski                                               Tid_Comma };
101*b1cdbd2cSJim Jagielski 
102*b1cdbd2cSJim Jagielski 	SEMPARSE_CREATE_STATUS(PE_Expression, std, On_std_Default);
103*b1cdbd2cSJim Jagielski }
104*b1cdbd2cSJim Jagielski 
105*b1cdbd2cSJim Jagielski void
InitData()106*b1cdbd2cSJim Jagielski PE_Expression::InitData()
107*b1cdbd2cSJim Jagielski {
108*b1cdbd2cSJim Jagielski     pStati->SetCur(std);
109*b1cdbd2cSJim Jagielski     aResult_Text.seekp(0);
110*b1cdbd2cSJim Jagielski 	nBracketCounter = 0;
111*b1cdbd2cSJim Jagielski }
112*b1cdbd2cSJim Jagielski 
113*b1cdbd2cSJim Jagielski void
TransferData()114*b1cdbd2cSJim Jagielski PE_Expression::TransferData()
115*b1cdbd2cSJim Jagielski {
116*b1cdbd2cSJim Jagielski     pStati->SetCur(size_of_states);
117*b1cdbd2cSJim Jagielski     if ( aResult_Text.tellp() > 0)
118*b1cdbd2cSJim Jagielski         aResult_Text.pop_back(1);
119*b1cdbd2cSJim Jagielski }
120*b1cdbd2cSJim Jagielski 
121*b1cdbd2cSJim Jagielski void
On_std_Default(const char * i_sText)122*b1cdbd2cSJim Jagielski PE_Expression::On_std_Default( const char * i_sText)
123*b1cdbd2cSJim Jagielski {
124*b1cdbd2cSJim Jagielski     SetTokenResult(done, stay);
125*b1cdbd2cSJim Jagielski     aResult_Text << i_sText << " ";
126*b1cdbd2cSJim Jagielski }
127*b1cdbd2cSJim Jagielski 
128*b1cdbd2cSJim Jagielski void
On_std_SwBracket_Left(const char *)129*b1cdbd2cSJim Jagielski PE_Expression::On_std_SwBracket_Left( const char *)
130*b1cdbd2cSJim Jagielski {
131*b1cdbd2cSJim Jagielski     SetTokenResult(done, stay);
132*b1cdbd2cSJim Jagielski     nBracketCounter++;
133*b1cdbd2cSJim Jagielski }
134*b1cdbd2cSJim Jagielski 
135*b1cdbd2cSJim Jagielski void
On_std_SwBracket_Right(const char *)136*b1cdbd2cSJim Jagielski PE_Expression::On_std_SwBracket_Right( const char *)
137*b1cdbd2cSJim Jagielski {
138*b1cdbd2cSJim Jagielski     nBracketCounter--;
139*b1cdbd2cSJim Jagielski     if ( nBracketCounter >= 0 )
140*b1cdbd2cSJim Jagielski         SetTokenResult(done, stay);
141*b1cdbd2cSJim Jagielski     else
142*b1cdbd2cSJim Jagielski         SetTokenResult(not_done, pop_success);
143*b1cdbd2cSJim Jagielski }
144*b1cdbd2cSJim Jagielski 
145*b1cdbd2cSJim Jagielski void
On_std_ArrayBracket_Left(const char *)146*b1cdbd2cSJim Jagielski PE_Expression::On_std_ArrayBracket_Left( const char *)
147*b1cdbd2cSJim Jagielski {
148*b1cdbd2cSJim Jagielski     SetTokenResult(done, stay);
149*b1cdbd2cSJim Jagielski     nBracketCounter++;
150*b1cdbd2cSJim Jagielski }
151*b1cdbd2cSJim Jagielski 
152*b1cdbd2cSJim Jagielski void
On_std_ArrayBracket_Right(const char *)153*b1cdbd2cSJim Jagielski PE_Expression::On_std_ArrayBracket_Right( const char *)
154*b1cdbd2cSJim Jagielski {
155*b1cdbd2cSJim Jagielski     nBracketCounter--;
156*b1cdbd2cSJim Jagielski     if ( nBracketCounter >= 0 )
157*b1cdbd2cSJim Jagielski         SetTokenResult(done, stay);
158*b1cdbd2cSJim Jagielski     else
159*b1cdbd2cSJim Jagielski         SetTokenResult(not_done, pop_success);
160*b1cdbd2cSJim Jagielski }
161*b1cdbd2cSJim Jagielski 
162*b1cdbd2cSJim Jagielski void
On_std_Bracket_Left(const char *)163*b1cdbd2cSJim Jagielski PE_Expression::On_std_Bracket_Left( const char *)
164*b1cdbd2cSJim Jagielski {
165*b1cdbd2cSJim Jagielski     SetTokenResult(done, stay);
166*b1cdbd2cSJim Jagielski     nBracketCounter++;
167*b1cdbd2cSJim Jagielski }
168*b1cdbd2cSJim Jagielski 
169*b1cdbd2cSJim Jagielski void
On_std_Bracket_Right(const char *)170*b1cdbd2cSJim Jagielski PE_Expression::On_std_Bracket_Right( const char *)
171*b1cdbd2cSJim Jagielski {
172*b1cdbd2cSJim Jagielski     nBracketCounter--;
173*b1cdbd2cSJim Jagielski     if ( nBracketCounter >= 0 )
174*b1cdbd2cSJim Jagielski         SetTokenResult(done, stay);
175*b1cdbd2cSJim Jagielski     else
176*b1cdbd2cSJim Jagielski         SetTokenResult(not_done, pop_success);
177*b1cdbd2cSJim Jagielski }
178*b1cdbd2cSJim Jagielski 
179*b1cdbd2cSJim Jagielski void
On_std_Semicolon(const char *)180*b1cdbd2cSJim Jagielski PE_Expression::On_std_Semicolon( const char *)
181*b1cdbd2cSJim Jagielski {
182*b1cdbd2cSJim Jagielski     SetTokenResult(not_done, pop_success);
183*b1cdbd2cSJim Jagielski }
184*b1cdbd2cSJim Jagielski 
185*b1cdbd2cSJim Jagielski void
On_std_Comma(const char *)186*b1cdbd2cSJim Jagielski PE_Expression::On_std_Comma( const char *)
187*b1cdbd2cSJim Jagielski {
188*b1cdbd2cSJim Jagielski     SetTokenResult(not_done, pop_success);
189*b1cdbd2cSJim Jagielski }
190*b1cdbd2cSJim Jagielski 
191*b1cdbd2cSJim Jagielski 
192*b1cdbd2cSJim Jagielski }   // namespace cpp
193*b1cdbd2cSJim Jagielski 
194*b1cdbd2cSJim Jagielski 
195*b1cdbd2cSJim Jagielski 
196*b1cdbd2cSJim Jagielski 
197*b1cdbd2cSJim Jagielski 
198*b1cdbd2cSJim Jagielski 
199