* sysdeps/unix/sysv/linux/m68k/register-dump.h: Use
[glibc.git] / elf / dl-iteratephdr.c
blobd615cd631223cba238b92a2bb25797bbc6005634
1 /* Get loaded objects program headers.
2 Copyright (C) 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Jakub Jelinek <jakub@redhat.com>, 2001.
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.
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.
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. */
21 #include <errno.h>
22 #include <ldsodefs.h>
23 #include <stddef.h>
24 #include <bits/libc-lock.h>
26 static void
27 cancel_handler (void *arg __attribute__((unused)))
29 __rtld_lock_unlock_recursive (GL(dl_load_lock));
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)
37 struct link_map *l;
38 struct dl_phdr_info info;
39 int ret = 0;
41 /* Make sure we are alone. */
42 __rtld_lock_lock_recursive (GL(dl_load_lock));
43 __libc_cleanup_push (cancel_handler, 0);
45 for (l = GL(dl_loaded); l != NULL; l = l->l_next)
47 info.dlpi_addr = l->l_addr;
48 info.dlpi_name = l->l_name;
49 info.dlpi_phdr = l->l_phdr;
50 info.dlpi_phnum = l->l_phnum;
51 info.dlpi_adds = GL(dl_load_adds);
52 info.dlpi_subs = GL(dl_load_adds) - GL(dl_nloaded);
53 ret = callback (&info, sizeof (struct dl_phdr_info), data);
54 if (ret)
55 break;
58 /* Release the lock. */
59 __libc_cleanup_pop (0);
60 __rtld_lock_unlock_recursive (GL(dl_load_lock));
62 return ret;
64 hidden_def (__dl_iterate_phdr)
66 #ifdef SHARED
68 weak_alias (__dl_iterate_phdr, dl_iterate_phdr);
70 #else
72 /* dl-support.c defines these and initializes them early on. */
73 extern ElfW(Phdr) *_dl_phdr;
74 extern size_t _dl_phnum;
76 int
77 dl_iterate_phdr (int (*callback) (struct dl_phdr_info *info,
78 size_t size, void *data), void *data)
80 if (_dl_phnum != 0)
82 /* This entry describes this statically-linked program itself. */
83 struct dl_phdr_info info;
84 int ret;
85 info.dlpi_addr = 0;
86 info.dlpi_name = "";
87 info.dlpi_phdr = _dl_phdr;
88 info.dlpi_phnum = _dl_phnum;
89 info.dlpi_adds = GL(dl_load_adds);
90 info.dlpi_subs = GL(dl_load_adds) - GL(dl_nloaded);
91 ret = (*callback) (&info, sizeof (struct dl_phdr_info), data);
92 if (ret)
93 return ret;
96 return __dl_iterate_phdr (callback, data);
100 #endif