/************************************************************************* * * $RCSfile: pe_servi.cxx,v $ * * $Revision: 1.1.1.1 $ * * last change: $Author: np $ $Date: 2002-03-08 14:45:34 $ * * 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 namespace csi { namespace uidl { PE_Service::PE_Service() : eState(e_none), pData(0), bIsPreDeclaration(false), pCurService(0), pPE_Property(0), aCurParsed_Property(0), pPE_Type(0), aCurParsed_Type(0), bOptionalMember(false) { pPE_Property = new PE_Attribute(aCurParsed_Property, pCurService); pPE_Type = new PE_Type(aCurParsed_Type); } void PE_Service::EstablishContacts( UnoIDL_PE * io_pParentPE, ary::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) { pData->Data().sName = 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().Store_Service(CurNamespace().Id(), *pData); PassDocuAt(pCurService.Id()); 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: Delete_dyn(pData); 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 ( eState == e_std AND i_rToken.Id() == TokStereotype::ste_readonly ) { StartProperty(); } else if (i_rToken.Id() == TokStereotype::ste_optional) { bOptionalMember = true; SetResult(done, stay); } 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; pData = new Service; bIsPreDeclaration = false; pCurService = 0; aCurParsed_Property = 0; aCurParsed_Type = 0; bOptionalMember = false; } void PE_Service::TransferData() { if (NOT bIsPreDeclaration) { csv_assert(pData != 0); csv_assert(pCurService); } eState = e_none; } void PE_Service::ReceiveData() { switch (eState) { case in_property: pData->Data().aProperties.push_back(aCurParsed_Property.Id()); aCurParsed_Property = 0; eState = e_std; break; case in_ifc_type: if (bOptionalMember) { pPE_Type->SetOptional(); bOptionalMember = false; } pData->Data().aServedInterfaces.push_back( CommentedLink(aCurParsed_Type.Id(),pPE_Type->ReleaseDocu()) ); aCurParsed_Type = 0; eState = expect_ifc_separator; break; case in_service_type: if (bOptionalMember) pPE_Type->SetOptional(); pData->Data().aIncludedServices.push_back( CommentedLink(aCurParsed_Type.Id(),pPE_Type->ReleaseDocu()) ); aCurParsed_Type = 0; eState = expect_service_separator; break; default: csv_assert(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