linux_exec.c revision 1.113.4.1 1 /* $NetBSD: linux_exec.c,v 1.113.4.1 2011/03/05 20:52:47 rmind 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.113.4.1 2011/03/05 20:52:47 rmind 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