Salome HOME
a1819c5e1be469223061c286349c96e472d74352
[modules/smesh.git] / src / SMESH_I / SMESH_Component_Generator.cxx
1 // Copyright (C) 2021  CEA/DEN, EDF R&D, OPEN CASCADE
2 //
3 // This library is free software; you can redistribute it and/or
4 // modify it under the terms of the GNU Lesser General Public
5 // License as published by the Free Software Foundation; either
6 // version 2.1 of the License, or (at your option) any later version.
7 //
8 // This library is distributed in the hope that it will be useful,
9 // but WITHOUT ANY WARRANTY; without even the implied warranty of
10 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11 // Lesser General Public License for more details.
12 //
13 // You should have received a copy of the GNU Lesser General Public
14 // License along with this library; if not, write to the Free Software
15 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
16 //
17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
18 //
19
20 #include "SMESH_Component_Generator.hxx"
21
22 #include "SMESH_Gen_No_Session_i.hxx"
23 #include "SALOME_Container_i.hxx"
24 #include "SALOME_KernelServices.hxx"
25
26 #include <cstring>
27
28 static Engines::EngineComponent_var _unique_compo;
29
30 Engines::EngineComponent_var RetrieveSMESHInstance()
31 {
32   if (CORBA::is_nil(_unique_compo))
33   {
34     CORBA::ORB_var orb;
35     {
36       int argc(0);
37       orb = CORBA::ORB_init(argc, nullptr);
38     }
39     CORBA::Object_var obj = orb->resolve_initial_references("RootPOA");
40     PortableServer::POA_var poa = PortableServer::POA::_narrow(obj);
41     PortableServer::POAManager_var pman = poa->the_POAManager();
42     CORBA::PolicyList policies;
43     policies.length(0);
44     Engines_Container_i *cont(KERNEL::getContainerSA());
45     PortableServer::ObjectId *conId(cont->getCORBAId());
46     //
47     pman->activate();
48     //
49     SMESH_Gen_No_Session_i *servant = new SMESH_Gen_No_Session_i(orb, poa, conId, "SMESH_inst_2", "SMESH");
50     PortableServer::ObjectId *zeId = servant->getId();
51     CORBA::Object_var zeRef = poa->id_to_reference(*zeId);
52     _unique_compo = Engines::EngineComponent::_narrow(zeRef);
53   }
54   return _unique_compo;
55 }
56
57 Engines::EngineComponent_var GetSMESHInstanceHasThis()
58 {
59   return _unique_compo;
60 }