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