elf/dl-iteratephdr.c

   1 /* Get loaded objects program headers.
   2    Copyright (C) 2001,2002,2003,2004,2006 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4    Contributed by Jakub Jelinek <jakub@redhat.com>, 2001.
   5
   6    The GNU C Library is free software; you can redistribute it and/or
   7    modify it under the terms of the GNU Lesser General Public License as
   8    published by the Free Software Foundation; either version 2.1 of the
   9    License, or (at your option) any later version.
  10
  11    The GNU C Library is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14    Lesser General Public License for more details.
  15
  16    You should have received a copy of the GNU Lesser General Public
  17    License along with the GNU C Library; see the file COPYING.LIB.  If not,
  18    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  19    Boston, MA 02111-1307, USA.  */
  20
  21 #include <errno.h>
  22 #include <ldsodefs.h>
  23 #include <stddef.h>
  24 #include <bits/libc-lock.h>
  25
  26 static void
  27 cancel_handler (void *arg __attribute__((unused)))
  28 {
  29   __rtld_lock_unlock_recursive (GL(dl_load_lock));
  30 }
  31
  32 hidden_proto (__dl_iterate_phdr)
  33 int
  34 __dl_iterate_phdr (int (*callback) (struct dl_phdr_info *info,
  35                                     size_t size, void *data), void *data)
  36 {
  37   struct link_map *l;
  38   struct dl_phdr_info info;
  39   int ret = 0;
  40
  41   /* Make sure we are alone.  */
  42   __rtld_lock_lock_recursive (GL(dl_load_lock));
  43   __libc_cleanup_push (cancel_handler, 0);
  44
  45   /* We have to determine the namespace of the caller since this determines
  46      which namespace is reported.  */
  47   const void *caller = RETURN_ADDRESS (0);
  48   size_t nloaded = GL(dl_ns)[0]._ns_nloaded;
  49   Lmid_t ns = 0;
  50   for (Lmid_t cnt = DL_NNS - 1; cnt > 0; --cnt)
  51     for (struct link_map *l = GL(dl_ns)[cnt]._ns_loaded; l; l = l->l_next)
  52       {
  53         /* We have to count the total number of loaded objects.  */
  54         nloaded += GL(dl_ns)[cnt]._ns_nloaded;
  55
  56         if (caller >= (const void *) l->l_map_start
  57             && caller < (const void *) l->l_map_end)
  58           /* There must be exactly one DSO for the range of the virtual
  59              memory.  Otherwise something is really broken.  */
  60           ns = cnt;
  61       }
  62
  63   for (l = GL(dl_ns)[ns]._ns_loaded; l != NULL; l = l->l_next)
  64     {
  65       info.dlpi_addr = l->l_addr;
  66       info.dlpi_name = l->l_name;
  67       info.dlpi_phdr = l->l_phdr;
  68       info.dlpi_phnum = l->l_phnum;
  69       info.dlpi_adds = GL(dl_load_adds);
  70       info.dlpi_subs = GL(dl_load_adds) - nloaded;
  71       info.dlpi_tls_modid = 0;
  72       info.dlpi_tls_data = NULL;
  73 #ifdef USE_TLS
  74       info.dlpi_tls_modid = l->l_tls_modid;
  75       if (info.dlpi_tls_modid != 0)
  76         info.dlpi_tls_data = _dl_tls_get_addr_soft (l);
  77 #endif
  78       ret = callback (&info, sizeof (struct dl_phdr_info), data);
  79       if (ret)
  80         break;
  81     }
  82
  83   /* Release the lock.  */
  84   __libc_cleanup_pop (0);
  85   __rtld_lock_unlock_recursive (GL(dl_load_lock));
  86
  87   return ret;
  88 }
  89 hidden_def (__dl_iterate_phdr)
  90
  91 #ifdef SHARED
  92
  93 weak_alias (__dl_iterate_phdr, dl_iterate_phdr);
  94
  95 #else
  96
  97 /* dl-support.c defines these and initializes them early on.  */
  98 extern ElfW(Phdr) *_dl_phdr;
  99 extern size_t _dl_phnum;
 100
 101 int
 102 dl_iterate_phdr (int (*callback) (struct dl_phdr_info *info,
 103                                   size_t size, void *data), void *data)
 104 {
 105   if (_dl_phnum != 0)
 106     {
 107       /* This entry describes this statically-linked program itself.  */
 108       struct dl_phdr_info info;
 109       int ret;
 110       info.dlpi_addr = 0;
 111       info.dlpi_name = "";
 112       info.dlpi_phdr = _dl_phdr;
 113       info.dlpi_phnum = _dl_phnum;
 114       info.dlpi_adds = GL(dl_load_adds);
 115       info.dlpi_subs = GL(dl_load_adds) - GL(dl_ns)[LM_ID_BASE]._ns_nloaded;
 116       ret = (*callback) (&info, sizeof (struct dl_phdr_info), data);
 117       if (ret)
 118         return ret;
 119     }
 120
 121   return __dl_iterate_phdr (callback, data);
 122 }
 123
 124
 125 #endif