src/SALOMETraceCollector/SALOMETraceCollector.cxx

   1 //  Copyright (C) 2004  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
   2 //  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
   3 //
   4 //  This library is free software; you can redistribute it and/or
   5 //  modify it under the terms of the GNU Lesser General Public
   6 //  License as published by the Free Software Foundation; either
   7 //  version 2.1 of the License.
   8 //
   9 //  This library is distributed in the hope that it will be useful,
  10 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12 //  Lesser General Public License for more details.
  13 //
  14 //  You should have received a copy of the GNU Lesser General Public
  15 //  License along with this library; if not, write to the Free Software
  16 //  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  17 //
  18 //  See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
  19 //
  20 //
  21 //
  22 //  File   : LocalTraceCollector.cxx
  23 //  Author : Paul RASCLE (EDF)
  24 //  Module : KERNEL
  25 //  $Header$
  26
  27 #include <iostream>
  28 #include <sstream>
  29 #include <fstream>
  30 #include <cstdlib>
  31 #include <CORBA.h>
  32
  33 using namespace std;
  34
  35 #include "SALOMETraceCollector.hxx"
  36 #include "TraceCollector_WaitForServerReadiness.hxx"
  37 #include <SALOMEconfig.h>
  38 #include CORBA_CLIENT_HEADER(Logger)
  39
  40 // Class attributes initialisation, for class method SALOMETraceCollector::run
  41
  42 CORBA::ORB_ptr SALOMETraceCollector::_orb = 0;
  43
  44 // ============================================================================
  45 /*!
  46  *  This class is for use with CORBA, inside SALOME.
  47  *  Type of trace (and corresponding class) is choosen in LocalTraceBufferPool.
  48  *
  49  *  Guarantees a unique object instance of the class (singleton thread safe)
  50  *  a separate thread for loop to print traces is launched.
  51  */
  52 // ============================================================================
  53
  54 BaseTraceCollector* SALOMETraceCollector::instance()
  55 {
  56   if (_singleton == 0) // no need of lock when singleton already exists
  57     {
  58       int ret;
  59       ret = pthread_mutex_lock(&_singletonMutex); // acquire lock to be alone
  60       if (_singleton == 0)                     // another thread may have got
  61         {                                      // the lock after the first test
  62           _singleton = new SALOMETraceCollector();
  63           int argc=0;
  64           char *_argv=0;
  65           char ** argv = &_argv;
  66           _orb = CORBA::ORB_init (argc, argv);
  67
  68           sem_init(&_sem,0,0); // to wait until run thread is initialized
  69           pthread_t traceThread;
  70           int bid;
  71           int re2 = pthread_create(&traceThread, NULL,
  72                                    SALOMETraceCollector::run, (void *)bid);
  73           sem_wait(&_sem);
  74         }
  75       ret = pthread_mutex_unlock(&_singletonMutex); // release lock
  76     }
  77   return _singleton;
  78 }
  79
  80 // ============================================================================
  81 /*!
  82  *  In a separate thread, loop to print traces.
  83  *  Mutex garantees intialisation on instance method is done and only one run
  84  *  allowed (double check ...)
  85  *  Loop until there is no more buffer to print,
  86  *  and no ask for end from destructor.
  87  *  Get a buffer. If type = ABORT then exit application with message.
  88  */
  89 // ============================================================================
  90
  91 void* SALOMETraceCollector::run(void *bid)
  92 {
  93   _threadId = new pthread_t;
  94   *_threadId = pthread_self();
  95   sem_post(&_sem); // unlock instance
  96
  97   LocalTraceBufferPool* myTraceBuffer = LocalTraceBufferPool::instance();
  98   LocalTrace_TraceInfo myTrace;
  99
 100   SALOME_Logger::Logger_var m_pInterfaceLogger;
 101   CORBA::Object_var obj;
 102
 103   obj = TraceCollector_WaitForServerReadiness(_orb,"Logger");
 104   if (!CORBA::is_nil(obj))
 105     m_pInterfaceLogger = SALOME_Logger::Logger::_narrow(obj);
 106   if (CORBA::is_nil(m_pInterfaceLogger))
 107     {
 108       cerr << "Logger server not found ! Abort" << endl;
 109       cerr << flush ;
 110       exit(1);
 111     }
 112   else
 113     {
 114       CORBA::String_var LogMsg =
 115         CORBA::string_dup("\n---Init logger trace---\n");
 116       m_pInterfaceLogger->putMessage(LogMsg);
 117       DEVTRACE("Logger server found");
 118     }
 119
 120   // --- Loop until there is no more buffer to print,
 121   //     and no ask for end from destructor.
 122
 123   while ((!_threadToClose) || myTraceBuffer->toCollect() )
 124     {
 125       if (_threadToClose)
 126         {
 127           DEVTRACE("SALOMETraceCollector _threadToClose");
 128           //break;
 129         }
 130
 131       int fullBuf = myTraceBuffer->retrieve(myTrace);
 132       if (!CORBA::is_nil(_orb))
 133         {
 134           if (myTrace.traceType == ABORT_MESS)
 135             {
 136               stringstream abortMessage("");
 137 #ifndef WNT
 138               abortMessage << "INTERRUPTION from thread "
 139                            << myTrace.threadId << " : " << myTrace.trace;
 140 #else
 141               abortMessage << "INTERRUPTION from thread "
 142                            << (void*)&myTrace.threadId
 143                            << " : " << myTrace.trace;
 144 #endif
 145               CORBA::String_var LogMsg =
 146                 CORBA::string_dup(abortMessage.str().c_str());
 147               m_pInterfaceLogger->putMessage(LogMsg);
 148               exit(1);
 149             }
 150           else
 151             {
 152               stringstream aMessage("");
 153 #ifndef WNT
 154               aMessage << "th. " << myTrace.threadId
 155 #else
 156                 aMessage << "th. " << (void*)&myTrace.threadId
 157 #endif
 158                        << " " << myTrace.trace;
 159               CORBA::String_var LogMsg =
 160                 CORBA::string_dup(aMessage.str().c_str());
 161               m_pInterfaceLogger->putMessage(LogMsg);
 162             }
 163         }
 164     }
 165   pthread_exit(NULL);
 166   return NULL;
 167 }
 168
 169 // ============================================================================
 170 /*!
 171  *  Destructor: wait until printing thread ends (SALOMETraceCollector::run)
 172  */
 173 // ============================================================================
 174
 175 SALOMETraceCollector:: ~SALOMETraceCollector()
 176 {
 177   int ret;
 178   ret = pthread_mutex_lock(&_singletonMutex); // acquire lock to be alone
 179   if (_singleton)
 180     {
 181       DEVTRACE("SALOMETraceCollector:: ~SALOMETraceCollector()");
 182       LocalTraceBufferPool* myTraceBuffer = LocalTraceBufferPool::instance();
 183       _threadToClose = 1;
 184       myTraceBuffer->insert(NORMAL_MESS,"end of trace\n"); // to wake up thread
 185       if (_threadId)
 186         {
 187           int ret = pthread_join(*_threadId, NULL);
 188           if (ret) cerr << "error close SALOMETraceCollector : "<< ret << endl;
 189           else DEVTRACE("SALOMETraceCollector destruction OK");
 190           _threadId = 0;
 191           _threadToClose = 0;
 192         }
 193       _singleton = 0;
 194       ret = pthread_mutex_unlock(&_singletonMutex); // release lock
 195     }
 196 }
 197
 198 // ============================================================================
 199 /*!
 200  * Constructor: no need of LocalTraceBufferPool object initialization here,
 201  * thread safe singleton used in LocalTraceBufferPool::instance()
 202  */
 203 // ============================================================================
 204
 205 SALOMETraceCollector::SALOMETraceCollector()
 206 {
 207   _threadId=0;
 208   _threadToClose = 0;
 209 }
 210
 211 // ============================================================================
 212 /*!
 213  *
 214  */
 215 // ============================================================================
 216
 217 extern "C"
 218 {
 219   BaseTraceCollector *SingletonInstance(void)
 220   {
 221     BaseTraceCollector *instance = SALOMETraceCollector::instance();
 222     return instance;
 223   }
 224 }