| 1 | /* Locate the shared object symbol nearest a given address. |
| 2 | Copyright (C) 2003-2019 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 | <http://www.gnu.org/licenses/>. */ |
| 18 | |
| 19 | #include <dlfcn.h> |
| 20 | #include <ldsodefs.h> |
| 21 | |
| 22 | #if !defined SHARED && IS_IN (libdl) |
| 23 | |
| 24 | int |
| 25 | dladdr1 (const void *address, Dl_info *info, void **extra, int flags) |
| 26 | { |
| 27 | return __dladdr1 (address, info, extra, flags); |
| 28 | } |
| 29 | |
| 30 | #else |
| 31 | |
| 32 | int |
| 33 | __dladdr1 (const void *address, Dl_info *info, void **, int flags) |
| 34 | { |
| 35 | # ifdef SHARED |
| 36 | if (!rtld_active ()) |
| 37 | return _dlfcn_hook->dladdr1 (address, info, extra, flags); |
| 38 | # endif |
| 39 | |
| 40 | switch (flags) |
| 41 | { |
| 42 | default: /* Make this an error? */ |
| 43 | case 0: |
| 44 | return _dl_addr (address, info, NULL, NULL); |
| 45 | case RTLD_DL_SYMENT: |
| 46 | return _dl_addr (address, info, NULL, (const ElfW(Sym) **) extra); |
| 47 | case RTLD_DL_LINKMAP: |
| 48 | return _dl_addr (address, info, (struct link_map **) extra, NULL); |
| 49 | } |
| 50 | } |
| 51 | # ifdef SHARED |
| 52 | strong_alias (__dladdr1, dladdr1) |
| 53 | # endif |
| 54 | #endif |
| 55 | |