Salome HOME
Merge V8_4_BR branch.
[modules/kernel.git] / src / SALOMESDS / SALOMESDS_DataServerManager.cxx
1 // Copyright (C) 2007-2016  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 // Author : Anthony GEAY (EDF R&D)
20
21 #include "SALOMESDS_DataServerManager.hxx"
22 #include "SALOMESDS_Exception.hxx"
23
24 #include "SALOME_ContainerManager.hxx"
25 #include "SALOME_NamingService.hxx"
26
27 #include <sstream>
28 #include <algorithm>
29
30 using namespace SALOMESDS;
31
32 const char DataServerManager::NAME_IN_NS[]="/DataServerManager";
33
34 const char DataServerManager::DFT_SCOPE_NAME_IN_NS[]="Default";
35
36 DataServerManager::DataServerManager(int argc, char *argv[], CORBA::ORB_ptr orb, PortableServer::POA_ptr poa):_orb(CORBA::ORB::_duplicate(orb))
37 {
38   DataScopeServer *dftScope(new DataScopeServer(orb,SALOME::DataScopeKiller::_nil(),DFT_SCOPE_NAME_IN_NS));//_remove_ref will be call by DataScopeServer::shutdownIfNotHostedByDSM
39   PortableServer::POAManager_var pman(poa->the_POAManager());
40   CORBA::PolicyList policies;
41   policies.length(1);
42   PortableServer::ThreadPolicy_var threadPol(poa->create_thread_policy(PortableServer::SINGLE_THREAD_MODEL));
43   policies[0]=PortableServer::ThreadPolicy::_duplicate(threadPol);
44   _poa=poa->create_POA("SingleThPOA4SDS",pman,policies);
45   threadPol->destroy();
46   //
47   dftScope->initializePython(argc,argv);// agy : Very important ! invoke this method BEFORE activation !
48   // activate this to be ready to be usable from NS.
49   PortableServer::ObjectId_var id(_poa->activate_object(this));
50   CORBA::Object_var obj(_poa->id_to_reference(id));
51   SALOME::DataServerManager_var obj2(SALOME::DataServerManager::_narrow(obj));
52   // publish Data server manager in NS
53   SALOME_NamingService ns(orb);
54   ns.Register(obj2,NAME_IN_NS);
55   // the default DataScopeServer object is the only one hosted by the current process
56   dftScope->setPOA(_poa);
57   obj=dftScope->activate();
58   SALOME::DataScopeServer_var dftScopePtr(SALOME::DataScopeServer::_narrow(obj));
59   dftScope->registerInNS(dftScopePtr);// agy : Very important ! invoke this method BEFORE activation ! Because this method initializes Python !
60 }
61
62 SALOME::StringVec *DataServerManager::listScopes()
63 {
64   std::vector<std::string> scopes(listOfScopesCpp());
65   SALOME::StringVec *ret(new SALOME::StringVec);
66   std::size_t sz(scopes.size());
67   ret->length(sz);
68   for(std::size_t i=0;i<sz;i++)
69     (*ret)[i]=CORBA::string_dup(scopes[i].c_str());
70   return ret;
71 }
72
73 SALOME::StringVec *DataServerManager::listAliveAndKickingScopes()
74 {
75   std::vector<std::string> scopes(listOfScopesCpp());
76   std::size_t sz(scopes.size());
77   std::vector<std::string> retCpp; retCpp.reserve(sz);
78   for(std::size_t i=0;i<sz;i++)
79     {
80       if(isAliveAndKicking(scopes[i].c_str()))
81         retCpp.push_back(scopes[i]);
82     }
83   //
84   SALOME::StringVec *ret(new SALOME::StringVec);
85   sz=retCpp.size();
86   ret->length(sz);
87   for(std::size_t i=0;i<sz;i++)
88     (*ret)[i]=CORBA::string_dup(retCpp[i].c_str());
89   return ret;
90 }
91
92 SALOME::DataScopeServer_ptr DataServerManager::getDefaultScope()
93 {
94   SALOME::DataScopeServerBase_var ret(retriveDataScope(DFT_SCOPE_NAME_IN_NS));
95   if(CORBA::is_nil(ret))
96     return SALOME::DataScopeServer::_narrow(ret);
97   SALOME::DataScopeServer_ptr ret2(SALOME::DataScopeServer::_narrow(ret));
98   if(CORBA::is_nil(ret2))
99     throw Exception("DataServerManager::getDefaultScope : exists but has not expected sub type !");
100   return ret2;
101 }
102
103 CORBA::Boolean DataServerManager::isAliveAndKicking(const char *scopeName)
104 {
105   SALOME::DataScopeServerBase_var scopePtr(getScopePtrGivenName(scopeName));
106   return IsAliveAndKicking(scopePtr);
107 }
108
109 template<class T>
110 typename T::PtrType CreateDataScope(const std::string& scopeName, const std::vector<std::string>& scopes, SALOME_NamingService& ns)
111 {
112   int isTransactionInt(T::IsTransaction);
113   if(std::find(scopes.begin(),scopes.end(),scopeName)!=scopes.end())
114     {
115       std::ostringstream oss; oss << "DataServerManager::createDataScope : scope name \"" << scopeName << "\" already exists !";
116       throw Exception(oss.str());
117     }
118   //
119   std::string fullScopeName(DataServerManager::CreateAbsNameInNSFromScopeName(scopeName));
120   std::ostringstream oss; oss << "SALOME_DataScopeServer" << " " << scopeName << " " << isTransactionInt << " ";
121   SALOME_ContainerManager::AddOmninamesParams(oss,&ns);
122   std::string command(oss.str());
123   SALOME_ContainerManager::MakeTheCommandToBeLaunchedASync(command);
124   int status(SALOME_ContainerManager::SystemThreadSafe(command.c_str()));
125   if(status!=0)
126     {
127       std::ostringstream oss2; oss2 << "CreateDataScope : Fail to launch \"" << command << "\" ! Return code was : " << status << " !";
128       throw Exception(oss2.str());
129     }
130   int count(SALOME_ContainerManager::GetTimeOutToLoaunchServer());
131   typename T::VarType ret(T::nil());
132   while (CORBA::is_nil(ret) && count)
133     {
134       SALOME_ContainerManager::SleepInSecond(1);
135       count--;
136       CORBA::Object_var obj(ns.Resolve(fullScopeName.c_str()));
137       ret=T::narrow(obj);
138     }
139   return T::duplicate(ret);
140 }
141
142 template<class T>
143 typename T::PtrType GiveADataScopeCalled(const std::string& scopeName, const std::vector<std::string>& scopes, SALOME_NamingService& ns, CORBA::Boolean& isCreated)
144 {
145   if(std::find(scopes.begin(),scopes.end(),scopeName)==scopes.end())
146     {
147       isCreated=true;
148       return CreateDataScope<T>(scopeName,scopes,ns);
149     }
150   else
151     {
152       SALOME::DataScopeServerBase_var ret(SALOMESDS::DataServerManager::GetScopePtrGivenName(scopeName,scopes,ns));
153       if(SALOMESDS::DataServerManager::IsAliveAndKicking(ret))
154         {
155           isCreated=false;
156           typename T::PtrType ret2(T::narrow(ret));
157           if(CORBA::is_nil(ret))
158             return ret2;
159           if(CORBA::is_nil(ret2))
160             {
161               std::ostringstream oss; oss << "DataServerManager::giveADataScopeCalled : scope \"" << scopeName << "\" exists but with invalid type !";
162               throw Exception(oss.str());
163             }
164           return ret2;
165         }
166       else
167         {
168           std::string fullScopeName(SALOMESDS::DataServerManager::CreateAbsNameInNSFromScopeName(scopeName));
169           ns.Destroy_Name(fullScopeName.c_str());
170           isCreated=true;
171           return CreateDataScope<T>(scopeName,scopes,ns);
172         }
173     }
174 }
175
176 class NormalFunctor
177 {
178 public:
179   typedef SALOME::DataScopeServer_ptr PtrType;
180   typedef SALOME::DataScopeServer_var VarType;
181   typedef SALOME::DataScopeServer TheType;
182   static const bool IsTransaction=false;
183   static PtrType nil() { return SALOME::DataScopeServer::_nil(); }
184   static PtrType narrow(CORBA::Object_ptr obj) { return SALOME::DataScopeServer::_narrow(obj); }
185   static PtrType duplicate(PtrType obj) { return SALOME::DataScopeServer::_duplicate(obj); }
186 };
187
188 class TransactionFunctor
189 {
190 public:
191   typedef SALOME::DataScopeServerTransaction_ptr PtrType;
192   typedef SALOME::DataScopeServerTransaction_var VarType;
193   typedef SALOME::DataScopeServerTransaction TheType;
194   static const bool IsTransaction=true;
195   static PtrType nil() { return SALOME::DataScopeServerTransaction::_nil(); }
196   static PtrType narrow(CORBA::Object_ptr obj) { return SALOME::DataScopeServerTransaction::_narrow(obj); }
197   static PtrType duplicate(PtrType obj) { return SALOME::DataScopeServerTransaction::_duplicate(obj); }
198 };
199
200 SALOME::DataScopeServer_ptr DataServerManager::createDataScope(const char *scopeName)
201 {
202   SALOME_NamingService ns(_orb);
203   return CreateDataScope<NormalFunctor>(scopeName,listOfScopesCpp(),ns);
204 }
205
206 SALOME::DataScopeServer_ptr DataServerManager::giveADataScopeCalled(const char *scopeName, CORBA::Boolean& isCreated)
207 {
208   SALOME_NamingService ns(_orb);
209   return GiveADataScopeCalled<NormalFunctor>(scopeName,listOfScopesCpp(),ns,isCreated);
210 }
211
212 SALOME::DataScopeServerTransaction_ptr DataServerManager::createDataScopeTransaction(const char *scopeName)
213 {
214   SALOME_NamingService ns(_orb);
215   return CreateDataScope<TransactionFunctor>(scopeName,listOfScopesCpp(),ns);
216 }
217
218 SALOME::DataScopeServerTransaction_ptr DataServerManager::giveADataScopeTransactionCalled(const char *scopeName, CORBA::Boolean& isCreated)
219 {
220   SALOME_NamingService ns(_orb);
221   return GiveADataScopeCalled<TransactionFunctor>(scopeName,listOfScopesCpp(),ns,isCreated);
222 }
223
224 SALOME::DataScopeServerBase_ptr DataServerManager::retriveDataScope(const char *scopeName)
225 {
226   SALOME::DataScopeServerBase_var ret(getScopePtrGivenName(scopeName));
227   return SALOME::DataScopeServerBase::_duplicate(ret);
228 }
229
230 void DataServerManager::removeDataScope(const char *scopeName)
231 {
232   SALOME::DataScopeServerBase_var scs(getScopePtrGivenName(scopeName));
233   SALOME::DataScopeKiller_ptr killer;
234   if(scs->shutdownIfNotHostedByDSM(killer))
235     killer->shutdown();
236   CORBA::release(killer);
237 }
238
239 void DataServerManager::cleanScopesInNS()
240 {
241   SALOME_NamingService ns(_orb);
242   std::vector<std::string> scopes(listOfScopesCpp());
243   for(std::vector<std::string>::const_iterator it=scopes.begin();it!=scopes.end();it++)
244     {
245       if(!isAliveAndKicking((*it).c_str()))
246         {
247           std::string fullScopeName(SALOMESDS::DataServerManager::CreateAbsNameInNSFromScopeName(*it));
248           ns.Destroy_Name(fullScopeName.c_str());
249         }
250     }
251 }
252
253 void DataServerManager::shutdownScopes()
254 {
255   std::vector<std::string> scopeNames(listOfScopesCpp());
256   for(std::vector<std::string>::const_iterator it=scopeNames.begin();it!=scopeNames.end();it++)
257     {
258       SALOME::DataScopeServerBase_var scope(getScopePtrGivenName(*it));
259       SALOME::DataScopeKiller_ptr killer;
260       if(scope->shutdownIfNotHostedByDSM(killer))
261         killer->shutdown();
262       CORBA::release(killer);
263     }
264 }
265
266 std::string DataServerManager::CreateAbsNameInNSFromScopeName(const std::string& scopeName)
267 {
268   std::ostringstream oss; oss << NAME_IN_NS << "/" << scopeName;
269   return oss.str();
270 }
271
272 CORBA::Boolean DataServerManager::IsAliveAndKicking(SALOME::DataScopeServerBase_ptr scopePtr)
273 {
274   CORBA::Boolean ret(true);
275   try
276     {
277       scopePtr->ping();
278     }
279   catch(...)
280     { ret=false; }
281   return ret;
282 }
283
284 std::vector<std::string> DataServerManager::listOfScopesCpp()
285 {
286   SALOME_NamingService ns(_orb);
287   ns.Change_Directory(NAME_IN_NS);
288   std::vector<std::string> ret(ns.list_directory());
289   return ret;
290 }
291
292 SALOME::DataScopeServerBase_var DataServerManager::GetScopePtrGivenName(const std::string& scopeName, const std::vector<std::string>& scopes, SALOME_NamingService& ns)
293 {
294   if(std::find(scopes.begin(),scopes.end(),scopeName)==scopes.end())
295     {
296       std::ostringstream oss; oss << "DataServerManager::getScopePtrGivenName : scope name \"" << scopeName << "\" does not exist !";
297       throw Exception(oss.str());
298     }
299   std::string fullScopeName(CreateAbsNameInNSFromScopeName(scopeName));
300   CORBA::Object_var obj(ns.Resolve(fullScopeName.c_str()));
301   SALOME::DataScopeServerBase_var ret(SALOME::DataScopeServerBase::_narrow(obj));
302   return ret;
303 }
304
305 SALOME::DataScopeServerBase_var DataServerManager::getScopePtrGivenName(const std::string& scopeName)
306 {
307   SALOME_NamingService ns(_orb);
308   return GetScopePtrGivenName(scopeName,listOfScopesCpp(),ns);
309 }