| #include <u.h> |
| #include <libc.h> |
| #include <mach.h> |
| #include "elf.h" |
| |
| static int |
| elfsyminit(Fhdr *fp) |
| { |
| int i, onlyundef; |
| Elf *elf; |
| Symbol sym; |
| ElfSym esym; |
| ElfProg *p; |
| |
| elf = fp->elf; |
| |
| onlyundef = fp->nsym > 0; |
| for(i=0; elfsym(elf, i, &esym) >= 0; i++){ |
| if(esym.name == nil) |
| continue; |
| if(onlyundef && esym.shndx != ElfSymShnNone) |
| continue; |
| if(esym.type != ElfSymTypeObject && esym.type != ElfSymTypeFunc) |
| continue; |
| if(strchr(esym.name, '@')) |
| continue; |
| memset(&sym, 0, sizeof sym); |
| sym.name = esym.name; |
| sym.loc.type = LADDR; |
| sym.loc.addr = esym.value; |
| if(esym.size){ |
| sym.hiloc.type = LADDR; |
| sym.hiloc.addr = esym.value+esym.size; |
| } |
| sym.fhdr = fp; |
| if(esym.type==ElfSymTypeObject){ |
| sym.class = CDATA; |
| sym.type = 'D'; |
| if(&elf->sect[esym.shndx] == elf->bss) |
| sym.type = 'B'; |
| }else if(esym.type==ElfSymTypeFunc){ |
| sym.class = CTEXT; |
| sym.type = 'T'; |
| } |
| if(esym.shndx == ElfSymShnNone) |
| sym.type = 'U'; |
| if(esym.bind==ElfSymBindLocal) |
| sym.type += 'a' - 'A'; |
| _addsym(fp, &sym); |
| } |
| |
| for(i=0; i<elf->nprog; i++){ |
| p = &elf->prog[i]; |
| if(p->type != ElfProgDynamic) |
| continue; |
| elf->dynamic = p->vaddr; |
| memset(&sym, 0, sizeof sym); |
| sym.name = "_DYNAMIC"; |
| sym.loc = locaddr(p->vaddr); |
| sym.hiloc = locaddr(p->vaddr+p->filesz); |
| sym.type = 'D'; |
| sym.class = CDATA; |
| _addsym(fp, &sym); |
| } |
| return 0; |
| } |
| |
| int |
| elfsymlookup(Elf *elf, char *name, ulong *addr) |
| { |
| int i; |
| ElfSym esym; |
| |
| for(i=0; elfsym(elf, i, &esym) >= 0; i++){ |
| if(esym.name == nil) |
| continue; |
| if(strcmp(esym.name, name) == 0){ |
| *addr = esym.value; |
| return 0; |
| } |
| } |
| return -1; |
| } |
| |
| int |
| symelf(Fhdr *fhdr) |
| { |
| int ret; |
| |
| ret = -1; |
| |
| /* try dwarf */ |
| if(fhdr->dwarf){ |
| if(machdebug) |
| fprint(2, "dwarf symbols...\n"); |
| if(symdwarf(fhdr) < 0) |
| fprint(2, "initializing dwarf: %r"); |
| else |
| ret = 0; |
| } |
| |
| /* try stabs */ |
| if(fhdr->stabs.stabbase){ |
| if(machdebug) |
| fprint(2, "stabs symbols...\n"); |
| if(symstabs(fhdr) < 0) |
| fprint(2, "initializing stabs: %r"); |
| else |
| ret = 0; |
| } |
| |
| if(machdebug) |
| fprint(2, "elf symbols...\n"); |
| |
| if(elfsyminit(fhdr) < 0) |
| fprint(2, "initializing elf: %r"); |
| else |
| ret = 0; |
| return ret; |
| } |
| |