src/Session/SALOME_Session_Server.cxx

   1 // Copyright (C) 2007-2014  CEA/DEN, EDF R&D, OPEN CASCADE
   2 //
   3 // Copyright (C) 2003-2007  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, or (at your option) any later version.
  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.salome-platform.org/ or email : webmaster.salome@opencascade.com
  21 //
  22
  23 //  SALOME Session : implementation of Session.idl
  24 //  File : SALOME_Session_Server.cxx
  25 //  Author : Paul RASCLE, EDF
  26 //  Module : SALOME
  27
  28 #include <SALOME_NamingService.hxx>
  29 #include <SALOME_ModuleCatalog_impl.hxx>
  30 #include <SALOME_LifeCycleCORBA.hxx>
  31 #include <SALOME_Event.h>
  32
  33 #include <Basics_OCCTVersion.hxx>
  34
  35 #include <Container_init_python.hxx>
  36 #include <ConnectionManager_i.hxx>
  37 #include <RegistryService.hxx>
  38
  39 #ifdef ENABLE_TESTRECORDER
  40   #include <TestApplication.h>
  41 #endif
  42
  43 #include <OpUtil.hxx>
  44 #include <Utils_ORB_INIT.hxx>
  45 #include <Utils_SINGLETON.hxx>
  46 #include <Utils_SALOME_Exception.hxx>
  47 #include <Utils_CorbaException.hxx>
  48
  49 #include <utilities.h>
  50 #include "Session_ServerLauncher.hxx"
  51 #include "Session_ServerCheck.hxx"
  52 #include "Session_Session_i.hxx"
  53
  54 #include <Qtx.h>
  55 #include <QtxSplash.h>
  56
  57 #include <Style_Salome.h>
  58
  59 #include "GUI_version.h"
  60 #include <SUIT_Tools.h>
  61 #include <SUIT_Session.h>
  62 #include <SUIT_Application.h>
  63 #include <SUIT_Desktop.h>
  64 #include <SUIT_ResourceMgr.h>
  65 #include <SUIT_ExceptionHandler.h>
  66
  67 #include <SALOMEconfig.h>
  68 #include CORBA_SERVER_HEADER(SALOME_Session)
  69 #include CORBA_SERVER_HEADER(SALOMEDS)
  70
  71 #include <QDir>
  72 #include <QFile>
  73 #include <QApplication>
  74 #include <QMutex>
  75 #include <QWaitCondition>
  76 #include <QRegExp>
  77 #include <QTextStream>
  78
  79 /*! - read arguments, define list of server to launch with their arguments.
  80  * - wait for naming service
  81  * - create and run a thread for launch of all servers
  82  *
  83 */
  84
  85 //! CORBA server for SALOME Session
  86 /*!
  87  * SALOME_Session Server launches a SALOME session servant.
  88  * The servant registers to the Naming Service.
  89  * See SALOME_Session.idl for interface specification.
  90  *
  91  * Main services offered by the servant are:
  92  * - launch GUI
  93  * - stop Session ( must be idle )
  94  * - get session state
  95  */
  96
  97 void MessageOutput( QtMsgType type, const char* msg )
  98 {
  99   switch ( type )
 100   {
 101   case QtDebugMsg:
 102     //MESSAGE( "Debug: " << msg );
 103     break;
 104   case QtWarningMsg:
 105     MESSAGE( "Warning: " << msg );
 106     break;
 107   case QtFatalMsg:
 108     MESSAGE( "Fatal: " << msg );
 109     break;
 110   }
 111 }
 112
 113 QString salomeVersion()
 114 {
 115   return GUI_VERSION_STR;
 116 }
 117
 118 class SALOME_ResourceMgr : public SUIT_ResourceMgr
 119 {
 120 public:
 121   SALOME_ResourceMgr( const QString& app, const QString& resVarTemplate ) : SUIT_ResourceMgr( app, resVarTemplate )
 122   {
 123     setCurrentFormat( "xml" );
 124     setOption( "translators", QString( "%P_msg_%L.qm|%P_icons.qm|%P_images.qm" ) );
 125   }
 126   static void initResourceMgr()
 127   {
 128     if ( myExtAppName.isNull() || myExtAppVersion.isNull() ) {
 129       SALOME_ResourceMgr resMgr( "SalomeApp", QString( "%1Config" ) );
 130       resMgr.loadLanguage( "LightApp",  "en" );
 131       resMgr.loadLanguage( "SalomeApp", "en" );
 132
 133       myExtAppName = QObject::tr( "APP_NAME" ).trimmed();
 134       if ( myExtAppName == "APP_NAME" || myExtAppName.toLower() == "salome" )
 135         myExtAppName = "SalomeApp";
 136       myExtAppVersion = QObject::tr( "APP_VERSION" );
 137       if ( myExtAppVersion == "APP_VERSION" ) {
 138         if ( myExtAppName != "SalomeApp" )
 139           myExtAppVersion = "";
 140         else myExtAppVersion = salomeVersion();
 141       }
 142     }
 143   }
 144   QString version() const { return myExtAppVersion; }
 145
 146 protected:
 147   QString userFileName( const QString& appName, const bool for_load ) const
 148   {
 149     if ( version().isEmpty()  ) return "";
 150     return SUIT_ResourceMgr::userFileName( myExtAppName, for_load );
 151   }
 152
 153   virtual long userFileId( const QString& _fname ) const
 154   {
 155     //////////////////////////////////////////////////////////////////////////////////////////////
 156     // In SALOME and SALOME-based applications the user preferences file is named as
 157     // - <AppName>.xml.<AppVersion> on Windows
 158     // - <AppName>rc.<AppVersion> on Linux
 159     // where
 160     //   * AppName is application name, default SalomeApp (can be customized in SALOME-based
 161     //     applications
 162     //   * AppVersion is application version
 163     //
 164     // Since version 6.5.0 of SALOME, user file is situated in the ~/.config/salome
 165     // directory. For backward compatibility, when user preferences from nearest
 166     // version of application is searched, user home directory is also looked through,
 167     // with lower priority.
 168     //
 169     // Since version 6.6.0 of SALOME, user file name on Linux is no more prefixed by dot
 170     // symbol since it is situated in hidden ~/.config/salome directory. Files with dot
 171     // prefix also though taken into account (with lower priority) for backward compatibility.
 172     //
 173     // Notes:
 174     // - Currently the following format of version number is supported:
 175     //   <major>[.<minor>[.<release>[<type><dev>]]]
 176     //   Parts in square brackets are considered optional. Here:
 177     //   * major   - major version id
 178     //   * minor   - minor version id
 179     //   * release - maintenance version id
 180     //   * type    - dev or patch marker; it can be either one alphabetical symbol (from 'a' to 'z')
 181     //               or 'rc' to point release candidate (case-insensitive)
 182     //   * dev     - dev version or patch number
 183     //   All numerical values must be of range [1-99].
 184     //   Examples: 1.0, 6.5.0, 1.2.0a1, 3.3.3rc3 (release candidate 3), 11.0.0p1 (patch 1)
 185     //
 186     // - Versioning approach can be customized by implementing and using own resource manager class,
 187     //   see QtxResurceMgr, SUIT_ResourceMgr classes.
 188     //////////////////////////////////////////////////////////////////////////////////////////////
 189     long id = -1;
 190     if ( !myExtAppName.isEmpty() ) {
 191 #ifdef WIN32
 192       // On Windows, user file name is something like SalomeApp.xml.6.5.0 where
 193       // - SalomeApp is an application name (can be customized)
 194       // - xml is a file format (xml or ini)
 195       // - 6.5.0 is an application version, can include alfa/beta/rc marks, e.g. 6.5.0a3, 6.5.0rc1
 196       QRegExp exp( QString( "%1\\.%2\\.([a-zA-Z0-9.]+)" ).arg( myExtAppName ).arg( currentFormat() ) );
 197 #else
 198       // On Linux, user file name is something like SalomeApprc.6.5.0 where
 199       // - SalomeApp is an application name (can be customized)
 200       // - 6.5.0 is an application version, can include alfa/beta/rc marks, e.g. 6.5.0a3, 6.5.0rc1
 201
 202       // VSR 24/09/2012: issue 0021781: since version 6.6.0 user filename is not prepended with "."
 203       // when it is stored in the ~/.config/<appname> directory;
 204       // for backward compatibility we also check files prepended with "." with lower priority
 205       QRegExp exp( QString( "\\.?%1rc\\.([a-zA-Z0-9.]+)" ).arg( myExtAppName ) );
 206 #endif
 207       QString fname = QFileInfo( _fname ).fileName();
 208       if ( exp.exactMatch( fname ) ) {
 209         long fid = Qtx::versionToId( exp.cap( 1 ) );
 210         if ( fid > 0 ) id = fid;
 211       }
 212     }
 213     return id;
 214   }
 215
 216 public:
 217   static QString myExtAppName;
 218   static QString myExtAppVersion;
 219 };
 220
 221 QString SALOME_ResourceMgr::myExtAppName    = QString();
 222 QString SALOME_ResourceMgr::myExtAppVersion = QString();
 223
 224 class SALOME_Session : public SUIT_Session
 225 {
 226 public:
 227   SALOME_Session() : SUIT_Session() {}
 228   virtual ~SALOME_Session() {}
 229
 230 public:
 231   virtual SUIT_ResourceMgr* createResourceMgr( const QString& appName ) const
 232   {
 233     SALOME_ResourceMgr::initResourceMgr();
 234     SALOME_ResourceMgr* resMgr = new SALOME_ResourceMgr( appName, QString( "%1Config" ) );
 235     return resMgr;
 236   }
 237 };
 238
 239 #ifdef ENABLE_TESTRECORDER
 240   class SALOME_QApplication : public TestApplication
 241 #else
 242   class SALOME_QApplication : public QApplication
 243 #endif
 244 {
 245 public:
 246 #ifdef ENABLE_TESTRECORDER
 247   SALOME_QApplication( int& argc, char** argv ) : TestApplication( argc, argv ), myHandler ( 0 ) {}
 248 #else
 249   SALOME_QApplication( int& argc, char** argv )
 250 #ifndef WIN32
 251   // san: Opening an X display and choosing a visual most suitable for 3D visualization
 252   // in order to make SALOME viewers work with non-native X servers
 253   : QApplication( (Display*)Qtx::getDisplay(), argc, argv, Qtx::getVisual() ),
 254 #else
 255   : QApplication( argc, argv ),
 256 #endif
 257     myHandler ( 0 ) {}
 258 #endif
 259
 260   virtual bool notify( QObject* receiver, QEvent* e )
 261   {
 262 #if OCC_VERSION_LARGE < 0x06010100
 263     // Disable GUI user actions while python command is executed
 264     if (SUIT_Session::IsPythonExecuted()) {
 265       // Disable mouse and keyboard events
 266       QEvent::Type aType = e->type();
 267       if (aType == QEvent::MouseButtonPress || aType == QEvent::MouseButtonRelease ||
 268           aType == QEvent::MouseButtonDblClick || aType == QEvent::MouseMove ||
 269           aType == QEvent::Wheel || aType == QEvent::ContextMenu ||
 270           aType == QEvent::KeyPress || aType == QEvent::KeyRelease ||
 271           aType == QEvent::Accel || aType == QEvent::AccelOverride)
 272         return false;
 273     }
 274 #endif
 275
 276 #ifdef ENABLE_TESTRECORDER
 277     return myHandler ? myHandler->handle( receiver, e ) :
 278       TestApplication::notify( receiver, e );
 279 #else
 280     try {
 281       return myHandler ? myHandler->handle( receiver, e ) : QApplication::notify( receiver, e );
 282     }
 283     catch (std::exception& e) {
 284       std::cerr << e.what()  << std::endl;
 285     }
 286     catch (CORBA::Exception& e) {
 287       std::cerr << "Caught CORBA::Exception"  << std::endl;
 288       CORBA::Any tmp;
 289       tmp<<= e;
 290       CORBA::TypeCode_var tc = tmp.type();
 291       const char *p = tc->name();
 292       std::cerr << "notify(): CORBA exception of the kind : " << p << " is caught" << std::endl;
 293     }
 294     catch (...) {
 295       std::cerr << "Unknown exception caught in Qt handler: it's probably a bug in SALOME platform" << std::endl;
 296     }
 297     return false;  // return false when exception is caught
 298 #endif
 299   }
 300   SUIT_ExceptionHandler* handler() const { return myHandler; }
 301   void setHandler( SUIT_ExceptionHandler* h ) { myHandler = h; }
 302
 303 private:
 304   SUIT_ExceptionHandler* myHandler;
 305 };
 306
 307 // class which calls SALOME::Session::GetInterface() from another thread
 308 // to avoid mutual lock ( if called from the same thread as main()
 309 class GetInterfaceThread : public QThread
 310 {
 311 public:
 312   GetInterfaceThread( SALOME::Session_var s ) : session ( s )
 313   {
 314     start();
 315   }
 316 protected:
 317   virtual void run()
 318   {
 319     if ( !CORBA::is_nil( session ) )
 320       session->GetInterface();
 321     else
 322       printf( "\nFATAL ERROR: SALOME::Session object is nil! Can not display GUI\n\n" );
 323   }
 324 private:
 325   SALOME::Session_var session;
 326 };
 327
 328 // returns true if 'str' is found in argv
 329 bool isFound( const char* str, int argc, char** argv )
 330 {
 331   for ( int i = 1; i <= ( argc-1 ); i++ )
 332     if ( !strcmp( argv[i], str ) )
 333       return true;
 334   return false;
 335 }
 336
 337 void killOmniNames()
 338 {
 339   SALOME_LifeCycleCORBA::killOmniNames();
 340 }
 341
 342 // shutdown standalone servers
 343 void shutdownServers( SALOME_NamingService* theNS )
 344 {
 345   SALOME_LifeCycleCORBA lcc(theNS);
 346   lcc.shutdownServers();
 347 }
 348
 349 // ---------------------------- MAIN -----------------------
 350 int main( int argc, char **argv )
 351 {
 352   // Install Qt debug messages handler
 353   qInstallMsgHandler( MessageOutput );
 354
 355   //Set a "native" graphic system in case if application runs on the remote host
 356   QString remote(getenv("REMOTEHOST"));
 357   QString client(getenv("SSH_CLIENT"));
 358   if(remote.length() > 0 || client.length() > 0 ) {
 359     QApplication::setGraphicsSystem(QLatin1String("native"));
 360   }
 361
 362   // add $QTDIR/plugins to the pluins search path for image plugins
 363   QString qtdir( ::getenv( "QTDIR" ) );
 364   if ( !qtdir.isEmpty() )
 365     QApplication::addLibraryPath( QDir( qtdir ).absoluteFilePath( "plugins" ) );
 366
 367   {
 368     SALOME_Session s;
 369     QApplication::setApplicationName( "salome" );
 370     SUIT_ResourceMgr* resMgr = s.createResourceMgr( "SalomeApp" );
 371     bool isCloc = resMgr->booleanValue( "language", "locale", true );
 372     if ( isCloc ) {
 373       QLocale::setDefault( QLocale::c() );
 374     }
 375     else {
 376       QLocale::setDefault( QLocale::system() );
 377     }
 378   }
 379
 380   // Create Qt application instance;
 381   // this should be done the very first!
 382   SALOME_QApplication _qappl( argc, argv );
 383   _qappl.setOrganizationName( "salome" );
 384   _qappl.setApplicationName( "salome" );
 385   _qappl.setApplicationVersion( salomeVersion() );
 386
 387   // Add application library path (to search style plugin etc...)
 388   QString path = QDir::convertSeparators( SUIT_Tools::addSlash( QString( ::getenv( "GUI_ROOT_DIR" ) ) ) + QString( "bin/salome" ) );
 389   _qappl.addLibraryPath( path );
 390
 391   bool isGUI    = isFound( "GUI",    argc, argv );
 392   bool isSplash = isFound( "SPLASH", argc, argv );
 393   // Show splash screen (only if both the "GUI" and "SPLASH" parameters are set)
 394   // Note, that user preferences are not taken into account for splash settings -
 395   // it is a property of the application!
 396   QtxSplash* splash = 0;
 397   if ( isGUI && isSplash ) {
 398     // ...create resource manager
 399     SUIT_ResourceMgr resMgr( "SalomeApp", QString( "%1Config" ) );
 400     resMgr.setCurrentFormat( "xml" );
 401     resMgr.setWorkingMode( QtxResourceMgr::IgnoreUserValues );
 402     resMgr.loadLanguage( "LightApp" );
 403     //
 404     splash = QtxSplash::splash( QPixmap() );
 405     splash->readSettings( &resMgr );
 406     if ( splash->pixmap().isNull() )
 407       splash->setPixmap( resMgr.loadPixmap( "LightApp", QObject::tr( "ABOUT_SPLASH" ) ) );
 408     if ( splash->pixmap().isNull() ) {
 409       delete splash;
 410       splash = 0;
 411     }
 412     else {
 413       splash->setOption( "%A", QObject::tr( "APP_NAME" ) );
 414       splash->setOption( "%V", QObject::tr( "ABOUT_VERSION" ).arg( salomeVersion() ) );
 415       splash->setOption( "%L", QObject::tr( "ABOUT_LICENSE" ) );
 416       splash->setOption( "%C", QObject::tr( "ABOUT_COPYRIGHT" ) );
 417       splash->show();
 418       QApplication::instance()->processEvents();
 419     }
 420   }
 421
 422
 423   // Initialization
 424   int result = -1;
 425
 426   CORBA::ORB_var orb;
 427   PortableServer::POA_var poa;
 428
 429   SUIT_Session* aGUISession = 0;
 430   SALOME_NamingService* _NS = 0;
 431   GetInterfaceThread* guiThread = 0;
 432   Session_ServerLauncher* myServerLauncher = 0;
 433
 434   try {
 435     // ...initialize Python (only once)
 436     int   _argc   = 1;
 437     char* _argv[] = {(char*)""};
 438     KERNEL_PYTHON::init_python( _argc,_argv );
 439
 440     // ...create ORB, get RootPOA object, NamingService, etc.
 441     ORB_INIT &init = *SINGLETON_<ORB_INIT>::Instance();
 442     ASSERT( SINGLETON_<ORB_INIT>::IsAlreadyExisting() );
 443     int orbArgc = 1;
 444     orb = init( orbArgc, argv );
 445
 446     CORBA::Object_var obj = orb->resolve_initial_references( "RootPOA" );
 447     poa = PortableServer::POA::_narrow( obj );
 448
 449     PortableServer::POAManager_var pman = poa->the_POAManager();
 450     pman->activate() ;
 451     MESSAGE( "pman->activate()" );
 452
 453     _NS = new SALOME_NamingService( orb );
 454
 455     result = 0;
 456   }
 457   catch ( SALOME_Exception& e ) {
 458     INFOS( "run(): SALOME::SALOME_Exception is caught: "<<e.what() );
 459   }
 460   catch ( CORBA::SystemException& e ) {
 461     INFOS( "Caught CORBA::SystemException." );
 462   }
 463   catch ( CORBA::Exception& e ) {
 464     INFOS( "Caught CORBA::Exception." );
 465     CORBA::Any tmp;
 466     tmp<<= e;
 467     CORBA::TypeCode_var tc = tmp.type();
 468     const char *p = tc->name();
 469     INFOS ( "run(): CORBA exception of the kind : "<<p<< " is caught" );
 470   }
 471   catch ( std::exception& e ) {
 472     INFOS( "run(): An exception has been caught: " <<e.what() );
 473   }
 474   catch (...) {
 475     INFOS( "Caught unknown exception." );
 476   }
 477
 478   QMutex _GUIMutex, _SessionMutex, _SplashMutex;
 479   QWaitCondition _ServerLaunch, _SessionStarted, _SplashStarted;
 480
 481   // lock session mutex to ensure that GetInterface is not called
 482   // until all initialization is done
 483   _SessionMutex.lock();
 484
 485   if ( !result ) {
 486     // Start embedded servers launcher (Registry, SALOMEDS, etc.)
 487     // ...lock mutex to block embedded servers launching thread until wait( mutex )
 488     _GUIMutex.lock();
 489     // ...create launcher
 490     myServerLauncher = new Session_ServerLauncher( argc, argv, orb, poa, &_GUIMutex, &_ServerLaunch, &_SessionMutex, &_SessionStarted );
 491     // ...block this thread until launcher is ready
 492     _ServerLaunch.wait( &_GUIMutex );
 493
 494     // Start servers check thread (splash)
 495     if ( splash ) {
 496       // ...lock mutex to block splash thread until wait( mutex )
 497       _SplashMutex.lock();
 498       // ...create servers checking thread
 499       Session_ServerCheck sc( &_SplashMutex, &_SplashStarted );
 500       // ... set initial progress
 501       splash->setProgress( 0, sc.totalSteps() );
 502       // start check loop
 503       while ( true ) {
 504         int step    = sc.currentStep();
 505         int total   = sc.totalSteps();
 506         QString msg = sc.currentMessage();
 507         QString err = sc.error();
 508         if ( !err.isEmpty() ) {
 509           QtxSplash::setError( err );
 510           QApplication::instance()->processEvents();
 511           result = -1;
 512           break;
 513         }
 514         QtxSplash::setStatus( msg, step );
 515         QApplication::instance()->processEvents();
 516         if ( step >= total )
 517           break;
 518         // ...block this thread until servers checking is finished
 519         _SplashStarted.wait( &_SplashMutex );
 520       }
 521       // ...unlock mutex 'cause it is no more needed
 522       _SplashMutex.unlock();
 523     }
 524
 525     // Finalize embedded servers launcher
 526     // ...block this thread until launcher is finished
 527     _ServerLaunch.wait( &_GUIMutex );
 528     // ...unlock mutex 'cause it is no more needed
 529     _GUIMutex.unlock();
 530   }
 531
 532   // Obtain Session interface reference
 533   CORBA::Object_var obj = _NS->Resolve( "/Kernel/Session" );
 534   SALOME::Session_var session = SALOME::Session::_narrow( obj ) ;
 535
 536   bool shutdownAll = false;
 537   bool shutdownSession = false;
 538   if ( !result ) {
 539     // Launch GUI activator
 540     if ( isGUI ) {
 541       if ( splash )
 542         splash->setStatus( QApplication::translate( "", "Activating desktop..." ) );
 543       // ...create GUI launcher
 544       MESSAGE( "Session activated, Launch IAPP..." );
 545       guiThread = new GetInterfaceThread( session );
 546     }
 547
 548     // GUI activation
 549     // Allow multiple activation/deactivation of GUI
 550     while ( true ) {
 551       MESSAGE( "waiting wakeAll()" );
 552       _SessionStarted.wait( &_SessionMutex ); // to be reseased by Launch server thread when ready:
 553       // atomic operation lock - unlock on mutex
 554       // unlock mutex: serverThread runs, calls _ServerLaunch->wakeAll()
 555       // this thread wakes up, and lock mutex
 556
 557       _SessionMutex.unlock();
 558
 559       // Session might be shutdowning here, check status
 560       SALOME::StatSession stat = session->GetStatSession();
 561       shutdownSession = stat.state == SALOME::shutdown;
 562       if ( shutdownSession ) {
 563         _SessionMutex.lock(); // lock mutex before leaving loop - it will be unlocked later
 564         break;
 565       }
 566
 567       // SUIT_Session creation
 568       aGUISession = new SALOME_Session();
 569
 570       // Load SalomeApp dynamic library
 571       MESSAGE( "creation SUIT_Application" );
 572       SUIT_Application* aGUIApp = aGUISession->startApplication( "SalomeApp", 0, 0 );
 573       if ( aGUIApp )
 574       {
 575         Style_Salome::initialize( aGUIApp->resourceMgr() );
 576         if ( aGUIApp->resourceMgr()->booleanValue( "Style", "use_salome_style", true ) )
 577           Style_Salome::apply();
 578
 579         if ( !isFound( "noexcepthandler", argc, argv ) )
 580           _qappl.setHandler( aGUISession->handler() ); // after loading SalomeApp application
 581                                                        // aGUISession contains SalomeApp_ExceptionHandler
 582         // Run GUI loop
 583         MESSAGE( "run(): starting the main event loop" );
 584
 585         if ( splash )
 586           splash->finish( aGUIApp->desktop() );
 587
 588         result = _qappl.exec();
 589
 590         splash = 0;
 591
 592         if ( result == SUIT_Session::NORMAL ) {
 593         // desktop is explicitly closed by user from GUI
 594         // exit flags says if it's necessary to shutdown all servers
 595         // all session server only
 596           shutdownAll = aGUISession->exitFlags();
 597         }
 598         else {
 599           // desktop might be closed from:
 600           // - StopSesion() /temporarily/ or
 601           // - Shutdown() /permanently/
 602           stat = session->GetStatSession();
 603           shutdownSession = stat.state == SALOME::shutdown;
 604         }
 605         if ( shutdownAll || shutdownSession ) {
 606           _SessionMutex.lock(); // lock mutex before leaving loop - it will be unlocked later
 607           break;
 608         }
 609       }
 610
 611       delete aGUISession;
 612       aGUISession = 0;
 613
 614       // Prepare _GUIMutex for a new GUI activation
 615       _SessionMutex.lock();
 616     }
 617   }
 618
 619   // unlock Session mutex
 620   _SessionMutex.unlock();
 621
 622   if ( myServerLauncher )
 623     myServerLauncher->ShutdownAll(); // shutdown embedded servers
 624
 625   if ( shutdownAll )                 // shutdown standalone servers
 626     shutdownServers( _NS );
 627
 628   if ( myServerLauncher )
 629     myServerLauncher->KillAll();     // kill embedded servers
 630
 631   // Unregister session server
 632   SALOME_Session_i* sessionServant = dynamic_cast<SALOME_Session_i*>( poa->reference_to_servant( session.in() ) );
 633   if ( sessionServant )
 634     sessionServant->NSunregister();
 635
 636   delete aGUISession;
 637   delete guiThread;
 638   delete myServerLauncher;
 639   delete _NS;
 640
 641   try  {
 642     orb->shutdown(0);
 643   }
 644   catch (...) {
 645     //////////////////////////////////////////////////////////////
 646     // VSR: silently skip exception:
 647     // CORBA.BAD_INV_ORDER.BAD_INV_ORDER_ORBHasShutdown
 648     // exception is raised when orb->destroy() is called and
 649     // cpp continer is launched in the embedded mode
 650     //////////////////////////////////////////////////////////////
 651     // std::cerr << "Caught unexpected exception on shutdown : ignored !!" << std::endl;
 652     if ( shutdownAll )
 653       killOmniNames();
 654     abort(); //abort program to avoid deadlock in destructors or atexit when shutdown has been interrupted
 655   }
 656
 657   PyGILState_Ensure();
 658   //Destroy orb from python (for chasing memory leaks)
 659   //PyRun_SimpleString("from omniORB import CORBA");
 660   //PyRun_SimpleString("orb=CORBA.ORB_init([''], CORBA.ORB_ID)");
 661   //PyRun_SimpleString("orb.destroy()");
 662   Py_Finalize();
 663
 664   if ( shutdownAll )
 665     killOmniNames();
 666
 667   MESSAGE( "Salome_Session_Server:endofserver" );
 668   return result;
 669 }