Salome HOME
Merge branch 'omu/multijob'
[modules/kernel.git] / src / SALOMETraceCollector / TraceCollector_WaitForServerReadiness.cxx
1 // Copyright (C) 2007-2020  CEA/DEN, EDF R&D, OPEN CASCADE
2 //
3 // Copyright (C) 2003-2007  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
5 //
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.
10 //
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.
15 //
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
19 //
20 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
21 //
22
23 //  File   : TraceCollector_WaitForServerReadiness.cxx
24 //  Author : Paul RASCLE (EDF)
25 //  Module : KERNEL
26 //  $Header$
27 //
28 #include "TraceCollector_WaitForServerReadiness.hxx"
29 #include <iostream>
30 #include <ctime>
31
32
33 #if defined(WIN32) && defined(_MSC_VER) && _MSC_VER < 1900
34 #include <omnithread/pthread_nt.h>
35 #endif
36
37 // ============================================================================
38 /*!
39  *  Wait until a server is registered in naming service.
40  *  \param serverName name of the server to find.
41  *  When SALOME_NamingService is available,
42  *  use NamingService_WaitForServerReadiness instead.
43  *  This function is needed when macro MESSAGE used by SALOME_NamingService
44  *  is not available (inside LocalTrace methods, for instance !).
45  *  Direct access to CORBA Name Service. Look for serverName at Name service
46  *  Root without extensions.
47  */
48 // ============================================================================
49
50 CORBA::Object_ptr TraceCollector_WaitForServerReadiness(CORBA::ORB_ptr orb,
51                                                         std::string serverName)
52 {
53   long TIMESleep = 500000000;
54   int NumberOfTries = 40;
55
56   timespec ts_req;
57   ts_req.tv_nsec=TIMESleep;
58   ts_req.tv_sec=0;
59   timespec ts_rem;
60   ts_rem.tv_nsec=0;
61   ts_rem.tv_sec=0;
62
63   CORBA::Object_var obj;
64
65   try
66     {
67       // NB. You can't use SALOME_NamingService class because
68       // it uses MESSAGE macro
69       // Otherwise, you will get segmentation fault.   
70
71       CosNaming::NamingContext_var inc;
72       CosNaming::Name name;
73       name.length(1);
74       name[0].id = CORBA::string_dup(serverName.c_str());
75       CORBA::Object_var theObj=CORBA::Object::_nil();
76
77       for (int itry=0; itry < NumberOfTries; itry++)
78         {
79           try
80             { 
81               if(!CORBA::is_nil(orb)) 
82                 theObj = orb->resolve_initial_references("NameService");
83               if (!CORBA::is_nil(theObj))
84                 inc = CosNaming::NamingContext::_narrow(theObj);
85             }  
86           catch( CORBA::SystemException& )
87             {
88               std::cout << "TraceCollector_WaitForServerReadiness: "
89                    << "CORBA::SystemException: "
90                    << "Unable to contact the Naming Service" << std::endl;
91             }
92           catch(...)
93             {
94               std::cout << "TraceCollector_WaitForServerReadiness: "
95                    << "Unknown exception dealing with Naming Service" << std::endl;
96             }
97           
98           obj=CORBA::Object::_nil();
99           if(!CORBA::is_nil(inc))
100             {
101               try
102                 {
103                   obj = inc->resolve(name);
104                   if (!CORBA::is_nil(obj))
105                     {
106                       //cout << "TraceCollector_WaitForServerReadiness: "
107                       //           << serverName << " found in CORBA Name Service" << endl;
108                       break;
109                     }
110                 }
111               catch (const CosNaming::NamingContext::NotFound&)
112                 {
113                   std::cout << "Caught exception: Naming Service can't found Logger";
114                 }
115             }
116 #ifndef WIN32
117           nanosleep(&ts_req,&ts_rem);
118 #else
119           Sleep(TIMESleep / 1000000);
120 #endif
121                   std::cout << "TraceCollector_WaitForServerReadiness: retry look for"
122                << serverName << std::endl;
123         }          
124     }
125   catch (const CosNaming::NamingContext::NotFound&)
126     {
127       std::cout << "Caught exception: Naming Service can't found Logger";
128     }
129   catch (CORBA::COMM_FAILURE&)
130     {
131       std::cout << "Caught CORBA::SystemException CommFailure.";
132     }
133   catch (CORBA::SystemException&)
134     {
135       std::cout << "Caught CORBA::SystemException.";
136     }
137   catch (CORBA::Exception&)
138     {
139       std::cout << "Caught CORBA::Exception.";
140     }
141   catch (...)
142     {
143       std::cout << "Caught unknown exception.";
144     }
145   return obj._retn();
146 }
147