1 /*-
2 * SPDX-License-Identifier: BSD-2-Clause
3 *
4 * Copyright (c) 2003 David O'Brien. All rights reserved.
5 * Copyright (c) 2001 Jake Burkholder
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 */
29
30 #include <sys/cdefs.h>
31 #include <sys/types.h>
32
33 #include <sys/capsicum.h>
34 #include <sys/elf32.h>
35 #include <sys/elf64.h>
36 #include <sys/endian.h>
37 #include <sys/mman.h>
38 #include <sys/stat.h>
39 #include <capsicum_helpers.h>
40 #include <err.h>
41 #include <errno.h>
42 #include <fcntl.h>
43 #include <inttypes.h>
44 #include <stddef.h>
45 #include <stdio.h>
46 #include <stdlib.h>
47 #include <string.h>
48 #include <unistd.h>
49
50 #define ED_DYN (1<<0)
51 #define ED_EHDR (1<<1)
52 #define ED_GOT (1<<2)
53 #define ED_HASH (1<<3)
54 #define ED_INTERP (1<<4)
55 #define ED_NOTE (1<<5)
56 #define ED_PHDR (1<<6)
57 #define ED_REL (1<<7)
58 #define ED_SHDR (1<<8)
59 #define ED_SYMTAB (1<<9)
60 #define ED_ALL ((1<<10)-1)
61 #define ED_IS_ELF (1<<10) /* Exclusive with other flags */
62
63 #define elf_get_addr elf_get_quad
64 #define elf_get_off elf_get_quad
65 #define elf_get_size elf_get_quad
66
67 enum elf_member {
68 D_TAG = 1, D_PTR, D_VAL,
69
70 E_CLASS, E_DATA, E_OSABI, E_TYPE, E_MACHINE, E_VERSION, E_ENTRY,
71 E_PHOFF, E_SHOFF, E_FLAGS, E_EHSIZE, E_PHENTSIZE, E_PHNUM, E_SHENTSIZE,
72 E_SHNUM, E_SHSTRNDX,
73
74 N_NAMESZ, N_DESCSZ, N_TYPE,
75
76 P_TYPE, P_OFFSET, P_VADDR, P_PADDR, P_FILESZ, P_MEMSZ, P_FLAGS,
77 P_ALIGN,
78
79 SH_NAME, SH_TYPE, SH_FLAGS, SH_ADDR, SH_OFFSET, SH_SIZE, SH_LINK,
80 SH_INFO, SH_ADDRALIGN, SH_ENTSIZE,
81
82 ST_NAME, ST_VALUE, ST_SIZE, ST_INFO, ST_SHNDX,
83
84 R_OFFSET, R_INFO,
85
86 RA_OFFSET, RA_INFO, RA_ADDEND
87 };
88
89 typedef enum elf_member elf_member_t;
90
91 static int elf32_offsets[] = {
92 0,
93
94 offsetof(Elf32_Dyn, d_tag), offsetof(Elf32_Dyn, d_un.d_ptr),
95 offsetof(Elf32_Dyn, d_un.d_val),
96
97 offsetof(Elf32_Ehdr, e_ident[EI_CLASS]),
98 offsetof(Elf32_Ehdr, e_ident[EI_DATA]),
99 offsetof(Elf32_Ehdr, e_ident[EI_OSABI]),
100 offsetof(Elf32_Ehdr, e_type), offsetof(Elf32_Ehdr, e_machine),
101 offsetof(Elf32_Ehdr, e_version), offsetof(Elf32_Ehdr, e_entry),
102 offsetof(Elf32_Ehdr, e_phoff), offsetof(Elf32_Ehdr, e_shoff),
103 offsetof(Elf32_Ehdr, e_flags), offsetof(Elf32_Ehdr, e_ehsize),
104 offsetof(Elf32_Ehdr, e_phentsize), offsetof(Elf32_Ehdr, e_phnum),
105 offsetof(Elf32_Ehdr, e_shentsize), offsetof(Elf32_Ehdr, e_shnum),
106 offsetof(Elf32_Ehdr, e_shstrndx),
107
108 offsetof(Elf_Note, n_namesz), offsetof(Elf_Note, n_descsz),
109 offsetof(Elf_Note, n_type),
110
111 offsetof(Elf32_Phdr, p_type), offsetof(Elf32_Phdr, p_offset),
112 offsetof(Elf32_Phdr, p_vaddr), offsetof(Elf32_Phdr, p_paddr),
113 offsetof(Elf32_Phdr, p_filesz), offsetof(Elf32_Phdr, p_memsz),
114 offsetof(Elf32_Phdr, p_flags), offsetof(Elf32_Phdr, p_align),
115
116 offsetof(Elf32_Shdr, sh_name), offsetof(Elf32_Shdr, sh_type),
117 offsetof(Elf32_Shdr, sh_flags), offsetof(Elf32_Shdr, sh_addr),
118 offsetof(Elf32_Shdr, sh_offset), offsetof(Elf32_Shdr, sh_size),
119 offsetof(Elf32_Shdr, sh_link), offsetof(Elf32_Shdr, sh_info),
120 offsetof(Elf32_Shdr, sh_addralign), offsetof(Elf32_Shdr, sh_entsize),
121
122 offsetof(Elf32_Sym, st_name), offsetof(Elf32_Sym, st_value),
123 offsetof(Elf32_Sym, st_size), offsetof(Elf32_Sym, st_info),
124 offsetof(Elf32_Sym, st_shndx),
125
126 offsetof(Elf32_Rel, r_offset), offsetof(Elf32_Rel, r_info),
127
128 offsetof(Elf32_Rela, r_offset), offsetof(Elf32_Rela, r_info),
129 offsetof(Elf32_Rela, r_addend)
130 };
131
132 static int elf64_offsets[] = {
133 0,
134
135 offsetof(Elf64_Dyn, d_tag), offsetof(Elf64_Dyn, d_un.d_ptr),
136 offsetof(Elf64_Dyn, d_un.d_val),
137
138 offsetof(Elf32_Ehdr, e_ident[EI_CLASS]),
139 offsetof(Elf32_Ehdr, e_ident[EI_DATA]),
140 offsetof(Elf32_Ehdr, e_ident[EI_OSABI]),
141 offsetof(Elf64_Ehdr, e_type), offsetof(Elf64_Ehdr, e_machine),
142 offsetof(Elf64_Ehdr, e_version), offsetof(Elf64_Ehdr, e_entry),
143 offsetof(Elf64_Ehdr, e_phoff), offsetof(Elf64_Ehdr, e_shoff),
144 offsetof(Elf64_Ehdr, e_flags), offsetof(Elf64_Ehdr, e_ehsize),
145 offsetof(Elf64_Ehdr, e_phentsize), offsetof(Elf64_Ehdr, e_phnum),
146 offsetof(Elf64_Ehdr, e_shentsize), offsetof(Elf64_Ehdr, e_shnum),
147 offsetof(Elf64_Ehdr, e_shstrndx),
148
149 offsetof(Elf_Note, n_namesz), offsetof(Elf_Note, n_descsz),
150 offsetof(Elf_Note, n_type),
151
152 offsetof(Elf64_Phdr, p_type), offsetof(Elf64_Phdr, p_offset),
153 offsetof(Elf64_Phdr, p_vaddr), offsetof(Elf64_Phdr, p_paddr),
154 offsetof(Elf64_Phdr, p_filesz), offsetof(Elf64_Phdr, p_memsz),
155 offsetof(Elf64_Phdr, p_flags), offsetof(Elf64_Phdr, p_align),
156
157 offsetof(Elf64_Shdr, sh_name), offsetof(Elf64_Shdr, sh_type),
158 offsetof(Elf64_Shdr, sh_flags), offsetof(Elf64_Shdr, sh_addr),
159 offsetof(Elf64_Shdr, sh_offset), offsetof(Elf64_Shdr, sh_size),
160 offsetof(Elf64_Shdr, sh_link), offsetof(Elf64_Shdr, sh_info),
161 offsetof(Elf64_Shdr, sh_addralign), offsetof(Elf64_Shdr, sh_entsize),
162
163 offsetof(Elf64_Sym, st_name), offsetof(Elf64_Sym, st_value),
164 offsetof(Elf64_Sym, st_size), offsetof(Elf64_Sym, st_info),
165 offsetof(Elf64_Sym, st_shndx),
166
167 offsetof(Elf64_Rel, r_offset), offsetof(Elf64_Rel, r_info),
168
169 offsetof(Elf64_Rela, r_offset), offsetof(Elf64_Rela, r_info),
170 offsetof(Elf64_Rela, r_addend)
171 };
172
173 /* http://www.sco.com/developers/gabi/latest/ch5.dynamic.html#tag_encodings */
174 static const char *
d_tags(u_int64_t tag)175 d_tags(u_int64_t tag)
176 {
177 static char unknown_tag[48];
178
179 switch (tag) {
180 case DT_NULL: return "DT_NULL";
181 case DT_NEEDED: return "DT_NEEDED";
182 case DT_PLTRELSZ: return "DT_PLTRELSZ";
183 case DT_PLTGOT: return "DT_PLTGOT";
184 case DT_HASH: return "DT_HASH";
185 case DT_STRTAB: return "DT_STRTAB";
186 case DT_SYMTAB: return "DT_SYMTAB";
187 case DT_RELA: return "DT_RELA";
188 case DT_RELASZ: return "DT_RELASZ";
189 case DT_RELAENT: return "DT_RELAENT";
190 case DT_STRSZ: return "DT_STRSZ";
191 case DT_SYMENT: return "DT_SYMENT";
192 case DT_INIT: return "DT_INIT";
193 case DT_FINI: return "DT_FINI";
194 case DT_SONAME: return "DT_SONAME";
195 case DT_RPATH: return "DT_RPATH";
196 case DT_SYMBOLIC: return "DT_SYMBOLIC";
197 case DT_REL: return "DT_REL";
198 case DT_RELSZ: return "DT_RELSZ";
199 case DT_RELENT: return "DT_RELENT";
200 case DT_PLTREL: return "DT_PLTREL";
201 case DT_DEBUG: return "DT_DEBUG";
202 case DT_TEXTREL: return "DT_TEXTREL";
203 case DT_JMPREL: return "DT_JMPREL";
204 case DT_BIND_NOW: return "DT_BIND_NOW";
205 case DT_INIT_ARRAY: return "DT_INIT_ARRAY";
206 case DT_FINI_ARRAY: return "DT_FINI_ARRAY";
207 case DT_INIT_ARRAYSZ: return "DT_INIT_ARRAYSZ";
208 case DT_FINI_ARRAYSZ: return "DT_FINI_ARRAYSZ";
209 case DT_RUNPATH: return "DT_RUNPATH";
210 case DT_FLAGS: return "DT_FLAGS";
211 case DT_PREINIT_ARRAY: return "DT_PREINIT_ARRAY"; /* XXX DT_ENCODING */
212 case DT_PREINIT_ARRAYSZ:return "DT_PREINIT_ARRAYSZ";
213 /* 0x6000000D - 0x6ffff000 operating system-specific semantics */
214 case 0x6ffffdf5: return "DT_GNU_PRELINKED";
215 case 0x6ffffdf6: return "DT_GNU_CONFLICTSZ";
216 case 0x6ffffdf7: return "DT_GNU_LIBLISTSZ";
217 case 0x6ffffdf8: return "DT_SUNW_CHECKSUM";
218 case DT_PLTPADSZ: return "DT_PLTPADSZ";
219 case DT_MOVEENT: return "DT_MOVEENT";
220 case DT_MOVESZ: return "DT_MOVESZ";
221 case DT_FEATURE: return "DT_FEATURE";
222 case DT_POSFLAG_1: return "DT_POSFLAG_1";
223 case DT_SYMINSZ: return "DT_SYMINSZ";
224 case DT_SYMINENT : return "DT_SYMINENT (DT_VALRNGHI)";
225 case DT_ADDRRNGLO: return "DT_ADDRRNGLO";
226 case DT_GNU_HASH: return "DT_GNU_HASH";
227 case 0x6ffffef8: return "DT_GNU_CONFLICT";
228 case 0x6ffffef9: return "DT_GNU_LIBLIST";
229 case DT_CONFIG: return "DT_CONFIG";
230 case DT_DEPAUDIT: return "DT_DEPAUDIT";
231 case DT_AUDIT: return "DT_AUDIT";
232 case DT_PLTPAD: return "DT_PLTPAD";
233 case DT_MOVETAB: return "DT_MOVETAB";
234 case DT_SYMINFO : return "DT_SYMINFO (DT_ADDRRNGHI)";
235 case DT_RELACOUNT: return "DT_RELACOUNT";
236 case DT_RELCOUNT: return "DT_RELCOUNT";
237 case DT_FLAGS_1: return "DT_FLAGS_1";
238 case DT_VERDEF: return "DT_VERDEF";
239 case DT_VERDEFNUM: return "DT_VERDEFNUM";
240 case DT_VERNEED: return "DT_VERNEED";
241 case DT_VERNEEDNUM: return "DT_VERNEEDNUM";
242 case 0x6ffffff0: return "DT_GNU_VERSYM";
243 /* 0x70000000 - 0x7fffffff processor-specific semantics */
244 case 0x70000000: return "DT_IA_64_PLT_RESERVE";
245 case DT_AUXILIARY: return "DT_AUXILIARY";
246 case DT_USED: return "DT_USED";
247 case DT_FILTER: return "DT_FILTER";
248 }
249 snprintf(unknown_tag, sizeof(unknown_tag),
250 "ERROR: TAG NOT DEFINED -- tag 0x%jx", (uintmax_t)tag);
251 return (unknown_tag);
252 }
253
254 static const char *
e_machines(u_int mach)255 e_machines(u_int mach)
256 {
257 static char machdesc[64];
258
259 switch (mach) {
260 case EM_NONE: return "EM_NONE";
261 case EM_M32: return "EM_M32";
262 case EM_SPARC: return "EM_SPARC";
263 case EM_386: return "EM_386";
264 case EM_68K: return "EM_68K";
265 case EM_88K: return "EM_88K";
266 case EM_IAMCU: return "EM_IAMCU";
267 case EM_860: return "EM_860";
268 case EM_MIPS: return "EM_MIPS";
269 case EM_PPC: return "EM_PPC";
270 case EM_PPC64: return "EM_PPC64";
271 case EM_ARM: return "EM_ARM";
272 case EM_ALPHA: return "EM_ALPHA (legacy)";
273 case EM_SPARCV9:return "EM_SPARCV9";
274 case EM_IA_64: return "EM_IA_64";
275 case EM_X86_64: return "EM_X86_64";
276 case EM_AARCH64:return "EM_AARCH64";
277 case EM_RISCV: return "EM_RISCV";
278 }
279 snprintf(machdesc, sizeof(machdesc),
280 "(unknown machine) -- type 0x%x", mach);
281 return (machdesc);
282 }
283
284 static const char *e_types[] = {
285 "ET_NONE", "ET_REL", "ET_EXEC", "ET_DYN", "ET_CORE"
286 };
287
288 static const char *ei_versions[] = {
289 "EV_NONE", "EV_CURRENT"
290 };
291
292 static const char *ei_classes[] = {
293 "ELFCLASSNONE", "ELFCLASS32", "ELFCLASS64"
294 };
295
296 static const char *ei_data[] = {
297 "ELFDATANONE", "ELFDATA2LSB", "ELFDATA2MSB"
298 };
299
300 static const char *ei_abis[256] = {
301 "ELFOSABI_NONE", "ELFOSABI_HPUX", "ELFOSABI_NETBSD", "ELFOSABI_LINUX",
302 "ELFOSABI_HURD", "ELFOSABI_86OPEN", "ELFOSABI_SOLARIS", "ELFOSABI_AIX",
303 "ELFOSABI_IRIX", "ELFOSABI_FREEBSD", "ELFOSABI_TRU64",
304 "ELFOSABI_MODESTO", "ELFOSABI_OPENBSD",
305 [255] = "ELFOSABI_STANDALONE"
306 };
307
308 static const char *p_types[] = {
309 "PT_NULL", "PT_LOAD", "PT_DYNAMIC", "PT_INTERP", "PT_NOTE",
310 "PT_SHLIB", "PT_PHDR", "PT_TLS"
311 };
312
313 static const char *p_flags[] = {
314 "", "PF_X", "PF_W", "PF_X|PF_W", "PF_R", "PF_X|PF_R", "PF_W|PF_R",
315 "PF_X|PF_W|PF_R"
316 };
317
318 #define NT_ELEM(x) [x] = #x,
319 static const char *nt_types[] = {
320 "",
321 NT_ELEM(NT_FREEBSD_ABI_TAG)
322 NT_ELEM(NT_FREEBSD_NOINIT_TAG)
323 NT_ELEM(NT_FREEBSD_ARCH_TAG)
324 NT_ELEM(NT_FREEBSD_FEATURE_CTL)
325 };
326
327 /* http://www.sco.com/developers/gabi/latest/ch4.sheader.html#sh_type */
328 static const char *
sh_types(uint64_t machine,uint64_t sht)329 sh_types(uint64_t machine, uint64_t sht) {
330 static char unknown_buf[64];
331
332 if (sht < 0x60000000) {
333 switch (sht) {
334 case SHT_NULL: return "SHT_NULL";
335 case SHT_PROGBITS: return "SHT_PROGBITS";
336 case SHT_SYMTAB: return "SHT_SYMTAB";
337 case SHT_STRTAB: return "SHT_STRTAB";
338 case SHT_RELA: return "SHT_RELA";
339 case SHT_HASH: return "SHT_HASH";
340 case SHT_DYNAMIC: return "SHT_DYNAMIC";
341 case SHT_NOTE: return "SHT_NOTE";
342 case SHT_NOBITS: return "SHT_NOBITS";
343 case SHT_REL: return "SHT_REL";
344 case SHT_SHLIB: return "SHT_SHLIB";
345 case SHT_DYNSYM: return "SHT_DYNSYM";
346 case SHT_INIT_ARRAY: return "SHT_INIT_ARRAY";
347 case SHT_FINI_ARRAY: return "SHT_FINI_ARRAY";
348 case SHT_PREINIT_ARRAY: return "SHT_PREINIT_ARRAY";
349 case SHT_GROUP: return "SHT_GROUP";
350 case SHT_SYMTAB_SHNDX: return "SHT_SYMTAB_SHNDX";
351 }
352 snprintf(unknown_buf, sizeof(unknown_buf),
353 "ERROR: SHT %ju NOT DEFINED", (uintmax_t)sht);
354 return (unknown_buf);
355 } else if (sht < 0x70000000) {
356 /* 0x60000000-0x6fffffff operating system-specific semantics */
357 switch (sht) {
358 case 0x6ffffff0: return "XXX:VERSYM";
359 case SHT_SUNW_dof: return "SHT_SUNW_dof";
360 case SHT_GNU_HASH: return "SHT_GNU_HASH";
361 case 0x6ffffff7: return "SHT_GNU_LIBLIST";
362 case 0x6ffffffc: return "XXX:VERDEF";
363 case SHT_SUNW_verdef: return "SHT_SUNW(GNU)_verdef";
364 case SHT_SUNW_verneed: return "SHT_SUNW(GNU)_verneed";
365 case SHT_SUNW_versym: return "SHT_SUNW(GNU)_versym";
366 }
367 snprintf(unknown_buf, sizeof(unknown_buf),
368 "ERROR: OS-SPECIFIC SHT 0x%jx NOT DEFINED",
369 (uintmax_t)sht);
370 return (unknown_buf);
371 } else if (sht < 0x80000000) {
372 /* 0x70000000-0x7fffffff processor-specific semantics */
373 switch (machine) {
374 case EM_ARM:
375 switch (sht) {
376 case SHT_ARM_EXIDX: return "SHT_ARM_EXIDX";
377 case SHT_ARM_PREEMPTMAP:return "SHT_ARM_PREEMPTMAP";
378 case SHT_ARM_ATTRIBUTES:return "SHT_ARM_ATTRIBUTES";
379 case SHT_ARM_DEBUGOVERLAY:
380 return "SHT_ARM_DEBUGOVERLAY";
381 case SHT_ARM_OVERLAYSECTION:
382 return "SHT_ARM_OVERLAYSECTION";
383 }
384 break;
385 case EM_IA_64:
386 switch (sht) {
387 case 0x70000000: return "SHT_IA_64_EXT";
388 case 0x70000001: return "SHT_IA_64_UNWIND";
389 }
390 break;
391 case EM_MIPS:
392 switch (sht) {
393 case SHT_MIPS_REGINFO: return "SHT_MIPS_REGINFO";
394 case SHT_MIPS_OPTIONS: return "SHT_MIPS_OPTIONS";
395 case SHT_MIPS_ABIFLAGS: return "SHT_MIPS_ABIFLAGS";
396 }
397 break;
398 }
399 switch (sht) {
400 case 0x7ffffffd: return "XXX:AUXILIARY";
401 case 0x7fffffff: return "XXX:FILTER";
402 }
403 snprintf(unknown_buf, sizeof(unknown_buf),
404 "ERROR: PROCESSOR-SPECIFIC SHT 0x%jx NOT DEFINED",
405 (uintmax_t)sht);
406 return (unknown_buf);
407 } else {
408 /* 0x80000000-0xffffffff application programs */
409 snprintf(unknown_buf, sizeof(unknown_buf),
410 "ERROR: SHT 0x%jx NOT DEFINED",
411 (uintmax_t)sht);
412 return (unknown_buf);
413 }
414 }
415
416 static const char *sh_flags[] = {
417 "", "SHF_WRITE", "SHF_ALLOC", "SHF_WRITE|SHF_ALLOC", "SHF_EXECINSTR",
418 "SHF_WRITE|SHF_EXECINSTR", "SHF_ALLOC|SHF_EXECINSTR",
419 "SHF_WRITE|SHF_ALLOC|SHF_EXECINSTR"
420 };
421
422 static const char *
st_type(unsigned int mach,unsigned int type)423 st_type(unsigned int mach, unsigned int type)
424 {
425 static char s_type[32];
426
427 switch (type) {
428 case STT_NOTYPE: return "STT_NOTYPE";
429 case STT_OBJECT: return "STT_OBJECT";
430 case STT_FUNC: return "STT_FUNC";
431 case STT_SECTION: return "STT_SECTION";
432 case STT_FILE: return "STT_FILE";
433 case STT_COMMON: return "STT_COMMON";
434 case STT_TLS: return "STT_TLS";
435 case 13:
436 if (mach == EM_SPARCV9)
437 return "STT_SPARC_REGISTER";
438 break;
439 }
440 snprintf(s_type, sizeof(s_type), "<unknown: %#x>", type);
441 return (s_type);
442 }
443
444 static const char *st_bindings[] = {
445 "STB_LOCAL", "STB_GLOBAL", "STB_WEAK"
446 };
447
448 static char *dynstr;
449 static char *shstrtab;
450 static char *strtab;
451 static FILE *out;
452
453 static u_int64_t elf_get_byte(Elf32_Ehdr *e, void *base, elf_member_t member);
454 static u_int64_t elf_get_quarter(Elf32_Ehdr *e, void *base,
455 elf_member_t member);
456 #if 0
457 static u_int64_t elf_get_half(Elf32_Ehdr *e, void *base, elf_member_t member);
458 #endif
459 static u_int64_t elf_get_word(Elf32_Ehdr *e, void *base, elf_member_t member);
460 static u_int64_t elf_get_quad(Elf32_Ehdr *e, void *base, elf_member_t member);
461
462 static void elf_print_ehdr(Elf32_Ehdr *e, void *sh);
463 static void elf_print_phdr(Elf32_Ehdr *e, void *p);
464 static void elf_print_shdr(Elf32_Ehdr *e, void *sh);
465 static void elf_print_symtab(Elf32_Ehdr *e, void *sh, char *str);
466 static void elf_print_dynamic(Elf32_Ehdr *e, void *sh);
467 static void elf_print_rel(Elf32_Ehdr *e, void *r);
468 static void elf_print_rela(Elf32_Ehdr *e, void *ra);
469 static void elf_print_interp(Elf32_Ehdr *e, void *p);
470 static void elf_print_got(Elf32_Ehdr *e, void *sh);
471 static void elf_print_hash(Elf32_Ehdr *e, void *sh);
472 static void elf_print_note(Elf32_Ehdr *e, void *sh);
473
474 static void usage(void) __dead2;
475
476 /*
477 * Helpers for ELF files with shnum or shstrndx values that don't fit in the
478 * ELF header. If the values are too large then an escape value is used to
479 * indicate that the actual value is found in one of section 0's fields.
480 */
481 static uint64_t
elf_get_shnum(Elf32_Ehdr * e,void * sh)482 elf_get_shnum(Elf32_Ehdr *e, void *sh)
483 {
484 uint64_t shnum;
485
486 shnum = elf_get_quarter(e, e, E_SHNUM);
487 if (shnum == 0)
488 shnum = elf_get_word(e, (char *)sh, SH_SIZE);
489 return shnum;
490 }
491
492 static uint64_t
elf_get_shstrndx(Elf32_Ehdr * e,void * sh)493 elf_get_shstrndx(Elf32_Ehdr *e, void *sh)
494 {
495 uint64_t shstrndx;
496
497 shstrndx = elf_get_quarter(e, e, E_SHSTRNDX);
498 if (shstrndx == SHN_XINDEX)
499 shstrndx = elf_get_word(e, (char *)sh, SH_LINK);
500 return shstrndx;
501 }
502
503 int
main(int ac,char ** av)504 main(int ac, char **av)
505 {
506 cap_rights_t rights;
507 u_int64_t phoff;
508 u_int64_t shoff;
509 u_int64_t phentsize;
510 u_int64_t phnum;
511 u_int64_t shentsize;
512 u_int64_t shnum;
513 u_int64_t shstrndx;
514 u_int64_t offset;
515 u_int64_t name;
516 u_int64_t type;
517 struct stat sb;
518 u_int flags;
519 Elf32_Ehdr *e;
520 void *p;
521 void *sh;
522 void *v;
523 int fd;
524 int ch;
525 int i;
526
527 out = stdout;
528 flags = 0;
529 while ((ch = getopt(ac, av, "acdEeiGhnprsw:")) != -1)
530 switch (ch) {
531 case 'a':
532 flags = ED_ALL;
533 break;
534 case 'c':
535 flags |= ED_SHDR;
536 break;
537 case 'd':
538 flags |= ED_DYN;
539 break;
540 case 'E':
541 flags = ED_IS_ELF;
542 break;
543 case 'e':
544 flags |= ED_EHDR;
545 break;
546 case 'i':
547 flags |= ED_INTERP;
548 break;
549 case 'G':
550 flags |= ED_GOT;
551 break;
552 case 'h':
553 flags |= ED_HASH;
554 break;
555 case 'n':
556 flags |= ED_NOTE;
557 break;
558 case 'p':
559 flags |= ED_PHDR;
560 break;
561 case 'r':
562 flags |= ED_REL;
563 break;
564 case 's':
565 flags |= ED_SYMTAB;
566 break;
567 case 'w':
568 if ((out = fopen(optarg, "w")) == NULL)
569 err(1, "%s", optarg);
570 cap_rights_init(&rights, CAP_FSTAT, CAP_WRITE);
571 if (caph_rights_limit(fileno(out), &rights) < 0)
572 err(1, "unable to limit rights for %s", optarg);
573 break;
574 case '?':
575 default:
576 usage();
577 }
578 ac -= optind;
579 av += optind;
580 if (ac == 0 || flags == 0 || ((flags & ED_IS_ELF) &&
581 (ac != 1 || (flags & ~ED_IS_ELF) || out != stdout)))
582 usage();
583 if ((fd = open(*av, O_RDONLY)) < 0 ||
584 fstat(fd, &sb) < 0)
585 err(1, "%s", *av);
586 if ((size_t)sb.st_size < sizeof(Elf32_Ehdr)) {
587 if (flags & ED_IS_ELF)
588 exit(1);
589 errx(1, "not an elf file");
590 }
591 cap_rights_init(&rights, CAP_MMAP_R);
592 if (caph_rights_limit(fd, &rights) < 0)
593 err(1, "unable to limit rights for %s", *av);
594 cap_rights_init(&rights);
595 if (caph_rights_limit(STDIN_FILENO, &rights) < 0 ||
596 caph_limit_stdout() < 0 || caph_limit_stderr() < 0) {
597 err(1, "unable to limit rights for stdio");
598 }
599 if (caph_enter() < 0)
600 err(1, "unable to enter capability mode");
601 e = mmap(NULL, sb.st_size, PROT_READ, MAP_SHARED, fd, 0);
602 if (e == MAP_FAILED)
603 err(1, NULL);
604 if (!IS_ELF(*e)) {
605 if (flags & ED_IS_ELF)
606 exit(1);
607 errx(1, "not an elf file");
608 } else if (flags & ED_IS_ELF)
609 exit (0);
610 phoff = elf_get_off(e, e, E_PHOFF);
611 shoff = elf_get_off(e, e, E_SHOFF);
612 phentsize = elf_get_quarter(e, e, E_PHENTSIZE);
613 phnum = elf_get_quarter(e, e, E_PHNUM);
614 shentsize = elf_get_quarter(e, e, E_SHENTSIZE);
615 p = (char *)e + phoff;
616 if (shoff > 0) {
617 sh = (char *)e + shoff;
618 shnum = elf_get_shnum(e, sh);
619 shstrndx = elf_get_shstrndx(e, sh);
620 offset = elf_get_off(e, (char *)sh + shstrndx * shentsize,
621 SH_OFFSET);
622 shstrtab = (char *)e + offset;
623 } else {
624 sh = NULL;
625 shnum = 0;
626 shstrndx = 0;
627 shstrtab = NULL;
628 }
629 for (i = 0; (u_int64_t)i < shnum; i++) {
630 name = elf_get_word(e, (char *)sh + i * shentsize, SH_NAME);
631 offset = elf_get_off(e, (char *)sh + i * shentsize, SH_OFFSET);
632 if (strcmp(shstrtab + name, ".strtab") == 0)
633 strtab = (char *)e + offset;
634 if (strcmp(shstrtab + name, ".dynstr") == 0)
635 dynstr = (char *)e + offset;
636 }
637 if (flags & ED_EHDR)
638 elf_print_ehdr(e, sh);
639 if (flags & ED_PHDR)
640 elf_print_phdr(e, p);
641 if (flags & ED_SHDR)
642 elf_print_shdr(e, sh);
643 for (i = 0; (u_int64_t)i < phnum; i++) {
644 v = (char *)p + i * phentsize;
645 type = elf_get_word(e, v, P_TYPE);
646 switch (type) {
647 case PT_INTERP:
648 if (flags & ED_INTERP)
649 elf_print_interp(e, v);
650 break;
651 case PT_NULL:
652 case PT_LOAD:
653 case PT_DYNAMIC:
654 case PT_NOTE:
655 case PT_SHLIB:
656 case PT_PHDR:
657 break;
658 }
659 }
660 for (i = 0; (u_int64_t)i < shnum; i++) {
661 v = (char *)sh + i * shentsize;
662 type = elf_get_word(e, v, SH_TYPE);
663 switch (type) {
664 case SHT_SYMTAB:
665 if (flags & ED_SYMTAB)
666 elf_print_symtab(e, v, strtab);
667 break;
668 case SHT_DYNAMIC:
669 if (flags & ED_DYN)
670 elf_print_dynamic(e, v);
671 break;
672 case SHT_RELA:
673 if (flags & ED_REL)
674 elf_print_rela(e, v);
675 break;
676 case SHT_REL:
677 if (flags & ED_REL)
678 elf_print_rel(e, v);
679 break;
680 case SHT_NOTE:
681 name = elf_get_word(e, v, SH_NAME);
682 if (flags & ED_NOTE &&
683 strcmp(shstrtab + name, ".note.tag") == 0)
684 elf_print_note(e, v);
685 break;
686 case SHT_DYNSYM:
687 if (flags & ED_SYMTAB)
688 elf_print_symtab(e, v, dynstr);
689 break;
690 case SHT_PROGBITS:
691 name = elf_get_word(e, v, SH_NAME);
692 if (flags & ED_GOT &&
693 strcmp(shstrtab + name, ".got") == 0)
694 elf_print_got(e, v);
695 break;
696 case SHT_HASH:
697 if (flags & ED_HASH)
698 elf_print_hash(e, v);
699 break;
700 case SHT_NULL:
701 case SHT_STRTAB:
702 case SHT_NOBITS:
703 case SHT_SHLIB:
704 break;
705 }
706 }
707
708 return 0;
709 }
710
711 static void
elf_print_ehdr(Elf32_Ehdr * e,void * sh)712 elf_print_ehdr(Elf32_Ehdr *e, void *sh)
713 {
714 u_int64_t class;
715 u_int64_t data;
716 u_int64_t osabi;
717 u_int64_t type;
718 u_int64_t machine;
719 u_int64_t version;
720 u_int64_t entry;
721 u_int64_t phoff;
722 u_int64_t shoff;
723 u_int64_t flags;
724 u_int64_t ehsize;
725 u_int64_t phentsize;
726 u_int64_t phnum;
727 u_int64_t shentsize;
728 u_int64_t shnum;
729 u_int64_t shstrndx;
730
731 class = elf_get_byte(e, e, E_CLASS);
732 data = elf_get_byte(e, e, E_DATA);
733 osabi = elf_get_byte(e, e, E_OSABI);
734 type = elf_get_quarter(e, e, E_TYPE);
735 machine = elf_get_quarter(e, e, E_MACHINE);
736 version = elf_get_word(e, e, E_VERSION);
737 entry = elf_get_addr(e, e, E_ENTRY);
738 phoff = elf_get_off(e, e, E_PHOFF);
739 shoff = elf_get_off(e, e, E_SHOFF);
740 flags = elf_get_word(e, e, E_FLAGS);
741 ehsize = elf_get_quarter(e, e, E_EHSIZE);
742 phentsize = elf_get_quarter(e, e, E_PHENTSIZE);
743 phnum = elf_get_quarter(e, e, E_PHNUM);
744 shentsize = elf_get_quarter(e, e, E_SHENTSIZE);
745 fprintf(out, "\nelf header:\n");
746 fprintf(out, "\n");
747 fprintf(out, "\te_ident: %s %s %s\n", ei_classes[class], ei_data[data],
748 ei_abis[osabi]);
749 fprintf(out, "\te_type: %s\n", e_types[type]);
750 fprintf(out, "\te_machine: %s\n", e_machines(machine));
751 fprintf(out, "\te_version: %s\n", ei_versions[version]);
752 fprintf(out, "\te_entry: %#jx\n", (intmax_t)entry);
753 fprintf(out, "\te_phoff: %jd\n", (intmax_t)phoff);
754 fprintf(out, "\te_shoff: %jd\n", (intmax_t)shoff);
755 fprintf(out, "\te_flags: %jd\n", (intmax_t)flags);
756 fprintf(out, "\te_ehsize: %jd\n", (intmax_t)ehsize);
757 fprintf(out, "\te_phentsize: %jd\n", (intmax_t)phentsize);
758 fprintf(out, "\te_phnum: %jd\n", (intmax_t)phnum);
759 fprintf(out, "\te_shentsize: %jd\n", (intmax_t)shentsize);
760 if (sh != NULL) {
761 shnum = elf_get_shnum(e, sh);
762 shstrndx = elf_get_shstrndx(e, sh);
763 fprintf(out, "\te_shnum: %jd\n", (intmax_t)shnum);
764 fprintf(out, "\te_shstrndx: %jd\n", (intmax_t)shstrndx);
765 }
766 }
767
768 static void
elf_print_phdr(Elf32_Ehdr * e,void * p)769 elf_print_phdr(Elf32_Ehdr *e, void *p)
770 {
771 u_int64_t phentsize;
772 u_int64_t phnum;
773 u_int64_t type;
774 u_int64_t offset;
775 u_int64_t vaddr;
776 u_int64_t paddr;
777 u_int64_t filesz;
778 u_int64_t memsz;
779 u_int64_t flags;
780 u_int64_t align;
781 void *v;
782 int i;
783
784 phentsize = elf_get_quarter(e, e, E_PHENTSIZE);
785 phnum = elf_get_quarter(e, e, E_PHNUM);
786 fprintf(out, "\nprogram header:\n");
787 for (i = 0; (u_int64_t)i < phnum; i++) {
788 v = (char *)p + i * phentsize;
789 type = elf_get_word(e, v, P_TYPE);
790 offset = elf_get_off(e, v, P_OFFSET);
791 vaddr = elf_get_addr(e, v, P_VADDR);
792 paddr = elf_get_addr(e, v, P_PADDR);
793 filesz = elf_get_size(e, v, P_FILESZ);
794 memsz = elf_get_size(e, v, P_MEMSZ);
795 flags = elf_get_word(e, v, P_FLAGS);
796 align = elf_get_size(e, v, P_ALIGN);
797 fprintf(out, "\n");
798 fprintf(out, "entry: %d\n", i);
799 fprintf(out, "\tp_type: %s\n", p_types[type & 0x7]);
800 fprintf(out, "\tp_offset: %jd\n", (intmax_t)offset);
801 fprintf(out, "\tp_vaddr: %#jx\n", (intmax_t)vaddr);
802 fprintf(out, "\tp_paddr: %#jx\n", (intmax_t)paddr);
803 fprintf(out, "\tp_filesz: %jd\n", (intmax_t)filesz);
804 fprintf(out, "\tp_memsz: %jd\n", (intmax_t)memsz);
805 fprintf(out, "\tp_flags: %s\n", p_flags[flags]);
806 fprintf(out, "\tp_align: %jd\n", (intmax_t)align);
807 }
808 }
809
810 static void
elf_print_shdr(Elf32_Ehdr * e,void * sh)811 elf_print_shdr(Elf32_Ehdr *e, void *sh)
812 {
813 u_int64_t shentsize;
814 u_int64_t shnum;
815 u_int64_t name;
816 u_int64_t type;
817 u_int64_t flags;
818 u_int64_t addr;
819 u_int64_t offset;
820 u_int64_t size;
821 u_int64_t shlink;
822 u_int64_t info;
823 u_int64_t addralign;
824 u_int64_t entsize;
825 u_int64_t machine;
826 void *v;
827 int i;
828
829 if (sh == NULL) {
830 fprintf(out, "\nNo section headers\n");
831 return;
832 }
833
834 machine = elf_get_quarter(e, e, E_MACHINE);
835 shentsize = elf_get_quarter(e, e, E_SHENTSIZE);
836 shnum = elf_get_shnum(e, sh);
837 fprintf(out, "\nsection header:\n");
838 for (i = 0; (u_int64_t)i < shnum; i++) {
839 v = (char *)sh + i * shentsize;
840 name = elf_get_word(e, v, SH_NAME);
841 type = elf_get_word(e, v, SH_TYPE);
842 flags = elf_get_word(e, v, SH_FLAGS);
843 addr = elf_get_addr(e, v, SH_ADDR);
844 offset = elf_get_off(e, v, SH_OFFSET);
845 size = elf_get_size(e, v, SH_SIZE);
846 shlink = elf_get_word(e, v, SH_LINK);
847 info = elf_get_word(e, v, SH_INFO);
848 addralign = elf_get_size(e, v, SH_ADDRALIGN);
849 entsize = elf_get_size(e, v, SH_ENTSIZE);
850 fprintf(out, "\n");
851 fprintf(out, "entry: %d\n", i);
852 fprintf(out, "\tsh_name: %s\n", shstrtab + name);
853 fprintf(out, "\tsh_type: %s\n", sh_types(machine, type));
854 fprintf(out, "\tsh_flags: %s\n", sh_flags[flags & 0x7]);
855 fprintf(out, "\tsh_addr: %#jx\n", addr);
856 fprintf(out, "\tsh_offset: %jd\n", (intmax_t)offset);
857 fprintf(out, "\tsh_size: %jd\n", (intmax_t)size);
858 fprintf(out, "\tsh_link: %jd\n", (intmax_t)shlink);
859 fprintf(out, "\tsh_info: %jd\n", (intmax_t)info);
860 fprintf(out, "\tsh_addralign: %jd\n", (intmax_t)addralign);
861 fprintf(out, "\tsh_entsize: %jd\n", (intmax_t)entsize);
862 }
863 }
864
865 static void
elf_print_symtab(Elf32_Ehdr * e,void * sh,char * str)866 elf_print_symtab(Elf32_Ehdr *e, void *sh, char *str)
867 {
868 u_int64_t machine;
869 u_int64_t offset;
870 u_int64_t entsize;
871 u_int64_t size;
872 u_int64_t name;
873 u_int64_t value;
874 u_int64_t info;
875 u_int64_t shndx;
876 void *st;
877 int len;
878 int i;
879
880 machine = elf_get_quarter(e, e, E_MACHINE);
881 offset = elf_get_off(e, sh, SH_OFFSET);
882 entsize = elf_get_size(e, sh, SH_ENTSIZE);
883 size = elf_get_size(e, sh, SH_SIZE);
884 name = elf_get_word(e, sh, SH_NAME);
885 len = size / entsize;
886 fprintf(out, "\nsymbol table (%s):\n", shstrtab + name);
887 for (i = 0; i < len; i++) {
888 st = (char *)e + offset + i * entsize;
889 name = elf_get_word(e, st, ST_NAME);
890 value = elf_get_addr(e, st, ST_VALUE);
891 size = elf_get_size(e, st, ST_SIZE);
892 info = elf_get_byte(e, st, ST_INFO);
893 shndx = elf_get_quarter(e, st, ST_SHNDX);
894 fprintf(out, "\n");
895 fprintf(out, "entry: %d\n", i);
896 fprintf(out, "\tst_name: %s\n", str + name);
897 fprintf(out, "\tst_value: %#jx\n", value);
898 fprintf(out, "\tst_size: %jd\n", (intmax_t)size);
899 fprintf(out, "\tst_info: %s %s\n",
900 st_type(machine, ELF32_ST_TYPE(info)),
901 st_bindings[ELF32_ST_BIND(info)]);
902 fprintf(out, "\tst_shndx: %jd\n", (intmax_t)shndx);
903 }
904 }
905
906 static void
elf_print_dynamic(Elf32_Ehdr * e,void * sh)907 elf_print_dynamic(Elf32_Ehdr *e, void *sh)
908 {
909 u_int64_t offset;
910 u_int64_t entsize;
911 u_int64_t size;
912 int64_t tag;
913 u_int64_t ptr;
914 u_int64_t val;
915 void *d;
916 int i;
917
918 offset = elf_get_off(e, sh, SH_OFFSET);
919 entsize = elf_get_size(e, sh, SH_ENTSIZE);
920 size = elf_get_size(e, sh, SH_SIZE);
921 fprintf(out, "\ndynamic:\n");
922 for (i = 0; (u_int64_t)i < size / entsize; i++) {
923 d = (char *)e + offset + i * entsize;
924 tag = elf_get_size(e, d, D_TAG);
925 ptr = elf_get_size(e, d, D_PTR);
926 val = elf_get_addr(e, d, D_VAL);
927 fprintf(out, "\n");
928 fprintf(out, "entry: %d\n", i);
929 fprintf(out, "\td_tag: %s\n", d_tags(tag));
930 switch (tag) {
931 case DT_NEEDED:
932 case DT_SONAME:
933 case DT_RPATH:
934 fprintf(out, "\td_val: %s\n", dynstr + val);
935 break;
936 case DT_PLTRELSZ:
937 case DT_RELA:
938 case DT_RELASZ:
939 case DT_RELAENT:
940 case DT_STRSZ:
941 case DT_SYMENT:
942 case DT_RELSZ:
943 case DT_RELENT:
944 case DT_PLTREL:
945 fprintf(out, "\td_val: %jd\n", (intmax_t)val);
946 break;
947 case DT_PLTGOT:
948 case DT_HASH:
949 case DT_STRTAB:
950 case DT_SYMTAB:
951 case DT_INIT:
952 case DT_FINI:
953 case DT_REL:
954 case DT_JMPREL:
955 fprintf(out, "\td_ptr: %#jx\n", ptr);
956 break;
957 case DT_NULL:
958 case DT_SYMBOLIC:
959 case DT_DEBUG:
960 case DT_TEXTREL:
961 break;
962 }
963 }
964 }
965
966 static void
elf_print_rela(Elf32_Ehdr * e,void * sh)967 elf_print_rela(Elf32_Ehdr *e, void *sh)
968 {
969 u_int64_t offset;
970 u_int64_t entsize;
971 u_int64_t size;
972 u_int64_t name;
973 u_int64_t info;
974 int64_t addend;
975 void *ra;
976 void *v;
977 int i;
978
979 offset = elf_get_off(e, sh, SH_OFFSET);
980 entsize = elf_get_size(e, sh, SH_ENTSIZE);
981 size = elf_get_size(e, sh, SH_SIZE);
982 name = elf_get_word(e, sh, SH_NAME);
983 v = (char *)e + offset;
984 fprintf(out, "\nrelocation with addend (%s):\n", shstrtab + name);
985 for (i = 0; (u_int64_t)i < size / entsize; i++) {
986 ra = (char *)v + i * entsize;
987 offset = elf_get_addr(e, ra, RA_OFFSET);
988 info = elf_get_word(e, ra, RA_INFO);
989 addend = elf_get_off(e, ra, RA_ADDEND);
990 fprintf(out, "\n");
991 fprintf(out, "entry: %d\n", i);
992 fprintf(out, "\tr_offset: %#jx\n", offset);
993 fprintf(out, "\tr_info: %jd\n", (intmax_t)info);
994 fprintf(out, "\tr_addend: %jd\n", (intmax_t)addend);
995 }
996 }
997
998 static void
elf_print_rel(Elf32_Ehdr * e,void * sh)999 elf_print_rel(Elf32_Ehdr *e, void *sh)
1000 {
1001 u_int64_t offset;
1002 u_int64_t entsize;
1003 u_int64_t size;
1004 u_int64_t name;
1005 u_int64_t info;
1006 void *r;
1007 void *v;
1008 int i;
1009
1010 offset = elf_get_off(e, sh, SH_OFFSET);
1011 entsize = elf_get_size(e, sh, SH_ENTSIZE);
1012 size = elf_get_size(e, sh, SH_SIZE);
1013 name = elf_get_word(e, sh, SH_NAME);
1014 v = (char *)e + offset;
1015 fprintf(out, "\nrelocation (%s):\n", shstrtab + name);
1016 for (i = 0; (u_int64_t)i < size / entsize; i++) {
1017 r = (char *)v + i * entsize;
1018 offset = elf_get_addr(e, r, R_OFFSET);
1019 info = elf_get_word(e, r, R_INFO);
1020 fprintf(out, "\n");
1021 fprintf(out, "entry: %d\n", i);
1022 fprintf(out, "\tr_offset: %#jx\n", offset);
1023 fprintf(out, "\tr_info: %jd\n", (intmax_t)info);
1024 }
1025 }
1026
1027 static void
elf_print_interp(Elf32_Ehdr * e,void * p)1028 elf_print_interp(Elf32_Ehdr *e, void *p)
1029 {
1030 u_int64_t offset;
1031 char *s;
1032
1033 offset = elf_get_off(e, p, P_OFFSET);
1034 s = (char *)e + offset;
1035 fprintf(out, "\ninterp:\n");
1036 fprintf(out, "\t%s\n", s);
1037 }
1038
1039 static void
elf_print_got(Elf32_Ehdr * e,void * sh)1040 elf_print_got(Elf32_Ehdr *e, void *sh)
1041 {
1042 u_int64_t offset;
1043 u_int64_t addralign;
1044 u_int64_t size;
1045 u_int64_t addr;
1046 void *v;
1047 int i;
1048
1049 offset = elf_get_off(e, sh, SH_OFFSET);
1050 addralign = elf_get_size(e, sh, SH_ADDRALIGN);
1051 size = elf_get_size(e, sh, SH_SIZE);
1052 v = (char *)e + offset;
1053 fprintf(out, "\nglobal offset table:\n");
1054 for (i = 0; (u_int64_t)i < size / addralign; i++) {
1055 addr = elf_get_addr(e, (char *)v + i * addralign, 0);
1056 fprintf(out, "\n");
1057 fprintf(out, "entry: %d\n", i);
1058 fprintf(out, "\t%#jx\n", addr);
1059 }
1060 }
1061
1062 static void
elf_print_hash(Elf32_Ehdr * e __unused,void * sh __unused)1063 elf_print_hash(Elf32_Ehdr *e __unused, void *sh __unused)
1064 {
1065 }
1066
1067 static void
elf_print_note(Elf32_Ehdr * e,void * sh)1068 elf_print_note(Elf32_Ehdr *e, void *sh)
1069 {
1070 u_int64_t offset;
1071 u_int64_t size;
1072 u_int64_t name;
1073 u_int32_t namesz;
1074 u_int32_t descsz;
1075 u_int32_t desc;
1076 u_int32_t type;
1077 char *n, *s;
1078 const char *nt_type;
1079
1080 offset = elf_get_off(e, sh, SH_OFFSET);
1081 size = elf_get_size(e, sh, SH_SIZE);
1082 name = elf_get_word(e, sh, SH_NAME);
1083 n = (char *)e + offset;
1084 fprintf(out, "\nnote (%s):\n", shstrtab + name);
1085 while (n < ((char *)e + offset + size)) {
1086 namesz = elf_get_word(e, n, N_NAMESZ);
1087 descsz = elf_get_word(e, n, N_DESCSZ);
1088 type = elf_get_word(e, n, N_TYPE);
1089 if (type < nitems(nt_types) && nt_types[type] != NULL)
1090 nt_type = nt_types[type];
1091 else
1092 nt_type = "Unknown type";
1093 s = n + sizeof(Elf_Note);
1094 desc = elf_get_word(e, n + sizeof(Elf_Note) + namesz, 0);
1095 fprintf(out, "\t%s %d (%s)\n", s, desc, nt_type);
1096 n += sizeof(Elf_Note) + namesz + descsz;
1097 }
1098 }
1099
1100 static u_int64_t
elf_get_byte(Elf32_Ehdr * e,void * base,elf_member_t member)1101 elf_get_byte(Elf32_Ehdr *e, void *base, elf_member_t member)
1102 {
1103 u_int64_t val;
1104
1105 val = 0;
1106 switch (e->e_ident[EI_CLASS]) {
1107 case ELFCLASS32:
1108 val = ((uint8_t *)base)[elf32_offsets[member]];
1109 break;
1110 case ELFCLASS64:
1111 val = ((uint8_t *)base)[elf64_offsets[member]];
1112 break;
1113 case ELFCLASSNONE:
1114 errx(1, "invalid class");
1115 }
1116
1117 return val;
1118 }
1119
1120 static u_int64_t
elf_get_quarter(Elf32_Ehdr * e,void * base,elf_member_t member)1121 elf_get_quarter(Elf32_Ehdr *e, void *base, elf_member_t member)
1122 {
1123 u_int64_t val;
1124
1125 val = 0;
1126 switch (e->e_ident[EI_CLASS]) {
1127 case ELFCLASS32:
1128 base = (char *)base + elf32_offsets[member];
1129 switch (e->e_ident[EI_DATA]) {
1130 case ELFDATA2MSB:
1131 val = be16dec(base);
1132 break;
1133 case ELFDATA2LSB:
1134 val = le16dec(base);
1135 break;
1136 case ELFDATANONE:
1137 errx(1, "invalid data format");
1138 }
1139 break;
1140 case ELFCLASS64:
1141 base = (char *)base + elf64_offsets[member];
1142 switch (e->e_ident[EI_DATA]) {
1143 case ELFDATA2MSB:
1144 val = be16dec(base);
1145 break;
1146 case ELFDATA2LSB:
1147 val = le16dec(base);
1148 break;
1149 case ELFDATANONE:
1150 errx(1, "invalid data format");
1151 }
1152 break;
1153 case ELFCLASSNONE:
1154 errx(1, "invalid class");
1155 }
1156
1157 return val;
1158 }
1159
1160 #if 0
1161 static u_int64_t
1162 elf_get_half(Elf32_Ehdr *e, void *base, elf_member_t member)
1163 {
1164 u_int64_t val;
1165
1166 val = 0;
1167 switch (e->e_ident[EI_CLASS]) {
1168 case ELFCLASS32:
1169 base = (char *)base + elf32_offsets[member];
1170 switch (e->e_ident[EI_DATA]) {
1171 case ELFDATA2MSB:
1172 val = be16dec(base);
1173 break;
1174 case ELFDATA2LSB:
1175 val = le16dec(base);
1176 break;
1177 case ELFDATANONE:
1178 errx(1, "invalid data format");
1179 }
1180 break;
1181 case ELFCLASS64:
1182 base = (char *)base + elf64_offsets[member];
1183 switch (e->e_ident[EI_DATA]) {
1184 case ELFDATA2MSB:
1185 val = be32dec(base);
1186 break;
1187 case ELFDATA2LSB:
1188 val = le32dec(base);
1189 break;
1190 case ELFDATANONE:
1191 errx(1, "invalid data format");
1192 }
1193 break;
1194 case ELFCLASSNONE:
1195 errx(1, "invalid class");
1196 }
1197
1198 return val;
1199 }
1200 #endif
1201
1202 static u_int64_t
elf_get_word(Elf32_Ehdr * e,void * base,elf_member_t member)1203 elf_get_word(Elf32_Ehdr *e, void *base, elf_member_t member)
1204 {
1205 u_int64_t val;
1206
1207 val = 0;
1208 switch (e->e_ident[EI_CLASS]) {
1209 case ELFCLASS32:
1210 base = (char *)base + elf32_offsets[member];
1211 switch (e->e_ident[EI_DATA]) {
1212 case ELFDATA2MSB:
1213 val = be32dec(base);
1214 break;
1215 case ELFDATA2LSB:
1216 val = le32dec(base);
1217 break;
1218 case ELFDATANONE:
1219 errx(1, "invalid data format");
1220 }
1221 break;
1222 case ELFCLASS64:
1223 base = (char *)base + elf64_offsets[member];
1224 switch (e->e_ident[EI_DATA]) {
1225 case ELFDATA2MSB:
1226 val = be32dec(base);
1227 break;
1228 case ELFDATA2LSB:
1229 val = le32dec(base);
1230 break;
1231 case ELFDATANONE:
1232 errx(1, "invalid data format");
1233 }
1234 break;
1235 case ELFCLASSNONE:
1236 errx(1, "invalid class");
1237 }
1238
1239 return val;
1240 }
1241
1242 static u_int64_t
elf_get_quad(Elf32_Ehdr * e,void * base,elf_member_t member)1243 elf_get_quad(Elf32_Ehdr *e, void *base, elf_member_t member)
1244 {
1245 u_int64_t val;
1246
1247 val = 0;
1248 switch (e->e_ident[EI_CLASS]) {
1249 case ELFCLASS32:
1250 base = (char *)base + elf32_offsets[member];
1251 switch (e->e_ident[EI_DATA]) {
1252 case ELFDATA2MSB:
1253 val = be32dec(base);
1254 break;
1255 case ELFDATA2LSB:
1256 val = le32dec(base);
1257 break;
1258 case ELFDATANONE:
1259 errx(1, "invalid data format");
1260 }
1261 break;
1262 case ELFCLASS64:
1263 base = (char *)base + elf64_offsets[member];
1264 switch (e->e_ident[EI_DATA]) {
1265 case ELFDATA2MSB:
1266 val = be64dec(base);
1267 break;
1268 case ELFDATA2LSB:
1269 val = le64dec(base);
1270 break;
1271 case ELFDATANONE:
1272 errx(1, "invalid data format");
1273 }
1274 break;
1275 case ELFCLASSNONE:
1276 errx(1, "invalid class");
1277 }
1278
1279 return val;
1280 }
1281
1282 static void
usage(void)1283 usage(void)
1284 {
1285 fprintf(stderr,
1286 "usage: elfdump -a | -E | -cdeGhinprs [-w file] file\n");
1287 exit(1);
1288 }
1289