usr.sbin/kldxref/ef_obj.c

50 #include "ef.h"
102 static int ef_obj_get_type(elf_file_t ef);
103 static int ef_obj_close(elf_file_t ef);
104 static int ef_obj_read(elf_file_t ef, Elf_Off offset, size_t len, void* dest);
105 static int ef_obj_read_entry(elf_file_t ef, Elf_Off offset, size_t len,
107 static int ef_obj_seg_read(elf_file_t ef, Elf_Off offset, size_t len,
109 static int ef_obj_seg_read_rel(elf_file_t ef, Elf_Off offset, size_t len,
111 static int ef_obj_seg_read_string(elf_file_t ef, Elf_Off offset, size_t len,
113 static int ef_obj_seg_read_entry(elf_file_t ef, Elf_Off offset, size_t len,
115 static int ef_obj_seg_read_entry_rel(elf_file_t ef, Elf_Off offset, size_t len,
117 static Elf_Addr ef_obj_symaddr(elf_file_t ef, Elf_Size symidx);
118 static int ef_obj_lookup_set(elf_file_t ef, const char *name, long *startp,
120 static int ef_obj_lookup_symbol(elf_file_t ef, const char* name, Elf_Sym** sym);
138 ef_obj_get_type(elf_file_t __unused ef)
145 ef_obj_lookup_symbol(elf_file_t ef, const char* name, Elf_Sym** sym)
151 	for (i = 0, symp = ef->ddbsymtab; i < ef->ddbsymcnt; i++, symp++) {
152 		strp = ef->ddbstrtab + symp->st_name;
162 ef_obj_lookup_set(elf_file_t ef, const char *name, long *startp, long *stopp,
167 	for (i = 0; i < ef->nprogtab; i++) {
168 		if ((strncmp(ef->progtab[i].name, "set_", 4) == 0) &&
169 		    strcmp(ef->progtab[i].name + 4, name) == 0) {
170 			*startp = (char *)ef->progtab[i].addr - ef->address;
171 			*stopp = (char *)ef->progtab[i].addr +
172 			    ef->progtab[i].size - ef->address;
181 ef_obj_symaddr(elf_file_t ef, Elf_Size symidx)
185 	if (symidx >= (size_t) ef->ddbsymcnt)
187 	sym = ef->ddbsymtab + symidx;
190 		return (sym->st_value - (Elf_Addr)ef->address);
195 ef_obj_read(elf_file_t ef, Elf_Off offset, size_t len, void *dest)
200 		if (lseek(ef->ef_fd, offset, SEEK_SET) == -1)
204 	r = read(ef->ef_fd, dest, len);
212 ef_obj_read_entry(elf_file_t ef, Elf_Off offset, size_t len, void **ptr)
219 	error = ef_obj_read(ef, offset, len, *ptr);
226 ef_obj_seg_read(elf_file_t ef, Elf_Off offset, size_t len, void *dest)
229 	if (offset + len > ef->size) {
230 		if (ef->ef_verbose)
232 			    ef->ef_name, (long)offset, (long)len);
235 	bcopy(ef->address + offset, dest, len);
240 ef_obj_seg_read_rel(elf_file_t ef, Elf_Off offset, size_t len, void *dest)
248 	if (offset + len > ef->size) {
249 		if (ef->ef_verbose)
251 			    ef->ef_name, (long)offset, (long)len);
254 	bcopy(ef->address + offset, dest, len);
257 	memaddr = ef->address + offset;
260 	for (i = 0; i < ef->nprogtab; i++) {
261 		if (ef->progtab[i].addr == NULL)
263 		if (memaddr < (char *)ef->progtab[i].addr || memaddr + len >
264 		     (char *)ef->progtab[i].addr + ef->progtab[i].size)
266 		sec = ef->progtab[i].sec;
268 		secbase = (char *)ef->progtab[i].addr - ef->address;
269 		dataoff = memaddr - ef->address;
277 	for (i = 0; i < ef->nrel; i++) {
278 		if (ef->reltab[i].sec != sec)
280 		for (r = ef->reltab[i].rel;
281 		     r < &ef->reltab[i].rel[ef->reltab[i].nrel]; r++) {
282 			error = ef_reloc(ef->ef_efile, r, EF_RELOC_REL, secbase,
288 	for (i = 0; i < ef->nrela; i++) {
289 		if (ef->relatab[i].sec != sec)
291 		for (a = ef->relatab[i].rela;
292 		     a < &ef->relatab[i].rela[ef->relatab[i].nrela]; a++) {
293 			error = ef_reloc(ef->ef_efile, a, EF_RELOC_RELA,
303 ef_obj_seg_read_string(elf_file_t ef, Elf_Off offset, size_t len, char *dest)
306 	if (offset >= ef->size) {
307 		if (ef->ef_verbose)
309 			    ef->ef_name, (long)offset);
313 	if (ef->size - offset < len)
314 		len = ef->size - offset;
316 	if (strnlen(ef->address + offset, len) == len)
319 	memcpy(dest, ef->address + offset, len);
324 ef_obj_seg_read_entry(elf_file_t ef, Elf_Off offset, size_t len, void **ptr)
331 	error = ef_obj_seg_read(ef, offset, len, *ptr);
338 ef_obj_seg_read_entry_rel(elf_file_t ef, Elf_Off offset, size_t len,
346 	error = ef_obj_seg_read_rel(ef, offset, len, *ptr);
355 	elf_file_t ef;
370 	ef = calloc(1, sizeof(*ef));
371 	if (ef == NULL) {
376 	efile->ef_ef = ef;
379 	ef->ef_verbose = verbose;
380 	ef->ef_fd = fd;
381 	ef->ef_name = strdup(filename);
382 	ef->ef_efile = efile;
383 	hdr = (Elf_Ehdr *)&ef->ef_hdr;
403 	if (ef_obj_read_entry(ef, hdr->e_shoff, nbytes, &vtmp) != 0) {
407 	ef->e_shdr = shdr = vtmp;
417 			ef->nprogtab++;
425 			ef->nrel++;
428 			ef->nrela++;
435 	if (ef->nprogtab == 0) {
450 	if (ef->nprogtab != 0)
451 		ef->progtab = calloc(ef->nprogtab, sizeof(*ef->progtab));
452 	if (ef->nrel != 0)
453 		ef->reltab = calloc(ef->nrel, sizeof(*ef->reltab));
454 	if (ef->nrela != 0)
455 		ef->relatab = calloc(ef->nrela, sizeof(*ef->relatab));
456 	if ((ef->nprogtab != 0 && ef->progtab == NULL) ||
457 	    (ef->nrel != 0 && ef->reltab == NULL) ||
458 	    (ef->nrela != 0 && ef->relatab == NULL)) {
464 	ef->ddbsymcnt = shdr[symtabindex].sh_size / sizeof(Elf_Sym);
465 	if (ef_obj_read_entry(ef, shdr[symtabindex].sh_offset,
466 	    shdr[symtabindex].sh_size, (void**)&ef->ddbsymtab) != 0) {
471 	ef->ddbstrcnt = shdr[symstrindex].sh_size;
472 	if (ef_obj_read_entry(ef, shdr[symstrindex].sh_offset,
473 	    shdr[symstrindex].sh_size, (void**)&ef->ddbstrtab) != 0) {
483 		ef->shstrcnt = shdr[shstrindex].sh_size;
484 		if (ef_obj_read_entry(ef, shdr[shstrindex].sh_offset,
485 		    shdr[shstrindex].sh_size, (void**)&ef->shstrtab) != 0) {
510 	ef->size = mapsize;
511 	if (posix_memalign((void **)&ef->address, max_addralign, mapsize)) {
515 	mapbase = ef->address;
532 			ef->progtab[pb].addr = (void *)(uintptr_t)mapbase;
534 				ef->progtab[pb].name = "<<PROGBITS>>";
535 				if (ef_obj_read(ef, shdr[i].sh_offset,
537 				    ef->progtab[pb].addr) != 0) {
542 				ef->progtab[pb].name = "<<NOBITS>>";
543 				bzero(ef->progtab[pb].addr, shdr[i].sh_size);
545 			ef->progtab[pb].size = shdr[i].sh_size;
546 			ef->progtab[pb].sec = i;
547 			if (ef->shstrtab && shdr[i].sh_name != 0)
548 				ef->progtab[pb].name =
549 				    ef->shstrtab + shdr[i].sh_name;
552 			for (j = 0; j < ef->ddbsymcnt; j++) {
553 				es = &ef->ddbsymtab[j];
556 				es->st_value += (Elf_Addr)ef->progtab[pb].addr;
562 			ef->reltab[rl].nrel = shdr[i].sh_size / sizeof(Elf_Rel);
563 			ef->reltab[rl].sec = shdr[i].sh_info;
564 			if (ef_obj_read_entry(ef, shdr[i].sh_offset,
565 			    shdr[i].sh_size, (void**)&ef->reltab[rl].rel) !=
573 			ef->relatab[ra].nrela =
575 			ef->relatab[ra].sec = shdr[i].sh_info;
576 			if (ef_obj_read_entry(ef, shdr[i].sh_offset,
577 			    shdr[i].sh_size, (void**)&ef->relatab[ra].rela) !=
589 		ef_obj_close(ef);
594 ef_obj_close(elf_file_t ef)
598 	close(ef->ef_fd);
599 	if (ef->ef_name)
600 		free(ef->ef_name);
601 	if (ef->e_shdr != NULL)
602 		free(ef->e_shdr);
603 	if (ef->size != 0)
604 		free(ef->address);
605 	if (ef->nprogtab != 0)
606 		free(ef->progtab);
607 	if (ef->nrel != 0) {
608 		for (i = 0; i < ef->nrel; i++)
609 			if (ef->reltab[i].rel != NULL)
610 				free(ef->reltab[i].rel);
611 		free(ef->reltab);
613 	if (ef->nrela != 0) {
614 		for (i = 0; i < ef->nrela; i++)
615 			if (ef->relatab[i].rela != NULL)
616 				free(ef->relatab[i].rela);
617 		free(ef->relatab);
619 	if (ef->ddbsymtab != NULL)
620 		free(ef->ddbsymtab);
621 	if (ef->ddbstrtab != NULL)
622 		free(ef->ddbstrtab);
623 	if (ef->shstrtab != NULL)
624 		free(ef->shstrtab);
625 	ef->ef_efile->ef_ops = NULL;
626 	ef->ef_efile->ef_ef = NULL;
627 	free(ef);