X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/da55d0644f1cc11b5c55de4fc18d039f69666e86..62f04b576fb46674a0797b06bde5e5990e88c69f:/src/unix/dlunix.cpp diff --git a/src/unix/dlunix.cpp b/src/unix/dlunix.cpp index 3d85ece2bd..efe3f7e2ef 100644 --- a/src/unix/dlunix.cpp +++ b/src/unix/dlunix.cpp @@ -26,6 +26,32 @@ #if wxUSE_DYNLIB_CLASS #include "wx/dynlib.h" +#include "wx/ffile.h" + +#ifndef WX_PRECOMP + #include "wx/intl.h" + #include "wx/log.h" +#endif + +// only Mac OS X 10.3+ has dlfcn.h, and it is simpler to always provide our own +// wrappers using the native functions instead of doing checks for OS version +#ifndef __DARWIN__ + #include +#endif + +// if some flags are not supported, just ignore them +#ifndef RTLD_LAZY + #define RTLD_LAZY 0 +#endif + +#ifndef RTLD_NOW + #define RTLD_NOW 0 +#endif + +#ifndef RTLD_GLOBAL + #define RTLD_GLOBAL 0 +#endif + #if defined(HAVE_DLOPEN) || defined(__DARWIN__) #define USE_POSIX_DL_FUNCS @@ -72,29 +98,6 @@ static char dl_last_error[1024]; -static -void TranslateError(const char *path, 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])) - - index = number; - if (index > NUM_OFI_ERRORS - 1) { - index = NUM_OFI_ERRORS - 1; - } - sprintf(dl_last_error, OFIErrorStrings[index], path, number); -} - const char *dlerror() { return dl_last_error; @@ -105,10 +108,29 @@ void *dlopen(const char *path, int WXUNUSED(mode) /* mode is ignored */) NSObjectFileImage ofile; NSModule handle = NULL; - int dyld_result = NSCreateObjectFileImageFromFile(path, &ofile); + unsigned dyld_result = NSCreateObjectFileImageFromFile(path, &ofile); if ( dyld_result != NSObjectFileImageSuccess ) { handle = NULL; + + static const char *errorStrings[] = + { + "%d: Object Image Load Failure", + "%d: Object Image Load Success", + "%d: Not an recognisable object file", + "%d: No valid architecture", + "%d: Object image has an invalid format", + "%d: Invalid access (permissions?)", + "%d: Unknown error code from NSCreateObjectFileImageFromFile" + }; + + const int index = dyld_result < WXSIZEOF(errorStrings) + ? dyld_result + : WXSIZEOF(errorStrings) - 1; + + // this call to sprintf() is safe as strings above are fixed at + // compile-time and are shorter than WXSIZEOF(dl_last_error) + sprintf(dl_last_error, errorStrings[index], dyld_result); } else { @@ -119,17 +141,27 @@ void *dlopen(const char *path, int WXUNUSED(mode) /* mode is ignored */) NSLINKMODULE_OPTION_BINDNOW | NSLINKMODULE_OPTION_RETURN_ON_ERROR ); + + if ( !handle ) + { + NSLinkEditErrors err; + int code; + const char *filename; + const char *errmsg; + + NSLinkEditError(&err, &code, &filename, &errmsg); + strncpy(dl_last_error, errmsg, WXSIZEOF(dl_last_error)-1); + dl_last_error[WXSIZEOF(dl_last_error)-1] = '\0'; + } } - if ( !handle ) - TranslateError(path, dyld_result); return handle; } int dlclose(void *handle) { - NSUnLinkModule( handle, NSUNLINKMODULE_OPTION_NONE); + NSUnLinkModule((NSModule)handle, NSUNLINKMODULE_OPTION_NONE); return 0; } @@ -143,7 +175,7 @@ void *dlsym(void *handle, const char *symbol) p[0] = '_'; strcpy(p + 1, symbol); - NSSymbol nsSymbol = NSLookupSymbolInModule( handle, p ); + NSSymbol nsSymbol = NSLookupSymbolInModule((NSModule)handle, p ); return nsSymbol ? NSAddressOfSymbol(nsSymbol) : NULL; } @@ -165,30 +197,17 @@ wxDllType wxDynamicLibrary::GetProgramHandle() /* static */ wxDllType wxDynamicLibrary::RawLoad(const wxString& libname, int flags) { - wxASSERT_MSG( (flags & wxDL_NOW) == 0, + wxASSERT_MSG( !(flags & wxDL_NOW) || !(flags & wxDL_LAZY), _T("wxDL_LAZY and wxDL_NOW are mutually exclusive.") ); #ifdef USE_POSIX_DL_FUNCS - int rtldFlags = 0; + // we need to use either RTLD_NOW or RTLD_LAZY because if we call dlopen() + // with flags == 0 recent versions of glibc just fail the call, so use + // RTLD_NOW even if wxDL_NOW was not specified + int rtldFlags = flags & wxDL_LAZY ? RTLD_LAZY : RTLD_NOW; -#ifdef RTLD_LAZY - if ( flags & wxDL_LAZY ) - { - rtldFlags |= RTLD_LAZY; - } -#endif -#ifdef RTLD_NOW - if ( flags & wxDL_NOW ) - { - rtldFlags |= RTLD_NOW; - } -#endif -#ifdef RTLD_GLOBAL if ( flags & wxDL_GLOBAL ) - { rtldFlags |= RTLD_GLOBAL; - } -#endif return dlopen(libname.fn_str(), rtldFlags); #else // !USE_POSIX_DL_FUNCS @@ -220,7 +239,7 @@ void wxDynamicLibrary::Unload(wxDllType handle) shl_unload(handle); #endif // USE_POSIX_DL_FUNCS/!USE_POSIX_DL_FUNCS -#ifdef USE_POSIX_DL_FUNCS +#if defined(USE_POSIX_DL_FUNCS) && defined(wxHAVE_DYNLIB_ERROR) if ( rc != 0 ) Error(); #endif @@ -243,6 +262,10 @@ void *wxDynamicLibrary::RawGetSymbol(wxDllType handle, const wxString& name) return symbol; } +// ---------------------------------------------------------------------------- +// error handling +// ---------------------------------------------------------------------------- + #ifdef wxHAVE_DYNLIB_ERROR /* static */ @@ -260,5 +283,121 @@ void wxDynamicLibrary::Error() #endif // wxHAVE_DYNLIB_ERROR +// ---------------------------------------------------------------------------- +// listing loaded modules +// ---------------------------------------------------------------------------- + +// wxDynamicLibraryDetails declares this class as its friend, so put the code +// initializing new details objects here +class wxDynamicLibraryDetailsCreator +{ +public: + // create a new wxDynamicLibraryDetails from the given data + static wxDynamicLibraryDetails * + New(void *start, void *end, const wxString& path) + { + wxDynamicLibraryDetails *details = new wxDynamicLibraryDetails; + details->m_path = path; + details->m_name = path.AfterLast(_T('/')); + details->m_address = start; + details->m_length = (char *)end - (char *)start; + + // try to extract the library version from its name + const size_t posExt = path.rfind(_T(".so")); + if ( posExt != wxString::npos ) + { + if ( path.c_str()[posExt + 3] == _T('.') ) + { + // assume "libfoo.so.x.y.z" case + details->m_version.assign(path, posExt + 4, wxString::npos); + } + else + { + size_t posDash = path.find_last_of(_T('-'), posExt); + if ( posDash != wxString::npos ) + { + // assume "libbar-x.y.z.so" case + posDash++; + details->m_version.assign(path, posDash, posExt - posDash); + } + } + } + + return details; + } +}; + +/* static */ +wxDynamicLibraryDetailsArray wxDynamicLibrary::ListLoaded() +{ + wxDynamicLibraryDetailsArray dlls; + +#ifdef __LINUX__ + // examine /proc/self/maps to find out what is loaded in our address space + wxFFile file(_T("/proc/self/maps")); + if ( file.IsOpened() ) + { + // details of the module currently being parsed + wxString pathCur; + void *startCur = NULL, + *endCur = NULL; + + char path[1024]; + char buf[1024]; + while ( fgets(buf, WXSIZEOF(buf), file.fp()) ) + { + // format is: "start-end perm offset maj:min inode path", see proc(5) + void *start, + *end; + switch ( sscanf(buf, "%p-%p %*4s %*p %*02x:%*02x %*d %1024s\n", + &start, &end, path) ) + { + case 2: + // there may be no path column + path[0] = '\0'; + break; + + case 3: + // nothing to do, read everything we wanted + break; + + default: + // chop '\n' + buf[strlen(buf) - 1] = '\0'; + wxLogDebug(_T("Failed to parse line \"%s\" in /proc/self/maps."), + buf); + continue; + } + + wxASSERT_MSG( start >= endCur, + _T("overlapping regions in /proc/self/maps?") ); + + wxString pathNew = wxString::FromAscii(path); + if ( pathCur.empty() ) + { + // new module start + pathCur = pathNew; + startCur = start; + endCur = end; + } + else if ( pathCur == pathNew && endCur == end ) + { + // continuation of the same module in the address space + endCur = end; + } + else // end of the current module + { + dlls.Add(wxDynamicLibraryDetailsCreator::New(startCur, + endCur, + pathCur)); + pathCur.clear(); + } + } + } +#endif // __LINUX__ + + return dlls; +} + #endif // wxUSE_DYNLIB_CLASS