linux32_signal.c revision 1.9.2.1 1 /* $NetBSD: linux32_signal.c,v 1.9.2.1 2009/03/03 18:30:08 skrll Exp $ */
2
3 /*-
4 * Copyright (c) 2006 Emmanuel Dreyfus, all rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. All advertising materials mentioning features or use of this software
15 * must display the following acknowledgement:
16 * This product includes software developed by Emmanuel Dreyfus
17 * 4. The name of the author may not be used to endorse or promote
18 * products derived from this software without specific prior written
19 * permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE THE AUTHOR AND CONTRIBUTORS ``AS IS''
22 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
23 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS
25 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
28 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
29 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
30 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
31 * POSSIBILITY OF SUCH DAMAGE.
32 */
33
34 #include <sys/cdefs.h>
35 __KERNEL_RCSID(0, "$NetBSD: linux32_signal.c,v 1.9.2.1 2009/03/03 18:30:08 skrll Exp $");
36
37 #include <sys/param.h>
38 #include <sys/ucred.h>
39 #include <sys/signalvar.h>
40 #include <sys/lwp.h>
41 #include <sys/time.h>
42 #include <sys/proc.h>
43
44 #include <compat/netbsd32/netbsd32.h>
45
46 #include <compat/linux32/common/linux32_types.h>
47 #include <compat/linux32/common/linux32_signal.h>
48 #include <compat/linux32/linux32_syscallargs.h>
49
50 #define linux32_sigemptyset(s) memset((s), 0, sizeof(*(s)))
51 #define linux32_sigismember(s, n) ((s)->sig[((n) - 1) / LINUX32__NSIG_BPW] \
52 & (1 << ((n) - 1) % LINUX32__NSIG_BPW))
53 #define linux32_sigaddset(s, n) ((s)->sig[((n) - 1) / LINUX32__NSIG_BPW] \
54 |= (1 << ((n) - 1) % LINUX32__NSIG_BPW))
55
56 extern const int native_to_linux32_signo[];
57 extern const int linux32_to_native_signo[];
58
59 #ifdef DEBUG_LINUX
60 #define DPRINTF(a) uprintf a
61 #else
62 #define DPRINTF(a)
63 #endif
64
65 void
66 linux32_to_native_sigset(sigset_t *bss, const linux32_sigset_t *lss)
67 {
68 int i, newsig;
69
70 sigemptyset(bss);
71 for (i = 1; i < LINUX32__NSIG; i++) {
72 if (linux32_sigismember(lss, i)) {
73 newsig = linux32_to_native_signo[i];
74 if (newsig)
75 sigaddset(bss, newsig);
76 }
77 }
78 }
79
80 void
81 native_to_linux32_sigset(linux32_sigset_t *lss, const sigset_t *bss)
82 {
83 int i, newsig;
84
85 linux32_sigemptyset(lss);
86 for (i = 1; i < NSIG; i++) {
87 if (sigismember(bss, i)) {
88 newsig = native_to_linux32_signo[i];
89 if (newsig)
90 linux32_sigaddset(lss, newsig);
91 }
92 }
93 }
94
95 unsigned int
96 native_to_linux32_sigflags(const int bsf)
97 {
98 unsigned int lsf = 0;
99 if ((bsf & SA_NOCLDSTOP) != 0)
100 lsf |= LINUX32_SA_NOCLDSTOP;
101 if ((bsf & SA_NOCLDWAIT) != 0)
102 lsf |= LINUX32_SA_NOCLDWAIT;
103 if ((bsf & SA_ONSTACK) != 0)
104 lsf |= LINUX32_SA_ONSTACK;
105 if ((bsf & SA_RESTART) != 0)
106 lsf |= LINUX32_SA_RESTART;
107 if ((bsf & SA_NODEFER) != 0)
108 lsf |= LINUX32_SA_NOMASK;
109 if ((bsf & SA_RESETHAND) != 0)
110 lsf |= LINUX32_SA_ONESHOT;
111 if ((bsf & SA_SIGINFO) != 0)
112 lsf |= LINUX32_SA_SIGINFO;
113 return lsf;
114 }
115
116 int
117 linux32_to_native_sigflags(const unsigned long lsf)
118 {
119 int bsf = 0;
120 if ((lsf & LINUX32_SA_NOCLDSTOP) != 0)
121 bsf |= SA_NOCLDSTOP;
122 if ((lsf & LINUX32_SA_NOCLDWAIT) != 0)
123 bsf |= SA_NOCLDWAIT;
124 if ((lsf & LINUX32_SA_ONSTACK) != 0)
125 bsf |= SA_ONSTACK;
126 if ((lsf & LINUX32_SA_RESTART) != 0)
127 bsf |= SA_RESTART;
128 if ((lsf & LINUX32_SA_ONESHOT) != 0)
129 bsf |= SA_RESETHAND;
130 if ((lsf & LINUX32_SA_NOMASK) != 0)
131 bsf |= SA_NODEFER;
132 if ((lsf & LINUX32_SA_SIGINFO) != 0)
133 bsf |= SA_SIGINFO;
134 if ((lsf & ~LINUX32_SA_ALLBITS) != 0) {
135 #ifdef DEBUG_LINUX
136 printf("linux32_old_to_native_sigflags: "
137 "%lx extra bits ignored\n", lsf);
138 #endif
139 }
140 return bsf;
141 }
142
143 void
144 linux32_to_native_sigaction(struct sigaction *bsa, const struct linux32_sigaction *lsa)
145 {
146 bsa->sa_handler = NETBSD32PTR64(lsa->linux_sa_handler);
147 linux32_to_native_sigset(&bsa->sa_mask, &lsa->linux_sa_mask);
148 bsa->sa_flags = linux32_to_native_sigflags(lsa->linux_sa_flags);
149 }
150
151 void
152 native_to_linux32_sigaction(struct linux32_sigaction *lsa, const struct sigaction *bsa)
153 {
154 NETBSD32PTR32(lsa->linux_sa_handler, bsa->sa_handler);
155 native_to_linux32_sigset(&lsa->linux_sa_mask, &bsa->sa_mask);
156 lsa->linux_sa_flags = native_to_linux32_sigflags(bsa->sa_flags);
157 NETBSD32PTR32(lsa->linux_sa_restorer, NULL);
158 }
159
160 void
161 native_to_linux32_sigaltstack(struct linux32_sigaltstack *lss, const struct sigaltstack *bss)
162 {
163 NETBSD32PTR32(lss->ss_sp, bss->ss_sp);
164 lss->ss_size = bss->ss_size;
165 if (bss->ss_flags & SS_ONSTACK)
166 lss->ss_flags = LINUX32_SS_ONSTACK;
167 else if (bss->ss_flags & SS_DISABLE)
168 lss->ss_flags = LINUX32_SS_DISABLE;
169 else
170 lss->ss_flags = 0;
171 }
172
173
174 void
175 native_to_linux32_old_sigset(linux32_old_sigset_t *lss, const sigset_t *bss)
176 {
177 linux32_sigset_t lsnew;
178
179 native_to_linux32_sigset(&lsnew, bss);
180
181 /* convert new sigset to old sigset */
182 *lss = lsnew.sig[0];
183 }
184
185 void
186 linux32_old_to_native_sigset(sigset_t *bss, const linux32_old_sigset_t *lss)
187 {
188 linux32_sigset_t ls;
189
190 bzero(&ls, sizeof(ls));
191 ls.sig[0] = *lss;
192
193 linux32_to_native_sigset(bss, &ls);
194 }
195
196 int
197 linux32_sys_rt_sigaction(struct lwp *l, const struct linux32_sys_rt_sigaction_args *uap, register_t *retval)
198 {
199 /* {
200 syscallarg(int) signum;
201 syscallarg(const linux32_sigactionp_t) nsa;
202 syscallarg(linux32_sigactionp_t) osa;
203 syscallarg(netbsd32_size_t) sigsetsize;
204 } */
205 struct linux32_sigaction nls32;
206 struct linux32_sigaction ols32;
207 struct sigaction ns;
208 struct sigaction os;
209 int error;
210 int sig;
211 int vers = 0;
212 void *tramp = NULL;
213
214 if (SCARG(uap, sigsetsize) != sizeof(linux32_sigset_t)) {
215 DPRINTF(("rt_sigaction: Inconsistent sigsetsize %u %zu\n",
216 SCARG(uap, sigsetsize), sizeof(linux32_sigset_t)));
217 return EINVAL;
218 }
219
220 if (SCARG_P32(uap, nsa) != NULL) {
221 if ((error = copyin(SCARG_P32(uap, nsa),
222 &nls32, sizeof(nls32))) != 0) {
223 DPRINTF(("rt_sigaction: Copyin %d\n", error));
224 return error;
225 }
226 linux32_to_native_sigaction(&ns, &nls32);
227 }
228
229 sig = SCARG(uap, signum);
230 if (sig < 0 || sig >= LINUX32__NSIG) {
231 DPRINTF(("rt_sigaction: Bad signal number %d %d\n",
232 sig, LINUX32__NSIG));
233 return EINVAL;
234 }
235 if (sig > 0 && !linux32_to_native_signo[sig]) {
236 /* unknown signal... */
237 os.sa_handler = SIG_IGN;
238 sigemptyset(&os.sa_mask);
239 os.sa_flags = 0;
240 } else {
241 if ((error = sigaction1(l,
242 linux32_to_native_signo[sig],
243 SCARG_P32(uap, nsa) ? &ns : NULL,
244 SCARG_P32(uap, osa) ? &os : NULL,
245 tramp, vers)) != 0) {
246 DPRINTF(("rt_sigaction: sigaction %d\n", error));
247 return error;
248 }
249 }
250
251 if (SCARG_P32(uap, osa) != NULL) {
252 native_to_linux32_sigaction(&ols32, &os);
253
254 if ((error = copyout(&ols32, SCARG_P32(uap, osa),
255 sizeof(ols32))) != 0) {
256 DPRINTF(("rt_sigaction: Copyout %d\n", error));
257 return error;
258 }
259 }
260
261 return 0;
262 }
263
264 int
265 linux32_sys_rt_sigprocmask(struct lwp *l, const struct linux32_sys_rt_sigprocmask_args *uap, register_t *retval)
266 {
267 /* {
268 syscallarg(int) how;
269 syscallarg(const linux32_sigsetp_t) set;
270 syscallarg(linux32_sigsetp_t) oset;
271 syscallarg(netbsd32_size_t) sigsetsize;
272 } */
273 struct proc *p = l->l_proc;
274 linux32_sigset_t nls32, ols32;
275 sigset_t ns, os;
276 int error;
277 int how;
278
279 if (SCARG(uap, sigsetsize) != sizeof(linux32_sigset_t))
280 return EINVAL;
281
282 switch (SCARG(uap, how)) {
283 case LINUX32_SIG_BLOCK:
284 how = SIG_BLOCK;
285 break;
286 case LINUX32_SIG_UNBLOCK:
287 how = SIG_UNBLOCK;
288 break;
289 case LINUX32_SIG_SETMASK:
290 how = SIG_SETMASK;
291 break;
292 default:
293 return EINVAL;
294 break;
295 }
296
297 if (SCARG_P32(uap, set) != NULL) {
298 if ((error = copyin(SCARG_P32(uap, set),
299 &nls32, sizeof(nls32))) != 0)
300 return error;
301 linux32_to_native_sigset(&ns, &nls32);
302 }
303
304 mutex_enter(p->p_lock);
305 error = sigprocmask1(l, how,
306 SCARG_P32(uap, set) ? &ns : NULL,
307 SCARG_P32(uap, oset) ? &os : NULL);
308 mutex_exit(p->p_lock);
309
310 if (error != 0)
311 return error;
312
313 if (SCARG_P32(uap, oset) != NULL) {
314 native_to_linux32_sigset(&ols32, &os);
315 if ((error = copyout(&ols32,
316 SCARG_P32(uap, oset), sizeof(ols32))) != 0)
317 return error;
318 }
319
320 return 0;
321 }
322
323 int
324 linux32_sys_kill(struct lwp *l, const struct linux32_sys_kill_args *uap, register_t *retval)
325 {
326 /* {
327 syscallarg(int) pid;
328 syscallarg(int) signum;
329 } */
330
331 struct sys_kill_args ka;
332 int sig;
333
334 SCARG(&ka, pid) = SCARG(uap, pid);
335 sig = SCARG(uap, signum);
336 if (sig < 0 || sig >= LINUX32__NSIG)
337 return (EINVAL);
338 SCARG(&ka, signum) = linux32_to_native_signo[sig];
339 return sys_kill(l, &ka, retval);
340 }
341
342 int
343 linux32_sys_rt_sigsuspend(struct lwp *l, const struct linux32_sys_rt_sigsuspend_args *uap, register_t *retval)
344 {
345 /* {
346 syscallarg(linux32_sigsetp_t) unewset;
347 syscallarg(netbsd32_size_t) sigsetsize;
348 } */
349 linux32_sigset_t lss;
350 sigset_t bss;
351 int error;
352
353 if (SCARG(uap, sigsetsize) != sizeof(linux32_sigset_t))
354 return EINVAL;
355
356 if ((error = copyin(SCARG_P32(uap, unewset),
357 &lss, sizeof(linux32_sigset_t))) != 0)
358 return error;
359
360 linux32_to_native_sigset(&bss, &lss);
361
362 return sigsuspend1(l, &bss);
363 }
364
365 int
366 linux32_sys_signal(struct lwp *l, const struct linux32_sys_signal_args *uap, register_t *retval)
367 {
368 /* {
369 syscallarg(int) signum;
370 syscallarg(linux32_handler_t) handler;
371 } */
372 struct sigaction nbsa, obsa;
373 int error, sig;
374
375 *retval = -1;
376
377 sig = SCARG(uap, signum);
378 if (sig < 0 || sig >= LINUX32__NSIG)
379 return EINVAL;
380
381 nbsa.sa_handler = SCARG_P32(uap, handler);
382 sigemptyset(&nbsa.sa_mask);
383 nbsa.sa_flags = SA_RESETHAND | SA_NODEFER;
384
385 if ((error = sigaction1(l, linux32_to_native_signo[sig],
386 &nbsa, &obsa, NULL, 0)) != 0)
387 return error;
388
389 *retval = (int)(long)obsa.sa_handler;
390 return 0;
391 }
392
393 int
394 linux32_sys_rt_sigpending(struct lwp *l, const struct linux32_sys_rt_sigpending_args *uap, register_t *retval)
395 {
396 /* {
397 syscallarg(linux32_sigsetp_t) set;
398 syscallarg(netbsd32_size_t) sigsetsize;
399 } */
400 sigset_t bss;
401 linux32_sigset_t lss;
402
403 if (SCARG(uap, sigsetsize) != sizeof(linux32_sigset_t))
404 return EINVAL;
405
406 sigpending1(l, &bss);
407 native_to_linux32_sigset(&lss, &bss);
408 return copyout(&lss, SCARG_P32(uap, set), sizeof(lss));
409 }
410