1 // SALOME Session : implementation of Session.idl
3 // Copyright (C) 2003 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.
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.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
24 // File : SALOME_Session_i.cxx
25 // Author : Paul RASCLE, EDF
30 #include "utilities.h"
32 #include "SALOME_Session_i.hxx"
33 #include "SALOME_NamingService.hxx"
34 #include "SALOME_Session_QThread.hxx"
36 #include "QAD_Application.h"
37 #include "QAD_Desktop.h"
38 #include <qapplication.h>
40 // Open CASCADE Includes
41 #include <OSD_SharedLibrary.hxx>
42 #include <OSD_LoadMode.hxx>
43 #include <OSD_Function.hxx>
45 //=============================================================================
49 //=============================================================================
51 SALOME_Session_i::SALOME_Session_i(int argc, char ** argv, CORBA::ORB_ptr orb, PortableServer::POA_ptr poa)
55 _IAPPThread = new SALOME_Session_QThread(_argc, _argv) ;
58 _orb = CORBA::ORB::_duplicate(orb) ;
59 _poa = PortableServer::POA::_duplicate(poa) ;
60 MESSAGE("constructor end");
63 Engines::Component_ptr SALOME_Session_i::GetVisuGen(){
64 typedef Engines::Component_ptr VisuGen(CORBA::ORB_ptr, PortableServer::POA_ptr,
65 SALOME_NamingService*, QMutex*);
66 MESSAGE("SALOME_Session_i::GetVisuGen");
67 OSD_SharedLibrary visuSharedLibrary("libVisuEngine.so");
68 if(visuSharedLibrary.DlOpen(OSD_RTLD_LAZY))
69 if(OSD_Function osdFun = visuSharedLibrary.DlSymb("GetVisuGen"))
70 return ((VisuGen (*)) osdFun)(_orb,_poa,_NS,&_GUIMutex);
71 return Engines::Component::_nil();
74 Engines::Component_ptr SALOME_Session_i::GetVisuComponent() {
75 MESSAGE("SALOME_Session_i::GetVisuGen");
76 typedef Engines::Component_ptr VisuGen(CORBA::ORB_ptr,PortableServer::POA_ptr,QMutex*);
77 OSD_SharedLibrary visuSharedLibrary("libVISUEngine.so");
78 if(visuSharedLibrary.DlOpen(OSD_RTLD_LAZY))
79 if(OSD_Function osdFun = visuSharedLibrary.DlSymb("GetVisuGen"))
80 return ((VisuGen (*)) osdFun)(_orb,_poa,&_GUIMutex);
81 return Engines::Component::_nil();
84 //=============================================================================
88 //=============================================================================
90 SALOME_Session_i::~SALOME_Session_i()
92 MESSAGE("destructor end");
95 //=============================================================================
97 * tries to find the Corba Naming Service and to register the session,
98 * gives naming service interface to _IAPPThread
100 //=============================================================================
102 void SALOME_Session_i::NSregister()
104 SALOME::Session_ptr pSession = SALOME::Session::_narrow(_this());
107 _NS = new SALOME_NamingService(_orb);
108 _NS->Register(pSession, "/Kernel/Session");
109 _IAPPThread->setNamingService(_NS);
111 catch (ServiceUnreachable&)
113 INFOS("Caught exception: Naming Service Unreachable");
118 INFOS("Caught unknown exception from Naming Service");
120 MESSAGE("NSregister end");
123 //=============================================================================
125 * Launches the GUI if there is none.
126 * The Corba method is oneway (corba client does'nt wait for GUI completion)
128 //=============================================================================
130 void SALOME_Session_i::GetInterface()
132 _GUIMutex.lock() ; // get access to boolean _isGUI
133 _isGUI = _IAPPThread->running();
136 _IAPPThread->start() ;
138 _GUIMutex.unlock() ; // release access to boolean _isGUI
141 //=============================================================================
143 * Kills the session if there are no active studies nore GUI
145 //=============================================================================
147 void SALOME_Session_i::StopSession()
150 QAD_Application::getDesktop()->closeDesktop( true );
153 _GUIMutex.lock(); // get access to boolean _isGUI
154 if ((! _isGUI) && (! _runningStudies))
156 MESSAGE("Ask for Session Kill, OK");
161 _GUIMutex.unlock() ; // release access to boolean _isGUI
162 MESSAGE("Ask for Session Kill, NOK");
163 if (_isGUI) throw SALOME::Session::GUIActive();
164 if (_runningStudies) throw SALOME::Session::RunningStudies();
169 //=============================================================================
171 * Send a SALOME::StatSession structure (see idl) to the client
172 * (number of running studies and presence of GUI)
174 //=============================================================================
176 SALOME::StatSession SALOME_Session_i::GetStatSession()
178 // update Session state
180 _isGUI = _IAPPThread->running();
184 if ( QAD_Application::getDesktop() && QAD_Application::getDesktop()->getActiveApp() )
185 _runningStudies = QAD_Application::getDesktop()->getActiveApp()->getStudies().count();
190 SALOME::StatSession_var myStats = new SALOME::StatSession ;
192 myStats->state = SALOME::running ;
194 myStats->state = SALOME::asleep ;
195 myStats->runningStudies = _runningStudies ;
196 myStats->activeGUI = _isGUI ;
197 return myStats._retn() ;