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 using namespace std;
  40
  41 void Nettoyage();
  42
  43 #ifdef _DEBUG_
  44 static int MYDEBUG = 0;
  45 #else
  46 static int MYDEBUG = 0;
  47 #endif
  48
  49 static list<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 (Destructeurs==0);
  82                 if(MYDEBUG) MESSAGE("Construction ATEXIT"); // message necessaire pour utiliser logger dans Nettoyage (cf.BUG KERNEL4561)
  83                 Destructeurs = new list<DESTRUCTEUR_GENERIQUE_*> ; // Destructeurs alloué dynamiquement (cf. ci-dessous) ,
  84                                                                    // il est utilisé puis détruit par la fonction Nettoyage
  85                 int cr = atexit( Nettoyage );                      // exécute Nettoyage lors de exit, après la destruction des données statiques !
  86                 ASSERT(cr==0) ;
  87                 ATEXIT_Done = true ;
  88           }
  89         }
  90
  91         ~ATEXIT_( )
  92         {
  93                 if(MYDEBUG) MESSAGE("Destruction ATEXIT") ;
  94         }
  95 };
  96
  97
  98
  99
 100 static ATEXIT_ nettoyage = ATEXIT_( false );    /* singleton statique */
 101
 102
 103 /*!
 104  * traitement effectué :
 105  * -# exécution de tous les objets de type DESTRUCTEUR_DE_ stockés dans la liste Destructeurs (ce qui détruit les
 106  *    singletons correspondant) ;
 107  * -# puis destruction de tous les objets de type DESTRUCTEUR_DE_ stockés dans la liste Destructeurs;
 108  * -# destruction de la liste Destructeurs.
 109  */
 110
 111 void Nettoyage( void )
 112 {
 113         if(MYDEBUG) BEGIN_OF("Nettoyage( void )") ;
 114         ASSERT(Destructeurs) ;
 115         if(MYDEBUG) SCRUTE( Destructeurs->size() ) ;
 116         if( Destructeurs->size() )
 117         {
 118                 list<DESTRUCTEUR_GENERIQUE_*>::iterator it = Destructeurs->end() ;
 119
 120                 do
 121                 {
 122                         if(MYDEBUG) MESSAGE( "DESTRUCTION d'un SINGLETON");
 123                         it-- ;
 124                         DESTRUCTEUR_GENERIQUE_* ptr = *it ;
 125                         //Destructeurs->remove( *it ) ;
 126                         (*ptr)() ;
 127                         delete ptr ;
 128                 }while( it!=  Destructeurs->begin() ) ;
 129
 130                 Destructeurs->clear() ;
 131                 if(MYDEBUG) SCRUTE( Destructeurs->size() ) ;
 132                 ASSERT( Destructeurs->size()==0 ) ;
 133                 ASSERT( Destructeurs->empty() ) ;
 134         }
 135
 136         delete Destructeurs;
 137         Destructeurs=0;
 138         if(MYDEBUG) END_OF("Nettoyage( void )") ;
 139         return ;
 140 }
 141
 142
 143 /*!
 144  * Adds a destruction object to the list of actions to be performed at the end
 145  * of the process
 146  */
 147 const int DESTRUCTEUR_GENERIQUE_::Ajout( DESTRUCTEUR_GENERIQUE_ &objet )
 148 {
 149         // N.B. : l'ordre de creation des SINGLETON etant important
 150         //        on n'utilise pas deux fois la meme position pour
 151         //        les stocker dans la pile des objets.
 152
 153         //CCRT
 154         if ( !ATEXIT_Done ) {
 155           nettoyage = ATEXIT_( true ) ;
 156         }
 157         //CCRT
 158         ASSERT(Destructeurs) ;
 159         Destructeurs->push_back( &objet ) ;
 160         return Destructeurs->size() ;
 161 }