1 /* $NetBSD: linux_exec.c,v 1.114 2010/07/07 01:30:35 chs Exp $ */ 2 3 /*- 4 * Copyright (c) 1994, 1995, 1998, 2000, 2007, 2008 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Christos Zoulas, Frank van der Linden, Eric Haszlakiewicz and 9 * Thor Lancelot Simon. 10 * 11 * Redistribution and use in source and binary forms, with or without 12 * modification, are permitted provided that the following conditions 13 * are met: 14 * 1. Redistributions of source code must retain the above copyright 15 * notice, this list of conditions and the following disclaimer. 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 21 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 22 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 23 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 24 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 25 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 26 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 29 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 30 * POSSIBILITY OF SUCH DAMAGE. 31 */ 32 33 #include <sys/cdefs.h> 34 __KERNEL_RCSID(0, "$NetBSD: linux_exec.c,v 1.114 2010/07/07 01:30:35 chs Exp $"); 35 36 #include <sys/param.h> 37 #include <sys/systm.h> 38 #include <sys/kernel.h> 39 #include <sys/proc.h> 40 #include <sys/malloc.h> 41 #include <sys/namei.h> 42 #include <sys/vnode.h> 43 #include <sys/mount.h> 44 #include <sys/exec.h> 45 #include <sys/exec_elf.h> 46 47 #include <sys/mman.h> 48 #include <sys/syscallargs.h> 49 50 #include <sys/ptrace.h> /* For proc_reparent() */ 51 52 #include <uvm/uvm_extern.h> 53 54 #include <sys/cpu.h> 55 #include <machine/reg.h> 56 57 #include <compat/linux/common/linux_types.h> 58 #include <compat/linux/common/linux_signal.h> 59 #include <compat/linux/common/linux_util.h> 60 #include <compat/linux/common/linux_sched.h> 61 #include <compat/linux/common/linux_machdep.h> 62 #include <compat/linux/common/linux_exec.h> 63 #include <compat/linux/common/linux_futex.h> 64 #include <compat/linux/common/linux_ipc.h> 65 #include <compat/linux/common/linux_sem.h> 66 67 #include <compat/linux/linux_syscallargs.h> 68 #include <compat/linux/linux_syscall.h> 69 #include <compat/linux/common/linux_misc.h> 70 #include <compat/linux/common/linux_errno.h> 71 #include <compat/linux/common/linux_emuldata.h> 72 73 extern struct sysent linux_sysent[]; 74 extern const char * const linux_syscallnames[]; 75 extern char linux_sigcode[], linux_esigcode[]; 76 77 /* 78 * Emulation switch. 79 */ 80 81 struct uvm_object *emul_linux_object; 82 83 struct emul emul_linux = { 84 .e_name = "linux", 85 .e_path = "/emul/linux", 86 #ifndef __HAVE_MINIMAL_EMUL 87 .e_flags = 0, 88 .e_errno = native_to_linux_errno, 89 .e_nosys = LINUX_SYS_syscall, 90 .e_nsysent = LINUX_SYS_NSYSENT, 91 #endif 92 .e_sysent = linux_sysent, 93 .e_syscallnames = linux_syscallnames, 94 .e_sendsig = linux_sendsig, 95 .e_trapsignal = linux_trapsignal, 96 .e_tracesig = NULL, 97 .e_sigcode = linux_sigcode, 98 .e_esigcode = linux_esigcode, 99 .e_sigobject = &emul_linux_object, 100 .e_setregs = linux_setregs, 101 .e_proc_exec = linux_e_proc_exec, 102 .e_proc_fork = linux_e_proc_fork, 103 .e_proc_exit = linux_e_proc_exit, 104 .e_lwp_fork = linux_e_lwp_fork, 105 .e_lwp_exit = linux_e_lwp_exit, 106 #ifdef __HAVE_SYSCALL_INTERN 107 .e_syscall_intern = linux_syscall_intern, 108 #else 109 #error Implement __HAVE_SYSCALL_INTERN for this platform 110 #endif 111 .e_sysctlovly = NULL, 112 .e_fault = NULL, 113 .e_vm_default_addr = uvm_default_mapaddr, 114 .e_usertrap = linux_usertrap, 115 .e_sa = NULL, 116 .e_ucsize = 0, 117 .e_startlwp = NULL 118 }; 119 120 void 121 linux_e_proc_exec(struct proc *p, struct exec_package *epp) 122 { 123 struct lwp *l; 124 125 l = LIST_FIRST(&p->p_lwps); 126 if (l->l_emuldata == NULL) { 127 l->l_emuldata = kmem_zalloc(sizeof(struct linux_emuldata), KM_SLEEP); 128 } else { 129 memset(l->l_emuldata, 0, sizeof (struct linux_emuldata)); 130 } 131 132 KASSERT(p->p_nlwps == 1); 133 l = LIST_FIRST(&p->p_lwps); 134 mutex_enter(p->p_lock); 135 l->l_lid = p->p_pid; 136 mutex_exit(p->p_lock); 137 } 138 139 void 140 linux_e_proc_exit(struct proc *p) 141 { 142 struct lwp *l; 143 144 KASSERT(p->p_nlwps == 1); 145 l = LIST_FIRST(&p->p_lwps); 146 linux_e_lwp_exit(l); 147 } 148 149 void 150 linux_e_proc_fork(struct proc *p2, struct lwp *l1, int flags) 151 { 152 struct linux_emuldata *led1, *led2; 153 struct lwp *l2; 154 155 KASSERT(p2->p_nlwps == 1); 156 l2 = LIST_FIRST(&p2->p_lwps); 157 l2->l_lid = p2->p_pid; 158 led1 = l1->l_emuldata; 159 led2 = l2->l_emuldata; 160 led2->led_child_tidptr = led1->led_child_tidptr; 161 } 162 163 void 164 linux_e_lwp_fork(struct lwp *l1, struct lwp *l2) 165 { 166 struct linux_emuldata *led2; 167 168 led2 = kmem_zalloc(sizeof(struct linux_emuldata), KM_SLEEP); 169 l2->l_emuldata = led2; 170 } 171 172 void 173 linux_e_lwp_exit(struct lwp *l) 174 { 175 struct linux_emuldata *led; 176 struct linux_sys_futex_args cup; 177 register_t retval; 178 int error, zero = 0; 179 180 led = l->l_emuldata; 181 if (led->led_clear_tid == NULL) { 182 return; 183 } 184 185 /* Emulate LINUX_CLONE_CHILD_CLEARTID */ 186 error = copyout(&zero, led->led_clear_tid, sizeof(zero)); 187 #ifdef DEBUG_LINUX 188 if (error != 0) 189 printf("%s: cannot clear TID\n", __func__); 190 #endif 191 192 SCARG(&cup, uaddr) = led->led_clear_tid; 193 SCARG(&cup, op) = LINUX_FUTEX_WAKE; 194 SCARG(&cup, val) = 0x7fffffff; /* Awake everyone */ 195 SCARG(&cup, timeout) = NULL; 196 SCARG(&cup, uaddr2) = NULL; 197 SCARG(&cup, val3) = 0; 198 if ((error = linux_sys_futex(curlwp, &cup, &retval)) != 0) 199 printf("%s: linux_sys_futex failed\n", __func__); 200 201 release_futexes(l); 202 203 led = l->l_emuldata; 204 l->l_emuldata = NULL; 205 kmem_free(led, sizeof (struct linux_emuldata)); 206 } 207