Salome HOME
Initial version
[modules/gui.git] / src / Session / Session_Session_i.cxx
1 //  SALOME Session : implementation of Session.idl
2 //
3 //  Copyright (C) 2003  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. 
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.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org 
21 //
22 //
23 //
24 //  File   : SALOME_Session_i.cxx
25 //  Author : Paul RASCLE, EDF
26 //  Module : SALOME
27 //  $Header$
28
29 #include "utilities.h"
30
31 #include "Session_Session_i.hxx"
32
33 #include "SALOME_NamingService.hxx"
34 #include "SALOME_Event.hxx"
35
36 #include "SUIT_Session.h"
37 #include "SUIT_Application.h"
38
39 #include <qapplication.h>
40
41 // Open CASCADE Includes
42 #include <OSD_SharedLibrary.hxx>
43 #include <OSD_LoadMode.hxx>
44 #include <OSD_Function.hxx>
45
46 using namespace std;
47
48 //=============================================================================
49 /*! SALOME_Session_i
50  *  constructor
51  */ 
52 //=============================================================================
53
54 SALOME_Session_i::SALOME_Session_i(int argc, 
55                                    char ** argv, 
56                                    CORBA::ORB_ptr orb, 
57                                    PortableServer::POA_ptr poa, 
58                                    QMutex* GUIMutex,
59                                    QWaitCondition* GUILauncher)
60 {
61   _argc = argc ;
62   _argv = argv ;
63   _isGUI = FALSE ;
64   _runningStudies= 0 ;
65   _orb = CORBA::ORB::_duplicate(orb) ;
66   _poa = PortableServer::POA::_duplicate(poa) ;
67   _GUIMutex = GUIMutex;
68   _GUILauncher = GUILauncher;
69   //MESSAGE("constructor end");
70 }
71
72 //=============================================================================
73 /*! GetVisuComponent
74  *  returns Visu component
75  */ 
76 //=============================================================================
77
78 Engines::Component_ptr SALOME_Session_i::GetComponent(const char* theLibraryName)
79 {
80   typedef Engines::Component_ptr TGetImpl(CORBA::ORB_ptr,
81                                           PortableServer::POA_ptr,
82                                           SALOME_NamingService*,QMutex*);
83   OSD_SharedLibrary  aSharedLibrary(const_cast<char*>(theLibraryName));
84   if(aSharedLibrary.DlOpen(OSD_RTLD_LAZY))
85     if(OSD_Function anOSDFun = aSharedLibrary.DlSymb("GetImpl"))
86       return ((TGetImpl (*)) anOSDFun)(_orb,_poa,_NS,_GUIMutex);
87   return Engines::Component::_nil();
88 }
89
90 //=============================================================================
91 /*! ~SALOME_Session_i
92  *  destructor
93  */ 
94 //=============================================================================
95
96 SALOME_Session_i::~SALOME_Session_i()
97 {
98   //MESSAGE("destructor end"); 
99 }
100
101 //=============================================================================
102 /*! NSregister
103  *  tries to find the Corba Naming Service and to register the session,
104  *  gives naming service interface to _IAPPThread
105  */ 
106 //=============================================================================
107
108 void SALOME_Session_i::NSregister()
109 {
110   SALOME::Session_ptr pSession = SALOME::Session::_narrow(_this());
111   try
112     {
113       _NS = new SALOME_NamingService(_orb);
114       _NS->Register(pSession, "/Kernel/Session");
115     }
116   catch (ServiceUnreachable&)
117     {
118       INFOS("Caught exception: Naming Service Unreachable");
119       exit(1) ;
120     }
121   catch (...)
122     {
123       INFOS("Caught unknown exception from Naming Service");
124     }
125   //MESSAGE("Session registered in Naming Service"); 
126 }
127
128 //=============================================================================
129 /*! GetInterface
130  *  Launches the GUI if there is none.
131  *  The Corba method is oneway (corba client does'nt wait for GUI completion)
132  */ 
133 //=============================================================================
134
135 void SALOME_Session_i::GetInterface()
136 {
137   if( !SUIT_Session::session() ) {    
138     _GUILauncher->wakeAll();
139     MESSAGE("SALOME_Session_i::GetInterface() called, starting GUI...")
140   }
141 }
142
143 //=============================================================================
144 /*! StopSession
145  *  Kills the session if there are no active studies nore GUI
146  */ 
147 //=============================================================================
148 class CloseEvent : public SALOME_Event
149 {
150 public:
151   virtual void Execute() {
152 //if ( SUIT_Application::getDesktop() )
153 //  QAD_Application::getDesktop()->closeDesktop( true );
154   }
155 };
156
157 void SALOME_Session_i::StopSession()
158 {
159   ProcessVoidEvent( new CloseEvent() );
160 }
161  
162 //=============================================================================
163 /*! StatSession
164  *  Send a SALOME::StatSession structure (see idl) to the client
165  *  (number of running studies and presence of GUI)
166  */ 
167 //=============================================================================
168
169 class QtLock
170 {
171 public:
172   QtLock() { if ( qApp ) qApp->lock(); }
173   ~QtLock() { if ( qApp ) qApp->unlock(); }
174 };
175
176
177 SALOME::StatSession SALOME_Session_i::GetStatSession()
178 {
179   // update Session state
180   _GUIMutex->lock();    
181
182   _runningStudies = 0;
183   {
184     QtLock lock;
185     _isGUI = SUIT_Session::session();
186     if ( _isGUI && SUIT_Session::session()->activeApplication() ) 
187       _runningStudies = SUIT_Session::session()->activeApplication()->getNbStudies();
188   }
189
190   _GUIMutex->unlock();
191
192   // getting stat info
193   SALOME::StatSession_var myStats = new SALOME::StatSession ;
194   if (_runningStudies)
195     myStats->state = SALOME::running ;
196   else
197     myStats->state = SALOME::asleep ;
198   myStats->runningStudies = _runningStudies ;
199   myStats->activeGUI = _isGUI ;
200   return myStats._retn() ;
201 }
202
203 CORBA::Long SALOME_Session_i::GetActiveStudyId()
204 {
205   long aStudyId=-1;
206   //if ( SUIT_Session::session() && SUIT_Session::session()->activeApplication() ) {
207   //  aStudyId = SUIT_Session::session()->getActiveStudy()->getStudyId();
208   //}
209   return aStudyId;
210 }