Salome HOME
NRI : Remove Loader files.
[modules/kernel.git] / src / Session / SALOME_Session_i.cxx
1 using namespace std;
2 //=============================================================================
3 // File      : SALOME_Session_i.cxx
4 // Created   : mar jun 19 14:02:45 CEST 2001
5 // Author    : Paul RASCLE, EDF
6 // Project   : SALOME
7 // Copyright : EDF 2001
8 // $Header$
9 //=============================================================================
10
11 #include "utilities.h"
12
13 #include "SALOME_Session_i.hxx"
14 #include "SALOME_NamingService.hxx"
15 #include "SALOME_Session_QThread.hxx"
16
17 #include "QAD_Application.h"
18 #include "QAD_Desktop.h"
19 #include <qapplication.h>
20
21 // Open CASCADE Includes
22 #include <OSD_SharedLibrary.hxx>
23 #include <OSD_LoadMode.hxx>
24 #include <OSD_Function.hxx>
25
26 //=============================================================================
27 /*! SALOME_Session_i
28  *  constructor
29  */ 
30 //=============================================================================
31
32 SALOME_Session_i::SALOME_Session_i(int argc, char ** argv, CORBA::ORB_ptr orb, PortableServer::POA_ptr poa)
33 {
34   _argc = argc ;
35   _argv = argv ;
36   _IAPPThread = new SALOME_Session_QThread(_argc, _argv) ;
37   _isGUI = FALSE ;
38   _runningStudies= 0 ;
39   _orb = CORBA::ORB::_duplicate(orb) ;
40   _poa = PortableServer::POA::_duplicate(poa) ;
41   MESSAGE("constructor end");
42 }
43   
44 //***//VISU::VISU_Gen_ptr SALOME_Session_i::GetVisuGen(){
45 //***//  typedef VISU::VISU_Gen_ptr VisuGen(CORBA::ORB_var,PortableServer::POA_var,QMutex*);
46 //***//  MESSAGE("SALOME_Session_i::GetVisuGen");
47 //***//  OSD_SharedLibrary  visuSharedLibrary("libVisuEngine.so");
48 //***//  if(visuSharedLibrary.DlOpen(OSD_RTLD_LAZY))
49 //***//    if(OSD_Function osdFun = visuSharedLibrary.DlSymb("GetVisuGen"))
50 //***//      return ((VisuGen (*)) osdFun)(_orb,_poa,&_GUIMutex);
51 //***//  return VISU::VISU_Gen::_nil();
52 //***//} 
53
54 Engines::Component_ptr SALOME_Session_i::GetVisuComponent() {
55   MESSAGE("SALOME_Session_i::GetVisuGen");
56   typedef Engines::Component_ptr VisuGen(CORBA::ORB_ptr,PortableServer::POA_ptr,QMutex*);
57   OSD_SharedLibrary  visuSharedLibrary("libVISUEngine.so");
58   if(visuSharedLibrary.DlOpen(OSD_RTLD_LAZY))
59     if(OSD_Function osdFun = visuSharedLibrary.DlSymb("GetVisuGen"))
60       return ((VisuGen (*)) osdFun)(_orb,_poa,&_GUIMutex);
61   return Engines::Component::_nil();
62 }
63
64 //=============================================================================
65 /*! ~SALOME_Session_i
66  *  destructor
67  */ 
68 //=============================================================================
69
70 SALOME_Session_i::~SALOME_Session_i()
71 {
72   MESSAGE("destructor end"); 
73 }
74
75 //=============================================================================
76 /*! NSregister
77  *  tries to find the Corba Naming Service and to register the session,
78  *  gives naming service interface to _IAPPThread
79  */ 
80 //=============================================================================
81
82 void SALOME_Session_i::NSregister()
83 {
84   SALOME::Session_ptr pSession = SALOME::Session::_narrow(_this());
85   try
86     {
87       _NS = new SALOME_NamingService(_orb);
88       _NS->Register(pSession, "/Kernel/Session");
89       _IAPPThread->setNamingService(_NS);
90     }
91   catch (ServiceUnreachable&)
92     {
93       INFOS("Caught exception: Naming Service Unreachable");
94       exit(1) ;
95     }
96   catch (...)
97     {
98       INFOS("Caught unknown exception from Naming Service");
99     }
100   MESSAGE("NSregister end"); 
101 }
102
103 //=============================================================================
104 /*! GetInterface
105  *  Launches the GUI if there is none.
106  *  The Corba method is oneway (corba client does'nt wait for GUI completion)
107  */ 
108 //=============================================================================
109
110 void SALOME_Session_i::GetInterface()
111 {
112   _GUIMutex.lock() ;       // get access to boolean _isGUI
113   _isGUI = _IAPPThread->running();
114   if(!_isGUI){
115     _isGUI = TRUE ; 
116     _IAPPThread->start() ;
117   }
118   _GUIMutex.unlock() ; // release access to boolean _isGUI 
119 }
120
121 //=============================================================================
122 /*! StopSession
123  *  Kills the session if there are no active studies nore GUI
124  */ 
125 //=============================================================================
126
127 void SALOME_Session_i::StopSession()
128 {
129   qApp->lock();
130   QAD_Application::getDesktop()->closeDesktop( true );
131   qApp->unlock();
132 /*
133   _GUIMutex.lock();         // get access to boolean _isGUI
134   if ((! _isGUI) && (! _runningStudies))
135     {
136       MESSAGE("Ask for Session Kill, OK");
137       exit(0);
138     }
139   else
140     {
141       _GUIMutex.unlock() ;  // release access to boolean _isGUI
142       MESSAGE("Ask for Session Kill, NOK");
143       if (_isGUI) throw SALOME::Session::GUIActive();   
144       if (_runningStudies) throw SALOME::Session::RunningStudies();
145     }
146 */
147 }
148  
149 //=============================================================================
150 /*! StatSession
151  *  Send a SALOME::StatSession structure (see idl) to the client
152  *  (number of running studies and presence of GUI)
153  */ 
154 //=============================================================================
155
156 SALOME::StatSession SALOME_Session_i::GetStatSession()
157 {
158   // update Session state
159   _GUIMutex.lock();    
160   _isGUI = _IAPPThread->running();
161   _runningStudies = 0;
162   if (_isGUI) {
163     qApp->lock();
164     if ( QAD_Application::getDesktop() && QAD_Application::getDesktop()->getActiveApp() )
165       _runningStudies = QAD_Application::getDesktop()->getActiveApp()->getStudies().count();
166     qApp->unlock();
167   }
168   _GUIMutex.unlock();
169   // getting stat info
170   SALOME::StatSession_var myStats = new SALOME::StatSession ;
171   if (_runningStudies)
172     myStats->state = SALOME::running ;
173   else
174     myStats->state = SALOME::asleep ;
175   myStats->runningStudies = _runningStudies ;
176   myStats->activeGUI = _isGUI ;
177   return myStats._retn() ;
178 }
179