elfdump.c revision 109329
1189251Ssam/*-
2189251Ssam * Copyright (c) 2001 Jake Burkholder
3189251Ssam * All rights reserved.
4189251Ssam *
5252726Srpaulo * Redistribution and use in source and binary forms, with or without
6252726Srpaulo * modification, are permitted provided that the following conditions
7189251Ssam * are met:
8189251Ssam * 1. Redistributions of source code must retain the above copyright
9189251Ssam *    notice, this list of conditions and the following disclaimer.
10189251Ssam * 2. Redistributions in binary form must reproduce the above copyright
11189251Ssam *    notice, this list of conditions and the following disclaimer in the
12189251Ssam *    documentation and/or other materials provided with the distribution.
13189251Ssam *
14189251Ssam * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15189251Ssam * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16189251Ssam * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17189251Ssam * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18189251Ssam * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19189251Ssam * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20189251Ssam * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21189251Ssam * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22189251Ssam * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23189251Ssam * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24189251Ssam * SUCH DAMAGE.
25189251Ssam */
26189251Ssam
27189251Ssam#include <sys/cdefs.h>
28189251Ssam__FBSDID("$FreeBSD: head/usr.bin/elfdump/elfdump.c 109329 2003-01-15 20:48:56Z obrien $");
29189251Ssam
30189251Ssam#include <sys/types.h>
31189251Ssam#include <sys/elf32.h>
32189251Ssam#include <sys/elf64.h>
33189251Ssam#include <sys/mman.h>
34189251Ssam#include <sys/stat.h>
35189251Ssam#include <err.h>
36189251Ssam#include <fcntl.h>
37189251Ssam#include <stddef.h>
38189251Ssam#include <stdio.h>
39189251Ssam#include <stdlib.h>
40189251Ssam#include <string.h>
41189251Ssam#include <unistd.h>
42189251Ssam
43189251Ssam#define	ED_DYN		(1<<0)
44189251Ssam#define	ED_EHDR		(1<<1)
45189251Ssam#define	ED_GOT		(1<<2)
46189251Ssam#define	ED_HASH		(1<<3)
47189251Ssam#define	ED_INTERP	(1<<4)
48189251Ssam#define	ED_NOTE		(1<<5)
49189251Ssam#define	ED_PHDR		(1<<6)
50189251Ssam#define	ED_REL		(1<<7)
51189251Ssam#define	ED_SHDR		(1<<8)
52189251Ssam#define	ED_SYMTAB	(1<<9)
53189251Ssam#define	ED_ALL		((1<<10)-1)
54189251Ssam
55189251Ssam#define	elf_get_addr	elf_get_quad
56189251Ssam#define	elf_get_off	elf_get_quad
57189251Ssam#define	elf_get_size	elf_get_quad
58189251Ssam
59189251Ssamenum elf_member {
60189251Ssam	D_TAG = 1, D_PTR, D_VAL,
61189251Ssam
62189251Ssam	E_CLASS, E_DATA, E_OSABI, E_TYPE, E_MACHINE, E_VERSION, E_ENTRY,
63189251Ssam	E_PHOFF, E_SHOFF, E_FLAGS, E_EHSIZE, E_PHENTSIZE, E_PHNUM, E_SHENTSIZE,
64189251Ssam	E_SHNUM, E_SHSTRNDX,
65189251Ssam
66189251Ssam	N_NAMESZ, N_DESCSZ, N_TYPE,
67189251Ssam
68189251Ssam	P_TYPE, P_OFFSET, P_VADDR, P_PADDR, P_FILESZ, P_MEMSZ, P_FLAGS,
69189251Ssam	P_ALIGN,
70189251Ssam
71189251Ssam	SH_NAME, SH_TYPE, SH_FLAGS, SH_ADDR, SH_OFFSET, SH_SIZE, SH_LINK,
72189251Ssam	SH_INFO, SH_ADDRALIGN, SH_ENTSIZE,
73189251Ssam
74189251Ssam	ST_NAME, ST_VALUE, ST_SIZE, ST_INFO, ST_SHNDX,
75189251Ssam
76189251Ssam	R_OFFSET, R_INFO,
77189251Ssam
78189251Ssam	RA_OFFSET, RA_INFO, RA_ADDEND
79189251Ssam};
80189251Ssam
81189251Ssamtypedef enum elf_member elf_member_t;
82189251Ssam
83189251Ssamint elf32_offsets[] = {
84189251Ssam	0,
85189251Ssam
86189251Ssam	offsetof(Elf32_Dyn, d_tag), offsetof(Elf32_Dyn, d_un.d_ptr),
87189251Ssam	offsetof(Elf32_Dyn, d_un.d_val),
88189251Ssam
89189251Ssam	offsetof(Elf32_Ehdr, e_ident[EI_CLASS]),
90189251Ssam	offsetof(Elf32_Ehdr, e_ident[EI_DATA]),
91189251Ssam	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
124int 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
165char *d_tags[] = {
166	"DT_NULL", "DT_NEEDED", "DT_PLTRELSZ", "DT_PLTGOT", "DT_HASH",
167	"DT_STRTAB", "DT_SYMTAB", "DT_RELA", "DT_RELASZ", "DT_RELAENT",
168	"DT_STRSZ", "DT_SYMENT", "DT_INIT", "DT_FINI", "DT_SONAME",
169	"DT_RPATH", "DT_SYMBOLIC", "DT_REL", "DT_RELSZ", "DT_RELENT",
170	"DT_PLTREL", "DT_DEBUG", "DT_TEXTREL", "DT_JMPREL"
171};
172
173char *e_machines[] = {
174	"EM_NONE", "EM_M32", "EM_SPARC", "EM_386", "EM_68K", "EM_88K",
175	"EM_486", "EM_860", "EM_MIPS"
176};
177
178char *e_types[] = {
179	"ET_NONE", "ET_REL", "ET_EXEC", "ET_DYN", "ET_CORE"
180};
181
182char *ei_versions[] = {
183	"EV_NONE", "EV_CURRENT"
184};
185
186char *ei_classes[] = {
187	"ELFCLASSNONE", "ELFCLASS32", "ELFCLASS64"
188};
189
190char *ei_data[] = {
191	"ELFDATANONE", "ELFDATA2LSB", "ELFDATA2MSB"
192};
193
194char *ei_abis[] = {
195	"ELFOSABI_SYSV", "ELFOSABI_HPUX", "ELFOSABI_NETBSD", "ELFOSABI_LINUX",
196	"ELFOSABI_HURD", "ELFOSABI_86OPEN", "ELFOSABI_SOLARIS",
197	"ELFOSABI_MONTEREY", "ELFOSABI_IRIX", "ELFOSABI_FREEBSD",
198	"ELFOSABI_TRU64", "ELFOSABI_MODESTO", "ELFOSABI_OPENBSD"
199};
200
201char *p_types[] = {
202	"PT_NULL", "PT_LOAD", "PT_DYNAMIC", "PT_INTERP", "PT_NOTE",
203	"PT_SHLIB", "PT_PHDR"
204};
205
206char *p_flags[] = {
207	"", "PF_X", "PF_W", "PF_X|PF_W", "PF_R", "PF_X|PF_R", "PF_W|PF_R",
208	"PF_X|PF_W|PF_R"
209};
210
211/* http://www.sco.com/developers/gabi/latest/ch4.sheader.html#sh_type */
212const char
213*sh_types(u_int64_t sht) {
214	switch (sht) {
215	case 0:	return "SHT_NULL";
216	case 1: return "SHT_PROGBITS";
217	case 2: return "SHT_SYMTAB";
218	case 3: return "SHT_STRTAB";
219	case 4: return "SHT_RELA";
220	case 5: return "SHT_HASH";
221	case 6: return "SHT_DYNAMIC";
222	case 7: return "SHT_NOTE";
223	case 8: return "SHT_NOBITS";
224	case 9: return "SHT_REL";
225	case 10: return "SHT_SHLIB";
226	case 11: return "SHT_DYNSYM";
227	case 14: return "SHT_INIT_ARRAY";
228	case 15: return "SHT_FINI_ARRAY";
229	case 16: return "SHT_PREINIT_ARRAY";
230	case 17: return "SHT_GROUP";
231	case 18: return "SHT_SYMTAB_SHNDX";
232	case 0x6ffffff0: return "XXX:VERSYM";
233	case 0x6ffffff7: return "SHT_GNU_LIBLIST";
234	case 0x6ffffffc: return "XXX:VERDEF";
235	case 0x6ffffffd: return "SHT_SUNW(GNU)_verdef";
236	case 0x6ffffffe: return "SHT_SUNW(GNU)_verneed";
237	case 0x6fffffff: return "SHT_SUNW(GNU)_versym";
238	case 0x7ffffffd: return "XXX:AUXILIARY";
239	case 0x7fffffff: return "XXX:FILTER";
240	default: return "ERROR: SHT NOT DEFINED";
241	}
242};
243
244char *sh_flags[] = {
245	"", "SHF_WRITE", "SHF_ALLOC", "SHF_WRITE|SHF_ALLOC", "SHF_EXECINSTR",
246	"SHF_WRITE|SHF_EXECINSTR", "SHF_ALLOC|SHF_EXECINSTR",
247	"SHF_WRITE|SHF_ALLOC|SHF_EXECINSTR"
248};
249
250char *st_types[] = {
251	"STT_NOTYPE", "STT_OBJECT", "STT_FUNC", "STT_SECTION", "STT_FILE"
252};
253
254char *st_bindings[] = {
255	"STB_LOCAL", "STB_GLOBAL", "STB_WEAK"
256};
257
258char *dynstr;
259char *shstrtab;
260char *strtab;
261FILE *out;
262
263u_int64_t elf_get_byte(Elf32_Ehdr *e, void *base, elf_member_t member);
264u_int64_t elf_get_quarter(Elf32_Ehdr *e, void *base, elf_member_t member);
265u_int64_t elf_get_half(Elf32_Ehdr *e, void *base, elf_member_t member);
266u_int64_t elf_get_word(Elf32_Ehdr *e, void *base, elf_member_t member);
267u_int64_t elf_get_quad(Elf32_Ehdr *e, void *base, elf_member_t member);
268
269void elf_print_ehdr(void *e);
270void elf_print_phdr(void *e, void *p);
271void elf_print_shdr(void *e, void *sh);
272void elf_print_symtab(void *e, void *sh, char *str);
273void elf_print_dynamic(void *e, void *sh);
274void elf_print_rel(void *e, void *r);
275void elf_print_rela(void *e, void *ra);
276void elf_print_interp(void *e, void *p);
277void elf_print_got(void *e, void *sh);
278void elf_print_hash(void *e, void *sh);
279void elf_print_note(void *e, void *sh);
280
281void usage(void);
282
283int
284main(int ac, char **av)
285{
286	u_int64_t phoff;
287	u_int64_t shoff;
288	u_int64_t phentsize;
289	u_int64_t phnum;
290	u_int64_t shentsize;
291	u_int64_t shnum;
292	u_int64_t shstrndx;
293	u_int64_t offset;
294	u_int64_t name;
295	u_int64_t type;
296	struct stat sb;
297	u_int flags;
298	void *e;
299	void *p;
300	void *sh;
301	void *v;
302	int fd;
303	int ch;
304	int i;
305
306	out = stdout;
307	flags = 0;
308	while ((ch = getopt(ac, av, "acdeiGhnprsw:")) != -1)
309		switch (ch) {
310		case 'a':
311			flags = ED_ALL;
312			break;
313		case 'c':
314			flags |= ED_SHDR;
315			break;
316		case 'd':
317			flags |= ED_DYN;
318			break;
319		case 'e':
320			flags |= ED_EHDR;
321			break;
322		case 'i':
323			flags |= ED_INTERP;
324			break;
325		case 'G':
326			flags |= ED_GOT;
327			break;
328		case 'h':
329			flags |= ED_HASH;
330			break;
331		case 'n':
332			flags |= ED_NOTE;
333			break;
334		case 'p':
335			flags |= ED_PHDR;
336			break;
337		case 'r':
338			flags |= ED_REL;
339			break;
340		case 's':
341			flags |= ED_SYMTAB;
342			break;
343		case 'w':
344			if ((out = fopen(optarg, "w")) == NULL)
345				err(1, "%s", optarg);
346			break;
347		case '?':
348		default:
349			usage();
350		}
351	ac -= optind;
352	av += optind;
353	if (ac == 0 || flags == 0)
354		usage();
355	if ((fd = open(*av, O_RDONLY)) < 0 ||
356	    fstat(fd, &sb) < 0)
357		err(1, NULL);
358	e = mmap(NULL, sb.st_size, PROT_READ, MAP_SHARED, fd, 0);
359	if (e == MAP_FAILED)
360		err(1, NULL);
361	if (!IS_ELF(*(Elf32_Ehdr *)e))
362		errx(1, "not an elf file");
363	phoff = elf_get_off(e, e, E_PHOFF);
364	shoff = elf_get_off(e, e, E_SHOFF);
365	phentsize = elf_get_quarter(e, e, E_PHENTSIZE);
366	phnum = elf_get_quarter(e, e, E_PHNUM);
367	shentsize = elf_get_quarter(e, e, E_SHENTSIZE);
368	shnum = elf_get_quarter(e, e, E_SHNUM);
369	shstrndx = elf_get_quarter(e, e, E_SHSTRNDX);
370	p = e + phoff;
371	sh = e + shoff;
372	offset = elf_get_off(e, sh + shstrndx * shentsize, SH_OFFSET);
373	shstrtab = e + offset;
374	for (i = 0; i < shnum; i++) {
375		name = elf_get_word(e, sh + i * shentsize, SH_NAME);
376		offset = elf_get_off(e, sh + i * shentsize, SH_OFFSET);
377		if (strcmp(shstrtab + name, ".strtab") == 0)
378			strtab = e + offset;
379		if (strcmp(shstrtab + name, ".dynstr") == 0)
380			dynstr = e + offset;
381	}
382	if (flags & ED_EHDR)
383		elf_print_ehdr(e);
384	if (flags & ED_PHDR)
385		elf_print_phdr(e, p);
386	if (flags & ED_SHDR)
387		elf_print_shdr(e, sh);
388	for (i = 0; i < phnum; i++) {
389		v = p + i * phentsize;
390		type = elf_get_word(e, v, P_TYPE);
391		switch (type) {
392		case PT_INTERP:
393			if (flags & ED_INTERP)
394				elf_print_interp(e, v);
395			break;
396		case PT_NULL:
397		case PT_LOAD:
398		case PT_DYNAMIC:
399		case PT_NOTE:
400		case PT_SHLIB:
401		case PT_PHDR:
402			break;
403		}
404	}
405	for (i = 0; i < shnum; i++) {
406		v = sh + i * shentsize;
407		type = elf_get_word(e, v, SH_TYPE);
408		switch (type) {
409		case SHT_SYMTAB:
410			if (flags & ED_SYMTAB)
411				elf_print_symtab(e, v, strtab);
412			break;
413		case SHT_DYNAMIC:
414			if (flags & ED_DYN)
415				elf_print_dynamic(e, v);
416			break;
417		case SHT_RELA:
418			if (flags & ED_REL)
419				elf_print_rela(e, v);
420			break;
421		case SHT_REL:
422			if (flags & ED_REL)
423				elf_print_rel(e, v);
424			break;
425		case SHT_NOTE:
426			name = elf_get_word(e, v, SH_NAME);
427			if (flags & ED_NOTE &&
428			    strcmp(shstrtab + name, ".note.ABI-tag") == 0)
429				elf_print_note(e, v);
430			break;
431		case SHT_DYNSYM:
432			if (flags & ED_SYMTAB)
433				elf_print_symtab(e, v, dynstr);
434			break;
435		case SHT_PROGBITS:
436			name = elf_get_word(e, v, SH_NAME);
437			if (flags & ED_GOT &&
438			    strcmp(shstrtab + name, ".got") == 0)
439				elf_print_got(e, v);
440			break;
441		case SHT_HASH:
442			if (flags & ED_HASH)
443				elf_print_hash(e, v);
444			break;
445		case SHT_NULL:
446		case SHT_STRTAB:
447		case SHT_NOBITS:
448		case SHT_SHLIB:
449			break;
450		}
451	}
452
453	return 0;
454}
455
456void
457elf_print_ehdr(void *e)
458{
459	u_int64_t class;
460	u_int64_t data;
461	u_int64_t osabi;
462	u_int64_t type;
463	u_int64_t machine;
464	u_int64_t version;
465	u_int64_t entry;
466	u_int64_t phoff;
467	u_int64_t shoff;
468	u_int64_t flags;
469	u_int64_t ehsize;
470	u_int64_t phentsize;
471	u_int64_t phnum;
472	u_int64_t shentsize;
473	u_int64_t shnum;
474	u_int64_t shstrndx;
475
476	class = elf_get_byte(e, e, E_CLASS);
477	data = elf_get_byte(e, e, E_DATA);
478	osabi = elf_get_byte(e, e, E_OSABI);
479	type = elf_get_quarter(e, e, E_TYPE);
480	machine = elf_get_quarter(e, e, E_MACHINE);
481	version = elf_get_word(e, e, E_VERSION);
482	entry = elf_get_addr(e, e, E_ENTRY);
483	phoff = elf_get_off(e, e, E_PHOFF);
484	shoff = elf_get_off(e, e, E_SHOFF);
485	flags = elf_get_word(e, e, E_FLAGS);
486	ehsize = elf_get_quarter(e, e, E_EHSIZE);
487	phentsize = elf_get_quarter(e, e, E_PHENTSIZE);
488	phnum = elf_get_quarter(e, e, E_PHNUM);
489	shentsize = elf_get_quarter(e, e, E_SHENTSIZE);
490	shnum = elf_get_quarter(e, e, E_SHNUM);
491	shstrndx = elf_get_quarter(e, e, E_SHSTRNDX);
492	fprintf(out, "\nelf header:\n");
493	fprintf(out, "\n");
494	fprintf(out, "\te_ident: %s %s %s\n", ei_classes[class], ei_data[data],
495	    ei_abis[osabi]);
496	fprintf(out, "\te_type: %s\n", e_types[type]);
497	if (machine < sizeof e_machines / sizeof *e_machines)
498		fprintf(out, "\te_machine: %s\n", e_machines[machine]);
499	else
500		fprintf(out, "\te_machine: %lld\n", machine);
501	fprintf(out, "\te_version: %s\n", ei_versions[version]);
502	fprintf(out, "\te_entry: %#llx\n", entry);
503	fprintf(out, "\te_phoff: %lld\n", phoff);
504	fprintf(out, "\te_shoff: %lld\n", shoff);
505	fprintf(out, "\te_flags: %lld\n", flags);
506	fprintf(out, "\te_ehsize: %lld\n", ehsize);
507	fprintf(out, "\te_phentsize: %lld\n", phentsize);
508	fprintf(out, "\te_phnum: %lld\n", phnum);
509	fprintf(out, "\te_shentsize: %lld\n", shentsize);
510	fprintf(out, "\te_shnum: %lld\n", shnum);
511	fprintf(out, "\te_shstrndx: %lld\n", shstrndx);
512}
513
514void
515elf_print_phdr(void *e, void *p)
516{
517	u_int64_t phentsize;
518	u_int64_t phnum;
519	u_int64_t type;
520	u_int64_t offset;
521	u_int64_t vaddr;
522	u_int64_t paddr;
523	u_int64_t filesz;
524	u_int64_t memsz;
525	u_int64_t flags;
526	u_int64_t align;
527	void *v;
528	int i;
529
530	phentsize = elf_get_quarter(e, e, E_PHENTSIZE);
531	phnum = elf_get_quarter(e, e, E_PHNUM);
532	fprintf(out, "\nprogram header:\n");
533	for (i = 0; i < phnum; i++) {
534		v = p + i * phentsize;
535		type = elf_get_word(e, v, P_TYPE);
536		offset = elf_get_off(e, v, P_OFFSET);
537		vaddr = elf_get_addr(e, v, P_VADDR);
538		paddr = elf_get_addr(e, v, P_PADDR);
539		filesz = elf_get_size(e, v, P_FILESZ);
540		memsz = elf_get_size(e, v, P_MEMSZ);
541		flags = elf_get_word(e, v, P_FLAGS);
542		align = elf_get_size(e, v, P_ALIGN);
543		fprintf(out, "\n");
544		fprintf(out, "entry: %d\n", i);
545		fprintf(out, "\tp_type: %s\n", p_types[type & 0x7]);
546		fprintf(out, "\tp_offset: %lld\n", offset);
547		fprintf(out, "\tp_vaddr: %#llx\n", vaddr);
548		fprintf(out, "\tp_paddr: %#llx\n", paddr);
549		fprintf(out, "\tp_filesz: %lld\n", filesz);
550		fprintf(out, "\tp_memsz: %lld\n", memsz);
551		fprintf(out, "\tp_flags: %s\n", p_flags[flags]);
552		fprintf(out, "\tp_align: %lld\n", align);
553	}
554}
555
556void
557elf_print_shdr(void *e, void *sh)
558{
559	u_int64_t shentsize;
560	u_int64_t shnum;
561	u_int64_t name;
562	u_int64_t type;
563	u_int64_t flags;
564	u_int64_t addr;
565	u_int64_t offset;
566	u_int64_t size;
567	u_int64_t link;
568	u_int64_t info;
569	u_int64_t addralign;
570	u_int64_t entsize;
571	void *v;
572	int i;
573
574	shentsize = elf_get_quarter(e, e, E_SHENTSIZE);
575	shnum = elf_get_quarter(e, e, E_SHNUM);
576	fprintf(out, "\nsection header:\n");
577	for (i = 0; i < shnum; i++) {
578		v = sh + i * shentsize;
579		name = elf_get_word(e, v, SH_NAME);
580		type = elf_get_word(e, v, SH_TYPE);
581		flags = elf_get_word(e, v, SH_FLAGS);
582		addr = elf_get_addr(e, v, SH_ADDR);
583		offset = elf_get_off(e, v, SH_OFFSET);
584		size = elf_get_size(e, v, SH_SIZE);
585		link = elf_get_word(e, v, SH_LINK);
586		info = elf_get_word(e, v, SH_INFO);
587		addralign = elf_get_size(e, v, SH_ADDRALIGN);
588		entsize = elf_get_size(e, v, SH_ENTSIZE);
589		fprintf(out, "\n");
590		fprintf(out, "entry: %d\n", i);
591		fprintf(out, "\tsh_name: %s\n", shstrtab + name);
592		fprintf(out, "\tsh_type: %s\n", sh_types(type));
593		fprintf(out, "\tsh_flags: %s\n", sh_flags[flags & 0x7]);
594		fprintf(out, "\tsh_addr: %#llx\n", addr);
595		fprintf(out, "\tsh_offset: %lld\n", offset);
596		fprintf(out, "\tsh_size: %lld\n", size);
597		fprintf(out, "\tsh_link: %lld\n", link);
598		fprintf(out, "\tsh_info: %lld\n", info);
599		fprintf(out, "\tsh_addralign: %lld\n", addralign);
600		fprintf(out, "\tsh_entsize: %lld\n", entsize);
601	}
602}
603
604void
605elf_print_symtab(void *e, void *sh, char *str)
606{
607	u_int64_t offset;
608	u_int64_t entsize;
609	u_int64_t size;
610	u_int64_t name;
611	u_int64_t value;
612	u_int64_t info;
613	u_int64_t shndx;
614	void *st;
615	int len;
616	int i;
617
618	offset = elf_get_off(e, sh, SH_OFFSET);
619	entsize = elf_get_size(e, sh, SH_ENTSIZE);
620	size = elf_get_size(e, sh, SH_SIZE);
621	name = elf_get_word(e, sh, SH_NAME);
622	len = size / entsize;
623	fprintf(out, "\nsymbol table (%s):\n", shstrtab + name);
624	for (i = 0; i < len; i++) {
625		st = e + offset + i * entsize;
626		name = elf_get_word(e, st, ST_NAME);
627		value = elf_get_addr(e, st, ST_VALUE);
628		size = elf_get_size(e, st, ST_SIZE);
629		info = elf_get_byte(e, st, ST_INFO);
630		shndx = elf_get_quarter(e, st, ST_SHNDX);
631		fprintf(out, "\n");
632		fprintf(out, "entry: %d\n", i);
633		fprintf(out, "\tst_name: %s\n", str + name);
634		fprintf(out, "\tst_value: %#llx\n", value);
635		fprintf(out, "\tst_size: %lld\n", size);
636		fprintf(out, "\tst_info: %s %s\n",
637		    st_types[ELF32_ST_TYPE(info)],
638		    st_bindings[ELF32_ST_BIND(info)]);
639		fprintf(out, "\tst_shndx: %lld\n", shndx);
640	}
641}
642
643void
644elf_print_dynamic(void *e, void *sh)
645{
646	u_int64_t offset;
647	u_int64_t entsize;
648	u_int64_t size;
649	int64_t tag;
650	u_int64_t ptr;
651	u_int64_t val;
652	void *d;
653	int i;
654
655	offset = elf_get_off(e, sh, SH_OFFSET);
656	entsize = elf_get_size(e, sh, SH_ENTSIZE);
657	size = elf_get_size(e, sh, SH_SIZE);
658	fprintf(out, "\ndynamic:\n");
659	for (i = 0; i < size / entsize; i++) {
660		d = e + offset + i * entsize;
661		tag = elf_get_size(e, d, D_TAG);
662		ptr = elf_get_size(e, d, D_PTR);
663		val = elf_get_addr(e, d, D_VAL);
664		fprintf(out, "\n");
665		fprintf(out, "entry: %d\n", i);
666		fprintf(out, "\td_tag: %s\n", d_tags[tag]);
667		switch (tag) {
668		case DT_NEEDED:
669		case DT_SONAME:
670		case DT_RPATH:
671			fprintf(out, "\td_val: %s\n", dynstr + val);
672			break;
673		case DT_PLTRELSZ:
674		case DT_RELA:
675		case DT_RELASZ:
676		case DT_RELAENT:
677		case DT_STRSZ:
678		case DT_SYMENT:
679		case DT_RELSZ:
680		case DT_RELENT:
681		case DT_PLTREL:
682			fprintf(out, "\td_val: %lld\n", val);
683			break;
684		case DT_PLTGOT:
685		case DT_HASH:
686		case DT_STRTAB:
687		case DT_SYMTAB:
688		case DT_INIT:
689		case DT_FINI:
690		case DT_REL:
691		case DT_JMPREL:
692			fprintf(out, "\td_ptr: %#llx\n", ptr);
693			break;
694		case DT_NULL:
695		case DT_SYMBOLIC:
696		case DT_DEBUG:
697		case DT_TEXTREL:
698			break;
699		}
700	}
701}
702
703void
704elf_print_rela(void *e, void *sh)
705{
706	u_int64_t offset;
707	u_int64_t entsize;
708	u_int64_t size;
709	u_int64_t name;
710	u_int64_t info;
711	int64_t addend;
712	void *ra;
713	void *v;
714	int i;
715
716	offset = elf_get_off(e, sh, SH_OFFSET);
717	entsize = elf_get_size(e, sh, SH_ENTSIZE);
718	size = elf_get_size(e, sh, SH_SIZE);
719	name = elf_get_word(e, sh, SH_NAME);
720	v = e + offset;
721	fprintf(out, "\nrelocation with addend (%s):\n", shstrtab + name);
722	for (i = 0; i < size / entsize; i++) {
723		ra = v + i * entsize;
724		offset = elf_get_addr(e, ra, RA_OFFSET);
725		info = elf_get_word(e, ra, RA_INFO);
726		addend = elf_get_off(e, ra, RA_ADDEND);
727		fprintf(out, "\n");
728		fprintf(out, "entry: %d\n", i);
729		fprintf(out, "\tr_offset: %#llx\n", offset);
730		fprintf(out, "\tr_info: %lld\n", info);
731		fprintf(out, "\tr_addend: %lld\n", addend);
732	}
733}
734
735void
736elf_print_rel(void *e, void *sh)
737{
738	u_int64_t offset;
739	u_int64_t entsize;
740	u_int64_t size;
741	u_int64_t name;
742	u_int64_t info;
743	void *r;
744	void *v;
745	int i;
746
747	offset = elf_get_off(e, sh, SH_OFFSET);
748	entsize = elf_get_size(e, sh, SH_ENTSIZE);
749	size = elf_get_size(e, sh, SH_SIZE);
750	name = elf_get_word(e, sh, SH_NAME);
751	v = e + offset;
752	fprintf(out, "\nrelocation (%s):\n", shstrtab + name);
753	for (i = 0; i < size / entsize; i++) {
754		r = v + i * entsize;
755		offset = elf_get_addr(e, r, R_OFFSET);
756		info = elf_get_word(e, r, R_INFO);
757		fprintf(out, "\n");
758		fprintf(out, "entry: %d\n", i);
759		fprintf(out, "\tr_offset: %#llx\n", offset);
760		fprintf(out, "\tr_info: %lld\n", info);
761	}
762}
763
764void
765elf_print_interp(void *e, void *p)
766{
767	u_int64_t offset;
768	char *s;
769
770	offset = elf_get_off(e, p, P_OFFSET);
771	s = e + offset;
772	fprintf(out, "\ninterp:\n");
773	fprintf(out, "\t%s\n", s);
774}
775
776void
777elf_print_got(void *e, void *sh)
778{
779	u_int64_t offset;
780	u_int64_t addralign;
781	u_int64_t size;
782	u_int64_t addr;
783	void *v;
784	int i;
785
786	offset = elf_get_off(e, sh, SH_OFFSET);
787	addralign = elf_get_size(e, sh, SH_ADDRALIGN);
788	size = elf_get_size(e, sh, SH_SIZE);
789	v = e + offset;
790	fprintf(out, "\nglobal offset table:\n");
791	for (i = 0; i < size / addralign; i++) {
792		addr = elf_get_addr(e, v + i * addralign, 0);
793		fprintf(out, "\n");
794		fprintf(out, "entry: %d\n", i);
795		fprintf(out, "\t%#llx\n", addr);
796	}
797}
798
799void
800elf_print_hash(void *e, void *sh)
801{
802}
803
804void
805elf_print_note(void *e, void *sh)
806{
807	u_int64_t offset;
808	u_int64_t size;
809	u_int64_t name;
810	u_int32_t namesz;
811	u_int32_t descsz;
812	u_int32_t type;
813	u_int32_t desc;
814	char *s;
815	void *n;
816
817	offset = elf_get_off(e, sh, SH_OFFSET);
818	size = elf_get_size(e, sh, SH_SIZE);
819	name = elf_get_word(e, sh, SH_NAME);
820	n = e + offset;
821	fprintf(out, "\nnote (%s):\n", shstrtab + name);
822	while (n < e + offset + size) {
823		namesz = elf_get_word(e, n, N_NAMESZ);
824		descsz = elf_get_word(e, n, N_DESCSZ);
825		type = elf_get_word(e, n, N_TYPE);
826		s = n + sizeof(Elf_Note);
827		desc = elf_get_word(e, n + sizeof(Elf_Note) + namesz, 0);
828		fprintf(out, "\t%s %d\n", s, desc);
829		n += sizeof(Elf_Note) + namesz + descsz;
830	}
831}
832
833u_int64_t
834elf_get_byte(Elf32_Ehdr *e, void *base, elf_member_t member)
835{
836	u_int64_t val;
837	u_char *p;
838
839	val = 0;
840	switch (e->e_ident[EI_CLASS]) {
841	case ELFCLASS32:
842		p = base + elf32_offsets[member];
843		val = *p;
844		break;
845	case ELFCLASS64:
846		p = base + elf64_offsets[member];
847		val = *p;
848		break;
849	case ELFCLASSNONE:
850		errx(1, "invalid class");
851	}
852
853	return val;
854}
855
856u_int64_t
857elf_get_quarter(Elf32_Ehdr *e, void *base, elf_member_t member)
858{
859	u_int64_t val;
860	u_char *p;
861
862	val = 0;
863	switch (e->e_ident[EI_CLASS]) {
864	case ELFCLASS32:
865		p = base + elf32_offsets[member];
866		switch (e->e_ident[EI_DATA]) {
867		case ELFDATA2MSB:
868			val = p[0] << 8 | p[1];
869			break;
870		case ELFDATA2LSB:
871			val = p[1] << 8 | p[0];
872			break;
873		case ELFDATANONE:
874			errx(1, "invalid data format");
875		}
876		break;
877	case ELFCLASS64:
878		p = base + elf64_offsets[member];
879		switch (e->e_ident[EI_DATA]) {
880		case ELFDATA2MSB:
881			val = p[0] << 8 | p[1];
882			break;
883		case ELFDATA2LSB:
884			val = p[1] << 8 | p[0];
885			break;
886		case ELFDATANONE:
887			errx(1, "invalid data format");
888		}
889		break;
890	case ELFCLASSNONE:
891		errx(1, "invalid class");
892	}
893
894	return val;
895}
896
897u_int64_t
898elf_get_half(Elf32_Ehdr *e, void *base, elf_member_t member)
899{
900	u_int64_t val;
901	u_char *p;
902
903	val = 0;
904	switch (e->e_ident[EI_CLASS]) {
905	case ELFCLASS32:
906		p = base + elf32_offsets[member];
907		switch (e->e_ident[EI_DATA]) {
908		case ELFDATA2MSB:
909			val = p[0] << 8 | p[1];
910			break;
911		case ELFDATA2LSB:
912			val = p[1] << 8 | p[0];
913			break;
914		case ELFDATANONE:
915			errx(1, "invalid data format");
916		}
917		break;
918	case ELFCLASS64:
919		p = base + elf64_offsets[member];
920		switch (e->e_ident[EI_DATA]) {
921		case ELFDATA2MSB:
922			val = p[0] << 24 | p[1] << 16 | p[2] << 8 | p[3];
923			break;
924		case ELFDATA2LSB:
925			val = p[3] << 24 | p[2] << 16 | p[1] << 8 | p[0];
926			break;
927		case ELFDATANONE:
928			errx(1, "invalid data format");
929		}
930		break;
931	case ELFCLASSNONE:
932		errx(1, "invalid class");
933	}
934
935	return val;
936}
937
938u_int64_t
939elf_get_word(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] << 24 | p[1] << 16 | p[2] << 8 | p[3];
951			break;
952		case ELFDATA2LSB:
953			val = p[3] << 24 | p[2] << 16 | 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] << 24 | p[1] << 16 | p[2] << 8 | p[3];
964			break;
965		case ELFDATA2LSB:
966			val = p[3] << 24 | p[2] << 16 | 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
979u_int64_t
980elf_get_quad(Elf32_Ehdr *e, void *base, elf_member_t member)
981{
982	u_int64_t high;
983	u_int64_t low;
984	u_int64_t val;
985	u_char *p;
986
987	val = 0;
988	switch (e->e_ident[EI_CLASS]) {
989	case ELFCLASS32:
990		p = base + elf32_offsets[member];
991		switch (e->e_ident[EI_DATA]) {
992		case ELFDATA2MSB:
993			val = p[0] << 24 | p[1] << 16 | p[2] << 8 | p[3];
994			break;
995		case ELFDATA2LSB:
996			val = p[3] << 24 | p[2] << 16 | p[1] << 8 | p[0];
997			break;
998		case ELFDATANONE:
999			errx(1, "invalid data format");
1000		}
1001		break;
1002	case ELFCLASS64:
1003		p = base + elf64_offsets[member];
1004		switch (e->e_ident[EI_DATA]) {
1005		case ELFDATA2MSB:
1006			high = p[0] << 24 | p[1] << 16 | p[2] << 8 | p[3];
1007			low = p[4] << 24 | p[5] << 16 | p[6] << 8 | p[7];
1008			val = high << 32 | low;
1009			break;
1010		case ELFDATA2LSB:
1011			high = p[7] << 24 | p[6] << 16 | p[5] << 8 | p[4];
1012			low = p[3] << 24 | p[2] << 16 | p[1] << 8 | p[0];
1013			val = high << 32 | low;
1014			break;
1015		case ELFDATANONE:
1016			errx(1, "invalid data format");
1017		}
1018		break;
1019	case ELFCLASSNONE:
1020		errx(1, "invalid class");
1021	}
1022
1023	return val;
1024}
1025
1026void
1027usage(void)
1028{
1029	fprintf(stderr, "usage: elfdump [-acdeiGhnprs] [-w file] filename\n");
1030	exit(1);
1031}
1032