1 /////////////////////////////////////////////////////////////////////////////
3 // Purpose: Modules initialization/destruction
4 // Author: Wolfram Gloger/adapted by Guilhem Lavaux
8 // Copyright: (c) Wolfram Gloger and Guilhem Lavaux
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
13 #pragma implementation "module.h"
16 // For compilers that support precompilation, includes "wx.h".
17 #include "wx/wxprec.h"
23 #include "wx/module.h"
25 #include "wx/listimpl.cpp"
27 WX_DEFINE_LIST(wxModuleList
);
29 IMPLEMENT_CLASS(wxModule
, wxObject
)
31 wxModuleList
wxModule::m_modules
;
33 void wxModule::RegisterModule(wxModule
* module)
35 m_modules
.Append(module);
38 void wxModule::UnregisterModule(wxModule
* module)
40 m_modules
.DeleteObject(module);
44 // Collect up all module-derived classes, create an instance of each,
46 void wxModule::RegisterModules()
48 wxHashTable::compatibility_iterator node
;
49 wxClassInfo
* classInfo
;
51 wxClassInfo::sm_classTable
->BeginFind();
52 node
= wxClassInfo::sm_classTable
->Next();
55 classInfo
= (wxClassInfo
*)node
->GetData();
56 if ( classInfo
->IsKindOf(CLASSINFO(wxModule
)) &&
57 (classInfo
!= (& (wxModule::ms_classInfo
))) )
59 wxModule
* module = (wxModule
*)classInfo
->CreateObject();
60 RegisterModule(module);
62 node
= wxClassInfo::sm_classTable
->Next();
66 bool wxModule::InitializeModules()
68 // Initialize user-defined modules
69 wxModuleList::compatibility_iterator node
;
70 for ( node
= m_modules
.GetFirst(); node
; node
= node
->GetNext() )
72 if ( !node
->GetData()->Init() )
74 // clean up already initialized modules - process in reverse order
75 wxModuleList::compatibility_iterator n
;
76 for ( n
= node
->GetPrevious(); n
; n
= n
->GetPrevious() )
78 n
->GetData()->OnExit();
88 void wxModule::CleanUpModules()
90 // Cleanup user-defined modules
91 wxModuleList::compatibility_iterator node
;
92 for ( node
= m_modules
.GetFirst(); node
; node
= node
->GetNext() )
94 node
->GetData()->Exit();
97 WX_CLEAR_LIST(wxModuleList
, m_modules
);