1 /*- 2 * Copyright 1996-1998 John D. Polstra. 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 ``AS IS'' AND ANY EXPRESS OR 15 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 16 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 17 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 18 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 19 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 20 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 21 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 22 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 23 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 24 * 25 * $FreeBSD$ 26 */ 27 28 #include <sys/param.h> 29 #include <sys/kernel.h> 30 #include <sys/systm.h> 31 32 #define __ELF_WORD_SIZE 32 33 34 #include <sys/exec.h> 35 #include <sys/imgact.h> 36 #include <sys/malloc.h> 37 #include <sys/proc.h> 38 #include <sys/namei.h> 39 #include <sys/fcntl.h> 40 #include <sys/sysent.h> 41 #include <sys/imgact_elf.h> 42 #include <sys/syscall.h> 43 #include <sys/signalvar.h> 44 #include <sys/vnode.h> 45 #include <sys/linker.h> 46 47 #include <vm/vm.h> 48 #include <vm/vm_param.h> 49 50 #include <machine/cpu.h> 51 #include <machine/elf.h> 52 #include <machine/reg.h> 53 #include <machine/md_var.h> 54 55 #ifdef __powerpc64__ 56 #include <compat/freebsd32/freebsd32_proto.h> 57 #include <compat/freebsd32/freebsd32_util.h> 58 59 extern const char *freebsd32_syscallnames[]; 60 #endif 61 62 struct sysentvec elf32_freebsd_sysvec = { 63 .sv_size = SYS_MAXSYSCALL, 64 #ifdef __powerpc64__ 65 .sv_table = freebsd32_sysent, 66 #else 67 .sv_table = sysent, 68 #endif 69 .sv_mask = 0, 70 .sv_sigsize = 0, 71 .sv_sigtbl = NULL, 72 .sv_errsize = 0, 73 .sv_errtbl = NULL, 74 .sv_transtrap = NULL, 75 .sv_fixup = __elfN(freebsd_fixup), 76 .sv_sendsig = sendsig, 77 .sv_sigcode = sigcode32, 78 .sv_szsigcode = &szsigcode32, 79 .sv_prepsyscall = NULL, 80 .sv_name = "FreeBSD ELF32", 81 .sv_coredump = __elfN(coredump), 82 .sv_imgact_try = NULL, 83 .sv_minsigstksz = MINSIGSTKSZ, 84 .sv_pagesize = PAGE_SIZE, 85 .sv_minuser = VM_MIN_ADDRESS, 86 .sv_stackprot = VM_PROT_ALL, 87 #ifdef __powerpc64__ 88 .sv_maxuser = VM_MAXUSER_ADDRESS, 89 .sv_usrstack = FREEBSD32_USRSTACK, 90 .sv_psstrings = FREEBSD32_PS_STRINGS, 91 .sv_copyout_strings = freebsd32_copyout_strings, 92 .sv_setregs = ppc32_setregs, 93 .sv_syscallnames = freebsd32_syscallnames, 94 #else 95 .sv_maxuser = VM_MAXUSER_ADDRESS, 96 .sv_usrstack = USRSTACK, 97 .sv_psstrings = PS_STRINGS, 98 .sv_copyout_strings = exec_copyout_strings, 99 .sv_setregs = exec_setregs, 100 .sv_syscallnames = syscallnames, 101 #endif 102 .sv_fixlimit = NULL, 103 .sv_maxssiz = NULL, 104 .sv_flags = SV_ABI_FREEBSD | SV_ILP32 | SV_SHP, 105 .sv_set_syscall_retval = cpu_set_syscall_retval, 106 .sv_fetch_syscall_args = cpu_fetch_syscall_args, 107 .sv_shared_page_base = FREEBSD32_SHAREDPAGE, 108 .sv_shared_page_len = PAGE_SIZE, 109 .sv_schedtail = NULL, 110 }; 111 INIT_SYSENTVEC(elf32_sysvec, &elf32_freebsd_sysvec); 112 113 static Elf32_Brandinfo freebsd_brand_info = { 114 .brand = ELFOSABI_FREEBSD, 115 .machine = EM_PPC, 116 .compat_3_brand = "FreeBSD", 117 .emul_path = NULL, 118 .interp_path = "/libexec/ld-elf.so.1", 119 .sysvec = &elf32_freebsd_sysvec, 120 #ifdef __powerpc64__ 121 .interp_newpath = "/libexec/ld-elf32.so.1", 122 #else 123 .interp_newpath = NULL, 124 #endif 125 .brand_note = &elf32_freebsd_brandnote, 126 .flags = BI_CAN_EXEC_DYN | BI_BRAND_NOTE 127 }; 128 129 SYSINIT(elf32, SI_SUB_EXEC, SI_ORDER_FIRST, 130 (sysinit_cfunc_t) elf32_insert_brand_entry, 131 &freebsd_brand_info); 132 133 static Elf32_Brandinfo freebsd_brand_oinfo = { 134 .brand = ELFOSABI_FREEBSD, 135 .machine = EM_PPC, 136 .compat_3_brand = "FreeBSD", 137 .emul_path = NULL, 138 .interp_path = "/usr/libexec/ld-elf.so.1", 139 .sysvec = &elf32_freebsd_sysvec, 140 .interp_newpath = NULL, 141 .brand_note = &elf32_freebsd_brandnote, 142 .flags = BI_CAN_EXEC_DYN | BI_BRAND_NOTE 143 }; 144 145 SYSINIT(oelf32, SI_SUB_EXEC, SI_ORDER_ANY, 146 (sysinit_cfunc_t) elf32_insert_brand_entry, 147 &freebsd_brand_oinfo); 148 149 void 150 elf32_dump_thread(struct thread *td __unused, void *dst __unused, 151 size_t *off __unused) 152 { 153 } 154 155 #ifndef __powerpc64__ 156 /* Process one elf relocation with addend. */ 157 static int 158 elf_reloc_internal(linker_file_t lf, Elf_Addr relocbase, const void *data, 159 int type, int local, elf_lookup_fn lookup) 160 { 161 Elf_Addr *where; 162 Elf_Half *hwhere; 163 Elf_Addr addr; 164 Elf_Addr addend; 165 Elf_Word rtype, symidx; 166 const Elf_Rela *rela; 167 168 switch (type) { 169 case ELF_RELOC_REL: 170 panic("PPC only supports RELA relocations"); 171 break; 172 case ELF_RELOC_RELA: 173 rela = (const Elf_Rela *)data; 174 where = (Elf_Addr *) ((uintptr_t)relocbase + rela->r_offset); 175 hwhere = (Elf_Half *) ((uintptr_t)relocbase + rela->r_offset); 176 addend = rela->r_addend; 177 rtype = ELF_R_TYPE(rela->r_info); 178 symidx = ELF_R_SYM(rela->r_info); 179 break; 180 default: 181 panic("elf_reloc: unknown relocation mode %d\n", type); 182 } 183 184 switch (rtype) { 185 186 case R_PPC_NONE: 187 break; 188 189 case R_PPC_ADDR32: /* word32 S + A */ 190 addr = lookup(lf, symidx, 1); 191 if (addr == 0) 192 return -1; 193 addr += addend; 194 *where = addr; 195 break; 196 197 case R_PPC_ADDR16_LO: /* #lo(S) */ 198 addr = lookup(lf, symidx, 1); 199 if (addr == 0) 200 return -1; 201 /* 202 * addend values are sometimes relative to sections 203 * (i.e. .rodata) in rela, where in reality they 204 * are relative to relocbase. Detect this condition. 205 */ 206 if (addr > relocbase && addr <= (relocbase + addend)) 207 addr = relocbase + addend; 208 else 209 addr += addend; 210 *hwhere = addr & 0xffff; 211 break; 212 213 case R_PPC_ADDR16_HA: /* #ha(S) */ 214 addr = lookup(lf, symidx, 1); 215 if (addr == 0) 216 return -1; 217 /* 218 * addend values are sometimes relative to sections 219 * (i.e. .rodata) in rela, where in reality they 220 * are relative to relocbase. Detect this condition. 221 */ 222 if (addr > relocbase && addr <= (relocbase + addend)) 223 addr = relocbase + addend; 224 else 225 addr += addend; 226 *hwhere = ((addr >> 16) + ((addr & 0x8000) ? 1 : 0)) 227 & 0xffff; 228 break; 229 230 case R_PPC_RELATIVE: /* word32 B + A */ 231 *where = elf_relocaddr(lf, relocbase + addend); 232 break; 233 234 default: 235 printf("kldload: unexpected relocation type %d\n", 236 (int) rtype); 237 return -1; 238 } 239 return(0); 240 } 241 242 int 243 elf_reloc(linker_file_t lf, Elf_Addr relocbase, const void *data, int type, 244 elf_lookup_fn lookup) 245 { 246 247 return (elf_reloc_internal(lf, relocbase, data, type, 0, lookup)); 248 } 249 250 int 251 elf_reloc_local(linker_file_t lf, Elf_Addr relocbase, const void *data, 252 int type, elf_lookup_fn lookup) 253 { 254 255 return (elf_reloc_internal(lf, relocbase, data, type, 1, lookup)); 256 } 257 258 int 259 elf_cpu_load_file(linker_file_t lf) 260 { 261 /* Only sync the cache for non-kernel modules */ 262 if (lf->id != 1) 263 __syncicache(lf->address, lf->size); 264 return (0); 265 } 266 267 int 268 elf_cpu_unload_file(linker_file_t lf __unused) 269 { 270 271 return (0); 272 } 273 #endif 274