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,QMutex*);
  72   OSD_SharedLibrary  visuSharedLibrary("libVISUEngine.so");
  73   if(visuSharedLibrary.DlOpen(OSD_RTLD_LAZY))
  74     if(OSD_Function osdFun = visuSharedLibrary.DlSymb("GetVisuGen"))
  75       return ((VisuGen (*)) osdFun)(_orb,_poa,&_GUIMutex);
  76   return Engines::Component::_nil();
  77 }
  78
  79 //=============================================================================
  80 /*! ~SALOME_Session_i
  81  *  destructor
  82  */
  83 //=============================================================================
  84
  85 SALOME_Session_i::~SALOME_Session_i()
  86 {
  87   MESSAGE("destructor end");
  88 }
  89
  90 //=============================================================================
  91 /*! NSregister
  92  *  tries to find the Corba Naming Service and to register the session,
  93  *  gives naming service interface to _IAPPThread
  94  */
  95 //=============================================================================
  96
  97 void SALOME_Session_i::NSregister()
  98 {
  99   SALOME::Session_ptr pSession = SALOME::Session::_narrow(_this());
 100   try
 101     {
 102       _NS = new SALOME_NamingService(_orb);
 103       _NS->Register(pSession, "/Kernel/Session");
 104       _IAPPThread->setNamingService(_NS);
 105     }
 106   catch (ServiceUnreachable&)
 107     {
 108       INFOS("Caught exception: Naming Service Unreachable");
 109       exit(1) ;
 110     }
 111   catch (...)
 112     {
 113       INFOS("Caught unknown exception from Naming Service");
 114     }
 115   MESSAGE("NSregister end");
 116 }
 117
 118 //=============================================================================
 119 /*! GetInterface
 120  *  Launches the GUI if there is none.
 121  *  The Corba method is oneway (corba client does'nt wait for GUI completion)
 122  */
 123 //=============================================================================
 124
 125 void SALOME_Session_i::GetInterface()
 126 {
 127   _GUIMutex.lock() ;       // get access to boolean _isGUI
 128   _isGUI = _IAPPThread->running();
 129   if(!_isGUI){
 130     _isGUI = TRUE ;
 131     _IAPPThread->start() ;
 132   }
 133   _GUIMutex.unlock() ; // release access to boolean _isGUI
 134 }
 135
 136 //=============================================================================
 137 /*! StopSession
 138  *  Kills the session if there are no active studies nore GUI
 139  */
 140 //=============================================================================
 141
 142 void SALOME_Session_i::StopSession()
 143 {
 144   qApp->lock();
 145   QAD_Application::getDesktop()->closeDesktop( true );
 146   qApp->unlock();
 147 /*
 148   _GUIMutex.lock();         // get access to boolean _isGUI
 149   if ((! _isGUI) && (! _runningStudies))
 150     {
 151       MESSAGE("Ask for Session Kill, OK");
 152       exit(0);
 153     }
 154   else
 155     {
 156       _GUIMutex.unlock() ;  // release access to boolean _isGUI
 157       MESSAGE("Ask for Session Kill, NOK");
 158       if (_isGUI) throw SALOME::Session::GUIActive();
 159       if (_runningStudies) throw SALOME::Session::RunningStudies();
 160     }
 161 */
 162 }
 163
 164 //=============================================================================
 165 /*! StatSession
 166  *  Send a SALOME::StatSession structure (see idl) to the client
 167  *  (number of running studies and presence of GUI)
 168  */
 169 //=============================================================================
 170
 171 SALOME::StatSession SALOME_Session_i::GetStatSession()
 172 {
 173   // update Session state
 174   _GUIMutex.lock();
 175   _isGUI = _IAPPThread->running();
 176   _runningStudies = 0;
 177   if (_isGUI) {
 178     qApp->lock();
 179     if ( QAD_Application::getDesktop() && QAD_Application::getDesktop()->getActiveApp() )
 180       _runningStudies = QAD_Application::getDesktop()->getActiveApp()->getStudies().count();
 181     qApp->unlock();
 182   }
 183   _GUIMutex.unlock();
 184   // getting stat info
 185   SALOME::StatSession_var myStats = new SALOME::StatSession ;
 186   if (_runningStudies)
 187     myStats->state = SALOME::running ;
 188   else
 189     myStats->state = SALOME::asleep ;
 190   myStats->runningStudies = _runningStudies ;
 191   myStats->activeGUI = _isGUI ;
 192   return myStats._retn() ;
 193 }
 194