1 // Copyright (C) 2007-2016 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
22 // File : SALOME_ParallelContainer_i.cxx
23 // Author : André RIBES, EDF
25 #include "SALOME_ParallelContainer_i.hxx"
26 #include "SALOME_Component_i.hxx"
27 #include "SALOME_FileRef_i.hxx"
28 #include "SALOME_FileTransfer_i.hxx"
29 #include "SALOME_NamingService.hxx"
31 #include "utilities.h"
32 #include "Basics_Utils.hxx"
47 #include <paco_omni.h>
50 #include "Container_init_python.hxx"
53 bool _Sleeping = false ;
55 extern "C" {void ActSigIntHandler() ; }
57 extern "C" {void SigIntHandler(int, siginfo_t *, void *) ; }
59 extern "C" {void SigIntHandler( int ) ; }
62 /*! \class Engines_Parallel_Container_i
63 * \brief C++ implementation of Engines::Container interface for parallel
64 * container implemented with PaCO++
67 //=============================================================================
71 //=============================================================================
73 Engines_Parallel_Container_i::Engines_Parallel_Container_i (CORBA::ORB_ptr orb,
76 PortableServer::POA_ptr poa,
77 std::string containerName,
78 bool isServantAloneInProcess) :
79 InterfaceParallel_impl(orb,ior,rank),
80 Engines::PACO_Container_serv(orb,ior,rank),
81 Engines::PACO_Container_base_serv(orb,ior,rank),
82 Engines::Container_serv(orb,ior,rank),
83 Engines::Container_base_serv(orb,ior,rank),
84 _numInstance(0),_isServantAloneInProcess(isServantAloneInProcess)
88 _hostname = Kernel_Utils::GetHostname();
89 _orb = CORBA::ORB::_duplicate(orb);
90 _poa = PortableServer::POA::_duplicate(poa);
92 // Add CORBA object to the poa
93 _id = _poa->activate_object(this);
95 CORBA::Object_var container_node = _poa->id_to_reference(*_id);
97 // Adding this servant to SALOME
98 _NS = new SALOME_NamingService();
100 _containerName = _NS->BuildContainerNameForNS(containerName.c_str(), _hostname.c_str());
102 // Ajout du numero de noeud
103 char node_number[12];
104 sprintf(node_number, "%d", getMyRank());
105 _containerName = _containerName + node_number;
107 // Init Python container part
108 CORBA::String_var sior = _orb->object_to_string(container_node);
109 std::string myCommand="pyCont = SALOME_Container.SALOME_Container_i('";
110 myCommand += _containerName + "','";
113 Py_ACQUIRE_NEW_THREAD;
114 PyRun_SimpleString("import SALOME_Container\n");
115 PyRun_SimpleString((char*)myCommand.c_str());
116 Py_RELEASE_NEW_THREAD;
118 // Init FileTransfer service
119 fileTransfer_i* aFileTransfer = new fileTransfer_i();
120 _fileTransfer = aFileTransfer->_this();
121 aFileTransfer->_remove_ref();
123 // Some signal handlers
127 //=============================================================================
131 //=============================================================================
133 Engines_Parallel_Container_i::~Engines_Parallel_Container_i()
135 MESSAGE("Container_i::~Container_i()");
142 //=============================================================================
143 //! Get container name
145 * CORBA attribute: Container name (see constructor)
147 //=============================================================================
149 char* Engines_Parallel_Container_i::name()
151 return CORBA::string_dup(_containerName.c_str()) ;
154 //=============================================================================
155 //! Get container working directory
157 * CORBA attribute: Container working directory
159 //=============================================================================
162 Engines_Parallel_Container_i::workingdir()
166 return CORBA::string_dup(wd) ;
169 //=============================================================================
170 //! Get container log file name
172 * CORBA attribute: Container log file name
174 //=============================================================================
177 Engines_Parallel_Container_i::logfilename()
179 return CORBA::string_dup(_logfilename.c_str()) ;
182 //! Set container log file name
184 Engines_Parallel_Container_i::logfilename(const char* name)
189 //=============================================================================
190 //! Get container host name
192 * CORBA method: Get the hostName of the Container (without domain extensions)
194 //=============================================================================
196 char* Engines_Parallel_Container_i::getHostName()
198 MESSAGE("Warning: getHostName of a parallel container returns the hostname of the first servant node");
199 return CORBA::string_dup(_hostname.c_str()) ;
202 //=============================================================================
203 //! Get container PID
205 * CORBA method: Get the PID (process identification) of the Container
207 //=============================================================================
209 CORBA::Long Engines_Parallel_Container_i::getPID()
211 MESSAGE("Warning: getPID of a parallel container returns the PID of the first servant node");
215 //=============================================================================
216 //! Ping the servant to check it is still alive
218 * CORBA method: check if servant is still alive
220 //=============================================================================
222 void Engines_Parallel_Container_i::ping()
224 MESSAGE("Engines_Parallel_Container_i::ping() my pid is "<< _pid);
227 //=============================================================================
228 //! Shutdown the container
230 * CORBA method, oneway: Server shutdown.
231 * - Container name removed from naming service,
232 * - servant deactivation,
233 * - orb shutdown if no other servants in the process
235 //=============================================================================
237 void Engines_Parallel_Container_i::Shutdown()
239 MESSAGE("Engines_Parallel_Container_i::Shutdown()");
241 /* For each seq component contained in this container
242 * tell it to self-destroy
244 std::map<std::string, Engines::EngineComponent_var>::iterator itm;
245 for (itm = _listInstances_map.begin(); itm != _listInstances_map.end(); itm++)
249 itm->second->destroy();
251 catch(const CORBA::Exception& e)
253 // ignore this entry and continue
257 // ignore this entry and continue
261 // Destroy each parallel component node...
262 std::map<std::string, PortableServer::ObjectId *>::iterator i;
263 for (i = _par_obj_inst_map.begin(); i != _par_obj_inst_map.end(); i++)
264 _poa->deactivate_object(*(i->second));
266 _NS->Destroy_FullDirectory(_containerName.c_str());
267 _NS->Destroy_Name(_containerName.c_str());
269 if(_isServantAloneInProcess)
271 MESSAGE("Effective Shutdown of container Begins...");
272 if(!CORBA::is_nil(_orb))
278 //=============================================================================
279 //! load a new component class
281 * CORBA method: load a new component class (Python or C++ implementation)
282 * \param componentName like COMPONENT
283 * try to make a Python import of COMPONENT,
284 * then a lib open of libCOMPONENTEngine.so
285 * \return true if dlopen successfull or already done, false otherwise
287 //=============================================================================
290 Engines_Parallel_Container_i::load_component_Library(const char* componentName, CORBA::String_out reason)
292 reason=CORBA::string_dup("");
294 MESSAGE("Begin of load_component_Library : " << componentName)
296 std::string aCompName = componentName;
299 std::string impl_name = string ("lib") + aCompName + string("Engine.dylib");
301 std::string impl_name = string ("lib") + aCompName + string("Engine.so");
304 std::string impl_name = aCompName + string("Engine.dll");
307 _numInstanceMutex.lock(); // lock to be alone
309 // Check if already loaded or imported in the container
310 if (_toRemove_map.count(impl_name) != 0) _toRemove_map.erase(impl_name);
311 if (_library_map.count(impl_name) != 0)
313 MESSAGE("Library " << impl_name << " already loaded");
316 if (_library_map.count(aCompName) != 0)
318 MESSAGE("Python component already imported");
322 // --- try dlopen C++ component
325 MESSAGE("Try to load C++ component");
328 handle = dlopen( impl_name.c_str() , RTLD_LAZY | RTLD_GLOBAL ) ;
330 handle = dlopen( impl_name.c_str() , 0 ) ;
334 _library_map[impl_name] = handle;
335 MESSAGE("Library " << impl_name << " loaded");
340 std::cerr << "Can't load shared library : " << impl_name << std::endl;
341 std::cerr << "error of dlopen: " << dlerror() << std::endl;
345 // --- try import Python component
348 MESSAGE("Try to import Python component "<<componentName);
349 Py_ACQUIRE_NEW_THREAD;
350 PyObject *mainmod = PyImport_AddModule("__main__");
351 PyObject *globals = PyModule_GetDict(mainmod);
352 PyObject *pyCont = PyDict_GetItemString(globals, "pyCont");
353 PyObject *result = PyObject_CallMethod(pyCont,
354 (char*)"import_component",
355 (char*)"s",componentName);
356 std::string ret_p= PyUnicode_AsUTF8(result);
358 Py_RELEASE_NEW_THREAD;
360 if (ret_p=="") // import possible: Python component
362 _library_map[aCompName] = (void *)pyCont; // any non O value OK
363 MESSAGE("import Python: " << aCompName <<" OK");
368 std::cerr << "Error in importing Python component : " << aCompName << std::endl;
372 _numInstanceMutex.unlock();
376 //=============================================================================
377 //! Create a new component instance
379 * CORBA method: Creates a new servant instance of a component.
380 * The servant registers itself to naming service and Registry.
381 * \param genericRegisterName Name of the component instance to register
382 * in Registry & Name Service (without _inst_n suffix)
383 * \param studyId 0 for multiStudy instance,
384 * study Id (>0) otherwise
385 * \return a loaded component
387 //=============================================================================
388 Engines::EngineComponent_ptr
389 Engines_Parallel_Container_i::create_component_instance(const char*genericRegisterName,
392 Engines::FieldsDict_var env = new Engines::FieldsDict;
394 Engines::EngineComponent_ptr compo = create_component_instance_env(genericRegisterName,studyId,env, reason);
395 CORBA::string_free(reason);
399 //=============================================================================
400 //! Create a new component instance
402 * CORBA method: Creates a new servant instance of a component.
403 * The servant registers itself to naming service and Registry.
404 * \param genericRegisterName Name of the component instance to register
405 * in Registry & Name Service (without _inst_n suffix)
406 * \param studyId 0 for multiStudy instance,
407 * study Id (>0) otherwise
408 * \param env dict of environment variables
409 * \return a loaded component
411 //=============================================================================
413 Engines::EngineComponent_ptr
414 Engines_Parallel_Container_i::create_component_instance_env(const char*genericRegisterName,
416 const Engines::FieldsDict& env,
417 CORBA::String_out reason)
419 MESSAGE("Begin of create_component_instance in node : " << getMyRank());
420 reason=CORBA::string_dup("");
424 INFOS("studyId must be > 0 for mono study instance, =0 for multiStudy");
425 return Engines::EngineComponent::_nil() ;
428 std::string aCompName = genericRegisterName;
431 std::string impl_name = string ("lib") + aCompName + string("Engine.dylib");
433 std::string impl_name = string ("lib") + aCompName +string("Engine.so");
436 std::string impl_name = aCompName +string("Engine.dll");
439 _numInstanceMutex.lock();
442 // Test if the component lib is loaded
443 std::string type_of_lib("Not Loaded");
444 void* handle = _library_map[impl_name];
447 if (_library_map.count(aCompName) != 0 and !handle)
448 type_of_lib = "python";
450 if (type_of_lib == "Not Loaded")
452 std::cerr << "Component library is not loaded or imported ! lib was : " << aCompName << std::endl;
453 _numInstanceMutex.unlock();
454 return Engines::EngineComponent::_nil();
457 Engines::EngineComponent_var iobject = Engines::EngineComponent::_nil();
458 if (type_of_lib == "cpp")
459 iobject = createCPPInstance(aCompName, handle, studyId);
461 iobject = createPythonInstance(aCompName, studyId);
463 _numInstanceMutex.unlock();
464 return iobject._retn();
467 //=============================================================================
468 //! Find an existing (in the container) component instance
470 * CORBA method: Finds a servant instance of a component
471 * \param registeredName Name of the component in Registry or Name Service,
472 * without instance suffix number
473 * \param studyId 0 if instance is not associated to a study,
474 * >0 otherwise (== study id)
475 * \return the first instance found with same studyId
477 //=============================================================================
479 Engines::EngineComponent_ptr Engines_Parallel_Container_i::find_component_instance( const char* registeredName,
482 Engines::EngineComponent_var anEngine = Engines::EngineComponent::_nil();
483 std::map<std::string,Engines::EngineComponent_var>::iterator itm =_listInstances_map.begin();
484 while (itm != _listInstances_map.end())
486 std::string instance = (*itm).first;
488 if (instance.find(registeredName) == 0)
490 anEngine = (*itm).second;
491 if (studyId == anEngine->getStudyId())
493 return anEngine._retn();
498 return anEngine._retn();
501 char* Engines_Parallel_Container_i::create_python_service_instance(const char* CompName,
502 CORBA::String_out reason)
505 reason=CORBA::string_dup("");
506 return CORBA::string_dup("");
509 //=============================================================================
510 //! Find or create a new component instance
512 * CORBA method: find or create an instance of the component (servant),
513 * load a new component class (dynamic library) if required,
514 * ---- FOR COMPATIBILITY WITH 2.2 ----
515 * ---- USE ONLY FOR MULTISTUDY INSTANCES ! --------
516 * The servant registers itself to naming service and Registry.
517 * \param genericRegisterName Name of the component to register
518 * in Registry & Name Service
519 * \param componentName Name of the constructed library of the component
520 * \return a loaded component
522 //=============================================================================
524 Engines::EngineComponent_ptr Engines_Parallel_Container_i::load_impl( const char* genericRegisterName,
525 const char* componentName )
527 Engines::EngineComponent_var iobject = Engines::EngineComponent::_nil();
529 if (load_component_Library(genericRegisterName,reason))
530 iobject = find_or_create_instance(genericRegisterName);
531 CORBA::string_free(reason);
532 return iobject._retn();
536 //=============================================================================
537 //! Remove the component instance from container
539 * CORBA method: Stops the component servant, and deletes all related objects
540 * \param component_i Component to be removed
542 //=============================================================================
544 void Engines_Parallel_Container_i::remove_impl(Engines::EngineComponent_ptr component_i)
546 ASSERT(!CORBA::is_nil(component_i));
547 std::string instanceName = component_i->instanceName();
548 _numInstanceMutex.lock() ; // lock to be alone (stl container write)
549 // Test if the component is in this container
550 std::map<std::string, Engines::EngineComponent_var>::iterator itm;
551 itm = _listInstances_map.find(instanceName);
552 if (itm != _listInstances_map.end())
554 MESSAGE("Unloading component " << instanceName);
555 _listInstances_map.erase(instanceName);
556 component_i->destroy() ;
557 _NS->Destroy_Name(instanceName.c_str());
560 std::cerr << "WARNING !!!! component instance was not in this container !!!" << std::endl;
561 _numInstanceMutex.unlock() ;
564 //=============================================================================
565 //! Unload component libraries from the container
567 * CORBA method: Discharges unused libraries from the container.
569 //=============================================================================
571 void Engines_Parallel_Container_i::finalize_removal()
573 MESSAGE("Finalize removal : dlclose");
574 MESSAGE("WARNING FINALIZE DOES CURRENTLY NOTHING !!!");
576 // (see decInstanceCnt, load_component_Library)
577 //std::map<std::string, void *>::iterator ith;
578 //for (ith = _toRemove_map.begin(); ith != _toRemove_map.end(); ith++)
580 // void *handle = (*ith).second;
581 // std::string impl_name= (*ith).first;
585 // SCRUTE(impl_name);
586 // dlclose(handle); // SALOME unstable after ...
587 // _library_map.erase(impl_name);
591 _numInstanceMutex.lock(); // lock to be alone
592 _toRemove_map.clear();
593 _numInstanceMutex.unlock();
596 //=============================================================================
597 //! Kill the container
599 * CORBA method: Kill the container process with exit(0).
600 * To remove : never returns !
602 //=============================================================================
604 bool Engines_Parallel_Container_i::Kill_impl()
606 MESSAGE("Engines_Parallel_Container_i::Kill() my pid is "<< _pid
607 << " my containerName is " << _containerName.c_str()
608 << " my machineName is " << _hostname.c_str());
609 INFOS("===============================================================");
610 INFOS("= REMOVE calls to Kill_impl in C++ container =");
611 INFOS("===============================================================");
617 //=============================================================================
618 //! Get or create a file reference object associated to a local file (to transfer it)
620 * CORBA method: get or create a fileRef object associated to a local file
621 * (a file on the computer on which runs the container server), which stores
622 * a list of (machine, localFileName) corresponding to copies already done.
624 * \param origFileName absolute path for a local file to copy on other
626 * \return a fileRef object associated to the file.
628 //=============================================================================
631 Engines_Parallel_Container_i::createFileRef(const char* origFileName)
633 std::string origName(origFileName);
634 Engines::fileRef_var theFileRef = Engines::fileRef::_nil();
636 if (origName[0] != '/')
638 INFOS("path of file to copy must be an absolute path begining with '/'");
639 return Engines::fileRef::_nil();
642 if (CORBA::is_nil(_fileRef_map[origName]))
644 CORBA::Object_var obj=_poa->id_to_reference(*_id);
645 Engines::Container_var pCont = Engines::Container::_narrow(obj);
646 fileRef_i* aFileRef = new fileRef_i(pCont, origFileName);
647 theFileRef = Engines::fileRef::_narrow(aFileRef->_this());
648 _numInstanceMutex.lock() ; // lock to be alone (stl container write)
649 _fileRef_map[origName] = theFileRef;
650 _numInstanceMutex.unlock() ;
653 theFileRef = Engines::fileRef::_duplicate(_fileRef_map[origName]);
654 ASSERT(! CORBA::is_nil(theFileRef));
655 return theFileRef._retn();
658 //=============================================================================
661 * \return a reference to the fileTransfer object
663 //=============================================================================
665 Engines::fileTransfer_ptr
666 Engines_Parallel_Container_i::getFileTransfer()
668 Engines::fileTransfer_var aFileTransfer
669 = Engines::fileTransfer::_duplicate(_fileTransfer);
670 return aFileTransfer._retn();
674 Engines::Salome_file_ptr
675 Engines_Parallel_Container_i::createSalome_file(const char* origFileName)
677 string origName(origFileName);
678 if (CORBA::is_nil(_Salome_file_map[origName]))
680 Salome_file_i* aSalome_file = new Salome_file_i();
683 aSalome_file->setLocalFile(origFileName);
684 aSalome_file->recvFiles();
686 catch (const SALOME::SALOME_Exception& e)
688 return Engines::Salome_file::_nil();
691 Engines::Salome_file_var theSalome_file = Engines::Salome_file::_nil();
692 theSalome_file = Engines::Salome_file::_narrow(aSalome_file->_this());
693 _numInstanceMutex.lock() ; // lock to be alone (stl container write)
694 _Salome_file_map[origName] = theSalome_file;
695 _numInstanceMutex.unlock() ;
698 Engines::Salome_file_ptr theSalome_file =
699 Engines::Salome_file::_duplicate(_Salome_file_map[origName]);
700 ASSERT(!CORBA::is_nil(theSalome_file));
701 return theSalome_file;
705 //=============================================================================
706 //! Finds an already existing component instance or create a new instance
708 * C++ method: Finds an already existing servant instance of a component, or
709 * create an instance.
710 * ---- USE ONLY FOR MULTISTUDY INSTANCES ! --------
711 * \param genericRegisterName Name of the component instance to register
712 * in Registry & Name Service,
713 * (without _inst_n suffix, like "COMPONENT")
714 * \return a loaded component
716 * example with names:
717 * aGenRegisterName = COMPONENT (= first argument)
718 * impl_name = libCOMPONENTEngine.so (= second argument)
719 * _containerName = /Containers/cli76ce/FactoryServer
720 * factoryName = COMPONENTEngine_factory
721 * component_registerBase = /Containers/cli76ce/FactoryServer/COMPONENT
723 * instanceName = COMPONENT_inst_1
724 * component_registerName = /Containers/cli76ce/FactoryServer/COMPONENT_inst_1
726 //=============================================================================
728 Engines::EngineComponent_ptr
729 Engines_Parallel_Container_i::find_or_create_instance(std::string genericRegisterName)
731 Engines::EngineComponent_var iobject = Engines::EngineComponent::_nil();
734 std::string aGenRegisterName = genericRegisterName;
735 // --- find a registered instance in naming service, or create
736 std::string component_registerBase = _containerName + "/" + aGenRegisterName;
737 CORBA::Object_var obj = _NS->ResolveFirst(component_registerBase.c_str());
738 if (CORBA::is_nil( obj ))
740 iobject = create_component_instance(genericRegisterName.c_str(),
741 0); // force multiStudy instance here !
745 iobject = Engines::EngineComponent::_narrow(obj) ;
746 Engines_Component_i *servant = dynamic_cast<Engines_Component_i*>(_poa->reference_to_servant(iobject));
748 int studyId = servant->getStudyId();
749 ASSERT (studyId >= 0);
750 if (studyId != 0) // monoStudy instance: NOK
752 iobject = Engines::EngineComponent::_nil();
753 INFOS("load_impl & find_component_instance methods "
754 << "NOT SUITABLE for mono study components");
760 INFOS( "Container_i::load_impl catched" ) ;
762 return iobject._retn();
765 //=============================================================================
766 //! Create a new Python component instance
768 * C++ method: create a servant instance of a component.
769 * \param genericRegisterName Name of the component instance to register
770 * in Registry & Name Service,
771 * (without _inst_n suffix, like "COMPONENT")
772 * \param handle loaded library handle
773 * \param studyId 0 for multiStudy instance,
774 * study Id (>0) otherwise
775 * \return a loaded component
777 * example with names:
778 * aGenRegisterName = COMPONENT (= first argument)
779 * _containerName = /Containers/cli76ce/FactoryServer
780 * factoryName = COMPONENTEngine_factory
781 * component_registerBase = /Containers/cli76ce/FactoryServer/COMPONENT
782 * instanceName = COMPONENT_inst_1
783 * component_registerName = /Containers/cli76ce/FactoryServer/COMPONENT_inst_1
785 //=============================================================================
786 Engines::EngineComponent_ptr
787 Engines_Parallel_Container_i::createPythonInstance(std::string genericRegisterName, int studyId)
790 Engines::EngineComponent_var iobject = Engines::EngineComponent::_nil();
792 int numInstance = _numInstance;
794 sprintf( aNumI , "%d" , numInstance ) ;
795 std::string instanceName = genericRegisterName + "_inst_" + aNumI ;
796 std::string component_registerName = _containerName + "/" + instanceName;
798 Py_ACQUIRE_NEW_THREAD;
799 PyObject *mainmod = PyImport_AddModule("__main__");
800 PyObject *globals = PyModule_GetDict(mainmod);
801 PyObject *pyCont = PyDict_GetItemString(globals, "pyCont");
802 PyObject *result = PyObject_CallMethod(pyCont,
803 (char*)"create_component_instance",
805 genericRegisterName.c_str(),
806 instanceName.c_str(),
810 PyArg_ParseTuple(result,"ss", &ior, &error);
813 Py_RELEASE_NEW_THREAD;
817 CORBA::Object_var obj = _orb->string_to_object(iors.c_str());
818 iobject = Engines::EngineComponent::_narrow(obj);
819 _listInstances_map[instanceName] = iobject;
822 std::cerr << "createPythonInstance ior is empty ! Error in creation" << std::endl;
824 return iobject._retn();
827 //=============================================================================
828 //! Create a new CPP component instance
830 * C++ method: create a servant instance of a component.
831 * \param genericRegisterName Name of the component instance to register
832 * in Registry & Name Service,
833 * (without _inst_n suffix, like "COMPONENT")
834 * \param handle loaded library handle
835 * \param studyId 0 for multiStudy instance,
836 * study Id (>0) otherwise
837 * \return a loaded component
839 * example with names:
840 * aGenRegisterName = COMPONENT (= first argument)
841 * _containerName = /Containers/cli76ce/FactoryServer
842 * factoryName = COMPONENTEngine_factory
843 * component_registerBase = /Containers/cli76ce/FactoryServer/COMPONENT
844 * instanceName = COMPONENT_inst_1
845 * component_registerName = /Containers/cli76ce/FactoryServer/COMPONENT_inst_1
847 //=============================================================================
848 Engines::EngineComponent_ptr
849 Engines_Parallel_Container_i::createCPPInstance(std::string genericRegisterName,
853 MESSAGE("Entering Engines_Parallel_Container_i::createCPPInstance");
855 // --- find the factory
857 std::string aGenRegisterName = genericRegisterName;
858 std::string factory_name = aGenRegisterName + string("Engine_factory");
860 typedef PortableServer::ObjectId * (*FACTORY_FUNCTION_2)
862 PortableServer::POA_ptr,
863 PortableServer::ObjectId *,
867 FACTORY_FUNCTION_2 Component_factory = NULL;
869 Component_factory = (FACTORY_FUNCTION_2)dlsym( handle, factory_name.c_str() );
871 Component_factory = (FACTORY_FUNCTION_2)GetProcAddress( (HINSTANCE)handle, factory_name.c_str() );
874 if (!Component_factory)
876 INFOS("Can't resolve symbol: " + factory_name);
878 INFOS("dlerror() result is : " << dlerror());
880 return Engines::EngineComponent::_nil() ;
883 // --- create instance
884 Engines::EngineComponent_var iobject = Engines::EngineComponent::_nil() ;
887 int numInstance = _numInstance;
889 sprintf( aNumI , "%d" , numInstance );
890 std::string instanceName = aGenRegisterName + "_inst_" + aNumI;
891 std::string component_registerName =
892 _containerName + "/" + instanceName;
894 // --- Instanciate required CORBA object
896 PortableServer::ObjectId *id; //not owner, do not delete (nore use var)
897 id = (Component_factory) ( _orb, _poa, _id, instanceName.c_str(),
898 aGenRegisterName.c_str() );
901 INFOS("Factory function returns NULL !");
902 return iobject._retn();
905 // --- get reference & servant from id
906 CORBA::Object_var obj = _poa->id_to_reference(*id);
907 iobject = Engines::EngineComponent::_narrow(obj);
909 Engines_Component_i *servant =
910 dynamic_cast<Engines_Component_i*>(_poa->reference_to_servant(iobject));
912 servant->_remove_ref(); // compensate previous id_to_reference
913 _listInstances_map[instanceName] = iobject;
914 _cntInstances_map[aGenRegisterName] += 1;
915 #if defined(_DEBUG_) || defined(_DEBUG)
916 bool ret_studyId = servant->setStudyId(studyId);
919 servant->setStudyId(studyId);
922 // --- register the engine under the name
923 // containerName(.dir)/instanceName(.object)
924 _NS->Register(iobject , component_registerName.c_str());
925 MESSAGE( component_registerName.c_str() << " bound" );
929 INFOS( "Container_i::createInstance exception catched" );
931 return iobject._retn();
935 Engines_Parallel_Container_i::create_paco_component_node_instance(const char* componentName,
936 const char* proxy_containerName,
939 // Init de la méthode
941 Engines::EngineComponent_PaCO_var work_node;
942 std::string aCompName = componentName;
943 std::string _proxy_containerName = proxy_containerName;
947 string impl_name = string ("lib") + aCompName + string("Engine.dylib");
949 string impl_name = string ("lib") + aCompName +string("Engine.so");
952 string impl_name = aCompName +string("Engine.dll");
954 void* handle = _library_map[impl_name];
955 _numInstanceMutex.lock() ; // lock on the instance number
957 int numInstance = _numInstance ;
958 _numInstanceMutex.unlock() ;
960 sprintf( aNumI , "%d" , numInstance ) ;
961 string instanceName = aCompName + "_inst_" + aNumI ;
963 // Step 1 : Get proxy !
964 string component_registerName = _proxy_containerName + "/" + instanceName;
965 CORBA::Object_var temp = _NS->Resolve(component_registerName.c_str());
966 Engines::EngineComponent_var obj_proxy = Engines::EngineComponent::_narrow(temp);
967 if (CORBA::is_nil(obj_proxy))
969 INFOS("Proxy reference from NamingService is nil !");
970 INFOS("Proxy name was : " << component_registerName);
971 SALOME::ExceptionStruct es;
972 es.type = SALOME::INTERNAL_ERROR;
973 es.text = "Proxy reference from NamingService is nil !";
974 throw SALOME::SALOME_Exception(es);
976 proxy_ior = _orb->object_to_string(obj_proxy);
979 string factory_name = aCompName + string("Engine_factory");
980 FACTORY_FUNCTION Component_factory = (FACTORY_FUNCTION) dlsym(handle, factory_name.c_str());
981 if (!Component_factory)
983 INFOS("Can't resolve symbol : " + factory_name);
985 INFOS("dlerror() result is : " << dlerror());
987 std::string ex_text = "Can't resolve symbol : " + factory_name;
988 SALOME::ExceptionStruct es;
989 es.type = SALOME::INTERNAL_ERROR;
990 es.text = CORBA::string_dup(ex_text.c_str());
991 throw SALOME::SALOME_Exception(es);
997 sprintf(aNumI2 , "%d" , getMyRank()) ;
998 std::string instanceName = aCompName + "_inst_" + aNumI + "_work_node_" + aNumI2;
999 std::string component_registerName = _containerName + "/" + instanceName;
1001 // --- Instanciate work node
1002 PortableServer::ObjectId *id ; //not owner, do not delete (nore use var)
1003 id = (Component_factory) (_orb, proxy_ior, getMyRank(), _poa, _id, instanceName.c_str(), componentName);
1004 CORBA::string_free(proxy_ior);
1006 // --- get reference & servant from id
1007 CORBA::Object_var obj = _poa->id_to_reference(*id);
1008 work_node = Engines::EngineComponent_PaCO::_narrow(obj) ;
1009 if (CORBA::is_nil(work_node))
1011 INFOS("work_node reference from factory is nil !");
1012 SALOME::ExceptionStruct es;
1013 es.type = SALOME::INTERNAL_ERROR;
1014 es.text = "work_node reference from factory is nil !";
1015 throw SALOME::SALOME_Exception(es);
1017 work_node->deploy();
1018 _NS->Register(work_node, component_registerName.c_str());
1019 _par_obj_inst_map[instanceName] = id;
1020 MESSAGE(component_registerName.c_str() << " bound" );
1024 INFOS("Container_i::create_paco_component_node_instance exception catched");
1025 SALOME::ExceptionStruct es;
1026 es.type = SALOME::INTERNAL_ERROR;
1027 es.text = "Container_i::create_paco_component_node_instance exception catched";
1028 throw SALOME::SALOME_Exception(es);
1032 //=============================================================================
1033 //! Decrement component instance reference count
1037 //=============================================================================
1039 void Engines_Parallel_Container_i::decInstanceCnt(std::string genericRegisterName)
1041 if(_cntInstances_map.count(genericRegisterName) !=0 )
1043 std::string aGenRegisterName =genericRegisterName;
1044 MESSAGE("Engines_Parallel_Container_i::decInstanceCnt " << aGenRegisterName);
1045 ASSERT(_cntInstances_map[aGenRegisterName] > 0);
1046 _numInstanceMutex.lock(); // lock to be alone
1047 // (see finalize_removal, load_component_Library)
1048 _cntInstances_map[aGenRegisterName] -= 1;
1049 SCRUTE(_cntInstances_map[aGenRegisterName]);
1050 if (_cntInstances_map[aGenRegisterName] == 0)
1052 std::string impl_name =
1053 Engines_Component_i::GetDynLibraryName(aGenRegisterName.c_str());
1055 void* handle = _library_map[impl_name];
1057 _toRemove_map[impl_name] = handle;
1059 _numInstanceMutex.unlock();
1063 //=============================================================================
1064 //! Indicate if container is a python one
1066 * Retrieves only with container naming convention if it is a python container
1068 //=============================================================================
1070 bool Engines_Parallel_Container_i::isPythonContainer(const char* ContainerName)
1077 // Cette méthode permet de tenir à jour le compteur des
1078 // instances pour le container parallèle.
1079 // En effet losrque l'on charge un composant séquentielle seul
1080 // le compteur du noeud 0 est augmenté, il faut donc tenir les autres
1083 Engines_Parallel_Container_i::updateInstanceNumber()
1085 if (getMyRank() != 0)
1087 _numInstanceMutex.lock();
1089 _numInstanceMutex.unlock();
1093 /*! \brief copy a file from a remote host (container) to the local host
1094 * \param container the remote container
1095 * \param remoteFile the file to copy locally from the remote host into localFile
1096 * \param localFile the local file
1099 Engines_Parallel_Container_i::copyFile(Engines::Container_ptr container, const char* remoteFile, const char* localFile)
1101 Engines::fileTransfer_var fileTransfer = container->getFileTransfer();
1104 if ((fp = fopen(localFile,"wb")) == NULL)
1106 INFOS("file " << localFile << " cannot be open for writing");
1110 CORBA::Long fileId = fileTransfer->open(remoteFile);
1113 Engines::fileBlock* aBlock;
1120 aBlock = fileTransfer->getBlock(fileId);
1121 toFollow = aBlock->length();
1123 CORBA::Octet *buf = aBlock->get_buffer();
1124 fwrite(buf, sizeof(CORBA::Octet), toFollow, fp);
1128 MESSAGE("end of transfer");
1129 fileTransfer->close(fileId);
1133 INFOS("open reference file for copy impossible");
1137 /*! \brief create a PyNode object to execute remote python code
1138 * \param nodeName the name of the node
1139 * \param code the python code to load
1140 * \return the PyNode
1143 Engines_Parallel_Container_i::createPyNode(const char* nodeName, const char* code)
1145 INFOS("Python component not yet implemented");
1146 Engines::PyNode_var node= Engines::PyNode::_nil();
1147 return node._retn();
1150 Engines::PyNode_ptr Engines_Parallel_Container_i::getDefaultPyNode(const char *nodeName)
1152 INFOS("Python component not yet implemented");
1153 return Engines::PyNode::_nil();
1156 Engines::PyScriptNode_ptr
1157 Engines_Parallel_Container_i::createPyScriptNode(const char* nodeName, const char* cod)
1159 INFOS("Python script node not yet implemented");
1160 Engines::PyScriptNode_var node= Engines::PyScriptNode::_nil();
1161 return node._retn();
1164 Engines::PyScriptNode_ptr Engines_Parallel_Container_i::getDefaultPyScriptNode(const char *nodeName)
1166 INFOS("Python script node not yet implemented");
1167 return Engines::PyScriptNode::_nil();
1170 //=============================================================================
1174 //=============================================================================
1176 void ActSigIntHandler()
1179 struct sigaction SigIntAct ;
1180 SigIntAct.sa_sigaction = &SigIntHandler ;
1181 SigIntAct.sa_flags = SA_SIGINFO ;
1184 // DEBUG 03.02.2005 : the first parameter of sigaction is not a mask of signals
1185 // (SIGINT | SIGUSR1) :
1186 // it must be only one signal ===> one call for SIGINT
1187 // and an other one for SIGUSR1
1190 if ( sigaction( SIGINT , &SigIntAct, NULL ) ) {
1191 perror("SALOME_Container main ") ;
1194 if ( sigaction( SIGUSR1 , &SigIntAct, NULL ) ) {
1195 perror("SALOME_Container main ") ;
1198 if ( sigaction( SIGUSR2 , &SigIntAct, NULL ) )
1200 perror("SALOME_Container main ") ;
1204 //PAL9042 JR : during the execution of a Signal Handler (and of methods called through Signal Handlers)
1205 // use of streams (and so on) should never be used because :
1206 // streams of C++ are naturally thread-safe and use pthread_mutex_lock ===>
1207 // A stream operation may be interrupted by a signal and if the Handler use stream we
1208 // may have a "Dead-Lock" ===HangUp
1209 //==INFOS is commented
1210 // INFOS(pthread_self() << "SigIntHandler activated") ;
1212 signal( SIGINT, SigIntHandler );
1213 signal( SIGUSR1, SigIntHandler );
1219 void CallCancelThread();
1222 void SigIntHandler(int what , siginfo_t * siginfo ,
1224 //PAL9042 JR : during the execution of a Signal Handler (and of methods called through Signal Handlers)
1225 // use of streams (and so on) should never be used because :
1226 // streams of C++ are naturally thread-safe and use pthread_mutex_lock ===>
1227 // A stream operation may be interrupted by a signal and if the Handler use stream we
1228 // may have a "Dead-Lock" ===HangUp
1229 //==MESSAGE is commented
1230 // MESSAGE(pthread_self() << "SigIntHandler what " << what << endl
1231 // << " si_signo " << siginfo->si_signo << endl
1232 // << " si_code " << siginfo->si_code << endl
1233 // << " si_pid " << siginfo->si_pid) ;
1236 // MESSAGE("SigIntHandler END sleeping.") ;
1240 ActSigIntHandler() ;
1241 if ( siginfo->si_signo == SIGUSR1 ) {
1244 else if ( siginfo->si_signo == SIGUSR2 )
1246 CallCancelThread() ;
1250 // MESSAGE("SigIntHandler BEGIN sleeping.") ;
1252 while( _Sleeping ) {
1256 // MESSAGE("SigIntHandler LEAVE sleeping after " << count << " s.") ;
1262 void SigIntHandler( int what ) {
1263 MESSAGE( pthread_self() << "SigIntHandler what " << what << endl );
1266 MESSAGE("SigIntHandler END sleeping.") ;
1270 ActSigIntHandler() ;
1271 if ( what == SIGUSR1 ) {
1276 MESSAGE("SigIntHandler BEGIN sleeping.") ;
1278 while( _Sleeping ) {
1282 MESSAGE("SigIntHandler LEAVE sleeping after " << count << " s.") ;