/*- * Copyright 1996-1998 John D. Polstra. * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. * * from: src/sys/i386/i386/elf_machdep.c,v 1.20 2004/08/11 02:35:05 marcel */ #include __FBSDID("$FreeBSD$"); #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include struct sysentvec elf32_freebsd_sysvec = { SYS_MAXSYSCALL, sysent, 0, 0, NULL, 0, NULL, NULL, __elfN(freebsd_fixup), sendsig, sigcode, &szsigcode, NULL, "FreeBSD ELF32", __elfN(coredump), NULL, MINSIGSTKSZ, PAGE_SIZE, VM_MIN_ADDRESS, VM_MAXUSER_ADDRESS, USRSTACK, PS_STRINGS, VM_PROT_ALL, exec_copyout_strings, exec_setregs, NULL }; static Elf32_Brandinfo freebsd_brand_info = { ELFOSABI_FREEBSD, EM_MIPS, "FreeBSD", NULL, "/libexec/ld-elf.so.1", &elf32_freebsd_sysvec, NULL, }; SYSINIT(elf32, SI_SUB_EXEC, SI_ORDER_ANY, (sysinit_cfunc_t) elf32_insert_brand_entry, &freebsd_brand_info); static Elf32_Brandinfo freebsd_brand_oinfo = { ELFOSABI_FREEBSD, EM_MIPS, "FreeBSD", NULL, "/usr/libexec/ld-elf.so.1", &elf32_freebsd_sysvec, NULL, }; SYSINIT(oelf32, SI_SUB_EXEC, SI_ORDER_ANY, (sysinit_cfunc_t) elf32_insert_brand_entry, &freebsd_brand_oinfo); void elf32_dump_thread(struct thread *td __unused, void *dst __unused, size_t *off __unused) { } /* Process one elf relocation with addend. */ static int elf_reloc_internal(linker_file_t lf, Elf_Addr relocbase, const void *data, int type, int local, elf_lookup_fn lookup) { Elf_Addr *where = (Elf_Addr *)NULL;; Elf_Addr addr; Elf_Addr addend = (Elf_Addr)0; Elf_Word rtype = (Elf_Word)0, symidx; const Elf_Rel *rel; const Elf_Rela *rela; switch (type) { case ELF_RELOC_REL: rel = (const Elf_Rel *)data; where = (Elf_Addr *) (relocbase + rel->r_offset); addend = *where; rtype = ELF_R_TYPE(rel->r_info); symidx = ELF_R_SYM(rel->r_info); break; case ELF_RELOC_RELA: rela = (const Elf_Rela *)data; where = (Elf_Addr *) (relocbase + rela->r_offset); addend = rela->r_addend; rtype = ELF_R_TYPE(rela->r_info); symidx = ELF_R_SYM(rela->r_info); break; default: panic("unknown reloc type %d\n", type); } if (local) { #if 0 /* TBD */ if (rtype == R_386_RELATIVE) { /* A + B */ addr = relocbase + addend; if (*where != addr) *where = addr; } return (0); #endif } switch (rtype) { case R_MIPS_NONE: /* none */ break; case R_MIPS_16: /* S + sign-extend(A) */ /* * There shouldn't be R_MIPS_16 relocs in kernel objects. */ printf("kldload: unexpected R_MIPS_16 relocation\n"); return -1; break; case R_MIPS_32: /* S + A - P */ addr = lookup(lf, symidx, 1); if (addr == 0) return -1; addr += addend; if (*where != addr) *where = addr; break; case R_MIPS_REL32: /* A - EA + S */ /* * There shouldn't be R_MIPS_REL32 relocs in kernel objects? */ printf("kldload: unexpected R_MIPS_REL32 relocation\n"); return -1; break; case R_MIPS_26: /* ((A << 2) | (P & 0xf0000000) + S) >> 2 */ break; case R_MIPS_HI16: /* extern/local: ((AHL + S) - ((short)(AHL + S)) >> 16 */ /* _gp_disp: ((AHL + GP - P) - (short)(AHL + GP - P)) >> 16 */ break; case R_MIPS_LO16: /* extern/local: AHL + S */ /* _gp_disp: AHL + GP - P + 4 */ break; case R_MIPS_GPREL16: /* extern/local: ((AHL + S) - ((short)(AHL + S)) >> 16 */ /* _gp_disp: ((AHL + GP - P) - (short)(AHL + GP - P)) >> 16 */ break; case R_MIPS_LITERAL: /* sign-extend(A) + L */ break; case R_MIPS_GOT16: /* external: G */ /* local: tbd */ break; case R_MIPS_PC16: /* sign-extend(A) + S - P */ break; case R_MIPS_CALL16: /* G */ break; case R_MIPS_GPREL32: /* A + S + GP0 - GP */ break; case R_MIPS_GOTHI16: /* (G - (short)G) >> 16 + A */ break; case R_MIPS_GOTLO16: /* G & 0xffff */ break; case R_MIPS_CALLHI16: /* (G - (short)G) >> 16 + A */ break; case R_MIPS_CALLLO16: /* G & 0xffff */ break; default: printf("kldload: unexpected relocation type %d\n", rtype); return (-1); } return(0); } int elf_reloc(linker_file_t lf, Elf_Addr relocbase, const void *data, int type, elf_lookup_fn lookup) { return (elf_reloc_internal(lf, relocbase, data, type, 0, lookup)); } int elf_reloc_local(linker_file_t lf, Elf_Addr relocbase, const void *data, int type, elf_lookup_fn lookup) { return (elf_reloc_internal(lf, relocbase, data, type, 1, lookup)); } int elf_cpu_load_file(linker_file_t lf __unused) { return (0); } int elf_cpu_unload_file(linker_file_t lf __unused) { return (0); }