| |
| /* Support for dynamic loading of extension modules */ |
| |
| #define INCL_DOSERRORS |
| #define INCL_DOSMODULEMGR |
| #include <os2.h> |
| |
| #include "Python.h" |
| #include "importdl.h" |
| |
| |
| const char *_PyImport_DynLoadFiletab[] = {".pyd", ".dll", NULL}; |
| |
| dl_funcptr _PyImport_GetDynLoadFunc(const char *shortname, |
| const char *pathname, FILE *fp) |
| { |
| dl_funcptr p; |
| APIRET rc; |
| HMODULE hDLL; |
| char failreason[256]; |
| char funcname[258]; |
| |
| rc = DosLoadModule(failreason, |
| sizeof(failreason), |
| pathname, |
| &hDLL); |
| |
| if (rc != NO_ERROR) { |
| char errBuf[256]; |
| PyOS_snprintf(errBuf, sizeof(errBuf), |
| "DLL load failed, rc = %d: %.200s", |
| rc, failreason); |
| PyErr_SetString(PyExc_ImportError, errBuf); |
| return NULL; |
| } |
| |
| PyOS_snprintf(funcname, sizeof(funcname), "PyInit_%.200s", shortname); |
| rc = DosQueryProcAddr(hDLL, 0L, funcname, &p); |
| if (rc != NO_ERROR) |
| p = NULL; /* Signify Failure to Acquire Entrypoint */ |
| return p; |
| } |