70 lines
2.5 KiB
C
70 lines
2.5 KiB
C
/* Configuration of lookup functions.
|
|
Copyright (C) 2000 Free Software Foundation, Inc.
|
|
This file is part of the GNU C Library.
|
|
|
|
The GNU C Library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Lesser General Public
|
|
License as published by the Free Software Foundation; either
|
|
version 2.1 of the License, or (at your option) any later version.
|
|
|
|
The GNU C Library is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Lesser General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Lesser General Public
|
|
License along with the GNU C Library; if not, write to the Free
|
|
Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
|
|
02111-1307 USA. */
|
|
|
|
/* Like IA-64, PA-RISC needs more information from the symbol lookup
|
|
function than just the address. */
|
|
#define DL_LOOKUP_RETURNS_MAP
|
|
#define ELF_FUNCTION_PTR_IS_SPECIAL
|
|
#define DL_UNMAP_IS_SPECIAL
|
|
|
|
/* Forward declaration. */
|
|
struct link_map;
|
|
|
|
void *_dl_symbol_address (struct link_map *map, const ElfW(Sym) *ref);
|
|
|
|
#define DL_SYMBOL_ADDRESS(map, ref) _dl_symbol_address(map, ref)
|
|
|
|
Elf32_Addr _dl_lookup_address (const void *address);
|
|
|
|
/* Clear the bottom two bits so generic code can find the fdesc entry */
|
|
#define DL_LOOKUP_ADDRESS(addr) \
|
|
(_dl_lookup_address ((void *)((unsigned long)addr & ~3)))
|
|
|
|
void _dl_unmap (struct link_map *map);
|
|
|
|
#define DL_UNMAP(map) _dl_unmap (map)
|
|
|
|
#define DL_AUTO_FUNCTION_ADDRESS(map, addr) \
|
|
({ \
|
|
unsigned int fptr[2]; \
|
|
fptr[0] = (unsigned int) (addr); \
|
|
fptr[1] = (map)->l_info[DT_PLTGOT]->d_un.d_ptr; \
|
|
/* Set bit 30 to indicate to $$dyncall that this is a PLABEL. */ \
|
|
(ElfW(Addr))((unsigned int)fptr | 2); \
|
|
})
|
|
|
|
#define DL_STATIC_FUNCTION_ADDRESS(map, addr) \
|
|
({ \
|
|
static unsigned int fptr[2]; \
|
|
fptr[0] = (unsigned int) (addr); \
|
|
fptr[1] = (map)->l_info[DT_PLTGOT]->d_un.d_ptr; \
|
|
/* Set bit 30 to indicate to $$dyncall that this is a PLABEL. */ \
|
|
(ElfW(Addr))((unsigned int)fptr | 2); \
|
|
})
|
|
|
|
|
|
/* The test for "addr & 2" below is to accomodate old binaries which
|
|
violated the ELF ABI by pointing DT_INIT and DT_FINI at a function
|
|
descriptor. */
|
|
#define DL_DT_INIT_ADDRESS(map, addr) \
|
|
((Elf32_Addr)(addr) & 2 ? (addr) : DL_AUTO_FUNCTION_ADDRESS (map, addr))
|
|
#define DL_DT_FINI_ADDRESS(map, addr) \
|
|
((Elf32_Addr)(addr) & 2 ? (addr) : DL_AUTO_FUNCTION_ADDRESS (map, addr))
|
|
|