mirror of
https://github.com/python/cpython.git
synced 2024-11-24 10:24:35 +08:00
f95a1b3c53
svn+ssh://pythondev@svn.python.org/python/trunk ........ r81029 | antoine.pitrou | 2010-05-09 16:46:46 +0200 (dim., 09 mai 2010) | 3 lines Untabify C files. Will watch buildbots. ........
115 lines
3.9 KiB
C
115 lines
3.9 KiB
C
|
|
/* Support for dynamic loading of extension modules on Mac OS X
|
|
** All references to "NeXT" are for historical reasons.
|
|
*/
|
|
|
|
#include "Python.h"
|
|
#include "importdl.h"
|
|
|
|
#include <mach-o/dyld.h>
|
|
|
|
const struct filedescr _PyImport_DynLoadFiletab[] = {
|
|
{".so", "rb", C_EXTENSION},
|
|
{"module.so", "rb", C_EXTENSION},
|
|
{0, 0}
|
|
};
|
|
|
|
/*
|
|
** Python modules are Mach-O MH_BUNDLE files. The best way to load these
|
|
** is each in a private namespace, so you can load, say, a module bar and a
|
|
** module foo.bar. If we load everything in the global namespace the two
|
|
** initbar() symbols will conflict.
|
|
** However, it seems some extension packages depend upon being able to access
|
|
** each others' global symbols. There seems to be no way to eat our cake and
|
|
** have it, so the USE_DYLD_GLOBAL_NAMESPACE define determines which behaviour
|
|
** you get.
|
|
*/
|
|
|
|
#ifdef USE_DYLD_GLOBAL_NAMESPACE
|
|
#define LINKOPTIONS NSLINKMODULE_OPTION_BINDNOW|NSLINKMODULE_OPTION_RETURN_ON_ERROR
|
|
#else
|
|
#define LINKOPTIONS NSLINKMODULE_OPTION_BINDNOW| \
|
|
NSLINKMODULE_OPTION_RETURN_ON_ERROR|NSLINKMODULE_OPTION_PRIVATE
|
|
#endif
|
|
dl_funcptr _PyImport_GetDynLoadFunc(const char *fqname, const char *shortname,
|
|
const char *pathname, FILE *fp)
|
|
{
|
|
dl_funcptr p = NULL;
|
|
char funcname[258];
|
|
NSObjectFileImageReturnCode rc;
|
|
NSObjectFileImage image;
|
|
NSModule newModule;
|
|
NSSymbol theSym;
|
|
const char *errString;
|
|
char errBuf[512];
|
|
|
|
PyOS_snprintf(funcname, sizeof(funcname), "_PyInit_%.200s", shortname);
|
|
|
|
#ifdef USE_DYLD_GLOBAL_NAMESPACE
|
|
if (NSIsSymbolNameDefined(funcname)) {
|
|
theSym = NSLookupAndBindSymbol(funcname);
|
|
p = (dl_funcptr)NSAddressOfSymbol(theSym);
|
|
return p;
|
|
}
|
|
#endif
|
|
rc = NSCreateObjectFileImageFromFile(pathname, &image);
|
|
switch(rc) {
|
|
default:
|
|
case NSObjectFileImageFailure:
|
|
case NSObjectFileImageFormat:
|
|
/* for these a message is printed on stderr by dyld */
|
|
errString = "Can't create object file image";
|
|
break;
|
|
case NSObjectFileImageSuccess:
|
|
errString = NULL;
|
|
break;
|
|
case NSObjectFileImageInappropriateFile:
|
|
errString = "Inappropriate file type for dynamic loading";
|
|
break;
|
|
case NSObjectFileImageArch:
|
|
errString = "Wrong CPU type in object file";
|
|
break;
|
|
case NSObjectFileImageAccess:
|
|
errString = "Can't read object file (no access)";
|
|
break;
|
|
}
|
|
if (errString == NULL) {
|
|
newModule = NSLinkModule(image, pathname, LINKOPTIONS);
|
|
if (newModule == NULL) {
|
|
int errNo;
|
|
const char *fileName, *moreErrorStr;
|
|
NSLinkEditErrors c;
|
|
NSLinkEditError( &c, &errNo, &fileName, &moreErrorStr );
|
|
PyOS_snprintf(errBuf, 512, "Failure linking new module: %s: %s",
|
|
fileName, moreErrorStr);
|
|
errString = errBuf;
|
|
}
|
|
}
|
|
if (errString != NULL) {
|
|
PyErr_SetString(PyExc_ImportError, errString);
|
|
return NULL;
|
|
}
|
|
#ifdef USE_DYLD_GLOBAL_NAMESPACE
|
|
if (!NSIsSymbolNameDefined(funcname)) {
|
|
/* UnlinkModule() isn't implemented in current versions, but calling it does no harm */
|
|
/* NSUnLinkModule(newModule, FALSE); removed: causes problems for ObjC code */
|
|
PyErr_Format(PyExc_ImportError,
|
|
"Loaded module does not contain symbol %.200s",
|
|
funcname);
|
|
return NULL;
|
|
}
|
|
theSym = NSLookupAndBindSymbol(funcname);
|
|
#else
|
|
theSym = NSLookupSymbolInModule(newModule, funcname);
|
|
if ( theSym == NULL ) {
|
|
/* NSUnLinkModule(newModule, FALSE); removed: causes problems for ObjC code */
|
|
PyErr_Format(PyExc_ImportError,
|
|
"Loaded module does not contain symbol %.200s",
|
|
funcname);
|
|
return NULL;
|
|
}
|
|
#endif
|
|
p = (dl_funcptr)NSAddressOfSymbol(theSym);
|
|
return p;
|
|
}
|