1 /* Copyright (C) 2002, 2005 Red Hat, Inc. 2 This file is part of elfutils. 3 Written by Ulrich Drepper <drepper (at) redhat.com>, 2002. 4 5 This file is free software; you can redistribute it and/or modify 6 it under the terms of the GNU General Public License as published by 7 the Free Software Foundation; either version 3 of the License, or 8 (at your option) any later version. 9 10 elfutils is distributed in the hope that it will be useful, but 11 WITHOUT ANY WARRANTY; without even the implied warranty of 12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13 GNU General Public License for more details. 14 15 You should have received a copy of the GNU General Public License 16 along with this program. If not, see <http://www.gnu.org/licenses/>. */ 17 18 #ifdef HAVE_CONFIG_H 19 # include <config.h> 20 #endif 21 22 #include <fcntl.h> 23 #include <libelf.h> 24 #include ELFUTILS_HEADER(dw) 25 #include <stdio.h> 26 #include <unistd.h> 27 28 29 static int globcnt; 30 31 static int 32 callback (Dwarf *dbg, Dwarf_Global *gl, void *arg __attribute__ ((unused))) 33 { 34 int result = DWARF_CB_OK; 35 36 printf (" [%2d] \"%s\", die: %llu, cu: %llu\n", 37 globcnt++, gl->name, (unsigned long long int) gl->die_offset, 38 (unsigned long long int) gl->cu_offset); 39 40 Dwarf_Die cu_die; 41 const char *cuname; 42 if (dwarf_offdie (dbg, gl->cu_offset, &cu_die) == NULL 43 || (cuname = dwarf_diename (&cu_die)) == NULL) 44 { 45 puts ("failed to get CU die"); 46 result = DWARF_CB_ABORT; 47 } 48 else 49 printf ("CU name: \"%s\"\n", cuname); 50 51 const char *diename; 52 Dwarf_Die die; 53 if (dwarf_offdie (dbg, gl->die_offset, &die) == NULL 54 || (diename = dwarf_diename (&die)) == NULL) 55 { 56 puts ("failed to get object die"); 57 result = DWARF_CB_ABORT; 58 } 59 else 60 printf ("object name: \"%s\"\n", diename); 61 62 return result; 63 } 64 65 66 int 67 main (int argc, char *argv[]) 68 { 69 int result = 0; 70 int cnt; 71 72 for (cnt = 1; cnt < argc; ++cnt) 73 { 74 int fd = open (argv[cnt], O_RDONLY); 75 Dwarf *dbg = dwarf_begin (fd, DWARF_C_READ); 76 if (dbg == NULL) 77 { 78 printf ("%s not usable: %s\n", argv[cnt], dwarf_errmsg (-1)); 79 result = 1; 80 close (fd); 81 continue; 82 } 83 84 globcnt = 0; 85 86 if (dwarf_getpubnames (dbg, callback, NULL, 0) != 0) 87 { 88 printf ("dwarf_get_pubnames didn't return zero: %s\n", 89 dwarf_errmsg (-1)); 90 result = 1; 91 } 92 93 dwarf_end (dbg); 94 close (fd); 95 } 96 97 return result; 98 } 99
