CWRU/misc/hpux10-dlfcn.h

   1 /*
   2  * HPUX 10.x stubs to implement dl* in terms of shl*
   3  *
   4  * Not needed for later versions; HPUX 11.x has dlopen() and friends.
   5  *
   6  * configure also needs to be faked out.  You can create a dummy libdl.a
   7  * with stub entries for dlopen, dlclose, dlsym, and dlerror:
   8  *
   9  *      int dlopen() { return(0);}
  10  *      int dlclose() { return(0);}
  11  *      int dlsym() { return(0);}
  12  *      int dlerror() { return(0);}
  13  *
  14  * This has not been tested; I just read the manual page and coded this up.
  15  *
  16  * According to the ld manual page, you need to link bash with -dld and add
  17  * the -E flag to LOCAL_LDFLAGS.
  18  */
  19
  20 #if !defined (__HPUX10_DLFCN_H__)
  21
  22 #define __HPUX10_DLFCN_H__
  23
  24 #include <dl.h>
  25 #include <errno.h>
  26
  27 #ifndef errno
  28 extern int errno;
  29 #endif
  30
  31 #define RTLD_LAZY BIND_DEFERRED
  32 #define RTLD_NOW BIND_IMMEDIATE
  33 #define RTLD_GLOBAL DYNAMIC_PATH
  34
  35 char *bash_global_sym_addr;
  36
  37 #define dlopen(file,mode) (void *)shl_load((file), (mode), 0L)
  38
  39 #define dlclose(handle) shl_unload((shl_t)(handle))
  40
  41 #define dlsym(handle,name) (bash_global_sym_addr=0,shl_findsym((shl_t *)&(handle),name,TYPE_UNDEFINED,&bash_global_sym_addr), (void *)bash_global_sym_addr)
  42
  43 #define dlerror() strerror(errno)
  44
  45 #endif /*  __HPUX10_DLFCN_H__ */