mirror of
				https://github.com/python/cpython.git
				synced 2025-10-22 17:33:55 +00:00 
			
		
		
		
	
		
			
				
	
	
		
			143 lines
		
	
	
	
		
			3.2 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			143 lines
		
	
	
	
		
			3.2 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
| 
 | |
| /* Support for dynamic loading of extension modules */
 | |
| 
 | |
| #include "Python.h"
 | |
| #include "importdl.h"
 | |
| 
 | |
| #include <sys/types.h>
 | |
| #include <sys/stat.h>
 | |
| 
 | |
| #if defined(__NetBSD__)
 | |
| #include <sys/param.h>
 | |
| #if (NetBSD < 199712)
 | |
| #include <nlist.h>
 | |
| #include <link.h>
 | |
| #define dlerror() "error in dynamic linking"
 | |
| #endif
 | |
| #endif /* NetBSD */
 | |
| 
 | |
| #ifdef HAVE_DLFCN_H
 | |
| #include <dlfcn.h>
 | |
| #else
 | |
| #if defined(PYOS_OS2) && defined(PYCC_GCC)
 | |
| #include "dlfcn.h"
 | |
| #endif
 | |
| #endif
 | |
| 
 | |
| #if (defined(__OpenBSD__) || defined(__NetBSD__)) && !defined(__ELF__)
 | |
| #define LEAD_UNDERSCORE "_"
 | |
| #else
 | |
| #define LEAD_UNDERSCORE ""
 | |
| #endif
 | |
| 
 | |
| 
 | |
| const struct filedescr _PyImport_DynLoadFiletab[] = {
 | |
| #ifdef __CYGWIN__
 | |
| 	{".dll", "rb", C_EXTENSION},
 | |
| 	{"module.dll", "rb", C_EXTENSION},
 | |
| #else
 | |
| #if defined(PYOS_OS2) && defined(PYCC_GCC)
 | |
| 	{".pyd", "rb", C_EXTENSION},
 | |
| 	{".dll", "rb", C_EXTENSION},
 | |
| #else
 | |
| #ifdef __VMS
 | |
|         {".exe", "rb", C_EXTENSION},
 | |
|         {".EXE", "rb", C_EXTENSION},
 | |
|         {"module.exe", "rb", C_EXTENSION},
 | |
|         {"MODULE.EXE", "rb", C_EXTENSION},
 | |
| #else
 | |
| 	{".so", "rb", C_EXTENSION},
 | |
| 	{"module.so", "rb", C_EXTENSION},
 | |
| #endif
 | |
| #endif
 | |
| #endif
 | |
| 	{0, 0}
 | |
| };
 | |
| 
 | |
| static struct {
 | |
| 	dev_t dev;
 | |
| #ifdef __VMS
 | |
| 	ino_t ino[3];
 | |
| #else
 | |
| 	ino_t ino;
 | |
| #endif
 | |
| 	void *handle;
 | |
| } handles[128];
 | |
| static int nhandles = 0;
 | |
| 
 | |
| 
 | |
| dl_funcptr _PyImport_GetDynLoadFunc(const char *fqname, const char *shortname,
 | |
| 				    const char *pathname, FILE *fp)
 | |
| {
 | |
| 	dl_funcptr p;
 | |
| 	void *handle;
 | |
| 	char funcname[258];
 | |
| 	char pathbuf[260];
 | |
|         int dlopenflags=0;
 | |
| 
 | |
| 	if (strchr(pathname, '/') == NULL) {
 | |
| 		/* Prefix bare filename with "./" */
 | |
| 		PyOS_snprintf(pathbuf, sizeof(pathbuf), "./%-.255s", pathname);
 | |
| 		pathname = pathbuf;
 | |
| 	}
 | |
| 
 | |
| 	PyOS_snprintf(funcname, sizeof(funcname), 
 | |
| 		      LEAD_UNDERSCORE "init%.200s", shortname);
 | |
| 
 | |
| 	if (fp != NULL) {
 | |
| 		int i;
 | |
| 		struct stat statb;
 | |
| 		fstat(fileno(fp), &statb);
 | |
| 		for (i = 0; i < nhandles; i++) {
 | |
| 			if (statb.st_dev == handles[i].dev &&
 | |
| 			    statb.st_ino == handles[i].ino) {
 | |
| 				p = (dl_funcptr) dlsym(handles[i].handle,
 | |
| 						       funcname);
 | |
| 				return p;
 | |
| 			}
 | |
| 		}
 | |
| 		if (nhandles < 128) {
 | |
| 			handles[nhandles].dev = statb.st_dev;
 | |
| #ifdef __VMS
 | |
| 			handles[nhandles].ino[0] = statb.st_ino[0];
 | |
| 			handles[nhandles].ino[1] = statb.st_ino[1];
 | |
| 			handles[nhandles].ino[2] = statb.st_ino[2];
 | |
| #else
 | |
| 			handles[nhandles].ino = statb.st_ino;
 | |
| #endif
 | |
| 		}
 | |
| 	}
 | |
| 
 | |
| #if !(defined(PYOS_OS2) && defined(PYCC_GCC))
 | |
|         dlopenflags = PyThreadState_GET()->interp->dlopenflags;
 | |
| #endif
 | |
| 
 | |
| 	if (Py_VerboseFlag)
 | |
| 		PySys_WriteStderr("dlopen(\"%s\", %x);\n", pathname, 
 | |
| 				  dlopenflags);
 | |
| 
 | |
| #ifdef __VMS
 | |
| 	/* VMS currently don't allow a pathname, use a logical name instead */
 | |
| 	/* Concatenate 'python_module_' and shortname */
 | |
| 	/* so "import vms.bar" will use the logical python_module_bar */
 | |
| 	/* As C module use only one name space this is probably not a */
 | |
| 	/* important limitation */
 | |
| 	PyOS_snprintf(pathbuf, sizeof(pathbuf), "python_module_%-.200s", 
 | |
| 		      shortname);
 | |
| 	pathname = pathbuf;
 | |
| #endif
 | |
| 
 | |
| 	handle = dlopen(pathname, dlopenflags);
 | |
| 
 | |
| 	if (handle == NULL) {
 | |
| 		const char *error = dlerror();
 | |
| 		if (error == NULL)
 | |
| 			error = "unknown dlopen() error";
 | |
| 		PyErr_SetString(PyExc_ImportError, error);
 | |
| 		return NULL;
 | |
| 	}
 | |
| 	if (fp != NULL && nhandles < 128)
 | |
| 		handles[nhandles++].handle = handle;
 | |
| 	p = (dl_funcptr) dlsym(handle, funcname);
 | |
| 	return p;
 | |
| }
 | 
