linux32_signal.c revision 1.17.4.1 1 /* $NetBSD: linux32_signal.c,v 1.17.4.1 2020/01/21 19:19:17 martin 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.17.4.1 2020/01/21 19:19:17 martin 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 #include <sys/wait.h>
44
45 #include <compat/netbsd32/netbsd32.h>
46
47 #include <compat/linux/common/linux_types.h>
48 #include <compat/linux/common/linux_signal.h>
49
50 #include <compat/linux32/common/linux32_types.h>
51 #include <compat/linux32/common/linux32_signal.h>
52 #include <compat/linux32/common/linux32_siginfo.h>
53 #include <compat/linux32/linux32_syscallargs.h>
54 #include <compat/linux32/common/linux32_errno.h>
55 #include <compat/linux32/common/linux32_sched.h>
56
57 #define linux32_sigemptyset(s) memset((s), 0, sizeof(*(s)))
58 #define linux32_sigismember(s, n) ((s)->sig[((n) - 1) / LINUX32__NSIG_BPW] \
59 & (1 << ((n) - 1) % LINUX32__NSIG_BPW))
60 #define linux32_sigaddset(s, n) ((s)->sig[((n) - 1) / LINUX32__NSIG_BPW] \
61 |= (1 << ((n) - 1) % LINUX32__NSIG_BPW))
62
63 extern const int native_to_linux32_signo[];
64 extern const int linux32_to_native_signo[];
65
66 #ifdef DEBUG_LINUX
67 #define DPRINTF(a) uprintf a
68 #else
69 #define DPRINTF(a)
70 #endif
71
72 void
73 linux32_to_native_sigset(sigset_t *bss, const linux32_sigset_t *lss)
74 {
75 int i, newsig;
76
77 sigemptyset(bss);
78 for (i = 1; i < LINUX32__NSIG; i++) {
79 if (linux32_sigismember(lss, i)) {
80 newsig = linux32_to_native_signo[i];
81 if (newsig)
82 sigaddset(bss, newsig);
83 }
84 }
85 }
86
87 void
88 native_to_linux32_sigset(linux32_sigset_t *lss, const sigset_t *bss)
89 {
90 int i, newsig;
91
92 linux32_sigemptyset(lss);
93 for (i = 1; i < NSIG; i++) {
94 if (sigismember(bss, i)) {
95 newsig = native_to_linux32_signo[i];
96 if (newsig)
97 linux32_sigaddset(lss, newsig);
98 }
99 }
100 }
101
102 void
103 native_to_linux32_siginfo(linux32_siginfo_t *lsi, const struct _ksiginfo *ksi)
104 {
105 memset(lsi, 0, sizeof(*lsi));
106
107 lsi->lsi_signo = native_to_linux32_signo[ksi->_signo];
108 lsi->lsi_errno = native_to_linux32_errno[ksi->_errno];
109 lsi->lsi_code = native_to_linux32_si_code(ksi->_code);
110
111 switch (ksi->_code) {
112 case SI_NOINFO:
113 break;
114
115 case SI_USER:
116 lsi->lsi_pid = ksi->_reason._rt._pid;
117 lsi->lsi_uid = ksi->_reason._rt._uid;
118 if (lsi->lsi_signo == LINUX_SIGALRM ||
119 lsi->lsi_signo >= LINUX_SIGRTMIN)
120 NETBSD32PTR32(lsi->lsi_value.sival_ptr,
121 ksi->_reason._rt._value.sival_ptr);
122 break;
123
124 case SI_TIMER:
125 case SI_QUEUE:
126 lsi->lsi_uid = ksi->_reason._rt._uid;
127 lsi->lsi_uid = ksi->_reason._rt._uid;
128 NETBSD32PTR32(lsi->lsi_value.sival_ptr,
129 ksi->_reason._rt._value.sival_ptr);
130 break;
131
132 case SI_ASYNCIO:
133 case SI_MESGQ:
134 NETBSD32PTR32(lsi->lsi_value.sival_ptr,
135 ksi->_reason._rt._value.sival_ptr);
136 break;
137
138 default:
139 switch (ksi->_signo) {
140 case SIGCHLD:
141 lsi->lsi_uid = ksi->_reason._child._uid;
142 lsi->lsi_pid = ksi->_reason._child._pid;
143 lsi->lsi_status = native_to_linux32_si_status(
144 ksi->_code, ksi->_reason._child._status);
145 lsi->lsi_utime = ksi->_reason._child._utime;
146 lsi->lsi_stime = ksi->_reason._child._stime;
147 break;
148
149 case SIGILL:
150 case SIGFPE:
151 case SIGSEGV:
152 case SIGBUS:
153 case SIGTRAP:
154 NETBSD32PTR32(lsi->lsi_addr, ksi->_reason._fault._addr);
155 break;
156
157 case SIGIO:
158 lsi->lsi_fd = ksi->_reason._poll._fd;
159 lsi->lsi_band = ksi->_reason._poll._band;
160 break;
161 default:
162 break;
163 }
164 }
165 }
166
167 unsigned int
168 native_to_linux32_sigflags(const int bsf)
169 {
170 unsigned int lsf = 0;
171 if ((bsf & SA_NOCLDSTOP) != 0)
172 lsf |= LINUX32_SA_NOCLDSTOP;
173 if ((bsf & SA_NOCLDWAIT) != 0)
174 lsf |= LINUX32_SA_NOCLDWAIT;
175 if ((bsf & SA_ONSTACK) != 0)
176 lsf |= LINUX32_SA_ONSTACK;
177 if ((bsf & SA_RESTART) != 0)
178 lsf |= LINUX32_SA_RESTART;
179 if ((bsf & SA_NODEFER) != 0)
180 lsf |= LINUX32_SA_NOMASK;
181 if ((bsf & SA_RESETHAND) != 0)
182 lsf |= LINUX32_SA_ONESHOT;
183 if ((bsf & SA_SIGINFO) != 0)
184 lsf |= LINUX32_SA_SIGINFO;
185 return lsf;
186 }
187
188 int
189 linux32_to_native_sigflags(const unsigned long lsf)
190 {
191 int bsf = 0;
192 if ((lsf & LINUX32_SA_NOCLDSTOP) != 0)
193 bsf |= SA_NOCLDSTOP;
194 if ((lsf & LINUX32_SA_NOCLDWAIT) != 0)
195 bsf |= SA_NOCLDWAIT;
196 if ((lsf & LINUX32_SA_ONSTACK) != 0)
197 bsf |= SA_ONSTACK;
198 if ((lsf & LINUX32_SA_RESTART) != 0)
199 bsf |= SA_RESTART;
200 if ((lsf & LINUX32_SA_ONESHOT) != 0)
201 bsf |= SA_RESETHAND;
202 if ((lsf & LINUX32_SA_NOMASK) != 0)
203 bsf |= SA_NODEFER;
204 if ((lsf & LINUX32_SA_SIGINFO) != 0)
205 bsf |= SA_SIGINFO;
206 if ((lsf & ~LINUX32_SA_ALLBITS) != 0) {
207 #ifdef DEBUG_LINUX
208 printf("linux32_old_to_native_sigflags: "
209 "%lx extra bits ignored\n", lsf);
210 #endif
211 }
212 return bsf;
213 }
214
215 void
216 linux32_to_native_sigaction(struct sigaction *bsa, const struct linux32_sigaction *lsa)
217 {
218 bsa->sa_handler = NETBSD32PTR64(lsa->linux_sa_handler);
219 linux32_to_native_sigset(&bsa->sa_mask, &lsa->linux_sa_mask);
220 bsa->sa_flags = linux32_to_native_sigflags(lsa->linux_sa_flags);
221 }
222
223 void
224 native_to_linux32_sigaction(struct linux32_sigaction *lsa, const struct sigaction *bsa)
225 {
226 NETBSD32PTR32(lsa->linux_sa_handler, bsa->sa_handler);
227 native_to_linux32_sigset(&lsa->linux_sa_mask, &bsa->sa_mask);
228 lsa->linux_sa_flags = native_to_linux32_sigflags(bsa->sa_flags);
229 NETBSD32PTR32(lsa->linux_sa_restorer, NULL);
230 }
231
232 void
233 native_to_linux32_sigaltstack(struct linux32_sigaltstack *lss, const struct sigaltstack *bss)
234 {
235 memset(lss, 0, sizeof(*lss));
236 NETBSD32PTR32(lss->ss_sp, bss->ss_sp);
237 lss->ss_size = bss->ss_size;
238 if (bss->ss_flags & SS_ONSTACK)
239 lss->ss_flags = LINUX32_SS_ONSTACK;
240 else if (bss->ss_flags & SS_DISABLE)
241 lss->ss_flags = LINUX32_SS_DISABLE;
242 else
243 lss->ss_flags = 0;
244 }
245
246
247 void
248 native_to_linux32_old_sigset(linux32_old_sigset_t *lss, const sigset_t *bss)
249 {
250 linux32_sigset_t lsnew;
251
252 native_to_linux32_sigset(&lsnew, bss);
253
254 /* convert new sigset to old sigset */
255 *lss = lsnew.sig[0];
256 }
257
258 void
259 linux32_old_to_native_sigset(sigset_t *bss, const linux32_old_sigset_t *lss)
260 {
261 linux32_sigset_t ls;
262
263 memset(&ls, 0, sizeof(ls));
264 ls.sig[0] = *lss;
265
266 linux32_to_native_sigset(bss, &ls);
267 }
268
269 int
270 linux32_sys_rt_sigaction(struct lwp *l, const struct linux32_sys_rt_sigaction_args *uap, register_t *retval)
271 {
272 /* {
273 syscallarg(int) signum;
274 syscallarg(const linux32_sigactionp_t) nsa;
275 syscallarg(linux32_sigactionp_t) osa;
276 syscallarg(netbsd32_size_t) sigsetsize;
277 } */
278 struct linux32_sigaction nls32;
279 struct linux32_sigaction ols32;
280 struct sigaction ns;
281 struct sigaction os;
282 int error;
283 int sig;
284 int vers = 0;
285 void *tramp = NULL;
286
287 if (SCARG(uap, sigsetsize) != sizeof(linux32_sigset_t)) {
288 DPRINTF(("rt_sigaction: Inconsistent sigsetsize %u %zu\n",
289 SCARG(uap, sigsetsize), sizeof(linux32_sigset_t)));
290 return EINVAL;
291 }
292
293 if (SCARG_P32(uap, nsa) != NULL) {
294 if ((error = copyin(SCARG_P32(uap, nsa),
295 &nls32, sizeof(nls32))) != 0) {
296 DPRINTF(("rt_sigaction: Copyin %d\n", error));
297 return error;
298 }
299 linux32_to_native_sigaction(&ns, &nls32);
300 }
301
302 sig = SCARG(uap, signum);
303 if (sig < 0 || sig >= LINUX32__NSIG) {
304 DPRINTF(("rt_sigaction: Bad signal number %d %d\n",
305 sig, LINUX32__NSIG));
306 return EINVAL;
307 }
308 if (sig > 0 && !linux32_to_native_signo[sig]) {
309 /* unknown signal... */
310 os.sa_handler = SIG_IGN;
311 sigemptyset(&os.sa_mask);
312 os.sa_flags = 0;
313 } else {
314 if ((error = sigaction1(l,
315 linux32_to_native_signo[sig],
316 SCARG_P32(uap, nsa) ? &ns : NULL,
317 SCARG_P32(uap, osa) ? &os : NULL,
318 tramp, vers)) != 0) {
319 DPRINTF(("rt_sigaction: sigaction %d\n", error));
320 return error;
321 }
322 }
323
324 if (SCARG_P32(uap, osa) != NULL) {
325 native_to_linux32_sigaction(&ols32, &os);
326
327 if ((error = copyout(&ols32, SCARG_P32(uap, osa),
328 sizeof(ols32))) != 0) {
329 DPRINTF(("rt_sigaction: Copyout %d\n", error));
330 return error;
331 }
332 }
333
334 return 0;
335 }
336
337 int
338 linux32_sys_rt_sigprocmask(struct lwp *l, const struct linux32_sys_rt_sigprocmask_args *uap, register_t *retval)
339 {
340 /* {
341 syscallarg(int) how;
342 syscallarg(const linux32_sigsetp_t) set;
343 syscallarg(linux32_sigsetp_t) oset;
344 syscallarg(netbsd32_size_t) sigsetsize;
345 } */
346 struct proc *p = l->l_proc;
347 linux32_sigset_t nls32, ols32;
348 sigset_t ns, os;
349 int error;
350 int how;
351
352 if (SCARG(uap, sigsetsize) != sizeof(linux32_sigset_t))
353 return EINVAL;
354
355 switch (SCARG(uap, how)) {
356 case LINUX32_SIG_BLOCK:
357 how = SIG_BLOCK;
358 break;
359 case LINUX32_SIG_UNBLOCK:
360 how = SIG_UNBLOCK;
361 break;
362 case LINUX32_SIG_SETMASK:
363 how = SIG_SETMASK;
364 break;
365 default:
366 return EINVAL;
367 break;
368 }
369
370 if (SCARG_P32(uap, set) != NULL) {
371 if ((error = copyin(SCARG_P32(uap, set),
372 &nls32, sizeof(nls32))) != 0)
373 return error;
374 linux32_to_native_sigset(&ns, &nls32);
375 }
376
377 mutex_enter(p->p_lock);
378 error = sigprocmask1(l, how,
379 SCARG_P32(uap, set) ? &ns : NULL,
380 SCARG_P32(uap, oset) ? &os : NULL);
381 mutex_exit(p->p_lock);
382
383 if (error != 0)
384 return error;
385
386 if (SCARG_P32(uap, oset) != NULL) {
387 native_to_linux32_sigset(&ols32, &os);
388 if ((error = copyout(&ols32,
389 SCARG_P32(uap, oset), sizeof(ols32))) != 0)
390 return error;
391 }
392
393 return 0;
394 }
395
396 int
397 linux32_sys_kill(struct lwp *l, const struct linux32_sys_kill_args *uap, register_t *retval)
398 {
399 /* {
400 syscallarg(int) pid;
401 syscallarg(int) signum;
402 } */
403
404 struct sys_kill_args ka;
405 int sig;
406
407 SCARG(&ka, pid) = SCARG(uap, pid);
408 sig = SCARG(uap, signum);
409 if (sig < 0 || sig >= LINUX32__NSIG)
410 return (EINVAL);
411 SCARG(&ka, signum) = linux32_to_native_signo[sig];
412 return sys_kill(l, &ka, retval);
413 }
414
415 int
416 linux32_sys_rt_sigsuspend(struct lwp *l, const struct linux32_sys_rt_sigsuspend_args *uap, register_t *retval)
417 {
418 /* {
419 syscallarg(linux32_sigsetp_t) unewset;
420 syscallarg(netbsd32_size_t) sigsetsize;
421 } */
422 linux32_sigset_t lss;
423 sigset_t bss;
424 int error;
425
426 if (SCARG(uap, sigsetsize) != sizeof(linux32_sigset_t))
427 return EINVAL;
428
429 if ((error = copyin(SCARG_P32(uap, unewset),
430 &lss, sizeof(linux32_sigset_t))) != 0)
431 return error;
432
433 linux32_to_native_sigset(&bss, &lss);
434
435 return sigsuspend1(l, &bss);
436 }
437
438 static int
439 fetchss(const void *u, void *s, size_t len)
440 {
441 int error;
442 linux32_sigset_t lss;
443
444 if ((error = copyin(u, &lss, sizeof(lss))) != 0)
445 return error;
446
447 linux32_to_native_sigset(s, &lss);
448 return 0;
449 }
450
451 static int
452 fetchts(const void *u, void *s, size_t len)
453 {
454 int error;
455 struct linux32_timespec lts;
456
457 if ((error = copyin(u, <s, sizeof(lts))) != 0)
458 return error;
459
460 linux32_to_native_timespec(s, <s);
461 return 0;
462 }
463
464 static int
465 fakestorets(const void *u, void *s, size_t len)
466 {
467 /* Do nothing, sigtimedwait does not alter timeout like ours */
468 return 0;
469 }
470
471 static int
472 storeinfo(const void *s, void *u, size_t len)
473 {
474 linux32_siginfo_t lsi;
475
476
477 native_to_linux32_siginfo(&lsi, &((const siginfo_t *)s)->_info);
478 return copyout(&lsi, u, sizeof(lsi));
479 }
480
481 int
482 linux32_sys_rt_sigtimedwait(struct lwp *l,
483 const struct linux32_sys_rt_sigtimedwait_args *uap, register_t *retval)
484 {
485 /* {
486 syscallarg(const linux32_sigset_t *) set;
487 syscallarg(linux32_siginfo_t *) info);
488 syscallarg(const struct linux32_timespec *) timeout;
489 } */
490 struct sys_____sigtimedwait50_args ap;
491
492 SCARG(&ap, set) = SCARG_P32(uap, set);
493 SCARG(&ap, info) = SCARG_P32(uap, info);
494 SCARG(&ap, timeout) = SCARG_P32(uap, timeout);
495
496 return sigtimedwait1(l, &ap,
497 retval, fetchss, storeinfo, fetchts, fakestorets);
498 }
499
500 int
501 linux32_sys_signal(struct lwp *l, const struct linux32_sys_signal_args *uap, register_t *retval)
502 {
503 /* {
504 syscallarg(int) signum;
505 syscallarg(linux32_handler_t) handler;
506 } */
507 struct sigaction nbsa, obsa;
508 int error, sig;
509
510 *retval = -1;
511
512 sig = SCARG(uap, signum);
513 if (sig < 0 || sig >= LINUX32__NSIG)
514 return EINVAL;
515
516 nbsa.sa_handler = SCARG_P32(uap, handler);
517 sigemptyset(&nbsa.sa_mask);
518 nbsa.sa_flags = SA_RESETHAND | SA_NODEFER;
519
520 if ((error = sigaction1(l, linux32_to_native_signo[sig],
521 &nbsa, &obsa, NULL, 0)) != 0)
522 return error;
523
524 *retval = (int)(long)obsa.sa_handler;
525 return 0;
526 }
527
528 int
529 linux32_sys_rt_sigpending(struct lwp *l, const struct linux32_sys_rt_sigpending_args *uap, register_t *retval)
530 {
531 /* {
532 syscallarg(linux32_sigsetp_t) set;
533 syscallarg(netbsd32_size_t) sigsetsize;
534 } */
535 sigset_t bss;
536 linux32_sigset_t lss;
537
538 if (SCARG(uap, sigsetsize) != sizeof(linux32_sigset_t))
539 return EINVAL;
540
541 sigpending1(l, &bss);
542 native_to_linux32_sigset(&lss, &bss);
543 return copyout(&lss, SCARG_P32(uap, set), sizeof(lss));
544 }
545
546 int
547 linux32_sys_siggetmask(struct lwp *l, const void *v, register_t *retval)
548 {
549 struct proc *p = l->l_proc;
550 sigset_t bss;
551 linux32_old_sigset_t lss;
552 int error;
553
554 mutex_enter(p->p_lock);
555 error = sigprocmask1(l, SIG_SETMASK, 0, &bss);
556 mutex_exit(p->p_lock);
557 if (error)
558 return error;
559 native_to_linux32_old_sigset(&lss, &bss);
560 *retval = lss;
561 return 0;
562 }
563
564 int
565 linux32_sys_sigsetmask(struct lwp *l, const struct linux32_sys_sigsetmask_args *uap, register_t *retval)
566 {
567 /* {
568 syscallarg(linux32_old_sigset_t) mask;
569 } */
570 sigset_t nbss, obss;
571 linux32_old_sigset_t nlss, olss;
572 struct proc *p = l->l_proc;
573 int error;
574
575 nlss = SCARG(uap, mask);
576 linux32_old_to_native_sigset(&nbss, &nlss);
577 mutex_enter(p->p_lock);
578 error = sigprocmask1(l, SIG_SETMASK, &nbss, &obss);
579 mutex_exit(p->p_lock);
580 if (error)
581 return error;
582 native_to_linux32_old_sigset(&olss, &obss);
583 *retval = olss;
584 return 0;
585 }
586
587 int
588 linux32_sys_rt_queueinfo(struct lwp *l, const struct linux32_sys_rt_queueinfo_args *uap, register_t *retval)
589 {
590 /*
591 syscallarg(int) pid;
592 syscallarg(int) sig;
593 syscallarg(linux32_siginfop_t) uinfo;
594 */
595 int error;
596 linux32_siginfo_t info;
597
598 error = copyin(SCARG_P32(uap, uinfo), &info, sizeof(info));
599 if (error)
600 return error;
601 if (info.lsi_code >= 0)
602 return EPERM;
603
604 /* XXX To really implement this we need to */
605 /* XXX keep a list of queued signals somewhere. */
606 return linux32_sys_kill(l, (const void *)uap, retval);
607 }
608
609 int
610 native_to_linux32_si_code(int code)
611 {
612 int si_codes[] = {
613 LINUX32_SI_USER, LINUX32_SI_QUEUE, LINUX32_SI_TIMER,
614 LINUX32_SI_ASYNCIO, LINUX32_SI_MESGQ, LINUX32_SI_TKILL /* SI_LWP */
615 };
616
617 if (code <= 0 && -code < __arraycount(si_codes))
618 return si_codes[-code];
619
620 return code;
621 }
622
623 int
624 native_to_linux32_si_status(int code, int status)
625 {
626 int sts;
627
628 switch (code) {
629 case CLD_CONTINUED:
630 sts = LINUX_SIGCONT;
631 break;
632 case CLD_EXITED:
633 sts = WEXITSTATUS(status);
634 break;
635 case CLD_STOPPED:
636 case CLD_TRAPPED:
637 case CLD_DUMPED:
638 case CLD_KILLED:
639 default:
640 sts = native_to_linux32_signo[WTERMSIG(status)];
641 break;
642 }
643
644 return sts;
645 }
646