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