12c23cb7cSEd Maste /*- 23ef90571SEd Maste * Copyright (c) 2009-2015 Kai Wang 32c23cb7cSEd Maste * All rights reserved. 42c23cb7cSEd Maste * 52c23cb7cSEd Maste * Redistribution and use in source and binary forms, with or without 62c23cb7cSEd Maste * modification, are permitted provided that the following conditions 72c23cb7cSEd Maste * are met: 82c23cb7cSEd Maste * 1. Redistributions of source code must retain the above copyright 92c23cb7cSEd Maste * notice, this list of conditions and the following disclaimer. 102c23cb7cSEd Maste * 2. Redistributions in binary form must reproduce the above copyright 112c23cb7cSEd Maste * notice, this list of conditions and the following disclaimer in the 122c23cb7cSEd Maste * documentation and/or other materials provided with the distribution. 132c23cb7cSEd Maste * 142c23cb7cSEd Maste * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 152c23cb7cSEd Maste * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 162c23cb7cSEd Maste * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 172c23cb7cSEd Maste * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 182c23cb7cSEd Maste * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 192c23cb7cSEd Maste * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 202c23cb7cSEd Maste * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 212c23cb7cSEd Maste * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 222c23cb7cSEd Maste * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 232c23cb7cSEd Maste * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 242c23cb7cSEd Maste * SUCH DAMAGE. 252c23cb7cSEd Maste */ 262c23cb7cSEd Maste 272c23cb7cSEd Maste #include <sys/param.h> 282c23cb7cSEd Maste #include <sys/queue.h> 292c23cb7cSEd Maste #include <ar.h> 3071edbbfdSEd Maste #include <assert.h> 312c23cb7cSEd Maste #include <ctype.h> 322c23cb7cSEd Maste #include <dwarf.h> 332c23cb7cSEd Maste #include <err.h> 342c23cb7cSEd Maste #include <fcntl.h> 352c23cb7cSEd Maste #include <gelf.h> 362c23cb7cSEd Maste #include <getopt.h> 372c23cb7cSEd Maste #include <libdwarf.h> 382c23cb7cSEd Maste #include <libelftc.h> 392c23cb7cSEd Maste #include <libgen.h> 402c23cb7cSEd Maste #include <stdarg.h> 413dc58d9cSEd Maste #include <stdint.h> 422c23cb7cSEd Maste #include <stdio.h> 432c23cb7cSEd Maste #include <stdlib.h> 442c23cb7cSEd Maste #include <string.h> 452c23cb7cSEd Maste #include <time.h> 462c23cb7cSEd Maste #include <unistd.h> 472c23cb7cSEd Maste 482c23cb7cSEd Maste #include "_elftc.h" 492c23cb7cSEd Maste 50bee2765cSEd Maste ELFTC_VCSID("$Id: readelf.c 3519 2017-04-09 23:15:58Z kaiwang27 $"); 51839529caSEd Maste 52839529caSEd Maste /* Backwards compatability for older FreeBSD releases. */ 53839529caSEd Maste #ifndef STB_GNU_UNIQUE 54839529caSEd Maste #define STB_GNU_UNIQUE 10 55839529caSEd Maste #endif 56839529caSEd Maste #ifndef STT_SPARC_REGISTER 57839529caSEd Maste #define STT_SPARC_REGISTER 13 58839529caSEd Maste #endif 59839529caSEd Maste 602c23cb7cSEd Maste 612c23cb7cSEd Maste /* 622c23cb7cSEd Maste * readelf(1) options. 632c23cb7cSEd Maste */ 642c23cb7cSEd Maste #define RE_AA 0x00000001 652c23cb7cSEd Maste #define RE_C 0x00000002 662c23cb7cSEd Maste #define RE_DD 0x00000004 672c23cb7cSEd Maste #define RE_D 0x00000008 682c23cb7cSEd Maste #define RE_G 0x00000010 692c23cb7cSEd Maste #define RE_H 0x00000020 702c23cb7cSEd Maste #define RE_II 0x00000040 712c23cb7cSEd Maste #define RE_I 0x00000080 722c23cb7cSEd Maste #define RE_L 0x00000100 732c23cb7cSEd Maste #define RE_NN 0x00000200 742c23cb7cSEd Maste #define RE_N 0x00000400 752c23cb7cSEd Maste #define RE_P 0x00000800 762c23cb7cSEd Maste #define RE_R 0x00001000 772c23cb7cSEd Maste #define RE_SS 0x00002000 782c23cb7cSEd Maste #define RE_S 0x00004000 792c23cb7cSEd Maste #define RE_T 0x00008000 802c23cb7cSEd Maste #define RE_U 0x00010000 812c23cb7cSEd Maste #define RE_VV 0x00020000 822c23cb7cSEd Maste #define RE_WW 0x00040000 832c23cb7cSEd Maste #define RE_W 0x00080000 842c23cb7cSEd Maste #define RE_X 0x00100000 852c23cb7cSEd Maste 862c23cb7cSEd Maste /* 872c23cb7cSEd Maste * dwarf dump options. 882c23cb7cSEd Maste */ 892c23cb7cSEd Maste #define DW_A 0x00000001 902c23cb7cSEd Maste #define DW_FF 0x00000002 912c23cb7cSEd Maste #define DW_F 0x00000004 922c23cb7cSEd Maste #define DW_I 0x00000008 932c23cb7cSEd Maste #define DW_LL 0x00000010 942c23cb7cSEd Maste #define DW_L 0x00000020 952c23cb7cSEd Maste #define DW_M 0x00000040 962c23cb7cSEd Maste #define DW_O 0x00000080 972c23cb7cSEd Maste #define DW_P 0x00000100 982c23cb7cSEd Maste #define DW_RR 0x00000200 992c23cb7cSEd Maste #define DW_R 0x00000400 1002c23cb7cSEd Maste #define DW_S 0x00000800 1012c23cb7cSEd Maste 1022c23cb7cSEd Maste #define DW_DEFAULT_OPTIONS (DW_A | DW_F | DW_I | DW_L | DW_O | DW_P | \ 1032c23cb7cSEd Maste DW_R | DW_RR | DW_S) 1042c23cb7cSEd Maste 1052c23cb7cSEd Maste /* 1062c23cb7cSEd Maste * readelf(1) run control flags. 1072c23cb7cSEd Maste */ 1082c23cb7cSEd Maste #define DISPLAY_FILENAME 0x0001 1092c23cb7cSEd Maste 1102c23cb7cSEd Maste /* 1112c23cb7cSEd Maste * Internal data structure for sections. 1122c23cb7cSEd Maste */ 1132c23cb7cSEd Maste struct section { 1142c23cb7cSEd Maste const char *name; /* section name */ 1152c23cb7cSEd Maste Elf_Scn *scn; /* section scn */ 1162c23cb7cSEd Maste uint64_t off; /* section offset */ 1172c23cb7cSEd Maste uint64_t sz; /* section size */ 1182c23cb7cSEd Maste uint64_t entsize; /* section entsize */ 1192c23cb7cSEd Maste uint64_t align; /* section alignment */ 1202c23cb7cSEd Maste uint64_t type; /* section type */ 1212c23cb7cSEd Maste uint64_t flags; /* section flags */ 1222c23cb7cSEd Maste uint64_t addr; /* section virtual addr */ 1232c23cb7cSEd Maste uint32_t link; /* section link ndx */ 1242c23cb7cSEd Maste uint32_t info; /* section info ndx */ 1252c23cb7cSEd Maste }; 1262c23cb7cSEd Maste 1272c23cb7cSEd Maste struct dumpop { 1282c23cb7cSEd Maste union { 1292c23cb7cSEd Maste size_t si; /* section index */ 1302c23cb7cSEd Maste const char *sn; /* section name */ 1312c23cb7cSEd Maste } u; 1322c23cb7cSEd Maste enum { 1332c23cb7cSEd Maste DUMP_BY_INDEX = 0, 1342c23cb7cSEd Maste DUMP_BY_NAME 1352c23cb7cSEd Maste } type; /* dump type */ 1362c23cb7cSEd Maste #define HEX_DUMP 0x0001 1372c23cb7cSEd Maste #define STR_DUMP 0x0002 1382c23cb7cSEd Maste int op; /* dump operation */ 1392c23cb7cSEd Maste STAILQ_ENTRY(dumpop) dumpop_list; 1402c23cb7cSEd Maste }; 1412c23cb7cSEd Maste 1422c23cb7cSEd Maste struct symver { 1432c23cb7cSEd Maste const char *name; 1442c23cb7cSEd Maste int type; 1452c23cb7cSEd Maste }; 1462c23cb7cSEd Maste 1472c23cb7cSEd Maste /* 1482c23cb7cSEd Maste * Structure encapsulates the global data for readelf(1). 1492c23cb7cSEd Maste */ 1502c23cb7cSEd Maste struct readelf { 1512c23cb7cSEd Maste const char *filename; /* current processing file. */ 1522c23cb7cSEd Maste int options; /* command line options. */ 1532c23cb7cSEd Maste int flags; /* run control flags. */ 1542c23cb7cSEd Maste int dop; /* dwarf dump options. */ 1552c23cb7cSEd Maste Elf *elf; /* underlying ELF descriptor. */ 1562c23cb7cSEd Maste Elf *ar; /* archive ELF descriptor. */ 1572c23cb7cSEd Maste Dwarf_Debug dbg; /* DWARF handle. */ 158cf781b2eSEd Maste Dwarf_Half cu_psize; /* DWARF CU pointer size. */ 159cf781b2eSEd Maste Dwarf_Half cu_osize; /* DWARF CU offset size. */ 160cf781b2eSEd Maste Dwarf_Half cu_ver; /* DWARF CU version. */ 1612c23cb7cSEd Maste GElf_Ehdr ehdr; /* ELF header. */ 1622c23cb7cSEd Maste int ec; /* ELF class. */ 1632c23cb7cSEd Maste size_t shnum; /* #sections. */ 1642c23cb7cSEd Maste struct section *vd_s; /* Verdef section. */ 1652c23cb7cSEd Maste struct section *vn_s; /* Verneed section. */ 1662c23cb7cSEd Maste struct section *vs_s; /* Versym section. */ 1672c23cb7cSEd Maste uint16_t *vs; /* Versym array. */ 1682c23cb7cSEd Maste int vs_sz; /* Versym array size. */ 1692c23cb7cSEd Maste struct symver *ver; /* Version array. */ 1702c23cb7cSEd Maste int ver_sz; /* Size of version array. */ 1712c23cb7cSEd Maste struct section *sl; /* list of sections. */ 1722c23cb7cSEd Maste STAILQ_HEAD(, dumpop) v_dumpop; /* list of dump ops. */ 1732c23cb7cSEd Maste uint64_t (*dw_read)(Elf_Data *, uint64_t *, int); 1742c23cb7cSEd Maste uint64_t (*dw_decode)(uint8_t **, int); 1752c23cb7cSEd Maste }; 1762c23cb7cSEd Maste 1772c23cb7cSEd Maste enum options 1782c23cb7cSEd Maste { 1792c23cb7cSEd Maste OPTION_DEBUG_DUMP 1802c23cb7cSEd Maste }; 1812c23cb7cSEd Maste 1822c23cb7cSEd Maste static struct option longopts[] = { 1832c23cb7cSEd Maste {"all", no_argument, NULL, 'a'}, 1842c23cb7cSEd Maste {"arch-specific", no_argument, NULL, 'A'}, 1852c23cb7cSEd Maste {"archive-index", no_argument, NULL, 'c'}, 1862c23cb7cSEd Maste {"debug-dump", optional_argument, NULL, OPTION_DEBUG_DUMP}, 1872c23cb7cSEd Maste {"dynamic", no_argument, NULL, 'd'}, 1882c23cb7cSEd Maste {"file-header", no_argument, NULL, 'h'}, 1892c23cb7cSEd Maste {"full-section-name", no_argument, NULL, 'N'}, 1902c23cb7cSEd Maste {"headers", no_argument, NULL, 'e'}, 1912c23cb7cSEd Maste {"help", no_argument, 0, 'H'}, 1922c23cb7cSEd Maste {"hex-dump", required_argument, NULL, 'x'}, 1932c23cb7cSEd Maste {"histogram", no_argument, NULL, 'I'}, 1942c23cb7cSEd Maste {"notes", no_argument, NULL, 'n'}, 1952c23cb7cSEd Maste {"program-headers", no_argument, NULL, 'l'}, 1962c23cb7cSEd Maste {"relocs", no_argument, NULL, 'r'}, 1972c23cb7cSEd Maste {"sections", no_argument, NULL, 'S'}, 1982c23cb7cSEd Maste {"section-headers", no_argument, NULL, 'S'}, 1992c23cb7cSEd Maste {"section-groups", no_argument, NULL, 'g'}, 2002c23cb7cSEd Maste {"section-details", no_argument, NULL, 't'}, 2012c23cb7cSEd Maste {"segments", no_argument, NULL, 'l'}, 2022c23cb7cSEd Maste {"string-dump", required_argument, NULL, 'p'}, 2032c23cb7cSEd Maste {"symbols", no_argument, NULL, 's'}, 2042c23cb7cSEd Maste {"syms", no_argument, NULL, 's'}, 2052c23cb7cSEd Maste {"unwind", no_argument, NULL, 'u'}, 2062c23cb7cSEd Maste {"use-dynamic", no_argument, NULL, 'D'}, 2072c23cb7cSEd Maste {"version-info", no_argument, 0, 'V'}, 2082c23cb7cSEd Maste {"version", no_argument, 0, 'v'}, 2092c23cb7cSEd Maste {"wide", no_argument, 0, 'W'}, 2102c23cb7cSEd Maste {NULL, 0, NULL, 0} 2112c23cb7cSEd Maste }; 2122c23cb7cSEd Maste 2132c23cb7cSEd Maste struct eflags_desc { 2142c23cb7cSEd Maste uint64_t flag; 2152c23cb7cSEd Maste const char *desc; 2162c23cb7cSEd Maste }; 2172c23cb7cSEd Maste 2182c23cb7cSEd Maste struct mips_option { 2192c23cb7cSEd Maste uint64_t flag; 2202c23cb7cSEd Maste const char *desc; 2212c23cb7cSEd Maste }; 2222c23cb7cSEd Maste 2232c23cb7cSEd Maste static void add_dumpop(struct readelf *re, size_t si, const char *sn, int op, 2242c23cb7cSEd Maste int t); 2252c23cb7cSEd Maste static const char *aeabi_adv_simd_arch(uint64_t simd); 2262c23cb7cSEd Maste static const char *aeabi_align_needed(uint64_t an); 2272c23cb7cSEd Maste static const char *aeabi_align_preserved(uint64_t ap); 2282c23cb7cSEd Maste static const char *aeabi_arm_isa(uint64_t ai); 2292c23cb7cSEd Maste static const char *aeabi_cpu_arch(uint64_t arch); 2302c23cb7cSEd Maste static const char *aeabi_cpu_arch_profile(uint64_t pf); 2312c23cb7cSEd Maste static const char *aeabi_div(uint64_t du); 2322c23cb7cSEd Maste static const char *aeabi_enum_size(uint64_t es); 2332c23cb7cSEd Maste static const char *aeabi_fp_16bit_format(uint64_t fp16); 2342c23cb7cSEd Maste static const char *aeabi_fp_arch(uint64_t fp); 2352c23cb7cSEd Maste static const char *aeabi_fp_denormal(uint64_t fd); 2362c23cb7cSEd Maste static const char *aeabi_fp_exceptions(uint64_t fe); 2372c23cb7cSEd Maste static const char *aeabi_fp_hpext(uint64_t fh); 2382c23cb7cSEd Maste static const char *aeabi_fp_number_model(uint64_t fn); 2392c23cb7cSEd Maste static const char *aeabi_fp_optm_goal(uint64_t fog); 2402c23cb7cSEd Maste static const char *aeabi_fp_rounding(uint64_t fr); 2412c23cb7cSEd Maste static const char *aeabi_hardfp(uint64_t hfp); 2422c23cb7cSEd Maste static const char *aeabi_mpext(uint64_t mp); 2432c23cb7cSEd Maste static const char *aeabi_optm_goal(uint64_t og); 2442c23cb7cSEd Maste static const char *aeabi_pcs_config(uint64_t pcs); 2452c23cb7cSEd Maste static const char *aeabi_pcs_got(uint64_t got); 2462c23cb7cSEd Maste static const char *aeabi_pcs_r9(uint64_t r9); 2472c23cb7cSEd Maste static const char *aeabi_pcs_ro(uint64_t ro); 2482c23cb7cSEd Maste static const char *aeabi_pcs_rw(uint64_t rw); 2492c23cb7cSEd Maste static const char *aeabi_pcs_wchar_t(uint64_t wt); 2502c23cb7cSEd Maste static const char *aeabi_t2ee(uint64_t t2ee); 2512c23cb7cSEd Maste static const char *aeabi_thumb_isa(uint64_t ti); 2522c23cb7cSEd Maste static const char *aeabi_fp_user_exceptions(uint64_t fu); 2532c23cb7cSEd Maste static const char *aeabi_unaligned_access(uint64_t ua); 2542c23cb7cSEd Maste static const char *aeabi_vfp_args(uint64_t va); 2552c23cb7cSEd Maste static const char *aeabi_virtual(uint64_t vt); 2562c23cb7cSEd Maste static const char *aeabi_wmmx_arch(uint64_t wmmx); 2572c23cb7cSEd Maste static const char *aeabi_wmmx_args(uint64_t wa); 2582c23cb7cSEd Maste static const char *elf_class(unsigned int class); 2592c23cb7cSEd Maste static const char *elf_endian(unsigned int endian); 2602c23cb7cSEd Maste static const char *elf_machine(unsigned int mach); 2612c23cb7cSEd Maste static const char *elf_osabi(unsigned int abi); 2622c23cb7cSEd Maste static const char *elf_type(unsigned int type); 2632c23cb7cSEd Maste static const char *elf_ver(unsigned int ver); 2642c23cb7cSEd Maste static const char *dt_type(unsigned int mach, unsigned int dtype); 2652c23cb7cSEd Maste static void dump_ar(struct readelf *re, int); 2662c23cb7cSEd Maste static void dump_arm_attributes(struct readelf *re, uint8_t *p, uint8_t *pe); 2672c23cb7cSEd Maste static void dump_attributes(struct readelf *re); 26895fd7f26SEd Maste static uint8_t *dump_compatibility_tag(uint8_t *p, uint8_t *pe); 2692c23cb7cSEd Maste static void dump_dwarf(struct readelf *re); 270cf781b2eSEd Maste static void dump_dwarf_abbrev(struct readelf *re); 271cf781b2eSEd Maste static void dump_dwarf_aranges(struct readelf *re); 272cf781b2eSEd Maste static void dump_dwarf_block(struct readelf *re, uint8_t *b, 273cf781b2eSEd Maste Dwarf_Unsigned len); 274cf781b2eSEd Maste static void dump_dwarf_die(struct readelf *re, Dwarf_Die die, int level); 275cf781b2eSEd Maste static void dump_dwarf_frame(struct readelf *re, int alt); 276cf781b2eSEd Maste static void dump_dwarf_frame_inst(struct readelf *re, Dwarf_Cie cie, 277cf781b2eSEd Maste uint8_t *insts, Dwarf_Unsigned len, Dwarf_Unsigned caf, Dwarf_Signed daf, 278cf781b2eSEd Maste Dwarf_Addr pc, Dwarf_Debug dbg); 279cf781b2eSEd Maste static int dump_dwarf_frame_regtable(struct readelf *re, Dwarf_Fde fde, 280cf781b2eSEd Maste Dwarf_Addr pc, Dwarf_Unsigned func_len, Dwarf_Half cie_ra); 281cf781b2eSEd Maste static void dump_dwarf_frame_section(struct readelf *re, struct section *s, 282cf781b2eSEd Maste int alt); 283cf781b2eSEd Maste static void dump_dwarf_info(struct readelf *re, Dwarf_Bool is_info); 284cf781b2eSEd Maste static void dump_dwarf_macinfo(struct readelf *re); 285cf781b2eSEd Maste static void dump_dwarf_line(struct readelf *re); 286cf781b2eSEd Maste static void dump_dwarf_line_decoded(struct readelf *re); 287cf781b2eSEd Maste static void dump_dwarf_loc(struct readelf *re, Dwarf_Loc *lr); 288cf781b2eSEd Maste static void dump_dwarf_loclist(struct readelf *re); 289cf781b2eSEd Maste static void dump_dwarf_pubnames(struct readelf *re); 290cf781b2eSEd Maste static void dump_dwarf_ranges(struct readelf *re); 291cf781b2eSEd Maste static void dump_dwarf_ranges_foreach(struct readelf *re, Dwarf_Die die, 292cf781b2eSEd Maste Dwarf_Addr base); 293cf781b2eSEd Maste static void dump_dwarf_str(struct readelf *re); 2942c23cb7cSEd Maste static void dump_eflags(struct readelf *re, uint64_t e_flags); 2952c23cb7cSEd Maste static void dump_elf(struct readelf *re); 2962c23cb7cSEd Maste static void dump_dyn_val(struct readelf *re, GElf_Dyn *dyn, uint32_t stab); 2972c23cb7cSEd Maste static void dump_dynamic(struct readelf *re); 2982c23cb7cSEd Maste static void dump_liblist(struct readelf *re); 299e9f3f88aSEd Maste static void dump_mips_abiflags(struct readelf *re, struct section *s); 3002c23cb7cSEd Maste static void dump_mips_attributes(struct readelf *re, uint8_t *p, uint8_t *pe); 3012c23cb7cSEd Maste static void dump_mips_odk_reginfo(struct readelf *re, uint8_t *p, size_t sz); 3022c23cb7cSEd Maste static void dump_mips_options(struct readelf *re, struct section *s); 3032c23cb7cSEd Maste static void dump_mips_option_flags(const char *name, struct mips_option *opt, 3042c23cb7cSEd Maste uint64_t info); 3052c23cb7cSEd Maste static void dump_mips_reginfo(struct readelf *re, struct section *s); 3062c23cb7cSEd Maste static void dump_mips_specific_info(struct readelf *re); 3072c23cb7cSEd Maste static void dump_notes(struct readelf *re); 3082c23cb7cSEd Maste static void dump_notes_content(struct readelf *re, const char *buf, size_t sz, 3092c23cb7cSEd Maste off_t off); 3102c23cb7cSEd Maste static void dump_svr4_hash(struct section *s); 3112c23cb7cSEd Maste static void dump_svr4_hash64(struct readelf *re, struct section *s); 3122c23cb7cSEd Maste static void dump_gnu_hash(struct readelf *re, struct section *s); 3132c23cb7cSEd Maste static void dump_hash(struct readelf *re); 3142c23cb7cSEd Maste static void dump_phdr(struct readelf *re); 3152c23cb7cSEd Maste static void dump_ppc_attributes(uint8_t *p, uint8_t *pe); 3163ef90571SEd Maste static void dump_section_groups(struct readelf *re); 3172c23cb7cSEd Maste static void dump_symtab(struct readelf *re, int i); 3182c23cb7cSEd Maste static void dump_symtabs(struct readelf *re); 31995fd7f26SEd Maste static uint8_t *dump_unknown_tag(uint64_t tag, uint8_t *p, uint8_t *pe); 3202c23cb7cSEd Maste static void dump_ver(struct readelf *re); 3212c23cb7cSEd Maste static void dump_verdef(struct readelf *re, int dump); 3222c23cb7cSEd Maste static void dump_verneed(struct readelf *re, int dump); 3232c23cb7cSEd Maste static void dump_versym(struct readelf *re); 324cf781b2eSEd Maste static const char *dwarf_reg(unsigned int mach, unsigned int reg); 325cf781b2eSEd Maste static const char *dwarf_regname(struct readelf *re, unsigned int num); 326cf781b2eSEd Maste static struct dumpop *find_dumpop(struct readelf *re, size_t si, 327cf781b2eSEd Maste const char *sn, int op, int t); 32871edbbfdSEd Maste static int get_ent_count(struct section *s, int *ent_count); 329e9f3f88aSEd Maste static int get_mips_register_size(uint8_t flag); 330cf781b2eSEd Maste static char *get_regoff_str(struct readelf *re, Dwarf_Half reg, 331cf781b2eSEd Maste Dwarf_Addr off); 3322c23cb7cSEd Maste static const char *get_string(struct readelf *re, int strtab, size_t off); 3332c23cb7cSEd Maste static const char *get_symbol_name(struct readelf *re, int symtab, int i); 3342c23cb7cSEd Maste static uint64_t get_symbol_value(struct readelf *re, int symtab, int i); 3352c23cb7cSEd Maste static void load_sections(struct readelf *re); 3362c23cb7cSEd Maste static const char *mips_abi_fp(uint64_t fp); 33702b08c90SEd Maste static const char *note_type(const char *note_name, unsigned int et, 3382c23cb7cSEd Maste unsigned int nt); 33902b08c90SEd Maste static const char *note_type_freebsd(unsigned int nt); 34002b08c90SEd Maste static const char *note_type_freebsd_core(unsigned int nt); 34102b08c90SEd Maste static const char *note_type_linux_core(unsigned int nt); 34202b08c90SEd Maste static const char *note_type_gnu(unsigned int nt); 34302b08c90SEd Maste static const char *note_type_netbsd(unsigned int nt); 34402b08c90SEd Maste static const char *note_type_openbsd(unsigned int nt); 34502b08c90SEd Maste static const char *note_type_unknown(unsigned int nt); 346895f86f1SEd Maste static const char *note_type_xen(unsigned int nt); 3472c23cb7cSEd Maste static const char *option_kind(uint8_t kind); 34820136ffcSEd Maste static const char *phdr_type(unsigned int mach, unsigned int ptype); 3492c23cb7cSEd Maste static const char *ppc_abi_fp(uint64_t fp); 3502c23cb7cSEd Maste static const char *ppc_abi_vector(uint64_t vec); 351839529caSEd Maste static void readelf_usage(int status); 3522c23cb7cSEd Maste static void readelf_version(void); 353cf781b2eSEd Maste static void search_loclist_at(struct readelf *re, Dwarf_Die die, 354cf781b2eSEd Maste Dwarf_Unsigned lowpc); 3552c23cb7cSEd Maste static void search_ver(struct readelf *re); 3562c23cb7cSEd Maste static const char *section_type(unsigned int mach, unsigned int stype); 357cf781b2eSEd Maste static void set_cu_context(struct readelf *re, Dwarf_Half psize, 358cf781b2eSEd Maste Dwarf_Half osize, Dwarf_Half ver); 3592c23cb7cSEd Maste static const char *st_bind(unsigned int sbind); 3602c23cb7cSEd Maste static const char *st_shndx(unsigned int shndx); 361b6b6f9ccSEd Maste static const char *st_type(unsigned int mach, unsigned int os, 362b6b6f9ccSEd Maste unsigned int stype); 3632c23cb7cSEd Maste static const char *st_vis(unsigned int svis); 3642c23cb7cSEd Maste static const char *top_tag(unsigned int tag); 3652c23cb7cSEd Maste static void unload_sections(struct readelf *re); 3662c23cb7cSEd Maste static uint64_t _read_lsb(Elf_Data *d, uint64_t *offsetp, 3672c23cb7cSEd Maste int bytes_to_read); 3682c23cb7cSEd Maste static uint64_t _read_msb(Elf_Data *d, uint64_t *offsetp, 3692c23cb7cSEd Maste int bytes_to_read); 3702c23cb7cSEd Maste static uint64_t _decode_lsb(uint8_t **data, int bytes_to_read); 3712c23cb7cSEd Maste static uint64_t _decode_msb(uint8_t **data, int bytes_to_read); 37295fd7f26SEd Maste static int64_t _decode_sleb128(uint8_t **dp, uint8_t *dpe); 37395fd7f26SEd Maste static uint64_t _decode_uleb128(uint8_t **dp, uint8_t *dpe); 3742c23cb7cSEd Maste 3752c23cb7cSEd Maste static struct eflags_desc arm_eflags_desc[] = { 3762c23cb7cSEd Maste {EF_ARM_RELEXEC, "relocatable executable"}, 3772c23cb7cSEd Maste {EF_ARM_HASENTRY, "has entry point"}, 3782c23cb7cSEd Maste {EF_ARM_SYMSARESORTED, "sorted symbol tables"}, 3792c23cb7cSEd Maste {EF_ARM_DYNSYMSUSESEGIDX, "dynamic symbols use segment index"}, 3802c23cb7cSEd Maste {EF_ARM_MAPSYMSFIRST, "mapping symbols precede others"}, 3812c23cb7cSEd Maste {EF_ARM_BE8, "BE8"}, 3822c23cb7cSEd Maste {EF_ARM_LE8, "LE8"}, 3832c23cb7cSEd Maste {EF_ARM_INTERWORK, "interworking enabled"}, 3842c23cb7cSEd Maste {EF_ARM_APCS_26, "uses APCS/26"}, 3852c23cb7cSEd Maste {EF_ARM_APCS_FLOAT, "uses APCS/float"}, 3862c23cb7cSEd Maste {EF_ARM_PIC, "position independent"}, 3872c23cb7cSEd Maste {EF_ARM_ALIGN8, "8 bit structure alignment"}, 3882c23cb7cSEd Maste {EF_ARM_NEW_ABI, "uses new ABI"}, 3892c23cb7cSEd Maste {EF_ARM_OLD_ABI, "uses old ABI"}, 3902c23cb7cSEd Maste {EF_ARM_SOFT_FLOAT, "software FP"}, 3912c23cb7cSEd Maste {EF_ARM_VFP_FLOAT, "VFP"}, 3922c23cb7cSEd Maste {EF_ARM_MAVERICK_FLOAT, "Maverick FP"}, 3932c23cb7cSEd Maste {0, NULL} 3942c23cb7cSEd Maste }; 3952c23cb7cSEd Maste 3962c23cb7cSEd Maste static struct eflags_desc mips_eflags_desc[] = { 3972c23cb7cSEd Maste {EF_MIPS_NOREORDER, "noreorder"}, 3982c23cb7cSEd Maste {EF_MIPS_PIC, "pic"}, 3992c23cb7cSEd Maste {EF_MIPS_CPIC, "cpic"}, 4002c23cb7cSEd Maste {EF_MIPS_UCODE, "ugen_reserved"}, 4012c23cb7cSEd Maste {EF_MIPS_ABI2, "abi2"}, 4022c23cb7cSEd Maste {EF_MIPS_OPTIONS_FIRST, "odk first"}, 4032c23cb7cSEd Maste {EF_MIPS_ARCH_ASE_MDMX, "mdmx"}, 4042c23cb7cSEd Maste {EF_MIPS_ARCH_ASE_M16, "mips16"}, 4052c23cb7cSEd Maste {0, NULL} 4062c23cb7cSEd Maste }; 4072c23cb7cSEd Maste 4082c23cb7cSEd Maste static struct eflags_desc powerpc_eflags_desc[] = { 4092c23cb7cSEd Maste {EF_PPC_EMB, "emb"}, 4102c23cb7cSEd Maste {EF_PPC_RELOCATABLE, "relocatable"}, 4112c23cb7cSEd Maste {EF_PPC_RELOCATABLE_LIB, "relocatable-lib"}, 4122c23cb7cSEd Maste {0, NULL} 4132c23cb7cSEd Maste }; 4142c23cb7cSEd Maste 4152c23cb7cSEd Maste static struct eflags_desc sparc_eflags_desc[] = { 4162c23cb7cSEd Maste {EF_SPARC_32PLUS, "v8+"}, 4172c23cb7cSEd Maste {EF_SPARC_SUN_US1, "ultrasparcI"}, 4182c23cb7cSEd Maste {EF_SPARC_HAL_R1, "halr1"}, 4192c23cb7cSEd Maste {EF_SPARC_SUN_US3, "ultrasparcIII"}, 4202c23cb7cSEd Maste {0, NULL} 4212c23cb7cSEd Maste }; 4222c23cb7cSEd Maste 4232c23cb7cSEd Maste static const char * 4242c23cb7cSEd Maste elf_osabi(unsigned int abi) 4252c23cb7cSEd Maste { 4262c23cb7cSEd Maste static char s_abi[32]; 4272c23cb7cSEd Maste 4282c23cb7cSEd Maste switch(abi) { 429453b09caSEd Maste case ELFOSABI_NONE: return "NONE"; 430473c31f1SEd Maste case ELFOSABI_HPUX: return "HPUX"; 4312c23cb7cSEd Maste case ELFOSABI_NETBSD: return "NetBSD"; 4322c23cb7cSEd Maste case ELFOSABI_GNU: return "GNU"; 4332c23cb7cSEd Maste case ELFOSABI_HURD: return "HURD"; 4342c23cb7cSEd Maste case ELFOSABI_86OPEN: return "86OPEN"; 4352c23cb7cSEd Maste case ELFOSABI_SOLARIS: return "Solaris"; 4362c23cb7cSEd Maste case ELFOSABI_AIX: return "AIX"; 4372c23cb7cSEd Maste case ELFOSABI_IRIX: return "IRIX"; 4382c23cb7cSEd Maste case ELFOSABI_FREEBSD: return "FreeBSD"; 4392c23cb7cSEd Maste case ELFOSABI_TRU64: return "TRU64"; 4402c23cb7cSEd Maste case ELFOSABI_MODESTO: return "MODESTO"; 4412c23cb7cSEd Maste case ELFOSABI_OPENBSD: return "OpenBSD"; 4422c23cb7cSEd Maste case ELFOSABI_OPENVMS: return "OpenVMS"; 4432c23cb7cSEd Maste case ELFOSABI_NSK: return "NSK"; 444b6b6f9ccSEd Maste case ELFOSABI_CLOUDABI: return "CloudABI"; 445b6d812d2SEd Maste case ELFOSABI_ARM_AEABI: return "ARM EABI"; 4462c23cb7cSEd Maste case ELFOSABI_ARM: return "ARM"; 4472c23cb7cSEd Maste case ELFOSABI_STANDALONE: return "StandAlone"; 4482c23cb7cSEd Maste default: 4492c23cb7cSEd Maste snprintf(s_abi, sizeof(s_abi), "<unknown: %#x>", abi); 4502c23cb7cSEd Maste return (s_abi); 4512c23cb7cSEd Maste } 4522c23cb7cSEd Maste }; 4532c23cb7cSEd Maste 4542c23cb7cSEd Maste static const char * 4552c23cb7cSEd Maste elf_machine(unsigned int mach) 4562c23cb7cSEd Maste { 4572c23cb7cSEd Maste static char s_mach[32]; 4582c23cb7cSEd Maste 4592c23cb7cSEd Maste switch (mach) { 4602c23cb7cSEd Maste case EM_NONE: return "Unknown machine"; 4612c23cb7cSEd Maste case EM_M32: return "AT&T WE32100"; 4622c23cb7cSEd Maste case EM_SPARC: return "Sun SPARC"; 4632c23cb7cSEd Maste case EM_386: return "Intel i386"; 4642c23cb7cSEd Maste case EM_68K: return "Motorola 68000"; 4653ef90571SEd Maste case EM_IAMCU: return "Intel MCU"; 4662c23cb7cSEd Maste case EM_88K: return "Motorola 88000"; 4672c23cb7cSEd Maste case EM_860: return "Intel i860"; 4682c23cb7cSEd Maste case EM_MIPS: return "MIPS R3000 Big-Endian only"; 4692c23cb7cSEd Maste case EM_S370: return "IBM System/370"; 4702c23cb7cSEd Maste case EM_MIPS_RS3_LE: return "MIPS R3000 Little-Endian"; 4712c23cb7cSEd Maste case EM_PARISC: return "HP PA-RISC"; 4722c23cb7cSEd Maste case EM_VPP500: return "Fujitsu VPP500"; 4732c23cb7cSEd Maste case EM_SPARC32PLUS: return "SPARC v8plus"; 4742c23cb7cSEd Maste case EM_960: return "Intel 80960"; 4752c23cb7cSEd Maste case EM_PPC: return "PowerPC 32-bit"; 4762c23cb7cSEd Maste case EM_PPC64: return "PowerPC 64-bit"; 4772c23cb7cSEd Maste case EM_S390: return "IBM System/390"; 4782c23cb7cSEd Maste case EM_V800: return "NEC V800"; 4792c23cb7cSEd Maste case EM_FR20: return "Fujitsu FR20"; 4802c23cb7cSEd Maste case EM_RH32: return "TRW RH-32"; 4812c23cb7cSEd Maste case EM_RCE: return "Motorola RCE"; 4822c23cb7cSEd Maste case EM_ARM: return "ARM"; 4832c23cb7cSEd Maste case EM_SH: return "Hitachi SH"; 4842c23cb7cSEd Maste case EM_SPARCV9: return "SPARC v9 64-bit"; 4852c23cb7cSEd Maste case EM_TRICORE: return "Siemens TriCore embedded processor"; 4862c23cb7cSEd Maste case EM_ARC: return "Argonaut RISC Core"; 4872c23cb7cSEd Maste case EM_H8_300: return "Hitachi H8/300"; 4882c23cb7cSEd Maste case EM_H8_300H: return "Hitachi H8/300H"; 4892c23cb7cSEd Maste case EM_H8S: return "Hitachi H8S"; 4902c23cb7cSEd Maste case EM_H8_500: return "Hitachi H8/500"; 4912c23cb7cSEd Maste case EM_IA_64: return "Intel IA-64 Processor"; 4922c23cb7cSEd Maste case EM_MIPS_X: return "Stanford MIPS-X"; 4932c23cb7cSEd Maste case EM_COLDFIRE: return "Motorola ColdFire"; 4942c23cb7cSEd Maste case EM_68HC12: return "Motorola M68HC12"; 4952c23cb7cSEd Maste case EM_MMA: return "Fujitsu MMA"; 4962c23cb7cSEd Maste case EM_PCP: return "Siemens PCP"; 4972c23cb7cSEd Maste case EM_NCPU: return "Sony nCPU"; 4982c23cb7cSEd Maste case EM_NDR1: return "Denso NDR1 microprocessor"; 4992c23cb7cSEd Maste case EM_STARCORE: return "Motorola Star*Core processor"; 5002c23cb7cSEd Maste case EM_ME16: return "Toyota ME16 processor"; 5012c23cb7cSEd Maste case EM_ST100: return "STMicroelectronics ST100 processor"; 5022c23cb7cSEd Maste case EM_TINYJ: return "Advanced Logic Corp. TinyJ processor"; 5032c23cb7cSEd Maste case EM_X86_64: return "Advanced Micro Devices x86-64"; 5042c23cb7cSEd Maste case EM_PDSP: return "Sony DSP Processor"; 5052c23cb7cSEd Maste case EM_FX66: return "Siemens FX66 microcontroller"; 5062c23cb7cSEd Maste case EM_ST9PLUS: return "STMicroelectronics ST9+ 8/16 microcontroller"; 5072c23cb7cSEd Maste case EM_ST7: return "STmicroelectronics ST7 8-bit microcontroller"; 5082c23cb7cSEd Maste case EM_68HC16: return "Motorola MC68HC16 microcontroller"; 5092c23cb7cSEd Maste case EM_68HC11: return "Motorola MC68HC11 microcontroller"; 5102c23cb7cSEd Maste case EM_68HC08: return "Motorola MC68HC08 microcontroller"; 5112c23cb7cSEd Maste case EM_68HC05: return "Motorola MC68HC05 microcontroller"; 5122c23cb7cSEd Maste case EM_SVX: return "Silicon Graphics SVx"; 5132c23cb7cSEd Maste case EM_ST19: return "STMicroelectronics ST19 8-bit mc"; 5142c23cb7cSEd Maste case EM_VAX: return "Digital VAX"; 5152c23cb7cSEd Maste case EM_CRIS: return "Axis Communications 32-bit embedded processor"; 5162c23cb7cSEd Maste case EM_JAVELIN: return "Infineon Tech. 32bit embedded processor"; 5172c23cb7cSEd Maste case EM_FIREPATH: return "Element 14 64-bit DSP Processor"; 5182c23cb7cSEd Maste case EM_ZSP: return "LSI Logic 16-bit DSP Processor"; 5192c23cb7cSEd Maste case EM_MMIX: return "Donald Knuth's educational 64-bit proc"; 5202c23cb7cSEd Maste case EM_HUANY: return "Harvard University MI object files"; 5212c23cb7cSEd Maste case EM_PRISM: return "SiTera Prism"; 5222c23cb7cSEd Maste case EM_AVR: return "Atmel AVR 8-bit microcontroller"; 5232c23cb7cSEd Maste case EM_FR30: return "Fujitsu FR30"; 5242c23cb7cSEd Maste case EM_D10V: return "Mitsubishi D10V"; 5252c23cb7cSEd Maste case EM_D30V: return "Mitsubishi D30V"; 5262c23cb7cSEd Maste case EM_V850: return "NEC v850"; 5272c23cb7cSEd Maste case EM_M32R: return "Mitsubishi M32R"; 5282c23cb7cSEd Maste case EM_MN10300: return "Matsushita MN10300"; 5292c23cb7cSEd Maste case EM_MN10200: return "Matsushita MN10200"; 5302c23cb7cSEd Maste case EM_PJ: return "picoJava"; 5312c23cb7cSEd Maste case EM_OPENRISC: return "OpenRISC 32-bit embedded processor"; 5322c23cb7cSEd Maste case EM_ARC_A5: return "ARC Cores Tangent-A5"; 5332c23cb7cSEd Maste case EM_XTENSA: return "Tensilica Xtensa Architecture"; 5342c23cb7cSEd Maste case EM_VIDEOCORE: return "Alphamosaic VideoCore processor"; 5352c23cb7cSEd Maste case EM_TMM_GPP: return "Thompson Multimedia General Purpose Processor"; 5362c23cb7cSEd Maste case EM_NS32K: return "National Semiconductor 32000 series"; 5372c23cb7cSEd Maste case EM_TPC: return "Tenor Network TPC processor"; 5382c23cb7cSEd Maste case EM_SNP1K: return "Trebia SNP 1000 processor"; 5392c23cb7cSEd Maste case EM_ST200: return "STMicroelectronics ST200 microcontroller"; 5402c23cb7cSEd Maste case EM_IP2K: return "Ubicom IP2xxx microcontroller family"; 5412c23cb7cSEd Maste case EM_MAX: return "MAX Processor"; 5422c23cb7cSEd Maste case EM_CR: return "National Semiconductor CompactRISC microprocessor"; 5432c23cb7cSEd Maste case EM_F2MC16: return "Fujitsu F2MC16"; 5442c23cb7cSEd Maste case EM_MSP430: return "TI embedded microcontroller msp430"; 5452c23cb7cSEd Maste case EM_BLACKFIN: return "Analog Devices Blackfin (DSP) processor"; 5462c23cb7cSEd Maste case EM_SE_C33: return "S1C33 Family of Seiko Epson processors"; 5472c23cb7cSEd Maste case EM_SEP: return "Sharp embedded microprocessor"; 5482c23cb7cSEd Maste case EM_ARCA: return "Arca RISC Microprocessor"; 5492c23cb7cSEd Maste case EM_UNICORE: return "Microprocessor series from PKU-Unity Ltd"; 550b3f26809SEd Maste case EM_AARCH64: return "AArch64"; 551119b7592SEd Maste case EM_RISCV: return "RISC-V"; 5522c23cb7cSEd Maste default: 5532c23cb7cSEd Maste snprintf(s_mach, sizeof(s_mach), "<unknown: %#x>", mach); 5542c23cb7cSEd Maste return (s_mach); 5552c23cb7cSEd Maste } 5562c23cb7cSEd Maste 5572c23cb7cSEd Maste } 5582c23cb7cSEd Maste 5592c23cb7cSEd Maste static const char * 5602c23cb7cSEd Maste elf_class(unsigned int class) 5612c23cb7cSEd Maste { 5622c23cb7cSEd Maste static char s_class[32]; 5632c23cb7cSEd Maste 5642c23cb7cSEd Maste switch (class) { 5652c23cb7cSEd Maste case ELFCLASSNONE: return "none"; 5662c23cb7cSEd Maste case ELFCLASS32: return "ELF32"; 5672c23cb7cSEd Maste case ELFCLASS64: return "ELF64"; 5682c23cb7cSEd Maste default: 5692c23cb7cSEd Maste snprintf(s_class, sizeof(s_class), "<unknown: %#x>", class); 5702c23cb7cSEd Maste return (s_class); 5712c23cb7cSEd Maste } 5722c23cb7cSEd Maste } 5732c23cb7cSEd Maste 5742c23cb7cSEd Maste static const char * 5752c23cb7cSEd Maste elf_endian(unsigned int endian) 5762c23cb7cSEd Maste { 5772c23cb7cSEd Maste static char s_endian[32]; 5782c23cb7cSEd Maste 5792c23cb7cSEd Maste switch (endian) { 5802c23cb7cSEd Maste case ELFDATANONE: return "none"; 5812c23cb7cSEd Maste case ELFDATA2LSB: return "2's complement, little endian"; 5822c23cb7cSEd Maste case ELFDATA2MSB: return "2's complement, big endian"; 5832c23cb7cSEd Maste default: 5842c23cb7cSEd Maste snprintf(s_endian, sizeof(s_endian), "<unknown: %#x>", endian); 5852c23cb7cSEd Maste return (s_endian); 5862c23cb7cSEd Maste } 5872c23cb7cSEd Maste } 5882c23cb7cSEd Maste 5892c23cb7cSEd Maste static const char * 5902c23cb7cSEd Maste elf_type(unsigned int type) 5912c23cb7cSEd Maste { 5922c23cb7cSEd Maste static char s_type[32]; 5932c23cb7cSEd Maste 5942c23cb7cSEd Maste switch (type) { 5952c23cb7cSEd Maste case ET_NONE: return "NONE (None)"; 5962c23cb7cSEd Maste case ET_REL: return "REL (Relocatable file)"; 5972c23cb7cSEd Maste case ET_EXEC: return "EXEC (Executable file)"; 5982c23cb7cSEd Maste case ET_DYN: return "DYN (Shared object file)"; 5992c23cb7cSEd Maste case ET_CORE: return "CORE (Core file)"; 6002c23cb7cSEd Maste default: 6012c23cb7cSEd Maste if (type >= ET_LOPROC) 6022c23cb7cSEd Maste snprintf(s_type, sizeof(s_type), "<proc: %#x>", type); 6032c23cb7cSEd Maste else if (type >= ET_LOOS && type <= ET_HIOS) 6042c23cb7cSEd Maste snprintf(s_type, sizeof(s_type), "<os: %#x>", type); 6052c23cb7cSEd Maste else 6062c23cb7cSEd Maste snprintf(s_type, sizeof(s_type), "<unknown: %#x>", 6072c23cb7cSEd Maste type); 6082c23cb7cSEd Maste return (s_type); 6092c23cb7cSEd Maste } 6102c23cb7cSEd Maste } 6112c23cb7cSEd Maste 6122c23cb7cSEd Maste static const char * 6132c23cb7cSEd Maste elf_ver(unsigned int ver) 6142c23cb7cSEd Maste { 6152c23cb7cSEd Maste static char s_ver[32]; 6162c23cb7cSEd Maste 6172c23cb7cSEd Maste switch (ver) { 6182c23cb7cSEd Maste case EV_CURRENT: return "(current)"; 6192c23cb7cSEd Maste case EV_NONE: return "(none)"; 6202c23cb7cSEd Maste default: 6212c23cb7cSEd Maste snprintf(s_ver, sizeof(s_ver), "<unknown: %#x>", 6222c23cb7cSEd Maste ver); 6232c23cb7cSEd Maste return (s_ver); 6242c23cb7cSEd Maste } 6252c23cb7cSEd Maste } 6262c23cb7cSEd Maste 6272c23cb7cSEd Maste static const char * 62820136ffcSEd Maste phdr_type(unsigned int mach, unsigned int ptype) 6292c23cb7cSEd Maste { 6302c23cb7cSEd Maste static char s_ptype[32]; 6312c23cb7cSEd Maste 63220136ffcSEd Maste if (ptype >= PT_LOPROC && ptype <= PT_HIPROC) { 63320136ffcSEd Maste switch (mach) { 63420136ffcSEd Maste case EM_ARM: 63520136ffcSEd Maste switch (ptype) { 63620136ffcSEd Maste case PT_ARM_ARCHEXT: return "ARM_ARCHEXT"; 63720136ffcSEd Maste case PT_ARM_EXIDX: return "ARM_EXIDX"; 63820136ffcSEd Maste } 63920136ffcSEd Maste break; 64020136ffcSEd Maste } 64120136ffcSEd Maste snprintf(s_ptype, sizeof(s_ptype), "LOPROC+%#x", 64220136ffcSEd Maste ptype - PT_LOPROC); 64320136ffcSEd Maste return (s_ptype); 64420136ffcSEd Maste } 64520136ffcSEd Maste 6462c23cb7cSEd Maste switch (ptype) { 6472c23cb7cSEd Maste case PT_NULL: return "NULL"; 6482c23cb7cSEd Maste case PT_LOAD: return "LOAD"; 6492c23cb7cSEd Maste case PT_DYNAMIC: return "DYNAMIC"; 6502c23cb7cSEd Maste case PT_INTERP: return "INTERP"; 6512c23cb7cSEd Maste case PT_NOTE: return "NOTE"; 6522c23cb7cSEd Maste case PT_SHLIB: return "SHLIB"; 6532c23cb7cSEd Maste case PT_PHDR: return "PHDR"; 6542c23cb7cSEd Maste case PT_TLS: return "TLS"; 6552c23cb7cSEd Maste case PT_GNU_EH_FRAME: return "GNU_EH_FRAME"; 6562c23cb7cSEd Maste case PT_GNU_STACK: return "GNU_STACK"; 6572c23cb7cSEd Maste case PT_GNU_RELRO: return "GNU_RELRO"; 6582c23cb7cSEd Maste default: 65920136ffcSEd Maste if (ptype >= PT_LOOS && ptype <= PT_HIOS) 6602c23cb7cSEd Maste snprintf(s_ptype, sizeof(s_ptype), "LOOS+%#x", 6612c23cb7cSEd Maste ptype - PT_LOOS); 6622c23cb7cSEd Maste else 6632c23cb7cSEd Maste snprintf(s_ptype, sizeof(s_ptype), "<unknown: %#x>", 6642c23cb7cSEd Maste ptype); 6652c23cb7cSEd Maste return (s_ptype); 6662c23cb7cSEd Maste } 6672c23cb7cSEd Maste } 6682c23cb7cSEd Maste 6692c23cb7cSEd Maste static const char * 6702c23cb7cSEd Maste section_type(unsigned int mach, unsigned int stype) 6712c23cb7cSEd Maste { 6722c23cb7cSEd Maste static char s_stype[32]; 6732c23cb7cSEd Maste 6742c23cb7cSEd Maste if (stype >= SHT_LOPROC && stype <= SHT_HIPROC) { 6752c23cb7cSEd Maste switch (mach) { 67620136ffcSEd Maste case EM_ARM: 67720136ffcSEd Maste switch (stype) { 67820136ffcSEd Maste case SHT_ARM_EXIDX: return "ARM_EXIDX"; 67920136ffcSEd Maste case SHT_ARM_PREEMPTMAP: return "ARM_PREEMPTMAP"; 68020136ffcSEd Maste case SHT_ARM_ATTRIBUTES: return "ARM_ATTRIBUTES"; 68120136ffcSEd Maste case SHT_ARM_DEBUGOVERLAY: return "ARM_DEBUGOVERLAY"; 68220136ffcSEd Maste case SHT_ARM_OVERLAYSECTION: return "ARM_OVERLAYSECTION"; 68320136ffcSEd Maste } 68420136ffcSEd Maste break; 6852c23cb7cSEd Maste case EM_X86_64: 6862c23cb7cSEd Maste switch (stype) { 687b6b6f9ccSEd Maste case SHT_X86_64_UNWIND: return "X86_64_UNWIND"; 6882c23cb7cSEd Maste default: 6892c23cb7cSEd Maste break; 6902c23cb7cSEd Maste } 6912c23cb7cSEd Maste break; 6922c23cb7cSEd Maste case EM_MIPS: 6932c23cb7cSEd Maste case EM_MIPS_RS3_LE: 6942c23cb7cSEd Maste switch (stype) { 6952c23cb7cSEd Maste case SHT_MIPS_LIBLIST: return "MIPS_LIBLIST"; 6962c23cb7cSEd Maste case SHT_MIPS_MSYM: return "MIPS_MSYM"; 6972c23cb7cSEd Maste case SHT_MIPS_CONFLICT: return "MIPS_CONFLICT"; 6982c23cb7cSEd Maste case SHT_MIPS_GPTAB: return "MIPS_GPTAB"; 6992c23cb7cSEd Maste case SHT_MIPS_UCODE: return "MIPS_UCODE"; 7002c23cb7cSEd Maste case SHT_MIPS_DEBUG: return "MIPS_DEBUG"; 7012c23cb7cSEd Maste case SHT_MIPS_REGINFO: return "MIPS_REGINFO"; 7022c23cb7cSEd Maste case SHT_MIPS_PACKAGE: return "MIPS_PACKAGE"; 7032c23cb7cSEd Maste case SHT_MIPS_PACKSYM: return "MIPS_PACKSYM"; 7042c23cb7cSEd Maste case SHT_MIPS_RELD: return "MIPS_RELD"; 7052c23cb7cSEd Maste case SHT_MIPS_IFACE: return "MIPS_IFACE"; 7062c23cb7cSEd Maste case SHT_MIPS_CONTENT: return "MIPS_CONTENT"; 7072c23cb7cSEd Maste case SHT_MIPS_OPTIONS: return "MIPS_OPTIONS"; 7082c23cb7cSEd Maste case SHT_MIPS_DELTASYM: return "MIPS_DELTASYM"; 7092c23cb7cSEd Maste case SHT_MIPS_DELTAINST: return "MIPS_DELTAINST"; 7102c23cb7cSEd Maste case SHT_MIPS_DELTACLASS: return "MIPS_DELTACLASS"; 7112c23cb7cSEd Maste case SHT_MIPS_DWARF: return "MIPS_DWARF"; 7122c23cb7cSEd Maste case SHT_MIPS_DELTADECL: return "MIPS_DELTADECL"; 7132c23cb7cSEd Maste case SHT_MIPS_SYMBOL_LIB: return "MIPS_SYMBOL_LIB"; 7142c23cb7cSEd Maste case SHT_MIPS_EVENTS: return "MIPS_EVENTS"; 7152c23cb7cSEd Maste case SHT_MIPS_TRANSLATE: return "MIPS_TRANSLATE"; 7162c23cb7cSEd Maste case SHT_MIPS_PIXIE: return "MIPS_PIXIE"; 7172c23cb7cSEd Maste case SHT_MIPS_XLATE: return "MIPS_XLATE"; 7182c23cb7cSEd Maste case SHT_MIPS_XLATE_DEBUG: return "MIPS_XLATE_DEBUG"; 7192c23cb7cSEd Maste case SHT_MIPS_WHIRL: return "MIPS_WHIRL"; 7202c23cb7cSEd Maste case SHT_MIPS_EH_REGION: return "MIPS_EH_REGION"; 7212c23cb7cSEd Maste case SHT_MIPS_XLATE_OLD: return "MIPS_XLATE_OLD"; 7222c23cb7cSEd Maste case SHT_MIPS_PDR_EXCEPTION: return "MIPS_PDR_EXCEPTION"; 723bee2765cSEd Maste case SHT_MIPS_ABIFLAGS: return "MIPS_ABIFLAGS"; 7242c23cb7cSEd Maste default: 7252c23cb7cSEd Maste break; 7262c23cb7cSEd Maste } 7272c23cb7cSEd Maste break; 7282c23cb7cSEd Maste default: 7292c23cb7cSEd Maste break; 7302c23cb7cSEd Maste } 7312c23cb7cSEd Maste 7322c23cb7cSEd Maste snprintf(s_stype, sizeof(s_stype), "LOPROC+%#x", 7332c23cb7cSEd Maste stype - SHT_LOPROC); 7342c23cb7cSEd Maste return (s_stype); 7352c23cb7cSEd Maste } 7362c23cb7cSEd Maste 7372c23cb7cSEd Maste switch (stype) { 7382c23cb7cSEd Maste case SHT_NULL: return "NULL"; 7392c23cb7cSEd Maste case SHT_PROGBITS: return "PROGBITS"; 7402c23cb7cSEd Maste case SHT_SYMTAB: return "SYMTAB"; 7412c23cb7cSEd Maste case SHT_STRTAB: return "STRTAB"; 7422c23cb7cSEd Maste case SHT_RELA: return "RELA"; 7432c23cb7cSEd Maste case SHT_HASH: return "HASH"; 7442c23cb7cSEd Maste case SHT_DYNAMIC: return "DYNAMIC"; 7452c23cb7cSEd Maste case SHT_NOTE: return "NOTE"; 7462c23cb7cSEd Maste case SHT_NOBITS: return "NOBITS"; 7472c23cb7cSEd Maste case SHT_REL: return "REL"; 7482c23cb7cSEd Maste case SHT_SHLIB: return "SHLIB"; 7492c23cb7cSEd Maste case SHT_DYNSYM: return "DYNSYM"; 7502c23cb7cSEd Maste case SHT_INIT_ARRAY: return "INIT_ARRAY"; 7512c23cb7cSEd Maste case SHT_FINI_ARRAY: return "FINI_ARRAY"; 7522c23cb7cSEd Maste case SHT_PREINIT_ARRAY: return "PREINIT_ARRAY"; 7532c23cb7cSEd Maste case SHT_GROUP: return "GROUP"; 7542c23cb7cSEd Maste case SHT_SYMTAB_SHNDX: return "SYMTAB_SHNDX"; 7552c23cb7cSEd Maste case SHT_SUNW_dof: return "SUNW_dof"; 7562c23cb7cSEd Maste case SHT_SUNW_cap: return "SUNW_cap"; 7572c23cb7cSEd Maste case SHT_GNU_HASH: return "GNU_HASH"; 7582c23cb7cSEd Maste case SHT_SUNW_ANNOTATE: return "SUNW_ANNOTATE"; 7592c23cb7cSEd Maste case SHT_SUNW_DEBUGSTR: return "SUNW_DEBUGSTR"; 7602c23cb7cSEd Maste case SHT_SUNW_DEBUG: return "SUNW_DEBUG"; 7612c23cb7cSEd Maste case SHT_SUNW_move: return "SUNW_move"; 7622c23cb7cSEd Maste case SHT_SUNW_COMDAT: return "SUNW_COMDAT"; 7632c23cb7cSEd Maste case SHT_SUNW_syminfo: return "SUNW_syminfo"; 7642c23cb7cSEd Maste case SHT_SUNW_verdef: return "SUNW_verdef"; 7652c23cb7cSEd Maste case SHT_SUNW_verneed: return "SUNW_verneed"; 7662c23cb7cSEd Maste case SHT_SUNW_versym: return "SUNW_versym"; 7672c23cb7cSEd Maste default: 7682c23cb7cSEd Maste if (stype >= SHT_LOOS && stype <= SHT_HIOS) 7692c23cb7cSEd Maste snprintf(s_stype, sizeof(s_stype), "LOOS+%#x", 7702c23cb7cSEd Maste stype - SHT_LOOS); 7712c23cb7cSEd Maste else if (stype >= SHT_LOUSER) 7722c23cb7cSEd Maste snprintf(s_stype, sizeof(s_stype), "LOUSER+%#x", 7732c23cb7cSEd Maste stype - SHT_LOUSER); 7742c23cb7cSEd Maste else 7752c23cb7cSEd Maste snprintf(s_stype, sizeof(s_stype), "<unknown: %#x>", 7762c23cb7cSEd Maste stype); 7772c23cb7cSEd Maste return (s_stype); 7782c23cb7cSEd Maste } 7792c23cb7cSEd Maste } 7802c23cb7cSEd Maste 7812c23cb7cSEd Maste static const char * 7822c23cb7cSEd Maste dt_type(unsigned int mach, unsigned int dtype) 7832c23cb7cSEd Maste { 7842c23cb7cSEd Maste static char s_dtype[32]; 7852c23cb7cSEd Maste 786d62ecb4eSEd Maste switch (dtype) { 787d62ecb4eSEd Maste case DT_NULL: return "NULL"; 788d62ecb4eSEd Maste case DT_NEEDED: return "NEEDED"; 789d62ecb4eSEd Maste case DT_PLTRELSZ: return "PLTRELSZ"; 790d62ecb4eSEd Maste case DT_PLTGOT: return "PLTGOT"; 791d62ecb4eSEd Maste case DT_HASH: return "HASH"; 792d62ecb4eSEd Maste case DT_STRTAB: return "STRTAB"; 793d62ecb4eSEd Maste case DT_SYMTAB: return "SYMTAB"; 794d62ecb4eSEd Maste case DT_RELA: return "RELA"; 795d62ecb4eSEd Maste case DT_RELASZ: return "RELASZ"; 796d62ecb4eSEd Maste case DT_RELAENT: return "RELAENT"; 797d62ecb4eSEd Maste case DT_STRSZ: return "STRSZ"; 798d62ecb4eSEd Maste case DT_SYMENT: return "SYMENT"; 799d62ecb4eSEd Maste case DT_INIT: return "INIT"; 800d62ecb4eSEd Maste case DT_FINI: return "FINI"; 801d62ecb4eSEd Maste case DT_SONAME: return "SONAME"; 802d62ecb4eSEd Maste case DT_RPATH: return "RPATH"; 803d62ecb4eSEd Maste case DT_SYMBOLIC: return "SYMBOLIC"; 804d62ecb4eSEd Maste case DT_REL: return "REL"; 805d62ecb4eSEd Maste case DT_RELSZ: return "RELSZ"; 806d62ecb4eSEd Maste case DT_RELENT: return "RELENT"; 807d62ecb4eSEd Maste case DT_PLTREL: return "PLTREL"; 808d62ecb4eSEd Maste case DT_DEBUG: return "DEBUG"; 809d62ecb4eSEd Maste case DT_TEXTREL: return "TEXTREL"; 810d62ecb4eSEd Maste case DT_JMPREL: return "JMPREL"; 811d62ecb4eSEd Maste case DT_BIND_NOW: return "BIND_NOW"; 812d62ecb4eSEd Maste case DT_INIT_ARRAY: return "INIT_ARRAY"; 813d62ecb4eSEd Maste case DT_FINI_ARRAY: return "FINI_ARRAY"; 814d62ecb4eSEd Maste case DT_INIT_ARRAYSZ: return "INIT_ARRAYSZ"; 815d62ecb4eSEd Maste case DT_FINI_ARRAYSZ: return "FINI_ARRAYSZ"; 816d62ecb4eSEd Maste case DT_RUNPATH: return "RUNPATH"; 817d62ecb4eSEd Maste case DT_FLAGS: return "FLAGS"; 818d62ecb4eSEd Maste case DT_PREINIT_ARRAY: return "PREINIT_ARRAY"; 819d62ecb4eSEd Maste case DT_PREINIT_ARRAYSZ: return "PREINIT_ARRAYSZ"; 820d62ecb4eSEd Maste case DT_MAXPOSTAGS: return "MAXPOSTAGS"; 821d62ecb4eSEd Maste case DT_SUNW_AUXILIARY: return "SUNW_AUXILIARY"; 822d62ecb4eSEd Maste case DT_SUNW_RTLDINF: return "SUNW_RTLDINF"; 823d62ecb4eSEd Maste case DT_SUNW_FILTER: return "SUNW_FILTER"; 824d62ecb4eSEd Maste case DT_SUNW_CAP: return "SUNW_CAP"; 825d62ecb4eSEd Maste case DT_CHECKSUM: return "CHECKSUM"; 826d62ecb4eSEd Maste case DT_PLTPADSZ: return "PLTPADSZ"; 827d62ecb4eSEd Maste case DT_MOVEENT: return "MOVEENT"; 828d62ecb4eSEd Maste case DT_MOVESZ: return "MOVESZ"; 829d62ecb4eSEd Maste case DT_FEATURE: return "FEATURE"; 830d62ecb4eSEd Maste case DT_POSFLAG_1: return "POSFLAG_1"; 831d62ecb4eSEd Maste case DT_SYMINSZ: return "SYMINSZ"; 832d62ecb4eSEd Maste case DT_SYMINENT: return "SYMINENT"; 833d62ecb4eSEd Maste case DT_GNU_HASH: return "GNU_HASH"; 834d62ecb4eSEd Maste case DT_TLSDESC_PLT: return "DT_TLSDESC_PLT"; 835d62ecb4eSEd Maste case DT_TLSDESC_GOT: return "DT_TLSDESC_GOT"; 836d62ecb4eSEd Maste case DT_GNU_CONFLICT: return "GNU_CONFLICT"; 837d62ecb4eSEd Maste case DT_GNU_LIBLIST: return "GNU_LIBLIST"; 838d62ecb4eSEd Maste case DT_CONFIG: return "CONFIG"; 839d62ecb4eSEd Maste case DT_DEPAUDIT: return "DEPAUDIT"; 840d62ecb4eSEd Maste case DT_AUDIT: return "AUDIT"; 841d62ecb4eSEd Maste case DT_PLTPAD: return "PLTPAD"; 842d62ecb4eSEd Maste case DT_MOVETAB: return "MOVETAB"; 843d62ecb4eSEd Maste case DT_SYMINFO: return "SYMINFO"; 844d62ecb4eSEd Maste case DT_VERSYM: return "VERSYM"; 845d62ecb4eSEd Maste case DT_RELACOUNT: return "RELACOUNT"; 846d62ecb4eSEd Maste case DT_RELCOUNT: return "RELCOUNT"; 847d62ecb4eSEd Maste case DT_FLAGS_1: return "FLAGS_1"; 848d62ecb4eSEd Maste case DT_VERDEF: return "VERDEF"; 849d62ecb4eSEd Maste case DT_VERDEFNUM: return "VERDEFNUM"; 850d62ecb4eSEd Maste case DT_VERNEED: return "VERNEED"; 851d62ecb4eSEd Maste case DT_VERNEEDNUM: return "VERNEEDNUM"; 852d62ecb4eSEd Maste case DT_AUXILIARY: return "AUXILIARY"; 853d62ecb4eSEd Maste case DT_USED: return "USED"; 854d62ecb4eSEd Maste case DT_FILTER: return "FILTER"; 855d62ecb4eSEd Maste case DT_GNU_PRELINKED: return "GNU_PRELINKED"; 856d62ecb4eSEd Maste case DT_GNU_CONFLICTSZ: return "GNU_CONFLICTSZ"; 857d62ecb4eSEd Maste case DT_GNU_LIBLISTSZ: return "GNU_LIBLISTSZ"; 858d62ecb4eSEd Maste } 859d62ecb4eSEd Maste 8602c23cb7cSEd Maste if (dtype >= DT_LOPROC && dtype <= DT_HIPROC) { 8612c23cb7cSEd Maste switch (mach) { 8622c23cb7cSEd Maste case EM_ARM: 8632c23cb7cSEd Maste switch (dtype) { 8642c23cb7cSEd Maste case DT_ARM_SYMTABSZ: 8652c23cb7cSEd Maste return "ARM_SYMTABSZ"; 8662c23cb7cSEd Maste default: 8672c23cb7cSEd Maste break; 8682c23cb7cSEd Maste } 8692c23cb7cSEd Maste break; 8702c23cb7cSEd Maste case EM_MIPS: 8712c23cb7cSEd Maste case EM_MIPS_RS3_LE: 8722c23cb7cSEd Maste switch (dtype) { 8732c23cb7cSEd Maste case DT_MIPS_RLD_VERSION: 8742c23cb7cSEd Maste return "MIPS_RLD_VERSION"; 8752c23cb7cSEd Maste case DT_MIPS_TIME_STAMP: 8762c23cb7cSEd Maste return "MIPS_TIME_STAMP"; 8772c23cb7cSEd Maste case DT_MIPS_ICHECKSUM: 8782c23cb7cSEd Maste return "MIPS_ICHECKSUM"; 8792c23cb7cSEd Maste case DT_MIPS_IVERSION: 8802c23cb7cSEd Maste return "MIPS_IVERSION"; 8812c23cb7cSEd Maste case DT_MIPS_FLAGS: 8822c23cb7cSEd Maste return "MIPS_FLAGS"; 8832c23cb7cSEd Maste case DT_MIPS_BASE_ADDRESS: 8842c23cb7cSEd Maste return "MIPS_BASE_ADDRESS"; 8852c23cb7cSEd Maste case DT_MIPS_CONFLICT: 8862c23cb7cSEd Maste return "MIPS_CONFLICT"; 8872c23cb7cSEd Maste case DT_MIPS_LIBLIST: 8882c23cb7cSEd Maste return "MIPS_LIBLIST"; 8892c23cb7cSEd Maste case DT_MIPS_LOCAL_GOTNO: 8902c23cb7cSEd Maste return "MIPS_LOCAL_GOTNO"; 8912c23cb7cSEd Maste case DT_MIPS_CONFLICTNO: 8922c23cb7cSEd Maste return "MIPS_CONFLICTNO"; 8932c23cb7cSEd Maste case DT_MIPS_LIBLISTNO: 8942c23cb7cSEd Maste return "MIPS_LIBLISTNO"; 8952c23cb7cSEd Maste case DT_MIPS_SYMTABNO: 8962c23cb7cSEd Maste return "MIPS_SYMTABNO"; 8972c23cb7cSEd Maste case DT_MIPS_UNREFEXTNO: 8982c23cb7cSEd Maste return "MIPS_UNREFEXTNO"; 8992c23cb7cSEd Maste case DT_MIPS_GOTSYM: 9002c23cb7cSEd Maste return "MIPS_GOTSYM"; 9012c23cb7cSEd Maste case DT_MIPS_HIPAGENO: 9022c23cb7cSEd Maste return "MIPS_HIPAGENO"; 9032c23cb7cSEd Maste case DT_MIPS_RLD_MAP: 9042c23cb7cSEd Maste return "MIPS_RLD_MAP"; 9052c23cb7cSEd Maste case DT_MIPS_DELTA_CLASS: 9062c23cb7cSEd Maste return "MIPS_DELTA_CLASS"; 9072c23cb7cSEd Maste case DT_MIPS_DELTA_CLASS_NO: 9082c23cb7cSEd Maste return "MIPS_DELTA_CLASS_NO"; 9092c23cb7cSEd Maste case DT_MIPS_DELTA_INSTANCE: 9102c23cb7cSEd Maste return "MIPS_DELTA_INSTANCE"; 9112c23cb7cSEd Maste case DT_MIPS_DELTA_INSTANCE_NO: 9122c23cb7cSEd Maste return "MIPS_DELTA_INSTANCE_NO"; 9132c23cb7cSEd Maste case DT_MIPS_DELTA_RELOC: 9142c23cb7cSEd Maste return "MIPS_DELTA_RELOC"; 9152c23cb7cSEd Maste case DT_MIPS_DELTA_RELOC_NO: 9162c23cb7cSEd Maste return "MIPS_DELTA_RELOC_NO"; 9172c23cb7cSEd Maste case DT_MIPS_DELTA_SYM: 9182c23cb7cSEd Maste return "MIPS_DELTA_SYM"; 9192c23cb7cSEd Maste case DT_MIPS_DELTA_SYM_NO: 9202c23cb7cSEd Maste return "MIPS_DELTA_SYM_NO"; 9212c23cb7cSEd Maste case DT_MIPS_DELTA_CLASSSYM: 9222c23cb7cSEd Maste return "MIPS_DELTA_CLASSSYM"; 9232c23cb7cSEd Maste case DT_MIPS_DELTA_CLASSSYM_NO: 9242c23cb7cSEd Maste return "MIPS_DELTA_CLASSSYM_NO"; 9252c23cb7cSEd Maste case DT_MIPS_CXX_FLAGS: 9262c23cb7cSEd Maste return "MIPS_CXX_FLAGS"; 9272c23cb7cSEd Maste case DT_MIPS_PIXIE_INIT: 9282c23cb7cSEd Maste return "MIPS_PIXIE_INIT"; 9292c23cb7cSEd Maste case DT_MIPS_SYMBOL_LIB: 9302c23cb7cSEd Maste return "MIPS_SYMBOL_LIB"; 9312c23cb7cSEd Maste case DT_MIPS_LOCALPAGE_GOTIDX: 9322c23cb7cSEd Maste return "MIPS_LOCALPAGE_GOTIDX"; 9332c23cb7cSEd Maste case DT_MIPS_LOCAL_GOTIDX: 9342c23cb7cSEd Maste return "MIPS_LOCAL_GOTIDX"; 9352c23cb7cSEd Maste case DT_MIPS_HIDDEN_GOTIDX: 9362c23cb7cSEd Maste return "MIPS_HIDDEN_GOTIDX"; 9372c23cb7cSEd Maste case DT_MIPS_PROTECTED_GOTIDX: 9382c23cb7cSEd Maste return "MIPS_PROTECTED_GOTIDX"; 9392c23cb7cSEd Maste case DT_MIPS_OPTIONS: 9402c23cb7cSEd Maste return "MIPS_OPTIONS"; 9412c23cb7cSEd Maste case DT_MIPS_INTERFACE: 9422c23cb7cSEd Maste return "MIPS_INTERFACE"; 9432c23cb7cSEd Maste case DT_MIPS_DYNSTR_ALIGN: 9442c23cb7cSEd Maste return "MIPS_DYNSTR_ALIGN"; 9452c23cb7cSEd Maste case DT_MIPS_INTERFACE_SIZE: 9462c23cb7cSEd Maste return "MIPS_INTERFACE_SIZE"; 9472c23cb7cSEd Maste case DT_MIPS_RLD_TEXT_RESOLVE_ADDR: 9482c23cb7cSEd Maste return "MIPS_RLD_TEXT_RESOLVE_ADDR"; 9492c23cb7cSEd Maste case DT_MIPS_PERF_SUFFIX: 9502c23cb7cSEd Maste return "MIPS_PERF_SUFFIX"; 9512c23cb7cSEd Maste case DT_MIPS_COMPACT_SIZE: 9522c23cb7cSEd Maste return "MIPS_COMPACT_SIZE"; 9532c23cb7cSEd Maste case DT_MIPS_GP_VALUE: 9542c23cb7cSEd Maste return "MIPS_GP_VALUE"; 9552c23cb7cSEd Maste case DT_MIPS_AUX_DYNAMIC: 9562c23cb7cSEd Maste return "MIPS_AUX_DYNAMIC"; 9572c23cb7cSEd Maste case DT_MIPS_PLTGOT: 9582c23cb7cSEd Maste return "MIPS_PLTGOT"; 9592c23cb7cSEd Maste case DT_MIPS_RLD_OBJ_UPDATE: 9602c23cb7cSEd Maste return "MIPS_RLD_OBJ_UPDATE"; 9612c23cb7cSEd Maste case DT_MIPS_RWPLT: 9622c23cb7cSEd Maste return "MIPS_RWPLT"; 9632c23cb7cSEd Maste default: 9642c23cb7cSEd Maste break; 9652c23cb7cSEd Maste } 9662c23cb7cSEd Maste break; 9672c23cb7cSEd Maste case EM_SPARC: 9682c23cb7cSEd Maste case EM_SPARC32PLUS: 9692c23cb7cSEd Maste case EM_SPARCV9: 9702c23cb7cSEd Maste switch (dtype) { 9712c23cb7cSEd Maste case DT_SPARC_REGISTER: 9722c23cb7cSEd Maste return "DT_SPARC_REGISTER"; 9732c23cb7cSEd Maste default: 9742c23cb7cSEd Maste break; 9752c23cb7cSEd Maste } 9762c23cb7cSEd Maste break; 9772c23cb7cSEd Maste default: 9782c23cb7cSEd Maste break; 9792c23cb7cSEd Maste } 9802c23cb7cSEd Maste } 9812c23cb7cSEd Maste 9822c23cb7cSEd Maste snprintf(s_dtype, sizeof(s_dtype), "<unknown: %#x>", dtype); 9832c23cb7cSEd Maste return (s_dtype); 9842c23cb7cSEd Maste } 9852c23cb7cSEd Maste 9862c23cb7cSEd Maste static const char * 9872c23cb7cSEd Maste st_bind(unsigned int sbind) 9882c23cb7cSEd Maste { 9892c23cb7cSEd Maste static char s_sbind[32]; 9902c23cb7cSEd Maste 9912c23cb7cSEd Maste switch (sbind) { 9922c23cb7cSEd Maste case STB_LOCAL: return "LOCAL"; 9932c23cb7cSEd Maste case STB_GLOBAL: return "GLOBAL"; 9942c23cb7cSEd Maste case STB_WEAK: return "WEAK"; 995839529caSEd Maste case STB_GNU_UNIQUE: return "UNIQUE"; 9962c23cb7cSEd Maste default: 9972c23cb7cSEd Maste if (sbind >= STB_LOOS && sbind <= STB_HIOS) 9982c23cb7cSEd Maste return "OS"; 9992c23cb7cSEd Maste else if (sbind >= STB_LOPROC && sbind <= STB_HIPROC) 10002c23cb7cSEd Maste return "PROC"; 10012c23cb7cSEd Maste else 10022c23cb7cSEd Maste snprintf(s_sbind, sizeof(s_sbind), "<unknown: %#x>", 10032c23cb7cSEd Maste sbind); 10042c23cb7cSEd Maste return (s_sbind); 10052c23cb7cSEd Maste } 10062c23cb7cSEd Maste } 10072c23cb7cSEd Maste 10082c23cb7cSEd Maste static const char * 1009b6b6f9ccSEd Maste st_type(unsigned int mach, unsigned int os, unsigned int stype) 10102c23cb7cSEd Maste { 10112c23cb7cSEd Maste static char s_stype[32]; 10122c23cb7cSEd Maste 10132c23cb7cSEd Maste switch (stype) { 10142c23cb7cSEd Maste case STT_NOTYPE: return "NOTYPE"; 10152c23cb7cSEd Maste case STT_OBJECT: return "OBJECT"; 10162c23cb7cSEd Maste case STT_FUNC: return "FUNC"; 10172c23cb7cSEd Maste case STT_SECTION: return "SECTION"; 10182c23cb7cSEd Maste case STT_FILE: return "FILE"; 10192c23cb7cSEd Maste case STT_COMMON: return "COMMON"; 10202c23cb7cSEd Maste case STT_TLS: return "TLS"; 10212c23cb7cSEd Maste default: 1022b6b6f9ccSEd Maste if (stype >= STT_LOOS && stype <= STT_HIOS) { 1023b6b6f9ccSEd Maste if ((os == ELFOSABI_GNU || os == ELFOSABI_FREEBSD) && 1024b6b6f9ccSEd Maste stype == STT_GNU_IFUNC) 1025b6b6f9ccSEd Maste return "IFUNC"; 10262c23cb7cSEd Maste snprintf(s_stype, sizeof(s_stype), "OS+%#x", 10272c23cb7cSEd Maste stype - STT_LOOS); 1028b6b6f9ccSEd Maste } else if (stype >= STT_LOPROC && stype <= STT_HIPROC) { 1029839529caSEd Maste if (mach == EM_SPARCV9 && stype == STT_SPARC_REGISTER) 1030839529caSEd Maste return "REGISTER"; 10312c23cb7cSEd Maste snprintf(s_stype, sizeof(s_stype), "PROC+%#x", 10322c23cb7cSEd Maste stype - STT_LOPROC); 1033839529caSEd Maste } else 10342c23cb7cSEd Maste snprintf(s_stype, sizeof(s_stype), "<unknown: %#x>", 10352c23cb7cSEd Maste stype); 10362c23cb7cSEd Maste return (s_stype); 10372c23cb7cSEd Maste } 10382c23cb7cSEd Maste } 10392c23cb7cSEd Maste 10402c23cb7cSEd Maste static const char * 10412c23cb7cSEd Maste st_vis(unsigned int svis) 10422c23cb7cSEd Maste { 10432c23cb7cSEd Maste static char s_svis[32]; 10442c23cb7cSEd Maste 10452c23cb7cSEd Maste switch(svis) { 10462c23cb7cSEd Maste case STV_DEFAULT: return "DEFAULT"; 10472c23cb7cSEd Maste case STV_INTERNAL: return "INTERNAL"; 10482c23cb7cSEd Maste case STV_HIDDEN: return "HIDDEN"; 10492c23cb7cSEd Maste case STV_PROTECTED: return "PROTECTED"; 10502c23cb7cSEd Maste default: 10512c23cb7cSEd Maste snprintf(s_svis, sizeof(s_svis), "<unknown: %#x>", svis); 10522c23cb7cSEd Maste return (s_svis); 10532c23cb7cSEd Maste } 10542c23cb7cSEd Maste } 10552c23cb7cSEd Maste 10562c23cb7cSEd Maste static const char * 10572c23cb7cSEd Maste st_shndx(unsigned int shndx) 10582c23cb7cSEd Maste { 10592c23cb7cSEd Maste static char s_shndx[32]; 10602c23cb7cSEd Maste 10612c23cb7cSEd Maste switch (shndx) { 10622c23cb7cSEd Maste case SHN_UNDEF: return "UND"; 10632c23cb7cSEd Maste case SHN_ABS: return "ABS"; 10642c23cb7cSEd Maste case SHN_COMMON: return "COM"; 10652c23cb7cSEd Maste default: 10662c23cb7cSEd Maste if (shndx >= SHN_LOPROC && shndx <= SHN_HIPROC) 10672c23cb7cSEd Maste return "PRC"; 10682c23cb7cSEd Maste else if (shndx >= SHN_LOOS && shndx <= SHN_HIOS) 10692c23cb7cSEd Maste return "OS"; 10702c23cb7cSEd Maste else 10712c23cb7cSEd Maste snprintf(s_shndx, sizeof(s_shndx), "%u", shndx); 10722c23cb7cSEd Maste return (s_shndx); 10732c23cb7cSEd Maste } 10742c23cb7cSEd Maste } 10752c23cb7cSEd Maste 10762c23cb7cSEd Maste static struct { 10772c23cb7cSEd Maste const char *ln; 10782c23cb7cSEd Maste char sn; 10792c23cb7cSEd Maste int value; 10802c23cb7cSEd Maste } section_flag[] = { 10812c23cb7cSEd Maste {"WRITE", 'W', SHF_WRITE}, 10822c23cb7cSEd Maste {"ALLOC", 'A', SHF_ALLOC}, 10832c23cb7cSEd Maste {"EXEC", 'X', SHF_EXECINSTR}, 10842c23cb7cSEd Maste {"MERGE", 'M', SHF_MERGE}, 10852c23cb7cSEd Maste {"STRINGS", 'S', SHF_STRINGS}, 10862c23cb7cSEd Maste {"INFO LINK", 'I', SHF_INFO_LINK}, 10872c23cb7cSEd Maste {"OS NONCONF", 'O', SHF_OS_NONCONFORMING}, 10882c23cb7cSEd Maste {"GROUP", 'G', SHF_GROUP}, 10892c23cb7cSEd Maste {"TLS", 'T', SHF_TLS}, 1090b6b6f9ccSEd Maste {"COMPRESSED", 'C', SHF_COMPRESSED}, 10912c23cb7cSEd Maste {NULL, 0, 0} 10922c23cb7cSEd Maste }; 10932c23cb7cSEd Maste 10942c23cb7cSEd Maste static const char * 109502b08c90SEd Maste note_type(const char *name, unsigned int et, unsigned int nt) 109602b08c90SEd Maste { 109771a0c925SEd Maste if ((strcmp(name, "CORE") == 0 || strcmp(name, "LINUX") == 0) && 109871a0c925SEd Maste et == ET_CORE) 109902b08c90SEd Maste return note_type_linux_core(nt); 110002b08c90SEd Maste else if (strcmp(name, "FreeBSD") == 0) 110102b08c90SEd Maste if (et == ET_CORE) 110202b08c90SEd Maste return note_type_freebsd_core(nt); 110302b08c90SEd Maste else 110402b08c90SEd Maste return note_type_freebsd(nt); 110502b08c90SEd Maste else if (strcmp(name, "GNU") == 0 && et != ET_CORE) 110602b08c90SEd Maste return note_type_gnu(nt); 110702b08c90SEd Maste else if (strcmp(name, "NetBSD") == 0 && et != ET_CORE) 110802b08c90SEd Maste return note_type_netbsd(nt); 110902b08c90SEd Maste else if (strcmp(name, "OpenBSD") == 0 && et != ET_CORE) 111002b08c90SEd Maste return note_type_openbsd(nt); 1111895f86f1SEd Maste else if (strcmp(name, "Xen") == 0 && et != ET_CORE) 1112895f86f1SEd Maste return note_type_xen(nt); 111302b08c90SEd Maste return note_type_unknown(nt); 111402b08c90SEd Maste } 111502b08c90SEd Maste 111602b08c90SEd Maste static const char * 111702b08c90SEd Maste note_type_freebsd(unsigned int nt) 111802b08c90SEd Maste { 111902b08c90SEd Maste switch (nt) { 112002b08c90SEd Maste case 1: return "NT_FREEBSD_ABI_TAG"; 112102b08c90SEd Maste case 2: return "NT_FREEBSD_NOINIT_TAG"; 112202b08c90SEd Maste case 3: return "NT_FREEBSD_ARCH_TAG"; 112302b08c90SEd Maste default: return (note_type_unknown(nt)); 112402b08c90SEd Maste } 112502b08c90SEd Maste } 112602b08c90SEd Maste 112702b08c90SEd Maste static const char * 112802b08c90SEd Maste note_type_freebsd_core(unsigned int nt) 112902b08c90SEd Maste { 113002b08c90SEd Maste switch (nt) { 113102b08c90SEd Maste case 1: return "NT_PRSTATUS"; 113202b08c90SEd Maste case 2: return "NT_FPREGSET"; 113302b08c90SEd Maste case 3: return "NT_PRPSINFO"; 113402b08c90SEd Maste case 7: return "NT_THRMISC"; 113502b08c90SEd Maste case 8: return "NT_PROCSTAT_PROC"; 113602b08c90SEd Maste case 9: return "NT_PROCSTAT_FILES"; 113702b08c90SEd Maste case 10: return "NT_PROCSTAT_VMMAP"; 113802b08c90SEd Maste case 11: return "NT_PROCSTAT_GROUPS"; 113902b08c90SEd Maste case 12: return "NT_PROCSTAT_UMASK"; 114002b08c90SEd Maste case 13: return "NT_PROCSTAT_RLIMIT"; 114102b08c90SEd Maste case 14: return "NT_PROCSTAT_OSREL"; 114202b08c90SEd Maste case 15: return "NT_PROCSTAT_PSSTRINGS"; 114302b08c90SEd Maste case 16: return "NT_PROCSTAT_AUXV"; 1144*369bd05bSJohn Baldwin case 17: return "NT_PTLWPINFO"; 114502b08c90SEd Maste case 0x202: return "NT_X86_XSTATE (x86 XSAVE extended state)"; 1146*369bd05bSJohn Baldwin case 0x400: return "NT_ARM_VFP (arm VFP registers)"; 114702b08c90SEd Maste default: return (note_type_unknown(nt)); 114802b08c90SEd Maste } 114902b08c90SEd Maste } 115002b08c90SEd Maste 115102b08c90SEd Maste static const char * 115202b08c90SEd Maste note_type_linux_core(unsigned int nt) 115302b08c90SEd Maste { 115402b08c90SEd Maste switch (nt) { 115502b08c90SEd Maste case 1: return "NT_PRSTATUS (Process status)"; 115602b08c90SEd Maste case 2: return "NT_FPREGSET (Floating point information)"; 115702b08c90SEd Maste case 3: return "NT_PRPSINFO (Process information)"; 115871a0c925SEd Maste case 4: return "NT_TASKSTRUCT (Task structure)"; 115902b08c90SEd Maste case 6: return "NT_AUXV (Auxiliary vector)"; 116002b08c90SEd Maste case 10: return "NT_PSTATUS (Linux process status)"; 116102b08c90SEd Maste case 12: return "NT_FPREGS (Linux floating point regset)"; 116202b08c90SEd Maste case 13: return "NT_PSINFO (Linux process information)"; 116302b08c90SEd Maste case 16: return "NT_LWPSTATUS (Linux lwpstatus_t type)"; 116402b08c90SEd Maste case 17: return "NT_LWPSINFO (Linux lwpinfo_t type)"; 116571a0c925SEd Maste case 18: return "NT_WIN32PSTATUS (win32_pstatus structure)"; 116671a0c925SEd Maste case 0x100: return "NT_PPC_VMX (ppc Altivec registers)"; 116771a0c925SEd Maste case 0x102: return "NT_PPC_VSX (ppc VSX registers)"; 116871a0c925SEd Maste case 0x202: return "NT_X86_XSTATE (x86 XSAVE extended state)"; 116971a0c925SEd Maste case 0x300: return "NT_S390_HIGH_GPRS (s390 upper register halves)"; 117071a0c925SEd Maste case 0x301: return "NT_S390_TIMER (s390 timer register)"; 117171a0c925SEd Maste case 0x302: return "NT_S390_TODCMP (s390 TOD comparator register)"; 117271a0c925SEd Maste case 0x303: return "NT_S390_TODPREG (s390 TOD programmable register)"; 117371a0c925SEd Maste case 0x304: return "NT_S390_CTRS (s390 control registers)"; 117471a0c925SEd Maste case 0x305: return "NT_S390_PREFIX (s390 prefix register)"; 117571a0c925SEd Maste case 0x400: return "NT_ARM_VFP (arm VFP registers)"; 117671a0c925SEd Maste case 0x46494c45UL: return "NT_FILE (mapped files)"; 117771a0c925SEd Maste case 0x46E62B7FUL: return "NT_PRXFPREG (Linux user_xfpregs structure)"; 117871a0c925SEd Maste case 0x53494749UL: return "NT_SIGINFO (siginfo_t data)"; 117902b08c90SEd Maste default: return (note_type_unknown(nt)); 118002b08c90SEd Maste } 118102b08c90SEd Maste } 118202b08c90SEd Maste 118302b08c90SEd Maste static const char * 118402b08c90SEd Maste note_type_gnu(unsigned int nt) 118502b08c90SEd Maste { 118602b08c90SEd Maste switch (nt) { 118702b08c90SEd Maste case 1: return "NT_GNU_ABI_TAG"; 118802b08c90SEd Maste case 2: return "NT_GNU_HWCAP (Hardware capabilities)"; 118902b08c90SEd Maste case 3: return "NT_GNU_BUILD_ID (Build id set by ld(1))"; 119002b08c90SEd Maste case 4: return "NT_GNU_GOLD_VERSION (GNU gold version)"; 119102b08c90SEd Maste default: return (note_type_unknown(nt)); 119202b08c90SEd Maste } 119302b08c90SEd Maste } 119402b08c90SEd Maste 119502b08c90SEd Maste static const char * 119602b08c90SEd Maste note_type_netbsd(unsigned int nt) 119702b08c90SEd Maste { 119802b08c90SEd Maste switch (nt) { 119902b08c90SEd Maste case 1: return "NT_NETBSD_IDENT"; 120002b08c90SEd Maste default: return (note_type_unknown(nt)); 120102b08c90SEd Maste } 120202b08c90SEd Maste } 120302b08c90SEd Maste 120402b08c90SEd Maste static const char * 120502b08c90SEd Maste note_type_openbsd(unsigned int nt) 120602b08c90SEd Maste { 120702b08c90SEd Maste switch (nt) { 120802b08c90SEd Maste case 1: return "NT_OPENBSD_IDENT"; 120902b08c90SEd Maste default: return (note_type_unknown(nt)); 121002b08c90SEd Maste } 121102b08c90SEd Maste } 121202b08c90SEd Maste 121302b08c90SEd Maste static const char * 121402b08c90SEd Maste note_type_unknown(unsigned int nt) 12152c23cb7cSEd Maste { 12162c23cb7cSEd Maste static char s_nt[32]; 12172c23cb7cSEd Maste 121871a0c925SEd Maste snprintf(s_nt, sizeof(s_nt), 121971a0c925SEd Maste nt >= 0x100 ? "<unknown: 0x%x>" : "<unknown: %u>", nt); 12202c23cb7cSEd Maste return (s_nt); 12212c23cb7cSEd Maste } 12222c23cb7cSEd Maste 1223895f86f1SEd Maste static const char * 1224895f86f1SEd Maste note_type_xen(unsigned int nt) 1225895f86f1SEd Maste { 1226895f86f1SEd Maste switch (nt) { 1227895f86f1SEd Maste case 0: return "XEN_ELFNOTE_INFO"; 1228895f86f1SEd Maste case 1: return "XEN_ELFNOTE_ENTRY"; 1229895f86f1SEd Maste case 2: return "XEN_ELFNOTE_HYPERCALL_PAGE"; 1230895f86f1SEd Maste case 3: return "XEN_ELFNOTE_VIRT_BASE"; 1231895f86f1SEd Maste case 4: return "XEN_ELFNOTE_PADDR_OFFSET"; 1232895f86f1SEd Maste case 5: return "XEN_ELFNOTE_XEN_VERSION"; 1233895f86f1SEd Maste case 6: return "XEN_ELFNOTE_GUEST_OS"; 1234895f86f1SEd Maste case 7: return "XEN_ELFNOTE_GUEST_VERSION"; 1235895f86f1SEd Maste case 8: return "XEN_ELFNOTE_LOADER"; 1236895f86f1SEd Maste case 9: return "XEN_ELFNOTE_PAE_MODE"; 1237895f86f1SEd Maste case 10: return "XEN_ELFNOTE_FEATURES"; 1238895f86f1SEd Maste case 11: return "XEN_ELFNOTE_BSD_SYMTAB"; 1239895f86f1SEd Maste case 12: return "XEN_ELFNOTE_HV_START_LOW"; 1240895f86f1SEd Maste case 13: return "XEN_ELFNOTE_L1_MFN_VALID"; 1241895f86f1SEd Maste case 14: return "XEN_ELFNOTE_SUSPEND_CANCEL"; 1242895f86f1SEd Maste case 15: return "XEN_ELFNOTE_INIT_P2M"; 1243895f86f1SEd Maste case 16: return "XEN_ELFNOTE_MOD_START_PFN"; 1244895f86f1SEd Maste case 17: return "XEN_ELFNOTE_SUPPORTED_FEATURES"; 1245895f86f1SEd Maste default: return (note_type_unknown(nt)); 1246895f86f1SEd Maste } 1247895f86f1SEd Maste } 1248895f86f1SEd Maste 12492c23cb7cSEd Maste static struct { 12502c23cb7cSEd Maste const char *name; 12512c23cb7cSEd Maste int value; 12522c23cb7cSEd Maste } l_flag[] = { 12532c23cb7cSEd Maste {"EXACT_MATCH", LL_EXACT_MATCH}, 12542c23cb7cSEd Maste {"IGNORE_INT_VER", LL_IGNORE_INT_VER}, 12552c23cb7cSEd Maste {"REQUIRE_MINOR", LL_REQUIRE_MINOR}, 12562c23cb7cSEd Maste {"EXPORTS", LL_EXPORTS}, 12572c23cb7cSEd Maste {"DELAY_LOAD", LL_DELAY_LOAD}, 12582c23cb7cSEd Maste {"DELTA", LL_DELTA}, 12592c23cb7cSEd Maste {NULL, 0} 12602c23cb7cSEd Maste }; 12612c23cb7cSEd Maste 12622c23cb7cSEd Maste static struct mips_option mips_exceptions_option[] = { 12632c23cb7cSEd Maste {OEX_PAGE0, "PAGE0"}, 12642c23cb7cSEd Maste {OEX_SMM, "SMM"}, 12652c23cb7cSEd Maste {OEX_PRECISEFP, "PRECISEFP"}, 12662c23cb7cSEd Maste {OEX_DISMISS, "DISMISS"}, 12672c23cb7cSEd Maste {0, NULL} 12682c23cb7cSEd Maste }; 12692c23cb7cSEd Maste 12702c23cb7cSEd Maste static struct mips_option mips_pad_option[] = { 12712c23cb7cSEd Maste {OPAD_PREFIX, "PREFIX"}, 12722c23cb7cSEd Maste {OPAD_POSTFIX, "POSTFIX"}, 12732c23cb7cSEd Maste {OPAD_SYMBOL, "SYMBOL"}, 12742c23cb7cSEd Maste {0, NULL} 12752c23cb7cSEd Maste }; 12762c23cb7cSEd Maste 12772c23cb7cSEd Maste static struct mips_option mips_hwpatch_option[] = { 12782c23cb7cSEd Maste {OHW_R4KEOP, "R4KEOP"}, 12792c23cb7cSEd Maste {OHW_R8KPFETCH, "R8KPFETCH"}, 12802c23cb7cSEd Maste {OHW_R5KEOP, "R5KEOP"}, 12812c23cb7cSEd Maste {OHW_R5KCVTL, "R5KCVTL"}, 12822c23cb7cSEd Maste {0, NULL} 12832c23cb7cSEd Maste }; 12842c23cb7cSEd Maste 12852c23cb7cSEd Maste static struct mips_option mips_hwa_option[] = { 12862c23cb7cSEd Maste {OHWA0_R4KEOP_CHECKED, "R4KEOP_CHECKED"}, 12872c23cb7cSEd Maste {OHWA0_R4KEOP_CLEAN, "R4KEOP_CLEAN"}, 12882c23cb7cSEd Maste {0, NULL} 12892c23cb7cSEd Maste }; 12902c23cb7cSEd Maste 12912c23cb7cSEd Maste static struct mips_option mips_hwo_option[] = { 12922c23cb7cSEd Maste {OHWO0_FIXADE, "FIXADE"}, 12932c23cb7cSEd Maste {0, NULL} 12942c23cb7cSEd Maste }; 12952c23cb7cSEd Maste 12962c23cb7cSEd Maste static const char * 12972c23cb7cSEd Maste option_kind(uint8_t kind) 12982c23cb7cSEd Maste { 12992c23cb7cSEd Maste static char s_kind[32]; 13002c23cb7cSEd Maste 13012c23cb7cSEd Maste switch (kind) { 13022c23cb7cSEd Maste case ODK_NULL: return "NULL"; 13032c23cb7cSEd Maste case ODK_REGINFO: return "REGINFO"; 13042c23cb7cSEd Maste case ODK_EXCEPTIONS: return "EXCEPTIONS"; 13052c23cb7cSEd Maste case ODK_PAD: return "PAD"; 13062c23cb7cSEd Maste case ODK_HWPATCH: return "HWPATCH"; 13072c23cb7cSEd Maste case ODK_FILL: return "FILL"; 13082c23cb7cSEd Maste case ODK_TAGS: return "TAGS"; 13092c23cb7cSEd Maste case ODK_HWAND: return "HWAND"; 13102c23cb7cSEd Maste case ODK_HWOR: return "HWOR"; 13112c23cb7cSEd Maste case ODK_GP_GROUP: return "GP_GROUP"; 13122c23cb7cSEd Maste case ODK_IDENT: return "IDENT"; 13132c23cb7cSEd Maste default: 13142c23cb7cSEd Maste snprintf(s_kind, sizeof(s_kind), "<unknown: %u>", kind); 13152c23cb7cSEd Maste return (s_kind); 13162c23cb7cSEd Maste } 13172c23cb7cSEd Maste } 13182c23cb7cSEd Maste 13192c23cb7cSEd Maste static const char * 13202c23cb7cSEd Maste top_tag(unsigned int tag) 13212c23cb7cSEd Maste { 13222c23cb7cSEd Maste static char s_top_tag[32]; 13232c23cb7cSEd Maste 13242c23cb7cSEd Maste switch (tag) { 13252c23cb7cSEd Maste case 1: return "File Attributes"; 13262c23cb7cSEd Maste case 2: return "Section Attributes"; 13272c23cb7cSEd Maste case 3: return "Symbol Attributes"; 13282c23cb7cSEd Maste default: 13292c23cb7cSEd Maste snprintf(s_top_tag, sizeof(s_top_tag), "Unknown tag: %u", tag); 13302c23cb7cSEd Maste return (s_top_tag); 13312c23cb7cSEd Maste } 13322c23cb7cSEd Maste } 13332c23cb7cSEd Maste 13342c23cb7cSEd Maste static const char * 13352c23cb7cSEd Maste aeabi_cpu_arch(uint64_t arch) 13362c23cb7cSEd Maste { 13372c23cb7cSEd Maste static char s_cpu_arch[32]; 13382c23cb7cSEd Maste 13392c23cb7cSEd Maste switch (arch) { 13402c23cb7cSEd Maste case 0: return "Pre-V4"; 13412c23cb7cSEd Maste case 1: return "ARM v4"; 13422c23cb7cSEd Maste case 2: return "ARM v4T"; 13432c23cb7cSEd Maste case 3: return "ARM v5T"; 13442c23cb7cSEd Maste case 4: return "ARM v5TE"; 13452c23cb7cSEd Maste case 5: return "ARM v5TEJ"; 13462c23cb7cSEd Maste case 6: return "ARM v6"; 13472c23cb7cSEd Maste case 7: return "ARM v6KZ"; 13482c23cb7cSEd Maste case 8: return "ARM v6T2"; 13492c23cb7cSEd Maste case 9: return "ARM v6K"; 13502c23cb7cSEd Maste case 10: return "ARM v7"; 13512c23cb7cSEd Maste case 11: return "ARM v6-M"; 13522c23cb7cSEd Maste case 12: return "ARM v6S-M"; 13532c23cb7cSEd Maste case 13: return "ARM v7E-M"; 13542c23cb7cSEd Maste default: 13552c23cb7cSEd Maste snprintf(s_cpu_arch, sizeof(s_cpu_arch), 13562c23cb7cSEd Maste "Unknown (%ju)", (uintmax_t) arch); 13572c23cb7cSEd Maste return (s_cpu_arch); 13582c23cb7cSEd Maste } 13592c23cb7cSEd Maste } 13602c23cb7cSEd Maste 13612c23cb7cSEd Maste static const char * 13622c23cb7cSEd Maste aeabi_cpu_arch_profile(uint64_t pf) 13632c23cb7cSEd Maste { 13642c23cb7cSEd Maste static char s_arch_profile[32]; 13652c23cb7cSEd Maste 13662c23cb7cSEd Maste switch (pf) { 13672c23cb7cSEd Maste case 0: 13682c23cb7cSEd Maste return "Not applicable"; 13692c23cb7cSEd Maste case 0x41: /* 'A' */ 13702c23cb7cSEd Maste return "Application Profile"; 13712c23cb7cSEd Maste case 0x52: /* 'R' */ 13722c23cb7cSEd Maste return "Real-Time Profile"; 13732c23cb7cSEd Maste case 0x4D: /* 'M' */ 13742c23cb7cSEd Maste return "Microcontroller Profile"; 13752c23cb7cSEd Maste case 0x53: /* 'S' */ 13762c23cb7cSEd Maste return "Application or Real-Time Profile"; 13772c23cb7cSEd Maste default: 13782c23cb7cSEd Maste snprintf(s_arch_profile, sizeof(s_arch_profile), 13792c23cb7cSEd Maste "Unknown (%ju)\n", (uintmax_t) pf); 13802c23cb7cSEd Maste return (s_arch_profile); 13812c23cb7cSEd Maste } 13822c23cb7cSEd Maste } 13832c23cb7cSEd Maste 13842c23cb7cSEd Maste static const char * 13852c23cb7cSEd Maste aeabi_arm_isa(uint64_t ai) 13862c23cb7cSEd Maste { 13872c23cb7cSEd Maste static char s_ai[32]; 13882c23cb7cSEd Maste 13892c23cb7cSEd Maste switch (ai) { 13902c23cb7cSEd Maste case 0: return "No"; 13912c23cb7cSEd Maste case 1: return "Yes"; 13922c23cb7cSEd Maste default: 13932c23cb7cSEd Maste snprintf(s_ai, sizeof(s_ai), "Unknown (%ju)\n", 13942c23cb7cSEd Maste (uintmax_t) ai); 13952c23cb7cSEd Maste return (s_ai); 13962c23cb7cSEd Maste } 13972c23cb7cSEd Maste } 13982c23cb7cSEd Maste 13992c23cb7cSEd Maste static const char * 14002c23cb7cSEd Maste aeabi_thumb_isa(uint64_t ti) 14012c23cb7cSEd Maste { 14022c23cb7cSEd Maste static char s_ti[32]; 14032c23cb7cSEd Maste 14042c23cb7cSEd Maste switch (ti) { 14052c23cb7cSEd Maste case 0: return "No"; 14062c23cb7cSEd Maste case 1: return "16-bit Thumb"; 14072c23cb7cSEd Maste case 2: return "32-bit Thumb"; 14082c23cb7cSEd Maste default: 14092c23cb7cSEd Maste snprintf(s_ti, sizeof(s_ti), "Unknown (%ju)\n", 14102c23cb7cSEd Maste (uintmax_t) ti); 14112c23cb7cSEd Maste return (s_ti); 14122c23cb7cSEd Maste } 14132c23cb7cSEd Maste } 14142c23cb7cSEd Maste 14152c23cb7cSEd Maste static const char * 14162c23cb7cSEd Maste aeabi_fp_arch(uint64_t fp) 14172c23cb7cSEd Maste { 14182c23cb7cSEd Maste static char s_fp_arch[32]; 14192c23cb7cSEd Maste 14202c23cb7cSEd Maste switch (fp) { 14212c23cb7cSEd Maste case 0: return "No"; 14222c23cb7cSEd Maste case 1: return "VFPv1"; 14232c23cb7cSEd Maste case 2: return "VFPv2"; 14242c23cb7cSEd Maste case 3: return "VFPv3"; 14252c23cb7cSEd Maste case 4: return "VFPv3-D16"; 14262c23cb7cSEd Maste case 5: return "VFPv4"; 14272c23cb7cSEd Maste case 6: return "VFPv4-D16"; 14282c23cb7cSEd Maste default: 14292c23cb7cSEd Maste snprintf(s_fp_arch, sizeof(s_fp_arch), "Unknown (%ju)", 14302c23cb7cSEd Maste (uintmax_t) fp); 14312c23cb7cSEd Maste return (s_fp_arch); 14322c23cb7cSEd Maste } 14332c23cb7cSEd Maste } 14342c23cb7cSEd Maste 14352c23cb7cSEd Maste static const char * 14362c23cb7cSEd Maste aeabi_wmmx_arch(uint64_t wmmx) 14372c23cb7cSEd Maste { 14382c23cb7cSEd Maste static char s_wmmx[32]; 14392c23cb7cSEd Maste 14402c23cb7cSEd Maste switch (wmmx) { 14412c23cb7cSEd Maste case 0: return "No"; 14422c23cb7cSEd Maste case 1: return "WMMXv1"; 14432c23cb7cSEd Maste case 2: return "WMMXv2"; 14442c23cb7cSEd Maste default: 14452c23cb7cSEd Maste snprintf(s_wmmx, sizeof(s_wmmx), "Unknown (%ju)", 14462c23cb7cSEd Maste (uintmax_t) wmmx); 14472c23cb7cSEd Maste return (s_wmmx); 14482c23cb7cSEd Maste } 14492c23cb7cSEd Maste } 14502c23cb7cSEd Maste 14512c23cb7cSEd Maste static const char * 14522c23cb7cSEd Maste aeabi_adv_simd_arch(uint64_t simd) 14532c23cb7cSEd Maste { 14542c23cb7cSEd Maste static char s_simd[32]; 14552c23cb7cSEd Maste 14562c23cb7cSEd Maste switch (simd) { 14572c23cb7cSEd Maste case 0: return "No"; 14582c23cb7cSEd Maste case 1: return "NEONv1"; 14592c23cb7cSEd Maste case 2: return "NEONv2"; 14602c23cb7cSEd Maste default: 14612c23cb7cSEd Maste snprintf(s_simd, sizeof(s_simd), "Unknown (%ju)", 14622c23cb7cSEd Maste (uintmax_t) simd); 14632c23cb7cSEd Maste return (s_simd); 14642c23cb7cSEd Maste } 14652c23cb7cSEd Maste } 14662c23cb7cSEd Maste 14672c23cb7cSEd Maste static const char * 14682c23cb7cSEd Maste aeabi_pcs_config(uint64_t pcs) 14692c23cb7cSEd Maste { 14702c23cb7cSEd Maste static char s_pcs[32]; 14712c23cb7cSEd Maste 14722c23cb7cSEd Maste switch (pcs) { 14732c23cb7cSEd Maste case 0: return "None"; 14742c23cb7cSEd Maste case 1: return "Bare platform"; 14752c23cb7cSEd Maste case 2: return "Linux"; 14762c23cb7cSEd Maste case 3: return "Linux DSO"; 14772c23cb7cSEd Maste case 4: return "Palm OS 2004"; 14782c23cb7cSEd Maste case 5: return "Palm OS (future)"; 14792c23cb7cSEd Maste case 6: return "Symbian OS 2004"; 14802c23cb7cSEd Maste case 7: return "Symbian OS (future)"; 14812c23cb7cSEd Maste default: 14822c23cb7cSEd Maste snprintf(s_pcs, sizeof(s_pcs), "Unknown (%ju)", 14832c23cb7cSEd Maste (uintmax_t) pcs); 14842c23cb7cSEd Maste return (s_pcs); 14852c23cb7cSEd Maste } 14862c23cb7cSEd Maste } 14872c23cb7cSEd Maste 14882c23cb7cSEd Maste static const char * 14892c23cb7cSEd Maste aeabi_pcs_r9(uint64_t r9) 14902c23cb7cSEd Maste { 14912c23cb7cSEd Maste static char s_r9[32]; 14922c23cb7cSEd Maste 14932c23cb7cSEd Maste switch (r9) { 14942c23cb7cSEd Maste case 0: return "V6"; 14952c23cb7cSEd Maste case 1: return "SB"; 14962c23cb7cSEd Maste case 2: return "TLS pointer"; 14972c23cb7cSEd Maste case 3: return "Unused"; 14982c23cb7cSEd Maste default: 14992c23cb7cSEd Maste snprintf(s_r9, sizeof(s_r9), "Unknown (%ju)", (uintmax_t) r9); 15002c23cb7cSEd Maste return (s_r9); 15012c23cb7cSEd Maste } 15022c23cb7cSEd Maste } 15032c23cb7cSEd Maste 15042c23cb7cSEd Maste static const char * 15052c23cb7cSEd Maste aeabi_pcs_rw(uint64_t rw) 15062c23cb7cSEd Maste { 15072c23cb7cSEd Maste static char s_rw[32]; 15082c23cb7cSEd Maste 15092c23cb7cSEd Maste switch (rw) { 15102c23cb7cSEd Maste case 0: return "Absolute"; 15112c23cb7cSEd Maste case 1: return "PC-relative"; 15122c23cb7cSEd Maste case 2: return "SB-relative"; 15132c23cb7cSEd Maste case 3: return "None"; 15142c23cb7cSEd Maste default: 15152c23cb7cSEd Maste snprintf(s_rw, sizeof(s_rw), "Unknown (%ju)", (uintmax_t) rw); 15162c23cb7cSEd Maste return (s_rw); 15172c23cb7cSEd Maste } 15182c23cb7cSEd Maste } 15192c23cb7cSEd Maste 15202c23cb7cSEd Maste static const char * 15212c23cb7cSEd Maste aeabi_pcs_ro(uint64_t ro) 15222c23cb7cSEd Maste { 15232c23cb7cSEd Maste static char s_ro[32]; 15242c23cb7cSEd Maste 15252c23cb7cSEd Maste switch (ro) { 15262c23cb7cSEd Maste case 0: return "Absolute"; 15272c23cb7cSEd Maste case 1: return "PC-relative"; 15282c23cb7cSEd Maste case 2: return "None"; 15292c23cb7cSEd Maste default: 15302c23cb7cSEd Maste snprintf(s_ro, sizeof(s_ro), "Unknown (%ju)", (uintmax_t) ro); 15312c23cb7cSEd Maste return (s_ro); 15322c23cb7cSEd Maste } 15332c23cb7cSEd Maste } 15342c23cb7cSEd Maste 15352c23cb7cSEd Maste static const char * 15362c23cb7cSEd Maste aeabi_pcs_got(uint64_t got) 15372c23cb7cSEd Maste { 15382c23cb7cSEd Maste static char s_got[32]; 15392c23cb7cSEd Maste 15402c23cb7cSEd Maste switch (got) { 15412c23cb7cSEd Maste case 0: return "None"; 15422c23cb7cSEd Maste case 1: return "direct"; 15432c23cb7cSEd Maste case 2: return "indirect via GOT"; 15442c23cb7cSEd Maste default: 15452c23cb7cSEd Maste snprintf(s_got, sizeof(s_got), "Unknown (%ju)", 15462c23cb7cSEd Maste (uintmax_t) got); 15472c23cb7cSEd Maste return (s_got); 15482c23cb7cSEd Maste } 15492c23cb7cSEd Maste } 15502c23cb7cSEd Maste 15512c23cb7cSEd Maste static const char * 15522c23cb7cSEd Maste aeabi_pcs_wchar_t(uint64_t wt) 15532c23cb7cSEd Maste { 15542c23cb7cSEd Maste static char s_wt[32]; 15552c23cb7cSEd Maste 15562c23cb7cSEd Maste switch (wt) { 15572c23cb7cSEd Maste case 0: return "None"; 15582c23cb7cSEd Maste case 2: return "wchar_t size 2"; 15592c23cb7cSEd Maste case 4: return "wchar_t size 4"; 15602c23cb7cSEd Maste default: 15612c23cb7cSEd Maste snprintf(s_wt, sizeof(s_wt), "Unknown (%ju)", (uintmax_t) wt); 15622c23cb7cSEd Maste return (s_wt); 15632c23cb7cSEd Maste } 15642c23cb7cSEd Maste } 15652c23cb7cSEd Maste 15662c23cb7cSEd Maste static const char * 15672c23cb7cSEd Maste aeabi_enum_size(uint64_t es) 15682c23cb7cSEd Maste { 15692c23cb7cSEd Maste static char s_es[32]; 15702c23cb7cSEd Maste 15712c23cb7cSEd Maste switch (es) { 15722c23cb7cSEd Maste case 0: return "None"; 15732c23cb7cSEd Maste case 1: return "smallest"; 15742c23cb7cSEd Maste case 2: return "32-bit"; 15752c23cb7cSEd Maste case 3: return "visible 32-bit"; 15762c23cb7cSEd Maste default: 15772c23cb7cSEd Maste snprintf(s_es, sizeof(s_es), "Unknown (%ju)", (uintmax_t) es); 15782c23cb7cSEd Maste return (s_es); 15792c23cb7cSEd Maste } 15802c23cb7cSEd Maste } 15812c23cb7cSEd Maste 15822c23cb7cSEd Maste static const char * 15832c23cb7cSEd Maste aeabi_align_needed(uint64_t an) 15842c23cb7cSEd Maste { 15852c23cb7cSEd Maste static char s_align_n[64]; 15862c23cb7cSEd Maste 15872c23cb7cSEd Maste switch (an) { 15882c23cb7cSEd Maste case 0: return "No"; 15892c23cb7cSEd Maste case 1: return "8-byte align"; 15902c23cb7cSEd Maste case 2: return "4-byte align"; 15912c23cb7cSEd Maste case 3: return "Reserved"; 15922c23cb7cSEd Maste default: 15932c23cb7cSEd Maste if (an >= 4 && an <= 12) 15942c23cb7cSEd Maste snprintf(s_align_n, sizeof(s_align_n), "8-byte align" 15952c23cb7cSEd Maste " and up to 2^%ju-byte extended align", 15962c23cb7cSEd Maste (uintmax_t) an); 15972c23cb7cSEd Maste else 15982c23cb7cSEd Maste snprintf(s_align_n, sizeof(s_align_n), "Unknown (%ju)", 15992c23cb7cSEd Maste (uintmax_t) an); 16002c23cb7cSEd Maste return (s_align_n); 16012c23cb7cSEd Maste } 16022c23cb7cSEd Maste } 16032c23cb7cSEd Maste 16042c23cb7cSEd Maste static const char * 16052c23cb7cSEd Maste aeabi_align_preserved(uint64_t ap) 16062c23cb7cSEd Maste { 16072c23cb7cSEd Maste static char s_align_p[128]; 16082c23cb7cSEd Maste 16092c23cb7cSEd Maste switch (ap) { 16102c23cb7cSEd Maste case 0: return "No"; 16112c23cb7cSEd Maste case 1: return "8-byte align"; 16122c23cb7cSEd Maste case 2: return "8-byte align and SP % 8 == 0"; 16132c23cb7cSEd Maste case 3: return "Reserved"; 16142c23cb7cSEd Maste default: 16152c23cb7cSEd Maste if (ap >= 4 && ap <= 12) 16162c23cb7cSEd Maste snprintf(s_align_p, sizeof(s_align_p), "8-byte align" 16172c23cb7cSEd Maste " and SP %% 8 == 0 and up to 2^%ju-byte extended" 16182c23cb7cSEd Maste " align", (uintmax_t) ap); 16192c23cb7cSEd Maste else 16202c23cb7cSEd Maste snprintf(s_align_p, sizeof(s_align_p), "Unknown (%ju)", 16212c23cb7cSEd Maste (uintmax_t) ap); 16222c23cb7cSEd Maste return (s_align_p); 16232c23cb7cSEd Maste } 16242c23cb7cSEd Maste } 16252c23cb7cSEd Maste 16262c23cb7cSEd Maste static const char * 16272c23cb7cSEd Maste aeabi_fp_rounding(uint64_t fr) 16282c23cb7cSEd Maste { 16292c23cb7cSEd Maste static char s_fp_r[32]; 16302c23cb7cSEd Maste 16312c23cb7cSEd Maste switch (fr) { 16322c23cb7cSEd Maste case 0: return "Unused"; 16332c23cb7cSEd Maste case 1: return "Needed"; 16342c23cb7cSEd Maste default: 16352c23cb7cSEd Maste snprintf(s_fp_r, sizeof(s_fp_r), "Unknown (%ju)", 16362c23cb7cSEd Maste (uintmax_t) fr); 16372c23cb7cSEd Maste return (s_fp_r); 16382c23cb7cSEd Maste } 16392c23cb7cSEd Maste } 16402c23cb7cSEd Maste 16412c23cb7cSEd Maste static const char * 16422c23cb7cSEd Maste aeabi_fp_denormal(uint64_t fd) 16432c23cb7cSEd Maste { 16442c23cb7cSEd Maste static char s_fp_d[32]; 16452c23cb7cSEd Maste 16462c23cb7cSEd Maste switch (fd) { 16472c23cb7cSEd Maste case 0: return "Unused"; 16482c23cb7cSEd Maste case 1: return "Needed"; 16492c23cb7cSEd Maste case 2: return "Sign Only"; 16502c23cb7cSEd Maste default: 16512c23cb7cSEd Maste snprintf(s_fp_d, sizeof(s_fp_d), "Unknown (%ju)", 16522c23cb7cSEd Maste (uintmax_t) fd); 16532c23cb7cSEd Maste return (s_fp_d); 16542c23cb7cSEd Maste } 16552c23cb7cSEd Maste } 16562c23cb7cSEd Maste 16572c23cb7cSEd Maste static const char * 16582c23cb7cSEd Maste aeabi_fp_exceptions(uint64_t fe) 16592c23cb7cSEd Maste { 16602c23cb7cSEd Maste static char s_fp_e[32]; 16612c23cb7cSEd Maste 16622c23cb7cSEd Maste switch (fe) { 16632c23cb7cSEd Maste case 0: return "Unused"; 16642c23cb7cSEd Maste case 1: return "Needed"; 16652c23cb7cSEd Maste default: 16662c23cb7cSEd Maste snprintf(s_fp_e, sizeof(s_fp_e), "Unknown (%ju)", 16672c23cb7cSEd Maste (uintmax_t) fe); 16682c23cb7cSEd Maste return (s_fp_e); 16692c23cb7cSEd Maste } 16702c23cb7cSEd Maste } 16712c23cb7cSEd Maste 16722c23cb7cSEd Maste static const char * 16732c23cb7cSEd Maste aeabi_fp_user_exceptions(uint64_t fu) 16742c23cb7cSEd Maste { 16752c23cb7cSEd Maste static char s_fp_u[32]; 16762c23cb7cSEd Maste 16772c23cb7cSEd Maste switch (fu) { 16782c23cb7cSEd Maste case 0: return "Unused"; 16792c23cb7cSEd Maste case 1: return "Needed"; 16802c23cb7cSEd Maste default: 16812c23cb7cSEd Maste snprintf(s_fp_u, sizeof(s_fp_u), "Unknown (%ju)", 16822c23cb7cSEd Maste (uintmax_t) fu); 16832c23cb7cSEd Maste return (s_fp_u); 16842c23cb7cSEd Maste } 16852c23cb7cSEd Maste } 16862c23cb7cSEd Maste 16872c23cb7cSEd Maste static const char * 16882c23cb7cSEd Maste aeabi_fp_number_model(uint64_t fn) 16892c23cb7cSEd Maste { 16902c23cb7cSEd Maste static char s_fp_n[32]; 16912c23cb7cSEd Maste 16922c23cb7cSEd Maste switch (fn) { 16932c23cb7cSEd Maste case 0: return "Unused"; 16942c23cb7cSEd Maste case 1: return "IEEE 754 normal"; 16952c23cb7cSEd Maste case 2: return "RTABI"; 16962c23cb7cSEd Maste case 3: return "IEEE 754"; 16972c23cb7cSEd Maste default: 16982c23cb7cSEd Maste snprintf(s_fp_n, sizeof(s_fp_n), "Unknown (%ju)", 16992c23cb7cSEd Maste (uintmax_t) fn); 17002c23cb7cSEd Maste return (s_fp_n); 17012c23cb7cSEd Maste } 17022c23cb7cSEd Maste } 17032c23cb7cSEd Maste 17042c23cb7cSEd Maste static const char * 17052c23cb7cSEd Maste aeabi_fp_16bit_format(uint64_t fp16) 17062c23cb7cSEd Maste { 17072c23cb7cSEd Maste static char s_fp_16[64]; 17082c23cb7cSEd Maste 17092c23cb7cSEd Maste switch (fp16) { 17102c23cb7cSEd Maste case 0: return "None"; 17112c23cb7cSEd Maste case 1: return "IEEE 754"; 17122c23cb7cSEd Maste case 2: return "VFPv3/Advanced SIMD (alternative format)"; 17132c23cb7cSEd Maste default: 17142c23cb7cSEd Maste snprintf(s_fp_16, sizeof(s_fp_16), "Unknown (%ju)", 17152c23cb7cSEd Maste (uintmax_t) fp16); 17162c23cb7cSEd Maste return (s_fp_16); 17172c23cb7cSEd Maste } 17182c23cb7cSEd Maste } 17192c23cb7cSEd Maste 17202c23cb7cSEd Maste static const char * 17212c23cb7cSEd Maste aeabi_mpext(uint64_t mp) 17222c23cb7cSEd Maste { 17232c23cb7cSEd Maste static char s_mp[32]; 17242c23cb7cSEd Maste 17252c23cb7cSEd Maste switch (mp) { 17262c23cb7cSEd Maste case 0: return "Not allowed"; 17272c23cb7cSEd Maste case 1: return "Allowed"; 17282c23cb7cSEd Maste default: 17292c23cb7cSEd Maste snprintf(s_mp, sizeof(s_mp), "Unknown (%ju)", 17302c23cb7cSEd Maste (uintmax_t) mp); 17312c23cb7cSEd Maste return (s_mp); 17322c23cb7cSEd Maste } 17332c23cb7cSEd Maste } 17342c23cb7cSEd Maste 17352c23cb7cSEd Maste static const char * 17362c23cb7cSEd Maste aeabi_div(uint64_t du) 17372c23cb7cSEd Maste { 17382c23cb7cSEd Maste static char s_du[32]; 17392c23cb7cSEd Maste 17402c23cb7cSEd Maste switch (du) { 17412c23cb7cSEd Maste case 0: return "Yes (V7-R/V7-M)"; 17422c23cb7cSEd Maste case 1: return "No"; 17432c23cb7cSEd Maste case 2: return "Yes (V7-A)"; 17442c23cb7cSEd Maste default: 17452c23cb7cSEd Maste snprintf(s_du, sizeof(s_du), "Unknown (%ju)", 17462c23cb7cSEd Maste (uintmax_t) du); 17472c23cb7cSEd Maste return (s_du); 17482c23cb7cSEd Maste } 17492c23cb7cSEd Maste } 17502c23cb7cSEd Maste 17512c23cb7cSEd Maste static const char * 17522c23cb7cSEd Maste aeabi_t2ee(uint64_t t2ee) 17532c23cb7cSEd Maste { 17542c23cb7cSEd Maste static char s_t2ee[32]; 17552c23cb7cSEd Maste 17562c23cb7cSEd Maste switch (t2ee) { 17572c23cb7cSEd Maste case 0: return "Not allowed"; 17582c23cb7cSEd Maste case 1: return "Allowed"; 17592c23cb7cSEd Maste default: 17602c23cb7cSEd Maste snprintf(s_t2ee, sizeof(s_t2ee), "Unknown(%ju)", 17612c23cb7cSEd Maste (uintmax_t) t2ee); 17622c23cb7cSEd Maste return (s_t2ee); 17632c23cb7cSEd Maste } 17642c23cb7cSEd Maste 17652c23cb7cSEd Maste } 17662c23cb7cSEd Maste 17672c23cb7cSEd Maste static const char * 17682c23cb7cSEd Maste aeabi_hardfp(uint64_t hfp) 17692c23cb7cSEd Maste { 17702c23cb7cSEd Maste static char s_hfp[32]; 17712c23cb7cSEd Maste 17722c23cb7cSEd Maste switch (hfp) { 17732c23cb7cSEd Maste case 0: return "Tag_FP_arch"; 17742c23cb7cSEd Maste case 1: return "only SP"; 17752c23cb7cSEd Maste case 2: return "only DP"; 17762c23cb7cSEd Maste case 3: return "both SP and DP"; 17772c23cb7cSEd Maste default: 17782c23cb7cSEd Maste snprintf(s_hfp, sizeof(s_hfp), "Unknown (%ju)", 17792c23cb7cSEd Maste (uintmax_t) hfp); 17802c23cb7cSEd Maste return (s_hfp); 17812c23cb7cSEd Maste } 17822c23cb7cSEd Maste } 17832c23cb7cSEd Maste 17842c23cb7cSEd Maste static const char * 17852c23cb7cSEd Maste aeabi_vfp_args(uint64_t va) 17862c23cb7cSEd Maste { 17872c23cb7cSEd Maste static char s_va[32]; 17882c23cb7cSEd Maste 17892c23cb7cSEd Maste switch (va) { 17902c23cb7cSEd Maste case 0: return "AAPCS (base variant)"; 17912c23cb7cSEd Maste case 1: return "AAPCS (VFP variant)"; 17922c23cb7cSEd Maste case 2: return "toolchain-specific"; 17932c23cb7cSEd Maste default: 17942c23cb7cSEd Maste snprintf(s_va, sizeof(s_va), "Unknown (%ju)", (uintmax_t) va); 17952c23cb7cSEd Maste return (s_va); 17962c23cb7cSEd Maste } 17972c23cb7cSEd Maste } 17982c23cb7cSEd Maste 17992c23cb7cSEd Maste static const char * 18002c23cb7cSEd Maste aeabi_wmmx_args(uint64_t wa) 18012c23cb7cSEd Maste { 18022c23cb7cSEd Maste static char s_wa[32]; 18032c23cb7cSEd Maste 18042c23cb7cSEd Maste switch (wa) { 18052c23cb7cSEd Maste case 0: return "AAPCS (base variant)"; 18062c23cb7cSEd Maste case 1: return "Intel WMMX"; 18072c23cb7cSEd Maste case 2: return "toolchain-specific"; 18082c23cb7cSEd Maste default: 18092c23cb7cSEd Maste snprintf(s_wa, sizeof(s_wa), "Unknown(%ju)", (uintmax_t) wa); 18102c23cb7cSEd Maste return (s_wa); 18112c23cb7cSEd Maste } 18122c23cb7cSEd Maste } 18132c23cb7cSEd Maste 18142c23cb7cSEd Maste static const char * 18152c23cb7cSEd Maste aeabi_unaligned_access(uint64_t ua) 18162c23cb7cSEd Maste { 18172c23cb7cSEd Maste static char s_ua[32]; 18182c23cb7cSEd Maste 18192c23cb7cSEd Maste switch (ua) { 18202c23cb7cSEd Maste case 0: return "Not allowed"; 18212c23cb7cSEd Maste case 1: return "Allowed"; 18222c23cb7cSEd Maste default: 18232c23cb7cSEd Maste snprintf(s_ua, sizeof(s_ua), "Unknown(%ju)", (uintmax_t) ua); 18242c23cb7cSEd Maste return (s_ua); 18252c23cb7cSEd Maste } 18262c23cb7cSEd Maste } 18272c23cb7cSEd Maste 18282c23cb7cSEd Maste static const char * 18292c23cb7cSEd Maste aeabi_fp_hpext(uint64_t fh) 18302c23cb7cSEd Maste { 18312c23cb7cSEd Maste static char s_fh[32]; 18322c23cb7cSEd Maste 18332c23cb7cSEd Maste switch (fh) { 18342c23cb7cSEd Maste case 0: return "Not allowed"; 18352c23cb7cSEd Maste case 1: return "Allowed"; 18362c23cb7cSEd Maste default: 18372c23cb7cSEd Maste snprintf(s_fh, sizeof(s_fh), "Unknown(%ju)", (uintmax_t) fh); 18382c23cb7cSEd Maste return (s_fh); 18392c23cb7cSEd Maste } 18402c23cb7cSEd Maste } 18412c23cb7cSEd Maste 18422c23cb7cSEd Maste static const char * 18432c23cb7cSEd Maste aeabi_optm_goal(uint64_t og) 18442c23cb7cSEd Maste { 18452c23cb7cSEd Maste static char s_og[32]; 18462c23cb7cSEd Maste 18472c23cb7cSEd Maste switch (og) { 18482c23cb7cSEd Maste case 0: return "None"; 18492c23cb7cSEd Maste case 1: return "Speed"; 18502c23cb7cSEd Maste case 2: return "Speed aggressive"; 18512c23cb7cSEd Maste case 3: return "Space"; 18522c23cb7cSEd Maste case 4: return "Space aggressive"; 18532c23cb7cSEd Maste case 5: return "Debugging"; 18542c23cb7cSEd Maste case 6: return "Best Debugging"; 18552c23cb7cSEd Maste default: 18562c23cb7cSEd Maste snprintf(s_og, sizeof(s_og), "Unknown(%ju)", (uintmax_t) og); 18572c23cb7cSEd Maste return (s_og); 18582c23cb7cSEd Maste } 18592c23cb7cSEd Maste } 18602c23cb7cSEd Maste 18612c23cb7cSEd Maste static const char * 18622c23cb7cSEd Maste aeabi_fp_optm_goal(uint64_t fog) 18632c23cb7cSEd Maste { 18642c23cb7cSEd Maste static char s_fog[32]; 18652c23cb7cSEd Maste 18662c23cb7cSEd Maste switch (fog) { 18672c23cb7cSEd Maste case 0: return "None"; 18682c23cb7cSEd Maste case 1: return "Speed"; 18692c23cb7cSEd Maste case 2: return "Speed aggressive"; 18702c23cb7cSEd Maste case 3: return "Space"; 18712c23cb7cSEd Maste case 4: return "Space aggressive"; 18722c23cb7cSEd Maste case 5: return "Accurary"; 18732c23cb7cSEd Maste case 6: return "Best Accurary"; 18742c23cb7cSEd Maste default: 18752c23cb7cSEd Maste snprintf(s_fog, sizeof(s_fog), "Unknown(%ju)", 18762c23cb7cSEd Maste (uintmax_t) fog); 18772c23cb7cSEd Maste return (s_fog); 18782c23cb7cSEd Maste } 18792c23cb7cSEd Maste } 18802c23cb7cSEd Maste 18812c23cb7cSEd Maste static const char * 18822c23cb7cSEd Maste aeabi_virtual(uint64_t vt) 18832c23cb7cSEd Maste { 18842c23cb7cSEd Maste static char s_virtual[64]; 18852c23cb7cSEd Maste 18862c23cb7cSEd Maste switch (vt) { 18872c23cb7cSEd Maste case 0: return "No"; 18882c23cb7cSEd Maste case 1: return "TrustZone"; 18892c23cb7cSEd Maste case 2: return "Virtualization extension"; 18902c23cb7cSEd Maste case 3: return "TrustZone and virtualization extension"; 18912c23cb7cSEd Maste default: 18922c23cb7cSEd Maste snprintf(s_virtual, sizeof(s_virtual), "Unknown(%ju)", 18932c23cb7cSEd Maste (uintmax_t) vt); 18942c23cb7cSEd Maste return (s_virtual); 18952c23cb7cSEd Maste } 18962c23cb7cSEd Maste } 18972c23cb7cSEd Maste 18982c23cb7cSEd Maste static struct { 18992c23cb7cSEd Maste uint64_t tag; 19002c23cb7cSEd Maste const char *s_tag; 19012c23cb7cSEd Maste const char *(*get_desc)(uint64_t val); 19022c23cb7cSEd Maste } aeabi_tags[] = { 19032c23cb7cSEd Maste {4, "Tag_CPU_raw_name", NULL}, 19042c23cb7cSEd Maste {5, "Tag_CPU_name", NULL}, 19052c23cb7cSEd Maste {6, "Tag_CPU_arch", aeabi_cpu_arch}, 19062c23cb7cSEd Maste {7, "Tag_CPU_arch_profile", aeabi_cpu_arch_profile}, 19072c23cb7cSEd Maste {8, "Tag_ARM_ISA_use", aeabi_arm_isa}, 19082c23cb7cSEd Maste {9, "Tag_THUMB_ISA_use", aeabi_thumb_isa}, 19092c23cb7cSEd Maste {10, "Tag_FP_arch", aeabi_fp_arch}, 19102c23cb7cSEd Maste {11, "Tag_WMMX_arch", aeabi_wmmx_arch}, 19112c23cb7cSEd Maste {12, "Tag_Advanced_SIMD_arch", aeabi_adv_simd_arch}, 19122c23cb7cSEd Maste {13, "Tag_PCS_config", aeabi_pcs_config}, 19132c23cb7cSEd Maste {14, "Tag_ABI_PCS_R9_use", aeabi_pcs_r9}, 19142c23cb7cSEd Maste {15, "Tag_ABI_PCS_RW_data", aeabi_pcs_rw}, 19152c23cb7cSEd Maste {16, "Tag_ABI_PCS_RO_data", aeabi_pcs_ro}, 19162c23cb7cSEd Maste {17, "Tag_ABI_PCS_GOT_use", aeabi_pcs_got}, 19172c23cb7cSEd Maste {18, "Tag_ABI_PCS_wchar_t", aeabi_pcs_wchar_t}, 19182c23cb7cSEd Maste {19, "Tag_ABI_FP_rounding", aeabi_fp_rounding}, 19192c23cb7cSEd Maste {20, "Tag_ABI_FP_denormal", aeabi_fp_denormal}, 19202c23cb7cSEd Maste {21, "Tag_ABI_FP_exceptions", aeabi_fp_exceptions}, 19212c23cb7cSEd Maste {22, "Tag_ABI_FP_user_exceptions", aeabi_fp_user_exceptions}, 19222c23cb7cSEd Maste {23, "Tag_ABI_FP_number_model", aeabi_fp_number_model}, 19232c23cb7cSEd Maste {24, "Tag_ABI_align_needed", aeabi_align_needed}, 19242c23cb7cSEd Maste {25, "Tag_ABI_align_preserved", aeabi_align_preserved}, 19252c23cb7cSEd Maste {26, "Tag_ABI_enum_size", aeabi_enum_size}, 19262c23cb7cSEd Maste {27, "Tag_ABI_HardFP_use", aeabi_hardfp}, 19272c23cb7cSEd Maste {28, "Tag_ABI_VFP_args", aeabi_vfp_args}, 19282c23cb7cSEd Maste {29, "Tag_ABI_WMMX_args", aeabi_wmmx_args}, 19292c23cb7cSEd Maste {30, "Tag_ABI_optimization_goals", aeabi_optm_goal}, 19302c23cb7cSEd Maste {31, "Tag_ABI_FP_optimization_goals", aeabi_fp_optm_goal}, 19312c23cb7cSEd Maste {32, "Tag_compatibility", NULL}, 19322c23cb7cSEd Maste {34, "Tag_CPU_unaligned_access", aeabi_unaligned_access}, 19332c23cb7cSEd Maste {36, "Tag_FP_HP_extension", aeabi_fp_hpext}, 19342c23cb7cSEd Maste {38, "Tag_ABI_FP_16bit_format", aeabi_fp_16bit_format}, 19352c23cb7cSEd Maste {42, "Tag_MPextension_use", aeabi_mpext}, 19362c23cb7cSEd Maste {44, "Tag_DIV_use", aeabi_div}, 19372c23cb7cSEd Maste {64, "Tag_nodefaults", NULL}, 19382c23cb7cSEd Maste {65, "Tag_also_compatible_with", NULL}, 19392c23cb7cSEd Maste {66, "Tag_T2EE_use", aeabi_t2ee}, 19402c23cb7cSEd Maste {67, "Tag_conformance", NULL}, 19412c23cb7cSEd Maste {68, "Tag_Virtualization_use", aeabi_virtual}, 19422c23cb7cSEd Maste {70, "Tag_MPextension_use", aeabi_mpext}, 19432c23cb7cSEd Maste }; 19442c23cb7cSEd Maste 19452c23cb7cSEd Maste static const char * 19462c23cb7cSEd Maste mips_abi_fp(uint64_t fp) 19472c23cb7cSEd Maste { 19482c23cb7cSEd Maste static char s_mips_abi_fp[64]; 19492c23cb7cSEd Maste 19502c23cb7cSEd Maste switch (fp) { 19512c23cb7cSEd Maste case 0: return "N/A"; 19522c23cb7cSEd Maste case 1: return "Hard float (double precision)"; 19532c23cb7cSEd Maste case 2: return "Hard float (single precision)"; 19542c23cb7cSEd Maste case 3: return "Soft float"; 19552c23cb7cSEd Maste case 4: return "64-bit float (-mips32r2 -mfp64)"; 19562c23cb7cSEd Maste default: 19572c23cb7cSEd Maste snprintf(s_mips_abi_fp, sizeof(s_mips_abi_fp), "Unknown(%ju)", 19582c23cb7cSEd Maste (uintmax_t) fp); 19592c23cb7cSEd Maste return (s_mips_abi_fp); 19602c23cb7cSEd Maste } 19612c23cb7cSEd Maste } 19622c23cb7cSEd Maste 19632c23cb7cSEd Maste static const char * 19642c23cb7cSEd Maste ppc_abi_fp(uint64_t fp) 19652c23cb7cSEd Maste { 19662c23cb7cSEd Maste static char s_ppc_abi_fp[64]; 19672c23cb7cSEd Maste 19682c23cb7cSEd Maste switch (fp) { 19692c23cb7cSEd Maste case 0: return "N/A"; 19702c23cb7cSEd Maste case 1: return "Hard float (double precision)"; 19712c23cb7cSEd Maste case 2: return "Soft float"; 19722c23cb7cSEd Maste case 3: return "Hard float (single precision)"; 19732c23cb7cSEd Maste default: 19742c23cb7cSEd Maste snprintf(s_ppc_abi_fp, sizeof(s_ppc_abi_fp), "Unknown(%ju)", 19752c23cb7cSEd Maste (uintmax_t) fp); 19762c23cb7cSEd Maste return (s_ppc_abi_fp); 19772c23cb7cSEd Maste } 19782c23cb7cSEd Maste } 19792c23cb7cSEd Maste 19802c23cb7cSEd Maste static const char * 19812c23cb7cSEd Maste ppc_abi_vector(uint64_t vec) 19822c23cb7cSEd Maste { 19832c23cb7cSEd Maste static char s_vec[64]; 19842c23cb7cSEd Maste 19852c23cb7cSEd Maste switch (vec) { 19862c23cb7cSEd Maste case 0: return "N/A"; 19872c23cb7cSEd Maste case 1: return "Generic purpose registers"; 19882c23cb7cSEd Maste case 2: return "AltiVec registers"; 19892c23cb7cSEd Maste case 3: return "SPE registers"; 19902c23cb7cSEd Maste default: 19912c23cb7cSEd Maste snprintf(s_vec, sizeof(s_vec), "Unknown(%ju)", (uintmax_t) vec); 19922c23cb7cSEd Maste return (s_vec); 19932c23cb7cSEd Maste } 19942c23cb7cSEd Maste } 19952c23cb7cSEd Maste 1996cf781b2eSEd Maste static const char * 1997cf781b2eSEd Maste dwarf_reg(unsigned int mach, unsigned int reg) 1998cf781b2eSEd Maste { 1999cf781b2eSEd Maste 2000cf781b2eSEd Maste switch (mach) { 2001cf781b2eSEd Maste case EM_386: 20023ef90571SEd Maste case EM_IAMCU: 2003cf781b2eSEd Maste switch (reg) { 2004cf781b2eSEd Maste case 0: return "eax"; 2005cf781b2eSEd Maste case 1: return "ecx"; 2006cf781b2eSEd Maste case 2: return "edx"; 2007cf781b2eSEd Maste case 3: return "ebx"; 2008cf781b2eSEd Maste case 4: return "esp"; 2009cf781b2eSEd Maste case 5: return "ebp"; 2010cf781b2eSEd Maste case 6: return "esi"; 2011cf781b2eSEd Maste case 7: return "edi"; 2012cf781b2eSEd Maste case 8: return "eip"; 2013cf781b2eSEd Maste case 9: return "eflags"; 2014cf781b2eSEd Maste case 11: return "st0"; 2015cf781b2eSEd Maste case 12: return "st1"; 2016cf781b2eSEd Maste case 13: return "st2"; 2017cf781b2eSEd Maste case 14: return "st3"; 2018cf781b2eSEd Maste case 15: return "st4"; 2019cf781b2eSEd Maste case 16: return "st5"; 2020cf781b2eSEd Maste case 17: return "st6"; 2021cf781b2eSEd Maste case 18: return "st7"; 2022cf781b2eSEd Maste case 21: return "xmm0"; 2023cf781b2eSEd Maste case 22: return "xmm1"; 2024cf781b2eSEd Maste case 23: return "xmm2"; 2025cf781b2eSEd Maste case 24: return "xmm3"; 2026cf781b2eSEd Maste case 25: return "xmm4"; 2027cf781b2eSEd Maste case 26: return "xmm5"; 2028cf781b2eSEd Maste case 27: return "xmm6"; 2029cf781b2eSEd Maste case 28: return "xmm7"; 2030cf781b2eSEd Maste case 29: return "mm0"; 2031cf781b2eSEd Maste case 30: return "mm1"; 2032cf781b2eSEd Maste case 31: return "mm2"; 2033cf781b2eSEd Maste case 32: return "mm3"; 2034cf781b2eSEd Maste case 33: return "mm4"; 2035cf781b2eSEd Maste case 34: return "mm5"; 2036cf781b2eSEd Maste case 35: return "mm6"; 2037cf781b2eSEd Maste case 36: return "mm7"; 2038cf781b2eSEd Maste case 37: return "fcw"; 2039cf781b2eSEd Maste case 38: return "fsw"; 2040cf781b2eSEd Maste case 39: return "mxcsr"; 2041cf781b2eSEd Maste case 40: return "es"; 2042cf781b2eSEd Maste case 41: return "cs"; 2043cf781b2eSEd Maste case 42: return "ss"; 2044cf781b2eSEd Maste case 43: return "ds"; 2045cf781b2eSEd Maste case 44: return "fs"; 2046cf781b2eSEd Maste case 45: return "gs"; 2047cf781b2eSEd Maste case 48: return "tr"; 2048cf781b2eSEd Maste case 49: return "ldtr"; 2049cf781b2eSEd Maste default: return (NULL); 2050cf781b2eSEd Maste } 2051cf781b2eSEd Maste case EM_X86_64: 2052cf781b2eSEd Maste switch (reg) { 2053cf781b2eSEd Maste case 0: return "rax"; 2054cf781b2eSEd Maste case 1: return "rdx"; 2055cf781b2eSEd Maste case 2: return "rcx"; 2056cf781b2eSEd Maste case 3: return "rbx"; 2057cf781b2eSEd Maste case 4: return "rsi"; 2058cf781b2eSEd Maste case 5: return "rdi"; 2059cf781b2eSEd Maste case 6: return "rbp"; 2060cf781b2eSEd Maste case 7: return "rsp"; 2061cf781b2eSEd Maste case 16: return "rip"; 2062cf781b2eSEd Maste case 17: return "xmm0"; 2063cf781b2eSEd Maste case 18: return "xmm1"; 2064cf781b2eSEd Maste case 19: return "xmm2"; 2065cf781b2eSEd Maste case 20: return "xmm3"; 2066cf781b2eSEd Maste case 21: return "xmm4"; 2067cf781b2eSEd Maste case 22: return "xmm5"; 2068cf781b2eSEd Maste case 23: return "xmm6"; 2069cf781b2eSEd Maste case 24: return "xmm7"; 2070cf781b2eSEd Maste case 25: return "xmm8"; 2071cf781b2eSEd Maste case 26: return "xmm9"; 2072cf781b2eSEd Maste case 27: return "xmm10"; 2073cf781b2eSEd Maste case 28: return "xmm11"; 2074cf781b2eSEd Maste case 29: return "xmm12"; 2075cf781b2eSEd Maste case 30: return "xmm13"; 2076cf781b2eSEd Maste case 31: return "xmm14"; 2077cf781b2eSEd Maste case 32: return "xmm15"; 2078cf781b2eSEd Maste case 33: return "st0"; 2079cf781b2eSEd Maste case 34: return "st1"; 2080cf781b2eSEd Maste case 35: return "st2"; 2081cf781b2eSEd Maste case 36: return "st3"; 2082cf781b2eSEd Maste case 37: return "st4"; 2083cf781b2eSEd Maste case 38: return "st5"; 2084cf781b2eSEd Maste case 39: return "st6"; 2085cf781b2eSEd Maste case 40: return "st7"; 2086cf781b2eSEd Maste case 41: return "mm0"; 2087cf781b2eSEd Maste case 42: return "mm1"; 2088cf781b2eSEd Maste case 43: return "mm2"; 2089cf781b2eSEd Maste case 44: return "mm3"; 2090cf781b2eSEd Maste case 45: return "mm4"; 2091cf781b2eSEd Maste case 46: return "mm5"; 2092cf781b2eSEd Maste case 47: return "mm6"; 2093cf781b2eSEd Maste case 48: return "mm7"; 2094cf781b2eSEd Maste case 49: return "rflags"; 2095cf781b2eSEd Maste case 50: return "es"; 2096cf781b2eSEd Maste case 51: return "cs"; 2097cf781b2eSEd Maste case 52: return "ss"; 2098cf781b2eSEd Maste case 53: return "ds"; 2099cf781b2eSEd Maste case 54: return "fs"; 2100cf781b2eSEd Maste case 55: return "gs"; 2101cf781b2eSEd Maste case 58: return "fs.base"; 2102cf781b2eSEd Maste case 59: return "gs.base"; 2103cf781b2eSEd Maste case 62: return "tr"; 2104cf781b2eSEd Maste case 63: return "ldtr"; 2105cf781b2eSEd Maste case 64: return "mxcsr"; 2106cf781b2eSEd Maste case 65: return "fcw"; 2107cf781b2eSEd Maste case 66: return "fsw"; 2108cf781b2eSEd Maste default: return (NULL); 2109cf781b2eSEd Maste } 2110cf781b2eSEd Maste default: 2111cf781b2eSEd Maste return (NULL); 2112cf781b2eSEd Maste } 2113cf781b2eSEd Maste } 2114cf781b2eSEd Maste 21152c23cb7cSEd Maste static void 21162c23cb7cSEd Maste dump_ehdr(struct readelf *re) 21172c23cb7cSEd Maste { 2118714935beSConrad Meyer size_t phnum, shnum, shstrndx; 21192c23cb7cSEd Maste int i; 21202c23cb7cSEd Maste 21212c23cb7cSEd Maste printf("ELF Header:\n"); 21222c23cb7cSEd Maste 21232c23cb7cSEd Maste /* e_ident[]. */ 21242c23cb7cSEd Maste printf(" Magic: "); 21252c23cb7cSEd Maste for (i = 0; i < EI_NIDENT; i++) 21262c23cb7cSEd Maste printf("%.2x ", re->ehdr.e_ident[i]); 21272c23cb7cSEd Maste putchar('\n'); 21282c23cb7cSEd Maste 21292c23cb7cSEd Maste /* EI_CLASS. */ 21302c23cb7cSEd Maste printf("%-37s%s\n", " Class:", elf_class(re->ehdr.e_ident[EI_CLASS])); 21312c23cb7cSEd Maste 21322c23cb7cSEd Maste /* EI_DATA. */ 21332c23cb7cSEd Maste printf("%-37s%s\n", " Data:", elf_endian(re->ehdr.e_ident[EI_DATA])); 21342c23cb7cSEd Maste 21352c23cb7cSEd Maste /* EI_VERSION. */ 21362c23cb7cSEd Maste printf("%-37s%d %s\n", " Version:", re->ehdr.e_ident[EI_VERSION], 21372c23cb7cSEd Maste elf_ver(re->ehdr.e_ident[EI_VERSION])); 21382c23cb7cSEd Maste 21392c23cb7cSEd Maste /* EI_OSABI. */ 21402c23cb7cSEd Maste printf("%-37s%s\n", " OS/ABI:", elf_osabi(re->ehdr.e_ident[EI_OSABI])); 21412c23cb7cSEd Maste 21422c23cb7cSEd Maste /* EI_ABIVERSION. */ 21432c23cb7cSEd Maste printf("%-37s%d\n", " ABI Version:", re->ehdr.e_ident[EI_ABIVERSION]); 21442c23cb7cSEd Maste 21452c23cb7cSEd Maste /* e_type. */ 21462c23cb7cSEd Maste printf("%-37s%s\n", " Type:", elf_type(re->ehdr.e_type)); 21472c23cb7cSEd Maste 21482c23cb7cSEd Maste /* e_machine. */ 21492c23cb7cSEd Maste printf("%-37s%s\n", " Machine:", elf_machine(re->ehdr.e_machine)); 21502c23cb7cSEd Maste 21512c23cb7cSEd Maste /* e_version. */ 21522c23cb7cSEd Maste printf("%-37s%#x\n", " Version:", re->ehdr.e_version); 21532c23cb7cSEd Maste 21542c23cb7cSEd Maste /* e_entry. */ 21552c23cb7cSEd Maste printf("%-37s%#jx\n", " Entry point address:", 21562c23cb7cSEd Maste (uintmax_t)re->ehdr.e_entry); 21572c23cb7cSEd Maste 21582c23cb7cSEd Maste /* e_phoff. */ 21592c23cb7cSEd Maste printf("%-37s%ju (bytes into file)\n", " Start of program headers:", 21602c23cb7cSEd Maste (uintmax_t)re->ehdr.e_phoff); 21612c23cb7cSEd Maste 21622c23cb7cSEd Maste /* e_shoff. */ 21632c23cb7cSEd Maste printf("%-37s%ju (bytes into file)\n", " Start of section headers:", 21642c23cb7cSEd Maste (uintmax_t)re->ehdr.e_shoff); 21652c23cb7cSEd Maste 21662c23cb7cSEd Maste /* e_flags. */ 21672c23cb7cSEd Maste printf("%-37s%#x", " Flags:", re->ehdr.e_flags); 21682c23cb7cSEd Maste dump_eflags(re, re->ehdr.e_flags); 21692c23cb7cSEd Maste putchar('\n'); 21702c23cb7cSEd Maste 21712c23cb7cSEd Maste /* e_ehsize. */ 21722c23cb7cSEd Maste printf("%-37s%u (bytes)\n", " Size of this header:", 21732c23cb7cSEd Maste re->ehdr.e_ehsize); 21742c23cb7cSEd Maste 21752c23cb7cSEd Maste /* e_phentsize. */ 21762c23cb7cSEd Maste printf("%-37s%u (bytes)\n", " Size of program headers:", 21772c23cb7cSEd Maste re->ehdr.e_phentsize); 21782c23cb7cSEd Maste 21792c23cb7cSEd Maste /* e_phnum. */ 2180714935beSConrad Meyer printf("%-37s%u", " Number of program headers:", re->ehdr.e_phnum); 2181714935beSConrad Meyer if (re->ehdr.e_phnum == PN_XNUM) { 2182714935beSConrad Meyer /* Extended program header numbering is in use. */ 2183714935beSConrad Meyer if (elf_getphnum(re->elf, &phnum)) 2184714935beSConrad Meyer printf(" (%zu)", phnum); 2185714935beSConrad Meyer } 2186714935beSConrad Meyer putchar('\n'); 21872c23cb7cSEd Maste 21882c23cb7cSEd Maste /* e_shentsize. */ 21892c23cb7cSEd Maste printf("%-37s%u (bytes)\n", " Size of section headers:", 21902c23cb7cSEd Maste re->ehdr.e_shentsize); 21912c23cb7cSEd Maste 21922c23cb7cSEd Maste /* e_shnum. */ 21932c23cb7cSEd Maste printf("%-37s%u", " Number of section headers:", re->ehdr.e_shnum); 21942c23cb7cSEd Maste if (re->ehdr.e_shnum == SHN_UNDEF) { 21952c23cb7cSEd Maste /* Extended section numbering is in use. */ 21962c23cb7cSEd Maste if (elf_getshnum(re->elf, &shnum)) 21972c23cb7cSEd Maste printf(" (%ju)", (uintmax_t)shnum); 21982c23cb7cSEd Maste } 21992c23cb7cSEd Maste putchar('\n'); 22002c23cb7cSEd Maste 22012c23cb7cSEd Maste /* e_shstrndx. */ 22022c23cb7cSEd Maste printf("%-37s%u", " Section header string table index:", 22032c23cb7cSEd Maste re->ehdr.e_shstrndx); 22042c23cb7cSEd Maste if (re->ehdr.e_shstrndx == SHN_XINDEX) { 22052c23cb7cSEd Maste /* Extended section numbering is in use. */ 22062c23cb7cSEd Maste if (elf_getshstrndx(re->elf, &shstrndx)) 22072c23cb7cSEd Maste printf(" (%ju)", (uintmax_t)shstrndx); 22082c23cb7cSEd Maste } 22092c23cb7cSEd Maste putchar('\n'); 22102c23cb7cSEd Maste } 22112c23cb7cSEd Maste 22122c23cb7cSEd Maste static void 22132c23cb7cSEd Maste dump_eflags(struct readelf *re, uint64_t e_flags) 22142c23cb7cSEd Maste { 22152c23cb7cSEd Maste struct eflags_desc *edesc; 22162c23cb7cSEd Maste int arm_eabi; 22172c23cb7cSEd Maste 22182c23cb7cSEd Maste edesc = NULL; 22192c23cb7cSEd Maste switch (re->ehdr.e_machine) { 22202c23cb7cSEd Maste case EM_ARM: 22212c23cb7cSEd Maste arm_eabi = (e_flags & EF_ARM_EABIMASK) >> 24; 22222c23cb7cSEd Maste if (arm_eabi == 0) 22232c23cb7cSEd Maste printf(", GNU EABI"); 22242c23cb7cSEd Maste else if (arm_eabi <= 5) 22252c23cb7cSEd Maste printf(", Version%d EABI", arm_eabi); 22262c23cb7cSEd Maste edesc = arm_eflags_desc; 22272c23cb7cSEd Maste break; 22282c23cb7cSEd Maste case EM_MIPS: 22292c23cb7cSEd Maste case EM_MIPS_RS3_LE: 22302c23cb7cSEd Maste switch ((e_flags & EF_MIPS_ARCH) >> 28) { 22312c23cb7cSEd Maste case 0: printf(", mips1"); break; 22322c23cb7cSEd Maste case 1: printf(", mips2"); break; 22332c23cb7cSEd Maste case 2: printf(", mips3"); break; 22342c23cb7cSEd Maste case 3: printf(", mips4"); break; 22352c23cb7cSEd Maste case 4: printf(", mips5"); break; 22362c23cb7cSEd Maste case 5: printf(", mips32"); break; 22372c23cb7cSEd Maste case 6: printf(", mips64"); break; 22382c23cb7cSEd Maste case 7: printf(", mips32r2"); break; 22392c23cb7cSEd Maste case 8: printf(", mips64r2"); break; 22402c23cb7cSEd Maste default: break; 22412c23cb7cSEd Maste } 22422c23cb7cSEd Maste switch ((e_flags & 0x00FF0000) >> 16) { 22432c23cb7cSEd Maste case 0x81: printf(", 3900"); break; 22442c23cb7cSEd Maste case 0x82: printf(", 4010"); break; 22452c23cb7cSEd Maste case 0x83: printf(", 4100"); break; 22462c23cb7cSEd Maste case 0x85: printf(", 4650"); break; 22472c23cb7cSEd Maste case 0x87: printf(", 4120"); break; 22482c23cb7cSEd Maste case 0x88: printf(", 4111"); break; 22492c23cb7cSEd Maste case 0x8a: printf(", sb1"); break; 22502c23cb7cSEd Maste case 0x8b: printf(", octeon"); break; 22512c23cb7cSEd Maste case 0x8c: printf(", xlr"); break; 22522c23cb7cSEd Maste case 0x91: printf(", 5400"); break; 22532c23cb7cSEd Maste case 0x98: printf(", 5500"); break; 22542c23cb7cSEd Maste case 0x99: printf(", 9000"); break; 22552c23cb7cSEd Maste case 0xa0: printf(", loongson-2e"); break; 22562c23cb7cSEd Maste case 0xa1: printf(", loongson-2f"); break; 22572c23cb7cSEd Maste default: break; 22582c23cb7cSEd Maste } 22592c23cb7cSEd Maste switch ((e_flags & 0x0000F000) >> 12) { 22602c23cb7cSEd Maste case 1: printf(", o32"); break; 22612c23cb7cSEd Maste case 2: printf(", o64"); break; 22622c23cb7cSEd Maste case 3: printf(", eabi32"); break; 22632c23cb7cSEd Maste case 4: printf(", eabi64"); break; 22642c23cb7cSEd Maste default: break; 22652c23cb7cSEd Maste } 22662c23cb7cSEd Maste edesc = mips_eflags_desc; 22672c23cb7cSEd Maste break; 22682c23cb7cSEd Maste case EM_PPC: 22692c23cb7cSEd Maste case EM_PPC64: 22702c23cb7cSEd Maste edesc = powerpc_eflags_desc; 22712c23cb7cSEd Maste break; 22722c23cb7cSEd Maste case EM_SPARC: 22732c23cb7cSEd Maste case EM_SPARC32PLUS: 22742c23cb7cSEd Maste case EM_SPARCV9: 22752c23cb7cSEd Maste switch ((e_flags & EF_SPARCV9_MM)) { 22762c23cb7cSEd Maste case EF_SPARCV9_TSO: printf(", tso"); break; 22772c23cb7cSEd Maste case EF_SPARCV9_PSO: printf(", pso"); break; 22782c23cb7cSEd Maste case EF_SPARCV9_MM: printf(", rmo"); break; 22792c23cb7cSEd Maste default: break; 22802c23cb7cSEd Maste } 22812c23cb7cSEd Maste edesc = sparc_eflags_desc; 22822c23cb7cSEd Maste break; 22832c23cb7cSEd Maste default: 22842c23cb7cSEd Maste break; 22852c23cb7cSEd Maste } 22862c23cb7cSEd Maste 22872c23cb7cSEd Maste if (edesc != NULL) { 22882c23cb7cSEd Maste while (edesc->desc != NULL) { 22892c23cb7cSEd Maste if (e_flags & edesc->flag) 22902c23cb7cSEd Maste printf(", %s", edesc->desc); 22912c23cb7cSEd Maste edesc++; 22922c23cb7cSEd Maste } 22932c23cb7cSEd Maste } 22942c23cb7cSEd Maste } 22952c23cb7cSEd Maste 22962c23cb7cSEd Maste static void 22972c23cb7cSEd Maste dump_phdr(struct readelf *re) 22982c23cb7cSEd Maste { 22992c23cb7cSEd Maste const char *rawfile; 23002c23cb7cSEd Maste GElf_Phdr phdr; 2301b00fe64fSEd Maste size_t phnum, size; 23022c23cb7cSEd Maste int i, j; 23032c23cb7cSEd Maste 23042c23cb7cSEd Maste #define PH_HDR "Type", "Offset", "VirtAddr", "PhysAddr", "FileSiz", \ 23052c23cb7cSEd Maste "MemSiz", "Flg", "Align" 230620136ffcSEd Maste #define PH_CT phdr_type(re->ehdr.e_machine, phdr.p_type), \ 230720136ffcSEd Maste (uintmax_t)phdr.p_offset, (uintmax_t)phdr.p_vaddr, \ 230820136ffcSEd Maste (uintmax_t)phdr.p_paddr, (uintmax_t)phdr.p_filesz, \ 230920136ffcSEd Maste (uintmax_t)phdr.p_memsz, \ 23102c23cb7cSEd Maste phdr.p_flags & PF_R ? 'R' : ' ', \ 23112c23cb7cSEd Maste phdr.p_flags & PF_W ? 'W' : ' ', \ 23122c23cb7cSEd Maste phdr.p_flags & PF_X ? 'E' : ' ', \ 23132c23cb7cSEd Maste (uintmax_t)phdr.p_align 23142c23cb7cSEd Maste 23152c23cb7cSEd Maste if (elf_getphnum(re->elf, &phnum) == 0) { 23162c23cb7cSEd Maste warnx("elf_getphnum failed: %s", elf_errmsg(-1)); 23172c23cb7cSEd Maste return; 23182c23cb7cSEd Maste } 23192c23cb7cSEd Maste if (phnum == 0) { 23202c23cb7cSEd Maste printf("\nThere are no program headers in this file.\n"); 23212c23cb7cSEd Maste return; 23222c23cb7cSEd Maste } 23232c23cb7cSEd Maste 23242c23cb7cSEd Maste printf("\nElf file type is %s", elf_type(re->ehdr.e_type)); 23252c23cb7cSEd Maste printf("\nEntry point 0x%jx\n", (uintmax_t)re->ehdr.e_entry); 23262c23cb7cSEd Maste printf("There are %ju program headers, starting at offset %ju\n", 23272c23cb7cSEd Maste (uintmax_t)phnum, (uintmax_t)re->ehdr.e_phoff); 23282c23cb7cSEd Maste 23292c23cb7cSEd Maste /* Dump program headers. */ 23302c23cb7cSEd Maste printf("\nProgram Headers:\n"); 23312c23cb7cSEd Maste if (re->ec == ELFCLASS32) 23322c23cb7cSEd Maste printf(" %-15s%-9s%-11s%-11s%-8s%-8s%-4s%s\n", PH_HDR); 23332c23cb7cSEd Maste else if (re->options & RE_WW) 23342c23cb7cSEd Maste printf(" %-15s%-9s%-19s%-19s%-9s%-9s%-4s%s\n", PH_HDR); 23352c23cb7cSEd Maste else 23362c23cb7cSEd Maste printf(" %-15s%-19s%-19s%s\n %-19s%-20s" 23372c23cb7cSEd Maste "%-7s%s\n", PH_HDR); 23382c23cb7cSEd Maste for (i = 0; (size_t) i < phnum; i++) { 23392c23cb7cSEd Maste if (gelf_getphdr(re->elf, i, &phdr) != &phdr) { 23402c23cb7cSEd Maste warnx("gelf_getphdr failed: %s", elf_errmsg(-1)); 23412c23cb7cSEd Maste continue; 23422c23cb7cSEd Maste } 23432c23cb7cSEd Maste /* TODO: Add arch-specific segment type dump. */ 23442c23cb7cSEd Maste if (re->ec == ELFCLASS32) 23452c23cb7cSEd Maste printf(" %-14.14s 0x%6.6jx 0x%8.8jx 0x%8.8jx " 23462c23cb7cSEd Maste "0x%5.5jx 0x%5.5jx %c%c%c %#jx\n", PH_CT); 23472c23cb7cSEd Maste else if (re->options & RE_WW) 23482c23cb7cSEd Maste printf(" %-14.14s 0x%6.6jx 0x%16.16jx 0x%16.16jx " 23492c23cb7cSEd Maste "0x%6.6jx 0x%6.6jx %c%c%c %#jx\n", PH_CT); 23502c23cb7cSEd Maste else 23512c23cb7cSEd Maste printf(" %-14.14s 0x%16.16jx 0x%16.16jx 0x%16.16jx\n" 23522c23cb7cSEd Maste " 0x%16.16jx 0x%16.16jx %c%c%c" 23532c23cb7cSEd Maste " %#jx\n", PH_CT); 23542c23cb7cSEd Maste if (phdr.p_type == PT_INTERP) { 2355b00fe64fSEd Maste if ((rawfile = elf_rawfile(re->elf, &size)) == NULL) { 23562c23cb7cSEd Maste warnx("elf_rawfile failed: %s", elf_errmsg(-1)); 23572c23cb7cSEd Maste continue; 23582c23cb7cSEd Maste } 2359b00fe64fSEd Maste if (phdr.p_offset >= size) { 2360b00fe64fSEd Maste warnx("invalid program header offset"); 2361b00fe64fSEd Maste continue; 2362b00fe64fSEd Maste } 23632c23cb7cSEd Maste printf(" [Requesting program interpreter: %s]\n", 23642c23cb7cSEd Maste rawfile + phdr.p_offset); 23652c23cb7cSEd Maste } 23662c23cb7cSEd Maste } 23672c23cb7cSEd Maste 23682c23cb7cSEd Maste /* Dump section to segment mapping. */ 23692c23cb7cSEd Maste if (re->shnum == 0) 23702c23cb7cSEd Maste return; 23712c23cb7cSEd Maste printf("\n Section to Segment mapping:\n"); 23722c23cb7cSEd Maste printf(" Segment Sections...\n"); 23732c23cb7cSEd Maste for (i = 0; (size_t)i < phnum; i++) { 23742c23cb7cSEd Maste if (gelf_getphdr(re->elf, i, &phdr) != &phdr) { 23752c23cb7cSEd Maste warnx("gelf_getphdr failed: %s", elf_errmsg(-1)); 23762c23cb7cSEd Maste continue; 23772c23cb7cSEd Maste } 23782c23cb7cSEd Maste printf(" %2.2d ", i); 23792c23cb7cSEd Maste /* skip NULL section. */ 23802c23cb7cSEd Maste for (j = 1; (size_t)j < re->shnum; j++) 238195fd7f26SEd Maste if (re->sl[j].addr >= phdr.p_vaddr && 238295fd7f26SEd Maste re->sl[j].addr + re->sl[j].sz <= 238395fd7f26SEd Maste phdr.p_vaddr + phdr.p_memsz) 23842c23cb7cSEd Maste printf("%s ", re->sl[j].name); 23852c23cb7cSEd Maste printf("\n"); 23862c23cb7cSEd Maste } 23872c23cb7cSEd Maste #undef PH_HDR 23882c23cb7cSEd Maste #undef PH_CT 23892c23cb7cSEd Maste } 23902c23cb7cSEd Maste 23912c23cb7cSEd Maste static char * 23922c23cb7cSEd Maste section_flags(struct readelf *re, struct section *s) 23932c23cb7cSEd Maste { 23942c23cb7cSEd Maste #define BUF_SZ 256 23952c23cb7cSEd Maste static char buf[BUF_SZ]; 23962c23cb7cSEd Maste int i, p, nb; 23972c23cb7cSEd Maste 23982c23cb7cSEd Maste p = 0; 23992c23cb7cSEd Maste nb = re->ec == ELFCLASS32 ? 8 : 16; 24002c23cb7cSEd Maste if (re->options & RE_T) { 24012c23cb7cSEd Maste snprintf(buf, BUF_SZ, "[%*.*jx]: ", nb, nb, 24022c23cb7cSEd Maste (uintmax_t)s->flags); 24032c23cb7cSEd Maste p += nb + 4; 24042c23cb7cSEd Maste } 24052c23cb7cSEd Maste for (i = 0; section_flag[i].ln != NULL; i++) { 24062c23cb7cSEd Maste if ((s->flags & section_flag[i].value) == 0) 24072c23cb7cSEd Maste continue; 24082c23cb7cSEd Maste if (re->options & RE_T) { 24092c23cb7cSEd Maste snprintf(&buf[p], BUF_SZ - p, "%s, ", 24102c23cb7cSEd Maste section_flag[i].ln); 24112c23cb7cSEd Maste p += strlen(section_flag[i].ln) + 2; 24122c23cb7cSEd Maste } else 24132c23cb7cSEd Maste buf[p++] = section_flag[i].sn; 24142c23cb7cSEd Maste } 24152c23cb7cSEd Maste if (re->options & RE_T && p > nb + 4) 24162c23cb7cSEd Maste p -= 2; 24172c23cb7cSEd Maste buf[p] = '\0'; 24182c23cb7cSEd Maste 24192c23cb7cSEd Maste return (buf); 24202c23cb7cSEd Maste } 24212c23cb7cSEd Maste 24222c23cb7cSEd Maste static void 24232c23cb7cSEd Maste dump_shdr(struct readelf *re) 24242c23cb7cSEd Maste { 24252c23cb7cSEd Maste struct section *s; 24262c23cb7cSEd Maste int i; 24272c23cb7cSEd Maste 24282c23cb7cSEd Maste #define S_HDR "[Nr] Name", "Type", "Addr", "Off", "Size", "ES", \ 24292c23cb7cSEd Maste "Flg", "Lk", "Inf", "Al" 24302c23cb7cSEd Maste #define S_HDRL "[Nr] Name", "Type", "Address", "Offset", "Size", \ 24312c23cb7cSEd Maste "EntSize", "Flags", "Link", "Info", "Align" 24322c23cb7cSEd Maste #define ST_HDR "[Nr] Name", "Type", "Addr", "Off", "Size", "ES", \ 24332c23cb7cSEd Maste "Lk", "Inf", "Al", "Flags" 24342c23cb7cSEd Maste #define ST_HDRL "[Nr] Name", "Type", "Address", "Offset", "Link", \ 24352c23cb7cSEd Maste "Size", "EntSize", "Info", "Align", "Flags" 24362c23cb7cSEd Maste #define S_CT i, s->name, section_type(re->ehdr.e_machine, s->type), \ 24372c23cb7cSEd Maste (uintmax_t)s->addr, (uintmax_t)s->off, (uintmax_t)s->sz,\ 24382c23cb7cSEd Maste (uintmax_t)s->entsize, section_flags(re, s), \ 24392c23cb7cSEd Maste s->link, s->info, (uintmax_t)s->align 24402c23cb7cSEd Maste #define ST_CT i, s->name, section_type(re->ehdr.e_machine, s->type), \ 24412c23cb7cSEd Maste (uintmax_t)s->addr, (uintmax_t)s->off, (uintmax_t)s->sz,\ 24422c23cb7cSEd Maste (uintmax_t)s->entsize, s->link, s->info, \ 24432c23cb7cSEd Maste (uintmax_t)s->align, section_flags(re, s) 24442c23cb7cSEd Maste #define ST_CTL i, s->name, section_type(re->ehdr.e_machine, s->type), \ 24452c23cb7cSEd Maste (uintmax_t)s->addr, (uintmax_t)s->off, s->link, \ 24462c23cb7cSEd Maste (uintmax_t)s->sz, (uintmax_t)s->entsize, s->info, \ 24472c23cb7cSEd Maste (uintmax_t)s->align, section_flags(re, s) 24482c23cb7cSEd Maste 24492c23cb7cSEd Maste if (re->shnum == 0) { 24502c23cb7cSEd Maste printf("\nThere are no sections in this file.\n"); 24512c23cb7cSEd Maste return; 24522c23cb7cSEd Maste } 24532c23cb7cSEd Maste printf("There are %ju section headers, starting at offset 0x%jx:\n", 24542c23cb7cSEd Maste (uintmax_t)re->shnum, (uintmax_t)re->ehdr.e_shoff); 24552c23cb7cSEd Maste printf("\nSection Headers:\n"); 24562c23cb7cSEd Maste if (re->ec == ELFCLASS32) { 24572c23cb7cSEd Maste if (re->options & RE_T) 24582c23cb7cSEd Maste printf(" %s\n %-16s%-9s%-7s%-7s%-5s%-3s%-4s%s\n" 24592c23cb7cSEd Maste "%12s\n", ST_HDR); 24602c23cb7cSEd Maste else 24612c23cb7cSEd Maste printf(" %-23s%-16s%-9s%-7s%-7s%-3s%-4s%-3s%-4s%s\n", 24622c23cb7cSEd Maste S_HDR); 24632c23cb7cSEd Maste } else if (re->options & RE_WW) { 24642c23cb7cSEd Maste if (re->options & RE_T) 24652c23cb7cSEd Maste printf(" %s\n %-16s%-17s%-7s%-7s%-5s%-3s%-4s%s\n" 24662c23cb7cSEd Maste "%12s\n", ST_HDR); 24672c23cb7cSEd Maste else 24682c23cb7cSEd Maste printf(" %-23s%-16s%-17s%-7s%-7s%-3s%-4s%-3s%-4s%s\n", 24692c23cb7cSEd Maste S_HDR); 24702c23cb7cSEd Maste } else { 24712c23cb7cSEd Maste if (re->options & RE_T) 24722c23cb7cSEd Maste printf(" %s\n %-18s%-17s%-18s%s\n %-18s" 24732c23cb7cSEd Maste "%-17s%-18s%s\n%12s\n", ST_HDRL); 24742c23cb7cSEd Maste else 24752c23cb7cSEd Maste printf(" %-23s%-17s%-18s%s\n %-18s%-17s%-7s%" 24762c23cb7cSEd Maste "-6s%-6s%s\n", S_HDRL); 24772c23cb7cSEd Maste } 24782c23cb7cSEd Maste for (i = 0; (size_t)i < re->shnum; i++) { 24792c23cb7cSEd Maste s = &re->sl[i]; 24802c23cb7cSEd Maste if (re->ec == ELFCLASS32) { 24812c23cb7cSEd Maste if (re->options & RE_T) 24822c23cb7cSEd Maste printf(" [%2d] %s\n %-15.15s %8.8jx" 24832c23cb7cSEd Maste " %6.6jx %6.6jx %2.2jx %2u %3u %2ju\n" 24842c23cb7cSEd Maste " %s\n", ST_CT); 24852c23cb7cSEd Maste else 24862c23cb7cSEd Maste printf(" [%2d] %-17.17s %-15.15s %8.8jx" 24872c23cb7cSEd Maste " %6.6jx %6.6jx %2.2jx %3s %2u %3u %2ju\n", 24882c23cb7cSEd Maste S_CT); 24892c23cb7cSEd Maste } else if (re->options & RE_WW) { 24902c23cb7cSEd Maste if (re->options & RE_T) 24912c23cb7cSEd Maste printf(" [%2d] %s\n %-15.15s %16.16jx" 24922c23cb7cSEd Maste " %6.6jx %6.6jx %2.2jx %2u %3u %2ju\n" 24932c23cb7cSEd Maste " %s\n", ST_CT); 24942c23cb7cSEd Maste else 24952c23cb7cSEd Maste printf(" [%2d] %-17.17s %-15.15s %16.16jx" 24962c23cb7cSEd Maste " %6.6jx %6.6jx %2.2jx %3s %2u %3u %2ju\n", 24972c23cb7cSEd Maste S_CT); 24982c23cb7cSEd Maste } else { 24992c23cb7cSEd Maste if (re->options & RE_T) 25002c23cb7cSEd Maste printf(" [%2d] %s\n %-15.15s %16.16jx" 25012c23cb7cSEd Maste " %16.16jx %u\n %16.16jx %16.16jx" 25022c23cb7cSEd Maste " %-16u %ju\n %s\n", ST_CTL); 25032c23cb7cSEd Maste else 25042c23cb7cSEd Maste printf(" [%2d] %-17.17s %-15.15s %16.16jx" 25052c23cb7cSEd Maste " %8.8jx\n %16.16jx %16.16jx " 25062c23cb7cSEd Maste "%3s %2u %3u %ju\n", S_CT); 25072c23cb7cSEd Maste } 25082c23cb7cSEd Maste } 25092c23cb7cSEd Maste if ((re->options & RE_T) == 0) 25102c23cb7cSEd Maste printf("Key to Flags:\n W (write), A (alloc)," 25112c23cb7cSEd Maste " X (execute), M (merge), S (strings)\n" 25122c23cb7cSEd Maste " I (info), L (link order), G (group), x (unknown)\n" 25132c23cb7cSEd Maste " O (extra OS processing required)" 25142c23cb7cSEd Maste " o (OS specific), p (processor specific)\n"); 25152c23cb7cSEd Maste 25162c23cb7cSEd Maste #undef S_HDR 25172c23cb7cSEd Maste #undef S_HDRL 25182c23cb7cSEd Maste #undef ST_HDR 25192c23cb7cSEd Maste #undef ST_HDRL 25202c23cb7cSEd Maste #undef S_CT 25212c23cb7cSEd Maste #undef ST_CT 25222c23cb7cSEd Maste #undef ST_CTL 25232c23cb7cSEd Maste } 25242c23cb7cSEd Maste 252571edbbfdSEd Maste /* 252671edbbfdSEd Maste * Return number of entries in the given section. We'd prefer ent_count be a 252771edbbfdSEd Maste * size_t *, but libelf APIs already use int for section indices. 252871edbbfdSEd Maste */ 252971edbbfdSEd Maste static int 253071edbbfdSEd Maste get_ent_count(struct section *s, int *ent_count) 253171edbbfdSEd Maste { 253271edbbfdSEd Maste if (s->entsize == 0) { 253371edbbfdSEd Maste warnx("section %s has entry size 0", s->name); 253471edbbfdSEd Maste return (0); 253571edbbfdSEd Maste } else if (s->sz / s->entsize > INT_MAX) { 253671edbbfdSEd Maste warnx("section %s has invalid section count", s->name); 253771edbbfdSEd Maste return (0); 253871edbbfdSEd Maste } 253971edbbfdSEd Maste *ent_count = (int)(s->sz / s->entsize); 254071edbbfdSEd Maste return (1); 254171edbbfdSEd Maste } 254271edbbfdSEd Maste 25432c23cb7cSEd Maste static void 25442c23cb7cSEd Maste dump_dynamic(struct readelf *re) 25452c23cb7cSEd Maste { 25462c23cb7cSEd Maste GElf_Dyn dyn; 25472c23cb7cSEd Maste Elf_Data *d; 25482c23cb7cSEd Maste struct section *s; 25492c23cb7cSEd Maste int elferr, i, is_dynamic, j, jmax, nentries; 25502c23cb7cSEd Maste 25512c23cb7cSEd Maste is_dynamic = 0; 25522c23cb7cSEd Maste 25532c23cb7cSEd Maste for (i = 0; (size_t)i < re->shnum; i++) { 25542c23cb7cSEd Maste s = &re->sl[i]; 25552c23cb7cSEd Maste if (s->type != SHT_DYNAMIC) 25562c23cb7cSEd Maste continue; 25572c23cb7cSEd Maste (void) elf_errno(); 25582c23cb7cSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 25592c23cb7cSEd Maste elferr = elf_errno(); 25602c23cb7cSEd Maste if (elferr != 0) 25612c23cb7cSEd Maste warnx("elf_getdata failed: %s", elf_errmsg(-1)); 25622c23cb7cSEd Maste continue; 25632c23cb7cSEd Maste } 25642c23cb7cSEd Maste if (d->d_size <= 0) 25652c23cb7cSEd Maste continue; 25662c23cb7cSEd Maste 25672c23cb7cSEd Maste is_dynamic = 1; 25682c23cb7cSEd Maste 25692c23cb7cSEd Maste /* Determine the actual number of table entries. */ 25702c23cb7cSEd Maste nentries = 0; 257171edbbfdSEd Maste if (!get_ent_count(s, &jmax)) 257271edbbfdSEd Maste continue; 25732c23cb7cSEd Maste for (j = 0; j < jmax; j++) { 25742c23cb7cSEd Maste if (gelf_getdyn(d, j, &dyn) != &dyn) { 25752c23cb7cSEd Maste warnx("gelf_getdyn failed: %s", 25762c23cb7cSEd Maste elf_errmsg(-1)); 25772c23cb7cSEd Maste continue; 25782c23cb7cSEd Maste } 25792c23cb7cSEd Maste nentries ++; 25802c23cb7cSEd Maste if (dyn.d_tag == DT_NULL) 25812c23cb7cSEd Maste break; 25822c23cb7cSEd Maste } 25832c23cb7cSEd Maste 25842c23cb7cSEd Maste printf("\nDynamic section at offset 0x%jx", (uintmax_t)s->off); 25852c23cb7cSEd Maste printf(" contains %u entries:\n", nentries); 25862c23cb7cSEd Maste 25872c23cb7cSEd Maste if (re->ec == ELFCLASS32) 25882c23cb7cSEd Maste printf("%5s%12s%28s\n", "Tag", "Type", "Name/Value"); 25892c23cb7cSEd Maste else 25902c23cb7cSEd Maste printf("%5s%20s%28s\n", "Tag", "Type", "Name/Value"); 25912c23cb7cSEd Maste 25922c23cb7cSEd Maste for (j = 0; j < nentries; j++) { 25932c23cb7cSEd Maste if (gelf_getdyn(d, j, &dyn) != &dyn) 25942c23cb7cSEd Maste continue; 25952c23cb7cSEd Maste /* Dump dynamic entry type. */ 25962c23cb7cSEd Maste if (re->ec == ELFCLASS32) 25972c23cb7cSEd Maste printf(" 0x%8.8jx", (uintmax_t)dyn.d_tag); 25982c23cb7cSEd Maste else 25992c23cb7cSEd Maste printf(" 0x%16.16jx", (uintmax_t)dyn.d_tag); 26002c23cb7cSEd Maste printf(" %-20s", dt_type(re->ehdr.e_machine, 26012c23cb7cSEd Maste dyn.d_tag)); 26022c23cb7cSEd Maste /* Dump dynamic entry value. */ 26032c23cb7cSEd Maste dump_dyn_val(re, &dyn, s->link); 26042c23cb7cSEd Maste } 26052c23cb7cSEd Maste } 26062c23cb7cSEd Maste 26072c23cb7cSEd Maste if (!is_dynamic) 26082c23cb7cSEd Maste printf("\nThere is no dynamic section in this file.\n"); 26092c23cb7cSEd Maste } 26102c23cb7cSEd Maste 26112c23cb7cSEd Maste static char * 26122c23cb7cSEd Maste timestamp(time_t ti) 26132c23cb7cSEd Maste { 26142c23cb7cSEd Maste static char ts[32]; 26152c23cb7cSEd Maste struct tm *t; 26162c23cb7cSEd Maste 26172c23cb7cSEd Maste t = gmtime(&ti); 26182c23cb7cSEd Maste snprintf(ts, sizeof(ts), "%04d-%02d-%02dT%02d:%02d:%02d", 26192c23cb7cSEd Maste t->tm_year + 1900, t->tm_mon + 1, t->tm_mday, t->tm_hour, 26202c23cb7cSEd Maste t->tm_min, t->tm_sec); 26212c23cb7cSEd Maste 26222c23cb7cSEd Maste return (ts); 26232c23cb7cSEd Maste } 26242c23cb7cSEd Maste 26252c23cb7cSEd Maste static const char * 26262c23cb7cSEd Maste dyn_str(struct readelf *re, uint32_t stab, uint64_t d_val) 26272c23cb7cSEd Maste { 26282c23cb7cSEd Maste const char *name; 26292c23cb7cSEd Maste 26302c23cb7cSEd Maste if (stab == SHN_UNDEF) 26312c23cb7cSEd Maste name = "ERROR"; 26322c23cb7cSEd Maste else if ((name = elf_strptr(re->elf, stab, d_val)) == NULL) { 26332c23cb7cSEd Maste (void) elf_errno(); /* clear error */ 26342c23cb7cSEd Maste name = "ERROR"; 26352c23cb7cSEd Maste } 26362c23cb7cSEd Maste 26372c23cb7cSEd Maste return (name); 26382c23cb7cSEd Maste } 26392c23cb7cSEd Maste 26402c23cb7cSEd Maste static void 264175826696SEd Maste dump_arch_dyn_val(struct readelf *re, GElf_Dyn *dyn) 26422c23cb7cSEd Maste { 26432c23cb7cSEd Maste switch (re->ehdr.e_machine) { 26442c23cb7cSEd Maste case EM_MIPS: 26452c23cb7cSEd Maste case EM_MIPS_RS3_LE: 26462c23cb7cSEd Maste switch (dyn->d_tag) { 26472c23cb7cSEd Maste case DT_MIPS_RLD_VERSION: 26482c23cb7cSEd Maste case DT_MIPS_LOCAL_GOTNO: 26492c23cb7cSEd Maste case DT_MIPS_CONFLICTNO: 26502c23cb7cSEd Maste case DT_MIPS_LIBLISTNO: 26512c23cb7cSEd Maste case DT_MIPS_SYMTABNO: 26522c23cb7cSEd Maste case DT_MIPS_UNREFEXTNO: 26532c23cb7cSEd Maste case DT_MIPS_GOTSYM: 26542c23cb7cSEd Maste case DT_MIPS_HIPAGENO: 26552c23cb7cSEd Maste case DT_MIPS_DELTA_CLASS_NO: 26562c23cb7cSEd Maste case DT_MIPS_DELTA_INSTANCE_NO: 26572c23cb7cSEd Maste case DT_MIPS_DELTA_RELOC_NO: 26582c23cb7cSEd Maste case DT_MIPS_DELTA_SYM_NO: 26592c23cb7cSEd Maste case DT_MIPS_DELTA_CLASSSYM_NO: 26602c23cb7cSEd Maste case DT_MIPS_LOCALPAGE_GOTIDX: 26612c23cb7cSEd Maste case DT_MIPS_LOCAL_GOTIDX: 26622c23cb7cSEd Maste case DT_MIPS_HIDDEN_GOTIDX: 26632c23cb7cSEd Maste case DT_MIPS_PROTECTED_GOTIDX: 26642c23cb7cSEd Maste printf(" %ju\n", (uintmax_t) dyn->d_un.d_val); 26652c23cb7cSEd Maste break; 26662c23cb7cSEd Maste case DT_MIPS_ICHECKSUM: 26672c23cb7cSEd Maste case DT_MIPS_FLAGS: 26682c23cb7cSEd Maste case DT_MIPS_BASE_ADDRESS: 26692c23cb7cSEd Maste case DT_MIPS_CONFLICT: 26702c23cb7cSEd Maste case DT_MIPS_LIBLIST: 26712c23cb7cSEd Maste case DT_MIPS_RLD_MAP: 26722c23cb7cSEd Maste case DT_MIPS_DELTA_CLASS: 26732c23cb7cSEd Maste case DT_MIPS_DELTA_INSTANCE: 26742c23cb7cSEd Maste case DT_MIPS_DELTA_RELOC: 26752c23cb7cSEd Maste case DT_MIPS_DELTA_SYM: 26762c23cb7cSEd Maste case DT_MIPS_DELTA_CLASSSYM: 26772c23cb7cSEd Maste case DT_MIPS_CXX_FLAGS: 26782c23cb7cSEd Maste case DT_MIPS_PIXIE_INIT: 26792c23cb7cSEd Maste case DT_MIPS_SYMBOL_LIB: 26802c23cb7cSEd Maste case DT_MIPS_OPTIONS: 26812c23cb7cSEd Maste case DT_MIPS_INTERFACE: 26822c23cb7cSEd Maste case DT_MIPS_DYNSTR_ALIGN: 26832c23cb7cSEd Maste case DT_MIPS_INTERFACE_SIZE: 26842c23cb7cSEd Maste case DT_MIPS_RLD_TEXT_RESOLVE_ADDR: 26852c23cb7cSEd Maste case DT_MIPS_COMPACT_SIZE: 26862c23cb7cSEd Maste case DT_MIPS_GP_VALUE: 26872c23cb7cSEd Maste case DT_MIPS_AUX_DYNAMIC: 26882c23cb7cSEd Maste case DT_MIPS_PLTGOT: 26892c23cb7cSEd Maste case DT_MIPS_RLD_OBJ_UPDATE: 26902c23cb7cSEd Maste case DT_MIPS_RWPLT: 26912c23cb7cSEd Maste printf(" 0x%jx\n", (uintmax_t) dyn->d_un.d_val); 26922c23cb7cSEd Maste break; 26932c23cb7cSEd Maste case DT_MIPS_IVERSION: 26942c23cb7cSEd Maste case DT_MIPS_PERF_SUFFIX: 26952c23cb7cSEd Maste case DT_MIPS_TIME_STAMP: 26962c23cb7cSEd Maste printf(" %s\n", timestamp(dyn->d_un.d_val)); 26972c23cb7cSEd Maste break; 26982c23cb7cSEd Maste } 26992c23cb7cSEd Maste break; 27002c23cb7cSEd Maste default: 27012c23cb7cSEd Maste printf("\n"); 27022c23cb7cSEd Maste break; 27032c23cb7cSEd Maste } 27042c23cb7cSEd Maste } 27052c23cb7cSEd Maste 27062c23cb7cSEd Maste static void 27072c23cb7cSEd Maste dump_dyn_val(struct readelf *re, GElf_Dyn *dyn, uint32_t stab) 27082c23cb7cSEd Maste { 27092c23cb7cSEd Maste const char *name; 27102c23cb7cSEd Maste 271175826696SEd Maste if (dyn->d_tag >= DT_LOPROC && dyn->d_tag <= DT_HIPROC && 271275826696SEd Maste dyn->d_tag != DT_AUXILIARY && dyn->d_tag != DT_FILTER) { 271375826696SEd Maste dump_arch_dyn_val(re, dyn); 27142c23cb7cSEd Maste return; 27152c23cb7cSEd Maste } 27162c23cb7cSEd Maste 27172c23cb7cSEd Maste /* These entry values are index into the string table. */ 27182c23cb7cSEd Maste name = NULL; 271975826696SEd Maste if (dyn->d_tag == DT_AUXILIARY || dyn->d_tag == DT_FILTER || 272075826696SEd Maste dyn->d_tag == DT_NEEDED || dyn->d_tag == DT_SONAME || 27212c23cb7cSEd Maste dyn->d_tag == DT_RPATH || dyn->d_tag == DT_RUNPATH) 27222c23cb7cSEd Maste name = dyn_str(re, stab, dyn->d_un.d_val); 27232c23cb7cSEd Maste 27242c23cb7cSEd Maste switch(dyn->d_tag) { 27252c23cb7cSEd Maste case DT_NULL: 27262c23cb7cSEd Maste case DT_PLTGOT: 27272c23cb7cSEd Maste case DT_HASH: 27282c23cb7cSEd Maste case DT_STRTAB: 27292c23cb7cSEd Maste case DT_SYMTAB: 27302c23cb7cSEd Maste case DT_RELA: 27312c23cb7cSEd Maste case DT_INIT: 27322c23cb7cSEd Maste case DT_SYMBOLIC: 27332c23cb7cSEd Maste case DT_REL: 27342c23cb7cSEd Maste case DT_DEBUG: 27352c23cb7cSEd Maste case DT_TEXTREL: 27362c23cb7cSEd Maste case DT_JMPREL: 27372c23cb7cSEd Maste case DT_FINI: 27382c23cb7cSEd Maste case DT_VERDEF: 27392c23cb7cSEd Maste case DT_VERNEED: 27402c23cb7cSEd Maste case DT_VERSYM: 27412c23cb7cSEd Maste case DT_GNU_HASH: 27422c23cb7cSEd Maste case DT_GNU_LIBLIST: 27432c23cb7cSEd Maste case DT_GNU_CONFLICT: 27442c23cb7cSEd Maste printf(" 0x%jx\n", (uintmax_t) dyn->d_un.d_val); 27452c23cb7cSEd Maste break; 27462c23cb7cSEd Maste case DT_PLTRELSZ: 27472c23cb7cSEd Maste case DT_RELASZ: 27482c23cb7cSEd Maste case DT_RELAENT: 27492c23cb7cSEd Maste case DT_STRSZ: 27502c23cb7cSEd Maste case DT_SYMENT: 27512c23cb7cSEd Maste case DT_RELSZ: 27522c23cb7cSEd Maste case DT_RELENT: 27532c23cb7cSEd Maste case DT_INIT_ARRAYSZ: 27542c23cb7cSEd Maste case DT_FINI_ARRAYSZ: 27552c23cb7cSEd Maste case DT_GNU_CONFLICTSZ: 27562c23cb7cSEd Maste case DT_GNU_LIBLISTSZ: 27572c23cb7cSEd Maste printf(" %ju (bytes)\n", (uintmax_t) dyn->d_un.d_val); 27582c23cb7cSEd Maste break; 27592c23cb7cSEd Maste case DT_RELACOUNT: 27602c23cb7cSEd Maste case DT_RELCOUNT: 27612c23cb7cSEd Maste case DT_VERDEFNUM: 27622c23cb7cSEd Maste case DT_VERNEEDNUM: 27632c23cb7cSEd Maste printf(" %ju\n", (uintmax_t) dyn->d_un.d_val); 27642c23cb7cSEd Maste break; 276575826696SEd Maste case DT_AUXILIARY: 276675826696SEd Maste printf(" Auxiliary library: [%s]\n", name); 276775826696SEd Maste break; 276875826696SEd Maste case DT_FILTER: 276975826696SEd Maste printf(" Filter library: [%s]\n", name); 277075826696SEd Maste break; 27712c23cb7cSEd Maste case DT_NEEDED: 27722c23cb7cSEd Maste printf(" Shared library: [%s]\n", name); 27732c23cb7cSEd Maste break; 27742c23cb7cSEd Maste case DT_SONAME: 27752c23cb7cSEd Maste printf(" Library soname: [%s]\n", name); 27762c23cb7cSEd Maste break; 27772c23cb7cSEd Maste case DT_RPATH: 27782c23cb7cSEd Maste printf(" Library rpath: [%s]\n", name); 27792c23cb7cSEd Maste break; 27802c23cb7cSEd Maste case DT_RUNPATH: 27812c23cb7cSEd Maste printf(" Library runpath: [%s]\n", name); 27822c23cb7cSEd Maste break; 27832c23cb7cSEd Maste case DT_PLTREL: 27842c23cb7cSEd Maste printf(" %s\n", dt_type(re->ehdr.e_machine, dyn->d_un.d_val)); 27852c23cb7cSEd Maste break; 27862c23cb7cSEd Maste case DT_GNU_PRELINKED: 27872c23cb7cSEd Maste printf(" %s\n", timestamp(dyn->d_un.d_val)); 27882c23cb7cSEd Maste break; 27892c23cb7cSEd Maste default: 27902c23cb7cSEd Maste printf("\n"); 27912c23cb7cSEd Maste } 27922c23cb7cSEd Maste } 27932c23cb7cSEd Maste 27942c23cb7cSEd Maste static void 27952c23cb7cSEd Maste dump_rel(struct readelf *re, struct section *s, Elf_Data *d) 27962c23cb7cSEd Maste { 27972c23cb7cSEd Maste GElf_Rel r; 27982c23cb7cSEd Maste const char *symname; 27992c23cb7cSEd Maste uint64_t symval; 28002c23cb7cSEd Maste int i, len; 2801b6d812d2SEd Maste uint32_t type; 2802b6d812d2SEd Maste uint8_t type2, type3; 28032c23cb7cSEd Maste 2804656f49f8SEd Maste if (s->link >= re->shnum) 2805656f49f8SEd Maste return; 2806656f49f8SEd Maste 28072c23cb7cSEd Maste #define REL_HDR "r_offset", "r_info", "r_type", "st_value", "st_name" 28082c23cb7cSEd Maste #define REL_CT32 (uintmax_t)r.r_offset, (uintmax_t)r.r_info, \ 2809b6b6f9ccSEd Maste elftc_reloc_type_str(re->ehdr.e_machine, \ 2810b6b6f9ccSEd Maste ELF32_R_TYPE(r.r_info)), (uintmax_t)symval, symname 28112c23cb7cSEd Maste #define REL_CT64 (uintmax_t)r.r_offset, (uintmax_t)r.r_info, \ 2812b6d812d2SEd Maste elftc_reloc_type_str(re->ehdr.e_machine, type), \ 2813b6d812d2SEd Maste (uintmax_t)symval, symname 28142c23cb7cSEd Maste 28152c23cb7cSEd Maste printf("\nRelocation section (%s):\n", s->name); 28162c23cb7cSEd Maste if (re->ec == ELFCLASS32) 28172c23cb7cSEd Maste printf("%-8s %-8s %-19s %-8s %s\n", REL_HDR); 28182c23cb7cSEd Maste else { 28192c23cb7cSEd Maste if (re->options & RE_WW) 28202c23cb7cSEd Maste printf("%-16s %-16s %-24s %-16s %s\n", REL_HDR); 28212c23cb7cSEd Maste else 28222c23cb7cSEd Maste printf("%-12s %-12s %-19s %-16s %s\n", REL_HDR); 28232c23cb7cSEd Maste } 282471edbbfdSEd Maste assert(d->d_size == s->sz); 282571edbbfdSEd Maste if (!get_ent_count(s, &len)) 282671edbbfdSEd Maste return; 28272c23cb7cSEd Maste for (i = 0; i < len; i++) { 28282c23cb7cSEd Maste if (gelf_getrel(d, i, &r) != &r) { 28292c23cb7cSEd Maste warnx("gelf_getrel failed: %s", elf_errmsg(-1)); 28302c23cb7cSEd Maste continue; 28312c23cb7cSEd Maste } 28322c23cb7cSEd Maste symname = get_symbol_name(re, s->link, GELF_R_SYM(r.r_info)); 28332c23cb7cSEd Maste symval = get_symbol_value(re, s->link, GELF_R_SYM(r.r_info)); 28342c23cb7cSEd Maste if (re->ec == ELFCLASS32) { 28352c23cb7cSEd Maste r.r_info = ELF32_R_INFO(ELF64_R_SYM(r.r_info), 28362c23cb7cSEd Maste ELF64_R_TYPE(r.r_info)); 28372c23cb7cSEd Maste printf("%8.8jx %8.8jx %-19.19s %8.8jx %s\n", REL_CT32); 28382c23cb7cSEd Maste } else { 2839b6d812d2SEd Maste type = ELF64_R_TYPE(r.r_info); 2840b6d812d2SEd Maste if (re->ehdr.e_machine == EM_MIPS) { 2841b6d812d2SEd Maste type2 = (type >> 8) & 0xFF; 2842b6d812d2SEd Maste type3 = (type >> 16) & 0xFF; 2843b6d812d2SEd Maste type = type & 0xFF; 2844d0bd2dadSEd Maste } else { 2845d0bd2dadSEd Maste type2 = type3 = 0; 2846b6d812d2SEd Maste } 28472c23cb7cSEd Maste if (re->options & RE_WW) 28482c23cb7cSEd Maste printf("%16.16jx %16.16jx %-24.24s" 28492c23cb7cSEd Maste " %16.16jx %s\n", REL_CT64); 28502c23cb7cSEd Maste else 28512c23cb7cSEd Maste printf("%12.12jx %12.12jx %-19.19s" 28522c23cb7cSEd Maste " %16.16jx %s\n", REL_CT64); 2853b6d812d2SEd Maste if (re->ehdr.e_machine == EM_MIPS) { 2854b6d812d2SEd Maste if (re->options & RE_WW) { 2855b6d812d2SEd Maste printf("%32s: %s\n", "Type2", 2856b6d812d2SEd Maste elftc_reloc_type_str(EM_MIPS, 2857b6d812d2SEd Maste type2)); 2858b6d812d2SEd Maste printf("%32s: %s\n", "Type3", 2859b6d812d2SEd Maste elftc_reloc_type_str(EM_MIPS, 2860b6d812d2SEd Maste type3)); 2861b6d812d2SEd Maste } else { 2862b6d812d2SEd Maste printf("%24s: %s\n", "Type2", 2863b6d812d2SEd Maste elftc_reloc_type_str(EM_MIPS, 2864b6d812d2SEd Maste type2)); 2865b6d812d2SEd Maste printf("%24s: %s\n", "Type3", 2866b6d812d2SEd Maste elftc_reloc_type_str(EM_MIPS, 2867b6d812d2SEd Maste type3)); 2868b6d812d2SEd Maste } 2869b6d812d2SEd Maste } 28702c23cb7cSEd Maste } 28712c23cb7cSEd Maste } 28722c23cb7cSEd Maste 28732c23cb7cSEd Maste #undef REL_HDR 28742c23cb7cSEd Maste #undef REL_CT 28752c23cb7cSEd Maste } 28762c23cb7cSEd Maste 28772c23cb7cSEd Maste static void 28782c23cb7cSEd Maste dump_rela(struct readelf *re, struct section *s, Elf_Data *d) 28792c23cb7cSEd Maste { 28802c23cb7cSEd Maste GElf_Rela r; 28812c23cb7cSEd Maste const char *symname; 28822c23cb7cSEd Maste uint64_t symval; 28832c23cb7cSEd Maste int i, len; 2884b6d812d2SEd Maste uint32_t type; 2885b6d812d2SEd Maste uint8_t type2, type3; 28862c23cb7cSEd Maste 2887656f49f8SEd Maste if (s->link >= re->shnum) 2888656f49f8SEd Maste return; 2889656f49f8SEd Maste 28902c23cb7cSEd Maste #define RELA_HDR "r_offset", "r_info", "r_type", "st_value", \ 28912c23cb7cSEd Maste "st_name + r_addend" 28922c23cb7cSEd Maste #define RELA_CT32 (uintmax_t)r.r_offset, (uintmax_t)r.r_info, \ 2893b6b6f9ccSEd Maste elftc_reloc_type_str(re->ehdr.e_machine, \ 2894b6b6f9ccSEd Maste ELF32_R_TYPE(r.r_info)), (uintmax_t)symval, symname 28952c23cb7cSEd Maste #define RELA_CT64 (uintmax_t)r.r_offset, (uintmax_t)r.r_info, \ 2896b6d812d2SEd Maste elftc_reloc_type_str(re->ehdr.e_machine, type), \ 2897b6d812d2SEd Maste (uintmax_t)symval, symname 28982c23cb7cSEd Maste 28992c23cb7cSEd Maste printf("\nRelocation section with addend (%s):\n", s->name); 29002c23cb7cSEd Maste if (re->ec == ELFCLASS32) 29012c23cb7cSEd Maste printf("%-8s %-8s %-19s %-8s %s\n", RELA_HDR); 29022c23cb7cSEd Maste else { 29032c23cb7cSEd Maste if (re->options & RE_WW) 29042c23cb7cSEd Maste printf("%-16s %-16s %-24s %-16s %s\n", RELA_HDR); 29052c23cb7cSEd Maste else 29062c23cb7cSEd Maste printf("%-12s %-12s %-19s %-16s %s\n", RELA_HDR); 29072c23cb7cSEd Maste } 290871edbbfdSEd Maste assert(d->d_size == s->sz); 290971edbbfdSEd Maste if (!get_ent_count(s, &len)) 291071edbbfdSEd Maste return; 29112c23cb7cSEd Maste for (i = 0; i < len; i++) { 29122c23cb7cSEd Maste if (gelf_getrela(d, i, &r) != &r) { 29132c23cb7cSEd Maste warnx("gelf_getrel failed: %s", elf_errmsg(-1)); 29142c23cb7cSEd Maste continue; 29152c23cb7cSEd Maste } 29162c23cb7cSEd Maste symname = get_symbol_name(re, s->link, GELF_R_SYM(r.r_info)); 29172c23cb7cSEd Maste symval = get_symbol_value(re, s->link, GELF_R_SYM(r.r_info)); 29182c23cb7cSEd Maste if (re->ec == ELFCLASS32) { 29192c23cb7cSEd Maste r.r_info = ELF32_R_INFO(ELF64_R_SYM(r.r_info), 29202c23cb7cSEd Maste ELF64_R_TYPE(r.r_info)); 29212c23cb7cSEd Maste printf("%8.8jx %8.8jx %-19.19s %8.8jx %s", RELA_CT32); 29222c23cb7cSEd Maste printf(" + %x\n", (uint32_t) r.r_addend); 29232c23cb7cSEd Maste } else { 2924b6d812d2SEd Maste type = ELF64_R_TYPE(r.r_info); 2925b6d812d2SEd Maste if (re->ehdr.e_machine == EM_MIPS) { 2926b6d812d2SEd Maste type2 = (type >> 8) & 0xFF; 2927b6d812d2SEd Maste type3 = (type >> 16) & 0xFF; 2928b6d812d2SEd Maste type = type & 0xFF; 2929d0bd2dadSEd Maste } else { 2930d0bd2dadSEd Maste type2 = type3 = 0; 2931b6d812d2SEd Maste } 29322c23cb7cSEd Maste if (re->options & RE_WW) 29332c23cb7cSEd Maste printf("%16.16jx %16.16jx %-24.24s" 29342c23cb7cSEd Maste " %16.16jx %s", RELA_CT64); 29352c23cb7cSEd Maste else 29362c23cb7cSEd Maste printf("%12.12jx %12.12jx %-19.19s" 29372c23cb7cSEd Maste " %16.16jx %s", RELA_CT64); 29382c23cb7cSEd Maste printf(" + %jx\n", (uintmax_t) r.r_addend); 2939b6d812d2SEd Maste if (re->ehdr.e_machine == EM_MIPS) { 2940b6d812d2SEd Maste if (re->options & RE_WW) { 2941b6d812d2SEd Maste printf("%32s: %s\n", "Type2", 2942b6d812d2SEd Maste elftc_reloc_type_str(EM_MIPS, 2943b6d812d2SEd Maste type2)); 2944b6d812d2SEd Maste printf("%32s: %s\n", "Type3", 2945b6d812d2SEd Maste elftc_reloc_type_str(EM_MIPS, 2946b6d812d2SEd Maste type3)); 2947b6d812d2SEd Maste } else { 2948b6d812d2SEd Maste printf("%24s: %s\n", "Type2", 2949b6d812d2SEd Maste elftc_reloc_type_str(EM_MIPS, 2950b6d812d2SEd Maste type2)); 2951b6d812d2SEd Maste printf("%24s: %s\n", "Type3", 2952b6d812d2SEd Maste elftc_reloc_type_str(EM_MIPS, 2953b6d812d2SEd Maste type3)); 2954b6d812d2SEd Maste } 2955b6d812d2SEd Maste } 29562c23cb7cSEd Maste } 29572c23cb7cSEd Maste } 29582c23cb7cSEd Maste 29592c23cb7cSEd Maste #undef RELA_HDR 29602c23cb7cSEd Maste #undef RELA_CT 29612c23cb7cSEd Maste } 29622c23cb7cSEd Maste 29632c23cb7cSEd Maste static void 29642c23cb7cSEd Maste dump_reloc(struct readelf *re) 29652c23cb7cSEd Maste { 29662c23cb7cSEd Maste struct section *s; 29672c23cb7cSEd Maste Elf_Data *d; 29682c23cb7cSEd Maste int i, elferr; 29692c23cb7cSEd Maste 29702c23cb7cSEd Maste for (i = 0; (size_t)i < re->shnum; i++) { 29712c23cb7cSEd Maste s = &re->sl[i]; 29722c23cb7cSEd Maste if (s->type == SHT_REL || s->type == SHT_RELA) { 29732c23cb7cSEd Maste (void) elf_errno(); 29742c23cb7cSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 29752c23cb7cSEd Maste elferr = elf_errno(); 29762c23cb7cSEd Maste if (elferr != 0) 29772c23cb7cSEd Maste warnx("elf_getdata failed: %s", 29782c23cb7cSEd Maste elf_errmsg(elferr)); 29792c23cb7cSEd Maste continue; 29802c23cb7cSEd Maste } 29812c23cb7cSEd Maste if (s->type == SHT_REL) 29822c23cb7cSEd Maste dump_rel(re, s, d); 29832c23cb7cSEd Maste else 29842c23cb7cSEd Maste dump_rela(re, s, d); 29852c23cb7cSEd Maste } 29862c23cb7cSEd Maste } 29872c23cb7cSEd Maste } 29882c23cb7cSEd Maste 29892c23cb7cSEd Maste static void 29902c23cb7cSEd Maste dump_symtab(struct readelf *re, int i) 29912c23cb7cSEd Maste { 29922c23cb7cSEd Maste struct section *s; 29932c23cb7cSEd Maste Elf_Data *d; 29942c23cb7cSEd Maste GElf_Sym sym; 29952c23cb7cSEd Maste const char *name; 2996656f49f8SEd Maste uint32_t stab; 2997656f49f8SEd Maste int elferr, j, len; 2998656f49f8SEd Maste uint16_t vs; 29992c23cb7cSEd Maste 30002c23cb7cSEd Maste s = &re->sl[i]; 3001656f49f8SEd Maste if (s->link >= re->shnum) 3002656f49f8SEd Maste return; 30032c23cb7cSEd Maste stab = s->link; 30042c23cb7cSEd Maste (void) elf_errno(); 30052c23cb7cSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 30062c23cb7cSEd Maste elferr = elf_errno(); 30072c23cb7cSEd Maste if (elferr != 0) 30082c23cb7cSEd Maste warnx("elf_getdata failed: %s", elf_errmsg(elferr)); 30092c23cb7cSEd Maste return; 30102c23cb7cSEd Maste } 30112c23cb7cSEd Maste if (d->d_size <= 0) 30122c23cb7cSEd Maste return; 301371edbbfdSEd Maste if (!get_ent_count(s, &len)) 301471edbbfdSEd Maste return; 30152c23cb7cSEd Maste printf("Symbol table (%s)", s->name); 301671edbbfdSEd Maste printf(" contains %d entries:\n", len); 30172c23cb7cSEd Maste printf("%7s%9s%14s%5s%8s%6s%9s%5s\n", "Num:", "Value", "Size", "Type", 30182c23cb7cSEd Maste "Bind", "Vis", "Ndx", "Name"); 30192c23cb7cSEd Maste 302071edbbfdSEd Maste for (j = 0; j < len; j++) { 30212c23cb7cSEd Maste if (gelf_getsym(d, j, &sym) != &sym) { 30222c23cb7cSEd Maste warnx("gelf_getsym failed: %s", elf_errmsg(-1)); 30232c23cb7cSEd Maste continue; 30242c23cb7cSEd Maste } 30252c23cb7cSEd Maste printf("%6d:", j); 30262c23cb7cSEd Maste printf(" %16.16jx", (uintmax_t) sym.st_value); 3027839529caSEd Maste printf(" %5ju", (uintmax_t) sym.st_size); 3028839529caSEd Maste printf(" %-7s", st_type(re->ehdr.e_machine, 3029b6b6f9ccSEd Maste re->ehdr.e_ident[EI_OSABI], GELF_ST_TYPE(sym.st_info))); 30302c23cb7cSEd Maste printf(" %-6s", st_bind(GELF_ST_BIND(sym.st_info))); 30312c23cb7cSEd Maste printf(" %-8s", st_vis(GELF_ST_VISIBILITY(sym.st_other))); 30322c23cb7cSEd Maste printf(" %3s", st_shndx(sym.st_shndx)); 30332c23cb7cSEd Maste if ((name = elf_strptr(re->elf, stab, sym.st_name)) != NULL) 30342c23cb7cSEd Maste printf(" %s", name); 30352c23cb7cSEd Maste /* Append symbol version string for SHT_DYNSYM symbol table. */ 30362c23cb7cSEd Maste if (s->type == SHT_DYNSYM && re->ver != NULL && 30372c23cb7cSEd Maste re->vs != NULL && re->vs[j] > 1) { 3038656f49f8SEd Maste vs = re->vs[j] & VERSYM_VERSION; 3039656f49f8SEd Maste if (vs >= re->ver_sz || re->ver[vs].name == NULL) { 3040656f49f8SEd Maste warnx("invalid versym version index %u", vs); 3041656f49f8SEd Maste break; 3042656f49f8SEd Maste } 3043656f49f8SEd Maste if (re->vs[j] & VERSYM_HIDDEN || re->ver[vs].type == 0) 3044656f49f8SEd Maste printf("@%s (%d)", re->ver[vs].name, vs); 30452c23cb7cSEd Maste else 3046656f49f8SEd Maste printf("@@%s (%d)", re->ver[vs].name, vs); 30472c23cb7cSEd Maste } 30482c23cb7cSEd Maste putchar('\n'); 30492c23cb7cSEd Maste } 30502c23cb7cSEd Maste 30512c23cb7cSEd Maste } 30522c23cb7cSEd Maste 30532c23cb7cSEd Maste static void 30542c23cb7cSEd Maste dump_symtabs(struct readelf *re) 30552c23cb7cSEd Maste { 30562c23cb7cSEd Maste GElf_Dyn dyn; 30572c23cb7cSEd Maste Elf_Data *d; 30582c23cb7cSEd Maste struct section *s; 30592c23cb7cSEd Maste uint64_t dyn_off; 306071edbbfdSEd Maste int elferr, i, len; 30612c23cb7cSEd Maste 30622c23cb7cSEd Maste /* 30632c23cb7cSEd Maste * If -D is specified, only dump the symbol table specified by 30642c23cb7cSEd Maste * the DT_SYMTAB entry in the .dynamic section. 30652c23cb7cSEd Maste */ 30662c23cb7cSEd Maste dyn_off = 0; 30672c23cb7cSEd Maste if (re->options & RE_DD) { 30682c23cb7cSEd Maste s = NULL; 30692c23cb7cSEd Maste for (i = 0; (size_t)i < re->shnum; i++) 30702c23cb7cSEd Maste if (re->sl[i].type == SHT_DYNAMIC) { 30712c23cb7cSEd Maste s = &re->sl[i]; 30722c23cb7cSEd Maste break; 30732c23cb7cSEd Maste } 30742c23cb7cSEd Maste if (s == NULL) 30752c23cb7cSEd Maste return; 30762c23cb7cSEd Maste (void) elf_errno(); 30772c23cb7cSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 30782c23cb7cSEd Maste elferr = elf_errno(); 30792c23cb7cSEd Maste if (elferr != 0) 30802c23cb7cSEd Maste warnx("elf_getdata failed: %s", elf_errmsg(-1)); 30812c23cb7cSEd Maste return; 30822c23cb7cSEd Maste } 30832c23cb7cSEd Maste if (d->d_size <= 0) 30842c23cb7cSEd Maste return; 308571edbbfdSEd Maste if (!get_ent_count(s, &len)) 308671edbbfdSEd Maste return; 30872c23cb7cSEd Maste 308871edbbfdSEd Maste for (i = 0; i < len; i++) { 30892c23cb7cSEd Maste if (gelf_getdyn(d, i, &dyn) != &dyn) { 30902c23cb7cSEd Maste warnx("gelf_getdyn failed: %s", elf_errmsg(-1)); 30912c23cb7cSEd Maste continue; 30922c23cb7cSEd Maste } 30932c23cb7cSEd Maste if (dyn.d_tag == DT_SYMTAB) { 30942c23cb7cSEd Maste dyn_off = dyn.d_un.d_val; 30952c23cb7cSEd Maste break; 30962c23cb7cSEd Maste } 30972c23cb7cSEd Maste } 30982c23cb7cSEd Maste } 30992c23cb7cSEd Maste 31002c23cb7cSEd Maste /* Find and dump symbol tables. */ 31012c23cb7cSEd Maste for (i = 0; (size_t)i < re->shnum; i++) { 31022c23cb7cSEd Maste s = &re->sl[i]; 31032c23cb7cSEd Maste if (s->type == SHT_SYMTAB || s->type == SHT_DYNSYM) { 31042c23cb7cSEd Maste if (re->options & RE_DD) { 31052c23cb7cSEd Maste if (dyn_off == s->addr) { 31062c23cb7cSEd Maste dump_symtab(re, i); 31072c23cb7cSEd Maste break; 31082c23cb7cSEd Maste } 31092c23cb7cSEd Maste } else 31102c23cb7cSEd Maste dump_symtab(re, i); 31112c23cb7cSEd Maste } 31122c23cb7cSEd Maste } 31132c23cb7cSEd Maste } 31142c23cb7cSEd Maste 31152c23cb7cSEd Maste static void 31162c23cb7cSEd Maste dump_svr4_hash(struct section *s) 31172c23cb7cSEd Maste { 31182c23cb7cSEd Maste Elf_Data *d; 31192c23cb7cSEd Maste uint32_t *buf; 31202c23cb7cSEd Maste uint32_t nbucket, nchain; 31212c23cb7cSEd Maste uint32_t *bucket, *chain; 31222c23cb7cSEd Maste uint32_t *bl, *c, maxl, total; 31232c23cb7cSEd Maste int elferr, i, j; 31242c23cb7cSEd Maste 31252c23cb7cSEd Maste /* Read and parse the content of .hash section. */ 31262c23cb7cSEd Maste (void) elf_errno(); 31272c23cb7cSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 31282c23cb7cSEd Maste elferr = elf_errno(); 31292c23cb7cSEd Maste if (elferr != 0) 31302c23cb7cSEd Maste warnx("elf_getdata failed: %s", elf_errmsg(elferr)); 31312c23cb7cSEd Maste return; 31322c23cb7cSEd Maste } 31332c23cb7cSEd Maste if (d->d_size < 2 * sizeof(uint32_t)) { 31342c23cb7cSEd Maste warnx(".hash section too small"); 31352c23cb7cSEd Maste return; 31362c23cb7cSEd Maste } 31372c23cb7cSEd Maste buf = d->d_buf; 31382c23cb7cSEd Maste nbucket = buf[0]; 31392c23cb7cSEd Maste nchain = buf[1]; 31402c23cb7cSEd Maste if (nbucket <= 0 || nchain <= 0) { 31412c23cb7cSEd Maste warnx("Malformed .hash section"); 31422c23cb7cSEd Maste return; 31432c23cb7cSEd Maste } 31442c23cb7cSEd Maste if (d->d_size != (nbucket + nchain + 2) * sizeof(uint32_t)) { 31452c23cb7cSEd Maste warnx("Malformed .hash section"); 31462c23cb7cSEd Maste return; 31472c23cb7cSEd Maste } 31482c23cb7cSEd Maste bucket = &buf[2]; 31492c23cb7cSEd Maste chain = &buf[2 + nbucket]; 31502c23cb7cSEd Maste 31512c23cb7cSEd Maste maxl = 0; 31522c23cb7cSEd Maste if ((bl = calloc(nbucket, sizeof(*bl))) == NULL) 31532c23cb7cSEd Maste errx(EXIT_FAILURE, "calloc failed"); 31542c23cb7cSEd Maste for (i = 0; (uint32_t)i < nbucket; i++) 31552c23cb7cSEd Maste for (j = bucket[i]; j > 0 && (uint32_t)j < nchain; j = chain[j]) 31562c23cb7cSEd Maste if (++bl[i] > maxl) 31572c23cb7cSEd Maste maxl = bl[i]; 31582c23cb7cSEd Maste if ((c = calloc(maxl + 1, sizeof(*c))) == NULL) 31592c23cb7cSEd Maste errx(EXIT_FAILURE, "calloc failed"); 31602c23cb7cSEd Maste for (i = 0; (uint32_t)i < nbucket; i++) 31612c23cb7cSEd Maste c[bl[i]]++; 31622c23cb7cSEd Maste printf("\nHistogram for bucket list length (total of %u buckets):\n", 31632c23cb7cSEd Maste nbucket); 31642c23cb7cSEd Maste printf(" Length\tNumber\t\t%% of total\tCoverage\n"); 31652c23cb7cSEd Maste total = 0; 31662c23cb7cSEd Maste for (i = 0; (uint32_t)i <= maxl; i++) { 31672c23cb7cSEd Maste total += c[i] * i; 31682c23cb7cSEd Maste printf("%7u\t%-10u\t(%5.1f%%)\t%5.1f%%\n", i, c[i], 31692c23cb7cSEd Maste c[i] * 100.0 / nbucket, total * 100.0 / (nchain - 1)); 31702c23cb7cSEd Maste } 31712c23cb7cSEd Maste free(c); 31722c23cb7cSEd Maste free(bl); 31732c23cb7cSEd Maste } 31742c23cb7cSEd Maste 31752c23cb7cSEd Maste static void 31762c23cb7cSEd Maste dump_svr4_hash64(struct readelf *re, struct section *s) 31772c23cb7cSEd Maste { 31782c23cb7cSEd Maste Elf_Data *d, dst; 31792c23cb7cSEd Maste uint64_t *buf; 31802c23cb7cSEd Maste uint64_t nbucket, nchain; 31812c23cb7cSEd Maste uint64_t *bucket, *chain; 31822c23cb7cSEd Maste uint64_t *bl, *c, maxl, total; 31832c23cb7cSEd Maste int elferr, i, j; 31842c23cb7cSEd Maste 31852c23cb7cSEd Maste /* 31862c23cb7cSEd Maste * ALPHA uses 64-bit hash entries. Since libelf assumes that 31872c23cb7cSEd Maste * .hash section contains only 32-bit entry, an explicit 31882c23cb7cSEd Maste * gelf_xlatetom is needed here. 31892c23cb7cSEd Maste */ 31902c23cb7cSEd Maste (void) elf_errno(); 31912c23cb7cSEd Maste if ((d = elf_rawdata(s->scn, NULL)) == NULL) { 31922c23cb7cSEd Maste elferr = elf_errno(); 31932c23cb7cSEd Maste if (elferr != 0) 31942c23cb7cSEd Maste warnx("elf_rawdata failed: %s", 31952c23cb7cSEd Maste elf_errmsg(elferr)); 31962c23cb7cSEd Maste return; 31972c23cb7cSEd Maste } 31982c23cb7cSEd Maste d->d_type = ELF_T_XWORD; 31992c23cb7cSEd Maste memcpy(&dst, d, sizeof(Elf_Data)); 32002c23cb7cSEd Maste if (gelf_xlatetom(re->elf, &dst, d, 32012c23cb7cSEd Maste re->ehdr.e_ident[EI_DATA]) != &dst) { 32022c23cb7cSEd Maste warnx("gelf_xlatetom failed: %s", elf_errmsg(-1)); 32032c23cb7cSEd Maste return; 32042c23cb7cSEd Maste } 32052c23cb7cSEd Maste if (dst.d_size < 2 * sizeof(uint64_t)) { 32062c23cb7cSEd Maste warnx(".hash section too small"); 32072c23cb7cSEd Maste return; 32082c23cb7cSEd Maste } 32092c23cb7cSEd Maste buf = dst.d_buf; 32102c23cb7cSEd Maste nbucket = buf[0]; 32112c23cb7cSEd Maste nchain = buf[1]; 32122c23cb7cSEd Maste if (nbucket <= 0 || nchain <= 0) { 32132c23cb7cSEd Maste warnx("Malformed .hash section"); 32142c23cb7cSEd Maste return; 32152c23cb7cSEd Maste } 32162c23cb7cSEd Maste if (d->d_size != (nbucket + nchain + 2) * sizeof(uint32_t)) { 32172c23cb7cSEd Maste warnx("Malformed .hash section"); 32182c23cb7cSEd Maste return; 32192c23cb7cSEd Maste } 32202c23cb7cSEd Maste bucket = &buf[2]; 32212c23cb7cSEd Maste chain = &buf[2 + nbucket]; 32222c23cb7cSEd Maste 32232c23cb7cSEd Maste maxl = 0; 32242c23cb7cSEd Maste if ((bl = calloc(nbucket, sizeof(*bl))) == NULL) 32252c23cb7cSEd Maste errx(EXIT_FAILURE, "calloc failed"); 32262c23cb7cSEd Maste for (i = 0; (uint32_t)i < nbucket; i++) 32272c23cb7cSEd Maste for (j = bucket[i]; j > 0 && (uint32_t)j < nchain; j = chain[j]) 32282c23cb7cSEd Maste if (++bl[i] > maxl) 32292c23cb7cSEd Maste maxl = bl[i]; 32302c23cb7cSEd Maste if ((c = calloc(maxl + 1, sizeof(*c))) == NULL) 32312c23cb7cSEd Maste errx(EXIT_FAILURE, "calloc failed"); 32322c23cb7cSEd Maste for (i = 0; (uint64_t)i < nbucket; i++) 32332c23cb7cSEd Maste c[bl[i]]++; 32342c23cb7cSEd Maste printf("Histogram for bucket list length (total of %ju buckets):\n", 32352c23cb7cSEd Maste (uintmax_t)nbucket); 32362c23cb7cSEd Maste printf(" Length\tNumber\t\t%% of total\tCoverage\n"); 32372c23cb7cSEd Maste total = 0; 32382c23cb7cSEd Maste for (i = 0; (uint64_t)i <= maxl; i++) { 32392c23cb7cSEd Maste total += c[i] * i; 32402c23cb7cSEd Maste printf("%7u\t%-10ju\t(%5.1f%%)\t%5.1f%%\n", i, (uintmax_t)c[i], 32412c23cb7cSEd Maste c[i] * 100.0 / nbucket, total * 100.0 / (nchain - 1)); 32422c23cb7cSEd Maste } 32432c23cb7cSEd Maste free(c); 32442c23cb7cSEd Maste free(bl); 32452c23cb7cSEd Maste } 32462c23cb7cSEd Maste 32472c23cb7cSEd Maste static void 32482c23cb7cSEd Maste dump_gnu_hash(struct readelf *re, struct section *s) 32492c23cb7cSEd Maste { 32502c23cb7cSEd Maste struct section *ds; 32512c23cb7cSEd Maste Elf_Data *d; 32522c23cb7cSEd Maste uint32_t *buf; 32532c23cb7cSEd Maste uint32_t *bucket, *chain; 3254cf781b2eSEd Maste uint32_t nbucket, nchain, symndx, maskwords; 32552c23cb7cSEd Maste uint32_t *bl, *c, maxl, total; 32562c23cb7cSEd Maste int elferr, dynsymcount, i, j; 32572c23cb7cSEd Maste 32582c23cb7cSEd Maste (void) elf_errno(); 32592c23cb7cSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 32602c23cb7cSEd Maste elferr = elf_errno(); 32612c23cb7cSEd Maste if (elferr != 0) 32622c23cb7cSEd Maste warnx("elf_getdata failed: %s", 32632c23cb7cSEd Maste elf_errmsg(elferr)); 32642c23cb7cSEd Maste return; 32652c23cb7cSEd Maste } 32662c23cb7cSEd Maste if (d->d_size < 4 * sizeof(uint32_t)) { 32672c23cb7cSEd Maste warnx(".gnu.hash section too small"); 32682c23cb7cSEd Maste return; 32692c23cb7cSEd Maste } 32702c23cb7cSEd Maste buf = d->d_buf; 32712c23cb7cSEd Maste nbucket = buf[0]; 32722c23cb7cSEd Maste symndx = buf[1]; 32732c23cb7cSEd Maste maskwords = buf[2]; 32742c23cb7cSEd Maste buf += 4; 3275656f49f8SEd Maste if (s->link >= re->shnum) 3276656f49f8SEd Maste return; 32772c23cb7cSEd Maste ds = &re->sl[s->link]; 327871edbbfdSEd Maste if (!get_ent_count(ds, &dynsymcount)) 327971edbbfdSEd Maste return; 3280b6b6f9ccSEd Maste if (symndx >= (uint32_t)dynsymcount) { 3281b6b6f9ccSEd Maste warnx("Malformed .gnu.hash section (symndx out of range)"); 3282b6b6f9ccSEd Maste return; 3283b6b6f9ccSEd Maste } 32842c23cb7cSEd Maste nchain = dynsymcount - symndx; 32852c23cb7cSEd Maste if (d->d_size != 4 * sizeof(uint32_t) + maskwords * 32862c23cb7cSEd Maste (re->ec == ELFCLASS32 ? sizeof(uint32_t) : sizeof(uint64_t)) + 32872c23cb7cSEd Maste (nbucket + nchain) * sizeof(uint32_t)) { 32882c23cb7cSEd Maste warnx("Malformed .gnu.hash section"); 32892c23cb7cSEd Maste return; 32902c23cb7cSEd Maste } 32912c23cb7cSEd Maste bucket = buf + (re->ec == ELFCLASS32 ? maskwords : maskwords * 2); 32922c23cb7cSEd Maste chain = bucket + nbucket; 32932c23cb7cSEd Maste 32942c23cb7cSEd Maste maxl = 0; 32952c23cb7cSEd Maste if ((bl = calloc(nbucket, sizeof(*bl))) == NULL) 32962c23cb7cSEd Maste errx(EXIT_FAILURE, "calloc failed"); 32972c23cb7cSEd Maste for (i = 0; (uint32_t)i < nbucket; i++) 32982c23cb7cSEd Maste for (j = bucket[i]; j > 0 && (uint32_t)j - symndx < nchain; 32992c23cb7cSEd Maste j++) { 33002c23cb7cSEd Maste if (++bl[i] > maxl) 33012c23cb7cSEd Maste maxl = bl[i]; 33022c23cb7cSEd Maste if (chain[j - symndx] & 1) 33032c23cb7cSEd Maste break; 33042c23cb7cSEd Maste } 33052c23cb7cSEd Maste if ((c = calloc(maxl + 1, sizeof(*c))) == NULL) 33062c23cb7cSEd Maste errx(EXIT_FAILURE, "calloc failed"); 33072c23cb7cSEd Maste for (i = 0; (uint32_t)i < nbucket; i++) 33082c23cb7cSEd Maste c[bl[i]]++; 33092c23cb7cSEd Maste printf("Histogram for bucket list length (total of %u buckets):\n", 33102c23cb7cSEd Maste nbucket); 33112c23cb7cSEd Maste printf(" Length\tNumber\t\t%% of total\tCoverage\n"); 33122c23cb7cSEd Maste total = 0; 33132c23cb7cSEd Maste for (i = 0; (uint32_t)i <= maxl; i++) { 33142c23cb7cSEd Maste total += c[i] * i; 33152c23cb7cSEd Maste printf("%7u\t%-10u\t(%5.1f%%)\t%5.1f%%\n", i, c[i], 33162c23cb7cSEd Maste c[i] * 100.0 / nbucket, total * 100.0 / (nchain - 1)); 33172c23cb7cSEd Maste } 33182c23cb7cSEd Maste free(c); 33192c23cb7cSEd Maste free(bl); 33202c23cb7cSEd Maste } 33212c23cb7cSEd Maste 33222c23cb7cSEd Maste static void 33232c23cb7cSEd Maste dump_hash(struct readelf *re) 33242c23cb7cSEd Maste { 33252c23cb7cSEd Maste struct section *s; 33262c23cb7cSEd Maste int i; 33272c23cb7cSEd Maste 33282c23cb7cSEd Maste for (i = 0; (size_t) i < re->shnum; i++) { 33292c23cb7cSEd Maste s = &re->sl[i]; 33302c23cb7cSEd Maste if (s->type == SHT_HASH || s->type == SHT_GNU_HASH) { 33312c23cb7cSEd Maste if (s->type == SHT_GNU_HASH) 33322c23cb7cSEd Maste dump_gnu_hash(re, s); 33332c23cb7cSEd Maste else if (re->ehdr.e_machine == EM_ALPHA && 33342c23cb7cSEd Maste s->entsize == 8) 33352c23cb7cSEd Maste dump_svr4_hash64(re, s); 33362c23cb7cSEd Maste else 33372c23cb7cSEd Maste dump_svr4_hash(s); 33382c23cb7cSEd Maste } 33392c23cb7cSEd Maste } 33402c23cb7cSEd Maste } 33412c23cb7cSEd Maste 33422c23cb7cSEd Maste static void 33432c23cb7cSEd Maste dump_notes(struct readelf *re) 33442c23cb7cSEd Maste { 33452c23cb7cSEd Maste struct section *s; 33462c23cb7cSEd Maste const char *rawfile; 33472c23cb7cSEd Maste GElf_Phdr phdr; 33482c23cb7cSEd Maste Elf_Data *d; 3349b6b6f9ccSEd Maste size_t filesize, phnum; 33502c23cb7cSEd Maste int i, elferr; 33512c23cb7cSEd Maste 33522c23cb7cSEd Maste if (re->ehdr.e_type == ET_CORE) { 33532c23cb7cSEd Maste /* 33542c23cb7cSEd Maste * Search program headers in the core file for 33552c23cb7cSEd Maste * PT_NOTE entry. 33562c23cb7cSEd Maste */ 33572c23cb7cSEd Maste if (elf_getphnum(re->elf, &phnum) == 0) { 33582c23cb7cSEd Maste warnx("elf_getphnum failed: %s", elf_errmsg(-1)); 33592c23cb7cSEd Maste return; 33602c23cb7cSEd Maste } 33612c23cb7cSEd Maste if (phnum == 0) 33622c23cb7cSEd Maste return; 3363b6b6f9ccSEd Maste if ((rawfile = elf_rawfile(re->elf, &filesize)) == NULL) { 33642c23cb7cSEd Maste warnx("elf_rawfile failed: %s", elf_errmsg(-1)); 33652c23cb7cSEd Maste return; 33662c23cb7cSEd Maste } 33672c23cb7cSEd Maste for (i = 0; (size_t) i < phnum; i++) { 33682c23cb7cSEd Maste if (gelf_getphdr(re->elf, i, &phdr) != &phdr) { 33692c23cb7cSEd Maste warnx("gelf_getphdr failed: %s", 33702c23cb7cSEd Maste elf_errmsg(-1)); 33712c23cb7cSEd Maste continue; 33722c23cb7cSEd Maste } 3373b6b6f9ccSEd Maste if (phdr.p_type == PT_NOTE) { 3374b6b6f9ccSEd Maste if (phdr.p_offset >= filesize || 3375b6b6f9ccSEd Maste phdr.p_filesz > filesize - phdr.p_offset) { 3376b6b6f9ccSEd Maste warnx("invalid PHDR offset"); 3377b6b6f9ccSEd Maste continue; 3378b6b6f9ccSEd Maste } 33792c23cb7cSEd Maste dump_notes_content(re, rawfile + phdr.p_offset, 33802c23cb7cSEd Maste phdr.p_filesz, phdr.p_offset); 33812c23cb7cSEd Maste } 3382b6b6f9ccSEd Maste } 33832c23cb7cSEd Maste 33842c23cb7cSEd Maste } else { 33852c23cb7cSEd Maste /* 33862c23cb7cSEd Maste * For objects other than core files, Search for 33872c23cb7cSEd Maste * SHT_NOTE sections. 33882c23cb7cSEd Maste */ 33892c23cb7cSEd Maste for (i = 0; (size_t) i < re->shnum; i++) { 33902c23cb7cSEd Maste s = &re->sl[i]; 33912c23cb7cSEd Maste if (s->type == SHT_NOTE) { 33922c23cb7cSEd Maste (void) elf_errno(); 33932c23cb7cSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 33942c23cb7cSEd Maste elferr = elf_errno(); 33952c23cb7cSEd Maste if (elferr != 0) 33962c23cb7cSEd Maste warnx("elf_getdata failed: %s", 33972c23cb7cSEd Maste elf_errmsg(elferr)); 33982c23cb7cSEd Maste continue; 33992c23cb7cSEd Maste } 34002c23cb7cSEd Maste dump_notes_content(re, d->d_buf, d->d_size, 34012c23cb7cSEd Maste s->off); 34022c23cb7cSEd Maste } 34032c23cb7cSEd Maste } 34042c23cb7cSEd Maste } 34052c23cb7cSEd Maste } 34062c23cb7cSEd Maste 34072c23cb7cSEd Maste static void 34082c23cb7cSEd Maste dump_notes_content(struct readelf *re, const char *buf, size_t sz, off_t off) 34092c23cb7cSEd Maste { 34102c23cb7cSEd Maste Elf_Note *note; 341102b08c90SEd Maste const char *end, *name; 34122c23cb7cSEd Maste 34132c23cb7cSEd Maste printf("\nNotes at offset %#010jx with length %#010jx:\n", 34142c23cb7cSEd Maste (uintmax_t) off, (uintmax_t) sz); 34152c23cb7cSEd Maste printf(" %-13s %-15s %s\n", "Owner", "Data size", "Description"); 34162c23cb7cSEd Maste end = buf + sz; 34172c23cb7cSEd Maste while (buf < end) { 341802b08c90SEd Maste if (buf + sizeof(*note) > end) { 341902b08c90SEd Maste warnx("invalid note header"); 342002b08c90SEd Maste return; 342102b08c90SEd Maste } 34222c23cb7cSEd Maste note = (Elf_Note *)(uintptr_t) buf; 342302b08c90SEd Maste name = (char *)(uintptr_t)(note + 1); 342402b08c90SEd Maste /* 342502b08c90SEd Maste * The name field is required to be nul-terminated, and 342602b08c90SEd Maste * n_namesz includes the terminating nul in observed 342702b08c90SEd Maste * implementations (contrary to the ELF-64 spec). A special 342802b08c90SEd Maste * case is needed for cores generated by some older Linux 342902b08c90SEd Maste * versions, which write a note named "CORE" without a nul 343002b08c90SEd Maste * terminator and n_namesz = 4. 343102b08c90SEd Maste */ 343202b08c90SEd Maste if (note->n_namesz == 0) 343302b08c90SEd Maste name = ""; 343402b08c90SEd Maste else if (note->n_namesz == 4 && strncmp(name, "CORE", 4) == 0) 343502b08c90SEd Maste name = "CORE"; 343602b08c90SEd Maste else if (strnlen(name, note->n_namesz) >= note->n_namesz) 343702b08c90SEd Maste name = "<invalid>"; 343802b08c90SEd Maste printf(" %-13s %#010jx", name, (uintmax_t) note->n_descsz); 343902b08c90SEd Maste printf(" %s\n", note_type(name, re->ehdr.e_type, 344002b08c90SEd Maste note->n_type)); 344134e3f146SEd Maste buf += sizeof(Elf_Note) + roundup2(note->n_namesz, 4) + 34422c23cb7cSEd Maste roundup2(note->n_descsz, 4); 34432c23cb7cSEd Maste } 34442c23cb7cSEd Maste } 34452c23cb7cSEd Maste 34462c23cb7cSEd Maste /* 34472c23cb7cSEd Maste * Symbol versioning sections are the same for 32bit and 64bit 34482c23cb7cSEd Maste * ELF objects. 34492c23cb7cSEd Maste */ 34502c23cb7cSEd Maste #define Elf_Verdef Elf32_Verdef 34512c23cb7cSEd Maste #define Elf_Verdaux Elf32_Verdaux 34522c23cb7cSEd Maste #define Elf_Verneed Elf32_Verneed 34532c23cb7cSEd Maste #define Elf_Vernaux Elf32_Vernaux 34542c23cb7cSEd Maste 34552c23cb7cSEd Maste #define SAVE_VERSION_NAME(x, n, t) \ 34562c23cb7cSEd Maste do { \ 34572c23cb7cSEd Maste while (x >= re->ver_sz) { \ 34582c23cb7cSEd Maste nv = realloc(re->ver, \ 34592c23cb7cSEd Maste sizeof(*re->ver) * re->ver_sz * 2); \ 34602c23cb7cSEd Maste if (nv == NULL) { \ 34612c23cb7cSEd Maste warn("realloc failed"); \ 34622c23cb7cSEd Maste free(re->ver); \ 34632c23cb7cSEd Maste return; \ 34642c23cb7cSEd Maste } \ 34652c23cb7cSEd Maste re->ver = nv; \ 34662c23cb7cSEd Maste for (i = re->ver_sz; i < re->ver_sz * 2; i++) { \ 34672c23cb7cSEd Maste re->ver[i].name = NULL; \ 34682c23cb7cSEd Maste re->ver[i].type = 0; \ 34692c23cb7cSEd Maste } \ 34702c23cb7cSEd Maste re->ver_sz *= 2; \ 34712c23cb7cSEd Maste } \ 34722c23cb7cSEd Maste if (x > 1) { \ 34732c23cb7cSEd Maste re->ver[x].name = n; \ 34742c23cb7cSEd Maste re->ver[x].type = t; \ 34752c23cb7cSEd Maste } \ 34762c23cb7cSEd Maste } while (0) 34772c23cb7cSEd Maste 34782c23cb7cSEd Maste 34792c23cb7cSEd Maste static void 34802c23cb7cSEd Maste dump_verdef(struct readelf *re, int dump) 34812c23cb7cSEd Maste { 34822c23cb7cSEd Maste struct section *s; 34832c23cb7cSEd Maste struct symver *nv; 34842c23cb7cSEd Maste Elf_Data *d; 34852c23cb7cSEd Maste Elf_Verdef *vd; 34862c23cb7cSEd Maste Elf_Verdaux *vda; 34872c23cb7cSEd Maste uint8_t *buf, *end, *buf2; 34882c23cb7cSEd Maste const char *name; 34892c23cb7cSEd Maste int elferr, i, j; 34902c23cb7cSEd Maste 34912c23cb7cSEd Maste if ((s = re->vd_s) == NULL) 34922c23cb7cSEd Maste return; 3493656f49f8SEd Maste if (s->link >= re->shnum) 3494656f49f8SEd Maste return; 34952c23cb7cSEd Maste 34962c23cb7cSEd Maste if (re->ver == NULL) { 34972c23cb7cSEd Maste re->ver_sz = 16; 34982c23cb7cSEd Maste if ((re->ver = calloc(re->ver_sz, sizeof(*re->ver))) == 34992c23cb7cSEd Maste NULL) { 35002c23cb7cSEd Maste warn("calloc failed"); 35012c23cb7cSEd Maste return; 35022c23cb7cSEd Maste } 35032c23cb7cSEd Maste re->ver[0].name = "*local*"; 35042c23cb7cSEd Maste re->ver[1].name = "*global*"; 35052c23cb7cSEd Maste } 35062c23cb7cSEd Maste 35072c23cb7cSEd Maste if (dump) 35082c23cb7cSEd Maste printf("\nVersion definition section (%s):\n", s->name); 35092c23cb7cSEd Maste (void) elf_errno(); 35102c23cb7cSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 35112c23cb7cSEd Maste elferr = elf_errno(); 35122c23cb7cSEd Maste if (elferr != 0) 35132c23cb7cSEd Maste warnx("elf_getdata failed: %s", elf_errmsg(elferr)); 35142c23cb7cSEd Maste return; 35152c23cb7cSEd Maste } 35162c23cb7cSEd Maste if (d->d_size == 0) 35172c23cb7cSEd Maste return; 35182c23cb7cSEd Maste 35192c23cb7cSEd Maste buf = d->d_buf; 35202c23cb7cSEd Maste end = buf + d->d_size; 35212c23cb7cSEd Maste while (buf + sizeof(Elf_Verdef) <= end) { 35222c23cb7cSEd Maste vd = (Elf_Verdef *) (uintptr_t) buf; 35232c23cb7cSEd Maste if (dump) { 35242c23cb7cSEd Maste printf(" 0x%4.4lx", (unsigned long) 35252c23cb7cSEd Maste (buf - (uint8_t *)d->d_buf)); 35262c23cb7cSEd Maste printf(" vd_version: %u vd_flags: %d" 35272c23cb7cSEd Maste " vd_ndx: %u vd_cnt: %u", vd->vd_version, 35282c23cb7cSEd Maste vd->vd_flags, vd->vd_ndx, vd->vd_cnt); 35292c23cb7cSEd Maste } 35302c23cb7cSEd Maste buf2 = buf + vd->vd_aux; 35312c23cb7cSEd Maste j = 0; 35322c23cb7cSEd Maste while (buf2 + sizeof(Elf_Verdaux) <= end && j < vd->vd_cnt) { 35332c23cb7cSEd Maste vda = (Elf_Verdaux *) (uintptr_t) buf2; 35342c23cb7cSEd Maste name = get_string(re, s->link, vda->vda_name); 35352c23cb7cSEd Maste if (j == 0) { 35362c23cb7cSEd Maste if (dump) 35372c23cb7cSEd Maste printf(" vda_name: %s\n", name); 35382c23cb7cSEd Maste SAVE_VERSION_NAME((int)vd->vd_ndx, name, 1); 35392c23cb7cSEd Maste } else if (dump) 35402c23cb7cSEd Maste printf(" 0x%4.4lx parent: %s\n", 35412c23cb7cSEd Maste (unsigned long) (buf2 - 35422c23cb7cSEd Maste (uint8_t *)d->d_buf), name); 35432c23cb7cSEd Maste if (vda->vda_next == 0) 35442c23cb7cSEd Maste break; 35452c23cb7cSEd Maste buf2 += vda->vda_next; 35462c23cb7cSEd Maste j++; 35472c23cb7cSEd Maste } 35482c23cb7cSEd Maste if (vd->vd_next == 0) 35492c23cb7cSEd Maste break; 35502c23cb7cSEd Maste buf += vd->vd_next; 35512c23cb7cSEd Maste } 35522c23cb7cSEd Maste } 35532c23cb7cSEd Maste 35542c23cb7cSEd Maste static void 35552c23cb7cSEd Maste dump_verneed(struct readelf *re, int dump) 35562c23cb7cSEd Maste { 35572c23cb7cSEd Maste struct section *s; 35582c23cb7cSEd Maste struct symver *nv; 35592c23cb7cSEd Maste Elf_Data *d; 35602c23cb7cSEd Maste Elf_Verneed *vn; 35612c23cb7cSEd Maste Elf_Vernaux *vna; 35622c23cb7cSEd Maste uint8_t *buf, *end, *buf2; 35632c23cb7cSEd Maste const char *name; 35642c23cb7cSEd Maste int elferr, i, j; 35652c23cb7cSEd Maste 35662c23cb7cSEd Maste if ((s = re->vn_s) == NULL) 35672c23cb7cSEd Maste return; 3568656f49f8SEd Maste if (s->link >= re->shnum) 3569656f49f8SEd Maste return; 35702c23cb7cSEd Maste 35712c23cb7cSEd Maste if (re->ver == NULL) { 35722c23cb7cSEd Maste re->ver_sz = 16; 35732c23cb7cSEd Maste if ((re->ver = calloc(re->ver_sz, sizeof(*re->ver))) == 35742c23cb7cSEd Maste NULL) { 35752c23cb7cSEd Maste warn("calloc failed"); 35762c23cb7cSEd Maste return; 35772c23cb7cSEd Maste } 35782c23cb7cSEd Maste re->ver[0].name = "*local*"; 35792c23cb7cSEd Maste re->ver[1].name = "*global*"; 35802c23cb7cSEd Maste } 35812c23cb7cSEd Maste 35822c23cb7cSEd Maste if (dump) 35832c23cb7cSEd Maste printf("\nVersion needed section (%s):\n", s->name); 35842c23cb7cSEd Maste (void) elf_errno(); 35852c23cb7cSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 35862c23cb7cSEd Maste elferr = elf_errno(); 35872c23cb7cSEd Maste if (elferr != 0) 35882c23cb7cSEd Maste warnx("elf_getdata failed: %s", elf_errmsg(elferr)); 35892c23cb7cSEd Maste return; 35902c23cb7cSEd Maste } 35912c23cb7cSEd Maste if (d->d_size == 0) 35922c23cb7cSEd Maste return; 35932c23cb7cSEd Maste 35942c23cb7cSEd Maste buf = d->d_buf; 35952c23cb7cSEd Maste end = buf + d->d_size; 35962c23cb7cSEd Maste while (buf + sizeof(Elf_Verneed) <= end) { 35972c23cb7cSEd Maste vn = (Elf_Verneed *) (uintptr_t) buf; 35982c23cb7cSEd Maste if (dump) { 35992c23cb7cSEd Maste printf(" 0x%4.4lx", (unsigned long) 36002c23cb7cSEd Maste (buf - (uint8_t *)d->d_buf)); 36012c23cb7cSEd Maste printf(" vn_version: %u vn_file: %s vn_cnt: %u\n", 36022c23cb7cSEd Maste vn->vn_version, 36032c23cb7cSEd Maste get_string(re, s->link, vn->vn_file), 36042c23cb7cSEd Maste vn->vn_cnt); 36052c23cb7cSEd Maste } 36062c23cb7cSEd Maste buf2 = buf + vn->vn_aux; 36072c23cb7cSEd Maste j = 0; 36082c23cb7cSEd Maste while (buf2 + sizeof(Elf_Vernaux) <= end && j < vn->vn_cnt) { 36092c23cb7cSEd Maste vna = (Elf32_Vernaux *) (uintptr_t) buf2; 36102c23cb7cSEd Maste if (dump) 36112c23cb7cSEd Maste printf(" 0x%4.4lx", (unsigned long) 36122c23cb7cSEd Maste (buf2 - (uint8_t *)d->d_buf)); 36132c23cb7cSEd Maste name = get_string(re, s->link, vna->vna_name); 36142c23cb7cSEd Maste if (dump) 36152c23cb7cSEd Maste printf(" vna_name: %s vna_flags: %u" 36162c23cb7cSEd Maste " vna_other: %u\n", name, 36172c23cb7cSEd Maste vna->vna_flags, vna->vna_other); 36182c23cb7cSEd Maste SAVE_VERSION_NAME((int)vna->vna_other, name, 0); 36192c23cb7cSEd Maste if (vna->vna_next == 0) 36202c23cb7cSEd Maste break; 36212c23cb7cSEd Maste buf2 += vna->vna_next; 36222c23cb7cSEd Maste j++; 36232c23cb7cSEd Maste } 36242c23cb7cSEd Maste if (vn->vn_next == 0) 36252c23cb7cSEd Maste break; 36262c23cb7cSEd Maste buf += vn->vn_next; 36272c23cb7cSEd Maste } 36282c23cb7cSEd Maste } 36292c23cb7cSEd Maste 36302c23cb7cSEd Maste static void 36312c23cb7cSEd Maste dump_versym(struct readelf *re) 36322c23cb7cSEd Maste { 36332c23cb7cSEd Maste int i; 3634656f49f8SEd Maste uint16_t vs; 36352c23cb7cSEd Maste 36362c23cb7cSEd Maste if (re->vs_s == NULL || re->ver == NULL || re->vs == NULL) 36372c23cb7cSEd Maste return; 36382c23cb7cSEd Maste printf("\nVersion symbol section (%s):\n", re->vs_s->name); 36392c23cb7cSEd Maste for (i = 0; i < re->vs_sz; i++) { 36402c23cb7cSEd Maste if ((i & 3) == 0) { 36412c23cb7cSEd Maste if (i > 0) 36422c23cb7cSEd Maste putchar('\n'); 36432c23cb7cSEd Maste printf(" %03x:", i); 36442c23cb7cSEd Maste } 3645656f49f8SEd Maste vs = re->vs[i] & VERSYM_VERSION; 3646656f49f8SEd Maste if (vs >= re->ver_sz || re->ver[vs].name == NULL) { 3647656f49f8SEd Maste warnx("invalid versym version index %u", re->vs[i]); 3648656f49f8SEd Maste break; 3649656f49f8SEd Maste } 3650656f49f8SEd Maste if (re->vs[i] & VERSYM_HIDDEN) 3651656f49f8SEd Maste printf(" %3xh %-12s ", vs, 3652656f49f8SEd Maste re->ver[re->vs[i] & VERSYM_VERSION].name); 36532c23cb7cSEd Maste else 3654656f49f8SEd Maste printf(" %3x %-12s ", vs, re->ver[re->vs[i]].name); 36552c23cb7cSEd Maste } 36562c23cb7cSEd Maste putchar('\n'); 36572c23cb7cSEd Maste } 36582c23cb7cSEd Maste 36592c23cb7cSEd Maste static void 36602c23cb7cSEd Maste dump_ver(struct readelf *re) 36612c23cb7cSEd Maste { 36622c23cb7cSEd Maste 36632c23cb7cSEd Maste if (re->vs_s && re->ver && re->vs) 36642c23cb7cSEd Maste dump_versym(re); 36652c23cb7cSEd Maste if (re->vd_s) 36662c23cb7cSEd Maste dump_verdef(re, 1); 36672c23cb7cSEd Maste if (re->vn_s) 36682c23cb7cSEd Maste dump_verneed(re, 1); 36692c23cb7cSEd Maste } 36702c23cb7cSEd Maste 36712c23cb7cSEd Maste static void 36722c23cb7cSEd Maste search_ver(struct readelf *re) 36732c23cb7cSEd Maste { 36742c23cb7cSEd Maste struct section *s; 36752c23cb7cSEd Maste Elf_Data *d; 36762c23cb7cSEd Maste int elferr, i; 36772c23cb7cSEd Maste 36782c23cb7cSEd Maste for (i = 0; (size_t) i < re->shnum; i++) { 36792c23cb7cSEd Maste s = &re->sl[i]; 36802c23cb7cSEd Maste if (s->type == SHT_SUNW_versym) 36812c23cb7cSEd Maste re->vs_s = s; 36822c23cb7cSEd Maste if (s->type == SHT_SUNW_verneed) 36832c23cb7cSEd Maste re->vn_s = s; 36842c23cb7cSEd Maste if (s->type == SHT_SUNW_verdef) 36852c23cb7cSEd Maste re->vd_s = s; 36862c23cb7cSEd Maste } 36872c23cb7cSEd Maste if (re->vd_s) 36882c23cb7cSEd Maste dump_verdef(re, 0); 36892c23cb7cSEd Maste if (re->vn_s) 36902c23cb7cSEd Maste dump_verneed(re, 0); 36912c23cb7cSEd Maste if (re->vs_s && re->ver != NULL) { 36922c23cb7cSEd Maste (void) elf_errno(); 36932c23cb7cSEd Maste if ((d = elf_getdata(re->vs_s->scn, NULL)) == NULL) { 36942c23cb7cSEd Maste elferr = elf_errno(); 36952c23cb7cSEd Maste if (elferr != 0) 36962c23cb7cSEd Maste warnx("elf_getdata failed: %s", 36972c23cb7cSEd Maste elf_errmsg(elferr)); 36982c23cb7cSEd Maste return; 36992c23cb7cSEd Maste } 37002c23cb7cSEd Maste if (d->d_size == 0) 37012c23cb7cSEd Maste return; 37022c23cb7cSEd Maste re->vs = d->d_buf; 37032c23cb7cSEd Maste re->vs_sz = d->d_size / sizeof(Elf32_Half); 37042c23cb7cSEd Maste } 37052c23cb7cSEd Maste } 37062c23cb7cSEd Maste 37072c23cb7cSEd Maste #undef Elf_Verdef 37082c23cb7cSEd Maste #undef Elf_Verdaux 37092c23cb7cSEd Maste #undef Elf_Verneed 37102c23cb7cSEd Maste #undef Elf_Vernaux 37112c23cb7cSEd Maste #undef SAVE_VERSION_NAME 37122c23cb7cSEd Maste 37132c23cb7cSEd Maste /* 37142c23cb7cSEd Maste * Elf32_Lib and Elf64_Lib are identical. 37152c23cb7cSEd Maste */ 37162c23cb7cSEd Maste #define Elf_Lib Elf32_Lib 37172c23cb7cSEd Maste 37182c23cb7cSEd Maste static void 37192c23cb7cSEd Maste dump_liblist(struct readelf *re) 37202c23cb7cSEd Maste { 37212c23cb7cSEd Maste struct section *s; 37222c23cb7cSEd Maste struct tm *t; 37232c23cb7cSEd Maste time_t ti; 37242c23cb7cSEd Maste char tbuf[20]; 37252c23cb7cSEd Maste Elf_Data *d; 37262c23cb7cSEd Maste Elf_Lib *lib; 372771edbbfdSEd Maste int i, j, k, elferr, first, len; 37282c23cb7cSEd Maste 37292c23cb7cSEd Maste for (i = 0; (size_t) i < re->shnum; i++) { 37302c23cb7cSEd Maste s = &re->sl[i]; 37312c23cb7cSEd Maste if (s->type != SHT_GNU_LIBLIST) 37322c23cb7cSEd Maste continue; 3733656f49f8SEd Maste if (s->link >= re->shnum) 3734656f49f8SEd Maste continue; 37352c23cb7cSEd Maste (void) elf_errno(); 37362c23cb7cSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 37372c23cb7cSEd Maste elferr = elf_errno(); 37382c23cb7cSEd Maste if (elferr != 0) 37392c23cb7cSEd Maste warnx("elf_getdata failed: %s", 37402c23cb7cSEd Maste elf_errmsg(elferr)); 37412c23cb7cSEd Maste continue; 37422c23cb7cSEd Maste } 37432c23cb7cSEd Maste if (d->d_size <= 0) 37442c23cb7cSEd Maste continue; 37452c23cb7cSEd Maste lib = d->d_buf; 374671edbbfdSEd Maste if (!get_ent_count(s, &len)) 374771edbbfdSEd Maste continue; 37482c23cb7cSEd Maste printf("\nLibrary list section '%s' ", s->name); 374971edbbfdSEd Maste printf("contains %d entries:\n", len); 37502c23cb7cSEd Maste printf("%12s%24s%18s%10s%6s\n", "Library", "Time Stamp", 37512c23cb7cSEd Maste "Checksum", "Version", "Flags"); 37522c23cb7cSEd Maste for (j = 0; (uint64_t) j < s->sz / s->entsize; j++) { 37532c23cb7cSEd Maste printf("%3d: ", j); 37542c23cb7cSEd Maste printf("%-20.20s ", 37552c23cb7cSEd Maste get_string(re, s->link, lib->l_name)); 37562c23cb7cSEd Maste ti = lib->l_time_stamp; 37572c23cb7cSEd Maste t = gmtime(&ti); 37582c23cb7cSEd Maste snprintf(tbuf, sizeof(tbuf), "%04d-%02d-%02dT%02d:%02d" 37592c23cb7cSEd Maste ":%2d", t->tm_year + 1900, t->tm_mon + 1, 37602c23cb7cSEd Maste t->tm_mday, t->tm_hour, t->tm_min, t->tm_sec); 37612c23cb7cSEd Maste printf("%-19.19s ", tbuf); 37622c23cb7cSEd Maste printf("0x%08x ", lib->l_checksum); 37632c23cb7cSEd Maste printf("%-7d %#x", lib->l_version, lib->l_flags); 37642c23cb7cSEd Maste if (lib->l_flags != 0) { 37652c23cb7cSEd Maste first = 1; 37662c23cb7cSEd Maste putchar('('); 37672c23cb7cSEd Maste for (k = 0; l_flag[k].name != NULL; k++) { 37682c23cb7cSEd Maste if ((l_flag[k].value & lib->l_flags) == 37692c23cb7cSEd Maste 0) 37702c23cb7cSEd Maste continue; 37712c23cb7cSEd Maste if (!first) 37722c23cb7cSEd Maste putchar(','); 37732c23cb7cSEd Maste else 37742c23cb7cSEd Maste first = 0; 37752c23cb7cSEd Maste printf("%s", l_flag[k].name); 37762c23cb7cSEd Maste } 37772c23cb7cSEd Maste putchar(')'); 37782c23cb7cSEd Maste } 37792c23cb7cSEd Maste putchar('\n'); 37802c23cb7cSEd Maste lib++; 37812c23cb7cSEd Maste } 37822c23cb7cSEd Maste } 37832c23cb7cSEd Maste } 37842c23cb7cSEd Maste 37852c23cb7cSEd Maste #undef Elf_Lib 37862c23cb7cSEd Maste 37873ef90571SEd Maste static void 37883ef90571SEd Maste dump_section_groups(struct readelf *re) 37893ef90571SEd Maste { 37903ef90571SEd Maste struct section *s; 37913ef90571SEd Maste const char *symname; 37923ef90571SEd Maste Elf_Data *d; 37933ef90571SEd Maste uint32_t *w; 37943ef90571SEd Maste int i, j, elferr; 37953ef90571SEd Maste size_t n; 37963ef90571SEd Maste 37973ef90571SEd Maste for (i = 0; (size_t) i < re->shnum; i++) { 37983ef90571SEd Maste s = &re->sl[i]; 37993ef90571SEd Maste if (s->type != SHT_GROUP) 38003ef90571SEd Maste continue; 3801656f49f8SEd Maste if (s->link >= re->shnum) 3802656f49f8SEd Maste continue; 38033ef90571SEd Maste (void) elf_errno(); 38043ef90571SEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 38053ef90571SEd Maste elferr = elf_errno(); 38063ef90571SEd Maste if (elferr != 0) 38073ef90571SEd Maste warnx("elf_getdata failed: %s", 38083ef90571SEd Maste elf_errmsg(elferr)); 38093ef90571SEd Maste continue; 38103ef90571SEd Maste } 38113ef90571SEd Maste if (d->d_size <= 0) 38123ef90571SEd Maste continue; 38133ef90571SEd Maste 38143ef90571SEd Maste w = d->d_buf; 38153ef90571SEd Maste 38163ef90571SEd Maste /* We only support COMDAT section. */ 38173ef90571SEd Maste #ifndef GRP_COMDAT 38183ef90571SEd Maste #define GRP_COMDAT 0x1 38193ef90571SEd Maste #endif 38203ef90571SEd Maste if ((*w++ & GRP_COMDAT) == 0) 38213ef90571SEd Maste return; 38223ef90571SEd Maste 38233ef90571SEd Maste if (s->entsize == 0) 38243ef90571SEd Maste s->entsize = 4; 38253ef90571SEd Maste 38263ef90571SEd Maste symname = get_symbol_name(re, s->link, s->info); 38273ef90571SEd Maste n = s->sz / s->entsize; 38283ef90571SEd Maste if (n-- < 1) 38293ef90571SEd Maste return; 38303ef90571SEd Maste 38313ef90571SEd Maste printf("\nCOMDAT group section [%5d] `%s' [%s] contains %ju" 38323ef90571SEd Maste " sections:\n", i, s->name, symname, (uintmax_t)n); 38333ef90571SEd Maste printf(" %-10.10s %s\n", "[Index]", "Name"); 38343ef90571SEd Maste for (j = 0; (size_t) j < n; j++, w++) { 38353ef90571SEd Maste if (*w >= re->shnum) { 38363ef90571SEd Maste warnx("invalid section index: %u", *w); 38373ef90571SEd Maste continue; 38383ef90571SEd Maste } 38393ef90571SEd Maste printf(" [%5u] %s\n", *w, re->sl[*w].name); 38403ef90571SEd Maste } 38413ef90571SEd Maste } 38423ef90571SEd Maste } 38433ef90571SEd Maste 38442c23cb7cSEd Maste static uint8_t * 384595fd7f26SEd Maste dump_unknown_tag(uint64_t tag, uint8_t *p, uint8_t *pe) 38462c23cb7cSEd Maste { 38472c23cb7cSEd Maste uint64_t val; 38482c23cb7cSEd Maste 38492c23cb7cSEd Maste /* 38502c23cb7cSEd Maste * According to ARM EABI: For tags > 32, even numbered tags have 38512c23cb7cSEd Maste * a ULEB128 param and odd numbered ones have NUL-terminated 38522c23cb7cSEd Maste * string param. This rule probably also applies for tags <= 32 38532c23cb7cSEd Maste * if the object arch is not ARM. 38542c23cb7cSEd Maste */ 38552c23cb7cSEd Maste 38562c23cb7cSEd Maste printf(" Tag_unknown_%ju: ", (uintmax_t) tag); 38572c23cb7cSEd Maste 38582c23cb7cSEd Maste if (tag & 1) { 38592c23cb7cSEd Maste printf("%s\n", (char *) p); 38602c23cb7cSEd Maste p += strlen((char *) p) + 1; 38612c23cb7cSEd Maste } else { 386295fd7f26SEd Maste val = _decode_uleb128(&p, pe); 38632c23cb7cSEd Maste printf("%ju\n", (uintmax_t) val); 38642c23cb7cSEd Maste } 38652c23cb7cSEd Maste 38662c23cb7cSEd Maste return (p); 38672c23cb7cSEd Maste } 38682c23cb7cSEd Maste 38692c23cb7cSEd Maste static uint8_t * 387095fd7f26SEd Maste dump_compatibility_tag(uint8_t *p, uint8_t *pe) 38712c23cb7cSEd Maste { 38722c23cb7cSEd Maste uint64_t val; 38732c23cb7cSEd Maste 387495fd7f26SEd Maste val = _decode_uleb128(&p, pe); 3875839529caSEd Maste printf("flag = %ju, vendor = %s\n", (uintmax_t) val, p); 38762c23cb7cSEd Maste p += strlen((char *) p) + 1; 38772c23cb7cSEd Maste 38782c23cb7cSEd Maste return (p); 38792c23cb7cSEd Maste } 38802c23cb7cSEd Maste 38812c23cb7cSEd Maste static void 38822c23cb7cSEd Maste dump_arm_attributes(struct readelf *re, uint8_t *p, uint8_t *pe) 38832c23cb7cSEd Maste { 38842c23cb7cSEd Maste uint64_t tag, val; 38852c23cb7cSEd Maste size_t i; 38862c23cb7cSEd Maste int found, desc; 38872c23cb7cSEd Maste 38882c23cb7cSEd Maste (void) re; 38892c23cb7cSEd Maste 38902c23cb7cSEd Maste while (p < pe) { 389195fd7f26SEd Maste tag = _decode_uleb128(&p, pe); 38922c23cb7cSEd Maste found = desc = 0; 38932c23cb7cSEd Maste for (i = 0; i < sizeof(aeabi_tags) / sizeof(aeabi_tags[0]); 38942c23cb7cSEd Maste i++) { 38952c23cb7cSEd Maste if (tag == aeabi_tags[i].tag) { 38962c23cb7cSEd Maste found = 1; 38972c23cb7cSEd Maste printf(" %s: ", aeabi_tags[i].s_tag); 38982c23cb7cSEd Maste if (aeabi_tags[i].get_desc) { 38992c23cb7cSEd Maste desc = 1; 390095fd7f26SEd Maste val = _decode_uleb128(&p, pe); 39012c23cb7cSEd Maste printf("%s\n", 39022c23cb7cSEd Maste aeabi_tags[i].get_desc(val)); 39032c23cb7cSEd Maste } 39042c23cb7cSEd Maste break; 39052c23cb7cSEd Maste } 39062c23cb7cSEd Maste if (tag < aeabi_tags[i].tag) 39072c23cb7cSEd Maste break; 39082c23cb7cSEd Maste } 39092c23cb7cSEd Maste if (!found) { 391095fd7f26SEd Maste p = dump_unknown_tag(tag, p, pe); 39112c23cb7cSEd Maste continue; 39122c23cb7cSEd Maste } 39132c23cb7cSEd Maste if (desc) 39142c23cb7cSEd Maste continue; 39152c23cb7cSEd Maste 39162c23cb7cSEd Maste switch (tag) { 39172c23cb7cSEd Maste case 4: /* Tag_CPU_raw_name */ 39182c23cb7cSEd Maste case 5: /* Tag_CPU_name */ 39192c23cb7cSEd Maste case 67: /* Tag_conformance */ 39202c23cb7cSEd Maste printf("%s\n", (char *) p); 39212c23cb7cSEd Maste p += strlen((char *) p) + 1; 39222c23cb7cSEd Maste break; 39232c23cb7cSEd Maste case 32: /* Tag_compatibility */ 392495fd7f26SEd Maste p = dump_compatibility_tag(p, pe); 39252c23cb7cSEd Maste break; 39262c23cb7cSEd Maste case 64: /* Tag_nodefaults */ 39272c23cb7cSEd Maste /* ignored, written as 0. */ 392895fd7f26SEd Maste (void) _decode_uleb128(&p, pe); 39292c23cb7cSEd Maste printf("True\n"); 39302c23cb7cSEd Maste break; 39312c23cb7cSEd Maste case 65: /* Tag_also_compatible_with */ 393295fd7f26SEd Maste val = _decode_uleb128(&p, pe); 39332c23cb7cSEd Maste /* Must be Tag_CPU_arch */ 39342c23cb7cSEd Maste if (val != 6) { 39352c23cb7cSEd Maste printf("unknown\n"); 39362c23cb7cSEd Maste break; 39372c23cb7cSEd Maste } 393895fd7f26SEd Maste val = _decode_uleb128(&p, pe); 39392c23cb7cSEd Maste printf("%s\n", aeabi_cpu_arch(val)); 39402c23cb7cSEd Maste /* Skip NUL terminator. */ 39412c23cb7cSEd Maste p++; 39422c23cb7cSEd Maste break; 39432c23cb7cSEd Maste default: 39442c23cb7cSEd Maste putchar('\n'); 39452c23cb7cSEd Maste break; 39462c23cb7cSEd Maste } 39472c23cb7cSEd Maste } 39482c23cb7cSEd Maste } 39492c23cb7cSEd Maste 39502c23cb7cSEd Maste #ifndef Tag_GNU_MIPS_ABI_FP 39512c23cb7cSEd Maste #define Tag_GNU_MIPS_ABI_FP 4 39522c23cb7cSEd Maste #endif 39532c23cb7cSEd Maste 39542c23cb7cSEd Maste static void 39552c23cb7cSEd Maste dump_mips_attributes(struct readelf *re, uint8_t *p, uint8_t *pe) 39562c23cb7cSEd Maste { 39572c23cb7cSEd Maste uint64_t tag, val; 39582c23cb7cSEd Maste 39592c23cb7cSEd Maste (void) re; 39602c23cb7cSEd Maste 39612c23cb7cSEd Maste while (p < pe) { 396295fd7f26SEd Maste tag = _decode_uleb128(&p, pe); 39632c23cb7cSEd Maste switch (tag) { 39642c23cb7cSEd Maste case Tag_GNU_MIPS_ABI_FP: 396595fd7f26SEd Maste val = _decode_uleb128(&p, pe); 39662c23cb7cSEd Maste printf(" Tag_GNU_MIPS_ABI_FP: %s\n", mips_abi_fp(val)); 39672c23cb7cSEd Maste break; 39682c23cb7cSEd Maste case 32: /* Tag_compatibility */ 396995fd7f26SEd Maste p = dump_compatibility_tag(p, pe); 39702c23cb7cSEd Maste break; 39712c23cb7cSEd Maste default: 397295fd7f26SEd Maste p = dump_unknown_tag(tag, p, pe); 39732c23cb7cSEd Maste break; 39742c23cb7cSEd Maste } 39752c23cb7cSEd Maste } 39762c23cb7cSEd Maste } 39772c23cb7cSEd Maste 39782c23cb7cSEd Maste #ifndef Tag_GNU_Power_ABI_FP 39792c23cb7cSEd Maste #define Tag_GNU_Power_ABI_FP 4 39802c23cb7cSEd Maste #endif 39812c23cb7cSEd Maste 39822c23cb7cSEd Maste #ifndef Tag_GNU_Power_ABI_Vector 39832c23cb7cSEd Maste #define Tag_GNU_Power_ABI_Vector 8 39842c23cb7cSEd Maste #endif 39852c23cb7cSEd Maste 39862c23cb7cSEd Maste static void 39872c23cb7cSEd Maste dump_ppc_attributes(uint8_t *p, uint8_t *pe) 39882c23cb7cSEd Maste { 39892c23cb7cSEd Maste uint64_t tag, val; 39902c23cb7cSEd Maste 39912c23cb7cSEd Maste while (p < pe) { 399295fd7f26SEd Maste tag = _decode_uleb128(&p, pe); 39932c23cb7cSEd Maste switch (tag) { 39942c23cb7cSEd Maste case Tag_GNU_Power_ABI_FP: 399595fd7f26SEd Maste val = _decode_uleb128(&p, pe); 39962c23cb7cSEd Maste printf(" Tag_GNU_Power_ABI_FP: %s\n", ppc_abi_fp(val)); 39972c23cb7cSEd Maste break; 39982c23cb7cSEd Maste case Tag_GNU_Power_ABI_Vector: 399995fd7f26SEd Maste val = _decode_uleb128(&p, pe); 40002c23cb7cSEd Maste printf(" Tag_GNU_Power_ABI_Vector: %s\n", 40012c23cb7cSEd Maste ppc_abi_vector(val)); 40022c23cb7cSEd Maste break; 40032c23cb7cSEd Maste case 32: /* Tag_compatibility */ 400495fd7f26SEd Maste p = dump_compatibility_tag(p, pe); 40052c23cb7cSEd Maste break; 40062c23cb7cSEd Maste default: 400795fd7f26SEd Maste p = dump_unknown_tag(tag, p, pe); 40082c23cb7cSEd Maste break; 40092c23cb7cSEd Maste } 40102c23cb7cSEd Maste } 40112c23cb7cSEd Maste } 40122c23cb7cSEd Maste 40132c23cb7cSEd Maste static void 40142c23cb7cSEd Maste dump_attributes(struct readelf *re) 40152c23cb7cSEd Maste { 40162c23cb7cSEd Maste struct section *s; 40172c23cb7cSEd Maste Elf_Data *d; 401895fd7f26SEd Maste uint8_t *p, *pe, *sp; 40192c23cb7cSEd Maste size_t len, seclen, nlen, sublen; 40202c23cb7cSEd Maste uint64_t val; 40212c23cb7cSEd Maste int tag, i, elferr; 40222c23cb7cSEd Maste 40232c23cb7cSEd Maste for (i = 0; (size_t) i < re->shnum; i++) { 40242c23cb7cSEd Maste s = &re->sl[i]; 40252c23cb7cSEd Maste if (s->type != SHT_GNU_ATTRIBUTES && 40262c23cb7cSEd Maste (re->ehdr.e_machine != EM_ARM || s->type != SHT_LOPROC + 3)) 40272c23cb7cSEd Maste continue; 40282c23cb7cSEd Maste (void) elf_errno(); 40292c23cb7cSEd Maste if ((d = elf_rawdata(s->scn, NULL)) == NULL) { 40302c23cb7cSEd Maste elferr = elf_errno(); 40312c23cb7cSEd Maste if (elferr != 0) 40322c23cb7cSEd Maste warnx("elf_rawdata failed: %s", 40332c23cb7cSEd Maste elf_errmsg(elferr)); 40342c23cb7cSEd Maste continue; 40352c23cb7cSEd Maste } 40362c23cb7cSEd Maste if (d->d_size <= 0) 40372c23cb7cSEd Maste continue; 40382c23cb7cSEd Maste p = d->d_buf; 403995fd7f26SEd Maste pe = p + d->d_size; 40402c23cb7cSEd Maste if (*p != 'A') { 40412c23cb7cSEd Maste printf("Unknown Attribute Section Format: %c\n", 40422c23cb7cSEd Maste (char) *p); 40432c23cb7cSEd Maste continue; 40442c23cb7cSEd Maste } 40452c23cb7cSEd Maste len = d->d_size - 1; 40462c23cb7cSEd Maste p++; 40472c23cb7cSEd Maste while (len > 0) { 404871a0c925SEd Maste if (len < 4) { 404971a0c925SEd Maste warnx("truncated attribute section length"); 405095fd7f26SEd Maste return; 405171a0c925SEd Maste } 40522c23cb7cSEd Maste seclen = re->dw_decode(&p, 4); 40532c23cb7cSEd Maste if (seclen > len) { 40542c23cb7cSEd Maste warnx("invalid attribute section length"); 405595fd7f26SEd Maste return; 40562c23cb7cSEd Maste } 40572c23cb7cSEd Maste len -= seclen; 40582c23cb7cSEd Maste nlen = strlen((char *) p) + 1; 405971a0c925SEd Maste if (nlen + 4 > seclen) { 406071a0c925SEd Maste warnx("invalid attribute section name"); 406195fd7f26SEd Maste return; 406271a0c925SEd Maste } 406371a0c925SEd Maste printf("Attribute Section: %s\n", (char *) p); 40642c23cb7cSEd Maste p += nlen; 40652c23cb7cSEd Maste seclen -= nlen + 4; 40662c23cb7cSEd Maste while (seclen > 0) { 40672c23cb7cSEd Maste sp = p; 40682c23cb7cSEd Maste tag = *p++; 40692c23cb7cSEd Maste sublen = re->dw_decode(&p, 4); 40702c23cb7cSEd Maste if (sublen > seclen) { 40712c23cb7cSEd Maste warnx("invalid attribute sub-section" 40722c23cb7cSEd Maste " length"); 407395fd7f26SEd Maste return; 40742c23cb7cSEd Maste } 40752c23cb7cSEd Maste seclen -= sublen; 40762c23cb7cSEd Maste printf("%s", top_tag(tag)); 40772c23cb7cSEd Maste if (tag == 2 || tag == 3) { 40782c23cb7cSEd Maste putchar(':'); 40792c23cb7cSEd Maste for (;;) { 408095fd7f26SEd Maste val = _decode_uleb128(&p, pe); 40812c23cb7cSEd Maste if (val == 0) 40822c23cb7cSEd Maste break; 40832c23cb7cSEd Maste printf(" %ju", (uintmax_t) val); 40842c23cb7cSEd Maste } 40852c23cb7cSEd Maste } 40862c23cb7cSEd Maste putchar('\n'); 40872c23cb7cSEd Maste if (re->ehdr.e_machine == EM_ARM && 40882c23cb7cSEd Maste s->type == SHT_LOPROC + 3) 40892c23cb7cSEd Maste dump_arm_attributes(re, p, sp + sublen); 40902c23cb7cSEd Maste else if (re->ehdr.e_machine == EM_MIPS || 40912c23cb7cSEd Maste re->ehdr.e_machine == EM_MIPS_RS3_LE) 40922c23cb7cSEd Maste dump_mips_attributes(re, p, 40932c23cb7cSEd Maste sp + sublen); 40942c23cb7cSEd Maste else if (re->ehdr.e_machine == EM_PPC) 40952c23cb7cSEd Maste dump_ppc_attributes(p, sp + sublen); 40962c23cb7cSEd Maste p = sp + sublen; 40972c23cb7cSEd Maste } 40982c23cb7cSEd Maste } 40992c23cb7cSEd Maste } 41002c23cb7cSEd Maste } 41012c23cb7cSEd Maste 41022c23cb7cSEd Maste static void 41032c23cb7cSEd Maste dump_mips_specific_info(struct readelf *re) 41042c23cb7cSEd Maste { 41052c23cb7cSEd Maste struct section *s; 4106bee2765cSEd Maste int i; 41072c23cb7cSEd Maste 41082c23cb7cSEd Maste s = NULL; 41092c23cb7cSEd Maste for (i = 0; (size_t) i < re->shnum; i++) { 41102c23cb7cSEd Maste s = &re->sl[i]; 41112c23cb7cSEd Maste if (s->name != NULL && (!strcmp(s->name, ".MIPS.options") || 41122c23cb7cSEd Maste (s->type == SHT_MIPS_OPTIONS))) { 41132c23cb7cSEd Maste dump_mips_options(re, s); 41142c23cb7cSEd Maste } 41152c23cb7cSEd Maste } 41162c23cb7cSEd Maste 4117e9f3f88aSEd Maste if (s->name != NULL && (!strcmp(s->name, ".MIPS.abiflags") || 4118e9f3f88aSEd Maste (s->type == SHT_MIPS_ABIFLAGS))) 4119e9f3f88aSEd Maste dump_mips_abiflags(re, s); 4120e9f3f88aSEd Maste 41212c23cb7cSEd Maste /* 4122bee2765cSEd Maste * Dump .reginfo if present (although it will be ignored by an OS if a 4123bee2765cSEd Maste * .MIPS.options section is present, according to SGI mips64 spec). 41242c23cb7cSEd Maste */ 41252c23cb7cSEd Maste for (i = 0; (size_t) i < re->shnum; i++) { 41262c23cb7cSEd Maste s = &re->sl[i]; 41272c23cb7cSEd Maste if (s->name != NULL && (!strcmp(s->name, ".reginfo") || 41282c23cb7cSEd Maste (s->type == SHT_MIPS_REGINFO))) 41292c23cb7cSEd Maste dump_mips_reginfo(re, s); 41302c23cb7cSEd Maste } 41312c23cb7cSEd Maste } 41322c23cb7cSEd Maste 41332c23cb7cSEd Maste static void 4134e9f3f88aSEd Maste dump_mips_abiflags(struct readelf *re, struct section *s) 4135e9f3f88aSEd Maste { 4136e9f3f88aSEd Maste Elf_Data *d; 4137e9f3f88aSEd Maste uint8_t *p; 4138e9f3f88aSEd Maste int elferr; 4139e9f3f88aSEd Maste uint32_t isa_ext, ases, flags1, flags2; 4140e9f3f88aSEd Maste uint16_t version; 4141e9f3f88aSEd Maste uint8_t isa_level, isa_rev, gpr_size, cpr1_size, cpr2_size, fp_abi; 4142e9f3f88aSEd Maste 4143e9f3f88aSEd Maste if ((d = elf_rawdata(s->scn, NULL)) == NULL) { 4144e9f3f88aSEd Maste elferr = elf_errno(); 4145e9f3f88aSEd Maste if (elferr != 0) 4146e9f3f88aSEd Maste warnx("elf_rawdata failed: %s", 4147e9f3f88aSEd Maste elf_errmsg(elferr)); 4148e9f3f88aSEd Maste return; 4149e9f3f88aSEd Maste } 4150e9f3f88aSEd Maste if (d->d_size != 24) { 4151e9f3f88aSEd Maste warnx("invalid MIPS abiflags section size"); 4152e9f3f88aSEd Maste return; 4153e9f3f88aSEd Maste } 4154e9f3f88aSEd Maste 4155e9f3f88aSEd Maste p = d->d_buf; 4156e9f3f88aSEd Maste version = re->dw_decode(&p, 2); 4157e9f3f88aSEd Maste printf("MIPS ABI Flags Version: %u", version); 4158e9f3f88aSEd Maste if (version != 0) { 4159e9f3f88aSEd Maste printf(" (unknown)\n\n"); 4160e9f3f88aSEd Maste return; 4161e9f3f88aSEd Maste } 4162e9f3f88aSEd Maste printf("\n\n"); 4163e9f3f88aSEd Maste 4164e9f3f88aSEd Maste isa_level = re->dw_decode(&p, 1); 4165e9f3f88aSEd Maste isa_rev = re->dw_decode(&p, 1); 4166e9f3f88aSEd Maste gpr_size = re->dw_decode(&p, 1); 4167e9f3f88aSEd Maste cpr1_size = re->dw_decode(&p, 1); 4168e9f3f88aSEd Maste cpr2_size = re->dw_decode(&p, 1); 4169e9f3f88aSEd Maste fp_abi = re->dw_decode(&p, 1); 4170e9f3f88aSEd Maste isa_ext = re->dw_decode(&p, 4); 4171e9f3f88aSEd Maste ases = re->dw_decode(&p, 4); 4172e9f3f88aSEd Maste flags1 = re->dw_decode(&p, 4); 4173e9f3f88aSEd Maste flags2 = re->dw_decode(&p, 4); 4174e9f3f88aSEd Maste 4175e9f3f88aSEd Maste printf("ISA: "); 4176e9f3f88aSEd Maste if (isa_rev <= 1) 4177e9f3f88aSEd Maste printf("MIPS%u\n", isa_level); 4178e9f3f88aSEd Maste else 4179e9f3f88aSEd Maste printf("MIPS%ur%u\n", isa_level, isa_rev); 4180e9f3f88aSEd Maste printf("GPR size: %d\n", get_mips_register_size(gpr_size)); 4181e9f3f88aSEd Maste printf("CPR1 size: %d\n", get_mips_register_size(cpr1_size)); 4182e9f3f88aSEd Maste printf("CPR2 size: %d\n", get_mips_register_size(cpr2_size)); 4183e9f3f88aSEd Maste printf("FP ABI: "); 4184e9f3f88aSEd Maste switch (fp_abi) { 4185e9f3f88aSEd Maste case 3: 4186e9f3f88aSEd Maste printf("Soft float"); 4187e9f3f88aSEd Maste break; 4188e9f3f88aSEd Maste default: 4189e9f3f88aSEd Maste printf("%u", fp_abi); 4190e9f3f88aSEd Maste break; 4191e9f3f88aSEd Maste } 4192e9f3f88aSEd Maste printf("\nISA Extension: %u\n", isa_ext); 4193e9f3f88aSEd Maste printf("ASEs: %u\n", ases); 4194e9f3f88aSEd Maste printf("FLAGS 1: %08x\n", flags1); 4195e9f3f88aSEd Maste printf("FLAGS 2: %08x\n", flags2); 4196e9f3f88aSEd Maste } 4197e9f3f88aSEd Maste 4198e9f3f88aSEd Maste static int 4199e9f3f88aSEd Maste get_mips_register_size(uint8_t flag) 4200e9f3f88aSEd Maste { 4201e9f3f88aSEd Maste switch (flag) { 4202e9f3f88aSEd Maste case 0: return 0; 4203e9f3f88aSEd Maste case 1: return 32; 4204e9f3f88aSEd Maste case 2: return 64; 4205e9f3f88aSEd Maste case 3: return 128; 4206e9f3f88aSEd Maste default: return -1; 4207e9f3f88aSEd Maste } 4208e9f3f88aSEd Maste } 4209e9f3f88aSEd Maste static void 42102c23cb7cSEd Maste dump_mips_reginfo(struct readelf *re, struct section *s) 42112c23cb7cSEd Maste { 42122c23cb7cSEd Maste Elf_Data *d; 421371edbbfdSEd Maste int elferr, len; 42142c23cb7cSEd Maste 42152c23cb7cSEd Maste (void) elf_errno(); 42162c23cb7cSEd Maste if ((d = elf_rawdata(s->scn, NULL)) == NULL) { 42172c23cb7cSEd Maste elferr = elf_errno(); 42182c23cb7cSEd Maste if (elferr != 0) 42192c23cb7cSEd Maste warnx("elf_rawdata failed: %s", 42202c23cb7cSEd Maste elf_errmsg(elferr)); 42212c23cb7cSEd Maste return; 42222c23cb7cSEd Maste } 42232c23cb7cSEd Maste if (d->d_size <= 0) 42242c23cb7cSEd Maste return; 422571edbbfdSEd Maste if (!get_ent_count(s, &len)) 422671edbbfdSEd Maste return; 42272c23cb7cSEd Maste 422871edbbfdSEd Maste printf("\nSection '%s' contains %d entries:\n", s->name, len); 42292c23cb7cSEd Maste dump_mips_odk_reginfo(re, d->d_buf, d->d_size); 42302c23cb7cSEd Maste } 42312c23cb7cSEd Maste 42322c23cb7cSEd Maste static void 42332c23cb7cSEd Maste dump_mips_options(struct readelf *re, struct section *s) 42342c23cb7cSEd Maste { 42352c23cb7cSEd Maste Elf_Data *d; 42362c23cb7cSEd Maste uint32_t info; 42372c23cb7cSEd Maste uint16_t sndx; 42382c23cb7cSEd Maste uint8_t *p, *pe; 42392c23cb7cSEd Maste uint8_t kind, size; 42402c23cb7cSEd Maste int elferr; 42412c23cb7cSEd Maste 42422c23cb7cSEd Maste (void) elf_errno(); 42432c23cb7cSEd Maste if ((d = elf_rawdata(s->scn, NULL)) == NULL) { 42442c23cb7cSEd Maste elferr = elf_errno(); 42452c23cb7cSEd Maste if (elferr != 0) 42462c23cb7cSEd Maste warnx("elf_rawdata failed: %s", 42472c23cb7cSEd Maste elf_errmsg(elferr)); 42482c23cb7cSEd Maste return; 42492c23cb7cSEd Maste } 42502c23cb7cSEd Maste if (d->d_size == 0) 42512c23cb7cSEd Maste return; 42522c23cb7cSEd Maste 42532c23cb7cSEd Maste printf("\nSection %s contains:\n", s->name); 42542c23cb7cSEd Maste p = d->d_buf; 42552c23cb7cSEd Maste pe = p + d->d_size; 42562c23cb7cSEd Maste while (p < pe) { 4257b00fe64fSEd Maste if (pe - p < 8) { 4258b00fe64fSEd Maste warnx("Truncated MIPS option header"); 4259b00fe64fSEd Maste return; 4260b00fe64fSEd Maste } 42612c23cb7cSEd Maste kind = re->dw_decode(&p, 1); 42622c23cb7cSEd Maste size = re->dw_decode(&p, 1); 42632c23cb7cSEd Maste sndx = re->dw_decode(&p, 2); 42642c23cb7cSEd Maste info = re->dw_decode(&p, 4); 4265b00fe64fSEd Maste if (size < 8 || size - 8 > pe - p) { 4266b00fe64fSEd Maste warnx("Malformed MIPS option header"); 4267b00fe64fSEd Maste return; 4268b00fe64fSEd Maste } 4269b00fe64fSEd Maste size -= 8; 42702c23cb7cSEd Maste switch (kind) { 42712c23cb7cSEd Maste case ODK_REGINFO: 4272b00fe64fSEd Maste dump_mips_odk_reginfo(re, p, size); 42732c23cb7cSEd Maste break; 42742c23cb7cSEd Maste case ODK_EXCEPTIONS: 42752c23cb7cSEd Maste printf(" EXCEPTIONS FPU_MIN: %#x\n", 42762c23cb7cSEd Maste info & OEX_FPU_MIN); 42772c23cb7cSEd Maste printf("%11.11s FPU_MAX: %#x\n", "", 42782c23cb7cSEd Maste info & OEX_FPU_MAX); 42792c23cb7cSEd Maste dump_mips_option_flags("", mips_exceptions_option, 42802c23cb7cSEd Maste info); 42812c23cb7cSEd Maste break; 42822c23cb7cSEd Maste case ODK_PAD: 42832c23cb7cSEd Maste printf(" %-10.10s section: %ju\n", "OPAD", 42842c23cb7cSEd Maste (uintmax_t) sndx); 42852c23cb7cSEd Maste dump_mips_option_flags("", mips_pad_option, info); 42862c23cb7cSEd Maste break; 42872c23cb7cSEd Maste case ODK_HWPATCH: 42882c23cb7cSEd Maste dump_mips_option_flags("HWPATCH", mips_hwpatch_option, 42892c23cb7cSEd Maste info); 42902c23cb7cSEd Maste break; 42912c23cb7cSEd Maste case ODK_HWAND: 42922c23cb7cSEd Maste dump_mips_option_flags("HWAND", mips_hwa_option, info); 42932c23cb7cSEd Maste break; 42942c23cb7cSEd Maste case ODK_HWOR: 42952c23cb7cSEd Maste dump_mips_option_flags("HWOR", mips_hwo_option, info); 42962c23cb7cSEd Maste break; 42972c23cb7cSEd Maste case ODK_FILL: 42982c23cb7cSEd Maste printf(" %-10.10s %#jx\n", "FILL", (uintmax_t) info); 42992c23cb7cSEd Maste break; 43002c23cb7cSEd Maste case ODK_TAGS: 43012c23cb7cSEd Maste printf(" %-10.10s\n", "TAGS"); 43022c23cb7cSEd Maste break; 43032c23cb7cSEd Maste case ODK_GP_GROUP: 43042c23cb7cSEd Maste printf(" %-10.10s GP group number: %#x\n", "GP_GROUP", 43052c23cb7cSEd Maste info & 0xFFFF); 43062c23cb7cSEd Maste if (info & 0x10000) 43072c23cb7cSEd Maste printf(" %-10.10s GP group is " 43082c23cb7cSEd Maste "self-contained\n", ""); 43092c23cb7cSEd Maste break; 43102c23cb7cSEd Maste case ODK_IDENT: 43112c23cb7cSEd Maste printf(" %-10.10s default GP group number: %#x\n", 43122c23cb7cSEd Maste "IDENT", info & 0xFFFF); 43132c23cb7cSEd Maste if (info & 0x10000) 43142c23cb7cSEd Maste printf(" %-10.10s default GP group is " 43152c23cb7cSEd Maste "self-contained\n", ""); 43162c23cb7cSEd Maste break; 43172c23cb7cSEd Maste case ODK_PAGESIZE: 43182c23cb7cSEd Maste printf(" %-10.10s\n", "PAGESIZE"); 43192c23cb7cSEd Maste break; 43202c23cb7cSEd Maste default: 43212c23cb7cSEd Maste break; 43222c23cb7cSEd Maste } 4323b00fe64fSEd Maste p += size; 43242c23cb7cSEd Maste } 43252c23cb7cSEd Maste } 43262c23cb7cSEd Maste 43272c23cb7cSEd Maste static void 43282c23cb7cSEd Maste dump_mips_option_flags(const char *name, struct mips_option *opt, uint64_t info) 43292c23cb7cSEd Maste { 43302c23cb7cSEd Maste int first; 43312c23cb7cSEd Maste 43322c23cb7cSEd Maste first = 1; 43332c23cb7cSEd Maste for (; opt->desc != NULL; opt++) { 43342c23cb7cSEd Maste if (info & opt->flag) { 43352c23cb7cSEd Maste printf(" %-10.10s %s\n", first ? name : "", 43362c23cb7cSEd Maste opt->desc); 43372c23cb7cSEd Maste first = 0; 43382c23cb7cSEd Maste } 43392c23cb7cSEd Maste } 43402c23cb7cSEd Maste } 43412c23cb7cSEd Maste 43422c23cb7cSEd Maste static void 43432c23cb7cSEd Maste dump_mips_odk_reginfo(struct readelf *re, uint8_t *p, size_t sz) 43442c23cb7cSEd Maste { 43452c23cb7cSEd Maste uint32_t ri_gprmask; 43462c23cb7cSEd Maste uint32_t ri_cprmask[4]; 43472c23cb7cSEd Maste uint64_t ri_gp_value; 43482c23cb7cSEd Maste uint8_t *pe; 43492c23cb7cSEd Maste int i; 43502c23cb7cSEd Maste 43512c23cb7cSEd Maste pe = p + sz; 43522c23cb7cSEd Maste while (p < pe) { 43532c23cb7cSEd Maste ri_gprmask = re->dw_decode(&p, 4); 43542c23cb7cSEd Maste /* Skip ri_pad padding field for mips64. */ 43552c23cb7cSEd Maste if (re->ec == ELFCLASS64) 43562c23cb7cSEd Maste re->dw_decode(&p, 4); 43572c23cb7cSEd Maste for (i = 0; i < 4; i++) 43582c23cb7cSEd Maste ri_cprmask[i] = re->dw_decode(&p, 4); 43592c23cb7cSEd Maste if (re->ec == ELFCLASS32) 43602c23cb7cSEd Maste ri_gp_value = re->dw_decode(&p, 4); 43612c23cb7cSEd Maste else 43622c23cb7cSEd Maste ri_gp_value = re->dw_decode(&p, 8); 43632c23cb7cSEd Maste printf(" %s ", option_kind(ODK_REGINFO)); 43642c23cb7cSEd Maste printf("ri_gprmask: 0x%08jx\n", (uintmax_t) ri_gprmask); 43652c23cb7cSEd Maste for (i = 0; i < 4; i++) 43662c23cb7cSEd Maste printf("%11.11s ri_cprmask[%d]: 0x%08jx\n", "", i, 43672c23cb7cSEd Maste (uintmax_t) ri_cprmask[i]); 43682c23cb7cSEd Maste printf("%12.12s", ""); 43692c23cb7cSEd Maste printf("ri_gp_value: %#jx\n", (uintmax_t) ri_gp_value); 43702c23cb7cSEd Maste } 43712c23cb7cSEd Maste } 43722c23cb7cSEd Maste 43732c23cb7cSEd Maste static void 43742c23cb7cSEd Maste dump_arch_specific_info(struct readelf *re) 43752c23cb7cSEd Maste { 43762c23cb7cSEd Maste 43772c23cb7cSEd Maste dump_liblist(re); 43782c23cb7cSEd Maste dump_attributes(re); 43792c23cb7cSEd Maste 43802c23cb7cSEd Maste switch (re->ehdr.e_machine) { 43812c23cb7cSEd Maste case EM_MIPS: 43822c23cb7cSEd Maste case EM_MIPS_RS3_LE: 43832c23cb7cSEd Maste dump_mips_specific_info(re); 43842c23cb7cSEd Maste default: 43852c23cb7cSEd Maste break; 43862c23cb7cSEd Maste } 43872c23cb7cSEd Maste } 43882c23cb7cSEd Maste 4389cf781b2eSEd Maste static const char * 4390cf781b2eSEd Maste dwarf_regname(struct readelf *re, unsigned int num) 4391cf781b2eSEd Maste { 4392cf781b2eSEd Maste static char rx[32]; 4393cf781b2eSEd Maste const char *rn; 4394cf781b2eSEd Maste 4395cf781b2eSEd Maste if ((rn = dwarf_reg(re->ehdr.e_machine, num)) != NULL) 4396cf781b2eSEd Maste return (rn); 4397cf781b2eSEd Maste 4398cf781b2eSEd Maste snprintf(rx, sizeof(rx), "r%u", num); 4399cf781b2eSEd Maste 4400cf781b2eSEd Maste return (rx); 4401cf781b2eSEd Maste } 4402cf781b2eSEd Maste 44032c23cb7cSEd Maste static void 44042c23cb7cSEd Maste dump_dwarf_line(struct readelf *re) 44052c23cb7cSEd Maste { 44062c23cb7cSEd Maste struct section *s; 44072c23cb7cSEd Maste Dwarf_Die die; 44082c23cb7cSEd Maste Dwarf_Error de; 44092c23cb7cSEd Maste Dwarf_Half tag, version, pointer_size; 44102c23cb7cSEd Maste Dwarf_Unsigned offset, endoff, length, hdrlen, dirndx, mtime, fsize; 44112c23cb7cSEd Maste Dwarf_Small minlen, defstmt, lrange, opbase, oplen; 44122c23cb7cSEd Maste Elf_Data *d; 44132c23cb7cSEd Maste char *pn; 44142c23cb7cSEd Maste uint64_t address, file, line, column, isa, opsize, udelta; 44152c23cb7cSEd Maste int64_t sdelta; 44162c23cb7cSEd Maste uint8_t *p, *pe; 44172c23cb7cSEd Maste int8_t lbase; 4418cf781b2eSEd Maste int i, is_stmt, dwarf_size, elferr, ret; 44192c23cb7cSEd Maste 44202c23cb7cSEd Maste printf("\nDump of debug contents of section .debug_line:\n"); 44212c23cb7cSEd Maste 44222c23cb7cSEd Maste s = NULL; 44232c23cb7cSEd Maste for (i = 0; (size_t) i < re->shnum; i++) { 44242c23cb7cSEd Maste s = &re->sl[i]; 44252c23cb7cSEd Maste if (s->name != NULL && !strcmp(s->name, ".debug_line")) 44262c23cb7cSEd Maste break; 44272c23cb7cSEd Maste } 44282c23cb7cSEd Maste if ((size_t) i >= re->shnum) 44292c23cb7cSEd Maste return; 44302c23cb7cSEd Maste 44312c23cb7cSEd Maste (void) elf_errno(); 44322c23cb7cSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 44332c23cb7cSEd Maste elferr = elf_errno(); 44342c23cb7cSEd Maste if (elferr != 0) 44352c23cb7cSEd Maste warnx("elf_getdata failed: %s", elf_errmsg(-1)); 44362c23cb7cSEd Maste return; 44372c23cb7cSEd Maste } 44382c23cb7cSEd Maste if (d->d_size <= 0) 44392c23cb7cSEd Maste return; 44402c23cb7cSEd Maste 44412c23cb7cSEd Maste while ((ret = dwarf_next_cu_header(re->dbg, NULL, NULL, NULL, NULL, 44422c23cb7cSEd Maste NULL, &de)) == DW_DLV_OK) { 44432c23cb7cSEd Maste die = NULL; 44442c23cb7cSEd Maste while (dwarf_siblingof(re->dbg, die, &die, &de) == DW_DLV_OK) { 44452c23cb7cSEd Maste if (dwarf_tag(die, &tag, &de) != DW_DLV_OK) { 44462c23cb7cSEd Maste warnx("dwarf_tag failed: %s", 44472c23cb7cSEd Maste dwarf_errmsg(de)); 44482c23cb7cSEd Maste return; 44492c23cb7cSEd Maste } 44502c23cb7cSEd Maste /* XXX: What about DW_TAG_partial_unit? */ 44512c23cb7cSEd Maste if (tag == DW_TAG_compile_unit) 44522c23cb7cSEd Maste break; 44532c23cb7cSEd Maste } 44542c23cb7cSEd Maste if (die == NULL) { 44552c23cb7cSEd Maste warnx("could not find DW_TAG_compile_unit die"); 44562c23cb7cSEd Maste return; 44572c23cb7cSEd Maste } 44582c23cb7cSEd Maste if (dwarf_attrval_unsigned(die, DW_AT_stmt_list, &offset, 44592c23cb7cSEd Maste &de) != DW_DLV_OK) 44602c23cb7cSEd Maste continue; 44612c23cb7cSEd Maste 44622c23cb7cSEd Maste length = re->dw_read(d, &offset, 4); 44632c23cb7cSEd Maste if (length == 0xffffffff) { 44642c23cb7cSEd Maste dwarf_size = 8; 44652c23cb7cSEd Maste length = re->dw_read(d, &offset, 8); 44662c23cb7cSEd Maste } else 44672c23cb7cSEd Maste dwarf_size = 4; 44682c23cb7cSEd Maste 44692c23cb7cSEd Maste if (length > d->d_size - offset) { 44702c23cb7cSEd Maste warnx("invalid .dwarf_line section"); 44712c23cb7cSEd Maste continue; 44722c23cb7cSEd Maste } 44732c23cb7cSEd Maste 44742c23cb7cSEd Maste endoff = offset + length; 44758f32e46dSKai Wang pe = (uint8_t *) d->d_buf + endoff; 44762c23cb7cSEd Maste version = re->dw_read(d, &offset, 2); 44772c23cb7cSEd Maste hdrlen = re->dw_read(d, &offset, dwarf_size); 44782c23cb7cSEd Maste minlen = re->dw_read(d, &offset, 1); 44792c23cb7cSEd Maste defstmt = re->dw_read(d, &offset, 1); 44802c23cb7cSEd Maste lbase = re->dw_read(d, &offset, 1); 44812c23cb7cSEd Maste lrange = re->dw_read(d, &offset, 1); 44822c23cb7cSEd Maste opbase = re->dw_read(d, &offset, 1); 44832c23cb7cSEd Maste 44842c23cb7cSEd Maste printf("\n"); 44852c23cb7cSEd Maste printf(" Length:\t\t\t%ju\n", (uintmax_t) length); 44862c23cb7cSEd Maste printf(" DWARF version:\t\t%u\n", version); 44872c23cb7cSEd Maste printf(" Prologue Length:\t\t%ju\n", (uintmax_t) hdrlen); 44882c23cb7cSEd Maste printf(" Minimum Instruction Length:\t%u\n", minlen); 44892c23cb7cSEd Maste printf(" Initial value of 'is_stmt':\t%u\n", defstmt); 44902c23cb7cSEd Maste printf(" Line Base:\t\t\t%d\n", lbase); 44912c23cb7cSEd Maste printf(" Line Range:\t\t\t%u\n", lrange); 44922c23cb7cSEd Maste printf(" Opcode Base:\t\t\t%u\n", opbase); 44932c23cb7cSEd Maste (void) dwarf_get_address_size(re->dbg, &pointer_size, &de); 44942c23cb7cSEd Maste printf(" (Pointer size:\t\t%u)\n", pointer_size); 44952c23cb7cSEd Maste 44962c23cb7cSEd Maste printf("\n"); 44972c23cb7cSEd Maste printf(" Opcodes:\n"); 44982c23cb7cSEd Maste for (i = 1; i < opbase; i++) { 44992c23cb7cSEd Maste oplen = re->dw_read(d, &offset, 1); 45002c23cb7cSEd Maste printf(" Opcode %d has %u args\n", i, oplen); 45012c23cb7cSEd Maste } 45022c23cb7cSEd Maste 45032c23cb7cSEd Maste printf("\n"); 45042c23cb7cSEd Maste printf(" The Directory Table:\n"); 45052c23cb7cSEd Maste p = (uint8_t *) d->d_buf + offset; 45062c23cb7cSEd Maste while (*p != '\0') { 45072c23cb7cSEd Maste printf(" %s\n", (char *) p); 45082c23cb7cSEd Maste p += strlen((char *) p) + 1; 45092c23cb7cSEd Maste } 45102c23cb7cSEd Maste 45112c23cb7cSEd Maste p++; 45122c23cb7cSEd Maste printf("\n"); 45132c23cb7cSEd Maste printf(" The File Name Table:\n"); 45142c23cb7cSEd Maste printf(" Entry\tDir\tTime\tSize\tName\n"); 45152c23cb7cSEd Maste i = 0; 45162c23cb7cSEd Maste while (*p != '\0') { 45172c23cb7cSEd Maste i++; 45182c23cb7cSEd Maste pn = (char *) p; 45192c23cb7cSEd Maste p += strlen(pn) + 1; 452095fd7f26SEd Maste dirndx = _decode_uleb128(&p, pe); 452195fd7f26SEd Maste mtime = _decode_uleb128(&p, pe); 452295fd7f26SEd Maste fsize = _decode_uleb128(&p, pe); 45232c23cb7cSEd Maste printf(" %d\t%ju\t%ju\t%ju\t%s\n", i, 45242c23cb7cSEd Maste (uintmax_t) dirndx, (uintmax_t) mtime, 45252c23cb7cSEd Maste (uintmax_t) fsize, pn); 45262c23cb7cSEd Maste } 45272c23cb7cSEd Maste 45282c23cb7cSEd Maste #define RESET_REGISTERS \ 45292c23cb7cSEd Maste do { \ 45302c23cb7cSEd Maste address = 0; \ 45312c23cb7cSEd Maste file = 1; \ 45322c23cb7cSEd Maste line = 1; \ 45332c23cb7cSEd Maste column = 0; \ 45342c23cb7cSEd Maste is_stmt = defstmt; \ 45352c23cb7cSEd Maste } while(0) 45362c23cb7cSEd Maste 45372c23cb7cSEd Maste #define LINE(x) (lbase + (((x) - opbase) % lrange)) 45382c23cb7cSEd Maste #define ADDRESS(x) ((((x) - opbase) / lrange) * minlen) 45392c23cb7cSEd Maste 45402c23cb7cSEd Maste p++; 45412c23cb7cSEd Maste printf("\n"); 45422c23cb7cSEd Maste printf(" Line Number Statements:\n"); 45432c23cb7cSEd Maste 45442c23cb7cSEd Maste RESET_REGISTERS; 45452c23cb7cSEd Maste 45462c23cb7cSEd Maste while (p < pe) { 45472c23cb7cSEd Maste 45482c23cb7cSEd Maste if (*p == 0) { 45492c23cb7cSEd Maste /* 45502c23cb7cSEd Maste * Extended Opcodes. 45512c23cb7cSEd Maste */ 45522c23cb7cSEd Maste p++; 455395fd7f26SEd Maste opsize = _decode_uleb128(&p, pe); 45542c23cb7cSEd Maste printf(" Extended opcode %u: ", *p); 45552c23cb7cSEd Maste switch (*p) { 45562c23cb7cSEd Maste case DW_LNE_end_sequence: 45572c23cb7cSEd Maste p++; 45582c23cb7cSEd Maste RESET_REGISTERS; 45592c23cb7cSEd Maste printf("End of Sequence\n"); 45602c23cb7cSEd Maste break; 45612c23cb7cSEd Maste case DW_LNE_set_address: 45622c23cb7cSEd Maste p++; 45632c23cb7cSEd Maste address = re->dw_decode(&p, 45642c23cb7cSEd Maste pointer_size); 45652c23cb7cSEd Maste printf("set Address to %#jx\n", 45662c23cb7cSEd Maste (uintmax_t) address); 45672c23cb7cSEd Maste break; 45682c23cb7cSEd Maste case DW_LNE_define_file: 45692c23cb7cSEd Maste p++; 45702c23cb7cSEd Maste pn = (char *) p; 45712c23cb7cSEd Maste p += strlen(pn) + 1; 457295fd7f26SEd Maste dirndx = _decode_uleb128(&p, pe); 457395fd7f26SEd Maste mtime = _decode_uleb128(&p, pe); 457495fd7f26SEd Maste fsize = _decode_uleb128(&p, pe); 45752c23cb7cSEd Maste printf("define new file: %s\n", pn); 45762c23cb7cSEd Maste break; 45772c23cb7cSEd Maste default: 45782c23cb7cSEd Maste /* Unrecognized extened opcodes. */ 45792c23cb7cSEd Maste p += opsize; 45802c23cb7cSEd Maste printf("unknown opcode\n"); 45812c23cb7cSEd Maste } 45822c23cb7cSEd Maste } else if (*p > 0 && *p < opbase) { 45832c23cb7cSEd Maste /* 45842c23cb7cSEd Maste * Standard Opcodes. 45852c23cb7cSEd Maste */ 45862c23cb7cSEd Maste switch(*p++) { 45872c23cb7cSEd Maste case DW_LNS_copy: 45882c23cb7cSEd Maste printf(" Copy\n"); 45892c23cb7cSEd Maste break; 45902c23cb7cSEd Maste case DW_LNS_advance_pc: 459195fd7f26SEd Maste udelta = _decode_uleb128(&p, pe) * 45922c23cb7cSEd Maste minlen; 45932c23cb7cSEd Maste address += udelta; 45942c23cb7cSEd Maste printf(" Advance PC by %ju to %#jx\n", 45952c23cb7cSEd Maste (uintmax_t) udelta, 45962c23cb7cSEd Maste (uintmax_t) address); 45972c23cb7cSEd Maste break; 45982c23cb7cSEd Maste case DW_LNS_advance_line: 459995fd7f26SEd Maste sdelta = _decode_sleb128(&p, pe); 46002c23cb7cSEd Maste line += sdelta; 46012c23cb7cSEd Maste printf(" Advance Line by %jd to %ju\n", 46022c23cb7cSEd Maste (intmax_t) sdelta, 46032c23cb7cSEd Maste (uintmax_t) line); 46042c23cb7cSEd Maste break; 46052c23cb7cSEd Maste case DW_LNS_set_file: 460695fd7f26SEd Maste file = _decode_uleb128(&p, pe); 46072c23cb7cSEd Maste printf(" Set File to %ju\n", 46082c23cb7cSEd Maste (uintmax_t) file); 46092c23cb7cSEd Maste break; 46102c23cb7cSEd Maste case DW_LNS_set_column: 461195fd7f26SEd Maste column = _decode_uleb128(&p, pe); 46122c23cb7cSEd Maste printf(" Set Column to %ju\n", 46132c23cb7cSEd Maste (uintmax_t) column); 46142c23cb7cSEd Maste break; 46152c23cb7cSEd Maste case DW_LNS_negate_stmt: 46162c23cb7cSEd Maste is_stmt = !is_stmt; 46172c23cb7cSEd Maste printf(" Set is_stmt to %d\n", is_stmt); 46182c23cb7cSEd Maste break; 46192c23cb7cSEd Maste case DW_LNS_set_basic_block: 46202c23cb7cSEd Maste printf(" Set basic block flag\n"); 46212c23cb7cSEd Maste break; 46222c23cb7cSEd Maste case DW_LNS_const_add_pc: 46232c23cb7cSEd Maste address += ADDRESS(255); 46242c23cb7cSEd Maste printf(" Advance PC by constant %ju" 46252c23cb7cSEd Maste " to %#jx\n", 46262c23cb7cSEd Maste (uintmax_t) ADDRESS(255), 46272c23cb7cSEd Maste (uintmax_t) address); 46282c23cb7cSEd Maste break; 46292c23cb7cSEd Maste case DW_LNS_fixed_advance_pc: 46302c23cb7cSEd Maste udelta = re->dw_decode(&p, 2); 46312c23cb7cSEd Maste address += udelta; 46322c23cb7cSEd Maste printf(" Advance PC by fixed value " 46332c23cb7cSEd Maste "%ju to %#jx\n", 46342c23cb7cSEd Maste (uintmax_t) udelta, 46352c23cb7cSEd Maste (uintmax_t) address); 46362c23cb7cSEd Maste break; 46372c23cb7cSEd Maste case DW_LNS_set_prologue_end: 46382c23cb7cSEd Maste printf(" Set prologue end flag\n"); 46392c23cb7cSEd Maste break; 46402c23cb7cSEd Maste case DW_LNS_set_epilogue_begin: 46412c23cb7cSEd Maste printf(" Set epilogue begin flag\n"); 46422c23cb7cSEd Maste break; 46432c23cb7cSEd Maste case DW_LNS_set_isa: 464495fd7f26SEd Maste isa = _decode_uleb128(&p, pe); 4645839529caSEd Maste printf(" Set isa to %ju\n", 4646839529caSEd Maste (uintmax_t) isa); 46472c23cb7cSEd Maste break; 46482c23cb7cSEd Maste default: 46492c23cb7cSEd Maste /* Unrecognized extended opcodes. */ 46502c23cb7cSEd Maste printf(" Unknown extended opcode %u\n", 46512c23cb7cSEd Maste *(p - 1)); 46522c23cb7cSEd Maste break; 46532c23cb7cSEd Maste } 46542c23cb7cSEd Maste 46552c23cb7cSEd Maste } else { 46562c23cb7cSEd Maste /* 46572c23cb7cSEd Maste * Special Opcodes. 46582c23cb7cSEd Maste */ 46592c23cb7cSEd Maste line += LINE(*p); 46602c23cb7cSEd Maste address += ADDRESS(*p); 46612c23cb7cSEd Maste printf(" Special opcode %u: advance Address " 46622c23cb7cSEd Maste "by %ju to %#jx and Line by %jd to %ju\n", 46632c23cb7cSEd Maste *p - opbase, (uintmax_t) ADDRESS(*p), 46642c23cb7cSEd Maste (uintmax_t) address, (intmax_t) LINE(*p), 46652c23cb7cSEd Maste (uintmax_t) line); 46662c23cb7cSEd Maste p++; 46672c23cb7cSEd Maste } 46682c23cb7cSEd Maste 46692c23cb7cSEd Maste 46702c23cb7cSEd Maste } 46712c23cb7cSEd Maste } 46722c23cb7cSEd Maste if (ret == DW_DLV_ERROR) 46732c23cb7cSEd Maste warnx("dwarf_next_cu_header: %s", dwarf_errmsg(de)); 46742c23cb7cSEd Maste 46752c23cb7cSEd Maste #undef RESET_REGISTERS 46762c23cb7cSEd Maste #undef LINE 46772c23cb7cSEd Maste #undef ADDRESS 46782c23cb7cSEd Maste } 46792c23cb7cSEd Maste 46802c23cb7cSEd Maste static void 46812c23cb7cSEd Maste dump_dwarf_line_decoded(struct readelf *re) 46822c23cb7cSEd Maste { 46832c23cb7cSEd Maste Dwarf_Die die; 46842c23cb7cSEd Maste Dwarf_Line *linebuf, ln; 46852c23cb7cSEd Maste Dwarf_Addr lineaddr; 46862c23cb7cSEd Maste Dwarf_Signed linecount, srccount; 46872c23cb7cSEd Maste Dwarf_Unsigned lineno, fn; 46882c23cb7cSEd Maste Dwarf_Error de; 46892c23cb7cSEd Maste const char *dir, *file; 46902c23cb7cSEd Maste char **srcfiles; 46912c23cb7cSEd Maste int i, ret; 46922c23cb7cSEd Maste 46932c23cb7cSEd Maste printf("Decoded dump of debug contents of section .debug_line:\n\n"); 46942c23cb7cSEd Maste while ((ret = dwarf_next_cu_header(re->dbg, NULL, NULL, NULL, NULL, 46952c23cb7cSEd Maste NULL, &de)) == DW_DLV_OK) { 46962c23cb7cSEd Maste if (dwarf_siblingof(re->dbg, NULL, &die, &de) != DW_DLV_OK) 46972c23cb7cSEd Maste continue; 46982c23cb7cSEd Maste if (dwarf_attrval_string(die, DW_AT_name, &file, &de) != 46992c23cb7cSEd Maste DW_DLV_OK) 47002c23cb7cSEd Maste file = NULL; 47012c23cb7cSEd Maste if (dwarf_attrval_string(die, DW_AT_comp_dir, &dir, &de) != 47022c23cb7cSEd Maste DW_DLV_OK) 47032c23cb7cSEd Maste dir = NULL; 47042c23cb7cSEd Maste printf("CU: "); 47052c23cb7cSEd Maste if (dir && file) 47062c23cb7cSEd Maste printf("%s/", dir); 47072c23cb7cSEd Maste if (file) 47082c23cb7cSEd Maste printf("%s", file); 47092c23cb7cSEd Maste putchar('\n'); 47102c23cb7cSEd Maste printf("%-37s %11s %s\n", "Filename", "Line Number", 47112c23cb7cSEd Maste "Starting Address"); 47122c23cb7cSEd Maste if (dwarf_srclines(die, &linebuf, &linecount, &de) != DW_DLV_OK) 47132c23cb7cSEd Maste continue; 47142c23cb7cSEd Maste if (dwarf_srcfiles(die, &srcfiles, &srccount, &de) != DW_DLV_OK) 47152c23cb7cSEd Maste continue; 47162c23cb7cSEd Maste for (i = 0; i < linecount; i++) { 47172c23cb7cSEd Maste ln = linebuf[i]; 47182c23cb7cSEd Maste if (dwarf_line_srcfileno(ln, &fn, &de) != DW_DLV_OK) 47192c23cb7cSEd Maste continue; 47202c23cb7cSEd Maste if (dwarf_lineno(ln, &lineno, &de) != DW_DLV_OK) 47212c23cb7cSEd Maste continue; 47222c23cb7cSEd Maste if (dwarf_lineaddr(ln, &lineaddr, &de) != DW_DLV_OK) 47232c23cb7cSEd Maste continue; 47242c23cb7cSEd Maste printf("%-37s %11ju %#18jx\n", 47252c23cb7cSEd Maste basename(srcfiles[fn - 1]), (uintmax_t) lineno, 47262c23cb7cSEd Maste (uintmax_t) lineaddr); 47272c23cb7cSEd Maste } 47282c23cb7cSEd Maste putchar('\n'); 47292c23cb7cSEd Maste } 47302c23cb7cSEd Maste } 47312c23cb7cSEd Maste 47322c23cb7cSEd Maste static void 47332c23cb7cSEd Maste dump_dwarf_die(struct readelf *re, Dwarf_Die die, int level) 47342c23cb7cSEd Maste { 47352c23cb7cSEd Maste Dwarf_Attribute *attr_list; 47362c23cb7cSEd Maste Dwarf_Die ret_die; 4737cf781b2eSEd Maste Dwarf_Off dieoff, cuoff, culen, attroff; 4738cf781b2eSEd Maste Dwarf_Unsigned ate, lang, v_udata, v_sig; 47392c23cb7cSEd Maste Dwarf_Signed attr_count, v_sdata; 47402c23cb7cSEd Maste Dwarf_Off v_off; 47412c23cb7cSEd Maste Dwarf_Addr v_addr; 47422c23cb7cSEd Maste Dwarf_Half tag, attr, form; 47432c23cb7cSEd Maste Dwarf_Block *v_block; 4744cf781b2eSEd Maste Dwarf_Bool v_bool, is_info; 4745cf781b2eSEd Maste Dwarf_Sig8 v_sig8; 47462c23cb7cSEd Maste Dwarf_Error de; 4747cf781b2eSEd Maste Dwarf_Ptr v_expr; 4748cf781b2eSEd Maste const char *tag_str, *attr_str, *ate_str, *lang_str; 4749cf781b2eSEd Maste char unk_tag[32], unk_attr[32]; 47502c23cb7cSEd Maste char *v_str; 4751cf781b2eSEd Maste uint8_t *b, *p; 47522c23cb7cSEd Maste int i, j, abc, ret; 47532c23cb7cSEd Maste 47542c23cb7cSEd Maste if (dwarf_dieoffset(die, &dieoff, &de) != DW_DLV_OK) { 47552c23cb7cSEd Maste warnx("dwarf_dieoffset failed: %s", dwarf_errmsg(de)); 47562c23cb7cSEd Maste goto cont_search; 47572c23cb7cSEd Maste } 47582c23cb7cSEd Maste 47592c23cb7cSEd Maste printf(" <%d><%jx>: ", level, (uintmax_t) dieoff); 47602c23cb7cSEd Maste 47612c23cb7cSEd Maste if (dwarf_die_CU_offset_range(die, &cuoff, &culen, &de) != DW_DLV_OK) { 47622c23cb7cSEd Maste warnx("dwarf_die_CU_offset_range failed: %s", 47632c23cb7cSEd Maste dwarf_errmsg(de)); 47642c23cb7cSEd Maste cuoff = 0; 47652c23cb7cSEd Maste } 47662c23cb7cSEd Maste 47672c23cb7cSEd Maste abc = dwarf_die_abbrev_code(die); 47682c23cb7cSEd Maste if (dwarf_tag(die, &tag, &de) != DW_DLV_OK) { 47692c23cb7cSEd Maste warnx("dwarf_tag failed: %s", dwarf_errmsg(de)); 47702c23cb7cSEd Maste goto cont_search; 47712c23cb7cSEd Maste } 47722c23cb7cSEd Maste if (dwarf_get_TAG_name(tag, &tag_str) != DW_DLV_OK) { 4773cf781b2eSEd Maste snprintf(unk_tag, sizeof(unk_tag), "[Unknown Tag: %#x]", tag); 4774cf781b2eSEd Maste tag_str = unk_tag; 47752c23cb7cSEd Maste } 47762c23cb7cSEd Maste 47772c23cb7cSEd Maste printf("Abbrev Number: %d (%s)\n", abc, tag_str); 47782c23cb7cSEd Maste 47792c23cb7cSEd Maste if ((ret = dwarf_attrlist(die, &attr_list, &attr_count, &de)) != 47802c23cb7cSEd Maste DW_DLV_OK) { 47812c23cb7cSEd Maste if (ret == DW_DLV_ERROR) 47822c23cb7cSEd Maste warnx("dwarf_attrlist failed: %s", dwarf_errmsg(de)); 47832c23cb7cSEd Maste goto cont_search; 47842c23cb7cSEd Maste } 47852c23cb7cSEd Maste 47862c23cb7cSEd Maste for (i = 0; i < attr_count; i++) { 47872c23cb7cSEd Maste if (dwarf_whatform(attr_list[i], &form, &de) != DW_DLV_OK) { 47882c23cb7cSEd Maste warnx("dwarf_whatform failed: %s", dwarf_errmsg(de)); 47892c23cb7cSEd Maste continue; 47902c23cb7cSEd Maste } 47912c23cb7cSEd Maste if (dwarf_whatattr(attr_list[i], &attr, &de) != DW_DLV_OK) { 47922c23cb7cSEd Maste warnx("dwarf_whatattr failed: %s", dwarf_errmsg(de)); 47932c23cb7cSEd Maste continue; 47942c23cb7cSEd Maste } 47952c23cb7cSEd Maste if (dwarf_get_AT_name(attr, &attr_str) != DW_DLV_OK) { 4796cf781b2eSEd Maste snprintf(unk_attr, sizeof(unk_attr), 4797cf781b2eSEd Maste "[Unknown AT: %#x]", attr); 4798cf781b2eSEd Maste attr_str = unk_attr; 47992c23cb7cSEd Maste } 4800cf781b2eSEd Maste if (dwarf_attroffset(attr_list[i], &attroff, &de) != 4801cf781b2eSEd Maste DW_DLV_OK) { 4802cf781b2eSEd Maste warnx("dwarf_attroffset failed: %s", dwarf_errmsg(de)); 4803cf781b2eSEd Maste attroff = 0; 4804cf781b2eSEd Maste } 4805cf781b2eSEd Maste printf(" <%jx> %-18s: ", (uintmax_t) attroff, attr_str); 48062c23cb7cSEd Maste switch (form) { 48072c23cb7cSEd Maste case DW_FORM_ref_addr: 4808cf781b2eSEd Maste case DW_FORM_sec_offset: 48092c23cb7cSEd Maste if (dwarf_global_formref(attr_list[i], &v_off, &de) != 48102c23cb7cSEd Maste DW_DLV_OK) { 48112c23cb7cSEd Maste warnx("dwarf_global_formref failed: %s", 48122c23cb7cSEd Maste dwarf_errmsg(de)); 48132c23cb7cSEd Maste continue; 48142c23cb7cSEd Maste } 4815cf781b2eSEd Maste if (form == DW_FORM_ref_addr) 4816cf781b2eSEd Maste printf("<0x%jx>", (uintmax_t) v_off); 4817cf781b2eSEd Maste else 4818cf781b2eSEd Maste printf("0x%jx", (uintmax_t) v_off); 48192c23cb7cSEd Maste break; 48202c23cb7cSEd Maste 48212c23cb7cSEd Maste case DW_FORM_ref1: 48222c23cb7cSEd Maste case DW_FORM_ref2: 48232c23cb7cSEd Maste case DW_FORM_ref4: 48242c23cb7cSEd Maste case DW_FORM_ref8: 48252c23cb7cSEd Maste case DW_FORM_ref_udata: 48262c23cb7cSEd Maste if (dwarf_formref(attr_list[i], &v_off, &de) != 48272c23cb7cSEd Maste DW_DLV_OK) { 48282c23cb7cSEd Maste warnx("dwarf_formref failed: %s", 48292c23cb7cSEd Maste dwarf_errmsg(de)); 48302c23cb7cSEd Maste continue; 48312c23cb7cSEd Maste } 48322c23cb7cSEd Maste v_off += cuoff; 4833cf781b2eSEd Maste printf("<0x%jx>", (uintmax_t) v_off); 48342c23cb7cSEd Maste break; 48352c23cb7cSEd Maste 48362c23cb7cSEd Maste case DW_FORM_addr: 48372c23cb7cSEd Maste if (dwarf_formaddr(attr_list[i], &v_addr, &de) != 48382c23cb7cSEd Maste DW_DLV_OK) { 48392c23cb7cSEd Maste warnx("dwarf_formaddr failed: %s", 48402c23cb7cSEd Maste dwarf_errmsg(de)); 48412c23cb7cSEd Maste continue; 48422c23cb7cSEd Maste } 48432c23cb7cSEd Maste printf("%#jx", (uintmax_t) v_addr); 48442c23cb7cSEd Maste break; 48452c23cb7cSEd Maste 48462c23cb7cSEd Maste case DW_FORM_data1: 48472c23cb7cSEd Maste case DW_FORM_data2: 48482c23cb7cSEd Maste case DW_FORM_data4: 48492c23cb7cSEd Maste case DW_FORM_data8: 48502c23cb7cSEd Maste case DW_FORM_udata: 48512c23cb7cSEd Maste if (dwarf_formudata(attr_list[i], &v_udata, &de) != 48522c23cb7cSEd Maste DW_DLV_OK) { 48532c23cb7cSEd Maste warnx("dwarf_formudata failed: %s", 48542c23cb7cSEd Maste dwarf_errmsg(de)); 48552c23cb7cSEd Maste continue; 48562c23cb7cSEd Maste } 4857cf781b2eSEd Maste if (attr == DW_AT_high_pc) 4858cf781b2eSEd Maste printf("0x%jx", (uintmax_t) v_udata); 4859cf781b2eSEd Maste else 48602c23cb7cSEd Maste printf("%ju", (uintmax_t) v_udata); 48612c23cb7cSEd Maste break; 48622c23cb7cSEd Maste 48632c23cb7cSEd Maste case DW_FORM_sdata: 48642c23cb7cSEd Maste if (dwarf_formsdata(attr_list[i], &v_sdata, &de) != 48652c23cb7cSEd Maste DW_DLV_OK) { 48662c23cb7cSEd Maste warnx("dwarf_formudata failed: %s", 48672c23cb7cSEd Maste dwarf_errmsg(de)); 48682c23cb7cSEd Maste continue; 48692c23cb7cSEd Maste } 48702c23cb7cSEd Maste printf("%jd", (intmax_t) v_sdata); 48712c23cb7cSEd Maste break; 48722c23cb7cSEd Maste 48732c23cb7cSEd Maste case DW_FORM_flag: 48742c23cb7cSEd Maste if (dwarf_formflag(attr_list[i], &v_bool, &de) != 48752c23cb7cSEd Maste DW_DLV_OK) { 48762c23cb7cSEd Maste warnx("dwarf_formflag failed: %s", 48772c23cb7cSEd Maste dwarf_errmsg(de)); 48782c23cb7cSEd Maste continue; 48792c23cb7cSEd Maste } 48802c23cb7cSEd Maste printf("%jd", (intmax_t) v_bool); 48812c23cb7cSEd Maste break; 48822c23cb7cSEd Maste 4883cf781b2eSEd Maste case DW_FORM_flag_present: 4884cf781b2eSEd Maste putchar('1'); 4885cf781b2eSEd Maste break; 4886cf781b2eSEd Maste 48872c23cb7cSEd Maste case DW_FORM_string: 48882c23cb7cSEd Maste case DW_FORM_strp: 48892c23cb7cSEd Maste if (dwarf_formstring(attr_list[i], &v_str, &de) != 48902c23cb7cSEd Maste DW_DLV_OK) { 48912c23cb7cSEd Maste warnx("dwarf_formstring failed: %s", 48922c23cb7cSEd Maste dwarf_errmsg(de)); 48932c23cb7cSEd Maste continue; 48942c23cb7cSEd Maste } 48952c23cb7cSEd Maste if (form == DW_FORM_string) 48962c23cb7cSEd Maste printf("%s", v_str); 48972c23cb7cSEd Maste else 48982c23cb7cSEd Maste printf("(indirect string) %s", v_str); 48992c23cb7cSEd Maste break; 49002c23cb7cSEd Maste 49012c23cb7cSEd Maste case DW_FORM_block: 49022c23cb7cSEd Maste case DW_FORM_block1: 49032c23cb7cSEd Maste case DW_FORM_block2: 49042c23cb7cSEd Maste case DW_FORM_block4: 49052c23cb7cSEd Maste if (dwarf_formblock(attr_list[i], &v_block, &de) != 49062c23cb7cSEd Maste DW_DLV_OK) { 49072c23cb7cSEd Maste warnx("dwarf_formblock failed: %s", 49082c23cb7cSEd Maste dwarf_errmsg(de)); 49092c23cb7cSEd Maste continue; 49102c23cb7cSEd Maste } 4911cf781b2eSEd Maste printf("%ju byte block:", (uintmax_t) v_block->bl_len); 49122c23cb7cSEd Maste b = v_block->bl_data; 49132c23cb7cSEd Maste for (j = 0; (Dwarf_Unsigned) j < v_block->bl_len; j++) 49142c23cb7cSEd Maste printf(" %x", b[j]); 4915cf781b2eSEd Maste printf("\t("); 4916cf781b2eSEd Maste dump_dwarf_block(re, v_block->bl_data, v_block->bl_len); 4917cf781b2eSEd Maste putchar(')'); 49182c23cb7cSEd Maste break; 4919cf781b2eSEd Maste 4920cf781b2eSEd Maste case DW_FORM_exprloc: 4921cf781b2eSEd Maste if (dwarf_formexprloc(attr_list[i], &v_udata, &v_expr, 4922cf781b2eSEd Maste &de) != DW_DLV_OK) { 4923cf781b2eSEd Maste warnx("dwarf_formexprloc failed: %s", 4924cf781b2eSEd Maste dwarf_errmsg(de)); 4925cf781b2eSEd Maste continue; 4926cf781b2eSEd Maste } 4927cf781b2eSEd Maste printf("%ju byte block:", (uintmax_t) v_udata); 4928cf781b2eSEd Maste b = v_expr; 4929cf781b2eSEd Maste for (j = 0; (Dwarf_Unsigned) j < v_udata; j++) 4930cf781b2eSEd Maste printf(" %x", b[j]); 4931cf781b2eSEd Maste printf("\t("); 4932cf781b2eSEd Maste dump_dwarf_block(re, v_expr, v_udata); 4933cf781b2eSEd Maste putchar(')'); 4934cf781b2eSEd Maste break; 4935cf781b2eSEd Maste 4936cf781b2eSEd Maste case DW_FORM_ref_sig8: 4937cf781b2eSEd Maste if (dwarf_formsig8(attr_list[i], &v_sig8, &de) != 4938cf781b2eSEd Maste DW_DLV_OK) { 4939cf781b2eSEd Maste warnx("dwarf_formsig8 failed: %s", 4940cf781b2eSEd Maste dwarf_errmsg(de)); 4941cf781b2eSEd Maste continue; 4942cf781b2eSEd Maste } 4943cf781b2eSEd Maste p = (uint8_t *)(uintptr_t) &v_sig8.signature[0]; 4944cf781b2eSEd Maste v_sig = re->dw_decode(&p, 8); 4945cf781b2eSEd Maste printf("signature: 0x%jx", (uintmax_t) v_sig); 49462c23cb7cSEd Maste } 49472c23cb7cSEd Maste switch (attr) { 49482c23cb7cSEd Maste case DW_AT_encoding: 49492c23cb7cSEd Maste if (dwarf_attrval_unsigned(die, attr, &ate, &de) != 49502c23cb7cSEd Maste DW_DLV_OK) 49512c23cb7cSEd Maste break; 49522c23cb7cSEd Maste if (dwarf_get_ATE_name(ate, &ate_str) != DW_DLV_OK) 4953cf781b2eSEd Maste ate_str = "DW_ATE_UNKNOWN"; 49542c23cb7cSEd Maste printf("\t(%s)", &ate_str[strlen("DW_ATE_")]); 49552c23cb7cSEd Maste break; 4956cf781b2eSEd Maste 4957cf781b2eSEd Maste case DW_AT_language: 4958cf781b2eSEd Maste if (dwarf_attrval_unsigned(die, attr, &lang, &de) != 4959cf781b2eSEd Maste DW_DLV_OK) 4960cf781b2eSEd Maste break; 4961cf781b2eSEd Maste if (dwarf_get_LANG_name(lang, &lang_str) != DW_DLV_OK) 4962cf781b2eSEd Maste break; 4963cf781b2eSEd Maste printf("\t(%s)", &lang_str[strlen("DW_LANG_")]); 4964cf781b2eSEd Maste break; 4965cf781b2eSEd Maste 4966cf781b2eSEd Maste case DW_AT_location: 4967cf781b2eSEd Maste case DW_AT_string_length: 4968cf781b2eSEd Maste case DW_AT_return_addr: 4969cf781b2eSEd Maste case DW_AT_data_member_location: 4970cf781b2eSEd Maste case DW_AT_frame_base: 4971cf781b2eSEd Maste case DW_AT_segment: 4972cf781b2eSEd Maste case DW_AT_static_link: 4973cf781b2eSEd Maste case DW_AT_use_location: 4974cf781b2eSEd Maste case DW_AT_vtable_elem_location: 4975cf781b2eSEd Maste switch (form) { 4976cf781b2eSEd Maste case DW_FORM_data4: 4977cf781b2eSEd Maste case DW_FORM_data8: 4978cf781b2eSEd Maste case DW_FORM_sec_offset: 4979cf781b2eSEd Maste printf("\t(location list)"); 4980cf781b2eSEd Maste break; 4981cf781b2eSEd Maste default: 4982cf781b2eSEd Maste break; 4983cf781b2eSEd Maste } 4984cf781b2eSEd Maste 49852c23cb7cSEd Maste default: 49862c23cb7cSEd Maste break; 49872c23cb7cSEd Maste } 49882c23cb7cSEd Maste putchar('\n'); 49892c23cb7cSEd Maste } 49902c23cb7cSEd Maste 49912c23cb7cSEd Maste 49922c23cb7cSEd Maste cont_search: 49932c23cb7cSEd Maste /* Search children. */ 49942c23cb7cSEd Maste ret = dwarf_child(die, &ret_die, &de); 49952c23cb7cSEd Maste if (ret == DW_DLV_ERROR) 49962c23cb7cSEd Maste warnx("dwarf_child: %s", dwarf_errmsg(de)); 49972c23cb7cSEd Maste else if (ret == DW_DLV_OK) 49982c23cb7cSEd Maste dump_dwarf_die(re, ret_die, level + 1); 49992c23cb7cSEd Maste 50002c23cb7cSEd Maste /* Search sibling. */ 5001cf781b2eSEd Maste is_info = dwarf_get_die_infotypes_flag(die); 5002cf781b2eSEd Maste ret = dwarf_siblingof_b(re->dbg, die, &ret_die, is_info, &de); 50032c23cb7cSEd Maste if (ret == DW_DLV_ERROR) 50042c23cb7cSEd Maste warnx("dwarf_siblingof: %s", dwarf_errmsg(de)); 50052c23cb7cSEd Maste else if (ret == DW_DLV_OK) 50062c23cb7cSEd Maste dump_dwarf_die(re, ret_die, level); 50072c23cb7cSEd Maste 50082c23cb7cSEd Maste dwarf_dealloc(re->dbg, die, DW_DLA_DIE); 50092c23cb7cSEd Maste } 50102c23cb7cSEd Maste 50112c23cb7cSEd Maste static void 5012cf781b2eSEd Maste set_cu_context(struct readelf *re, Dwarf_Half psize, Dwarf_Half osize, 5013cf781b2eSEd Maste Dwarf_Half ver) 5014cf781b2eSEd Maste { 5015cf781b2eSEd Maste 5016cf781b2eSEd Maste re->cu_psize = psize; 5017cf781b2eSEd Maste re->cu_osize = osize; 5018cf781b2eSEd Maste re->cu_ver = ver; 5019cf781b2eSEd Maste } 5020cf781b2eSEd Maste 5021cf781b2eSEd Maste static void 5022cf781b2eSEd Maste dump_dwarf_info(struct readelf *re, Dwarf_Bool is_info) 50232c23cb7cSEd Maste { 50242c23cb7cSEd Maste struct section *s; 50252c23cb7cSEd Maste Dwarf_Die die; 50262c23cb7cSEd Maste Dwarf_Error de; 5027cf781b2eSEd Maste Dwarf_Half tag, version, pointer_size, off_size; 50282c23cb7cSEd Maste Dwarf_Off cu_offset, cu_length; 50292c23cb7cSEd Maste Dwarf_Off aboff; 5030cf781b2eSEd Maste Dwarf_Unsigned typeoff; 5031cf781b2eSEd Maste Dwarf_Sig8 sig8; 5032cf781b2eSEd Maste Dwarf_Unsigned sig; 5033cf781b2eSEd Maste uint8_t *p; 5034cf781b2eSEd Maste const char *sn; 5035cf781b2eSEd Maste int i, ret; 50362c23cb7cSEd Maste 5037cf781b2eSEd Maste sn = is_info ? ".debug_info" : ".debug_types"; 50382c23cb7cSEd Maste 50392c23cb7cSEd Maste s = NULL; 50402c23cb7cSEd Maste for (i = 0; (size_t) i < re->shnum; i++) { 50412c23cb7cSEd Maste s = &re->sl[i]; 5042cf781b2eSEd Maste if (s->name != NULL && !strcmp(s->name, sn)) 50432c23cb7cSEd Maste break; 50442c23cb7cSEd Maste } 50452c23cb7cSEd Maste if ((size_t) i >= re->shnum) 50462c23cb7cSEd Maste return; 50472c23cb7cSEd Maste 5048cf781b2eSEd Maste do { 5049cf781b2eSEd Maste printf("\nDump of debug contents of section %s:\n", sn); 50502c23cb7cSEd Maste 5051cf781b2eSEd Maste while ((ret = dwarf_next_cu_header_c(re->dbg, is_info, NULL, 5052cf781b2eSEd Maste &version, &aboff, &pointer_size, &off_size, NULL, &sig8, 5053cf781b2eSEd Maste &typeoff, NULL, &de)) == DW_DLV_OK) { 5054cf781b2eSEd Maste set_cu_context(re, pointer_size, off_size, version); 50552c23cb7cSEd Maste die = NULL; 5056cf781b2eSEd Maste while (dwarf_siblingof_b(re->dbg, die, &die, is_info, 5057cf781b2eSEd Maste &de) == DW_DLV_OK) { 50582c23cb7cSEd Maste if (dwarf_tag(die, &tag, &de) != DW_DLV_OK) { 50592c23cb7cSEd Maste warnx("dwarf_tag failed: %s", 50602c23cb7cSEd Maste dwarf_errmsg(de)); 5061cf781b2eSEd Maste continue; 50622c23cb7cSEd Maste } 50632c23cb7cSEd Maste /* XXX: What about DW_TAG_partial_unit? */ 5064cf781b2eSEd Maste if ((is_info && tag == DW_TAG_compile_unit) || 5065cf781b2eSEd Maste (!is_info && tag == DW_TAG_type_unit)) 50662c23cb7cSEd Maste break; 50672c23cb7cSEd Maste } 5068cf781b2eSEd Maste if (die == NULL && is_info) { 5069cf781b2eSEd Maste warnx("could not find DW_TAG_compile_unit " 5070cf781b2eSEd Maste "die"); 5071cf781b2eSEd Maste continue; 5072cf781b2eSEd Maste } else if (die == NULL && !is_info) { 5073cf781b2eSEd Maste warnx("could not find DW_TAG_type_unit die"); 5074cf781b2eSEd Maste continue; 50752c23cb7cSEd Maste } 50762c23cb7cSEd Maste 5077cf781b2eSEd Maste if (dwarf_die_CU_offset_range(die, &cu_offset, 5078cf781b2eSEd Maste &cu_length, &de) != DW_DLV_OK) { 50792c23cb7cSEd Maste warnx("dwarf_die_CU_offset failed: %s", 50802c23cb7cSEd Maste dwarf_errmsg(de)); 50812c23cb7cSEd Maste continue; 50822c23cb7cSEd Maste } 50832c23cb7cSEd Maste 5084cf781b2eSEd Maste cu_length -= off_size == 4 ? 4 : 12; 5085cf781b2eSEd Maste 5086cf781b2eSEd Maste sig = 0; 5087cf781b2eSEd Maste if (!is_info) { 5088cf781b2eSEd Maste p = (uint8_t *)(uintptr_t) &sig8.signature[0]; 5089cf781b2eSEd Maste sig = re->dw_decode(&p, 8); 5090cf781b2eSEd Maste } 5091cf781b2eSEd Maste 5092cf781b2eSEd Maste printf("\n Type Unit @ offset 0x%jx:\n", 5093cf781b2eSEd Maste (uintmax_t) cu_offset); 5094cf781b2eSEd Maste printf(" Length:\t\t%#jx (%d-bit)\n", 5095cf781b2eSEd Maste (uintmax_t) cu_length, off_size == 4 ? 32 : 64); 50962c23cb7cSEd Maste printf(" Version:\t\t%u\n", version); 5097cf781b2eSEd Maste printf(" Abbrev Offset:\t0x%jx\n", 5098cf781b2eSEd Maste (uintmax_t) aboff); 50992c23cb7cSEd Maste printf(" Pointer Size:\t%u\n", pointer_size); 5100cf781b2eSEd Maste if (!is_info) { 5101cf781b2eSEd Maste printf(" Signature:\t\t0x%016jx\n", 5102cf781b2eSEd Maste (uintmax_t) sig); 5103cf781b2eSEd Maste printf(" Type Offset:\t0x%jx\n", 5104cf781b2eSEd Maste (uintmax_t) typeoff); 5105cf781b2eSEd Maste } 51062c23cb7cSEd Maste 51072c23cb7cSEd Maste dump_dwarf_die(re, die, 0); 51082c23cb7cSEd Maste } 51092c23cb7cSEd Maste if (ret == DW_DLV_ERROR) 51102c23cb7cSEd Maste warnx("dwarf_next_cu_header: %s", dwarf_errmsg(de)); 5111cf781b2eSEd Maste if (is_info) 5112cf781b2eSEd Maste break; 5113cf781b2eSEd Maste } while (dwarf_next_types_section(re->dbg, &de) == DW_DLV_OK); 51142c23cb7cSEd Maste } 51152c23cb7cSEd Maste 51162c23cb7cSEd Maste static void 51172c23cb7cSEd Maste dump_dwarf_abbrev(struct readelf *re) 51182c23cb7cSEd Maste { 51192c23cb7cSEd Maste Dwarf_Abbrev ab; 51202c23cb7cSEd Maste Dwarf_Off aboff, atoff; 51212c23cb7cSEd Maste Dwarf_Unsigned length, attr_count; 51222c23cb7cSEd Maste Dwarf_Signed flag, form; 51232c23cb7cSEd Maste Dwarf_Half tag, attr; 51242c23cb7cSEd Maste Dwarf_Error de; 51252c23cb7cSEd Maste const char *tag_str, *attr_str, *form_str; 5126cf781b2eSEd Maste char unk_tag[32], unk_attr[32], unk_form[32]; 51272c23cb7cSEd Maste int i, j, ret; 51282c23cb7cSEd Maste 51292c23cb7cSEd Maste printf("\nContents of section .debug_abbrev:\n\n"); 51302c23cb7cSEd Maste 51312c23cb7cSEd Maste while ((ret = dwarf_next_cu_header(re->dbg, NULL, NULL, &aboff, 51322c23cb7cSEd Maste NULL, NULL, &de)) == DW_DLV_OK) { 51332c23cb7cSEd Maste printf(" Number TAG\n"); 51342c23cb7cSEd Maste i = 0; 51352c23cb7cSEd Maste while ((ret = dwarf_get_abbrev(re->dbg, aboff, &ab, &length, 51362c23cb7cSEd Maste &attr_count, &de)) == DW_DLV_OK) { 51372c23cb7cSEd Maste if (length == 1) { 51382c23cb7cSEd Maste dwarf_dealloc(re->dbg, ab, DW_DLA_ABBREV); 51392c23cb7cSEd Maste break; 51402c23cb7cSEd Maste } 51412c23cb7cSEd Maste aboff += length; 51422c23cb7cSEd Maste printf("%4d", ++i); 51432c23cb7cSEd Maste if (dwarf_get_abbrev_tag(ab, &tag, &de) != DW_DLV_OK) { 51442c23cb7cSEd Maste warnx("dwarf_get_abbrev_tag failed: %s", 51452c23cb7cSEd Maste dwarf_errmsg(de)); 51462c23cb7cSEd Maste goto next_abbrev; 51472c23cb7cSEd Maste } 51482c23cb7cSEd Maste if (dwarf_get_TAG_name(tag, &tag_str) != DW_DLV_OK) { 5149cf781b2eSEd Maste snprintf(unk_tag, sizeof(unk_tag), 5150cf781b2eSEd Maste "[Unknown Tag: %#x]", tag); 5151cf781b2eSEd Maste tag_str = unk_tag; 51522c23cb7cSEd Maste } 51532c23cb7cSEd Maste if (dwarf_get_abbrev_children_flag(ab, &flag, &de) != 51542c23cb7cSEd Maste DW_DLV_OK) { 51552c23cb7cSEd Maste warnx("dwarf_get_abbrev_children_flag failed:" 51562c23cb7cSEd Maste " %s", dwarf_errmsg(de)); 51572c23cb7cSEd Maste goto next_abbrev; 51582c23cb7cSEd Maste } 51592c23cb7cSEd Maste printf(" %s %s\n", tag_str, 51602c23cb7cSEd Maste flag ? "[has children]" : "[no children]"); 51612c23cb7cSEd Maste for (j = 0; (Dwarf_Unsigned) j < attr_count; j++) { 51622c23cb7cSEd Maste if (dwarf_get_abbrev_entry(ab, (Dwarf_Signed) j, 51632c23cb7cSEd Maste &attr, &form, &atoff, &de) != DW_DLV_OK) { 51642c23cb7cSEd Maste warnx("dwarf_get_abbrev_entry failed:" 51652c23cb7cSEd Maste " %s", dwarf_errmsg(de)); 51662c23cb7cSEd Maste continue; 51672c23cb7cSEd Maste } 51682c23cb7cSEd Maste if (dwarf_get_AT_name(attr, &attr_str) != 51692c23cb7cSEd Maste DW_DLV_OK) { 5170cf781b2eSEd Maste snprintf(unk_attr, sizeof(unk_attr), 5171cf781b2eSEd Maste "[Unknown AT: %#x]", attr); 5172cf781b2eSEd Maste attr_str = unk_attr; 51732c23cb7cSEd Maste } 51742c23cb7cSEd Maste if (dwarf_get_FORM_name(form, &form_str) != 51752c23cb7cSEd Maste DW_DLV_OK) { 5176cf781b2eSEd Maste snprintf(unk_form, sizeof(unk_form), 5177cf781b2eSEd Maste "[Unknown Form: %#x]", 5178cf781b2eSEd Maste (Dwarf_Half) form); 5179cf781b2eSEd Maste form_str = unk_form; 51802c23cb7cSEd Maste } 51812c23cb7cSEd Maste printf(" %-18s %s\n", attr_str, form_str); 51822c23cb7cSEd Maste } 51832c23cb7cSEd Maste next_abbrev: 51842c23cb7cSEd Maste dwarf_dealloc(re->dbg, ab, DW_DLA_ABBREV); 51852c23cb7cSEd Maste } 51862c23cb7cSEd Maste if (ret != DW_DLV_OK) 51872c23cb7cSEd Maste warnx("dwarf_get_abbrev: %s", dwarf_errmsg(de)); 51882c23cb7cSEd Maste } 51892c23cb7cSEd Maste if (ret == DW_DLV_ERROR) 51902c23cb7cSEd Maste warnx("dwarf_next_cu_header: %s", dwarf_errmsg(de)); 51912c23cb7cSEd Maste } 51922c23cb7cSEd Maste 51932c23cb7cSEd Maste static void 51942c23cb7cSEd Maste dump_dwarf_pubnames(struct readelf *re) 51952c23cb7cSEd Maste { 51962c23cb7cSEd Maste struct section *s; 51972c23cb7cSEd Maste Dwarf_Off die_off; 51982c23cb7cSEd Maste Dwarf_Unsigned offset, length, nt_cu_offset, nt_cu_length; 51992c23cb7cSEd Maste Dwarf_Signed cnt; 52002c23cb7cSEd Maste Dwarf_Global *globs; 52012c23cb7cSEd Maste Dwarf_Half nt_version; 52022c23cb7cSEd Maste Dwarf_Error de; 52032c23cb7cSEd Maste Elf_Data *d; 52042c23cb7cSEd Maste char *glob_name; 52052c23cb7cSEd Maste int i, dwarf_size, elferr; 52062c23cb7cSEd Maste 52072c23cb7cSEd Maste printf("\nContents of the .debug_pubnames section:\n"); 52082c23cb7cSEd Maste 52092c23cb7cSEd Maste s = NULL; 52102c23cb7cSEd Maste for (i = 0; (size_t) i < re->shnum; i++) { 52112c23cb7cSEd Maste s = &re->sl[i]; 52122c23cb7cSEd Maste if (s->name != NULL && !strcmp(s->name, ".debug_pubnames")) 52132c23cb7cSEd Maste break; 52142c23cb7cSEd Maste } 52152c23cb7cSEd Maste if ((size_t) i >= re->shnum) 52162c23cb7cSEd Maste return; 52172c23cb7cSEd Maste 52182c23cb7cSEd Maste (void) elf_errno(); 52192c23cb7cSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 52202c23cb7cSEd Maste elferr = elf_errno(); 52212c23cb7cSEd Maste if (elferr != 0) 52222c23cb7cSEd Maste warnx("elf_getdata failed: %s", elf_errmsg(-1)); 52232c23cb7cSEd Maste return; 52242c23cb7cSEd Maste } 52252c23cb7cSEd Maste if (d->d_size <= 0) 52262c23cb7cSEd Maste return; 52272c23cb7cSEd Maste 52282c23cb7cSEd Maste /* Read in .debug_pubnames section table header. */ 52292c23cb7cSEd Maste offset = 0; 52302c23cb7cSEd Maste length = re->dw_read(d, &offset, 4); 52312c23cb7cSEd Maste if (length == 0xffffffff) { 52322c23cb7cSEd Maste dwarf_size = 8; 52332c23cb7cSEd Maste length = re->dw_read(d, &offset, 8); 52342c23cb7cSEd Maste } else 52352c23cb7cSEd Maste dwarf_size = 4; 52362c23cb7cSEd Maste 52372c23cb7cSEd Maste if (length > d->d_size - offset) { 52382c23cb7cSEd Maste warnx("invalid .dwarf_pubnames section"); 52392c23cb7cSEd Maste return; 52402c23cb7cSEd Maste } 52412c23cb7cSEd Maste 52422c23cb7cSEd Maste nt_version = re->dw_read(d, &offset, 2); 52432c23cb7cSEd Maste nt_cu_offset = re->dw_read(d, &offset, dwarf_size); 52442c23cb7cSEd Maste nt_cu_length = re->dw_read(d, &offset, dwarf_size); 52452c23cb7cSEd Maste printf(" Length:\t\t\t\t%ju\n", (uintmax_t) length); 52462c23cb7cSEd Maste printf(" Version:\t\t\t\t%u\n", nt_version); 52472c23cb7cSEd Maste printf(" Offset into .debug_info section:\t%ju\n", 52482c23cb7cSEd Maste (uintmax_t) nt_cu_offset); 52492c23cb7cSEd Maste printf(" Size of area in .debug_info section:\t%ju\n", 52502c23cb7cSEd Maste (uintmax_t) nt_cu_length); 52512c23cb7cSEd Maste 52522c23cb7cSEd Maste if (dwarf_get_globals(re->dbg, &globs, &cnt, &de) != DW_DLV_OK) { 52532c23cb7cSEd Maste warnx("dwarf_get_globals failed: %s", dwarf_errmsg(de)); 52542c23cb7cSEd Maste return; 52552c23cb7cSEd Maste } 52562c23cb7cSEd Maste 52572c23cb7cSEd Maste printf("\n Offset Name\n"); 52582c23cb7cSEd Maste for (i = 0; i < cnt; i++) { 52592c23cb7cSEd Maste if (dwarf_globname(globs[i], &glob_name, &de) != DW_DLV_OK) { 52602c23cb7cSEd Maste warnx("dwarf_globname failed: %s", dwarf_errmsg(de)); 52612c23cb7cSEd Maste continue; 52622c23cb7cSEd Maste } 52632c23cb7cSEd Maste if (dwarf_global_die_offset(globs[i], &die_off, &de) != 52642c23cb7cSEd Maste DW_DLV_OK) { 52652c23cb7cSEd Maste warnx("dwarf_global_die_offset failed: %s", 52662c23cb7cSEd Maste dwarf_errmsg(de)); 52672c23cb7cSEd Maste continue; 52682c23cb7cSEd Maste } 52692c23cb7cSEd Maste printf(" %-11ju %s\n", (uintmax_t) die_off, glob_name); 52702c23cb7cSEd Maste } 52712c23cb7cSEd Maste } 52722c23cb7cSEd Maste 52732c23cb7cSEd Maste static void 52742c23cb7cSEd Maste dump_dwarf_aranges(struct readelf *re) 52752c23cb7cSEd Maste { 52762c23cb7cSEd Maste struct section *s; 52772c23cb7cSEd Maste Dwarf_Arange *aranges; 52782c23cb7cSEd Maste Dwarf_Addr start; 52792c23cb7cSEd Maste Dwarf_Unsigned offset, length, as_cu_offset; 52802c23cb7cSEd Maste Dwarf_Off die_off; 52812c23cb7cSEd Maste Dwarf_Signed cnt; 52822c23cb7cSEd Maste Dwarf_Half as_version, as_addrsz, as_segsz; 52832c23cb7cSEd Maste Dwarf_Error de; 52842c23cb7cSEd Maste Elf_Data *d; 52852c23cb7cSEd Maste int i, dwarf_size, elferr; 52862c23cb7cSEd Maste 52872c23cb7cSEd Maste printf("\nContents of section .debug_aranges:\n"); 52882c23cb7cSEd Maste 52892c23cb7cSEd Maste s = NULL; 52902c23cb7cSEd Maste for (i = 0; (size_t) i < re->shnum; i++) { 52912c23cb7cSEd Maste s = &re->sl[i]; 52922c23cb7cSEd Maste if (s->name != NULL && !strcmp(s->name, ".debug_aranges")) 52932c23cb7cSEd Maste break; 52942c23cb7cSEd Maste } 52952c23cb7cSEd Maste if ((size_t) i >= re->shnum) 52962c23cb7cSEd Maste return; 52972c23cb7cSEd Maste 52982c23cb7cSEd Maste (void) elf_errno(); 52992c23cb7cSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 53002c23cb7cSEd Maste elferr = elf_errno(); 53012c23cb7cSEd Maste if (elferr != 0) 53022c23cb7cSEd Maste warnx("elf_getdata failed: %s", elf_errmsg(-1)); 53032c23cb7cSEd Maste return; 53042c23cb7cSEd Maste } 53052c23cb7cSEd Maste if (d->d_size <= 0) 53062c23cb7cSEd Maste return; 53072c23cb7cSEd Maste 53082c23cb7cSEd Maste /* Read in the .debug_aranges section table header. */ 53092c23cb7cSEd Maste offset = 0; 53102c23cb7cSEd Maste length = re->dw_read(d, &offset, 4); 53112c23cb7cSEd Maste if (length == 0xffffffff) { 53122c23cb7cSEd Maste dwarf_size = 8; 53132c23cb7cSEd Maste length = re->dw_read(d, &offset, 8); 53142c23cb7cSEd Maste } else 53152c23cb7cSEd Maste dwarf_size = 4; 53162c23cb7cSEd Maste 53172c23cb7cSEd Maste if (length > d->d_size - offset) { 53182c23cb7cSEd Maste warnx("invalid .dwarf_aranges section"); 53192c23cb7cSEd Maste return; 53202c23cb7cSEd Maste } 53212c23cb7cSEd Maste 53222c23cb7cSEd Maste as_version = re->dw_read(d, &offset, 2); 53232c23cb7cSEd Maste as_cu_offset = re->dw_read(d, &offset, dwarf_size); 53242c23cb7cSEd Maste as_addrsz = re->dw_read(d, &offset, 1); 53252c23cb7cSEd Maste as_segsz = re->dw_read(d, &offset, 1); 53262c23cb7cSEd Maste 53272c23cb7cSEd Maste printf(" Length:\t\t\t%ju\n", (uintmax_t) length); 53282c23cb7cSEd Maste printf(" Version:\t\t\t%u\n", as_version); 53292c23cb7cSEd Maste printf(" Offset into .debug_info:\t%ju\n", (uintmax_t) as_cu_offset); 53302c23cb7cSEd Maste printf(" Pointer Size:\t\t\t%u\n", as_addrsz); 53312c23cb7cSEd Maste printf(" Segment Size:\t\t\t%u\n", as_segsz); 53322c23cb7cSEd Maste 53332c23cb7cSEd Maste if (dwarf_get_aranges(re->dbg, &aranges, &cnt, &de) != DW_DLV_OK) { 53342c23cb7cSEd Maste warnx("dwarf_get_aranges failed: %s", dwarf_errmsg(de)); 53352c23cb7cSEd Maste return; 53362c23cb7cSEd Maste } 53372c23cb7cSEd Maste 53382c23cb7cSEd Maste printf("\n Address Length\n"); 53392c23cb7cSEd Maste for (i = 0; i < cnt; i++) { 53402c23cb7cSEd Maste if (dwarf_get_arange_info(aranges[i], &start, &length, 53412c23cb7cSEd Maste &die_off, &de) != DW_DLV_OK) { 53422c23cb7cSEd Maste warnx("dwarf_get_arange_info failed: %s", 53432c23cb7cSEd Maste dwarf_errmsg(de)); 53442c23cb7cSEd Maste continue; 53452c23cb7cSEd Maste } 53462c23cb7cSEd Maste printf(" %08jx %ju\n", (uintmax_t) start, 53472c23cb7cSEd Maste (uintmax_t) length); 53482c23cb7cSEd Maste } 53492c23cb7cSEd Maste } 53502c23cb7cSEd Maste 53512c23cb7cSEd Maste static void 53522c23cb7cSEd Maste dump_dwarf_ranges_foreach(struct readelf *re, Dwarf_Die die, Dwarf_Addr base) 53532c23cb7cSEd Maste { 53542c23cb7cSEd Maste Dwarf_Attribute *attr_list; 53552c23cb7cSEd Maste Dwarf_Ranges *ranges; 53562c23cb7cSEd Maste Dwarf_Die ret_die; 53572c23cb7cSEd Maste Dwarf_Error de; 53582c23cb7cSEd Maste Dwarf_Addr base0; 53592c23cb7cSEd Maste Dwarf_Half attr; 53602c23cb7cSEd Maste Dwarf_Signed attr_count, cnt; 53612c23cb7cSEd Maste Dwarf_Unsigned off, bytecnt; 53622c23cb7cSEd Maste int i, j, ret; 53632c23cb7cSEd Maste 53642c23cb7cSEd Maste if ((ret = dwarf_attrlist(die, &attr_list, &attr_count, &de)) != 53652c23cb7cSEd Maste DW_DLV_OK) { 53662c23cb7cSEd Maste if (ret == DW_DLV_ERROR) 53672c23cb7cSEd Maste warnx("dwarf_attrlist failed: %s", dwarf_errmsg(de)); 53682c23cb7cSEd Maste goto cont_search; 53692c23cb7cSEd Maste } 53702c23cb7cSEd Maste 53712c23cb7cSEd Maste for (i = 0; i < attr_count; i++) { 53722c23cb7cSEd Maste if (dwarf_whatattr(attr_list[i], &attr, &de) != DW_DLV_OK) { 53732c23cb7cSEd Maste warnx("dwarf_whatattr failed: %s", dwarf_errmsg(de)); 53742c23cb7cSEd Maste continue; 53752c23cb7cSEd Maste } 53762c23cb7cSEd Maste if (attr != DW_AT_ranges) 53772c23cb7cSEd Maste continue; 53782c23cb7cSEd Maste if (dwarf_formudata(attr_list[i], &off, &de) != DW_DLV_OK) { 53792c23cb7cSEd Maste warnx("dwarf_formudata failed: %s", dwarf_errmsg(de)); 53802c23cb7cSEd Maste continue; 53812c23cb7cSEd Maste } 53822c23cb7cSEd Maste if (dwarf_get_ranges(re->dbg, (Dwarf_Off) off, &ranges, &cnt, 53832c23cb7cSEd Maste &bytecnt, &de) != DW_DLV_OK) 53842c23cb7cSEd Maste continue; 53852c23cb7cSEd Maste base0 = base; 53862c23cb7cSEd Maste for (j = 0; j < cnt; j++) { 53872c23cb7cSEd Maste printf(" %08jx ", (uintmax_t) off); 53882c23cb7cSEd Maste if (ranges[j].dwr_type == DW_RANGES_END) { 53892c23cb7cSEd Maste printf("%s\n", "<End of list>"); 53902c23cb7cSEd Maste continue; 53912c23cb7cSEd Maste } else if (ranges[j].dwr_type == 53922c23cb7cSEd Maste DW_RANGES_ADDRESS_SELECTION) { 53932c23cb7cSEd Maste base0 = ranges[j].dwr_addr2; 53942c23cb7cSEd Maste continue; 53952c23cb7cSEd Maste } 53962c23cb7cSEd Maste if (re->ec == ELFCLASS32) 53972c23cb7cSEd Maste printf("%08jx %08jx\n", 5398839529caSEd Maste (uintmax_t) (ranges[j].dwr_addr1 + base0), 5399839529caSEd Maste (uintmax_t) (ranges[j].dwr_addr2 + base0)); 54002c23cb7cSEd Maste else 54012c23cb7cSEd Maste printf("%016jx %016jx\n", 5402839529caSEd Maste (uintmax_t) (ranges[j].dwr_addr1 + base0), 5403839529caSEd Maste (uintmax_t) (ranges[j].dwr_addr2 + base0)); 54042c23cb7cSEd Maste } 54052c23cb7cSEd Maste } 54062c23cb7cSEd Maste 54072c23cb7cSEd Maste cont_search: 54082c23cb7cSEd Maste /* Search children. */ 54092c23cb7cSEd Maste ret = dwarf_child(die, &ret_die, &de); 54102c23cb7cSEd Maste if (ret == DW_DLV_ERROR) 54112c23cb7cSEd Maste warnx("dwarf_child: %s", dwarf_errmsg(de)); 54122c23cb7cSEd Maste else if (ret == DW_DLV_OK) 54132c23cb7cSEd Maste dump_dwarf_ranges_foreach(re, ret_die, base); 54142c23cb7cSEd Maste 54152c23cb7cSEd Maste /* Search sibling. */ 54162c23cb7cSEd Maste ret = dwarf_siblingof(re->dbg, die, &ret_die, &de); 54172c23cb7cSEd Maste if (ret == DW_DLV_ERROR) 54182c23cb7cSEd Maste warnx("dwarf_siblingof: %s", dwarf_errmsg(de)); 54192c23cb7cSEd Maste else if (ret == DW_DLV_OK) 54202c23cb7cSEd Maste dump_dwarf_ranges_foreach(re, ret_die, base); 54212c23cb7cSEd Maste } 54222c23cb7cSEd Maste 54232c23cb7cSEd Maste static void 54242c23cb7cSEd Maste dump_dwarf_ranges(struct readelf *re) 54252c23cb7cSEd Maste { 54262c23cb7cSEd Maste Dwarf_Ranges *ranges; 54272c23cb7cSEd Maste Dwarf_Die die; 54282c23cb7cSEd Maste Dwarf_Signed cnt; 54292c23cb7cSEd Maste Dwarf_Unsigned bytecnt; 54302c23cb7cSEd Maste Dwarf_Half tag; 54312c23cb7cSEd Maste Dwarf_Error de; 54322c23cb7cSEd Maste Dwarf_Unsigned lowpc; 54332c23cb7cSEd Maste int ret; 54342c23cb7cSEd Maste 54352c23cb7cSEd Maste if (dwarf_get_ranges(re->dbg, 0, &ranges, &cnt, &bytecnt, &de) != 54362c23cb7cSEd Maste DW_DLV_OK) 54372c23cb7cSEd Maste return; 54382c23cb7cSEd Maste 54392c23cb7cSEd Maste printf("Contents of the .debug_ranges section:\n\n"); 54402c23cb7cSEd Maste if (re->ec == ELFCLASS32) 54412c23cb7cSEd Maste printf(" %-8s %-8s %s\n", "Offset", "Begin", "End"); 54422c23cb7cSEd Maste else 54432c23cb7cSEd Maste printf(" %-8s %-16s %s\n", "Offset", "Begin", "End"); 54442c23cb7cSEd Maste 54452c23cb7cSEd Maste while ((ret = dwarf_next_cu_header(re->dbg, NULL, NULL, NULL, NULL, 54462c23cb7cSEd Maste NULL, &de)) == DW_DLV_OK) { 54472c23cb7cSEd Maste die = NULL; 54482c23cb7cSEd Maste if (dwarf_siblingof(re->dbg, die, &die, &de) != DW_DLV_OK) 54492c23cb7cSEd Maste continue; 54502c23cb7cSEd Maste if (dwarf_tag(die, &tag, &de) != DW_DLV_OK) { 54512c23cb7cSEd Maste warnx("dwarf_tag failed: %s", dwarf_errmsg(de)); 54522c23cb7cSEd Maste continue; 54532c23cb7cSEd Maste } 54542c23cb7cSEd Maste /* XXX: What about DW_TAG_partial_unit? */ 54552c23cb7cSEd Maste lowpc = 0; 54562c23cb7cSEd Maste if (tag == DW_TAG_compile_unit) { 54572c23cb7cSEd Maste if (dwarf_attrval_unsigned(die, DW_AT_low_pc, &lowpc, 54582c23cb7cSEd Maste &de) != DW_DLV_OK) 54592c23cb7cSEd Maste lowpc = 0; 54602c23cb7cSEd Maste } 54612c23cb7cSEd Maste 54622c23cb7cSEd Maste dump_dwarf_ranges_foreach(re, die, (Dwarf_Addr) lowpc); 54632c23cb7cSEd Maste } 54642c23cb7cSEd Maste putchar('\n'); 54652c23cb7cSEd Maste } 54662c23cb7cSEd Maste 54672c23cb7cSEd Maste static void 54682c23cb7cSEd Maste dump_dwarf_macinfo(struct readelf *re) 54692c23cb7cSEd Maste { 54702c23cb7cSEd Maste Dwarf_Unsigned offset; 54712c23cb7cSEd Maste Dwarf_Signed cnt; 54722c23cb7cSEd Maste Dwarf_Macro_Details *md; 54732c23cb7cSEd Maste Dwarf_Error de; 54742c23cb7cSEd Maste const char *mi_str; 5475cf781b2eSEd Maste char unk_mi[32]; 54762c23cb7cSEd Maste int i; 54772c23cb7cSEd Maste 54782c23cb7cSEd Maste #define _MAX_MACINFO_ENTRY 65535 54792c23cb7cSEd Maste 54802c23cb7cSEd Maste printf("\nContents of section .debug_macinfo:\n\n"); 54812c23cb7cSEd Maste 54822c23cb7cSEd Maste offset = 0; 54832c23cb7cSEd Maste while (dwarf_get_macro_details(re->dbg, offset, _MAX_MACINFO_ENTRY, 54842c23cb7cSEd Maste &cnt, &md, &de) == DW_DLV_OK) { 54852c23cb7cSEd Maste for (i = 0; i < cnt; i++) { 54862c23cb7cSEd Maste offset = md[i].dmd_offset + 1; 54872c23cb7cSEd Maste if (md[i].dmd_type == 0) 54882c23cb7cSEd Maste break; 54892c23cb7cSEd Maste if (dwarf_get_MACINFO_name(md[i].dmd_type, &mi_str) != 54902c23cb7cSEd Maste DW_DLV_OK) { 5491cf781b2eSEd Maste snprintf(unk_mi, sizeof(unk_mi), 5492cf781b2eSEd Maste "[Unknown MACINFO: %#x]", md[i].dmd_type); 5493cf781b2eSEd Maste mi_str = unk_mi; 54942c23cb7cSEd Maste } 54952c23cb7cSEd Maste printf(" %s", mi_str); 54962c23cb7cSEd Maste switch (md[i].dmd_type) { 54972c23cb7cSEd Maste case DW_MACINFO_define: 54982c23cb7cSEd Maste case DW_MACINFO_undef: 54992c23cb7cSEd Maste printf(" - lineno : %jd macro : %s\n", 55002c23cb7cSEd Maste (intmax_t) md[i].dmd_lineno, 55012c23cb7cSEd Maste md[i].dmd_macro); 55022c23cb7cSEd Maste break; 55032c23cb7cSEd Maste case DW_MACINFO_start_file: 55042c23cb7cSEd Maste printf(" - lineno : %jd filenum : %jd\n", 55052c23cb7cSEd Maste (intmax_t) md[i].dmd_lineno, 55062c23cb7cSEd Maste (intmax_t) md[i].dmd_fileindex); 55072c23cb7cSEd Maste break; 55082c23cb7cSEd Maste default: 55092c23cb7cSEd Maste putchar('\n'); 55102c23cb7cSEd Maste break; 55112c23cb7cSEd Maste } 55122c23cb7cSEd Maste } 55132c23cb7cSEd Maste } 55142c23cb7cSEd Maste 55152c23cb7cSEd Maste #undef _MAX_MACINFO_ENTRY 55162c23cb7cSEd Maste } 55172c23cb7cSEd Maste 55182c23cb7cSEd Maste static void 5519cf781b2eSEd Maste dump_dwarf_frame_inst(struct readelf *re, Dwarf_Cie cie, uint8_t *insts, 5520cf781b2eSEd Maste Dwarf_Unsigned len, Dwarf_Unsigned caf, Dwarf_Signed daf, Dwarf_Addr pc, 5521cf781b2eSEd Maste Dwarf_Debug dbg) 55222c23cb7cSEd Maste { 55232c23cb7cSEd Maste Dwarf_Frame_Op *oplist; 55242c23cb7cSEd Maste Dwarf_Signed opcnt, delta; 55252c23cb7cSEd Maste Dwarf_Small op; 55262c23cb7cSEd Maste Dwarf_Error de; 55272c23cb7cSEd Maste const char *op_str; 5528cf781b2eSEd Maste char unk_op[32]; 55292c23cb7cSEd Maste int i; 55302c23cb7cSEd Maste 55312c23cb7cSEd Maste if (dwarf_expand_frame_instructions(cie, insts, len, &oplist, 55322c23cb7cSEd Maste &opcnt, &de) != DW_DLV_OK) { 55332c23cb7cSEd Maste warnx("dwarf_expand_frame_instructions failed: %s", 55342c23cb7cSEd Maste dwarf_errmsg(de)); 55352c23cb7cSEd Maste return; 55362c23cb7cSEd Maste } 55372c23cb7cSEd Maste 55382c23cb7cSEd Maste for (i = 0; i < opcnt; i++) { 55392c23cb7cSEd Maste if (oplist[i].fp_base_op != 0) 55402c23cb7cSEd Maste op = oplist[i].fp_base_op << 6; 55412c23cb7cSEd Maste else 55422c23cb7cSEd Maste op = oplist[i].fp_extended_op; 55432c23cb7cSEd Maste if (dwarf_get_CFA_name(op, &op_str) != DW_DLV_OK) { 5544cf781b2eSEd Maste snprintf(unk_op, sizeof(unk_op), "[Unknown CFA: %#x]", 5545cf781b2eSEd Maste op); 5546cf781b2eSEd Maste op_str = unk_op; 55472c23cb7cSEd Maste } 55482c23cb7cSEd Maste printf(" %s", op_str); 55492c23cb7cSEd Maste switch (op) { 55502c23cb7cSEd Maste case DW_CFA_advance_loc: 55512c23cb7cSEd Maste delta = oplist[i].fp_offset * caf; 55522c23cb7cSEd Maste pc += delta; 55532c23cb7cSEd Maste printf(": %ju to %08jx", (uintmax_t) delta, 55542c23cb7cSEd Maste (uintmax_t) pc); 55552c23cb7cSEd Maste break; 55562c23cb7cSEd Maste case DW_CFA_offset: 55572c23cb7cSEd Maste case DW_CFA_offset_extended: 55582c23cb7cSEd Maste case DW_CFA_offset_extended_sf: 55592c23cb7cSEd Maste delta = oplist[i].fp_offset * daf; 5560cf781b2eSEd Maste printf(": r%u (%s) at cfa%+jd", oplist[i].fp_register, 5561cf781b2eSEd Maste dwarf_regname(re, oplist[i].fp_register), 55622c23cb7cSEd Maste (intmax_t) delta); 55632c23cb7cSEd Maste break; 55642c23cb7cSEd Maste case DW_CFA_restore: 5565cf781b2eSEd Maste printf(": r%u (%s)", oplist[i].fp_register, 5566cf781b2eSEd Maste dwarf_regname(re, oplist[i].fp_register)); 55672c23cb7cSEd Maste break; 55682c23cb7cSEd Maste case DW_CFA_set_loc: 55692c23cb7cSEd Maste pc = oplist[i].fp_offset; 55702c23cb7cSEd Maste printf(": to %08jx", (uintmax_t) pc); 55712c23cb7cSEd Maste break; 55722c23cb7cSEd Maste case DW_CFA_advance_loc1: 55732c23cb7cSEd Maste case DW_CFA_advance_loc2: 55742c23cb7cSEd Maste case DW_CFA_advance_loc4: 55752c23cb7cSEd Maste pc += oplist[i].fp_offset; 55762c23cb7cSEd Maste printf(": %jd to %08jx", (intmax_t) oplist[i].fp_offset, 55772c23cb7cSEd Maste (uintmax_t) pc); 55782c23cb7cSEd Maste break; 55792c23cb7cSEd Maste case DW_CFA_def_cfa: 5580cf781b2eSEd Maste printf(": r%u (%s) ofs %ju", oplist[i].fp_register, 5581cf781b2eSEd Maste dwarf_regname(re, oplist[i].fp_register), 55822c23cb7cSEd Maste (uintmax_t) oplist[i].fp_offset); 55832c23cb7cSEd Maste break; 55842c23cb7cSEd Maste case DW_CFA_def_cfa_sf: 5585cf781b2eSEd Maste printf(": r%u (%s) ofs %jd", oplist[i].fp_register, 5586cf781b2eSEd Maste dwarf_regname(re, oplist[i].fp_register), 55872c23cb7cSEd Maste (intmax_t) (oplist[i].fp_offset * daf)); 55882c23cb7cSEd Maste break; 55892c23cb7cSEd Maste case DW_CFA_def_cfa_register: 5590cf781b2eSEd Maste printf(": r%u (%s)", oplist[i].fp_register, 5591cf781b2eSEd Maste dwarf_regname(re, oplist[i].fp_register)); 55922c23cb7cSEd Maste break; 55932c23cb7cSEd Maste case DW_CFA_def_cfa_offset: 55942c23cb7cSEd Maste printf(": %ju", (uintmax_t) oplist[i].fp_offset); 55952c23cb7cSEd Maste break; 55962c23cb7cSEd Maste case DW_CFA_def_cfa_offset_sf: 55972c23cb7cSEd Maste printf(": %jd", (intmax_t) (oplist[i].fp_offset * daf)); 55982c23cb7cSEd Maste break; 55992c23cb7cSEd Maste default: 56002c23cb7cSEd Maste break; 56012c23cb7cSEd Maste } 56022c23cb7cSEd Maste putchar('\n'); 56032c23cb7cSEd Maste } 56042c23cb7cSEd Maste 56052c23cb7cSEd Maste dwarf_dealloc(dbg, oplist, DW_DLA_FRAME_BLOCK); 56062c23cb7cSEd Maste } 56072c23cb7cSEd Maste 56082c23cb7cSEd Maste static char * 5609cf781b2eSEd Maste get_regoff_str(struct readelf *re, Dwarf_Half reg, Dwarf_Addr off) 56102c23cb7cSEd Maste { 56112c23cb7cSEd Maste static char rs[16]; 56122c23cb7cSEd Maste 56132c23cb7cSEd Maste if (reg == DW_FRAME_UNDEFINED_VAL || reg == DW_FRAME_REG_INITIAL_VALUE) 56142c23cb7cSEd Maste snprintf(rs, sizeof(rs), "%c", 'u'); 56152c23cb7cSEd Maste else if (reg == DW_FRAME_CFA_COL) 56162c23cb7cSEd Maste snprintf(rs, sizeof(rs), "c%+jd", (intmax_t) off); 56172c23cb7cSEd Maste else 5618cf781b2eSEd Maste snprintf(rs, sizeof(rs), "%s%+jd", dwarf_regname(re, reg), 5619cf781b2eSEd Maste (intmax_t) off); 56202c23cb7cSEd Maste 56212c23cb7cSEd Maste return (rs); 56222c23cb7cSEd Maste } 56232c23cb7cSEd Maste 56242c23cb7cSEd Maste static int 5625cf781b2eSEd Maste dump_dwarf_frame_regtable(struct readelf *re, Dwarf_Fde fde, Dwarf_Addr pc, 5626cf781b2eSEd Maste Dwarf_Unsigned func_len, Dwarf_Half cie_ra) 56272c23cb7cSEd Maste { 56282c23cb7cSEd Maste Dwarf_Regtable rt; 56292c23cb7cSEd Maste Dwarf_Addr row_pc, end_pc, pre_pc, cur_pc; 56302c23cb7cSEd Maste Dwarf_Error de; 56312c23cb7cSEd Maste char *vec; 56322c23cb7cSEd Maste int i; 56332c23cb7cSEd Maste 56342c23cb7cSEd Maste #define BIT_SET(v, n) (v[(n)>>3] |= 1U << ((n) & 7)) 56352c23cb7cSEd Maste #define BIT_CLR(v, n) (v[(n)>>3] &= ~(1U << ((n) & 7))) 56362c23cb7cSEd Maste #define BIT_ISSET(v, n) (v[(n)>>3] & (1U << ((n) & 7))) 56372c23cb7cSEd Maste #define RT(x) rt.rules[(x)] 56382c23cb7cSEd Maste 56392c23cb7cSEd Maste vec = calloc((DW_REG_TABLE_SIZE + 7) / 8, 1); 56402c23cb7cSEd Maste if (vec == NULL) 56412c23cb7cSEd Maste err(EXIT_FAILURE, "calloc failed"); 56422c23cb7cSEd Maste 56432c23cb7cSEd Maste pre_pc = ~((Dwarf_Addr) 0); 56442c23cb7cSEd Maste cur_pc = pc; 56452c23cb7cSEd Maste end_pc = pc + func_len; 56462c23cb7cSEd Maste for (; cur_pc < end_pc; cur_pc++) { 56472c23cb7cSEd Maste if (dwarf_get_fde_info_for_all_regs(fde, cur_pc, &rt, &row_pc, 56482c23cb7cSEd Maste &de) != DW_DLV_OK) { 56492c23cb7cSEd Maste warnx("dwarf_get_fde_info_for_all_regs failed: %s\n", 56502c23cb7cSEd Maste dwarf_errmsg(de)); 56512c23cb7cSEd Maste return (-1); 56522c23cb7cSEd Maste } 56532c23cb7cSEd Maste if (row_pc == pre_pc) 56542c23cb7cSEd Maste continue; 56552c23cb7cSEd Maste pre_pc = row_pc; 56562c23cb7cSEd Maste for (i = 1; i < DW_REG_TABLE_SIZE; i++) { 56572c23cb7cSEd Maste if (rt.rules[i].dw_regnum != DW_FRAME_REG_INITIAL_VALUE) 56582c23cb7cSEd Maste BIT_SET(vec, i); 56592c23cb7cSEd Maste } 56602c23cb7cSEd Maste } 56612c23cb7cSEd Maste 56622c23cb7cSEd Maste printf(" LOC CFA "); 56632c23cb7cSEd Maste for (i = 1; i < DW_REG_TABLE_SIZE; i++) { 56642c23cb7cSEd Maste if (BIT_ISSET(vec, i)) { 56652c23cb7cSEd Maste if ((Dwarf_Half) i == cie_ra) 56662c23cb7cSEd Maste printf("ra "); 5667cf781b2eSEd Maste else 5668cf781b2eSEd Maste printf("%-5s", 5669cf781b2eSEd Maste dwarf_regname(re, (unsigned int) i)); 56702c23cb7cSEd Maste } 56712c23cb7cSEd Maste } 56722c23cb7cSEd Maste putchar('\n'); 56732c23cb7cSEd Maste 56742c23cb7cSEd Maste pre_pc = ~((Dwarf_Addr) 0); 56752c23cb7cSEd Maste cur_pc = pc; 56762c23cb7cSEd Maste end_pc = pc + func_len; 56772c23cb7cSEd Maste for (; cur_pc < end_pc; cur_pc++) { 56782c23cb7cSEd Maste if (dwarf_get_fde_info_for_all_regs(fde, cur_pc, &rt, &row_pc, 56792c23cb7cSEd Maste &de) != DW_DLV_OK) { 56802c23cb7cSEd Maste warnx("dwarf_get_fde_info_for_all_regs failed: %s\n", 56812c23cb7cSEd Maste dwarf_errmsg(de)); 56822c23cb7cSEd Maste return (-1); 56832c23cb7cSEd Maste } 56842c23cb7cSEd Maste if (row_pc == pre_pc) 56852c23cb7cSEd Maste continue; 56862c23cb7cSEd Maste pre_pc = row_pc; 56872c23cb7cSEd Maste printf("%08jx ", (uintmax_t) row_pc); 5688cf781b2eSEd Maste printf("%-8s ", get_regoff_str(re, RT(0).dw_regnum, 56892c23cb7cSEd Maste RT(0).dw_offset)); 56902c23cb7cSEd Maste for (i = 1; i < DW_REG_TABLE_SIZE; i++) { 56912c23cb7cSEd Maste if (BIT_ISSET(vec, i)) { 5692cf781b2eSEd Maste printf("%-5s", get_regoff_str(re, 5693cf781b2eSEd Maste RT(i).dw_regnum, RT(i).dw_offset)); 56942c23cb7cSEd Maste } 56952c23cb7cSEd Maste } 56962c23cb7cSEd Maste putchar('\n'); 56972c23cb7cSEd Maste } 56982c23cb7cSEd Maste 56992c23cb7cSEd Maste free(vec); 57002c23cb7cSEd Maste 57012c23cb7cSEd Maste return (0); 57022c23cb7cSEd Maste 57032c23cb7cSEd Maste #undef BIT_SET 57042c23cb7cSEd Maste #undef BIT_CLR 57052c23cb7cSEd Maste #undef BIT_ISSET 57062c23cb7cSEd Maste #undef RT 57072c23cb7cSEd Maste } 57082c23cb7cSEd Maste 57092c23cb7cSEd Maste static void 57102c23cb7cSEd Maste dump_dwarf_frame_section(struct readelf *re, struct section *s, int alt) 57112c23cb7cSEd Maste { 57122c23cb7cSEd Maste Dwarf_Cie *cie_list, cie, pre_cie; 57132c23cb7cSEd Maste Dwarf_Fde *fde_list, fde; 57142c23cb7cSEd Maste Dwarf_Off cie_offset, fde_offset; 57152c23cb7cSEd Maste Dwarf_Unsigned cie_length, fde_instlen; 57162c23cb7cSEd Maste Dwarf_Unsigned cie_caf, cie_daf, cie_instlen, func_len, fde_length; 57172c23cb7cSEd Maste Dwarf_Signed cie_count, fde_count, cie_index; 57182c23cb7cSEd Maste Dwarf_Addr low_pc; 57192c23cb7cSEd Maste Dwarf_Half cie_ra; 57202c23cb7cSEd Maste Dwarf_Small cie_version; 57212c23cb7cSEd Maste Dwarf_Ptr fde_addr, fde_inst, cie_inst; 57222c23cb7cSEd Maste char *cie_aug, c; 57232c23cb7cSEd Maste int i, eh_frame; 57242c23cb7cSEd Maste Dwarf_Error de; 57252c23cb7cSEd Maste 57262c23cb7cSEd Maste printf("\nThe section %s contains:\n\n", s->name); 57272c23cb7cSEd Maste 57282c23cb7cSEd Maste if (!strcmp(s->name, ".debug_frame")) { 57292c23cb7cSEd Maste eh_frame = 0; 57302c23cb7cSEd Maste if (dwarf_get_fde_list(re->dbg, &cie_list, &cie_count, 57312c23cb7cSEd Maste &fde_list, &fde_count, &de) != DW_DLV_OK) { 57322c23cb7cSEd Maste warnx("dwarf_get_fde_list failed: %s", 57332c23cb7cSEd Maste dwarf_errmsg(de)); 57342c23cb7cSEd Maste return; 57352c23cb7cSEd Maste } 57362c23cb7cSEd Maste } else if (!strcmp(s->name, ".eh_frame")) { 57372c23cb7cSEd Maste eh_frame = 1; 57382c23cb7cSEd Maste if (dwarf_get_fde_list_eh(re->dbg, &cie_list, &cie_count, 57392c23cb7cSEd Maste &fde_list, &fde_count, &de) != DW_DLV_OK) { 57402c23cb7cSEd Maste warnx("dwarf_get_fde_list_eh failed: %s", 57412c23cb7cSEd Maste dwarf_errmsg(de)); 57422c23cb7cSEd Maste return; 57432c23cb7cSEd Maste } 57442c23cb7cSEd Maste } else 57452c23cb7cSEd Maste return; 57462c23cb7cSEd Maste 57472c23cb7cSEd Maste pre_cie = NULL; 57482c23cb7cSEd Maste for (i = 0; i < fde_count; i++) { 57492c23cb7cSEd Maste if (dwarf_get_fde_n(fde_list, i, &fde, &de) != DW_DLV_OK) { 57502c23cb7cSEd Maste warnx("dwarf_get_fde_n failed: %s", dwarf_errmsg(de)); 57512c23cb7cSEd Maste continue; 57522c23cb7cSEd Maste } 57532c23cb7cSEd Maste if (dwarf_get_cie_of_fde(fde, &cie, &de) != DW_DLV_OK) { 57542c23cb7cSEd Maste warnx("dwarf_get_fde_n failed: %s", dwarf_errmsg(de)); 57552c23cb7cSEd Maste continue; 57562c23cb7cSEd Maste } 57572c23cb7cSEd Maste if (dwarf_get_fde_range(fde, &low_pc, &func_len, &fde_addr, 57582c23cb7cSEd Maste &fde_length, &cie_offset, &cie_index, &fde_offset, 57592c23cb7cSEd Maste &de) != DW_DLV_OK) { 57602c23cb7cSEd Maste warnx("dwarf_get_fde_range failed: %s", 57612c23cb7cSEd Maste dwarf_errmsg(de)); 57622c23cb7cSEd Maste continue; 57632c23cb7cSEd Maste } 57642c23cb7cSEd Maste if (dwarf_get_fde_instr_bytes(fde, &fde_inst, &fde_instlen, 57652c23cb7cSEd Maste &de) != DW_DLV_OK) { 57662c23cb7cSEd Maste warnx("dwarf_get_fde_instr_bytes failed: %s", 57672c23cb7cSEd Maste dwarf_errmsg(de)); 57682c23cb7cSEd Maste continue; 57692c23cb7cSEd Maste } 57702c23cb7cSEd Maste if (pre_cie == NULL || cie != pre_cie) { 57712c23cb7cSEd Maste pre_cie = cie; 57722c23cb7cSEd Maste if (dwarf_get_cie_info(cie, &cie_length, &cie_version, 57732c23cb7cSEd Maste &cie_aug, &cie_caf, &cie_daf, &cie_ra, 57742c23cb7cSEd Maste &cie_inst, &cie_instlen, &de) != DW_DLV_OK) { 57752c23cb7cSEd Maste warnx("dwarf_get_cie_info failed: %s", 57762c23cb7cSEd Maste dwarf_errmsg(de)); 57772c23cb7cSEd Maste continue; 57782c23cb7cSEd Maste } 57792c23cb7cSEd Maste printf("%08jx %08jx %8.8jx CIE", 57802c23cb7cSEd Maste (uintmax_t) cie_offset, 57812c23cb7cSEd Maste (uintmax_t) cie_length, 57822c23cb7cSEd Maste (uintmax_t) (eh_frame ? 0 : ~0U)); 57832c23cb7cSEd Maste if (!alt) { 57842c23cb7cSEd Maste putchar('\n'); 57852c23cb7cSEd Maste printf(" Version:\t\t\t%u\n", cie_version); 57862c23cb7cSEd Maste printf(" Augmentation:\t\t\t\""); 57872c23cb7cSEd Maste while ((c = *cie_aug++) != '\0') 57882c23cb7cSEd Maste putchar(c); 57892c23cb7cSEd Maste printf("\"\n"); 57902c23cb7cSEd Maste printf(" Code alignment factor:\t%ju\n", 57912c23cb7cSEd Maste (uintmax_t) cie_caf); 57922c23cb7cSEd Maste printf(" Data alignment factor:\t%jd\n", 57932c23cb7cSEd Maste (intmax_t) cie_daf); 57942c23cb7cSEd Maste printf(" Return address column:\t%ju\n", 57952c23cb7cSEd Maste (uintmax_t) cie_ra); 57962c23cb7cSEd Maste putchar('\n'); 5797cf781b2eSEd Maste dump_dwarf_frame_inst(re, cie, cie_inst, 57982c23cb7cSEd Maste cie_instlen, cie_caf, cie_daf, 0, 57992c23cb7cSEd Maste re->dbg); 58002c23cb7cSEd Maste putchar('\n'); 58012c23cb7cSEd Maste } else { 58022c23cb7cSEd Maste printf(" \""); 58032c23cb7cSEd Maste while ((c = *cie_aug++) != '\0') 58042c23cb7cSEd Maste putchar(c); 58052c23cb7cSEd Maste putchar('"'); 58062c23cb7cSEd Maste printf(" cf=%ju df=%jd ra=%ju\n", 58072c23cb7cSEd Maste (uintmax_t) cie_caf, 58082c23cb7cSEd Maste (uintmax_t) cie_daf, 58092c23cb7cSEd Maste (uintmax_t) cie_ra); 5810cf781b2eSEd Maste dump_dwarf_frame_regtable(re, fde, low_pc, 1, 58112c23cb7cSEd Maste cie_ra); 58122c23cb7cSEd Maste putchar('\n'); 58132c23cb7cSEd Maste } 58142c23cb7cSEd Maste } 58152c23cb7cSEd Maste printf("%08jx %08jx %08jx FDE cie=%08jx pc=%08jx..%08jx\n", 58162c23cb7cSEd Maste (uintmax_t) fde_offset, (uintmax_t) fde_length, 58172c23cb7cSEd Maste (uintmax_t) cie_offset, 58182c23cb7cSEd Maste (uintmax_t) (eh_frame ? fde_offset + 4 - cie_offset : 58192c23cb7cSEd Maste cie_offset), 58202c23cb7cSEd Maste (uintmax_t) low_pc, (uintmax_t) (low_pc + func_len)); 58212c23cb7cSEd Maste if (!alt) 5822cf781b2eSEd Maste dump_dwarf_frame_inst(re, cie, fde_inst, fde_instlen, 58232c23cb7cSEd Maste cie_caf, cie_daf, low_pc, re->dbg); 58242c23cb7cSEd Maste else 5825cf781b2eSEd Maste dump_dwarf_frame_regtable(re, fde, low_pc, func_len, 58262c23cb7cSEd Maste cie_ra); 58272c23cb7cSEd Maste putchar('\n'); 58282c23cb7cSEd Maste } 58292c23cb7cSEd Maste } 58302c23cb7cSEd Maste 58312c23cb7cSEd Maste static void 58322c23cb7cSEd Maste dump_dwarf_frame(struct readelf *re, int alt) 58332c23cb7cSEd Maste { 58342c23cb7cSEd Maste struct section *s; 58352c23cb7cSEd Maste int i; 58362c23cb7cSEd Maste 58372c23cb7cSEd Maste (void) dwarf_set_frame_cfa_value(re->dbg, DW_FRAME_CFA_COL); 58382c23cb7cSEd Maste 58392c23cb7cSEd Maste for (i = 0; (size_t) i < re->shnum; i++) { 58402c23cb7cSEd Maste s = &re->sl[i]; 58412c23cb7cSEd Maste if (s->name != NULL && (!strcmp(s->name, ".debug_frame") || 58422c23cb7cSEd Maste !strcmp(s->name, ".eh_frame"))) 58432c23cb7cSEd Maste dump_dwarf_frame_section(re, s, alt); 58442c23cb7cSEd Maste } 58452c23cb7cSEd Maste } 58462c23cb7cSEd Maste 58472c23cb7cSEd Maste static void 58482c23cb7cSEd Maste dump_dwarf_str(struct readelf *re) 58492c23cb7cSEd Maste { 58502c23cb7cSEd Maste struct section *s; 58512c23cb7cSEd Maste Elf_Data *d; 58522c23cb7cSEd Maste unsigned char *p; 58532c23cb7cSEd Maste int elferr, end, i, j; 58542c23cb7cSEd Maste 58552c23cb7cSEd Maste printf("\nContents of section .debug_str:\n"); 58562c23cb7cSEd Maste 58572c23cb7cSEd Maste s = NULL; 58582c23cb7cSEd Maste for (i = 0; (size_t) i < re->shnum; i++) { 58592c23cb7cSEd Maste s = &re->sl[i]; 58602c23cb7cSEd Maste if (s->name != NULL && !strcmp(s->name, ".debug_str")) 58612c23cb7cSEd Maste break; 58622c23cb7cSEd Maste } 58632c23cb7cSEd Maste if ((size_t) i >= re->shnum) 58642c23cb7cSEd Maste return; 58652c23cb7cSEd Maste 58662c23cb7cSEd Maste (void) elf_errno(); 58672c23cb7cSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL) { 58682c23cb7cSEd Maste elferr = elf_errno(); 58692c23cb7cSEd Maste if (elferr != 0) 58702c23cb7cSEd Maste warnx("elf_getdata failed: %s", elf_errmsg(-1)); 58712c23cb7cSEd Maste return; 58722c23cb7cSEd Maste } 58732c23cb7cSEd Maste if (d->d_size <= 0) 58742c23cb7cSEd Maste return; 58752c23cb7cSEd Maste 58762c23cb7cSEd Maste for (i = 0, p = d->d_buf; (size_t) i < d->d_size; i += 16) { 58772c23cb7cSEd Maste printf(" 0x%08x", (unsigned int) i); 58782c23cb7cSEd Maste if ((size_t) i + 16 > d->d_size) 58792c23cb7cSEd Maste end = d->d_size; 58802c23cb7cSEd Maste else 58812c23cb7cSEd Maste end = i + 16; 58822c23cb7cSEd Maste for (j = i; j < i + 16; j++) { 58832c23cb7cSEd Maste if ((j - i) % 4 == 0) 58842c23cb7cSEd Maste putchar(' '); 58852c23cb7cSEd Maste if (j >= end) { 58862c23cb7cSEd Maste printf(" "); 58872c23cb7cSEd Maste continue; 58882c23cb7cSEd Maste } 58892c23cb7cSEd Maste printf("%02x", (uint8_t) p[j]); 58902c23cb7cSEd Maste } 58912c23cb7cSEd Maste putchar(' '); 58922c23cb7cSEd Maste for (j = i; j < end; j++) { 58932c23cb7cSEd Maste if (isprint(p[j])) 58942c23cb7cSEd Maste putchar(p[j]); 58952c23cb7cSEd Maste else if (p[j] == 0) 58962c23cb7cSEd Maste putchar('.'); 58972c23cb7cSEd Maste else 58982c23cb7cSEd Maste putchar(' '); 58992c23cb7cSEd Maste } 59002c23cb7cSEd Maste putchar('\n'); 59012c23cb7cSEd Maste } 59022c23cb7cSEd Maste } 59032c23cb7cSEd Maste 59042c23cb7cSEd Maste struct loc_at { 59052c23cb7cSEd Maste Dwarf_Attribute la_at; 59062c23cb7cSEd Maste Dwarf_Unsigned la_off; 59072c23cb7cSEd Maste Dwarf_Unsigned la_lowpc; 5908cf781b2eSEd Maste Dwarf_Half la_cu_psize; 5909cf781b2eSEd Maste Dwarf_Half la_cu_osize; 5910cf781b2eSEd Maste Dwarf_Half la_cu_ver; 59112c23cb7cSEd Maste TAILQ_ENTRY(loc_at) la_next; 59122c23cb7cSEd Maste }; 59132c23cb7cSEd Maste 59142c23cb7cSEd Maste static TAILQ_HEAD(, loc_at) lalist = TAILQ_HEAD_INITIALIZER(lalist); 59152c23cb7cSEd Maste 59162c23cb7cSEd Maste static void 59172c23cb7cSEd Maste search_loclist_at(struct readelf *re, Dwarf_Die die, Dwarf_Unsigned lowpc) 59182c23cb7cSEd Maste { 59192c23cb7cSEd Maste Dwarf_Attribute *attr_list; 59202c23cb7cSEd Maste Dwarf_Die ret_die; 59212c23cb7cSEd Maste Dwarf_Unsigned off; 5922cf781b2eSEd Maste Dwarf_Off ref; 59232c23cb7cSEd Maste Dwarf_Signed attr_count; 59242c23cb7cSEd Maste Dwarf_Half attr, form; 5925cf781b2eSEd Maste Dwarf_Bool is_info; 59262c23cb7cSEd Maste Dwarf_Error de; 59272c23cb7cSEd Maste struct loc_at *la, *nla; 59282c23cb7cSEd Maste int i, ret; 59292c23cb7cSEd Maste 5930cf781b2eSEd Maste is_info = dwarf_get_die_infotypes_flag(die); 5931cf781b2eSEd Maste 59322c23cb7cSEd Maste if ((ret = dwarf_attrlist(die, &attr_list, &attr_count, &de)) != 59332c23cb7cSEd Maste DW_DLV_OK) { 59342c23cb7cSEd Maste if (ret == DW_DLV_ERROR) 59352c23cb7cSEd Maste warnx("dwarf_attrlist failed: %s", dwarf_errmsg(de)); 59362c23cb7cSEd Maste goto cont_search; 59372c23cb7cSEd Maste } 59382c23cb7cSEd Maste for (i = 0; i < attr_count; i++) { 59392c23cb7cSEd Maste if (dwarf_whatattr(attr_list[i], &attr, &de) != DW_DLV_OK) { 59402c23cb7cSEd Maste warnx("dwarf_whatattr failed: %s", dwarf_errmsg(de)); 59412c23cb7cSEd Maste continue; 59422c23cb7cSEd Maste } 59432c23cb7cSEd Maste if (attr != DW_AT_location && 59442c23cb7cSEd Maste attr != DW_AT_string_length && 59452c23cb7cSEd Maste attr != DW_AT_return_addr && 59462c23cb7cSEd Maste attr != DW_AT_data_member_location && 59472c23cb7cSEd Maste attr != DW_AT_frame_base && 59482c23cb7cSEd Maste attr != DW_AT_segment && 59492c23cb7cSEd Maste attr != DW_AT_static_link && 59502c23cb7cSEd Maste attr != DW_AT_use_location && 59512c23cb7cSEd Maste attr != DW_AT_vtable_elem_location) 59522c23cb7cSEd Maste continue; 59532c23cb7cSEd Maste if (dwarf_whatform(attr_list[i], &form, &de) != DW_DLV_OK) { 59542c23cb7cSEd Maste warnx("dwarf_whatform failed: %s", dwarf_errmsg(de)); 59552c23cb7cSEd Maste continue; 59562c23cb7cSEd Maste } 5957cf781b2eSEd Maste if (form == DW_FORM_data4 || form == DW_FORM_data8) { 5958cf781b2eSEd Maste if (dwarf_formudata(attr_list[i], &off, &de) != 5959cf781b2eSEd Maste DW_DLV_OK) { 5960cf781b2eSEd Maste warnx("dwarf_formudata failed: %s", 5961cf781b2eSEd Maste dwarf_errmsg(de)); 59622c23cb7cSEd Maste continue; 59632c23cb7cSEd Maste } 5964cf781b2eSEd Maste } else if (form == DW_FORM_sec_offset) { 5965cf781b2eSEd Maste if (dwarf_global_formref(attr_list[i], &ref, &de) != 5966cf781b2eSEd Maste DW_DLV_OK) { 5967cf781b2eSEd Maste warnx("dwarf_global_formref failed: %s", 5968cf781b2eSEd Maste dwarf_errmsg(de)); 5969cf781b2eSEd Maste continue; 5970cf781b2eSEd Maste } 5971cf781b2eSEd Maste off = ref; 5972cf781b2eSEd Maste } else 5973cf781b2eSEd Maste continue; 5974cf781b2eSEd Maste 59752c23cb7cSEd Maste TAILQ_FOREACH(la, &lalist, la_next) { 59762c23cb7cSEd Maste if (off == la->la_off) 59772c23cb7cSEd Maste break; 59782c23cb7cSEd Maste if (off < la->la_off) { 59792c23cb7cSEd Maste if ((nla = malloc(sizeof(*nla))) == NULL) 59802c23cb7cSEd Maste err(EXIT_FAILURE, "malloc failed"); 59812c23cb7cSEd Maste nla->la_at = attr_list[i]; 59822c23cb7cSEd Maste nla->la_off = off; 59832c23cb7cSEd Maste nla->la_lowpc = lowpc; 5984cf781b2eSEd Maste nla->la_cu_psize = re->cu_psize; 5985cf781b2eSEd Maste nla->la_cu_osize = re->cu_osize; 5986cf781b2eSEd Maste nla->la_cu_ver = re->cu_ver; 59872c23cb7cSEd Maste TAILQ_INSERT_BEFORE(la, nla, la_next); 59882c23cb7cSEd Maste break; 59892c23cb7cSEd Maste } 59902c23cb7cSEd Maste } 59912c23cb7cSEd Maste if (la == NULL) { 59922c23cb7cSEd Maste if ((nla = malloc(sizeof(*nla))) == NULL) 59932c23cb7cSEd Maste err(EXIT_FAILURE, "malloc failed"); 59942c23cb7cSEd Maste nla->la_at = attr_list[i]; 59952c23cb7cSEd Maste nla->la_off = off; 59962c23cb7cSEd Maste nla->la_lowpc = lowpc; 5997cf781b2eSEd Maste nla->la_cu_psize = re->cu_psize; 5998cf781b2eSEd Maste nla->la_cu_osize = re->cu_osize; 5999cf781b2eSEd Maste nla->la_cu_ver = re->cu_ver; 60002c23cb7cSEd Maste TAILQ_INSERT_TAIL(&lalist, nla, la_next); 60012c23cb7cSEd Maste } 60022c23cb7cSEd Maste } 60032c23cb7cSEd Maste 60042c23cb7cSEd Maste cont_search: 60052c23cb7cSEd Maste /* Search children. */ 60062c23cb7cSEd Maste ret = dwarf_child(die, &ret_die, &de); 60072c23cb7cSEd Maste if (ret == DW_DLV_ERROR) 60082c23cb7cSEd Maste warnx("dwarf_child: %s", dwarf_errmsg(de)); 60092c23cb7cSEd Maste else if (ret == DW_DLV_OK) 60102c23cb7cSEd Maste search_loclist_at(re, ret_die, lowpc); 60112c23cb7cSEd Maste 60122c23cb7cSEd Maste /* Search sibling. */ 6013cf781b2eSEd Maste ret = dwarf_siblingof_b(re->dbg, die, &ret_die, is_info, &de); 60142c23cb7cSEd Maste if (ret == DW_DLV_ERROR) 60152c23cb7cSEd Maste warnx("dwarf_siblingof: %s", dwarf_errmsg(de)); 60162c23cb7cSEd Maste else if (ret == DW_DLV_OK) 60172c23cb7cSEd Maste search_loclist_at(re, ret_die, lowpc); 60182c23cb7cSEd Maste } 60192c23cb7cSEd Maste 60202c23cb7cSEd Maste static void 6021cf781b2eSEd Maste dump_dwarf_loc(struct readelf *re, Dwarf_Loc *lr) 60222c23cb7cSEd Maste { 60232c23cb7cSEd Maste const char *op_str; 6024cf781b2eSEd Maste char unk_op[32]; 6025cf781b2eSEd Maste uint8_t *b, n; 6026cf781b2eSEd Maste int i; 60272c23cb7cSEd Maste 60282c23cb7cSEd Maste if (dwarf_get_OP_name(lr->lr_atom, &op_str) != 60292c23cb7cSEd Maste DW_DLV_OK) { 6030cf781b2eSEd Maste snprintf(unk_op, sizeof(unk_op), 6031cf781b2eSEd Maste "[Unknown OP: %#x]", lr->lr_atom); 6032cf781b2eSEd Maste op_str = unk_op; 60332c23cb7cSEd Maste } 60342c23cb7cSEd Maste 60352c23cb7cSEd Maste printf("%s", op_str); 60362c23cb7cSEd Maste 60372c23cb7cSEd Maste switch (lr->lr_atom) { 60382c23cb7cSEd Maste case DW_OP_reg0: 60392c23cb7cSEd Maste case DW_OP_reg1: 60402c23cb7cSEd Maste case DW_OP_reg2: 60412c23cb7cSEd Maste case DW_OP_reg3: 60422c23cb7cSEd Maste case DW_OP_reg4: 60432c23cb7cSEd Maste case DW_OP_reg5: 60442c23cb7cSEd Maste case DW_OP_reg6: 60452c23cb7cSEd Maste case DW_OP_reg7: 60462c23cb7cSEd Maste case DW_OP_reg8: 60472c23cb7cSEd Maste case DW_OP_reg9: 60482c23cb7cSEd Maste case DW_OP_reg10: 60492c23cb7cSEd Maste case DW_OP_reg11: 60502c23cb7cSEd Maste case DW_OP_reg12: 60512c23cb7cSEd Maste case DW_OP_reg13: 60522c23cb7cSEd Maste case DW_OP_reg14: 60532c23cb7cSEd Maste case DW_OP_reg15: 60542c23cb7cSEd Maste case DW_OP_reg16: 60552c23cb7cSEd Maste case DW_OP_reg17: 60562c23cb7cSEd Maste case DW_OP_reg18: 60572c23cb7cSEd Maste case DW_OP_reg19: 60582c23cb7cSEd Maste case DW_OP_reg20: 60592c23cb7cSEd Maste case DW_OP_reg21: 60602c23cb7cSEd Maste case DW_OP_reg22: 60612c23cb7cSEd Maste case DW_OP_reg23: 60622c23cb7cSEd Maste case DW_OP_reg24: 60632c23cb7cSEd Maste case DW_OP_reg25: 60642c23cb7cSEd Maste case DW_OP_reg26: 60652c23cb7cSEd Maste case DW_OP_reg27: 60662c23cb7cSEd Maste case DW_OP_reg28: 60672c23cb7cSEd Maste case DW_OP_reg29: 60682c23cb7cSEd Maste case DW_OP_reg30: 60692c23cb7cSEd Maste case DW_OP_reg31: 6070cf781b2eSEd Maste printf(" (%s)", dwarf_regname(re, lr->lr_atom - DW_OP_reg0)); 6071cf781b2eSEd Maste break; 6072cf781b2eSEd Maste 6073cf781b2eSEd Maste case DW_OP_deref: 60742c23cb7cSEd Maste case DW_OP_lit0: 60752c23cb7cSEd Maste case DW_OP_lit1: 60762c23cb7cSEd Maste case DW_OP_lit2: 60772c23cb7cSEd Maste case DW_OP_lit3: 60782c23cb7cSEd Maste case DW_OP_lit4: 60792c23cb7cSEd Maste case DW_OP_lit5: 60802c23cb7cSEd Maste case DW_OP_lit6: 60812c23cb7cSEd Maste case DW_OP_lit7: 60822c23cb7cSEd Maste case DW_OP_lit8: 60832c23cb7cSEd Maste case DW_OP_lit9: 60842c23cb7cSEd Maste case DW_OP_lit10: 60852c23cb7cSEd Maste case DW_OP_lit11: 60862c23cb7cSEd Maste case DW_OP_lit12: 60872c23cb7cSEd Maste case DW_OP_lit13: 60882c23cb7cSEd Maste case DW_OP_lit14: 60892c23cb7cSEd Maste case DW_OP_lit15: 60902c23cb7cSEd Maste case DW_OP_lit16: 60912c23cb7cSEd Maste case DW_OP_lit17: 60922c23cb7cSEd Maste case DW_OP_lit18: 60932c23cb7cSEd Maste case DW_OP_lit19: 60942c23cb7cSEd Maste case DW_OP_lit20: 60952c23cb7cSEd Maste case DW_OP_lit21: 60962c23cb7cSEd Maste case DW_OP_lit22: 60972c23cb7cSEd Maste case DW_OP_lit23: 60982c23cb7cSEd Maste case DW_OP_lit24: 60992c23cb7cSEd Maste case DW_OP_lit25: 61002c23cb7cSEd Maste case DW_OP_lit26: 61012c23cb7cSEd Maste case DW_OP_lit27: 61022c23cb7cSEd Maste case DW_OP_lit28: 61032c23cb7cSEd Maste case DW_OP_lit29: 61042c23cb7cSEd Maste case DW_OP_lit30: 61052c23cb7cSEd Maste case DW_OP_lit31: 61062c23cb7cSEd Maste case DW_OP_dup: 61072c23cb7cSEd Maste case DW_OP_drop: 61082c23cb7cSEd Maste case DW_OP_over: 61092c23cb7cSEd Maste case DW_OP_swap: 61102c23cb7cSEd Maste case DW_OP_rot: 61112c23cb7cSEd Maste case DW_OP_xderef: 61122c23cb7cSEd Maste case DW_OP_abs: 61132c23cb7cSEd Maste case DW_OP_and: 61142c23cb7cSEd Maste case DW_OP_div: 61152c23cb7cSEd Maste case DW_OP_minus: 61162c23cb7cSEd Maste case DW_OP_mod: 61172c23cb7cSEd Maste case DW_OP_mul: 61182c23cb7cSEd Maste case DW_OP_neg: 61192c23cb7cSEd Maste case DW_OP_not: 61202c23cb7cSEd Maste case DW_OP_or: 61212c23cb7cSEd Maste case DW_OP_plus: 61222c23cb7cSEd Maste case DW_OP_shl: 61232c23cb7cSEd Maste case DW_OP_shr: 61242c23cb7cSEd Maste case DW_OP_shra: 61252c23cb7cSEd Maste case DW_OP_xor: 61262c23cb7cSEd Maste case DW_OP_eq: 61272c23cb7cSEd Maste case DW_OP_ge: 61282c23cb7cSEd Maste case DW_OP_gt: 61292c23cb7cSEd Maste case DW_OP_le: 61302c23cb7cSEd Maste case DW_OP_lt: 61312c23cb7cSEd Maste case DW_OP_ne: 61322c23cb7cSEd Maste case DW_OP_nop: 6133cf781b2eSEd Maste case DW_OP_push_object_address: 6134cf781b2eSEd Maste case DW_OP_form_tls_address: 6135cf781b2eSEd Maste case DW_OP_call_frame_cfa: 6136cf781b2eSEd Maste case DW_OP_stack_value: 6137cf781b2eSEd Maste case DW_OP_GNU_push_tls_address: 6138cf781b2eSEd Maste case DW_OP_GNU_uninit: 61392c23cb7cSEd Maste break; 61402c23cb7cSEd Maste 61412c23cb7cSEd Maste case DW_OP_const1u: 61422c23cb7cSEd Maste case DW_OP_pick: 61432c23cb7cSEd Maste case DW_OP_deref_size: 61442c23cb7cSEd Maste case DW_OP_xderef_size: 61452c23cb7cSEd Maste case DW_OP_const2u: 61462c23cb7cSEd Maste case DW_OP_bra: 61472c23cb7cSEd Maste case DW_OP_skip: 61482c23cb7cSEd Maste case DW_OP_const4u: 61492c23cb7cSEd Maste case DW_OP_const8u: 61502c23cb7cSEd Maste case DW_OP_constu: 61512c23cb7cSEd Maste case DW_OP_plus_uconst: 61522c23cb7cSEd Maste case DW_OP_regx: 61532c23cb7cSEd Maste case DW_OP_piece: 61542c23cb7cSEd Maste printf(": %ju", (uintmax_t) 61552c23cb7cSEd Maste lr->lr_number); 61562c23cb7cSEd Maste break; 61572c23cb7cSEd Maste 6158cf781b2eSEd Maste case DW_OP_const1s: 6159cf781b2eSEd Maste case DW_OP_const2s: 6160cf781b2eSEd Maste case DW_OP_const4s: 6161cf781b2eSEd Maste case DW_OP_const8s: 61622c23cb7cSEd Maste case DW_OP_consts: 6163cf781b2eSEd Maste printf(": %jd", (intmax_t) 6164cf781b2eSEd Maste lr->lr_number); 6165cf781b2eSEd Maste break; 6166cf781b2eSEd Maste 61672c23cb7cSEd Maste case DW_OP_breg0: 61682c23cb7cSEd Maste case DW_OP_breg1: 61692c23cb7cSEd Maste case DW_OP_breg2: 61702c23cb7cSEd Maste case DW_OP_breg3: 61712c23cb7cSEd Maste case DW_OP_breg4: 61722c23cb7cSEd Maste case DW_OP_breg5: 61732c23cb7cSEd Maste case DW_OP_breg6: 61742c23cb7cSEd Maste case DW_OP_breg7: 61752c23cb7cSEd Maste case DW_OP_breg8: 61762c23cb7cSEd Maste case DW_OP_breg9: 61772c23cb7cSEd Maste case DW_OP_breg10: 61782c23cb7cSEd Maste case DW_OP_breg11: 61792c23cb7cSEd Maste case DW_OP_breg12: 61802c23cb7cSEd Maste case DW_OP_breg13: 61812c23cb7cSEd Maste case DW_OP_breg14: 61822c23cb7cSEd Maste case DW_OP_breg15: 61832c23cb7cSEd Maste case DW_OP_breg16: 61842c23cb7cSEd Maste case DW_OP_breg17: 61852c23cb7cSEd Maste case DW_OP_breg18: 61862c23cb7cSEd Maste case DW_OP_breg19: 61872c23cb7cSEd Maste case DW_OP_breg20: 61882c23cb7cSEd Maste case DW_OP_breg21: 61892c23cb7cSEd Maste case DW_OP_breg22: 61902c23cb7cSEd Maste case DW_OP_breg23: 61912c23cb7cSEd Maste case DW_OP_breg24: 61922c23cb7cSEd Maste case DW_OP_breg25: 61932c23cb7cSEd Maste case DW_OP_breg26: 61942c23cb7cSEd Maste case DW_OP_breg27: 61952c23cb7cSEd Maste case DW_OP_breg28: 61962c23cb7cSEd Maste case DW_OP_breg29: 61972c23cb7cSEd Maste case DW_OP_breg30: 61982c23cb7cSEd Maste case DW_OP_breg31: 6199cf781b2eSEd Maste printf(" (%s): %jd", 6200cf781b2eSEd Maste dwarf_regname(re, lr->lr_atom - DW_OP_breg0), 6201cf781b2eSEd Maste (intmax_t) lr->lr_number); 6202cf781b2eSEd Maste break; 6203cf781b2eSEd Maste 62042c23cb7cSEd Maste case DW_OP_fbreg: 62052c23cb7cSEd Maste printf(": %jd", (intmax_t) 62062c23cb7cSEd Maste lr->lr_number); 62072c23cb7cSEd Maste break; 62082c23cb7cSEd Maste 62092c23cb7cSEd Maste case DW_OP_bregx: 6210cf781b2eSEd Maste printf(": %ju (%s) %jd", 62112c23cb7cSEd Maste (uintmax_t) lr->lr_number, 6212cf781b2eSEd Maste dwarf_regname(re, (unsigned int) lr->lr_number), 62132c23cb7cSEd Maste (intmax_t) lr->lr_number2); 62142c23cb7cSEd Maste break; 62152c23cb7cSEd Maste 62162c23cb7cSEd Maste case DW_OP_addr: 6217cf781b2eSEd Maste case DW_OP_GNU_encoded_addr: 62182c23cb7cSEd Maste printf(": %#jx", (uintmax_t) 62192c23cb7cSEd Maste lr->lr_number); 62202c23cb7cSEd Maste break; 6221cf781b2eSEd Maste 6222cf781b2eSEd Maste case DW_OP_GNU_implicit_pointer: 6223cf781b2eSEd Maste printf(": <0x%jx> %jd", (uintmax_t) lr->lr_number, 6224cf781b2eSEd Maste (intmax_t) lr->lr_number2); 6225cf781b2eSEd Maste break; 6226cf781b2eSEd Maste 6227cf781b2eSEd Maste case DW_OP_implicit_value: 6228cf781b2eSEd Maste printf(": %ju byte block:", (uintmax_t) lr->lr_number); 6229cf781b2eSEd Maste b = (uint8_t *)(uintptr_t) lr->lr_number2; 6230cf781b2eSEd Maste for (i = 0; (Dwarf_Unsigned) i < lr->lr_number; i++) 6231cf781b2eSEd Maste printf(" %x", b[i]); 6232cf781b2eSEd Maste break; 6233cf781b2eSEd Maste 6234cf781b2eSEd Maste case DW_OP_GNU_entry_value: 6235cf781b2eSEd Maste printf(": ("); 6236cf781b2eSEd Maste dump_dwarf_block(re, (uint8_t *)(uintptr_t) lr->lr_number2, 6237cf781b2eSEd Maste lr->lr_number); 6238cf781b2eSEd Maste putchar(')'); 6239cf781b2eSEd Maste break; 6240cf781b2eSEd Maste 6241cf781b2eSEd Maste case DW_OP_GNU_const_type: 6242cf781b2eSEd Maste printf(": <0x%jx> ", (uintmax_t) lr->lr_number); 6243cf781b2eSEd Maste b = (uint8_t *)(uintptr_t) lr->lr_number2; 6244cf781b2eSEd Maste n = *b; 6245cf781b2eSEd Maste for (i = 1; (uint8_t) i < n; i++) 6246cf781b2eSEd Maste printf(" %x", b[i]); 6247cf781b2eSEd Maste break; 6248cf781b2eSEd Maste 6249cf781b2eSEd Maste case DW_OP_GNU_regval_type: 6250cf781b2eSEd Maste printf(": %ju (%s) <0x%jx>", (uintmax_t) lr->lr_number, 6251cf781b2eSEd Maste dwarf_regname(re, (unsigned int) lr->lr_number), 6252cf781b2eSEd Maste (uintmax_t) lr->lr_number2); 6253cf781b2eSEd Maste break; 6254cf781b2eSEd Maste 6255cf781b2eSEd Maste case DW_OP_GNU_convert: 6256cf781b2eSEd Maste case DW_OP_GNU_deref_type: 6257cf781b2eSEd Maste case DW_OP_GNU_parameter_ref: 6258cf781b2eSEd Maste case DW_OP_GNU_reinterpret: 6259cf781b2eSEd Maste printf(": <0x%jx>", (uintmax_t) lr->lr_number); 6260cf781b2eSEd Maste break; 6261cf781b2eSEd Maste 6262cf781b2eSEd Maste default: 6263cf781b2eSEd Maste break; 62642c23cb7cSEd Maste } 6265cf781b2eSEd Maste } 6266cf781b2eSEd Maste 6267cf781b2eSEd Maste static void 6268cf781b2eSEd Maste dump_dwarf_block(struct readelf *re, uint8_t *b, Dwarf_Unsigned len) 6269cf781b2eSEd Maste { 6270cf781b2eSEd Maste Dwarf_Locdesc *llbuf; 6271cf781b2eSEd Maste Dwarf_Signed lcnt; 6272cf781b2eSEd Maste Dwarf_Error de; 6273cf781b2eSEd Maste int i; 6274cf781b2eSEd Maste 6275cf781b2eSEd Maste if (dwarf_loclist_from_expr_b(re->dbg, b, len, re->cu_psize, 6276cf781b2eSEd Maste re->cu_osize, re->cu_ver, &llbuf, &lcnt, &de) != DW_DLV_OK) { 6277cf781b2eSEd Maste warnx("dwarf_loclist_form_expr_b: %s", dwarf_errmsg(de)); 6278cf781b2eSEd Maste return; 6279cf781b2eSEd Maste } 6280cf781b2eSEd Maste 6281cf781b2eSEd Maste for (i = 0; (Dwarf_Half) i < llbuf->ld_cents; i++) { 6282cf781b2eSEd Maste dump_dwarf_loc(re, &llbuf->ld_s[i]); 6283cf781b2eSEd Maste if (i < llbuf->ld_cents - 1) 6284cf781b2eSEd Maste printf("; "); 6285cf781b2eSEd Maste } 6286cf781b2eSEd Maste 6287cf781b2eSEd Maste dwarf_dealloc(re->dbg, llbuf->ld_s, DW_DLA_LOC_BLOCK); 6288cf781b2eSEd Maste dwarf_dealloc(re->dbg, llbuf, DW_DLA_LOCDESC); 6289cf781b2eSEd Maste } 6290cf781b2eSEd Maste 6291cf781b2eSEd Maste static void 6292cf781b2eSEd Maste dump_dwarf_loclist(struct readelf *re) 6293cf781b2eSEd Maste { 6294cf781b2eSEd Maste Dwarf_Die die; 6295cf781b2eSEd Maste Dwarf_Locdesc **llbuf; 6296cf781b2eSEd Maste Dwarf_Unsigned lowpc; 6297cf781b2eSEd Maste Dwarf_Signed lcnt; 6298cf781b2eSEd Maste Dwarf_Half tag, version, pointer_size, off_size; 6299cf781b2eSEd Maste Dwarf_Error de; 6300cf781b2eSEd Maste struct loc_at *la; 6301bee2765cSEd Maste int i, j, ret, has_content; 6302cf781b2eSEd Maste 6303cf781b2eSEd Maste /* Search .debug_info section. */ 6304cf781b2eSEd Maste while ((ret = dwarf_next_cu_header_b(re->dbg, NULL, &version, NULL, 6305cf781b2eSEd Maste &pointer_size, &off_size, NULL, NULL, &de)) == DW_DLV_OK) { 6306cf781b2eSEd Maste set_cu_context(re, pointer_size, off_size, version); 6307cf781b2eSEd Maste die = NULL; 6308cf781b2eSEd Maste if (dwarf_siblingof(re->dbg, die, &die, &de) != DW_DLV_OK) 6309cf781b2eSEd Maste continue; 6310cf781b2eSEd Maste if (dwarf_tag(die, &tag, &de) != DW_DLV_OK) { 6311cf781b2eSEd Maste warnx("dwarf_tag failed: %s", dwarf_errmsg(de)); 6312cf781b2eSEd Maste continue; 6313cf781b2eSEd Maste } 6314cf781b2eSEd Maste /* XXX: What about DW_TAG_partial_unit? */ 6315cf781b2eSEd Maste lowpc = 0; 6316cf781b2eSEd Maste if (tag == DW_TAG_compile_unit) { 6317cf781b2eSEd Maste if (dwarf_attrval_unsigned(die, DW_AT_low_pc, 6318cf781b2eSEd Maste &lowpc, &de) != DW_DLV_OK) 6319cf781b2eSEd Maste lowpc = 0; 6320cf781b2eSEd Maste } 6321cf781b2eSEd Maste 6322cf781b2eSEd Maste /* Search attributes for reference to .debug_loc section. */ 6323cf781b2eSEd Maste search_loclist_at(re, die, lowpc); 6324cf781b2eSEd Maste } 6325cf781b2eSEd Maste if (ret == DW_DLV_ERROR) 6326cf781b2eSEd Maste warnx("dwarf_next_cu_header: %s", dwarf_errmsg(de)); 6327cf781b2eSEd Maste 6328cf781b2eSEd Maste /* Search .debug_types section. */ 6329cf781b2eSEd Maste do { 6330cf781b2eSEd Maste while ((ret = dwarf_next_cu_header_c(re->dbg, 0, NULL, 6331cf781b2eSEd Maste &version, NULL, &pointer_size, &off_size, NULL, NULL, 6332cf781b2eSEd Maste NULL, NULL, &de)) == DW_DLV_OK) { 6333cf781b2eSEd Maste set_cu_context(re, pointer_size, off_size, version); 6334cf781b2eSEd Maste die = NULL; 6335cf781b2eSEd Maste if (dwarf_siblingof(re->dbg, die, &die, &de) != 6336cf781b2eSEd Maste DW_DLV_OK) 6337cf781b2eSEd Maste continue; 6338cf781b2eSEd Maste if (dwarf_tag(die, &tag, &de) != DW_DLV_OK) { 6339cf781b2eSEd Maste warnx("dwarf_tag failed: %s", 6340cf781b2eSEd Maste dwarf_errmsg(de)); 6341cf781b2eSEd Maste continue; 6342cf781b2eSEd Maste } 6343cf781b2eSEd Maste 6344cf781b2eSEd Maste lowpc = 0; 6345cf781b2eSEd Maste if (tag == DW_TAG_type_unit) { 6346cf781b2eSEd Maste if (dwarf_attrval_unsigned(die, DW_AT_low_pc, 6347cf781b2eSEd Maste &lowpc, &de) != DW_DLV_OK) 6348cf781b2eSEd Maste lowpc = 0; 6349cf781b2eSEd Maste } 6350cf781b2eSEd Maste 6351cf781b2eSEd Maste /* 6352cf781b2eSEd Maste * Search attributes for reference to .debug_loc 6353cf781b2eSEd Maste * section. 6354cf781b2eSEd Maste */ 6355cf781b2eSEd Maste search_loclist_at(re, die, lowpc); 6356cf781b2eSEd Maste } 6357cf781b2eSEd Maste if (ret == DW_DLV_ERROR) 6358cf781b2eSEd Maste warnx("dwarf_next_cu_header: %s", dwarf_errmsg(de)); 6359cf781b2eSEd Maste } while (dwarf_next_types_section(re->dbg, &de) == DW_DLV_OK); 6360cf781b2eSEd Maste 6361cf781b2eSEd Maste if (TAILQ_EMPTY(&lalist)) 6362cf781b2eSEd Maste return; 6363cf781b2eSEd Maste 6364bee2765cSEd Maste has_content = 0; 6365cf781b2eSEd Maste TAILQ_FOREACH(la, &lalist, la_next) { 6366bee2765cSEd Maste if ((ret = dwarf_loclist_n(la->la_at, &llbuf, &lcnt, &de)) != 6367cf781b2eSEd Maste DW_DLV_OK) { 6368bee2765cSEd Maste if (ret != DW_DLV_NO_ENTRY) 6369bee2765cSEd Maste warnx("dwarf_loclist_n failed: %s", 6370bee2765cSEd Maste dwarf_errmsg(de)); 6371cf781b2eSEd Maste continue; 6372cf781b2eSEd Maste } 6373bee2765cSEd Maste if (!has_content) { 6374bee2765cSEd Maste has_content = 1; 6375bee2765cSEd Maste printf("\nContents of section .debug_loc:\n"); 6376bee2765cSEd Maste printf(" Offset Begin End Expression\n"); 6377bee2765cSEd Maste } 6378cf781b2eSEd Maste set_cu_context(re, la->la_cu_psize, la->la_cu_osize, 6379cf781b2eSEd Maste la->la_cu_ver); 6380cf781b2eSEd Maste for (i = 0; i < lcnt; i++) { 6381839529caSEd Maste printf(" %8.8jx ", (uintmax_t) la->la_off); 6382cf781b2eSEd Maste if (llbuf[i]->ld_lopc == 0 && llbuf[i]->ld_hipc == 0) { 6383cf781b2eSEd Maste printf("<End of list>\n"); 6384cf781b2eSEd Maste continue; 6385cf781b2eSEd Maste } 6386cf781b2eSEd Maste 6387cf781b2eSEd Maste /* TODO: handle base selection entry. */ 6388cf781b2eSEd Maste 6389cf781b2eSEd Maste printf("%8.8jx %8.8jx ", 6390cf781b2eSEd Maste (uintmax_t) (la->la_lowpc + llbuf[i]->ld_lopc), 6391cf781b2eSEd Maste (uintmax_t) (la->la_lowpc + llbuf[i]->ld_hipc)); 6392cf781b2eSEd Maste 6393cf781b2eSEd Maste putchar('('); 6394cf781b2eSEd Maste for (j = 0; (Dwarf_Half) j < llbuf[i]->ld_cents; j++) { 6395cf781b2eSEd Maste dump_dwarf_loc(re, &llbuf[i]->ld_s[j]); 63962c23cb7cSEd Maste if (j < llbuf[i]->ld_cents - 1) 6397cf781b2eSEd Maste printf("; "); 63982c23cb7cSEd Maste } 63992c23cb7cSEd Maste putchar(')'); 64002c23cb7cSEd Maste 64012c23cb7cSEd Maste if (llbuf[i]->ld_lopc == llbuf[i]->ld_hipc) 64022c23cb7cSEd Maste printf(" (start == end)"); 64032c23cb7cSEd Maste putchar('\n'); 64042c23cb7cSEd Maste } 6405cf781b2eSEd Maste for (i = 0; i < lcnt; i++) { 6406cf781b2eSEd Maste dwarf_dealloc(re->dbg, llbuf[i]->ld_s, 6407cf781b2eSEd Maste DW_DLA_LOC_BLOCK); 6408cf781b2eSEd Maste dwarf_dealloc(re->dbg, llbuf[i], DW_DLA_LOCDESC); 6409cf781b2eSEd Maste } 6410cf781b2eSEd Maste dwarf_dealloc(re->dbg, llbuf, DW_DLA_LIST); 64112c23cb7cSEd Maste } 6412bee2765cSEd Maste 6413bee2765cSEd Maste if (!has_content) 6414bee2765cSEd Maste printf("\nSection '.debug_loc' has no debugging data.\n"); 64152c23cb7cSEd Maste } 64162c23cb7cSEd Maste 64172c23cb7cSEd Maste /* 64182c23cb7cSEd Maste * Retrieve a string using string table section index and the string offset. 64192c23cb7cSEd Maste */ 64202c23cb7cSEd Maste static const char* 64212c23cb7cSEd Maste get_string(struct readelf *re, int strtab, size_t off) 64222c23cb7cSEd Maste { 64232c23cb7cSEd Maste const char *name; 64242c23cb7cSEd Maste 64252c23cb7cSEd Maste if ((name = elf_strptr(re->elf, strtab, off)) == NULL) 64262c23cb7cSEd Maste return (""); 64272c23cb7cSEd Maste 64282c23cb7cSEd Maste return (name); 64292c23cb7cSEd Maste } 64302c23cb7cSEd Maste 64312c23cb7cSEd Maste /* 64322c23cb7cSEd Maste * Retrieve the name of a symbol using the section index of the symbol 64332c23cb7cSEd Maste * table and the index of the symbol within that table. 64342c23cb7cSEd Maste */ 64352c23cb7cSEd Maste static const char * 64362c23cb7cSEd Maste get_symbol_name(struct readelf *re, int symtab, int i) 64372c23cb7cSEd Maste { 64382c23cb7cSEd Maste struct section *s; 64392c23cb7cSEd Maste const char *name; 64402c23cb7cSEd Maste GElf_Sym sym; 64412c23cb7cSEd Maste Elf_Data *data; 64422c23cb7cSEd Maste int elferr; 64432c23cb7cSEd Maste 64442c23cb7cSEd Maste s = &re->sl[symtab]; 64452c23cb7cSEd Maste if (s->type != SHT_SYMTAB && s->type != SHT_DYNSYM) 64462c23cb7cSEd Maste return (""); 64472c23cb7cSEd Maste (void) elf_errno(); 64482c23cb7cSEd Maste if ((data = elf_getdata(s->scn, NULL)) == NULL) { 64492c23cb7cSEd Maste elferr = elf_errno(); 64502c23cb7cSEd Maste if (elferr != 0) 64512c23cb7cSEd Maste warnx("elf_getdata failed: %s", elf_errmsg(elferr)); 64522c23cb7cSEd Maste return (""); 64532c23cb7cSEd Maste } 64542c23cb7cSEd Maste if (gelf_getsym(data, i, &sym) != &sym) 64552c23cb7cSEd Maste return (""); 64562c23cb7cSEd Maste /* Return section name for STT_SECTION symbol. */ 6457b6b6f9ccSEd Maste if (GELF_ST_TYPE(sym.st_info) == STT_SECTION) { 6458b6b6f9ccSEd Maste if (sym.st_shndx < re->shnum && 64592c23cb7cSEd Maste re->sl[sym.st_shndx].name != NULL) 64602c23cb7cSEd Maste return (re->sl[sym.st_shndx].name); 6461b6b6f9ccSEd Maste return (""); 6462b6b6f9ccSEd Maste } 6463656f49f8SEd Maste if (s->link >= re->shnum || 6464656f49f8SEd Maste (name = elf_strptr(re->elf, s->link, sym.st_name)) == NULL) 64652c23cb7cSEd Maste return (""); 64662c23cb7cSEd Maste 64672c23cb7cSEd Maste return (name); 64682c23cb7cSEd Maste } 64692c23cb7cSEd Maste 64702c23cb7cSEd Maste static uint64_t 64712c23cb7cSEd Maste get_symbol_value(struct readelf *re, int symtab, int i) 64722c23cb7cSEd Maste { 64732c23cb7cSEd Maste struct section *s; 64742c23cb7cSEd Maste GElf_Sym sym; 64752c23cb7cSEd Maste Elf_Data *data; 64762c23cb7cSEd Maste int elferr; 64772c23cb7cSEd Maste 64782c23cb7cSEd Maste s = &re->sl[symtab]; 64792c23cb7cSEd Maste if (s->type != SHT_SYMTAB && s->type != SHT_DYNSYM) 64802c23cb7cSEd Maste return (0); 64812c23cb7cSEd Maste (void) elf_errno(); 64822c23cb7cSEd Maste if ((data = elf_getdata(s->scn, NULL)) == NULL) { 64832c23cb7cSEd Maste elferr = elf_errno(); 64842c23cb7cSEd Maste if (elferr != 0) 64852c23cb7cSEd Maste warnx("elf_getdata failed: %s", elf_errmsg(elferr)); 64862c23cb7cSEd Maste return (0); 64872c23cb7cSEd Maste } 64882c23cb7cSEd Maste if (gelf_getsym(data, i, &sym) != &sym) 64892c23cb7cSEd Maste return (0); 64902c23cb7cSEd Maste 64912c23cb7cSEd Maste return (sym.st_value); 64922c23cb7cSEd Maste } 64932c23cb7cSEd Maste 64942c23cb7cSEd Maste static void 64952c23cb7cSEd Maste hex_dump(struct readelf *re) 64962c23cb7cSEd Maste { 64972c23cb7cSEd Maste struct section *s; 64982c23cb7cSEd Maste Elf_Data *d; 64992c23cb7cSEd Maste uint8_t *buf; 65002c23cb7cSEd Maste size_t sz, nbytes; 65012c23cb7cSEd Maste uint64_t addr; 65022c23cb7cSEd Maste int elferr, i, j; 65032c23cb7cSEd Maste 65042c23cb7cSEd Maste for (i = 1; (size_t) i < re->shnum; i++) { 65052c23cb7cSEd Maste s = &re->sl[i]; 65062c23cb7cSEd Maste if (find_dumpop(re, (size_t) i, s->name, HEX_DUMP, -1) == NULL) 65072c23cb7cSEd Maste continue; 65082c23cb7cSEd Maste (void) elf_errno(); 6509839529caSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL && 6510839529caSEd Maste (d = elf_rawdata(s->scn, NULL)) == NULL) { 65112c23cb7cSEd Maste elferr = elf_errno(); 65122c23cb7cSEd Maste if (elferr != 0) 65132c23cb7cSEd Maste warnx("elf_getdata failed: %s", 65142c23cb7cSEd Maste elf_errmsg(elferr)); 65152c23cb7cSEd Maste continue; 65162c23cb7cSEd Maste } 6517839529caSEd Maste (void) elf_errno(); 65182c23cb7cSEd Maste if (d->d_size <= 0 || d->d_buf == NULL) { 65192c23cb7cSEd Maste printf("\nSection '%s' has no data to dump.\n", 65202c23cb7cSEd Maste s->name); 65212c23cb7cSEd Maste continue; 65222c23cb7cSEd Maste } 65232c23cb7cSEd Maste buf = d->d_buf; 65242c23cb7cSEd Maste sz = d->d_size; 65252c23cb7cSEd Maste addr = s->addr; 65262c23cb7cSEd Maste printf("\nHex dump of section '%s':\n", s->name); 65272c23cb7cSEd Maste while (sz > 0) { 65282c23cb7cSEd Maste printf(" 0x%8.8jx ", (uintmax_t)addr); 65292c23cb7cSEd Maste nbytes = sz > 16? 16 : sz; 65302c23cb7cSEd Maste for (j = 0; j < 16; j++) { 65312c23cb7cSEd Maste if ((size_t)j < nbytes) 65322c23cb7cSEd Maste printf("%2.2x", buf[j]); 65332c23cb7cSEd Maste else 65342c23cb7cSEd Maste printf(" "); 65352c23cb7cSEd Maste if ((j & 3) == 3) 65362c23cb7cSEd Maste printf(" "); 65372c23cb7cSEd Maste } 65382c23cb7cSEd Maste for (j = 0; (size_t)j < nbytes; j++) { 65392c23cb7cSEd Maste if (isprint(buf[j])) 65402c23cb7cSEd Maste printf("%c", buf[j]); 65412c23cb7cSEd Maste else 65422c23cb7cSEd Maste printf("."); 65432c23cb7cSEd Maste } 65442c23cb7cSEd Maste printf("\n"); 65452c23cb7cSEd Maste buf += nbytes; 65462c23cb7cSEd Maste addr += nbytes; 65472c23cb7cSEd Maste sz -= nbytes; 65482c23cb7cSEd Maste } 65492c23cb7cSEd Maste } 65502c23cb7cSEd Maste } 65512c23cb7cSEd Maste 65522c23cb7cSEd Maste static void 65532c23cb7cSEd Maste str_dump(struct readelf *re) 65542c23cb7cSEd Maste { 65552c23cb7cSEd Maste struct section *s; 65562c23cb7cSEd Maste Elf_Data *d; 65572c23cb7cSEd Maste unsigned char *start, *end, *buf_end; 65582c23cb7cSEd Maste unsigned int len; 65592c23cb7cSEd Maste int i, j, elferr, found; 65602c23cb7cSEd Maste 65612c23cb7cSEd Maste for (i = 1; (size_t) i < re->shnum; i++) { 65622c23cb7cSEd Maste s = &re->sl[i]; 65632c23cb7cSEd Maste if (find_dumpop(re, (size_t) i, s->name, STR_DUMP, -1) == NULL) 65642c23cb7cSEd Maste continue; 65652c23cb7cSEd Maste (void) elf_errno(); 6566839529caSEd Maste if ((d = elf_getdata(s->scn, NULL)) == NULL && 6567839529caSEd Maste (d = elf_rawdata(s->scn, NULL)) == NULL) { 65682c23cb7cSEd Maste elferr = elf_errno(); 65692c23cb7cSEd Maste if (elferr != 0) 65702c23cb7cSEd Maste warnx("elf_getdata failed: %s", 65712c23cb7cSEd Maste elf_errmsg(elferr)); 65722c23cb7cSEd Maste continue; 65732c23cb7cSEd Maste } 6574839529caSEd Maste (void) elf_errno(); 65752c23cb7cSEd Maste if (d->d_size <= 0 || d->d_buf == NULL) { 65762c23cb7cSEd Maste printf("\nSection '%s' has no data to dump.\n", 65772c23cb7cSEd Maste s->name); 65782c23cb7cSEd Maste continue; 65792c23cb7cSEd Maste } 65802c23cb7cSEd Maste buf_end = (unsigned char *) d->d_buf + d->d_size; 65812c23cb7cSEd Maste start = (unsigned char *) d->d_buf; 65822c23cb7cSEd Maste found = 0; 65832c23cb7cSEd Maste printf("\nString dump of section '%s':\n", s->name); 65842c23cb7cSEd Maste for (;;) { 65852c23cb7cSEd Maste while (start < buf_end && !isprint(*start)) 65862c23cb7cSEd Maste start++; 65872c23cb7cSEd Maste if (start >= buf_end) 65882c23cb7cSEd Maste break; 65892c23cb7cSEd Maste end = start + 1; 65902c23cb7cSEd Maste while (end < buf_end && isprint(*end)) 65912c23cb7cSEd Maste end++; 65922c23cb7cSEd Maste printf(" [%6lx] ", 65932c23cb7cSEd Maste (long) (start - (unsigned char *) d->d_buf)); 65942c23cb7cSEd Maste len = end - start; 65952c23cb7cSEd Maste for (j = 0; (unsigned int) j < len; j++) 65962c23cb7cSEd Maste putchar(start[j]); 65972c23cb7cSEd Maste putchar('\n'); 65982c23cb7cSEd Maste found = 1; 65992c23cb7cSEd Maste if (end >= buf_end) 66002c23cb7cSEd Maste break; 66012c23cb7cSEd Maste start = end + 1; 66022c23cb7cSEd Maste } 66032c23cb7cSEd Maste if (!found) 66042c23cb7cSEd Maste printf(" No strings found in this section."); 66052c23cb7cSEd Maste putchar('\n'); 66062c23cb7cSEd Maste } 66072c23cb7cSEd Maste } 66082c23cb7cSEd Maste 66092c23cb7cSEd Maste static void 66102c23cb7cSEd Maste load_sections(struct readelf *re) 66112c23cb7cSEd Maste { 66122c23cb7cSEd Maste struct section *s; 66132c23cb7cSEd Maste const char *name; 66142c23cb7cSEd Maste Elf_Scn *scn; 66152c23cb7cSEd Maste GElf_Shdr sh; 66162c23cb7cSEd Maste size_t shstrndx, ndx; 66172c23cb7cSEd Maste int elferr; 66182c23cb7cSEd Maste 66192c23cb7cSEd Maste /* Allocate storage for internal section list. */ 66202c23cb7cSEd Maste if (!elf_getshnum(re->elf, &re->shnum)) { 66212c23cb7cSEd Maste warnx("elf_getshnum failed: %s", elf_errmsg(-1)); 66222c23cb7cSEd Maste return; 66232c23cb7cSEd Maste } 66242c23cb7cSEd Maste if (re->sl != NULL) 66252c23cb7cSEd Maste free(re->sl); 66262c23cb7cSEd Maste if ((re->sl = calloc(re->shnum, sizeof(*re->sl))) == NULL) 66272c23cb7cSEd Maste err(EXIT_FAILURE, "calloc failed"); 66282c23cb7cSEd Maste 66292c23cb7cSEd Maste /* Get the index of .shstrtab section. */ 66302c23cb7cSEd Maste if (!elf_getshstrndx(re->elf, &shstrndx)) { 66312c23cb7cSEd Maste warnx("elf_getshstrndx failed: %s", elf_errmsg(-1)); 66322c23cb7cSEd Maste return; 66332c23cb7cSEd Maste } 66342c23cb7cSEd Maste 663571a0c925SEd Maste if ((scn = elf_getscn(re->elf, 0)) == NULL) 66362c23cb7cSEd Maste return; 66372c23cb7cSEd Maste 66382c23cb7cSEd Maste (void) elf_errno(); 66392c23cb7cSEd Maste do { 66402c23cb7cSEd Maste if (gelf_getshdr(scn, &sh) == NULL) { 66412c23cb7cSEd Maste warnx("gelf_getshdr failed: %s", elf_errmsg(-1)); 66422c23cb7cSEd Maste (void) elf_errno(); 66432c23cb7cSEd Maste continue; 66442c23cb7cSEd Maste } 66452c23cb7cSEd Maste if ((name = elf_strptr(re->elf, shstrndx, sh.sh_name)) == NULL) { 66462c23cb7cSEd Maste (void) elf_errno(); 66477dc45d65SConrad Meyer name = "<no-name>"; 66482c23cb7cSEd Maste } 66492c23cb7cSEd Maste if ((ndx = elf_ndxscn(scn)) == SHN_UNDEF) { 66507dc45d65SConrad Meyer if ((elferr = elf_errno()) != 0) { 66512c23cb7cSEd Maste warnx("elf_ndxscn failed: %s", 66522c23cb7cSEd Maste elf_errmsg(elferr)); 66532c23cb7cSEd Maste continue; 66542c23cb7cSEd Maste } 66557dc45d65SConrad Meyer } 66562c23cb7cSEd Maste if (ndx >= re->shnum) { 66572c23cb7cSEd Maste warnx("section index of '%s' out of range", name); 66582c23cb7cSEd Maste continue; 66592c23cb7cSEd Maste } 6660656f49f8SEd Maste if (sh.sh_link >= re->shnum) 6661656f49f8SEd Maste warnx("section link %llu of '%s' out of range", 6662656f49f8SEd Maste (unsigned long long)sh.sh_link, name); 66632c23cb7cSEd Maste s = &re->sl[ndx]; 66642c23cb7cSEd Maste s->name = name; 66652c23cb7cSEd Maste s->scn = scn; 66662c23cb7cSEd Maste s->off = sh.sh_offset; 66672c23cb7cSEd Maste s->sz = sh.sh_size; 66682c23cb7cSEd Maste s->entsize = sh.sh_entsize; 66692c23cb7cSEd Maste s->align = sh.sh_addralign; 66702c23cb7cSEd Maste s->type = sh.sh_type; 66712c23cb7cSEd Maste s->flags = sh.sh_flags; 66722c23cb7cSEd Maste s->addr = sh.sh_addr; 66732c23cb7cSEd Maste s->link = sh.sh_link; 66742c23cb7cSEd Maste s->info = sh.sh_info; 66752c23cb7cSEd Maste } while ((scn = elf_nextscn(re->elf, scn)) != NULL); 66762c23cb7cSEd Maste elferr = elf_errno(); 66772c23cb7cSEd Maste if (elferr != 0) 66782c23cb7cSEd Maste warnx("elf_nextscn failed: %s", elf_errmsg(elferr)); 66792c23cb7cSEd Maste } 66802c23cb7cSEd Maste 66812c23cb7cSEd Maste static void 66822c23cb7cSEd Maste unload_sections(struct readelf *re) 66832c23cb7cSEd Maste { 66842c23cb7cSEd Maste 66852c23cb7cSEd Maste if (re->sl != NULL) { 66862c23cb7cSEd Maste free(re->sl); 66872c23cb7cSEd Maste re->sl = NULL; 66882c23cb7cSEd Maste } 66892c23cb7cSEd Maste re->shnum = 0; 66902c23cb7cSEd Maste re->vd_s = NULL; 66912c23cb7cSEd Maste re->vn_s = NULL; 66922c23cb7cSEd Maste re->vs_s = NULL; 66932c23cb7cSEd Maste re->vs = NULL; 66942c23cb7cSEd Maste re->vs_sz = 0; 66952c23cb7cSEd Maste if (re->ver != NULL) { 66962c23cb7cSEd Maste free(re->ver); 66972c23cb7cSEd Maste re->ver = NULL; 66982c23cb7cSEd Maste re->ver_sz = 0; 66992c23cb7cSEd Maste } 67002c23cb7cSEd Maste } 67012c23cb7cSEd Maste 67022c23cb7cSEd Maste static void 67032c23cb7cSEd Maste dump_elf(struct readelf *re) 67042c23cb7cSEd Maste { 67052c23cb7cSEd Maste 67062c23cb7cSEd Maste /* Fetch ELF header. No need to continue if it fails. */ 67072c23cb7cSEd Maste if (gelf_getehdr(re->elf, &re->ehdr) == NULL) { 67082c23cb7cSEd Maste warnx("gelf_getehdr failed: %s", elf_errmsg(-1)); 67092c23cb7cSEd Maste return; 67102c23cb7cSEd Maste } 67112c23cb7cSEd Maste if ((re->ec = gelf_getclass(re->elf)) == ELFCLASSNONE) { 67122c23cb7cSEd Maste warnx("gelf_getclass failed: %s", elf_errmsg(-1)); 67132c23cb7cSEd Maste return; 67142c23cb7cSEd Maste } 67152c23cb7cSEd Maste if (re->ehdr.e_ident[EI_DATA] == ELFDATA2MSB) { 67162c23cb7cSEd Maste re->dw_read = _read_msb; 67172c23cb7cSEd Maste re->dw_decode = _decode_msb; 67182c23cb7cSEd Maste } else { 67192c23cb7cSEd Maste re->dw_read = _read_lsb; 67202c23cb7cSEd Maste re->dw_decode = _decode_lsb; 67212c23cb7cSEd Maste } 67222c23cb7cSEd Maste 67232c23cb7cSEd Maste if (re->options & ~RE_H) 67242c23cb7cSEd Maste load_sections(re); 67252c23cb7cSEd Maste if ((re->options & RE_VV) || (re->options & RE_S)) 67262c23cb7cSEd Maste search_ver(re); 67272c23cb7cSEd Maste if (re->options & RE_H) 67282c23cb7cSEd Maste dump_ehdr(re); 67292c23cb7cSEd Maste if (re->options & RE_L) 67302c23cb7cSEd Maste dump_phdr(re); 67312c23cb7cSEd Maste if (re->options & RE_SS) 67322c23cb7cSEd Maste dump_shdr(re); 67333ef90571SEd Maste if (re->options & RE_G) 67343ef90571SEd Maste dump_section_groups(re); 67352c23cb7cSEd Maste if (re->options & RE_D) 67362c23cb7cSEd Maste dump_dynamic(re); 67372c23cb7cSEd Maste if (re->options & RE_R) 67382c23cb7cSEd Maste dump_reloc(re); 67392c23cb7cSEd Maste if (re->options & RE_S) 67402c23cb7cSEd Maste dump_symtabs(re); 67412c23cb7cSEd Maste if (re->options & RE_N) 67422c23cb7cSEd Maste dump_notes(re); 67432c23cb7cSEd Maste if (re->options & RE_II) 67442c23cb7cSEd Maste dump_hash(re); 67452c23cb7cSEd Maste if (re->options & RE_X) 67462c23cb7cSEd Maste hex_dump(re); 67472c23cb7cSEd Maste if (re->options & RE_P) 67482c23cb7cSEd Maste str_dump(re); 67492c23cb7cSEd Maste if (re->options & RE_VV) 67502c23cb7cSEd Maste dump_ver(re); 67512c23cb7cSEd Maste if (re->options & RE_AA) 67522c23cb7cSEd Maste dump_arch_specific_info(re); 67532c23cb7cSEd Maste if (re->options & RE_W) 67542c23cb7cSEd Maste dump_dwarf(re); 67552c23cb7cSEd Maste if (re->options & ~RE_H) 67562c23cb7cSEd Maste unload_sections(re); 67572c23cb7cSEd Maste } 67582c23cb7cSEd Maste 67592c23cb7cSEd Maste static void 67602c23cb7cSEd Maste dump_dwarf(struct readelf *re) 67612c23cb7cSEd Maste { 6762bee2765cSEd Maste struct loc_at *la, *_la; 67632c23cb7cSEd Maste Dwarf_Error de; 6764bee2765cSEd Maste int error; 67652c23cb7cSEd Maste 67662c23cb7cSEd Maste if (dwarf_elf_init(re->elf, DW_DLC_READ, NULL, NULL, &re->dbg, &de)) { 67672c23cb7cSEd Maste if ((error = dwarf_errno(de)) != DW_DLE_DEBUG_INFO_NULL) 67682c23cb7cSEd Maste errx(EXIT_FAILURE, "dwarf_elf_init failed: %s", 67692c23cb7cSEd Maste dwarf_errmsg(de)); 67702c23cb7cSEd Maste return; 67712c23cb7cSEd Maste } 67722c23cb7cSEd Maste 67732c23cb7cSEd Maste if (re->dop & DW_A) 67742c23cb7cSEd Maste dump_dwarf_abbrev(re); 67752c23cb7cSEd Maste if (re->dop & DW_L) 67762c23cb7cSEd Maste dump_dwarf_line(re); 67772c23cb7cSEd Maste if (re->dop & DW_LL) 67782c23cb7cSEd Maste dump_dwarf_line_decoded(re); 6779cf781b2eSEd Maste if (re->dop & DW_I) { 6780cf781b2eSEd Maste dump_dwarf_info(re, 0); 6781cf781b2eSEd Maste dump_dwarf_info(re, 1); 6782cf781b2eSEd Maste } 67832c23cb7cSEd Maste if (re->dop & DW_P) 67842c23cb7cSEd Maste dump_dwarf_pubnames(re); 67852c23cb7cSEd Maste if (re->dop & DW_R) 67862c23cb7cSEd Maste dump_dwarf_aranges(re); 67872c23cb7cSEd Maste if (re->dop & DW_RR) 67882c23cb7cSEd Maste dump_dwarf_ranges(re); 67892c23cb7cSEd Maste if (re->dop & DW_M) 67902c23cb7cSEd Maste dump_dwarf_macinfo(re); 67912c23cb7cSEd Maste if (re->dop & DW_F) 67922c23cb7cSEd Maste dump_dwarf_frame(re, 0); 67932c23cb7cSEd Maste else if (re->dop & DW_FF) 67942c23cb7cSEd Maste dump_dwarf_frame(re, 1); 67952c23cb7cSEd Maste if (re->dop & DW_S) 67962c23cb7cSEd Maste dump_dwarf_str(re); 67972c23cb7cSEd Maste if (re->dop & DW_O) 67982c23cb7cSEd Maste dump_dwarf_loclist(re); 67992c23cb7cSEd Maste 6800bee2765cSEd Maste TAILQ_FOREACH_SAFE(la, &lalist, la_next, _la) { 6801bee2765cSEd Maste TAILQ_REMOVE(&lalist, la, la_next); 6802bee2765cSEd Maste free(la); 6803bee2765cSEd Maste } 6804bee2765cSEd Maste 68052c23cb7cSEd Maste dwarf_finish(re->dbg, &de); 68062c23cb7cSEd Maste } 68072c23cb7cSEd Maste 68082c23cb7cSEd Maste static void 68092c23cb7cSEd Maste dump_ar(struct readelf *re, int fd) 68102c23cb7cSEd Maste { 68112c23cb7cSEd Maste Elf_Arsym *arsym; 68122c23cb7cSEd Maste Elf_Arhdr *arhdr; 68132c23cb7cSEd Maste Elf_Cmd cmd; 68142c23cb7cSEd Maste Elf *e; 68152c23cb7cSEd Maste size_t sz; 68162c23cb7cSEd Maste off_t off; 68172c23cb7cSEd Maste int i; 68182c23cb7cSEd Maste 68192c23cb7cSEd Maste re->ar = re->elf; 68202c23cb7cSEd Maste 68212c23cb7cSEd Maste if (re->options & RE_C) { 68222c23cb7cSEd Maste if ((arsym = elf_getarsym(re->ar, &sz)) == NULL) { 68232c23cb7cSEd Maste warnx("elf_getarsym() failed: %s", elf_errmsg(-1)); 68242c23cb7cSEd Maste goto process_members; 68252c23cb7cSEd Maste } 68262c23cb7cSEd Maste printf("Index of archive %s: (%ju entries)\n", re->filename, 68272c23cb7cSEd Maste (uintmax_t) sz - 1); 68282c23cb7cSEd Maste off = 0; 68292c23cb7cSEd Maste for (i = 0; (size_t) i < sz; i++) { 68302c23cb7cSEd Maste if (arsym[i].as_name == NULL) 68312c23cb7cSEd Maste break; 68322c23cb7cSEd Maste if (arsym[i].as_off != off) { 68332c23cb7cSEd Maste off = arsym[i].as_off; 68342c23cb7cSEd Maste if (elf_rand(re->ar, off) != off) { 68352c23cb7cSEd Maste warnx("elf_rand() failed: %s", 68362c23cb7cSEd Maste elf_errmsg(-1)); 68372c23cb7cSEd Maste continue; 68382c23cb7cSEd Maste } 68392c23cb7cSEd Maste if ((e = elf_begin(fd, ELF_C_READ, re->ar)) == 68402c23cb7cSEd Maste NULL) { 68412c23cb7cSEd Maste warnx("elf_begin() failed: %s", 68422c23cb7cSEd Maste elf_errmsg(-1)); 68432c23cb7cSEd Maste continue; 68442c23cb7cSEd Maste } 68452c23cb7cSEd Maste if ((arhdr = elf_getarhdr(e)) == NULL) { 68462c23cb7cSEd Maste warnx("elf_getarhdr() failed: %s", 68472c23cb7cSEd Maste elf_errmsg(-1)); 68482c23cb7cSEd Maste elf_end(e); 68492c23cb7cSEd Maste continue; 68502c23cb7cSEd Maste } 68512c23cb7cSEd Maste printf("Binary %s(%s) contains:\n", 68522c23cb7cSEd Maste re->filename, arhdr->ar_name); 68532c23cb7cSEd Maste } 68542c23cb7cSEd Maste printf("\t%s\n", arsym[i].as_name); 68552c23cb7cSEd Maste } 68562c23cb7cSEd Maste if (elf_rand(re->ar, SARMAG) != SARMAG) { 68572c23cb7cSEd Maste warnx("elf_rand() failed: %s", elf_errmsg(-1)); 68582c23cb7cSEd Maste return; 68592c23cb7cSEd Maste } 68602c23cb7cSEd Maste } 68612c23cb7cSEd Maste 68622c23cb7cSEd Maste process_members: 68632c23cb7cSEd Maste 68642c23cb7cSEd Maste if ((re->options & ~RE_C) == 0) 68652c23cb7cSEd Maste return; 68662c23cb7cSEd Maste 68672c23cb7cSEd Maste cmd = ELF_C_READ; 68682c23cb7cSEd Maste while ((re->elf = elf_begin(fd, cmd, re->ar)) != NULL) { 68692c23cb7cSEd Maste if ((arhdr = elf_getarhdr(re->elf)) == NULL) { 68702c23cb7cSEd Maste warnx("elf_getarhdr() failed: %s", elf_errmsg(-1)); 68712c23cb7cSEd Maste goto next_member; 68722c23cb7cSEd Maste } 68732c23cb7cSEd Maste if (strcmp(arhdr->ar_name, "/") == 0 || 68742c23cb7cSEd Maste strcmp(arhdr->ar_name, "//") == 0 || 68752c23cb7cSEd Maste strcmp(arhdr->ar_name, "__.SYMDEF") == 0) 68762c23cb7cSEd Maste goto next_member; 68772c23cb7cSEd Maste printf("\nFile: %s(%s)\n", re->filename, arhdr->ar_name); 68782c23cb7cSEd Maste dump_elf(re); 68792c23cb7cSEd Maste 68802c23cb7cSEd Maste next_member: 68812c23cb7cSEd Maste cmd = elf_next(re->elf); 68822c23cb7cSEd Maste elf_end(re->elf); 68832c23cb7cSEd Maste } 68842c23cb7cSEd Maste re->elf = re->ar; 68852c23cb7cSEd Maste } 68862c23cb7cSEd Maste 68872c23cb7cSEd Maste static void 68882c23cb7cSEd Maste dump_object(struct readelf *re) 68892c23cb7cSEd Maste { 68902c23cb7cSEd Maste int fd; 68912c23cb7cSEd Maste 68922c23cb7cSEd Maste if ((fd = open(re->filename, O_RDONLY)) == -1) { 68932c23cb7cSEd Maste warn("open %s failed", re->filename); 68942c23cb7cSEd Maste return; 68952c23cb7cSEd Maste } 68962c23cb7cSEd Maste 68972c23cb7cSEd Maste if ((re->flags & DISPLAY_FILENAME) != 0) 68982c23cb7cSEd Maste printf("\nFile: %s\n", re->filename); 68992c23cb7cSEd Maste 69002c23cb7cSEd Maste if ((re->elf = elf_begin(fd, ELF_C_READ, NULL)) == NULL) { 69012c23cb7cSEd Maste warnx("elf_begin() failed: %s", elf_errmsg(-1)); 69022c23cb7cSEd Maste return; 69032c23cb7cSEd Maste } 69042c23cb7cSEd Maste 69052c23cb7cSEd Maste switch (elf_kind(re->elf)) { 69062c23cb7cSEd Maste case ELF_K_NONE: 69072c23cb7cSEd Maste warnx("Not an ELF file."); 69082c23cb7cSEd Maste return; 69092c23cb7cSEd Maste case ELF_K_ELF: 69102c23cb7cSEd Maste dump_elf(re); 69112c23cb7cSEd Maste break; 69122c23cb7cSEd Maste case ELF_K_AR: 69132c23cb7cSEd Maste dump_ar(re, fd); 69142c23cb7cSEd Maste break; 69152c23cb7cSEd Maste default: 69162c23cb7cSEd Maste warnx("Internal: libelf returned unknown elf kind."); 69172c23cb7cSEd Maste return; 69182c23cb7cSEd Maste } 69192c23cb7cSEd Maste 69202c23cb7cSEd Maste elf_end(re->elf); 69212c23cb7cSEd Maste } 69222c23cb7cSEd Maste 69232c23cb7cSEd Maste static void 69242c23cb7cSEd Maste add_dumpop(struct readelf *re, size_t si, const char *sn, int op, int t) 69252c23cb7cSEd Maste { 69262c23cb7cSEd Maste struct dumpop *d; 69272c23cb7cSEd Maste 69282c23cb7cSEd Maste if ((d = find_dumpop(re, si, sn, -1, t)) == NULL) { 69292c23cb7cSEd Maste if ((d = calloc(1, sizeof(*d))) == NULL) 69302c23cb7cSEd Maste err(EXIT_FAILURE, "calloc failed"); 69312c23cb7cSEd Maste if (t == DUMP_BY_INDEX) 69322c23cb7cSEd Maste d->u.si = si; 69332c23cb7cSEd Maste else 69342c23cb7cSEd Maste d->u.sn = sn; 69352c23cb7cSEd Maste d->type = t; 69362c23cb7cSEd Maste d->op = op; 69372c23cb7cSEd Maste STAILQ_INSERT_TAIL(&re->v_dumpop, d, dumpop_list); 69382c23cb7cSEd Maste } else 69392c23cb7cSEd Maste d->op |= op; 69402c23cb7cSEd Maste } 69412c23cb7cSEd Maste 69422c23cb7cSEd Maste static struct dumpop * 69432c23cb7cSEd Maste find_dumpop(struct readelf *re, size_t si, const char *sn, int op, int t) 69442c23cb7cSEd Maste { 69452c23cb7cSEd Maste struct dumpop *d; 69462c23cb7cSEd Maste 69472c23cb7cSEd Maste STAILQ_FOREACH(d, &re->v_dumpop, dumpop_list) { 69482c23cb7cSEd Maste if ((op == -1 || op & d->op) && 69492c23cb7cSEd Maste (t == -1 || (unsigned) t == d->type)) { 69502c23cb7cSEd Maste if ((d->type == DUMP_BY_INDEX && d->u.si == si) || 69512c23cb7cSEd Maste (d->type == DUMP_BY_NAME && !strcmp(d->u.sn, sn))) 69522c23cb7cSEd Maste return (d); 69532c23cb7cSEd Maste } 69542c23cb7cSEd Maste } 69552c23cb7cSEd Maste 69562c23cb7cSEd Maste return (NULL); 69572c23cb7cSEd Maste } 69582c23cb7cSEd Maste 69592c23cb7cSEd Maste static struct { 69602c23cb7cSEd Maste const char *ln; 69612c23cb7cSEd Maste char sn; 69622c23cb7cSEd Maste int value; 69632c23cb7cSEd Maste } dwarf_op[] = { 69642c23cb7cSEd Maste {"rawline", 'l', DW_L}, 69652c23cb7cSEd Maste {"decodedline", 'L', DW_LL}, 69662c23cb7cSEd Maste {"info", 'i', DW_I}, 69672c23cb7cSEd Maste {"abbrev", 'a', DW_A}, 69682c23cb7cSEd Maste {"pubnames", 'p', DW_P}, 69692c23cb7cSEd Maste {"aranges", 'r', DW_R}, 69702c23cb7cSEd Maste {"ranges", 'r', DW_R}, 69712c23cb7cSEd Maste {"Ranges", 'R', DW_RR}, 69722c23cb7cSEd Maste {"macro", 'm', DW_M}, 69732c23cb7cSEd Maste {"frames", 'f', DW_F}, 6974cf781b2eSEd Maste {"frames-interp", 'F', DW_FF}, 69752c23cb7cSEd Maste {"str", 's', DW_S}, 69762c23cb7cSEd Maste {"loc", 'o', DW_O}, 69772c23cb7cSEd Maste {NULL, 0, 0} 69782c23cb7cSEd Maste }; 69792c23cb7cSEd Maste 69802c23cb7cSEd Maste static void 69812c23cb7cSEd Maste parse_dwarf_op_short(struct readelf *re, const char *op) 69822c23cb7cSEd Maste { 69832c23cb7cSEd Maste int i; 69842c23cb7cSEd Maste 69852c23cb7cSEd Maste if (op == NULL) { 69862c23cb7cSEd Maste re->dop |= DW_DEFAULT_OPTIONS; 69872c23cb7cSEd Maste return; 69882c23cb7cSEd Maste } 69892c23cb7cSEd Maste 69902c23cb7cSEd Maste for (; *op != '\0'; op++) { 69912c23cb7cSEd Maste for (i = 0; dwarf_op[i].ln != NULL; i++) { 69922c23cb7cSEd Maste if (dwarf_op[i].sn == *op) { 69932c23cb7cSEd Maste re->dop |= dwarf_op[i].value; 69942c23cb7cSEd Maste break; 69952c23cb7cSEd Maste } 69962c23cb7cSEd Maste } 69972c23cb7cSEd Maste } 69982c23cb7cSEd Maste } 69992c23cb7cSEd Maste 70002c23cb7cSEd Maste static void 70012c23cb7cSEd Maste parse_dwarf_op_long(struct readelf *re, const char *op) 70022c23cb7cSEd Maste { 70032c23cb7cSEd Maste char *p, *token, *bp; 70042c23cb7cSEd Maste int i; 70052c23cb7cSEd Maste 70062c23cb7cSEd Maste if (op == NULL) { 70072c23cb7cSEd Maste re->dop |= DW_DEFAULT_OPTIONS; 70082c23cb7cSEd Maste return; 70092c23cb7cSEd Maste } 70102c23cb7cSEd Maste 70112c23cb7cSEd Maste if ((p = strdup(op)) == NULL) 70122c23cb7cSEd Maste err(EXIT_FAILURE, "strdup failed"); 70132c23cb7cSEd Maste bp = p; 70142c23cb7cSEd Maste 70152c23cb7cSEd Maste while ((token = strsep(&p, ",")) != NULL) { 70162c23cb7cSEd Maste for (i = 0; dwarf_op[i].ln != NULL; i++) { 70172c23cb7cSEd Maste if (!strcmp(token, dwarf_op[i].ln)) { 70182c23cb7cSEd Maste re->dop |= dwarf_op[i].value; 70192c23cb7cSEd Maste break; 70202c23cb7cSEd Maste } 70212c23cb7cSEd Maste } 70222c23cb7cSEd Maste } 70232c23cb7cSEd Maste 70242c23cb7cSEd Maste free(bp); 70252c23cb7cSEd Maste } 70262c23cb7cSEd Maste 70272c23cb7cSEd Maste static uint64_t 70282c23cb7cSEd Maste _read_lsb(Elf_Data *d, uint64_t *offsetp, int bytes_to_read) 70292c23cb7cSEd Maste { 70302c23cb7cSEd Maste uint64_t ret; 70312c23cb7cSEd Maste uint8_t *src; 70322c23cb7cSEd Maste 70332c23cb7cSEd Maste src = (uint8_t *) d->d_buf + *offsetp; 70342c23cb7cSEd Maste 70352c23cb7cSEd Maste ret = 0; 70362c23cb7cSEd Maste switch (bytes_to_read) { 70372c23cb7cSEd Maste case 8: 70382c23cb7cSEd Maste ret |= ((uint64_t) src[4]) << 32 | ((uint64_t) src[5]) << 40; 70392c23cb7cSEd Maste ret |= ((uint64_t) src[6]) << 48 | ((uint64_t) src[7]) << 56; 7040839529caSEd Maste /* FALLTHROUGH */ 70412c23cb7cSEd Maste case 4: 70422c23cb7cSEd Maste ret |= ((uint64_t) src[2]) << 16 | ((uint64_t) src[3]) << 24; 7043839529caSEd Maste /* FALLTHROUGH */ 70442c23cb7cSEd Maste case 2: 70452c23cb7cSEd Maste ret |= ((uint64_t) src[1]) << 8; 7046839529caSEd Maste /* FALLTHROUGH */ 70472c23cb7cSEd Maste case 1: 70482c23cb7cSEd Maste ret |= src[0]; 70492c23cb7cSEd Maste break; 70502c23cb7cSEd Maste default: 70512c23cb7cSEd Maste return (0); 70522c23cb7cSEd Maste } 70532c23cb7cSEd Maste 70542c23cb7cSEd Maste *offsetp += bytes_to_read; 70552c23cb7cSEd Maste 70562c23cb7cSEd Maste return (ret); 70572c23cb7cSEd Maste } 70582c23cb7cSEd Maste 70592c23cb7cSEd Maste static uint64_t 70602c23cb7cSEd Maste _read_msb(Elf_Data *d, uint64_t *offsetp, int bytes_to_read) 70612c23cb7cSEd Maste { 70622c23cb7cSEd Maste uint64_t ret; 70632c23cb7cSEd Maste uint8_t *src; 70642c23cb7cSEd Maste 70652c23cb7cSEd Maste src = (uint8_t *) d->d_buf + *offsetp; 70662c23cb7cSEd Maste 70672c23cb7cSEd Maste switch (bytes_to_read) { 70682c23cb7cSEd Maste case 1: 70692c23cb7cSEd Maste ret = src[0]; 70702c23cb7cSEd Maste break; 70712c23cb7cSEd Maste case 2: 70722c23cb7cSEd Maste ret = src[1] | ((uint64_t) src[0]) << 8; 70732c23cb7cSEd Maste break; 70742c23cb7cSEd Maste case 4: 70752c23cb7cSEd Maste ret = src[3] | ((uint64_t) src[2]) << 8; 70762c23cb7cSEd Maste ret |= ((uint64_t) src[1]) << 16 | ((uint64_t) src[0]) << 24; 70772c23cb7cSEd Maste break; 70782c23cb7cSEd Maste case 8: 70792c23cb7cSEd Maste ret = src[7] | ((uint64_t) src[6]) << 8; 70802c23cb7cSEd Maste ret |= ((uint64_t) src[5]) << 16 | ((uint64_t) src[4]) << 24; 70812c23cb7cSEd Maste ret |= ((uint64_t) src[3]) << 32 | ((uint64_t) src[2]) << 40; 70822c23cb7cSEd Maste ret |= ((uint64_t) src[1]) << 48 | ((uint64_t) src[0]) << 56; 70832c23cb7cSEd Maste break; 70842c23cb7cSEd Maste default: 70852c23cb7cSEd Maste return (0); 70862c23cb7cSEd Maste } 70872c23cb7cSEd Maste 70882c23cb7cSEd Maste *offsetp += bytes_to_read; 70892c23cb7cSEd Maste 70902c23cb7cSEd Maste return (ret); 70912c23cb7cSEd Maste } 70922c23cb7cSEd Maste 70932c23cb7cSEd Maste static uint64_t 70942c23cb7cSEd Maste _decode_lsb(uint8_t **data, int bytes_to_read) 70952c23cb7cSEd Maste { 70962c23cb7cSEd Maste uint64_t ret; 70972c23cb7cSEd Maste uint8_t *src; 70982c23cb7cSEd Maste 70992c23cb7cSEd Maste src = *data; 71002c23cb7cSEd Maste 71012c23cb7cSEd Maste ret = 0; 71022c23cb7cSEd Maste switch (bytes_to_read) { 71032c23cb7cSEd Maste case 8: 71042c23cb7cSEd Maste ret |= ((uint64_t) src[4]) << 32 | ((uint64_t) src[5]) << 40; 71052c23cb7cSEd Maste ret |= ((uint64_t) src[6]) << 48 | ((uint64_t) src[7]) << 56; 7106839529caSEd Maste /* FALLTHROUGH */ 71072c23cb7cSEd Maste case 4: 71082c23cb7cSEd Maste ret |= ((uint64_t) src[2]) << 16 | ((uint64_t) src[3]) << 24; 7109839529caSEd Maste /* FALLTHROUGH */ 71102c23cb7cSEd Maste case 2: 71112c23cb7cSEd Maste ret |= ((uint64_t) src[1]) << 8; 7112839529caSEd Maste /* FALLTHROUGH */ 71132c23cb7cSEd Maste case 1: 71142c23cb7cSEd Maste ret |= src[0]; 71152c23cb7cSEd Maste break; 71162c23cb7cSEd Maste default: 71172c23cb7cSEd Maste return (0); 71182c23cb7cSEd Maste } 71192c23cb7cSEd Maste 71202c23cb7cSEd Maste *data += bytes_to_read; 71212c23cb7cSEd Maste 71222c23cb7cSEd Maste return (ret); 71232c23cb7cSEd Maste } 71242c23cb7cSEd Maste 71252c23cb7cSEd Maste static uint64_t 71262c23cb7cSEd Maste _decode_msb(uint8_t **data, int bytes_to_read) 71272c23cb7cSEd Maste { 71282c23cb7cSEd Maste uint64_t ret; 71292c23cb7cSEd Maste uint8_t *src; 71302c23cb7cSEd Maste 71312c23cb7cSEd Maste src = *data; 71322c23cb7cSEd Maste 71332c23cb7cSEd Maste ret = 0; 71342c23cb7cSEd Maste switch (bytes_to_read) { 71352c23cb7cSEd Maste case 1: 71362c23cb7cSEd Maste ret = src[0]; 71372c23cb7cSEd Maste break; 71382c23cb7cSEd Maste case 2: 71392c23cb7cSEd Maste ret = src[1] | ((uint64_t) src[0]) << 8; 71402c23cb7cSEd Maste break; 71412c23cb7cSEd Maste case 4: 71422c23cb7cSEd Maste ret = src[3] | ((uint64_t) src[2]) << 8; 71432c23cb7cSEd Maste ret |= ((uint64_t) src[1]) << 16 | ((uint64_t) src[0]) << 24; 71442c23cb7cSEd Maste break; 71452c23cb7cSEd Maste case 8: 71462c23cb7cSEd Maste ret = src[7] | ((uint64_t) src[6]) << 8; 71472c23cb7cSEd Maste ret |= ((uint64_t) src[5]) << 16 | ((uint64_t) src[4]) << 24; 71482c23cb7cSEd Maste ret |= ((uint64_t) src[3]) << 32 | ((uint64_t) src[2]) << 40; 71492c23cb7cSEd Maste ret |= ((uint64_t) src[1]) << 48 | ((uint64_t) src[0]) << 56; 71502c23cb7cSEd Maste break; 71512c23cb7cSEd Maste default: 71522c23cb7cSEd Maste return (0); 71532c23cb7cSEd Maste break; 71542c23cb7cSEd Maste } 71552c23cb7cSEd Maste 71562c23cb7cSEd Maste *data += bytes_to_read; 71572c23cb7cSEd Maste 71582c23cb7cSEd Maste return (ret); 71592c23cb7cSEd Maste } 71602c23cb7cSEd Maste 71612c23cb7cSEd Maste static int64_t 716295fd7f26SEd Maste _decode_sleb128(uint8_t **dp, uint8_t *dpe) 71632c23cb7cSEd Maste { 71642c23cb7cSEd Maste int64_t ret = 0; 71658f32e46dSKai Wang uint8_t b = 0; 71662c23cb7cSEd Maste int shift = 0; 71672c23cb7cSEd Maste 71682c23cb7cSEd Maste uint8_t *src = *dp; 71692c23cb7cSEd Maste 71702c23cb7cSEd Maste do { 717195fd7f26SEd Maste if (src >= dpe) 717295fd7f26SEd Maste break; 71732c23cb7cSEd Maste b = *src++; 71742c23cb7cSEd Maste ret |= ((b & 0x7f) << shift); 71752c23cb7cSEd Maste shift += 7; 71762c23cb7cSEd Maste } while ((b & 0x80) != 0); 71772c23cb7cSEd Maste 71782c23cb7cSEd Maste if (shift < 32 && (b & 0x40) != 0) 71792c23cb7cSEd Maste ret |= (-1 << shift); 71802c23cb7cSEd Maste 71812c23cb7cSEd Maste *dp = src; 71822c23cb7cSEd Maste 71832c23cb7cSEd Maste return (ret); 71842c23cb7cSEd Maste } 71852c23cb7cSEd Maste 71862c23cb7cSEd Maste static uint64_t 718795fd7f26SEd Maste _decode_uleb128(uint8_t **dp, uint8_t *dpe) 71882c23cb7cSEd Maste { 71892c23cb7cSEd Maste uint64_t ret = 0; 71902c23cb7cSEd Maste uint8_t b; 71912c23cb7cSEd Maste int shift = 0; 71922c23cb7cSEd Maste 71932c23cb7cSEd Maste uint8_t *src = *dp; 71942c23cb7cSEd Maste 71952c23cb7cSEd Maste do { 719695fd7f26SEd Maste if (src >= dpe) 719795fd7f26SEd Maste break; 71982c23cb7cSEd Maste b = *src++; 71992c23cb7cSEd Maste ret |= ((b & 0x7f) << shift); 72002c23cb7cSEd Maste shift += 7; 72012c23cb7cSEd Maste } while ((b & 0x80) != 0); 72022c23cb7cSEd Maste 72032c23cb7cSEd Maste *dp = src; 72042c23cb7cSEd Maste 72052c23cb7cSEd Maste return (ret); 72062c23cb7cSEd Maste } 72072c23cb7cSEd Maste 72082c23cb7cSEd Maste static void 72092c23cb7cSEd Maste readelf_version(void) 72102c23cb7cSEd Maste { 72112c23cb7cSEd Maste (void) printf("%s (%s)\n", ELFTC_GETPROGNAME(), 72122c23cb7cSEd Maste elftc_version()); 72132c23cb7cSEd Maste exit(EXIT_SUCCESS); 72142c23cb7cSEd Maste } 72152c23cb7cSEd Maste 72162c23cb7cSEd Maste #define USAGE_MESSAGE "\ 72172c23cb7cSEd Maste Usage: %s [options] file...\n\ 72182c23cb7cSEd Maste Display information about ELF objects and ar(1) archives.\n\n\ 72192c23cb7cSEd Maste Options:\n\ 72202c23cb7cSEd Maste -a | --all Equivalent to specifying options '-dhIlrsASV'.\n\ 72212c23cb7cSEd Maste -c | --archive-index Print the archive symbol table for archives.\n\ 72222c23cb7cSEd Maste -d | --dynamic Print the contents of SHT_DYNAMIC sections.\n\ 72232c23cb7cSEd Maste -e | --headers Print all headers in the object.\n\ 72243ef90571SEd Maste -g | --section-groups Print the contents of the section groups.\n\ 72252c23cb7cSEd Maste -h | --file-header Print the file header for the object.\n\ 72262c23cb7cSEd Maste -l | --program-headers Print the PHDR table for the object.\n\ 72272c23cb7cSEd Maste -n | --notes Print the contents of SHT_NOTE sections.\n\ 72282c23cb7cSEd Maste -p INDEX | --string-dump=INDEX\n\ 72292c23cb7cSEd Maste Print the contents of section at index INDEX.\n\ 72302c23cb7cSEd Maste -r | --relocs Print relocation information.\n\ 72312c23cb7cSEd Maste -s | --syms | --symbols Print symbol tables.\n\ 72322c23cb7cSEd Maste -t | --section-details Print additional information about sections.\n\ 72332c23cb7cSEd Maste -v | --version Print a version identifier and exit.\n\ 7234839529caSEd Maste -w[afilmoprsFLR] | --debug-dump={abbrev,aranges,decodedline,frames,\n\ 7235839529caSEd Maste frames-interp,info,loc,macro,pubnames,\n\ 7236839529caSEd Maste ranges,Ranges,rawline,str}\n\ 7237839529caSEd Maste Display DWARF information.\n\ 72382c23cb7cSEd Maste -x INDEX | --hex-dump=INDEX\n\ 72392c23cb7cSEd Maste Display contents of a section as hexadecimal.\n\ 72402c23cb7cSEd Maste -A | --arch-specific (accepted, but ignored)\n\ 72412c23cb7cSEd Maste -D | --use-dynamic Print the symbol table specified by the DT_SYMTAB\n\ 72422c23cb7cSEd Maste entry in the \".dynamic\" section.\n\ 72432c23cb7cSEd Maste -H | --help Print a help message.\n\ 72442c23cb7cSEd Maste -I | --histogram Print information on bucket list lengths for \n\ 72452c23cb7cSEd Maste hash sections.\n\ 72462c23cb7cSEd Maste -N | --full-section-name (accepted, but ignored)\n\ 72472c23cb7cSEd Maste -S | --sections | --section-headers\n\ 72482c23cb7cSEd Maste Print information about section headers.\n\ 72492c23cb7cSEd Maste -V | --version-info Print symbol versoning information.\n\ 72502c23cb7cSEd Maste -W | --wide Print information without wrapping long lines.\n" 72512c23cb7cSEd Maste 72522c23cb7cSEd Maste 72532c23cb7cSEd Maste static void 7254839529caSEd Maste readelf_usage(int status) 72552c23cb7cSEd Maste { 72562c23cb7cSEd Maste fprintf(stderr, USAGE_MESSAGE, ELFTC_GETPROGNAME()); 7257839529caSEd Maste exit(status); 72582c23cb7cSEd Maste } 72592c23cb7cSEd Maste 72602c23cb7cSEd Maste int 72612c23cb7cSEd Maste main(int argc, char **argv) 72622c23cb7cSEd Maste { 72632c23cb7cSEd Maste struct readelf *re, re_storage; 72642c23cb7cSEd Maste unsigned long si; 72652c23cb7cSEd Maste int opt, i; 72662c23cb7cSEd Maste char *ep; 72672c23cb7cSEd Maste 72682c23cb7cSEd Maste re = &re_storage; 72692c23cb7cSEd Maste memset(re, 0, sizeof(*re)); 72702c23cb7cSEd Maste STAILQ_INIT(&re->v_dumpop); 72712c23cb7cSEd Maste 72722c23cb7cSEd Maste while ((opt = getopt_long(argc, argv, "AacDdegHhIi:lNnp:rSstuVvWw::x:", 72732c23cb7cSEd Maste longopts, NULL)) != -1) { 72742c23cb7cSEd Maste switch(opt) { 72752c23cb7cSEd Maste case '?': 7276839529caSEd Maste readelf_usage(EXIT_SUCCESS); 72772c23cb7cSEd Maste break; 72782c23cb7cSEd Maste case 'A': 72792c23cb7cSEd Maste re->options |= RE_AA; 72802c23cb7cSEd Maste break; 72812c23cb7cSEd Maste case 'a': 72823ef90571SEd Maste re->options |= RE_AA | RE_D | RE_G | RE_H | RE_II | 72833ef90571SEd Maste RE_L | RE_R | RE_SS | RE_S | RE_VV; 72842c23cb7cSEd Maste break; 72852c23cb7cSEd Maste case 'c': 72862c23cb7cSEd Maste re->options |= RE_C; 72872c23cb7cSEd Maste break; 72882c23cb7cSEd Maste case 'D': 72892c23cb7cSEd Maste re->options |= RE_DD; 72902c23cb7cSEd Maste break; 72912c23cb7cSEd Maste case 'd': 72922c23cb7cSEd Maste re->options |= RE_D; 72932c23cb7cSEd Maste break; 72942c23cb7cSEd Maste case 'e': 72952c23cb7cSEd Maste re->options |= RE_H | RE_L | RE_SS; 72962c23cb7cSEd Maste break; 72972c23cb7cSEd Maste case 'g': 72982c23cb7cSEd Maste re->options |= RE_G; 72992c23cb7cSEd Maste break; 73002c23cb7cSEd Maste case 'H': 7301839529caSEd Maste readelf_usage(EXIT_SUCCESS); 73022c23cb7cSEd Maste break; 73032c23cb7cSEd Maste case 'h': 73042c23cb7cSEd Maste re->options |= RE_H; 73052c23cb7cSEd Maste break; 73062c23cb7cSEd Maste case 'I': 73072c23cb7cSEd Maste re->options |= RE_II; 73082c23cb7cSEd Maste break; 73092c23cb7cSEd Maste case 'i': 73102c23cb7cSEd Maste /* Not implemented yet. */ 73112c23cb7cSEd Maste break; 73122c23cb7cSEd Maste case 'l': 73132c23cb7cSEd Maste re->options |= RE_L; 73142c23cb7cSEd Maste break; 73152c23cb7cSEd Maste case 'N': 73162c23cb7cSEd Maste re->options |= RE_NN; 73172c23cb7cSEd Maste break; 73182c23cb7cSEd Maste case 'n': 73192c23cb7cSEd Maste re->options |= RE_N; 73202c23cb7cSEd Maste break; 73212c23cb7cSEd Maste case 'p': 73222c23cb7cSEd Maste re->options |= RE_P; 73232c23cb7cSEd Maste si = strtoul(optarg, &ep, 10); 73242c23cb7cSEd Maste if (*ep == '\0') 73252c23cb7cSEd Maste add_dumpop(re, (size_t) si, NULL, STR_DUMP, 73262c23cb7cSEd Maste DUMP_BY_INDEX); 73272c23cb7cSEd Maste else 73282c23cb7cSEd Maste add_dumpop(re, 0, optarg, STR_DUMP, 73292c23cb7cSEd Maste DUMP_BY_NAME); 73302c23cb7cSEd Maste break; 73312c23cb7cSEd Maste case 'r': 73322c23cb7cSEd Maste re->options |= RE_R; 73332c23cb7cSEd Maste break; 73342c23cb7cSEd Maste case 'S': 73352c23cb7cSEd Maste re->options |= RE_SS; 73362c23cb7cSEd Maste break; 73372c23cb7cSEd Maste case 's': 73382c23cb7cSEd Maste re->options |= RE_S; 73392c23cb7cSEd Maste break; 73402c23cb7cSEd Maste case 't': 73412c23cb7cSEd Maste re->options |= RE_T; 73422c23cb7cSEd Maste break; 73432c23cb7cSEd Maste case 'u': 73442c23cb7cSEd Maste re->options |= RE_U; 73452c23cb7cSEd Maste break; 73462c23cb7cSEd Maste case 'V': 73472c23cb7cSEd Maste re->options |= RE_VV; 73482c23cb7cSEd Maste break; 73492c23cb7cSEd Maste case 'v': 73502c23cb7cSEd Maste readelf_version(); 73512c23cb7cSEd Maste break; 73522c23cb7cSEd Maste case 'W': 73532c23cb7cSEd Maste re->options |= RE_WW; 73542c23cb7cSEd Maste break; 73552c23cb7cSEd Maste case 'w': 73562c23cb7cSEd Maste re->options |= RE_W; 73572c23cb7cSEd Maste parse_dwarf_op_short(re, optarg); 73582c23cb7cSEd Maste break; 73592c23cb7cSEd Maste case 'x': 73602c23cb7cSEd Maste re->options |= RE_X; 73612c23cb7cSEd Maste si = strtoul(optarg, &ep, 10); 73622c23cb7cSEd Maste if (*ep == '\0') 73632c23cb7cSEd Maste add_dumpop(re, (size_t) si, NULL, HEX_DUMP, 73642c23cb7cSEd Maste DUMP_BY_INDEX); 73652c23cb7cSEd Maste else 73662c23cb7cSEd Maste add_dumpop(re, 0, optarg, HEX_DUMP, 73672c23cb7cSEd Maste DUMP_BY_NAME); 73682c23cb7cSEd Maste break; 73692c23cb7cSEd Maste case OPTION_DEBUG_DUMP: 73702c23cb7cSEd Maste re->options |= RE_W; 73712c23cb7cSEd Maste parse_dwarf_op_long(re, optarg); 73722c23cb7cSEd Maste } 73732c23cb7cSEd Maste } 73742c23cb7cSEd Maste 73752c23cb7cSEd Maste argv += optind; 73762c23cb7cSEd Maste argc -= optind; 73772c23cb7cSEd Maste 73782c23cb7cSEd Maste if (argc == 0 || re->options == 0) 7379839529caSEd Maste readelf_usage(EXIT_FAILURE); 73802c23cb7cSEd Maste 73812c23cb7cSEd Maste if (argc > 1) 73822c23cb7cSEd Maste re->flags |= DISPLAY_FILENAME; 73832c23cb7cSEd Maste 73842c23cb7cSEd Maste if (elf_version(EV_CURRENT) == EV_NONE) 73852c23cb7cSEd Maste errx(EXIT_FAILURE, "ELF library initialization failed: %s", 73862c23cb7cSEd Maste elf_errmsg(-1)); 73872c23cb7cSEd Maste 7388b00fe64fSEd Maste for (i = 0; i < argc; i++) { 73892c23cb7cSEd Maste re->filename = argv[i]; 73902c23cb7cSEd Maste dump_object(re); 73912c23cb7cSEd Maste } 73922c23cb7cSEd Maste 73932c23cb7cSEd Maste exit(EXIT_SUCCESS); 73942c23cb7cSEd Maste } 7395