1 // Copyright (C) 2004 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
2 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
4 // This library is free software; you can redistribute it and/or
5 // modify it under the terms of the GNU Lesser General Public
6 // License as published by the Free Software Foundation; either
7 // version 2.1 of the License.
9 // This library is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 // Lesser General Public License for more details.
14 // You should have received a copy of the GNU Lesser General Public
15 // License along with this library; if not, write to the Free Software
16 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18 // See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
22 // File : NamingService_WaitForServerReadiness.cxx
23 // Author : Paul RASCLE (EDF)
27 #include "NamingService_WaitForServerReadiness.hxx"
28 #include "utilities.h"
34 // ============================================================================
36 * Wait until a server is registered in naming service.
37 * \param serverName name of the server to find.
38 * \param NS SALOME_NamingService object
39 * Wait until the given server is ready i.e. is name is found in namingService.
40 * Try 40 times, with 500 ms sleep between each try.
41 * If Logger is used for traces, it must be ready before this call, because
42 * SALOME_NamingService client uses SALOME traces. So, Logger readiness must be
43 * checked in Launch script before execution of WaitForServerReadiness.
45 // ============================================================================
48 void NamingService_WaitForServerReadiness(SALOME_NamingService* NS,
51 long TIMESleep = 500000000; // 500 ms.
52 int NumberOfTries = 40; // total wait = 20 s.
56 ts_req.tv_nsec=TIMESleep;
63 for (int itry=0; itry < NumberOfTries; itry++)
67 if (serverName.length() == 0)
69 string dummyadr = NS->getIORaddr(); // to wait for naming service
71 break; // naming service found
75 CORBA::Object_ptr obj = NS->Resolve(serverName.c_str());
76 if (! CORBA::is_nil(obj))
79 break; // server found, no more try to do
81 MESSAGE("Server "<< serverName <<" not yet ready, waiting...");
82 int a = nanosleep(&ts_req,&ts_rem); // wait before retry
85 catch( ServiceUnreachable& )
87 MESSAGE("CORBA::COMM_FAILURE: Naming Service not yet ready, waiting...");
88 int a = nanosleep(&ts_req,&ts_rem); // wait before retry
93 INFOS("Server "<< serverName <<" not found, abort...");