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 /* Copyright (C) 1998-2002 Free Software Foundation, Inc.
  21
  22    This file is part of GNU Bash, the Bourne Again SHell.
  23
  24    Bash is free software; you can redistribute it and/or modify it under
  25    the terms of the GNU General Public License as published by the Free
  26    Software Foundation; either version 2, or (at your option) any later
  27    version.
  28
  29    Bash is distributed in the hope that it will be useful, but WITHOUT ANY
  30    WARRANTY; without even the implied warranty of MERCHANTABILITY or
  31    FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  32    for more details.
  33
  34    You should have received a copy of the GNU General Public License along
  35    with Bash; see the file COPYING.  If not, write to the Free Software
  36    Foundation, 59 Temple Place, Suite 330, Boston, MA 02111 USA. */
  37
  38 #if !defined (__HPUX10_DLFCN_H__)
  39
  40 #define __HPUX10_DLFCN_H__
  41
  42 #include <dl.h>
  43 #include <errno.h>
  44
  45 #ifndef errno
  46 extern int errno;
  47 #endif
  48
  49 #define RTLD_LAZY BIND_DEFERRED
  50 #define RTLD_NOW BIND_IMMEDIATE
  51 #define RTLD_GLOBAL DYNAMIC_PATH
  52
  53 char *bash_global_sym_addr;
  54
  55 #define dlopen(file,mode) (void *)shl_load((file), (mode), 0L)
  56
  57 #define dlclose(handle) shl_unload((shl_t)(handle))
  58
  59 #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)
  60
  61 #define dlerror() strerror(errno)
  62
  63 #endif /*  __HPUX10_DLFCN_H__ */