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 
23*b1cdbd2cSJim Jagielski 
24*b1cdbd2cSJim Jagielski #ifndef ADC_CPP_CALLF_HXX
25*b1cdbd2cSJim Jagielski #define ADC_CPP_CALLF_HXX
26*b1cdbd2cSJim Jagielski 
27*b1cdbd2cSJim Jagielski // USED SERVICES
28*b1cdbd2cSJim Jagielski 
29*b1cdbd2cSJim Jagielski 
30*b1cdbd2cSJim Jagielski 
31*b1cdbd2cSJim Jagielski 
32*b1cdbd2cSJim Jagielski /**	This represents a function to be called, if a specific kind of token
33*b1cdbd2cSJim Jagielski 	arrives in the semantic parser.
34*b1cdbd2cSJim Jagielski 
35*b1cdbd2cSJim Jagielski 	@descr This class is only to be used as member of PeStatus<PE>.
36*b1cdbd2cSJim Jagielski 	@template PE
37*b1cdbd2cSJim Jagielski 		The owning ParseEnvironment.
38*b1cdbd2cSJim Jagielski 	@see PeStatus, ParseEnvironment
39*b1cdbd2cSJim Jagielski */
40*b1cdbd2cSJim Jagielski template <class PE>
41*b1cdbd2cSJim Jagielski class CallFunction
42*b1cdbd2cSJim Jagielski {
43*b1cdbd2cSJim Jagielski   public:
44*b1cdbd2cSJim Jagielski 	typedef void (PE::*F_Tok)(const char *);
45*b1cdbd2cSJim Jagielski 
46*b1cdbd2cSJim Jagielski 						CallFunction(
47*b1cdbd2cSJim Jagielski 							F_Tok				i_f2Call,
48*b1cdbd2cSJim Jagielski 							INT16				i_nTokType );
49*b1cdbd2cSJim Jagielski 
50*b1cdbd2cSJim Jagielski 	F_Tok				GetF() const;
51*b1cdbd2cSJim Jagielski 	INT16				TokType() const;
52*b1cdbd2cSJim Jagielski 
53*b1cdbd2cSJim Jagielski   private:
54*b1cdbd2cSJim Jagielski 	// DATA
55*b1cdbd2cSJim Jagielski 	F_Tok				f2Call;
56*b1cdbd2cSJim Jagielski 	INT16				nTokType;
57*b1cdbd2cSJim Jagielski };
58*b1cdbd2cSJim Jagielski 
59*b1cdbd2cSJim Jagielski 
60*b1cdbd2cSJim Jagielski /**	One state within a ParseEnvironment.
61*b1cdbd2cSJim Jagielski 
62*b1cdbd2cSJim Jagielski 	@template PE
63*b1cdbd2cSJim Jagielski 		The owning ParseEnvironment.
64*b1cdbd2cSJim Jagielski */
65*b1cdbd2cSJim Jagielski template <class PE>
66*b1cdbd2cSJim Jagielski class PeStatus
67*b1cdbd2cSJim Jagielski {
68*b1cdbd2cSJim Jagielski   public:
69*b1cdbd2cSJim Jagielski 	typedef typename CallFunction<PE>::F_Tok  F_Tok;
70*b1cdbd2cSJim Jagielski 
71*b1cdbd2cSJim Jagielski 						PeStatus(
72*b1cdbd2cSJim Jagielski 							PE &	  			i_rMyPE,
73*b1cdbd2cSJim Jagielski 							uintt				i_nSize,
74*b1cdbd2cSJim Jagielski 							F_Tok *				i_pFuncArray,
75*b1cdbd2cSJim Jagielski 							INT16 *             i_pTokTypeArray,
76*b1cdbd2cSJim Jagielski 							F_Tok				i_pDefault );
77*b1cdbd2cSJim Jagielski 	virtual             ~PeStatus();
78*b1cdbd2cSJim Jagielski 
79*b1cdbd2cSJim Jagielski 	virtual void	   	Call_Handler(
80*b1cdbd2cSJim Jagielski 							INT16				i_nTokTypeId,
81*b1cdbd2cSJim Jagielski 							const char *		i_sTokenText ) const;
82*b1cdbd2cSJim Jagielski 
83*b1cdbd2cSJim Jagielski   private:
84*b1cdbd2cSJim Jagielski 	bool				CheckForCall(
85*b1cdbd2cSJim Jagielski 							uintt				i_nPos,
86*b1cdbd2cSJim Jagielski 							INT16				i_nTokTypeId,
87*b1cdbd2cSJim Jagielski 							const char *		i_sTokenText ) const;
88*b1cdbd2cSJim Jagielski 
89*b1cdbd2cSJim Jagielski 	PE *	  			pMyPE;
90*b1cdbd2cSJim Jagielski 	std::vector< CallFunction<PE> >
91*b1cdbd2cSJim Jagielski 						aBranches;
92*b1cdbd2cSJim Jagielski 	F_Tok				fDefault;
93*b1cdbd2cSJim Jagielski };
94*b1cdbd2cSJim Jagielski 
95*b1cdbd2cSJim Jagielski 
96*b1cdbd2cSJim Jagielski template <class PE>
97*b1cdbd2cSJim Jagielski class PeStatusArray
98*b1cdbd2cSJim Jagielski {
99*b1cdbd2cSJim Jagielski   public:
100*b1cdbd2cSJim Jagielski 	typedef typename PE::E_State	State;
101*b1cdbd2cSJim Jagielski 
102*b1cdbd2cSJim Jagielski 						PeStatusArray();
103*b1cdbd2cSJim Jagielski 	void				InsertState(
104*b1cdbd2cSJim Jagielski 							State				i_ePosition,
105*b1cdbd2cSJim Jagielski 							DYN PeStatus<PE> &	let_drState );
106*b1cdbd2cSJim Jagielski 						~PeStatusArray();
107*b1cdbd2cSJim Jagielski 
108*b1cdbd2cSJim Jagielski 	const PeStatus<PE> &
109*b1cdbd2cSJim Jagielski 						operator[](
110*b1cdbd2cSJim Jagielski 							State				i_ePosition ) const;
111*b1cdbd2cSJim Jagielski 
112*b1cdbd2cSJim Jagielski 	void				SetCur(
113*b1cdbd2cSJim Jagielski 							State				i_eCurState );
114*b1cdbd2cSJim Jagielski 	const PeStatus<PE> &
115*b1cdbd2cSJim Jagielski 						Cur() const;
116*b1cdbd2cSJim Jagielski 
117*b1cdbd2cSJim Jagielski   private:
118*b1cdbd2cSJim Jagielski 	DYN PeStatus<PE> *	aStati[PE::size_of_states];
119*b1cdbd2cSJim Jagielski 	State				eState;
120*b1cdbd2cSJim Jagielski };
121*b1cdbd2cSJim Jagielski 
122*b1cdbd2cSJim Jagielski 
123*b1cdbd2cSJim Jagielski 
124*b1cdbd2cSJim Jagielski // IMPLEMENTATION
125*b1cdbd2cSJim Jagielski 
126*b1cdbd2cSJim Jagielski 
127*b1cdbd2cSJim Jagielski // CallFunction
128*b1cdbd2cSJim Jagielski 
129*b1cdbd2cSJim Jagielski template <class PE>
CallFunction(F_Tok i_f2Call,INT16 i_nTokType)130*b1cdbd2cSJim Jagielski CallFunction<PE>::CallFunction(	F_Tok 	i_f2Call,
131*b1cdbd2cSJim Jagielski 								INT16	i_nTokType )
132*b1cdbd2cSJim Jagielski 	:	f2Call(i_f2Call),
133*b1cdbd2cSJim Jagielski 		nTokType(i_nTokType)
134*b1cdbd2cSJim Jagielski {
135*b1cdbd2cSJim Jagielski }
136*b1cdbd2cSJim Jagielski 
137*b1cdbd2cSJim Jagielski template <class PE>
138*b1cdbd2cSJim Jagielski inline typename CallFunction<PE>::F_Tok
GetF() const139*b1cdbd2cSJim Jagielski CallFunction<PE>::GetF() const
140*b1cdbd2cSJim Jagielski {
141*b1cdbd2cSJim Jagielski 	return f2Call;
142*b1cdbd2cSJim Jagielski }
143*b1cdbd2cSJim Jagielski 
144*b1cdbd2cSJim Jagielski template <class PE>
145*b1cdbd2cSJim Jagielski inline INT16
TokType() const146*b1cdbd2cSJim Jagielski CallFunction<PE>::TokType() const
147*b1cdbd2cSJim Jagielski {
148*b1cdbd2cSJim Jagielski 	return nTokType;
149*b1cdbd2cSJim Jagielski }
150*b1cdbd2cSJim Jagielski 
151*b1cdbd2cSJim Jagielski 
152*b1cdbd2cSJim Jagielski 
153*b1cdbd2cSJim Jagielski // PeStatus
154*b1cdbd2cSJim Jagielski 
155*b1cdbd2cSJim Jagielski template <class PE>
PeStatus(PE & i_rMyPE,uintt i_nSize,F_Tok * i_pFuncArray,INT16 * i_pTokTypeArray,F_Tok i_fDefault)156*b1cdbd2cSJim Jagielski PeStatus<PE>::PeStatus( PE &	  	i_rMyPE,
157*b1cdbd2cSJim Jagielski 						uintt		i_nSize,
158*b1cdbd2cSJim Jagielski 						F_Tok *		i_pFuncArray,
159*b1cdbd2cSJim Jagielski 						INT16 *     i_pTokTypeArray,
160*b1cdbd2cSJim Jagielski 						F_Tok		i_fDefault )
161*b1cdbd2cSJim Jagielski 	:	pMyPE(&i_rMyPE),
162*b1cdbd2cSJim Jagielski 		fDefault(i_fDefault)
163*b1cdbd2cSJim Jagielski {
164*b1cdbd2cSJim Jagielski 	aBranches.reserve(i_nSize);
165*b1cdbd2cSJim Jagielski 	for ( uintt i = 0; i < i_nSize; ++i )
166*b1cdbd2cSJim Jagielski 	{
167*b1cdbd2cSJim Jagielski //		csv_assert(i > 0 ? i_pTokTypeArray[i] > i_pTokTypeArray[i-1] : true);
168*b1cdbd2cSJim Jagielski     	aBranches.push_back( CallFunction<PE>( i_pFuncArray[i], i_pTokTypeArray[i]) );
169*b1cdbd2cSJim Jagielski 	}  // end for
170*b1cdbd2cSJim Jagielski }
171*b1cdbd2cSJim Jagielski 
172*b1cdbd2cSJim Jagielski template <class PE>
~PeStatus()173*b1cdbd2cSJim Jagielski PeStatus<PE>::~PeStatus()
174*b1cdbd2cSJim Jagielski {
175*b1cdbd2cSJim Jagielski 
176*b1cdbd2cSJim Jagielski }
177*b1cdbd2cSJim Jagielski 
178*b1cdbd2cSJim Jagielski template <class PE>
179*b1cdbd2cSJim Jagielski void
Call_Handler(INT16 i_nTokTypeId,const char * i_sTokenText) const180*b1cdbd2cSJim Jagielski PeStatus<PE>::Call_Handler( INT16				i_nTokTypeId,
181*b1cdbd2cSJim Jagielski 							const char *		i_sTokenText ) const
182*b1cdbd2cSJim Jagielski {
183*b1cdbd2cSJim Jagielski 	uintt nSize = aBranches.size();
184*b1cdbd2cSJim Jagielski 	uintt nPos = nSize / 2;
185*b1cdbd2cSJim Jagielski 
186*b1cdbd2cSJim Jagielski 	if ( i_nTokTypeId < aBranches[nPos].TokType() )
187*b1cdbd2cSJim Jagielski 	{
188*b1cdbd2cSJim Jagielski 		for ( --nPos; intt(nPos) >= 0; --nPos )
189*b1cdbd2cSJim Jagielski 		{
190*b1cdbd2cSJim Jagielski 			if (CheckForCall(nPos, i_nTokTypeId, i_sTokenText))
191*b1cdbd2cSJim Jagielski 				return;
192*b1cdbd2cSJim Jagielski 		}
193*b1cdbd2cSJim Jagielski 	}
194*b1cdbd2cSJim Jagielski 	else
195*b1cdbd2cSJim Jagielski 	{
196*b1cdbd2cSJim Jagielski 		for ( ; nPos < nSize; ++nPos )
197*b1cdbd2cSJim Jagielski 		{
198*b1cdbd2cSJim Jagielski 			if (CheckForCall(nPos, i_nTokTypeId, i_sTokenText))
199*b1cdbd2cSJim Jagielski 				return;
200*b1cdbd2cSJim Jagielski 		}
201*b1cdbd2cSJim Jagielski 	}
202*b1cdbd2cSJim Jagielski 
203*b1cdbd2cSJim Jagielski 	(pMyPE->*fDefault)(i_sTokenText);
204*b1cdbd2cSJim Jagielski }
205*b1cdbd2cSJim Jagielski 
206*b1cdbd2cSJim Jagielski template <class PE>
207*b1cdbd2cSJim Jagielski bool
CheckForCall(uintt i_nPos,INT16 i_nTokTypeId,const char * i_sTokenText) const208*b1cdbd2cSJim Jagielski PeStatus<PE>::CheckForCall(	uintt				i_nPos,
209*b1cdbd2cSJim Jagielski 							INT16				i_nTokTypeId,
210*b1cdbd2cSJim Jagielski 							const char *		i_sTokenText ) const
211*b1cdbd2cSJim Jagielski {
212*b1cdbd2cSJim Jagielski 	if ( aBranches[i_nPos].TokType() == i_nTokTypeId )
213*b1cdbd2cSJim Jagielski 	{
214*b1cdbd2cSJim Jagielski 		(pMyPE->*aBranches[i_nPos].GetF())(i_sTokenText);
215*b1cdbd2cSJim Jagielski 		return true;
216*b1cdbd2cSJim Jagielski 	}
217*b1cdbd2cSJim Jagielski 	return false;
218*b1cdbd2cSJim Jagielski }
219*b1cdbd2cSJim Jagielski 
220*b1cdbd2cSJim Jagielski // PeStatusArray
221*b1cdbd2cSJim Jagielski 
222*b1cdbd2cSJim Jagielski template <class PE>
PeStatusArray()223*b1cdbd2cSJim Jagielski PeStatusArray<PE>::PeStatusArray()
224*b1cdbd2cSJim Jagielski 	:	eState(PE::size_of_states)
225*b1cdbd2cSJim Jagielski {
226*b1cdbd2cSJim Jagielski 	memset(aStati, 0, sizeof aStati);
227*b1cdbd2cSJim Jagielski }
228*b1cdbd2cSJim Jagielski 
229*b1cdbd2cSJim Jagielski template <class PE>
230*b1cdbd2cSJim Jagielski void
InsertState(State i_ePosition,DYN PeStatus<PE> & let_drState)231*b1cdbd2cSJim Jagielski PeStatusArray<PE>::InsertState(	State 				i_ePosition,
232*b1cdbd2cSJim Jagielski 								DYN PeStatus<PE> &	let_drState )
233*b1cdbd2cSJim Jagielski {
234*b1cdbd2cSJim Jagielski 	csv_assert(aStati[i_ePosition] == 0);
235*b1cdbd2cSJim Jagielski 	aStati[i_ePosition] = &let_drState;
236*b1cdbd2cSJim Jagielski }
237*b1cdbd2cSJim Jagielski 
238*b1cdbd2cSJim Jagielski template <class PE>
~PeStatusArray()239*b1cdbd2cSJim Jagielski PeStatusArray<PE>::~PeStatusArray()
240*b1cdbd2cSJim Jagielski {
241*b1cdbd2cSJim Jagielski 	int i_max = PE::size_of_states;
242*b1cdbd2cSJim Jagielski 	for (int i = 0; i < i_max; i++)
243*b1cdbd2cSJim Jagielski 	{
244*b1cdbd2cSJim Jagielski 		delete aStati[i];
245*b1cdbd2cSJim Jagielski 	}  // end for
246*b1cdbd2cSJim Jagielski }
247*b1cdbd2cSJim Jagielski 
248*b1cdbd2cSJim Jagielski template <class PE>
249*b1cdbd2cSJim Jagielski inline const PeStatus<PE> &
operator [](State i_ePosition) const250*b1cdbd2cSJim Jagielski PeStatusArray<PE>::operator[]( State i_ePosition ) const
251*b1cdbd2cSJim Jagielski {
252*b1cdbd2cSJim Jagielski 	csv_assert( uintt(i_ePosition) < PE::size_of_states );
253*b1cdbd2cSJim Jagielski 	csv_assert( aStati[i_ePosition] != 0 );
254*b1cdbd2cSJim Jagielski 	return *aStati[i_ePosition];
255*b1cdbd2cSJim Jagielski }
256*b1cdbd2cSJim Jagielski 
257*b1cdbd2cSJim Jagielski template <class PE>
258*b1cdbd2cSJim Jagielski inline void
SetCur(State i_eCurState)259*b1cdbd2cSJim Jagielski PeStatusArray<PE>::SetCur( State i_eCurState )
260*b1cdbd2cSJim Jagielski {
261*b1cdbd2cSJim Jagielski 	eState = i_eCurState;
262*b1cdbd2cSJim Jagielski }
263*b1cdbd2cSJim Jagielski 
264*b1cdbd2cSJim Jagielski 
265*b1cdbd2cSJim Jagielski template <class PE>
266*b1cdbd2cSJim Jagielski const PeStatus<PE> &
Cur() const267*b1cdbd2cSJim Jagielski PeStatusArray<PE>::Cur() const
268*b1cdbd2cSJim Jagielski {
269*b1cdbd2cSJim Jagielski 	return (*this)[eState];
270*b1cdbd2cSJim Jagielski }
271*b1cdbd2cSJim Jagielski 
272*b1cdbd2cSJim Jagielski #define SEMPARSE_CREATE_STATUS(penv, state, default_function) \
273*b1cdbd2cSJim Jagielski 	pStati->InsertState( state, \
274*b1cdbd2cSJim Jagielski 						*new PeStatus<penv>( \
275*b1cdbd2cSJim Jagielski 		*this, \
276*b1cdbd2cSJim Jagielski 		sizeof( stateT_##state ) / sizeof (INT16), \
277*b1cdbd2cSJim Jagielski 		stateF_##state, \
278*b1cdbd2cSJim Jagielski 		stateT_##state, \
279*b1cdbd2cSJim Jagielski 		&penv::default_function ) )
280*b1cdbd2cSJim Jagielski 
281*b1cdbd2cSJim Jagielski 
282*b1cdbd2cSJim Jagielski #endif
283*b1cdbd2cSJim Jagielski 
284