summaryrefslogtreecommitdiff
path: root/Python/dynload_shlib.c
diff options
context:
space:
mode:
authorMartin v. Löwis <martin@v.loewis.de>2003-05-03 09:14:54 +0000
committerMartin v. Löwis <martin@v.loewis.de>2003-05-03 09:14:54 +0000
commitc16f3bd8a391a68427a95e15a3c1894198ff0377 (patch)
tree113dca8c40c8a42cb665e6bcc4af44f9f68bd230 /Python/dynload_shlib.c
parente59e2bab8fe0fc3d20e815ac0f9b83d361d0d715 (diff)
downloadcpython-git-c16f3bd8a391a68427a95e15a3c1894198ff0377.tar.gz
Patch #708495: Port more stuff to OpenVMS.
Diffstat (limited to 'Python/dynload_shlib.c')
-rw-r--r--Python/dynload_shlib.c28
1 files changed, 28 insertions, 0 deletions
diff --git a/Python/dynload_shlib.c b/Python/dynload_shlib.c
index 61674ba555..af23f80a27 100644
--- a/Python/dynload_shlib.c
+++ b/Python/dynload_shlib.c
@@ -40,16 +40,27 @@ const struct filedescr _PyImport_DynLoadFiletab[] = {
{".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;
@@ -87,7 +98,13 @@ dl_funcptr _PyImport_GetDynLoadFunc(const char *fqname, const char *shortname,
}
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
}
}
@@ -98,6 +115,17 @@ dl_funcptr _PyImport_GetDynLoadFunc(const char *fqname, const char *shortname,
if (Py_VerboseFlag)
printf("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) {