dlfcn/dladdr1.c

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