1*78bc99aaSAndrew Rist /************************************************************** 2cdf0e10cSrcweir * 3*78bc99aaSAndrew Rist * Licensed to the Apache Software Foundation (ASF) under one 4*78bc99aaSAndrew Rist * or more contributor license agreements. See the NOTICE file 5*78bc99aaSAndrew Rist * distributed with this work for additional information 6*78bc99aaSAndrew Rist * regarding copyright ownership. The ASF licenses this file 7*78bc99aaSAndrew Rist * to you under the Apache License, Version 2.0 (the 8*78bc99aaSAndrew Rist * "License"); you may not use this file except in compliance 9*78bc99aaSAndrew Rist * with the License. You may obtain a copy of the License at 10cdf0e10cSrcweir * 11*78bc99aaSAndrew Rist * http://www.apache.org/licenses/LICENSE-2.0 12cdf0e10cSrcweir * 13*78bc99aaSAndrew Rist * Unless required by applicable law or agreed to in writing, 14*78bc99aaSAndrew Rist * software distributed under the License is distributed on an 15*78bc99aaSAndrew Rist * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY 16*78bc99aaSAndrew Rist * KIND, either express or implied. See the License for the 17*78bc99aaSAndrew Rist * specific language governing permissions and limitations 18*78bc99aaSAndrew Rist * under the License. 19cdf0e10cSrcweir * 20*78bc99aaSAndrew Rist *************************************************************/ 21cdf0e10cSrcweir 22cdf0e10cSrcweir #include <precomp.h> 23cdf0e10cSrcweir #include "c_rcode.hxx" 24cdf0e10cSrcweir 25cdf0e10cSrcweir 26cdf0e10cSrcweir // NOT FULLY DECLARED SERVICES 27cdf0e10cSrcweir #include <ary/cpp/c_gate.hxx> 28cdf0e10cSrcweir #include <ary/cpp/c_namesp.hxx> 29cdf0e10cSrcweir // #include <ary/cpp/c_groups.hxx> 30cdf0e10cSrcweir #include <ary/loc/locp_le.hxx> 31cdf0e10cSrcweir #include "cpp_pe.hxx" 32cdf0e10cSrcweir #include <adc_cl.hxx> 33cdf0e10cSrcweir #include <x_parse.hxx> 34cdf0e10cSrcweir #include "pe_file.hxx" 35cdf0e10cSrcweir 36cdf0e10cSrcweir const uintt C_nNO_TRY = uintt(-1); 37cdf0e10cSrcweir 38cdf0e10cSrcweir 39cdf0e10cSrcweir namespace cpp { 40cdf0e10cSrcweir 41cdf0e10cSrcweir 42cdf0e10cSrcweir CodeExplorer::CodeExplorer( ary::cpp::Gate & io_rAryGate ) 43cdf0e10cSrcweir : aGlobalParseContext(io_rAryGate), 44cdf0e10cSrcweir // aEnvironments, 45cdf0e10cSrcweir pPE_File(0), 46cdf0e10cSrcweir pGate(&io_rAryGate), 47cdf0e10cSrcweir dpCurToken(0) 48cdf0e10cSrcweir { 49cdf0e10cSrcweir pPE_File = new PE_File( aGlobalParseContext ); 50cdf0e10cSrcweir } 51cdf0e10cSrcweir 52cdf0e10cSrcweir CodeExplorer::~CodeExplorer() 53cdf0e10cSrcweir { 54cdf0e10cSrcweir } 55cdf0e10cSrcweir 56cdf0e10cSrcweir void 57cdf0e10cSrcweir CodeExplorer::StartNewFile() 58cdf0e10cSrcweir { 59cdf0e10cSrcweir csv::erase_container(aEnvironments); 60cdf0e10cSrcweir 61cdf0e10cSrcweir aEnvironments.push_back( pPE_File.MutablePtr() ); 62cdf0e10cSrcweir pPE_File->Enter(push); 63cdf0e10cSrcweir } 64cdf0e10cSrcweir 65cdf0e10cSrcweir void 66cdf0e10cSrcweir CodeExplorer::Process_Token( DYN cpp::Token & let_drToken ) 67cdf0e10cSrcweir { 68cdf0e10cSrcweir if (DEBUG_ShowTokens()) 69cdf0e10cSrcweir { 70cdf0e10cSrcweir Cout() << let_drToken.Text() << Endl(); 71cdf0e10cSrcweir } 72cdf0e10cSrcweir dpCurToken = &let_drToken; 73cdf0e10cSrcweir aGlobalParseContext.ResetResult(); 74cdf0e10cSrcweir 75cdf0e10cSrcweir do { 76cdf0e10cSrcweir CurToken().Trigger( CurEnv() ); 77cdf0e10cSrcweir AcknowledgeResult(); 78cdf0e10cSrcweir } while ( dpCurToken ); 79cdf0e10cSrcweir } 80cdf0e10cSrcweir 81cdf0e10cSrcweir void 82cdf0e10cSrcweir CodeExplorer::AcknowledgeResult() 83cdf0e10cSrcweir { 84cdf0e10cSrcweir if (CurResult().eDone == done) 85cdf0e10cSrcweir dpCurToken = 0; 86cdf0e10cSrcweir 87cdf0e10cSrcweir switch ( CurResult().eStackAction ) 88cdf0e10cSrcweir { 89cdf0e10cSrcweir case stay: 90cdf0e10cSrcweir break; 91cdf0e10cSrcweir case push: 92cdf0e10cSrcweir CurEnv().Leave(push); 93cdf0e10cSrcweir aEnvironments.push_back( &PushEnv() ); 94cdf0e10cSrcweir PushEnv().Enter(push); 95cdf0e10cSrcweir break; 96cdf0e10cSrcweir case pop_success: 97cdf0e10cSrcweir CurEnv().Leave(pop_success); 98cdf0e10cSrcweir aEnvironments.pop_back(); 99cdf0e10cSrcweir CurEnv().Enter(pop_success); 100cdf0e10cSrcweir break; 101cdf0e10cSrcweir case pop_failure: 102cdf0e10cSrcweir { 103cdf0e10cSrcweir Cpp_PE * pRecover = 0; 104cdf0e10cSrcweir do { 105cdf0e10cSrcweir CurEnv().Leave(pop_failure); 106cdf0e10cSrcweir aEnvironments.pop_back(); 107cdf0e10cSrcweir if ( aEnvironments.empty() ) 108cdf0e10cSrcweir break; 109cdf0e10cSrcweir pRecover = CurEnv().Handle_ChildFailure(); 110cdf0e10cSrcweir } while ( pRecover == 0 ); 111cdf0e10cSrcweir if ( pRecover != 0 ) 112cdf0e10cSrcweir { 113cdf0e10cSrcweir aEnvironments.push_back(pRecover); 114cdf0e10cSrcweir pRecover->Enter(push); 115cdf0e10cSrcweir } 116cdf0e10cSrcweir else 117cdf0e10cSrcweir { 118cdf0e10cSrcweir throw X_Parser( X_Parser::x_UnexpectedToken, CurToken().Text(), aGlobalParseContext.CurFileName(), aGlobalParseContext.LineCount() ); 119cdf0e10cSrcweir } 120cdf0e10cSrcweir } break; 121cdf0e10cSrcweir default: 122cdf0e10cSrcweir csv_assert(false); 123cdf0e10cSrcweir } // end switch(CurResult().eStackAction) 124cdf0e10cSrcweir } 125cdf0e10cSrcweir 126cdf0e10cSrcweir const Token & 127cdf0e10cSrcweir CodeExplorer::CurToken() const 128cdf0e10cSrcweir { 129cdf0e10cSrcweir csv_assert(dpCurToken); 130cdf0e10cSrcweir 131cdf0e10cSrcweir return *dpCurToken; 132cdf0e10cSrcweir } 133cdf0e10cSrcweir 134cdf0e10cSrcweir Cpp_PE & 135cdf0e10cSrcweir CodeExplorer::CurEnv() const 136cdf0e10cSrcweir { 137cdf0e10cSrcweir csv_assert(aEnvironments.size() > 0); 138cdf0e10cSrcweir csv_assert(aEnvironments.back() != 0); 139cdf0e10cSrcweir 140cdf0e10cSrcweir return *aEnvironments.back(); 141cdf0e10cSrcweir } 142cdf0e10cSrcweir 143cdf0e10cSrcweir Cpp_PE & 144cdf0e10cSrcweir CodeExplorer::PushEnv() const 145cdf0e10cSrcweir { 146cdf0e10cSrcweir TokenProcessing_Result & rCurResult = const_cast< TokenProcessing_Result& >(aGlobalParseContext.CurResult()); 147cdf0e10cSrcweir Cpp_PE * ret = dynamic_cast< Cpp_PE* >(rCurResult.pEnv2Push); 148cdf0e10cSrcweir csv_assert( ret != 0 ); 149cdf0e10cSrcweir return *ret; 150cdf0e10cSrcweir } 151cdf0e10cSrcweir 152cdf0e10cSrcweir 153cdf0e10cSrcweir 154cdf0e10cSrcweir } // namespace cpp 155cdf0e10cSrcweir 156