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 "c_rcode.hxx"
24*b1cdbd2cSJim Jagielski 
25*b1cdbd2cSJim Jagielski 
26*b1cdbd2cSJim Jagielski // NOT FULLY DECLARED SERVICES
27*b1cdbd2cSJim Jagielski #include <ary/cpp/c_gate.hxx>
28*b1cdbd2cSJim Jagielski #include <ary/cpp/c_namesp.hxx>
29*b1cdbd2cSJim Jagielski // #include <ary/cpp/c_groups.hxx>
30*b1cdbd2cSJim Jagielski #include <ary/loc/locp_le.hxx>
31*b1cdbd2cSJim Jagielski #include "cpp_pe.hxx"
32*b1cdbd2cSJim Jagielski #include <adc_cl.hxx>
33*b1cdbd2cSJim Jagielski #include <x_parse.hxx>
34*b1cdbd2cSJim Jagielski #include "pe_file.hxx"
35*b1cdbd2cSJim Jagielski 
36*b1cdbd2cSJim Jagielski const uintt	C_nNO_TRY = uintt(-1);
37*b1cdbd2cSJim Jagielski 
38*b1cdbd2cSJim Jagielski 
39*b1cdbd2cSJim Jagielski namespace cpp {
40*b1cdbd2cSJim Jagielski 
41*b1cdbd2cSJim Jagielski 
CodeExplorer(ary::cpp::Gate & io_rAryGate)42*b1cdbd2cSJim Jagielski CodeExplorer::CodeExplorer( ary::cpp::Gate & io_rAryGate )
43*b1cdbd2cSJim Jagielski 	:   aGlobalParseContext(io_rAryGate),
44*b1cdbd2cSJim Jagielski         // aEnvironments,
45*b1cdbd2cSJim Jagielski         pPE_File(0),
46*b1cdbd2cSJim Jagielski         pGate(&io_rAryGate),
47*b1cdbd2cSJim Jagielski 		dpCurToken(0)
48*b1cdbd2cSJim Jagielski {
49*b1cdbd2cSJim Jagielski 	pPE_File = new PE_File( aGlobalParseContext );
50*b1cdbd2cSJim Jagielski }
51*b1cdbd2cSJim Jagielski 
~CodeExplorer()52*b1cdbd2cSJim Jagielski CodeExplorer::~CodeExplorer()
53*b1cdbd2cSJim Jagielski {
54*b1cdbd2cSJim Jagielski }
55*b1cdbd2cSJim Jagielski 
56*b1cdbd2cSJim Jagielski void
StartNewFile()57*b1cdbd2cSJim Jagielski CodeExplorer::StartNewFile()
58*b1cdbd2cSJim Jagielski {
59*b1cdbd2cSJim Jagielski 	csv::erase_container(aEnvironments);
60*b1cdbd2cSJim Jagielski 
61*b1cdbd2cSJim Jagielski 	aEnvironments.push_back( pPE_File.MutablePtr() );
62*b1cdbd2cSJim Jagielski     pPE_File->Enter(push);
63*b1cdbd2cSJim Jagielski }
64*b1cdbd2cSJim Jagielski 
65*b1cdbd2cSJim Jagielski void
Process_Token(DYN cpp::Token & let_drToken)66*b1cdbd2cSJim Jagielski CodeExplorer::Process_Token( DYN cpp::Token & let_drToken )
67*b1cdbd2cSJim Jagielski {
68*b1cdbd2cSJim Jagielski if (DEBUG_ShowTokens())
69*b1cdbd2cSJim Jagielski {
70*b1cdbd2cSJim Jagielski 	Cout() << let_drToken.Text() << Endl();
71*b1cdbd2cSJim Jagielski }
72*b1cdbd2cSJim Jagielski 	dpCurToken = &let_drToken;
73*b1cdbd2cSJim Jagielski 	aGlobalParseContext.ResetResult();
74*b1cdbd2cSJim Jagielski 
75*b1cdbd2cSJim Jagielski 	do {
76*b1cdbd2cSJim Jagielski 		CurToken().Trigger( CurEnv() );
77*b1cdbd2cSJim Jagielski 		AcknowledgeResult();
78*b1cdbd2cSJim Jagielski 	} while ( dpCurToken );
79*b1cdbd2cSJim Jagielski }
80*b1cdbd2cSJim Jagielski 
81*b1cdbd2cSJim Jagielski void
AcknowledgeResult()82*b1cdbd2cSJim Jagielski CodeExplorer::AcknowledgeResult()
83*b1cdbd2cSJim Jagielski {
84*b1cdbd2cSJim Jagielski 	if (CurResult().eDone == done)
85*b1cdbd2cSJim Jagielski 		dpCurToken = 0;
86*b1cdbd2cSJim Jagielski 
87*b1cdbd2cSJim Jagielski 	switch ( CurResult().eStackAction )
88*b1cdbd2cSJim Jagielski 	{
89*b1cdbd2cSJim Jagielski 		case stay:
90*b1cdbd2cSJim Jagielski 				break;
91*b1cdbd2cSJim Jagielski 		case push:
92*b1cdbd2cSJim Jagielski 				CurEnv().Leave(push);
93*b1cdbd2cSJim Jagielski 				aEnvironments.push_back( &PushEnv() );
94*b1cdbd2cSJim Jagielski 				PushEnv().Enter(push);
95*b1cdbd2cSJim Jagielski 				break;
96*b1cdbd2cSJim Jagielski 		case pop_success:
97*b1cdbd2cSJim Jagielski 				CurEnv().Leave(pop_success);
98*b1cdbd2cSJim Jagielski 				aEnvironments.pop_back();
99*b1cdbd2cSJim Jagielski 				CurEnv().Enter(pop_success);
100*b1cdbd2cSJim Jagielski 				break;
101*b1cdbd2cSJim Jagielski 		case pop_failure:
102*b1cdbd2cSJim Jagielski 		{
103*b1cdbd2cSJim Jagielski                 Cpp_PE * pRecover = 0;
104*b1cdbd2cSJim Jagielski                 do {
105*b1cdbd2cSJim Jagielski                     CurEnv().Leave(pop_failure);
106*b1cdbd2cSJim Jagielski         			aEnvironments.pop_back();
107*b1cdbd2cSJim Jagielski                     if ( aEnvironments.empty() )
108*b1cdbd2cSJim Jagielski                         break;
109*b1cdbd2cSJim Jagielski                     pRecover = CurEnv().Handle_ChildFailure();
110*b1cdbd2cSJim Jagielski                 } while ( pRecover == 0 );
111*b1cdbd2cSJim Jagielski                 if ( pRecover != 0 )
112*b1cdbd2cSJim Jagielski                 {
113*b1cdbd2cSJim Jagielski                     aEnvironments.push_back(pRecover);
114*b1cdbd2cSJim Jagielski                     pRecover->Enter(push);
115*b1cdbd2cSJim Jagielski                 }
116*b1cdbd2cSJim Jagielski                 else
117*b1cdbd2cSJim Jagielski                 {
118*b1cdbd2cSJim Jagielski     				throw X_Parser( X_Parser::x_UnexpectedToken, CurToken().Text(), aGlobalParseContext.CurFileName(), aGlobalParseContext.LineCount() );
119*b1cdbd2cSJim Jagielski                 }
120*b1cdbd2cSJim Jagielski 		}		break;
121*b1cdbd2cSJim Jagielski 		default:
122*b1cdbd2cSJim Jagielski 			csv_assert(false);
123*b1cdbd2cSJim Jagielski 	}	// end switch(CurResult().eStackAction)
124*b1cdbd2cSJim Jagielski }
125*b1cdbd2cSJim Jagielski 
126*b1cdbd2cSJim Jagielski const Token &
CurToken() const127*b1cdbd2cSJim Jagielski CodeExplorer::CurToken() const
128*b1cdbd2cSJim Jagielski {
129*b1cdbd2cSJim Jagielski 	csv_assert(dpCurToken);
130*b1cdbd2cSJim Jagielski 
131*b1cdbd2cSJim Jagielski 	return *dpCurToken;
132*b1cdbd2cSJim Jagielski }
133*b1cdbd2cSJim Jagielski 
134*b1cdbd2cSJim Jagielski Cpp_PE &
CurEnv() const135*b1cdbd2cSJim Jagielski CodeExplorer::CurEnv() const
136*b1cdbd2cSJim Jagielski {
137*b1cdbd2cSJim Jagielski 	csv_assert(aEnvironments.size() > 0);
138*b1cdbd2cSJim Jagielski 	csv_assert(aEnvironments.back() != 0);
139*b1cdbd2cSJim Jagielski 
140*b1cdbd2cSJim Jagielski 	return *aEnvironments.back();
141*b1cdbd2cSJim Jagielski }
142*b1cdbd2cSJim Jagielski 
143*b1cdbd2cSJim Jagielski Cpp_PE &
PushEnv() const144*b1cdbd2cSJim Jagielski CodeExplorer::PushEnv() const
145*b1cdbd2cSJim Jagielski {
146*b1cdbd2cSJim Jagielski     TokenProcessing_Result & rCurResult = const_cast< TokenProcessing_Result& >(aGlobalParseContext.CurResult());
147*b1cdbd2cSJim Jagielski 	Cpp_PE * ret = dynamic_cast< Cpp_PE* >(rCurResult.pEnv2Push);
148*b1cdbd2cSJim Jagielski 	csv_assert( ret != 0 );
149*b1cdbd2cSJim Jagielski 	return *ret;
150*b1cdbd2cSJim Jagielski }
151*b1cdbd2cSJim Jagielski 
152*b1cdbd2cSJim Jagielski 
153*b1cdbd2cSJim Jagielski 
154*b1cdbd2cSJim Jagielski }   // namespace cpp
155*b1cdbd2cSJim Jagielski 
156