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