1 // Copyright (C) 2007-2020 CEA/DEN, EDF R&D, OPEN CASCADE
3 // Copyright (C) 2003-2007 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
6 // This library is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU Lesser General Public
8 // License as published by the Free Software Foundation; either
9 // version 2.1 of the License, or (at your option) any later version.
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // Lesser General Public License for more details.
16 // You should have received a copy of the GNU Lesser General Public
17 // License along with this library; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
23 // SALOME SALOMEDS : data structure of SALOME and sources of Salome data server
24 // File : SALOMEDS.cxx
25 // Author : Sergey ANIKIN
29 #include "SALOMEDS.hxx"
30 #include "SALOMEDS_Study.hxx"
31 #include "SALOMEDS_Study_i.hxx"
32 #include "SALOMEDS_StudyBuilder.hxx"
33 #include "SALOMEDS_SObject.hxx"
34 #include "SALOMEDS_SComponent.hxx"
35 #include "SALOMEDSClient.hxx"
36 #include "SALOMEDSClient_IParameters.hxx"
37 #include "SALOMEDS_IParameters.hxx"
38 #include "SALOME_Fake_NamingService.hxx"
40 #include "SALOMEDS_Defines.hxx"
42 #include <utilities.h>
45 #include <SALOMEconfig.h>
46 #include CORBA_SERVER_HEADER(SALOMEDS)
47 #include <SALOME_NamingService.hxx>
49 // PAL8065: san -- Global recursive mutex for SALOMEDS methods
50 Utils_Mutex SALOMEDS::Locker::MutexDS;
52 // PAL8065: san -- Global SALOMEDS locker
53 SALOMEDS::Locker::Locker()
54 : Utils_Locker( &MutexDS )
57 SALOMEDS::Locker::~Locker()
62 Locker::MutexDS.lock();
65 void SALOMEDS::unlock()
67 SALOMEDS::Locker::MutexDS.unlock();
70 // srn: Added new library methods that create basic SALOMEDS objects (Study, SComponent, SObject)
72 //=============================================================================
74 * C factory, accessible with dlsym, after dlopen
76 //=============================================================================
82 SALOMEDSClient_Study* StudyFactory(SALOMEDS::Study_ptr theStudy)
84 if(CORBA::is_nil(theStudy)) return NULL;
85 return new SALOMEDS_Study(theStudy);
89 SALOMEDSClient_SObject* SObjectFactory(SALOMEDS::SObject_ptr theSObject)
91 if(CORBA::is_nil(theSObject)) return NULL;
92 return new SALOMEDS_SObject(theSObject);
96 SALOMEDSClient_SComponent* SComponentFactory(SALOMEDS::SComponent_ptr theSComponent)
98 if(CORBA::is_nil(theSComponent)) return NULL;
99 return new SALOMEDS_SComponent(theSComponent);
103 SALOMEDSClient_StudyBuilder* BuilderFactory(SALOMEDS::StudyBuilder_ptr theBuilder)
105 if(CORBA::is_nil(theBuilder)) return NULL;
106 return new SALOMEDS_StudyBuilder(theBuilder);
109 void CreateStudyNSAbstract(CORBA::ORB_ptr orb, PortableServer::POA_ptr root_poa, SALOME_NamingService_Abstract& namingService)
111 CORBA::Object_var obj = namingService.Resolve( "/Study" );
112 SALOMEDS::Study_var aStudy = SALOMEDS::Study::_narrow( obj );
113 if( CORBA::is_nil(aStudy) ) {
114 PortableServer::POAManager_var pman = root_poa->the_POAManager();
115 CORBA::PolicyList policies;
117 //PortableServer::ThreadPolicy_var threadPol(root_poa->create_thread_policy(PortableServer::SINGLE_THREAD_MODEL));
118 PortableServer::ThreadPolicy_var threadPol(root_poa->create_thread_policy(PortableServer::ORB_CTRL_MODEL));
119 PortableServer::ImplicitActivationPolicy_var implicitPol(root_poa->create_implicit_activation_policy(PortableServer::IMPLICIT_ACTIVATION));
120 policies[0] = PortableServer::ThreadPolicy::_duplicate(threadPol);
121 policies[1] = PortableServer::ImplicitActivationPolicy::_duplicate(implicitPol);
122 PortableServer::POA_var poa = root_poa->create_POA("KERNELStudySingleThreadPOA",pman,policies);
123 MESSAGE("CreateStudy: KERNELStudySingleThreadPOA: "<< poa);
124 threadPol->destroy();
126 SALOMEDS_Study_i::SetThePOA(poa);
127 SALOMEDS_Study_i* aStudy_i = new SALOMEDS_Study_i(orb,&namingService);
129 // Activate the objects. This tells the POA that the objects are ready to accept requests.
130 PortableServer::ObjectId_var aStudy_iid = root_poa->activate_object(aStudy_i);
131 aStudy = aStudy_i->_this();
132 KERNEL::setStudyServantSA(aStudy,poa);
133 namingService.Register(aStudy, "/Study");
134 aStudy_i->GetImpl()->GetDocument()->SetModified(false);
135 aStudy_i->_remove_ref();
140 void CreateStudy(CORBA::ORB_ptr orb, PortableServer::POA_ptr root_poa)
142 SALOME_NamingService namingService(orb);
143 CreateStudyNSAbstract(orb,root_poa,namingService);
147 void CreateStudyWithoutNS(CORBA::ORB_ptr orb, PortableServer::POA_ptr root_poa)
149 SALOME_Fake_NamingService namingService(orb);
150 CreateStudyNSAbstract(orb,root_poa,namingService);
154 SALOMEDSClient_IParameters* GetIParameters(const _PTR(AttributeParameter)& ap)
156 return new SALOMEDS_IParameters(ap);
160 SALOMEDS::SObject_ptr ConvertSObject(const _PTR(SObject)& theSObject)
162 SALOMEDS_SObject* so = _CAST(SObject, theSObject);
163 if ( !theSObject || !so )
164 return SALOMEDS::SObject::_nil();
165 return so->GetSObject();
169 SALOMEDS::StudyBuilder_ptr ConvertBuilder(const _PTR(StudyBuilder)& theBuilder)
171 SALOMEDS_StudyBuilder* builder = _CAST(StudyBuilder, theBuilder);
172 if ( !theBuilder || !builder )
173 return SALOMEDS::StudyBuilder::_nil();
174 return builder->GetBuilder();