sysdeps/hppa/dl-lookupcfg.h

   1 /* Configuration of lookup functions.
   2    Copyright (C) 2000 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4
   5    The GNU C Library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Lesser General Public
   7    License as published by the Free Software Foundation; either
   8    version 2.1 of the License, or (at your option) any later version.
   9
  10    The GNU C Library is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    Lesser General Public License for more details.
  14
  15    You should have received a copy of the GNU Lesser General Public
  16    License along with the GNU C Library; if not, write to the Free
  17    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  18    02111-1307 USA.  */
  19
  20 /* Like IA-64, PA-RISC needs more information from the symbol lookup
  21    function than just the address. */
  22 #define DL_LOOKUP_RETURNS_MAP
  23 #define ELF_FUNCTION_PTR_IS_SPECIAL
  24 #define DL_UNMAP_IS_SPECIAL
  25
  26 /* Forward declaration.  */
  27 struct link_map;
  28
  29 void *_dl_symbol_address (struct link_map *map, const ElfW(Sym) *ref);
  30
  31 #define DL_SYMBOL_ADDRESS(map, ref) _dl_symbol_address(map, ref)
  32
  33 Elf32_Addr _dl_lookup_address (const void *address);
  34
  35 /* Clear the bottom two bits so generic code can find the fdesc entry */
  36 #define DL_LOOKUP_ADDRESS(addr) \
  37   (_dl_lookup_address ((void *)((unsigned long)addr & ~3)))
  38
  39 void _dl_unmap (struct link_map *map);
  40
  41 #define DL_UNMAP(map) _dl_unmap (map)
  42
  43 #define DL_AUTO_FUNCTION_ADDRESS(map, addr)                             \
  44 ({                                                                      \
  45   unsigned int fptr[2];                                                 \
  46   fptr[0] = (unsigned int) (addr);                                      \
  47   fptr[1] = (map)->l_info[DT_PLTGOT]->d_un.d_ptr;                       \
  48   /* Set bit 30 to indicate to $$dyncall that this is a PLABEL. */      \
  49   (ElfW(Addr))((unsigned int)fptr | 2);                                 \
  50 })
  51
  52 #define DL_STATIC_FUNCTION_ADDRESS(map, addr)                           \
  53 ({                                                                      \
  54   static unsigned int fptr[2];                                          \
  55   fptr[0] = (unsigned int) (addr);                                      \
  56   fptr[1] = (map)->l_info[DT_PLTGOT]->d_un.d_ptr;                       \
  57   /* Set bit 30 to indicate to $$dyncall that this is a PLABEL. */      \
  58   (ElfW(Addr))((unsigned int)fptr | 2);                                 \
  59 })
  60
  61
  62 /* The test for "addr & 2" below is to accomodate old binaries which
  63    violated the ELF ABI by pointing DT_INIT and DT_FINI at a function
  64    descriptor.  */
  65 #define DL_DT_INIT_ADDRESS(map, addr) \
  66   ((Elf32_Addr)(addr) & 2 ? (addr) : DL_AUTO_FUNCTION_ADDRESS (map, addr))
  67 #define DL_DT_FINI_ADDRESS(map, addr) \
  68   ((Elf32_Addr)(addr) & 2 ? (addr) : DL_AUTO_FUNCTION_ADDRESS (map, addr))
  69