1 // SALOME Utils : general SALOME's definitions and tools
3 // Copyright (C) 2003 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
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.
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.
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
20 // See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
24 // File : Utils_DESTRUCTEUR_GENERIQUE.cxx
25 // Author : Antoine YESSAYAN, EDF
30 void Nettoyage( void ) ;
33 # include "utilities.h"
34 # include "Utils_DESTRUCTEUR_GENERIQUE.hxx"
41 static list<DESTRUCTEUR_GENERIQUE_*> *Destructeurs=0 ;
48 * Mécanisme pour faire exécuter une seule fois DESTRUCTEUR_GENERIQUE_::Nettoyage
49 * à la fin du traitement : creation d'un singleton statique de l'objet
50 * tres specialise ATEXIT_.
52 * La création d'un objet de type ATEXIT_ entraîne l'inscription de la fonction
53 * Nettoyage() par atexit(). Il suffit donc de créer un singleton statique du type ATEXIT_
54 * pour effectuer cet enregistrement une seule fois indépendament de l'utilisateur.
61 * Allocation dynamique de Destructeurs, une liste chaînée de DESTRUCTEUR_GENERIQUE_* et enregistrement
62 * de la fonction Nettoyage() par atexit().
64 * La liste chaînée Destructeurs est détruite dans la fonction Nettoyage.
68 ASSERT (Destructeurs==0);
69 Destructeurs = new list<DESTRUCTEUR_GENERIQUE_*> ; // Destructeurs alloué dynamiquement (cf. ci-dessous) ,
70 // il est utilisé puis détruit par la fonction Nettoyage
71 int cr = atexit( Nettoyage ); // exécute Nettoyage lors de exit, après la destruction des données statiques !
77 MESSAGE("Destruction ATEXIT") ;
84 static ATEXIT_ nettoyage ; /* singleton statique */
88 * traitement effectué :
89 * -# exécution de tous les objets de type DESTRUCTEUR_DE_ stockés dans la liste Destructeurs (ce qui détruit les
90 * singletons correspondant) ;
91 * -# puis destruction de tous les objets de type DESTRUCTEUR_DE_ stockés dans la liste Destructeurs;
92 * -# destruction de la liste Destructeurs.
95 void Nettoyage( void )
97 BEGIN_OF("Nettoyage( void )") ;
98 ASSERT(Destructeurs) ;
99 SCRUTE( Destructeurs->size() ) ;
100 if( Destructeurs->size() )
102 list<DESTRUCTEUR_GENERIQUE_*>::iterator it = Destructeurs->end() ;
106 MESSAGE( "DESTRUCTION d'un SINGLETON") ;
108 DESTRUCTEUR_GENERIQUE_* ptr = *it ;
109 //Destructeurs->remove( *it ) ;
112 }while( it!= Destructeurs->begin() ) ;
114 Destructeurs->clear() ;
115 SCRUTE( Destructeurs->size() ) ;
116 ASSERT( Destructeurs->size()==0 ) ;
117 ASSERT( Destructeurs->empty() ) ;
122 END_OF("Nettoyage( void )") ;
128 * Adds a destruction object to the list of actions to be performed at the end
131 const int DESTRUCTEUR_GENERIQUE_::Ajout( DESTRUCTEUR_GENERIQUE_ &objet )
133 // N.B. : l'ordre de creation des SINGLETON etant important
134 // on n'utilise pas deux fois la meme position pour
135 // les stocker dans la pile des objets.
136 ASSERT(Destructeurs) ;
137 Destructeurs->push_back( &objet ) ;
138 return Destructeurs->size() ;