1 /* Configuration of lookup functions. 2 Copyright (C) 2000-2021 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, see 17 <https://www.gnu.org/licenses/>. */ 18 19 #define ELF_FUNCTION_PTR_IS_SPECIAL 20 #define DL_UNMAP_IS_SPECIAL 21 22 #include <dl-fptr.h> 23 24 /* Forward declaration. */ 25 struct link_map; 26 27 void *_dl_symbol_address (struct link_map *map, const ElfW(Sym) *ref); 28 rtld_hidden_proto (_dl_symbol_address) 29 30 #define DL_SYMBOL_ADDRESS(map, ref) _dl_symbol_address(map, ref) 31 32 Elf32_Addr _dl_lookup_address (const void *address); 33 34 #define DL_LOOKUP_ADDRESS(addr) _dl_lookup_address ((const void *) addr) 35 36 void attribute_hidden _dl_unmap (struct link_map *map); 37 38 #define DL_UNMAP(map) _dl_unmap (map) 39 40 #define DL_DT_FUNCTION_ADDRESS(map, start, attr, addr) \ 41 attr volatile unsigned int fptr[2]; \ 42 /* The test for "start & 2" below is to accommodate old binaries which \ 43 violated the ELF ABI by pointing DT_INIT and DT_FINI at a function \ 44 descriptor. */ \ 45 if ((ElfW(Addr)) (start) & 2) \ 46 addr = (ElfW(Addr)) start; \ 47 else \ 48 { \ 49 fptr[0] = (unsigned int) (start); \ 50 fptr[1] = (map)->l_info[DT_PLTGOT]->d_un.d_ptr; \ 51 /* Set bit 30 to indicate to $$dyncall that this is a PLABEL. */ \ 52 addr = (ElfW(Addr))((unsigned int)fptr | 2); \ 53 } \ 54 55 #define DL_CALL_DT_INIT(map, start, argc, argv, env) \ 56 { \ 57 ElfW(Addr) addr; \ 58 DL_DT_FUNCTION_ADDRESS(map, start, , addr) \ 59 dl_init_t init = (dl_init_t) addr; \ 60 init (argc, argv, env); \ 61 } 62 63 #define DL_CALL_DT_FINI(map, start) \ 64 { \ 65 ElfW(Addr) addr; \ 66 DL_DT_FUNCTION_ADDRESS(map, start, , addr) \ 67 fini_t fini = (fini_t) addr; \ 68 fini (); \ 69 } 70 71 /* The type of the return value of fixup/profile_fixup */ 72 #define DL_FIXUP_VALUE_TYPE struct fdesc 73 74 /* Construct a fixup value from the address and linkmap */ 75 #define DL_FIXUP_MAKE_VALUE(map, addr) \ 76 (map) ? ((struct fdesc) { (addr), (map)->l_info[DT_PLTGOT]->d_un.d_ptr }) \ 77 : ((struct fdesc) { 0, 0 }) 78 79 /* Extract the code address from a fixup value */ 80 #define DL_FIXUP_VALUE_CODE_ADDR(value) ((value).ip) 81 #define DL_FIXUP_VALUE_ADDR(value) ((uintptr_t) &(value)) 82 #define DL_FIXUP_ADDR_VALUE(addr) (*(struct fdesc *) (addr)) 83