AppPkg/Applications/Python/Python-2.7.2/Python/dynload_shlib.c

   1
   2 /* Support for dynamic loading of extension modules */
   3
   4 #include "Python.h"
   5 #include "importdl.h"
   6
   7 #include <sys/types.h>
   8 #include <sys/stat.h>
   9
  10 #if defined(__NetBSD__)
  11 #include <sys/param.h>
  12 #if (NetBSD < 199712)
  13 #include <nlist.h>
  14 #include <link.h>
  15 #define dlerror() "error in dynamic linking"
  16 #endif
  17 #endif /* NetBSD */
  18
  19 #ifdef HAVE_DLFCN_H
  20 #include <dlfcn.h>
  21 #else
  22 #if defined(PYOS_OS2) && defined(PYCC_GCC)
  23 #include "dlfcn.h"
  24 #endif
  25 #endif
  26
  27 #if (defined(__OpenBSD__) || defined(__NetBSD__)) && !defined(__ELF__)
  28 #define LEAD_UNDERSCORE "_"
  29 #else
  30 #define LEAD_UNDERSCORE ""
  31 #endif
  32
  33
  34 const struct filedescr _PyImport_DynLoadFiletab[] = {
  35 #ifdef __CYGWIN__
  36     {".dll", "rb", C_EXTENSION},
  37     {"module.dll", "rb", C_EXTENSION},
  38 #else
  39 #if defined(PYOS_OS2) && defined(PYCC_GCC)
  40     {".pyd", "rb", C_EXTENSION},
  41     {".dll", "rb", C_EXTENSION},
  42 #else
  43 #ifdef __VMS
  44     {".exe", "rb", C_EXTENSION},
  45     {".EXE", "rb", C_EXTENSION},
  46     {"module.exe", "rb", C_EXTENSION},
  47     {"MODULE.EXE", "rb", C_EXTENSION},
  48 #else
  49     {".so", "rb", C_EXTENSION},
  50     {"module.so", "rb", C_EXTENSION},
  51 #endif
  52 #endif
  53 #endif
  54     {0, 0}
  55 };
  56
  57 static struct {
  58     dev_t dev;
  59 #ifdef __VMS
  60     ino_t ino[3];
  61 #else
  62     ino_t ino;
  63 #endif
  64     void *handle;
  65 } handles[128];
  66 static int nhandles = 0;
  67
  68
  69 dl_funcptr _PyImport_GetDynLoadFunc(const char *fqname, const char *shortname,
  70                                     const char *pathname, FILE *fp)
  71 {
  72     dl_funcptr p;
  73     void *handle;
  74     char funcname[258];
  75     char pathbuf[260];
  76     int dlopenflags=0;
  77
  78     if (strchr(pathname, '/') == NULL) {
  79         /* Prefix bare filename with "./" */
  80         PyOS_snprintf(pathbuf, sizeof(pathbuf), "./%-.255s", pathname);
  81         pathname = pathbuf;
  82     }
  83
  84     PyOS_snprintf(funcname, sizeof(funcname),
  85                   LEAD_UNDERSCORE "init%.200s", shortname);
  86
  87     if (fp != NULL) {
  88         int i;
  89         struct stat statb;
  90         fstat(fileno(fp), &statb);
  91         for (i = 0; i < nhandles; i++) {
  92             if (statb.st_dev == handles[i].dev &&
  93                 statb.st_ino == handles[i].ino) {
  94                 p = (dl_funcptr) dlsym(handles[i].handle,
  95                                        funcname);
  96                 return p;
  97             }
  98         }
  99         if (nhandles < 128) {
 100             handles[nhandles].dev = statb.st_dev;
 101 #ifdef __VMS
 102             handles[nhandles].ino[0] = statb.st_ino[0];
 103             handles[nhandles].ino[1] = statb.st_ino[1];
 104             handles[nhandles].ino[2] = statb.st_ino[2];
 105 #else
 106             handles[nhandles].ino = statb.st_ino;
 107 #endif
 108         }
 109     }
 110
 111 #if !(defined(PYOS_OS2) && defined(PYCC_GCC))
 112     dlopenflags = PyThreadState_GET()->interp->dlopenflags;
 113 #endif
 114
 115     if (Py_VerboseFlag)
 116         PySys_WriteStderr("dlopen(\"%s\", %x);\n", pathname,
 117                           dlopenflags);
 118
 119 #ifdef __VMS
 120     /* VMS currently don't allow a pathname, use a logical name instead */
 121     /* Concatenate 'python_module_' and shortname */
 122     /* so "import vms.bar" will use the logical python_module_bar */
 123     /* As C module use only one name space this is probably not a */
 124     /* important limitation */
 125     PyOS_snprintf(pathbuf, sizeof(pathbuf), "python_module_%-.200s",
 126                   shortname);
 127     pathname = pathbuf;
 128 #endif
 129
 130     handle = dlopen(pathname, dlopenflags);
 131
 132     if (handle == NULL) {
 133         const char *error = dlerror();
 134         if (error == NULL)
 135             error = "unknown dlopen() error";
 136         PyErr_SetString(PyExc_ImportError, error);
 137         return NULL;
 138     }
 139     if (fp != NULL && nhandles < 128)
 140         handles[nhandles++].handle = handle;
 141     p = (dl_funcptr) dlsym(handle, funcname);
 142     return p;
 143 }