1 /* dlinfo -- Get information from the dynamic linker.
2 Copyright (C) 2003-2014 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
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.
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.
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/>. */
24 #if !defined SHARED && IS_IN (libdl)
27 dlinfo (void *handle
, int request
, void *arg
)
29 return __dlinfo (handle
, request
, arg
, RETURN_ADDRESS (0));
45 dlinfo_doit (void *argsblock
)
47 struct dlinfo_args
*const args
= argsblock
;
48 struct link_map
*l
= args
->handle
;
51 if (args
->handle
== RTLD_SELF
)
55 /* Find the highest-addressed object that CALLER is not below. */
56 for (nsid
= 0; nsid
< DL_NNS
; ++nsid
)
57 for (l
= GL(dl_ns
)[nsid
]._ns_loaded
; l
!= NULL
; l
= l
->l_next
)
58 if (caller
>= l
->l_map_start
&& caller
< l
->l_map_end
59 && (l
->l_contiguous
|| _dl_addr_inside_object (l
, caller
)))
63 GLRO(dl_signal_error
) (0, NULL
, NULL
, N_("\
64 RTLD_SELF used in code not dynamically loaded"));
68 switch (args
->request
)
70 case RTLD_DI_CONFIGADDR
:
72 GLRO(dl_signal_error
) (0, NULL
, NULL
, N_("unsupported dlinfo request"));
76 *(Lmid_t
*) args
->arg
= l
->l_ns
;
80 *(struct link_map
**) args
->arg
= l
;
84 _dl_rtld_di_serinfo (l
, args
->arg
, false);
86 case RTLD_DI_SERINFOSIZE
:
87 _dl_rtld_di_serinfo (l
, args
->arg
, true);
91 strcpy (args
->arg
, l
->l_origin
);
94 case RTLD_DI_TLS_MODID
:
95 *(size_t *) args
->arg
= 0;
96 *(size_t *) args
->arg
= l
->l_tls_modid
;
99 case RTLD_DI_TLS_DATA
:
102 if (l
->l_tls_modid
!= 0)
103 data
= GLRO(dl_tls_get_addr_soft
) (l
);
104 *(void **) args
->arg
= data
;
111 __dlinfo (void *handle
, int request
, void *arg DL_CALLER_DECL
)
114 if (__glibc_unlikely (_dlfcn_hook
!= NULL
))
115 return _dlfcn_hook
->dlinfo (handle
, request
, arg
,
119 struct dlinfo_args args
= { (ElfW(Addr
)) DL_CALLER
,
120 handle
, request
, arg
};
121 return _dlerror_run (&dlinfo_doit
, &args
) ? -1 : 0;
124 strong_alias (__dlinfo
, dlinfo
)