diff options
Diffstat (limited to 'src/tests/allfcts.c')
-rw-r--r-- | src/tests/allfcts.c | 109 |
1 files changed, 0 insertions, 109 deletions
diff --git a/src/tests/allfcts.c b/src/tests/allfcts.c deleted file mode 100644 index d3c8d26a..00000000 --- a/src/tests/allfcts.c +++ /dev/null @@ -1,109 +0,0 @@ -/* Copyright (C) 2005, 2013 Red Hat, Inc. - This file is part of elfutils. - - This file is free software; you can redistribute it and/or modify - it under the terms of the GNU General Public License as published by - the Free Software Foundation; either version 3 of the License, or - (at your option) any later version. - - elfutils is distributed in the hope that it will be useful, but - WITHOUT ANY WARRANTY; without even the implied warranty of - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - GNU General Public License for more details. - - You should have received a copy of the GNU General Public License - along with this program. If not, see <http://www.gnu.org/licenses/>. */ - -#ifdef HAVE_CONFIG_H -# include <config.h> -#endif - -#include <err.h> -#include <fcntl.h> -#include ELFUTILS_HEADER(dw) -#include ELFUTILS_HEADER(dwelf) -#include <stdio.h> -#include <unistd.h> - - -static int -cb (Dwarf_Die *func, void *arg __attribute__ ((unused))) -{ - const char *file = dwarf_decl_file (func); - int line = -1; - dwarf_decl_line (func, &line); - const char *fct = dwarf_diename (func); - - printf ("%s:%d:%s\n", file, line, fct); - - return DWARF_CB_ABORT; -} - -static Dwarf * -setup_alt (Dwarf *main) -{ - const char *alt_name; - const void *build_id; - ssize_t ret = dwelf_dwarf_gnu_debugaltlink (main, &alt_name, &build_id); - if (ret == 0) - return NULL; - if (ret == -1) - errx (1, "dwelf_dwarf_gnu_debugaltlink: %s", dwarf_errmsg (-1)); - int fd = open (alt_name, O_RDONLY); - if (fd < 0) - err (1, "open (%s)", alt_name); - Dwarf *dbg_alt = dwarf_begin (fd, DWARF_C_READ); - if (dbg_alt == NULL) - errx (1, "dwarf_begin (%s): %s", alt_name, dwarf_errmsg (-1)); - if (elf_cntl (dwarf_getelf (dbg_alt), ELF_C_FDREAD) != 0) - errx (1, "elf_cntl (%s, ELF_C_FDREAD): %s", alt_name, elf_errmsg (-1)); - close (fd); - dwarf_setalt (main, dbg_alt); - return dbg_alt; -} - -int -main (int argc, char *argv[]) -{ - for (int i = 1; i < argc; ++i) - { - int fd = open (argv[i], O_RDONLY); - if (fd < 0) - err (1, "open (%s)", argv[i]); - - Dwarf *dbg = dwarf_begin (fd, DWARF_C_READ); - if (dbg != NULL) - { - Dwarf_Off off = 0; - size_t cuhl; - Dwarf_Off noff; - Dwarf *dbg_alt = setup_alt (dbg); - - while (dwarf_nextcu (dbg, off, &noff, &cuhl, NULL, NULL, NULL) == 0) - { - Dwarf_Die die_mem; - Dwarf_Die *die = dwarf_offdie (dbg, off + cuhl, &die_mem); - - /* Explicitly stop in the callback and then resume each time. */ - ptrdiff_t doff = 0; - do - { - doff = dwarf_getfuncs (die, cb, NULL, doff); - if (dwarf_errno () != 0) - errx (1, "dwarf_getfuncs (%s): %s", - argv[i], dwarf_errmsg (-1)); - } - while (doff != 0); - - off = noff; - } - - dwarf_end (dbg_alt); - dwarf_end (dbg); - } - else - errx (1, "dwarf_begin (%s): %s", argv[i], dwarf_errmsg (-1)); - - close (fd); - } -} |