Home | History | Annotate | Line # | Download | only in common
linux_exec.c revision 1.115.2.1
      1 /*	$NetBSD: linux_exec.c,v 1.115.2.1 2012/04/17 00:07:17 yamt 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.115.2.1 2012/04/17 00:07:17 yamt 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_ucsize =		0,
    116 	.e_startlwp =		NULL
    117 };
    118 
    119 void
    120 linux_e_proc_exec(struct proc *p, struct exec_package *epp)
    121 {
    122 	struct lwp *l;
    123 
    124 	l = LIST_FIRST(&p->p_lwps);
    125 	if (l->l_emuldata == NULL) {
    126 		l->l_emuldata = kmem_zalloc(sizeof(struct linux_emuldata), KM_SLEEP);
    127 	} else {
    128 		memset(l->l_emuldata, 0, sizeof (struct linux_emuldata));
    129 	}
    130 
    131 	KASSERT(p->p_nlwps == 1);
    132 	l = LIST_FIRST(&p->p_lwps);
    133 	mutex_enter(p->p_lock);
    134 	l->l_lid = p->p_pid;
    135 	mutex_exit(p->p_lock);
    136 }
    137 
    138 void
    139 linux_e_proc_exit(struct proc *p)
    140 {
    141 	struct lwp *l;
    142 
    143 	KASSERT(p->p_nlwps == 1);
    144 	l = LIST_FIRST(&p->p_lwps);
    145 	linux_e_lwp_exit(l);
    146 }
    147 
    148 void
    149 linux_e_proc_fork(struct proc *p2, struct lwp *l1, int flags)
    150 {
    151 	struct linux_emuldata *led1, *led2;
    152 	struct lwp *l2;
    153 
    154 	KASSERT(p2->p_nlwps == 1);
    155 	l2 = LIST_FIRST(&p2->p_lwps);
    156 	l2->l_lid = p2->p_pid;
    157 	led1 = l1->l_emuldata;
    158 	led2 = l2->l_emuldata;
    159 	led2->led_child_tidptr = led1->led_child_tidptr;
    160 }
    161 
    162 void
    163 linux_e_lwp_fork(struct lwp *l1, struct lwp *l2)
    164 {
    165 	struct linux_emuldata *led2;
    166 
    167 	led2 = kmem_zalloc(sizeof(*led2), KM_SLEEP);
    168 	l2->l_emuldata = led2;
    169 }
    170 
    171 void
    172 linux_e_lwp_exit(struct lwp *l)
    173 {
    174 	struct linux_emuldata *led;
    175 	struct linux_sys_futex_args cup;
    176 	register_t retval;
    177 	int error, zero = 0;
    178 
    179 	led = l->l_emuldata;
    180 	if (led->led_clear_tid == NULL) {
    181 		return;
    182 	}
    183 
    184 	/* Emulate LINUX_CLONE_CHILD_CLEARTID */
    185 	error = copyout(&zero, led->led_clear_tid, sizeof(zero));
    186 #ifdef DEBUG_LINUX
    187 	if (error != 0)
    188 		printf("%s: cannot clear TID\n", __func__);
    189 #endif
    190 
    191 	SCARG(&cup, uaddr) = led->led_clear_tid;
    192 	SCARG(&cup, op) = LINUX_FUTEX_WAKE;
    193 	SCARG(&cup, val) = 0x7fffffff; /* Awake everyone */
    194 	SCARG(&cup, timeout) = NULL;
    195 	SCARG(&cup, uaddr2) = NULL;
    196 	SCARG(&cup, val3) = 0;
    197 	if ((error = linux_sys_futex(curlwp, &cup, &retval)) != 0)
    198 		printf("%s: linux_sys_futex failed\n", __func__);
    199 
    200 	release_futexes(l);
    201 
    202 	led = l->l_emuldata;
    203 	l->l_emuldata = NULL;
    204 	kmem_free(led, sizeof(*led));
    205 }
    206