/************************************************************************* * * $RCSfile: pe_servi.cxx,v $ * * $Revision: 1.3 $ * * last change: $Author: np $ $Date: 2002-11-01 17:15:39 $ * * The Contents of this file are made available subject to the terms of * either of the following licenses * * - GNU Lesser General Public License Version 2.1 * - Sun Industry Standards Source License Version 1.1 * * Sun Microsystems Inc., October, 2000 * * GNU Lesser General Public License Version 2.1 * ============================================= * Copyright 2000 by Sun Microsystems, Inc. * 901 San Antonio Road, Palo Alto, CA 94303, USA * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License version 2.1, as published by the Free Software Foundation. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, * MA 02111-1307 USA * * * Sun Industry Standards Source License Version 1.1 * ================================================= * The contents of this file are subject to the Sun Industry Standards * Source License Version 1.1 (the "License"); You may not use this file * except in compliance with the License. You may obtain a copy of the * License at http://www.openoffice.org/license.html. * * Software provided under this License is provided on an "AS IS" basis, * WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, * WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS, * MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING. * See the License for the specific provisions governing your rights and * obligations concerning the Software. * * The Initial Developer of the Original Code is: Sun Microsystems, Inc. * * Copyright: 2000 by Sun Microsystems, Inc. * * All Rights Reserved. * * Contributor(s): _______________________________________ * * ************************************************************************/ #include #include // NOT FULLY DEFINED SERVICES #include #include #include #include #include #include #include #include #include namespace csi { namespace uidl { PE_Service::PE_Service() : eState(e_none), sData_Name(), bIsPreDeclaration(false), pCurService(0), nCurService(0), pPE_Property(0), nCurParsed_Property(0), pPE_Type(0), nCurParsed_Type(0), bOptionalMember(false) { pPE_Property = new PE_Attribute(nCurService, PE_Attribute::parse_property); pPE_Type = new PE_Type(nCurParsed_Type); } void PE_Service::EstablishContacts( UnoIDL_PE * io_pParentPE, ary::n22::Repository & io_rRepository, TokenProcessing_Result & o_rResult ) { UnoIDL_PE::EstablishContacts(io_pParentPE,io_rRepository,o_rResult); pPE_Property->EstablishContacts(this,io_rRepository,o_rResult); pPE_Type->EstablishContacts(this,io_rRepository,o_rResult); } PE_Service::~PE_Service() { } void PE_Service::ProcessToken( const Token & i_rToken ) { i_rToken.Trigger(*this); } void PE_Service::Process_MetaType( const TokMetaType & i_rToken ) { switch ( i_rToken.Id() ) { case TokMetaType::mt_service: if (eState == need_name) SetResult(done, stay ); else if (eState == e_std) { SetResult(done, push_sure, pPE_Type.Ptr()); eState = in_service_type; } else On_Default(); break; case TokMetaType::mt_interface: if (eState == e_std) { SetResult(done, push_sure, pPE_Type.Ptr()); eState = in_ifc_type; } else On_Default(); break; case TokMetaType::mt_property: if (eState == e_std) { StartProperty(); } else On_Default(); break; } // end switch } void PE_Service::Process_Identifier( const TokIdentifier & i_rToken ) { if (eState == need_name) { sData_Name = i_rToken.Text(); SetResult(done, stay); eState = need_curlbr_open; } else On_Default(); } void PE_Service::Process_Punctuation( const TokPunctuation & i_rToken ) { switch (i_rToken.Id()) { case TokPunctuation::CurledBracketOpen: if (eState == need_curlbr_open) { pCurService = &Gate().Ces().Store_Service( CurNamespace().CeId(), sData_Name ); nCurService = pCurService->CeId(); PassDocuAt(*pCurService); SetResult(done, stay); eState = e_std; } else On_Default(); break; case TokPunctuation::CurledBracketClose: if (eState == e_std) { SetResult(done, stay); eState = need_finish; } else On_Default(); break; case TokPunctuation::Comma: if (eState == expect_ifc_separator) { SetResult(done, push_sure, pPE_Type.Ptr()); eState = in_ifc_type; } else if (eState == expect_service_separator) { SetResult(done, push_sure, pPE_Type.Ptr()); eState = in_service_type; } else if (eState == e_std) { SetResult(done, stay); } else On_Default(); break; case TokPunctuation::Semicolon: switch (eState) { case need_curlbr_open: sData_Name.clear(); bIsPreDeclaration = true; SetResult(done, pop_success); eState = e_none; break; case expect_ifc_separator: case expect_service_separator: SetResult(done, stay); eState = e_std; break; case need_finish: SetResult(done, pop_success); eState = e_none; break; case at_ignore: SetResult(done, stay); eState = e_std; break; default: On_Default(); } // end switch break; default: On_Default(); } // end switch } void PE_Service::Process_Stereotype( const TokStereotype & i_rToken ) { if (i_rToken.Id() == TokStereotype::ste_optional) { bOptionalMember = true; SetResult(done, stay); } else if ( eState == e_std ) { StartProperty(); } else On_Default(); } void PE_Service::Process_Needs() { SetResult(done,stay); eState = at_ignore; } void PE_Service::Process_Observes() { SetResult(done,stay); eState = at_ignore; } void PE_Service::Process_Default() { On_Default(); } void PE_Service::On_Default() { if (eState == at_ignore) SetResult(done, stay); else SetResult(not_done, pop_failure); } void PE_Service::InitData() { eState = need_name; sData_Name.clear(); bIsPreDeclaration = false; pCurService = 0; nCurService = 0; nCurParsed_Property = 0; nCurParsed_Type = 0; bOptionalMember = false; } void PE_Service::TransferData() { if (NOT bIsPreDeclaration) { csv_assert(sData_Name.size() > 0); csv_assert(pCurService != 0); } eState = e_none; } void PE_Service::ReceiveData() { switch (eState) { case in_property: eState = e_std; break; case in_ifc_type: if (bOptionalMember) { pPE_Type->SetOptional(); } pCurService->AddRef_SupportedInterface( nCurParsed_Type, pPE_Type->ReleaseDocu()); nCurParsed_Type = 0; eState = expect_ifc_separator; break; case in_service_type: if (bOptionalMember) { pPE_Type->SetOptional(); } pCurService->AddRef_IncludedService( nCurParsed_Type, pPE_Type->ReleaseDocu()); nCurParsed_Type = 0; eState = expect_service_separator; break; default: csv_assert(false); } bOptionalMember = false; } UnoIDL_PE & PE_Service::MyPE() { return *this; } void PE_Service::StartProperty() { SetResult(not_done, push_sure, pPE_Property.Ptr()); eState = in_property; if (bOptionalMember) { pPE_Property->PresetOptional(); bOptionalMember = false; } } } // namespace uidl } // namespace csi