src/Utils/Utils_DESTRUCTEUR_GENERIQUE.cxx

   1 //  SALOME Utils : general SALOME's definitions and tools
   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   : Utils_DESTRUCTEUR_GENERIQUE.cxx
  25 //  Author : Antoine YESSAYAN, EDF
  26 //  Module : SALOME
  27 //  $Header$
  28
  29
  30 # include <iostream>
  31 # include <list>
  32 extern "C"
  33 {
  34 # include <stdlib.h>
  35 }
  36
  37 # include "Utils_DESTRUCTEUR_GENERIQUE.hxx"
  38 # include "utilities.h"
  39 void Nettoyage();
  40
  41 #ifdef _DEBUG_
  42 static int MYDEBUG = 0;
  43 #else
  44 static int MYDEBUG = 0;
  45 #endif
  46
  47 using namespace std;
  48
  49 std::list<DESTRUCTEUR_GENERIQUE_*> *DESTRUCTEUR_GENERIQUE_::Destructeurs=0 ;
  50
  51 /*! \class ATEXIT_
  52  *
  53  * Mécanisme pour faire exécuter une seule fois DESTRUCTEUR_GENERIQUE_::Nettoyage
  54  * à la fin du traitement : creation d'un singleton statique de l'objet
  55  * tres specialise ATEXIT_.
  56  *
  57  * La création d'un objet de type ATEXIT_ entraîne l'inscription de la fonction
  58  * Nettoyage() par atexit(). Il suffit donc de créer un singleton statique du type ATEXIT_
  59  * pour effectuer cet enregistrement une seule fois indépendament de l'utilisateur.
  60  */
  61
  62 //CCRT
  63 static bool ATEXIT_Done = false ;
  64 //CCRT
  65
  66 class ATEXIT_
  67 {
  68 public :
  69         /*!
  70          * Allocation dynamique de Destructeurs, une liste chaînée de DESTRUCTEUR_GENERIQUE_* et enregistrement
  71          * de la fonction Nettoyage() par atexit().
  72          *
  73          * La liste chaînée Destructeurs est détruite dans la fonction Nettoyage.
  74          */
  75         //CCRT  ATEXIT_( void )
  76         ATEXIT_( bool Make_ATEXIT )
  77         {
  78           //CCRT
  79           if ( Make_ATEXIT && !ATEXIT_Done ) {
  80             //CCRT
  81                 ASSERT (DESTRUCTEUR_GENERIQUE_::Destructeurs==0);
  82                 if(MYDEBUG) MESSAGE("Construction ATEXIT"); // message necessaire pour utiliser logger dans Nettoyage (cf.BUG KERNEL4561)
  83                 DESTRUCTEUR_GENERIQUE_::Destructeurs =
  84                       new std::list<DESTRUCTEUR_GENERIQUE_*> ; // Destructeurs alloué dynamiquement (cf. ci-dessous) ,
  85                                                                    // il est utilisé puis détruit par la fonction Nettoyage
  86                 int cr = atexit( Nettoyage );                      // exécute Nettoyage lors de exit, après la destruction des données statiques !
  87                 ASSERT(cr==0) ;
  88                 ATEXIT_Done = true ;
  89           }
  90         }
  91
  92         ~ATEXIT_( )
  93         {
  94                 if(MYDEBUG) MESSAGE("Destruction ATEXIT") ;
  95         }
  96 };
  97
  98
  99
 100
 101 static ATEXIT_ nettoyage = ATEXIT_( false );    /* singleton statique */
 102
 103
 104 /*!
 105  * traitement effectué :
 106  * -# exécution de tous les objets de type DESTRUCTEUR_DE_ stockés dans la liste Destructeurs (ce qui détruit les
 107  *    singletons correspondant) ;
 108  * -# puis destruction de tous les objets de type DESTRUCTEUR_DE_ stockés dans la liste Destructeurs;
 109  * -# destruction de la liste Destructeurs.
 110  */
 111
 112 void Nettoyage( void )
 113 {
 114         if(MYDEBUG) BEGIN_OF("Nettoyage( void )") ;
 115         ASSERT(DESTRUCTEUR_GENERIQUE_::Destructeurs) ;
 116         if(MYDEBUG) SCRUTE( DESTRUCTEUR_GENERIQUE_::Destructeurs->size() ) ;
 117         if( DESTRUCTEUR_GENERIQUE_::Destructeurs->size() )
 118         {
 119                 std::list<DESTRUCTEUR_GENERIQUE_*>::iterator it = DESTRUCTEUR_GENERIQUE_::Destructeurs->end() ;
 120
 121                 do
 122                 {
 123                         if(MYDEBUG) MESSAGE( "DESTRUCTION d'un SINGLETON");
 124                         it-- ;
 125                         DESTRUCTEUR_GENERIQUE_* ptr = *it ;
 126                         //DESTRUCTEUR_GENERIQUE_::Destructeurs->remove( *it ) ;
 127                         (*ptr)() ;
 128                         delete ptr ;
 129                 }while( it!=  DESTRUCTEUR_GENERIQUE_::Destructeurs->begin() ) ;
 130
 131                 DESTRUCTEUR_GENERIQUE_::Destructeurs->clear() ;
 132                 if(MYDEBUG) SCRUTE( DESTRUCTEUR_GENERIQUE_::Destructeurs->size() ) ;
 133                 ASSERT( DESTRUCTEUR_GENERIQUE_::Destructeurs->size()==0 ) ;
 134                 ASSERT( DESTRUCTEUR_GENERIQUE_::Destructeurs->empty() ) ;
 135         }
 136
 137         delete DESTRUCTEUR_GENERIQUE_::Destructeurs;
 138         DESTRUCTEUR_GENERIQUE_::Destructeurs=0;
 139         if(MYDEBUG) END_OF("Nettoyage( void )") ;
 140         return ;
 141 }
 142
 143
 144 /*!
 145  * Adds a destruction object to the list of actions to be performed at the end
 146  * of the process
 147  */
 148 const int DESTRUCTEUR_GENERIQUE_::Ajout( DESTRUCTEUR_GENERIQUE_ &objet )
 149 {
 150         // N.B. : l'ordre de creation des SINGLETON etant important
 151         //        on n'utilise pas deux fois la meme position pour
 152         //        les stocker dans la pile des objets.
 153
 154         //CCRT
 155         if ( !ATEXIT_Done ) {
 156           nettoyage = ATEXIT_( true ) ;
 157         }
 158         //CCRT
 159         ASSERT(Destructeurs) ;
 160         Destructeurs->push_back( &objet ) ;
 161         return Destructeurs->size() ;
 162 }