Line data Source code
1 : /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
2 : /*
3 : * This file is part of the LibreOffice project.
4 : *
5 : * This Source Code Form is subject to the terms of the Mozilla Public
6 : * License, v. 2.0. If a copy of the MPL was not distributed with this
7 : * file, You can obtain one at http://mozilla.org/MPL/2.0/.
8 : *
9 : * This file incorporates work covered by the following license notice:
10 : *
11 : * Licensed to the Apache Software Foundation (ASF) under one or more
12 : * contributor license agreements. See the NOTICE file distributed
13 : * with this work for additional information regarding copyright
14 : * ownership. The ASF licenses this file to you under the Apache
15 : * License, Version 2.0 (the "License"); you may not use this file
16 : * except in compliance with the License. You may obtain a copy of
17 : * the License at http://www.apache.org/licenses/LICENSE-2.0 .
18 : */
19 :
20 : #include <precomp.h>
21 : #include <s2_luidl/pe_file2.hxx>
22 :
23 :
24 : // NOT FULLY DECLARED SERVICES
25 : #include <ary/idl/i_gate.hxx>
26 : #include <ary/idl/i_module.hxx>
27 : #include <ary/idl/ip_ce.hxx>
28 : #include <ary/doc/d_oldidldocu.hxx>
29 : #include <s2_luidl/distrib.hxx>
30 : #include <s2_luidl/pe_servi.hxx>
31 : #include <s2_luidl/pe_iface.hxx>
32 : #include <s2_luidl/pe_singl.hxx>
33 : #include <s2_luidl/pe_struc.hxx>
34 : #include <s2_luidl/pe_excp.hxx>
35 : #include <s2_luidl/pe_const.hxx>
36 : #include <s2_luidl/pe_enum2.hxx>
37 : #include <s2_luidl/pe_tydf2.hxx>
38 : #include <s2_luidl/tk_keyw.hxx>
39 : #include <s2_luidl/tk_ident.hxx>
40 : #include <s2_luidl/tk_punct.hxx>
41 :
42 :
43 :
44 :
45 : namespace csi
46 : {
47 : namespace uidl
48 : {
49 :
50 :
51 3 : PE_File::PE_File( TokenDistributor & i_rTokenAdmin,
52 : const ParserInfo & i_parseInfo )
53 : : pTokenAdmin(&i_rTokenAdmin),
54 3 : pPE_Service(new PE_Service),
55 3 : pPE_Singleton(new PE_Singleton),
56 3 : pPE_Interface(new PE_Interface),
57 3 : pPE_Struct(new PE_Struct),
58 3 : pPE_Exception(new PE_Exception),
59 3 : pPE_Constant(new PE_Constant),
60 3 : pPE_Enum(new PE_Enum),
61 3 : pPE_Typedef(new PE_Typedef),
62 : pCurNamespace(0),
63 : pParseInfo(&i_parseInfo),
64 : eState(e_none),
65 27 : nBracketCount_inDefMode(0)
66 : {
67 3 : }
68 :
69 : void
70 3 : PE_File::EstablishContacts( UnoIDL_PE * io_pParentPE,
71 : ary::Repository & io_rRepository,
72 : TokenProcessing_Result & o_rResult )
73 : {
74 3 : UnoIDL_PE::EstablishContacts(io_pParentPE,io_rRepository,o_rResult);
75 3 : pPE_Service->EstablishContacts(this,io_rRepository,o_rResult);
76 3 : pPE_Singleton->EstablishContacts(this,io_rRepository,o_rResult);
77 3 : pPE_Interface->EstablishContacts(this,io_rRepository,o_rResult);
78 3 : pPE_Struct->EstablishContacts(this,io_rRepository,o_rResult);
79 3 : pPE_Exception->EstablishContacts(this,io_rRepository,o_rResult);
80 3 : pPE_Constant->EstablishContacts(this,io_rRepository,o_rResult);
81 3 : pPE_Enum->EstablishContacts(this,io_rRepository,o_rResult);
82 3 : pPE_Typedef->EstablishContacts(this,io_rRepository,o_rResult);
83 :
84 3 : pCurNamespace = &Gate().Ces().GlobalNamespace();
85 3 : }
86 :
87 6 : PE_File::~PE_File()
88 : {
89 6 : }
90 :
91 : void
92 164918 : PE_File::ProcessToken( const Token & i_rToken )
93 : {
94 164918 : i_rToken.Trigger(*this);
95 164918 : }
96 :
97 : void
98 17717 : PE_File::Process_Identifier( const TokIdentifier & i_rToken )
99 : {
100 17717 : switch (eState)
101 : {
102 : case wait_for_module:
103 : {
104 : csv_assert(pCurNamespace != 0);
105 :
106 17717 : ary::idl::Module & rCe = Gate().Ces().CheckIn_Module(pCurNamespace->CeId(), i_rToken.Text());
107 17717 : pCurNamespace = &rCe;
108 :
109 : // Get docu out of normal:
110 17717 : SetDocu(pTokenAdmin->ReleaseLastParsedDocu());
111 17717 : PassDocuAt(rCe);
112 :
113 : csv_assert(pCurNamespace != 0);
114 :
115 17717 : SetResult(done, stay);
116 17717 : eState = wait_for_module_bracket;
117 17717 : } break;
118 : case on_default:
119 0 : SetResult(done, stay);
120 0 : break;
121 : default:
122 : csv_assert(false);
123 : }
124 17717 : }
125 :
126 : void
127 53135 : PE_File::Process_Punctuation( const TokPunctuation & i_rToken )
128 : {
129 53135 : switch (eState)
130 : {
131 : case e_std:
132 17709 : if (i_rToken.Id() == TokPunctuation::CurledBracketClose)
133 : {
134 : csv_assert(pCurNamespace != 0);
135 :
136 17709 : pCurNamespace = &Gate().Ces().Find_Module(pCurNamespace->Owner());
137 :
138 17709 : SetResult(done, stay);
139 17709 : eState = wait_for_module_semicolon;
140 : }
141 : else
142 : {
143 : csv_assert(false);
144 : }
145 17709 : break;
146 : case wait_for_module_bracket:
147 17717 : if (i_rToken.Id() == TokPunctuation::CurledBracketOpen)
148 : {
149 17717 : SetResult(done, stay);
150 17717 : eState = e_std;
151 : }
152 : else
153 : {
154 : csv_assert(false);
155 : }
156 17717 : break;
157 : case wait_for_module_semicolon:
158 17709 : if (i_rToken.Id() == TokPunctuation::Semicolon)
159 : {
160 17709 : SetResult(done, stay);
161 17709 : eState = e_std;
162 : }
163 : else
164 : {
165 : csv_assert(false);
166 : }
167 17709 : break;
168 : case on_default:
169 0 : if (i_rToken.Id() == TokPunctuation::CurledBracketClose)
170 : {
171 0 : nBracketCount_inDefMode--;
172 : }
173 0 : else if (i_rToken.Id() == TokPunctuation::CurledBracketOpen)
174 : {
175 0 : nBracketCount_inDefMode++;
176 : }
177 0 : else if (i_rToken.Id() == TokPunctuation::Semicolon)
178 : {
179 0 : if (nBracketCount_inDefMode <= 0)
180 : {
181 0 : eState = e_std;
182 : }
183 : }
184 0 : SetResult(done, stay);
185 0 : break;
186 : default:
187 : csv_assert(false);
188 : }
189 53135 : }
190 :
191 : void
192 22440 : PE_File::Process_MetaType( const TokMetaType & i_rToken )
193 : {
194 22440 : switch (i_rToken.Id())
195 : {
196 : case TokMetaType::mt_service:
197 1296 : eState = in_sub_pe;
198 1296 : SetResult( not_done, push_sure, pPE_Service.Ptr());
199 1296 : break;
200 : case TokMetaType::mt_singleton:
201 15 : eState = in_sub_pe;
202 15 : SetResult( not_done, push_sure, pPE_Singleton.Ptr());
203 15 : break;
204 : case TokMetaType::mt_uik:
205 0 : Cerr() << "Syntax error: [uik ....] is obsolete now." << Endl();
206 0 : SetResult( not_done, pop_failure);
207 0 : break;
208 : case TokMetaType::mt_interface:
209 2232 : eState = in_sub_pe;
210 2232 : SetResult( not_done, push_sure, pPE_Interface.Ptr());
211 2232 : break;
212 : case TokMetaType::mt_module:
213 17717 : eState = wait_for_module;
214 17717 : SetResult( done, stay );
215 17717 : break;
216 : case TokMetaType::mt_struct:
217 382 : eState = in_sub_pe;
218 382 : SetResult( done, push_sure, pPE_Struct.Ptr());
219 382 : break;
220 : case TokMetaType::mt_exception:
221 243 : eState = in_sub_pe;
222 243 : SetResult( done, push_sure, pPE_Exception.Ptr());
223 243 : break;
224 : case TokMetaType::mt_constants:
225 347 : eState = in_sub_pe;
226 347 : SetResult( done, push_sure, pPE_Constant.Ptr());
227 347 : break;
228 : case TokMetaType::mt_enum:
229 190 : eState = in_sub_pe;
230 190 : SetResult( done, push_sure, pPE_Enum.Ptr());
231 190 : break;
232 : case TokMetaType::mt_typedef:
233 18 : eState = in_sub_pe;
234 18 : SetResult( done, push_sure, pPE_Typedef.Ptr());
235 18 : break;
236 :
237 : default:
238 0 : Process_Default();
239 : } // end switch
240 22440 : }
241 :
242 : void
243 3018 : PE_File::Process_Stereotype( const TokStereotype & i_rToken )
244 : {
245 3018 : if (i_rToken.Id() == TokStereotype::ste_published)
246 : {
247 3018 : pTokenAdmin->Set_PublishedOn();
248 :
249 3018 : SetResult(done, stay);
250 : }
251 : else
252 : {
253 0 : Process_Default();
254 : }
255 3018 : }
256 :
257 : void
258 0 : PE_File::Process_Default()
259 : {
260 0 : if (eState != on_default)
261 : {
262 0 : eState = on_default;
263 0 : nBracketCount_inDefMode = 0;
264 : }
265 0 : SetResult(done, stay);
266 0 : }
267 :
268 : const ary::idl::Module &
269 31620 : PE_File::CurNamespace() const
270 : {
271 : csv_assert(pCurNamespace);
272 31620 : return *pCurNamespace;
273 : }
274 :
275 : const ParserInfo &
276 5618 : PE_File::ParseInfo() const
277 : {
278 : csv_assert(pParseInfo);
279 5618 : return *pParseInfo;
280 : }
281 :
282 : void
283 0 : PE_File::InitData()
284 : {
285 0 : eState = e_std;
286 0 : }
287 :
288 : void
289 0 : PE_File::TransferData()
290 : {
291 0 : eState = e_none;
292 0 : }
293 :
294 : void
295 4721 : PE_File::ReceiveData()
296 : {
297 4721 : eState = e_std;
298 4721 : }
299 :
300 :
301 : UnoIDL_PE &
302 68608 : PE_File::MyPE()
303 : {
304 68608 : return *this;
305 : }
306 :
307 : } // namespace uidl
308 3 : } // namespace csi
309 :
310 :
311 : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|
