X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/7fc0bd1c0541a819d51354a4a86f126dbb8ad08f..1a1dac18e34ef7736c1e82f3ede88338e78824b6:/src/common/dynload.cpp?ds=sidebyside diff --git a/src/common/dynload.cpp b/src/common/dynload.cpp index 490ca392d7..264de9248f 100644 --- a/src/common/dynload.cpp +++ b/src/common/dynload.cpp @@ -21,22 +21,37 @@ #include "wx/wxprec.h" #ifdef __BORLANDC__ -#pragma hdrstop + #pragma hdrstop #endif #if wxUSE_DYNAMIC_LOADER #ifdef __WINDOWS__ -#include "wx/msw/private.h" + #include "wx/msw/private.h" #endif #ifndef WX_PRECOMP -#include "wx/log.h" -#include "wx/intl.h" + #include "wx/log.h" + #include "wx/intl.h" #endif -#include "wx/dynload.h" +#include "wx/filename.h" // for SplitPath() +#include "wx/dynload.h" +#include "wx/module.h" + +#if defined(__DARWIN__) +/* Porting notes: + * The dlopen port is a port from dl_next.xs by Anno Siegel. + * dl_next.xs is itself a port from dl_dlopen.xs by Paul Marquess. + * The method used here is just to supply the sun style dlopen etc. + * functions in terms of Darwin NS*. + */ +void *dlopen(const char *path, int mode /* mode is ignored */); +void *dlsym(void *handle, const char *symbol); +int dlclose(void *handle); +const char *dlerror(void); +#endif // ============================================================================ // implementation @@ -50,13 +65,13 @@ // platform dependent files. #if defined(__WINDOWS__) || defined(__WXPM__) || defined(__EMX__) -const wxString wxDynamicLibrary::ms_dllext( _T(".dll") ); + const wxChar *wxDynamicLibrary::ms_dllext = _T(".dll"); #elif defined(__UNIX__) -#if defined(__HPUX__) -const wxString wxDynamicLibrary::ms_dllext( _T(".sl") ); -#else -const wxString wxDynamicLibrary::ms_dllext( _T(".so") ); -#endif + #if defined(__HPUX__) + const wxChar *wxDynamicLibrary::ms_dllext = _T(".sl"); + #else + const wxChar *wxDynamicLibrary::ms_dllext = _T(".so"); + #endif #endif wxDllType wxDynamicLibrary::GetProgramHandle() @@ -75,10 +90,19 @@ bool wxDynamicLibrary::Load(wxString libname, int flags) { wxASSERT_MSG(m_handle == 0, _T("Library already loaded.")); - if( !(flags & wxDL_VERBATIM) ) - libname += GetDllExt(); + // add the proper extension for the DLL ourselves unless told not to + if ( !(flags & wxDL_VERBATIM) ) + { + // and also check that the libname doesn't already have it + wxString ext; + wxFileName::SplitPath(libname, NULL, NULL, &ext); + if ( ext.empty() ) + { + libname += GetDllExt(); + } + } -#if defined(__WXMAC__) && !defined(__UNIX__) +#if defined(__WXMAC__) && !defined(__DARWIN__) FSSpec myFSSpec; Ptr myMainAddr; Str255 myErrName; @@ -103,11 +127,11 @@ bool wxDynamicLibrary::Load(wxString libname, int flags) #elif defined(__WXPM__) || defined(__EMX__) char err[256] = ""; - DosLoadModule(err, sizeof(err), libname.c_str(), &m_handle) + DosLoadModule(err, sizeof(err), libname.c_str(), &m_handle); -#elif defined(HAVE_DLOPEN) +#elif defined(HAVE_DLOPEN) || defined(__DARWIN__) -#ifdef __VMS +#if defined(__VMS) || defined(__DARWIN__) m_handle = dlopen(libname.c_str(), 0); // The second parameter is ignored #else int rtldFlags = 0; @@ -131,7 +155,7 @@ bool wxDynamicLibrary::Load(wxString libname, int flags) } m_handle = dlopen(libname.c_str(), rtldFlags); -#endif // __VMS +#endif // __VMS || __DARWIN__ #elif defined(HAVE_SHL_LOAD) int shlFlags = 0; @@ -148,21 +172,6 @@ bool wxDynamicLibrary::Load(wxString libname, int flags) } m_handle = shl_load(libname.c_str(), BIND_DEFERRED, 0); -#elif defined(__DARWIN__) - NSObjectFileImage ofile; - int dyld_result = NSCreateObjectFileImageFromFile(libname.c_str(), &ofile); - - if (dyld_result != NSObjectFileImageSuccess) - { - TranslateError(libname.c_str(), OFImage, dyld_result); - } - else - { - // NSLinkModule will cause the run to abort on any link error's - // not very friendly but the error recovery functionality is limited. - m_handle = NSLinkModule(ofile, libname.c_str(), TRUE); - } - #elif defined(__WINDOWS__) m_handle = ::LoadLibrary(libname.c_str()); @@ -173,7 +182,7 @@ bool wxDynamicLibrary::Load(wxString libname, int flags) if ( m_handle == 0 ) { wxString msg(_("Failed to load shared library '%s'")); -#ifdef HAVE_DLERROR +#if defined(HAVE_DLERROR) && !defined(__EMX__) const wxChar *err = dlerror(); if( err ) wxLogError( msg, err ); @@ -191,14 +200,14 @@ void wxDynamicLibrary::Unload() { #if defined(__WXPM__) || defined(__EMX__) DosFreeModule( m_handle ); -#elif defined(HAVE_DLOPEN) +#elif defined(HAVE_DLOPEN) || defined(__DARWIN__) dlclose( m_handle ); #elif defined(HAVE_SHL_LOAD) shl_unload( m_handle ); #elif defined(__WINDOWS__) ::FreeLibrary( m_handle ); -#elif defined(__WXMAC__) - CloseConnection( &m_handle ); +#elif defined(__WXMAC__) && !defined(__DARWIN__) + CloseConnection( (CFragConnectionID*) &m_handle ); #else #error "runtime shared lib support not implemented" #endif @@ -214,7 +223,7 @@ void *wxDynamicLibrary::GetSymbol(const wxString &name, bool *success) const bool failed = FALSE; void *symbol = 0; -#if defined(__WXMAC__) && !defined(__UNIX__) +#if defined(__WXMAC__) && !defined(__DARWIN__) Ptr symAddress; CFragSymbolClass symClass; Str255 symName; @@ -230,17 +239,13 @@ void *wxDynamicLibrary::GetSymbol(const wxString &name, bool *success) const #elif defined(__WXPM__) || defined(__EMX__) DosQueryProcAddr( m_handle, 1L, name.c_str(), (PFN*)symbol ); -#elif defined(HAVE_DLOPEN) +#elif defined(HAVE_DLOPEN) || defined(__DARWIN__) symbol = dlsym( m_handle, name.c_str() ); #elif defined(HAVE_SHL_LOAD) if( shl_findsym( &m_handle, name.c_str(), TYPE_UNDEFINED, &symbol ) != 0 ) symbol = 0; -#elif defined(__DARWIN__) - if( NSIsSymbolNameDefined( name.c_str() ) ) - symbol = NSAddressOfSymbol( NSLookupAndBindSymbol( name.c_str() ) ); - #elif defined(__WINDOWS__) symbol = (void*) ::GetProcAddress( m_handle, name.mb_str() ); @@ -251,7 +256,7 @@ void *wxDynamicLibrary::GetSymbol(const wxString &name, bool *success) const if ( !symbol ) { wxString msg(_("wxDynamicLibrary failed to GetSymbol '%s'")); -#ifdef HAVE_DLERROR +#if defined(HAVE_DLERROR) && !defined(__EMX__) const wxChar *err = dlerror(); if( err ) { @@ -276,7 +281,34 @@ void *wxDynamicLibrary::GetSymbol(const wxString &name, bool *success) const // --------------------------------------------------------------------------- -wxDLImports wxPluginLibrary::ms_classes(wxKEY_STRING); +wxDLImports* wxPluginLibrary::ms_classes = NULL; + +class wxPluginLibraryModule : public wxModule +{ +public: + wxPluginLibraryModule() { } + + // TODO: create ms_classes on demand, why always preallocate it? + virtual bool OnInit() + { + wxPluginLibrary::ms_classes = new wxDLImports(wxKEY_STRING); + wxPluginManager::CreateManifest(); + return TRUE; + } + + virtual void OnExit() + { + delete wxPluginLibrary::ms_classes; + wxPluginLibrary::ms_classes = NULL; + wxPluginManager::ClearManifest(); + } + +private: + DECLARE_DYNAMIC_CLASS(wxPluginLibraryModule ) +}; + +IMPLEMENT_DYNAMIC_CLASS(wxPluginLibraryModule, wxModule) + wxPluginLibrary::wxPluginLibrary(const wxString &libname, int flags) : m_linkcount(1) @@ -292,7 +324,10 @@ wxPluginLibrary::wxPluginLibrary(const wxString &libname, int flags) RegisterModules(); } else - --m_linkcount; // Flag us for deletion + { + // Flag us for deletion + --m_linkcount; + } } wxPluginLibrary::~wxPluginLibrary() @@ -304,14 +339,26 @@ wxPluginLibrary::~wxPluginLibrary() } } +wxPluginLibrary *wxPluginLibrary::RefLib() +{ + wxCHECK_MSG( m_linkcount > 0, NULL, + _T("Library had been already deleted!") ); + + ++m_linkcount; + return this; +} + bool wxPluginLibrary::UnrefLib() { - wxASSERT_MSG( m_objcount == 0, _T("Library unloaded before all objects were destroyed") ); - if( m_linkcount == 0 || --m_linkcount == 0 ) + wxASSERT_MSG( m_objcount == 0, + _T("Library unloaded before all objects were destroyed") ); + + if ( --m_linkcount == 0 ) { delete this; return TRUE; } + return FALSE; } @@ -343,8 +390,8 @@ void wxPluginLibrary::UpdateClassInfo() // Hash all the class names into a local table too so // we can quickly find the entry they correspond to. - if( ms_classes.Get(info->m_className) == 0 ) - ms_classes.Put(info->m_className, (wxObject *) this); + if( ms_classes->Get(info->m_className) == 0 ) + ms_classes->Put(info->m_className, (wxObject *) this); } } @@ -364,7 +411,7 @@ void wxPluginLibrary::RestoreClassInfo() for(info = m_after; info != m_before; info = info->m_next) { wxClassInfo::sm_classTable->Delete(info->m_className); - ms_classes.Delete(info->m_className); + ms_classes->Delete(info->m_className); } if( wxClassInfo::sm_first == m_after ) @@ -450,73 +497,119 @@ void wxPluginLibrary::UnregisterModules() // --------------------------------------------------------------------------- -// wxPluginLibrary +// wxPluginManager // --------------------------------------------------------------------------- -wxDLManifest wxPluginManager::ms_manifest(wxKEY_STRING); +wxDLManifest* wxPluginManager::ms_manifest = NULL; // ------------------------ // Static accessors // ------------------------ -wxPluginLibrary *wxPluginManager::LoadLibrary(const wxString &libname, int flags) +wxPluginLibrary * +wxPluginManager::LoadLibrary(const wxString &libname, int flags) { wxString realname(libname); if( !(flags & wxDL_VERBATIM) ) realname += wxDynamicLibrary::GetDllExt(); - wxPluginLibrary *entry = (wxPluginLibrary*) ms_manifest.Get(realname); + wxPluginLibrary *entry; - if( entry != 0 ) + if ( flags & wxDL_NOSHARE ) { + entry = NULL; + } + else + { + entry = (wxPluginLibrary*) ms_manifest->Get(realname); + } + + if ( entry ) + { + wxLogTrace(_T("dll"), + _T("LoadLibrary(%s): already loaded."), realname.c_str()); + entry->RefLib(); } else { entry = new wxPluginLibrary( libname, flags ); - if( entry->IsLoaded() ) + if ( entry->IsLoaded() ) { - ms_manifest.Put(realname, (wxObject*) entry); + ms_manifest->Put(realname, (wxObject*) entry); + + wxLogTrace(_T("dll"), + _T("LoadLibrary(%s): loaded ok."), realname.c_str()); + } else { - wxCHECK_MSG( entry->UnrefLib(), 0, - _T("Currently linked library is, ..not loaded??") ); - entry = 0; + wxLogTrace(_T("dll"), + _T("LoadLibrary(%s): failed to load."), realname.c_str()); + + // we have created entry just above + if ( !entry->UnrefLib() ) + { + // ... so UnrefLib() is supposed to delete it + wxFAIL_MSG( _T("Currently linked library is not loaded?") ); + } + + entry = NULL; } } + return entry; } -bool wxPluginManager::UnloadLibrary(const wxString &libname) +bool wxPluginManager::UnloadLibrary(const wxString& libname) { - wxPluginLibrary *entry = (wxPluginLibrary*) ms_manifest.Get(libname); + wxString realname = libname; + + wxPluginLibrary *entry = (wxPluginLibrary*) ms_manifest->Get(realname); - if( !entry ) - entry = (wxPluginLibrary*) ms_manifest.Get(libname + wxDynamicLibrary::GetDllExt()); + if ( !entry ) + { + realname += wxDynamicLibrary::GetDllExt(); + + entry = (wxPluginLibrary*) ms_manifest->Get(realname); + } - if( entry ) - return entry->UnrefLib(); + if ( !entry ) + { + wxLogDebug(_T("Attempt to unload library '%s' which is not loaded."), + libname.c_str()); - wxLogDebug(_T("Attempt to Unlink library '%s' (which is not linked)."), libname.c_str()); - return FALSE; + return FALSE; + } + + wxLogTrace(_T("dll"), _T("UnloadLibrary(%s)"), realname.c_str()); + + if ( !entry->UnrefLib() ) + { + // not really unloaded yet + return FALSE; + } + + ms_manifest->Delete(realname); + + return TRUE; } #if WXWIN_COMPATIBILITY_2_2 wxPluginLibrary *wxPluginManager::GetObjectFromHandle(wxDllType handle) { wxNode *node; - ms_manifest.BeginFind(); + ms_manifest->BeginFind(); - for(node = ms_manifest.Next(); node; node = ms_manifest.Next()) + for(node = ms_manifest->Next(); node; node = ms_manifest->Next()) if( ((wxPluginLibrary*)node->GetData())->GetLibHandle() == handle ) return (wxPluginLibrary*)node->GetData(); - return 0; + return NULL; } -#endif +#endif // WXWIN_COMPATIBILITY_2_2 // ------------------------ // Class implementation @@ -531,11 +624,11 @@ bool wxPluginManager::Load(const wxString &libname, int flags) void wxPluginManager::Unload() { wxNode *node; - ms_manifest.BeginFind(); + ms_manifest->BeginFind(); // It's either this or store the name of the lib just to do this. - for(node = ms_manifest.Next(); node; node = ms_manifest.Next()) + for(node = ms_manifest->Next(); node; node = ms_manifest->Next()) if( (wxPluginLibrary*)node->GetData() == m_entry ) break; @@ -546,59 +639,6 @@ void wxPluginManager::Unload() } } - -#ifdef __DARWIN__ -// --------------------------------------------------------------------------- -// For Darwin/Mac OS X -// supply the sun style dlopen functions in terms of Darwin NS* -// --------------------------------------------------------------------------- - -extern "C" { -#import -}; - -enum dyldErrorSource -{ - OFImage, -}; - -static char dl_last_error[1024]; - -static void TranslateError(const char *path, enum dyldErrorSource type, int number) -{ - unsigned int index; - static char *OFIErrorStrings[] = - { - "%s(%d): Object Image Load Failure\n", - "%s(%d): Object Image Load Success\n", - "%s(%d): Not an recognisable object file\n", - "%s(%d): No valid architecture\n", - "%s(%d): Object image has an invalid format\n", - "%s(%d): Invalid access (permissions?)\n", - "%s(%d): Unknown error code from NSCreateObjectFileImageFromFile\n", - }; -#define NUM_OFI_ERRORS (sizeof(OFIErrorStrings) / sizeof(OFIErrorStrings[0])) - - switch (type) - { - case OFImage: - index = number; - if (index > NUM_OFI_ERRORS - 1) { - index = NUM_OFI_ERRORS - 1; - } - sprintf(dl_last_error, OFIErrorStrings[index], path, number); - break; - - default: - sprintf(dl_last_error, "%s(%d): Totally unknown error type %d\n", - path, number, type); - break; - } -} - -#endif // __DARWIN__ - - // --------------------------------------------------------------------------- // wxDllLoader (all these methods are static) // --------------------------------------------------------------------------- @@ -607,19 +647,39 @@ static void TranslateError(const char *path, enum dyldErrorSource type, int numb wxDllType wxDllLoader::LoadLibrary(const wxString &name) { - wxPluginLibrary *p = wxPluginManager::LoadLibrary(name, wxDL_DEFAULT | wxDL_VERBATIM); - return p->GetLibHandle(); + wxPluginLibrary *p = wxPluginManager::LoadLibrary + ( + name, + wxDL_DEFAULT | wxDL_VERBATIM | wxDL_NOSHARE + ); + + return p ? p->GetLibHandle() : 0; } void wxDllLoader::UnloadLibrary(wxDllType handle) { wxPluginLibrary *p = wxPluginManager::GetObjectFromHandle(handle); + + wxCHECK_RET( p, _T("Unloading a library not loaded with wxDllLoader?") ); + p->UnrefLib(); } -void *wxDllLoader::GetSymbol(wxDllType dllHandle, const wxString &name, bool *success) +void * +wxDllLoader::GetSymbol(wxDllType dllHandle, const wxString &name, bool *success) { wxPluginLibrary *p = wxPluginManager::GetObjectFromHandle(dllHandle); + + if ( !p ) + { + wxFAIL_MSG( _T("Using a library not loaded with wxDllLoader?") ); + + if ( success ) + *success = FALSE; + + return NULL; + } + return p->GetSymbol(name, success); } @@ -627,4 +687,3 @@ void *wxDllLoader::GetSymbol(wxDllType dllHandle, const wxString &name, bool *su #endif // wxUSE_DYNAMIC_LOADER -// vi:sts=4:sw=4:et