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