diff options
| author | Dale Rahn <drahn@cvs.openbsd.org> | 2005-10-18 02:49:18 +0000 |
|---|---|---|
| committer | Dale Rahn <drahn@cvs.openbsd.org> | 2005-10-18 02:49:18 +0000 |
| commit | 75f81e9d54b98599a879b043bb636aa260c6b187 (patch) | |
| tree | d7de096756bd43f4e73528b7fbeefff2dbe8308b /libexec | |
| parent | 31f5adb8752fd12eda87986fdabdf94498177288 (diff) | |
This is too useful for debugging to not have in the tree, however
the interface may change at any time, so dont depend on it. (ie regress)
Diffstat (limited to 'libexec')
| -rw-r--r-- | libexec/ld.so/dlfcn.c | 28 |
1 files changed, 27 insertions, 1 deletions
diff --git a/libexec/ld.so/dlfcn.c b/libexec/ld.so/dlfcn.c index 25fa5dd8e6f..ee9734a4758 100644 --- a/libexec/ld.so/dlfcn.c +++ b/libexec/ld.so/dlfcn.c @@ -1,4 +1,4 @@ -/* $OpenBSD: dlfcn.c,v 1.69 2005/10/16 04:14:22 kurt Exp $ */ +/* $OpenBSD: dlfcn.c,v 1.70 2005/10/18 02:49:17 drahn Exp $ */ /* * Copyright (c) 1998 Per Fogelstrom, Opsycon AB @@ -191,6 +191,32 @@ dlctl(void *handle, int command, void *data) _dl_thread_fnc = data; retval = 0; break; + case 0x20: + _dl_show_objects(); + retval = 0; + break; + case 0x21: + { + struct dep_node *n, *m; + elf_object_t *obj; + _dl_printf("Load Groups:\n"); + + TAILQ_FOREACH(n, &_dlopened_child_list, next_sib) { + obj = n->data; + _dl_printf("%s\n", obj->load_name); + + _dl_printf(" children\n"); + TAILQ_FOREACH(m, &obj->child_list, next_sib) + _dl_printf("\t[%s]\n", m->data->load_name); + + _dl_printf(" grpref\n"); + TAILQ_FOREACH(m, &obj->grpref_list, next_sib) + _dl_printf("\t[%s]\n", m->data->load_name); + _dl_printf("\n"); + } + retval = 0; + break; + } default: _dl_errno = DL_INVALID_CTL; retval = -1; |