1/*- 2 * Copyright (c) 1998 Mark Newton 3 * Copyright (c) 1994-1996 S��ren Schmidt 4 * All rights reserved. 5 * 6 * Based heavily on /sys/kern/imgact_aout.c which is: 7 * Copyright (c) 1993, David Greenman 8 * 9 * Redistribution and use in source and binary forms, with or without 10 * modification, are permitted provided that the following conditions 11 * are met: 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions and the following disclaimer 14 * in this position and unchanged. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 3. The name of the author may not be used to endorse or promote products 19 * derived from this software without specific prior written permission 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 31 */ 32 33#include <sys/cdefs.h> 34__FBSDID("$FreeBSD: releng/10.2/sys/compat/svr4/imgact_svr4.c 255426 2013-09-09 18:11:59Z jhb $"); 35 36#include <sys/param.h> 37#include <sys/systm.h> 38#include <sys/exec.h> 39#include <sys/imgact.h> 40#include <sys/imgact_aout.h> 41#include <sys/kernel.h> 42#include <sys/lock.h> 43#include <sys/mman.h> 44#include <sys/mutex.h> 45#include <sys/proc.h> 46#include <sys/racct.h> 47#include <sys/resourcevar.h> 48#include <sys/vnode.h> 49 50#include <vm/vm.h> 51#include <vm/vm_kern.h> 52#include <vm/vm_param.h> 53#include <vm/pmap.h> 54#include <vm/vm_map.h> 55#include <vm/vm_extern.h> 56 57#include <compat/svr4/svr4.h> 58 59static int exec_svr4_imgact(struct image_params *iparams); 60 61static int 62exec_svr4_imgact(imgp) 63 struct image_params *imgp; 64{ 65 const struct exec *a_out = (const struct exec *) imgp->image_header; 66 struct vmspace *vmspace; 67 vm_offset_t vmaddr; 68 unsigned long virtual_offset, file_offset; 69 unsigned long bss_size; 70 ssize_t aresid; 71 int error; 72 73 if (((a_out->a_magic >> 16) & 0xff) != 0x64) 74 return -1; 75 76 /* 77 * Set file/virtual offset based on a.out variant. 78 */ 79 switch ((int)(a_out->a_magic & 0xffff)) { 80 case 0413: 81 virtual_offset = 0; 82 file_offset = 1024; 83 break; 84 case 0314: 85 virtual_offset = 4096; 86 file_offset = 0; 87 break; 88 default: 89 return (-1); 90 } 91 bss_size = round_page(a_out->a_bss); 92#ifdef DEBUG 93 printf("imgact: text: %08lx, data: %08lx, bss: %08lx\n", (u_long)a_out->a_text, (u_long)a_out->a_data, bss_size); 94#endif 95 96 /* 97 * Check various fields in header for validity/bounds. 98 */ 99 if (a_out->a_entry < virtual_offset || 100 a_out->a_entry >= virtual_offset + a_out->a_text || 101 a_out->a_text & PAGE_MASK || a_out->a_data & PAGE_MASK) 102 return (-1); 103 104 /* text + data can't exceed file size */ 105 if (a_out->a_data + a_out->a_text > imgp->attr->va_size) 106 return (EFAULT); 107 /* 108 * text/data/bss must not exceed limits 109 */ 110 PROC_LOCK(imgp->proc); 111 if (a_out->a_text > maxtsiz || 112 a_out->a_data + bss_size > lim_cur(imgp->proc, RLIMIT_DATA) || 113 racct_set(imgp->proc, RACCT_DATA, a_out->a_data + bss_size) != 0) { 114 PROC_UNLOCK(imgp->proc); 115 return (ENOMEM); 116 } 117 PROC_UNLOCK(imgp->proc); 118 119 VOP_UNLOCK(imgp->vp, 0); 120 121 /* 122 * Destroy old process VM and create a new one (with a new stack) 123 */ 124 error = exec_new_vmspace(imgp, &svr4_sysvec); 125 if (error) 126 goto fail; 127 vmspace = imgp->proc->p_vmspace; 128 129 /* 130 * Check if file_offset page aligned,. 131 * Currently we cannot handle misalinged file offsets, 132 * and so we read in the entire image (what a waste). 133 */ 134 if (file_offset & PAGE_MASK) { 135#ifdef DEBUG 136 printf("imgact: Non page aligned binary %lu\n", file_offset); 137#endif 138 /* 139 * Map text+data+bss read/write/execute 140 */ 141 vmaddr = virtual_offset; 142 error = vm_map_find(&vmspace->vm_map, NULL, 0, &vmaddr, 143 a_out->a_text + a_out->a_data + bss_size, 0, VMFS_NO_SPACE, 144 VM_PROT_ALL, VM_PROT_ALL, 0); 145 if (error) 146 goto fail; 147 148 error = vn_rdwr(UIO_READ, imgp->vp, (void *)vmaddr, file_offset, 149 a_out->a_text + a_out->a_data, UIO_USERSPACE, 0, 150 curthread->td_ucred, NOCRED, &aresid, curthread); 151 if (error != 0) 152 goto fail; 153 if (aresid != 0) { 154 error = ENOEXEC; 155 goto fail; 156 } 157 158 /* 159 * remove write enable on the 'text' part 160 */ 161 error = vm_map_protect(&vmspace->vm_map, 162 vmaddr, 163 vmaddr + a_out->a_text, 164 VM_PROT_EXECUTE|VM_PROT_READ, 165 TRUE); 166 if (error) 167 goto fail; 168 } 169 else { 170#ifdef DEBUG 171 printf("imgact: Page aligned binary %lu\n", file_offset); 172#endif 173 /* 174 * Map text+data read/execute 175 */ 176 vmaddr = virtual_offset; 177 error = vm_mmap(&vmspace->vm_map, &vmaddr, 178 a_out->a_text + a_out->a_data, 179 VM_PROT_READ | VM_PROT_EXECUTE, 180 VM_PROT_ALL, 181 MAP_PRIVATE | MAP_FIXED, 182 OBJT_VNODE, imgp->vp, file_offset); 183 if (error) 184 goto fail; 185 186#ifdef DEBUG 187 printf("imgact: startaddr=%08lx, length=%08lx\n", (u_long)vmaddr, 188 (u_long)a_out->a_text + a_out->a_data); 189#endif 190 /* 191 * allow read/write of data 192 */ 193 error = vm_map_protect(&vmspace->vm_map, 194 vmaddr + a_out->a_text, 195 vmaddr + a_out->a_text + a_out->a_data, 196 VM_PROT_ALL, 197 FALSE); 198 if (error) 199 goto fail; 200 201 /* 202 * Allocate anon demand-zeroed area for uninitialized data 203 */ 204 if (bss_size != 0) { 205 vmaddr = virtual_offset + a_out->a_text + a_out->a_data; 206 error = vm_map_find(&vmspace->vm_map, NULL, 0, &vmaddr, 207 bss_size, 0, VMFS_NO_SPACE, VM_PROT_ALL, VM_PROT_ALL, 0); 208 if (error) 209 goto fail; 210#ifdef DEBUG 211 printf("imgact: bssaddr=%08lx, length=%08lx\n", 212 (u_long)vmaddr, bss_size); 213#endif 214 215 } 216 } 217 /* Fill in process VM information */ 218 vmspace->vm_tsize = round_page(a_out->a_text) >> PAGE_SHIFT; 219 vmspace->vm_dsize = round_page(a_out->a_data + bss_size) >> PAGE_SHIFT; 220 vmspace->vm_taddr = (caddr_t)virtual_offset; 221 vmspace->vm_daddr = (caddr_t)virtual_offset + a_out->a_text; 222 223 /* Fill in image_params */ 224 imgp->interpreted = 0; 225 imgp->entry_addr = a_out->a_entry; 226 227 imgp->proc->p_sysent = &svr4_sysvec; 228fail: 229 vn_lock(imgp->vp, LK_EXCLUSIVE | LK_RETRY); 230 return (error); 231} 232 233/* 234 * Tell kern_execve.c about it, with a little help from the linker. 235 */ 236struct execsw svr4_execsw = { exec_svr4_imgact, "svr4 ELF" }; 237EXEC_SET(execsw_set, svr4_execsw); 238 239