58 lines
1.2 KiB
C
58 lines
1.2 KiB
C
/*-------------------------------------------------------------------------
|
|
*
|
|
* dynloader.c--
|
|
* dynamic loader for HP-UX using the shared library mechanism
|
|
*
|
|
* Copyright (c) 1994, Regents of the University of California
|
|
*
|
|
*
|
|
* IDENTIFICATION
|
|
* $Header: /cvsroot/pgsql/src/backend/port/dynloader/hpux.c,v 1.6 1999/01/17 03:04:50 tgl Exp $
|
|
*
|
|
* NOTES
|
|
* all functions are defined here -- it's impossible to trace the
|
|
* shl_* routines from the bundled HP-UX debugger.
|
|
*
|
|
*-------------------------------------------------------------------------
|
|
*/
|
|
/* System includes */
|
|
#include <stdio.h>
|
|
#include <a.out.h>
|
|
#include <dl.h>
|
|
#include "postgres.h"
|
|
#include "fmgr.h"
|
|
#include "utils/dynamic_loader.h"
|
|
#include "dynloader.h"
|
|
|
|
void *
|
|
pg_dlopen(char *filename)
|
|
{
|
|
shl_t handle = shl_load(filename, BIND_DEFERRED, 0);
|
|
|
|
return (void *) handle;
|
|
}
|
|
|
|
func_ptr
|
|
pg_dlsym(void *handle, char *funcname)
|
|
{
|
|
func_ptr f;
|
|
|
|
if (shl_findsym((shl_t *) & handle, funcname, TYPE_PROCEDURE, &f) == -1)
|
|
f = (func_ptr) NULL;
|
|
return f;
|
|
}
|
|
|
|
void
|
|
pg_dlclose(void *handle)
|
|
{
|
|
shl_unload((shl_t) handle);
|
|
}
|
|
|
|
char *
|
|
pg_dlerror()
|
|
{
|
|
static char errmsg[] = "shl_load failed";
|
|
|
|
return errmsg;
|
|
}
|