dynload_hpux.c

/* Support for dynamic loading of extension modules */

#include"dl.h"
#include<errno.h>

#include"Python.h"
#include"pycore_importdl.h"

#if defined(__hp9000s300)
#defineFUNCNAME_PATTERN "_%.20s_%.200s"
#else
#defineFUNCNAME_PATTERN "%.20s_%.200s"
#endif

constchar*_PyImport_DynLoadFiletab[] = {SHLIB_EXT, ".sl", NULL};

dl_funcptr_PyImport_FindSharedFuncptr(constchar*prefix,
constchar*shortname,
constchar*pathname, FILE*fp)
{
intflags=BIND_FIRST | BIND_DEFERRED;
intverbose=_Py_GetConfig()->verbose;
if (verbose) {
flags=BIND_FIRST | BIND_IMMEDIATE |
BIND_NONFATAL | BIND_VERBOSE;
printf("shl_load %s\n",pathname);
 }

shl_tlib=shl_load(pathname, flags, 0);
/* XXX Chuck Blake once wrote that 0 should be BIND_NOSTART? */
if (lib==NULL) {
if (verbose) {
perror(pathname);
 }
charbuf[256];
PyOS_snprintf(buf, sizeof(buf), "Failed to load %.200s",
pathname);
PyObject*buf_ob=PyUnicode_DecodeFSDefault(buf);
if (buf_ob==NULL)
returnNULL;
PyObject*shortname_ob=PyUnicode_FromString(shortname);
if (shortname_ob==NULL) {
Py_DECREF(buf_ob);
returnNULL;
 }
PyObject*pathname_ob=PyUnicode_DecodeFSDefault(pathname);
if (pathname_ob==NULL) {
Py_DECREF(buf_ob);
Py_DECREF(shortname_ob);
returnNULL;
 }
PyErr_SetImportError(buf_ob, shortname_ob, pathname_ob);
Py_DECREF(buf_ob);
Py_DECREF(shortname_ob);
Py_DECREF(pathname_ob);
returnNULL;
 }

charfuncname[258];
PyOS_snprintf(funcname, sizeof(funcname), FUNCNAME_PATTERN,
prefix, shortname);
if (verbose) {
printf("shl_findsym %s\n", funcname);
 }

dl_funcptrp;
if (shl_findsym(&lib, funcname, TYPE_UNDEFINED, (void*) &p) ==-1) {
shl_unload(lib);
p=NULL;
 }
if (p==NULL&&verbose) {
perror(funcname);
 }
returnp;
}