103333823c75a1c1887e923828113a1b0fd12020cElliott Hughes/* Copyright (C) 2002, 2005 Red Hat, Inc. 203333823c75a1c1887e923828113a1b0fd12020cElliott Hughes This file is part of elfutils. 303333823c75a1c1887e923828113a1b0fd12020cElliott Hughes Written by Ulrich Drepper <drepper@redhat.com>, 2002. 403333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 503333823c75a1c1887e923828113a1b0fd12020cElliott Hughes This file is free software; you can redistribute it and/or modify 603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes it under the terms of the GNU General Public License as published by 703333823c75a1c1887e923828113a1b0fd12020cElliott Hughes the Free Software Foundation; either version 3 of the License, or 803333823c75a1c1887e923828113a1b0fd12020cElliott Hughes (at your option) any later version. 903333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 1003333823c75a1c1887e923828113a1b0fd12020cElliott Hughes elfutils is distributed in the hope that it will be useful, but 1103333823c75a1c1887e923828113a1b0fd12020cElliott Hughes WITHOUT ANY WARRANTY; without even the implied warranty of 1203333823c75a1c1887e923828113a1b0fd12020cElliott Hughes MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 1303333823c75a1c1887e923828113a1b0fd12020cElliott Hughes GNU General Public License for more details. 1403333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 1503333823c75a1c1887e923828113a1b0fd12020cElliott Hughes You should have received a copy of the GNU General Public License 1603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes along with this program. If not, see <http://www.gnu.org/licenses/>. */ 1703333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 1803333823c75a1c1887e923828113a1b0fd12020cElliott Hughes#ifdef HAVE_CONFIG_H 1903333823c75a1c1887e923828113a1b0fd12020cElliott Hughes# include <config.h> 2003333823c75a1c1887e923828113a1b0fd12020cElliott Hughes#endif 2103333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 2203333823c75a1c1887e923828113a1b0fd12020cElliott Hughes#include <fcntl.h> 2303333823c75a1c1887e923828113a1b0fd12020cElliott Hughes#include <libelf.h> 2403333823c75a1c1887e923828113a1b0fd12020cElliott Hughes#include ELFUTILS_HEADER(dw) 2503333823c75a1c1887e923828113a1b0fd12020cElliott Hughes#include <stdio.h> 2603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes#include <unistd.h> 2703333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 2803333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 2903333823c75a1c1887e923828113a1b0fd12020cElliott Hughesstatic int globcnt; 3003333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 3103333823c75a1c1887e923828113a1b0fd12020cElliott Hughesstatic int 3203333823c75a1c1887e923828113a1b0fd12020cElliott Hughescallback (Dwarf *dbg, Dwarf_Global *gl, void *arg __attribute__ ((unused))) 3303333823c75a1c1887e923828113a1b0fd12020cElliott Hughes{ 3403333823c75a1c1887e923828113a1b0fd12020cElliott Hughes int result = DWARF_CB_OK; 3503333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 3603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes printf (" [%2d] \"%s\", die: %llu, cu: %llu\n", 3703333823c75a1c1887e923828113a1b0fd12020cElliott Hughes globcnt++, gl->name, (unsigned long long int) gl->die_offset, 3803333823c75a1c1887e923828113a1b0fd12020cElliott Hughes (unsigned long long int) gl->cu_offset); 3903333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 4003333823c75a1c1887e923828113a1b0fd12020cElliott Hughes Dwarf_Die cu_die; 4103333823c75a1c1887e923828113a1b0fd12020cElliott Hughes const char *cuname; 4203333823c75a1c1887e923828113a1b0fd12020cElliott Hughes if (dwarf_offdie (dbg, gl->cu_offset, &cu_die) == NULL 4303333823c75a1c1887e923828113a1b0fd12020cElliott Hughes || (cuname = dwarf_diename (&cu_die)) == NULL) 4403333823c75a1c1887e923828113a1b0fd12020cElliott Hughes { 4503333823c75a1c1887e923828113a1b0fd12020cElliott Hughes puts ("failed to get CU die"); 4603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes result = DWARF_CB_ABORT; 4703333823c75a1c1887e923828113a1b0fd12020cElliott Hughes } 4803333823c75a1c1887e923828113a1b0fd12020cElliott Hughes else 4903333823c75a1c1887e923828113a1b0fd12020cElliott Hughes printf ("CU name: \"%s\"\n", cuname); 5003333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 5103333823c75a1c1887e923828113a1b0fd12020cElliott Hughes const char *diename; 5203333823c75a1c1887e923828113a1b0fd12020cElliott Hughes Dwarf_Die die; 5303333823c75a1c1887e923828113a1b0fd12020cElliott Hughes if (dwarf_offdie (dbg, gl->die_offset, &die) == NULL 5403333823c75a1c1887e923828113a1b0fd12020cElliott Hughes || (diename = dwarf_diename (&die)) == NULL) 5503333823c75a1c1887e923828113a1b0fd12020cElliott Hughes { 5603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes puts ("failed to get object die"); 5703333823c75a1c1887e923828113a1b0fd12020cElliott Hughes result = DWARF_CB_ABORT; 5803333823c75a1c1887e923828113a1b0fd12020cElliott Hughes } 5903333823c75a1c1887e923828113a1b0fd12020cElliott Hughes else 6003333823c75a1c1887e923828113a1b0fd12020cElliott Hughes printf ("object name: \"%s\"\n", diename); 6103333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 6203333823c75a1c1887e923828113a1b0fd12020cElliott Hughes return result; 6303333823c75a1c1887e923828113a1b0fd12020cElliott Hughes} 6403333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 6503333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 6603333823c75a1c1887e923828113a1b0fd12020cElliott Hughesint 6703333823c75a1c1887e923828113a1b0fd12020cElliott Hughesmain (int argc, char *argv[]) 6803333823c75a1c1887e923828113a1b0fd12020cElliott Hughes{ 6903333823c75a1c1887e923828113a1b0fd12020cElliott Hughes int result = 0; 7003333823c75a1c1887e923828113a1b0fd12020cElliott Hughes int cnt; 7103333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 7203333823c75a1c1887e923828113a1b0fd12020cElliott Hughes for (cnt = 1; cnt < argc; ++cnt) 7303333823c75a1c1887e923828113a1b0fd12020cElliott Hughes { 7403333823c75a1c1887e923828113a1b0fd12020cElliott Hughes int fd = open (argv[cnt], O_RDONLY); 7503333823c75a1c1887e923828113a1b0fd12020cElliott Hughes Dwarf *dbg = dwarf_begin (fd, DWARF_C_READ); 7603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes if (dbg == NULL) 7703333823c75a1c1887e923828113a1b0fd12020cElliott Hughes { 7803333823c75a1c1887e923828113a1b0fd12020cElliott Hughes printf ("%s not usable: %s\n", argv[cnt], dwarf_errmsg (-1)); 7903333823c75a1c1887e923828113a1b0fd12020cElliott Hughes result = 1; 8003333823c75a1c1887e923828113a1b0fd12020cElliott Hughes close (fd); 8103333823c75a1c1887e923828113a1b0fd12020cElliott Hughes continue; 8203333823c75a1c1887e923828113a1b0fd12020cElliott Hughes } 8303333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 8403333823c75a1c1887e923828113a1b0fd12020cElliott Hughes globcnt = 0; 8503333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 8603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes if (dwarf_getpubnames (dbg, callback, NULL, 0) != 0) 8703333823c75a1c1887e923828113a1b0fd12020cElliott Hughes { 8803333823c75a1c1887e923828113a1b0fd12020cElliott Hughes printf ("dwarf_get_pubnames didn't return zero: %s\n", 8903333823c75a1c1887e923828113a1b0fd12020cElliott Hughes dwarf_errmsg (-1)); 9003333823c75a1c1887e923828113a1b0fd12020cElliott Hughes result = 1; 9103333823c75a1c1887e923828113a1b0fd12020cElliott Hughes } 9203333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 9303333823c75a1c1887e923828113a1b0fd12020cElliott Hughes dwarf_end (dbg); 9403333823c75a1c1887e923828113a1b0fd12020cElliott Hughes close (fd); 9503333823c75a1c1887e923828113a1b0fd12020cElliott Hughes } 9603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 9703333823c75a1c1887e923828113a1b0fd12020cElliott Hughes return result; 9803333823c75a1c1887e923828113a1b0fd12020cElliott Hughes} 99