Collapse gd_astpending and gd_reqpri together into gd_reqflags. gd_reqflags
[dragonfly.git] / sys / emulation / svr4 / svr4_signal.c
1 /*
2  * Copyright (c) 1998 Mark Newton
3  * Copyright (c) 1994 Christos Zoulas
4  * 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. The name of the author may not be used to endorse or promote products
15  *    derived from this software without specific prior written permission
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27  * 
28  * $FreeBSD: src/sys/svr4/svr4_signal.c,v 1.9 2000/01/15 15:38:17 newton Exp $
29  * $DragonFly: src/sys/emulation/svr4/Attic/svr4_signal.c,v 1.5 2003/06/25 05:22:33 dillon Exp $
30  */
31
32 #include <sys/param.h>
33 #include <sys/systm.h>
34 #include <sys/proc.h>
35 #include <sys/filedesc.h>
36 #include <sys/signal.h>
37 #include <sys/signalvar.h>
38 #include <sys/sysproto.h>
39
40 #include <svr4/svr4.h>
41 #include <svr4/svr4_types.h>
42 #include <svr4/svr4_signal.h>
43 #include <svr4/svr4_proto.h>
44 #include <svr4/svr4_util.h>
45 #include <svr4/svr4_ucontext.h>
46
47 #define svr4_sigmask(n)         (1 << (((n) - 1) & 31))
48 #define svr4_sigword(n)         (((n) - 1) >> 5)
49 #define svr4_sigemptyset(s)     memset((s), 0, sizeof(*(s)))
50 #define svr4_sigismember(s, n)  ((s)->bits[svr4_sigword(n)] & svr4_sigmask(n))
51 #define svr4_sigaddset(s, n)    ((s)->bits[svr4_sigword(n)] |= svr4_sigmask(n))
52
53 void svr4_to_bsd_sigaction __P((const struct svr4_sigaction *,
54                                 struct sigaction *));
55 void bsd_to_svr4_sigaction __P((const struct sigaction *,
56                                 struct svr4_sigaction *));
57 void svr4_sigfillset __P((svr4_sigset_t *));
58
59 int bsd_to_svr4_sig[SVR4_SIGTBLSZ] = {
60         SVR4_SIGHUP,
61         SVR4_SIGINT,
62         SVR4_SIGQUIT,
63         SVR4_SIGILL,
64         SVR4_SIGTRAP,
65         SVR4_SIGABRT,
66         SVR4_SIGEMT,
67         SVR4_SIGFPE,
68         SVR4_SIGKILL,
69         SVR4_SIGBUS,
70         SVR4_SIGSEGV,
71         SVR4_SIGSYS,
72         SVR4_SIGPIPE,
73         SVR4_SIGALRM,
74         SVR4_SIGTERM,
75         SVR4_SIGURG,
76         SVR4_SIGSTOP,
77         SVR4_SIGTSTP,
78         SVR4_SIGCONT,
79         SVR4_SIGCHLD,
80         SVR4_SIGTTIN,
81         SVR4_SIGTTOU,
82         SVR4_SIGIO,
83         SVR4_SIGXCPU,
84         SVR4_SIGXFSZ,
85         SVR4_SIGVTALRM,
86         SVR4_SIGPROF,
87         SVR4_SIGWINCH,
88         0,                      /* SIGINFO */
89         SVR4_SIGUSR1,
90         SVR4_SIGUSR2,
91 };
92
93 int svr4_to_bsd_sig[SVR4_SIGTBLSZ] = {
94         SIGHUP,
95         SIGINT,
96         SIGQUIT,
97         SIGILL,
98         SIGTRAP,
99         SIGABRT,
100         SIGEMT,
101         SIGFPE,
102         SIGKILL,
103         SIGBUS,
104         SIGSEGV,
105         SIGSYS,
106         SIGPIPE,
107         SIGALRM,
108         SIGTERM,
109         SIGUSR1,
110         SIGUSR2,
111         SIGCHLD,
112         0,              /* XXX NetBSD uses SIGPWR here, but we don't seem to have one */
113         SIGWINCH,
114         SIGURG,
115         SIGIO,
116         SIGSTOP,
117         SIGTSTP,
118         SIGCONT,
119         SIGTTIN,
120         SIGTTOU,
121         SIGVTALRM,
122         SIGPROF,
123         SIGXCPU,
124         SIGXFSZ,
125 };
126
127 void
128 svr4_sigfillset(s)
129         svr4_sigset_t *s;
130 {
131         int i;
132
133         svr4_sigemptyset(s);
134         for (i = 0; i < SVR4_NSIG; i++) 
135                 if (svr4_to_bsd_sig[i] != 0)
136                         svr4_sigaddset(s, i);
137 }
138
139 void
140 svr4_to_bsd_sigset(sss, bss)
141         const svr4_sigset_t *sss;
142         sigset_t *bss;
143 {
144         int i, newsig;
145
146         SIGEMPTYSET(*bss);
147         for (i = 0; i < SVR4_NSIG; i++)
148                 if (svr4_sigismember(sss, i + 1)) {
149                         newsig = svr4_to_bsd_sig[i];
150                         if (newsig)
151                                 SIGADDSET(*bss, newsig);
152                 }
153 }
154
155 void
156 bsd_to_svr4_sigset(bss, sss)
157         const sigset_t *bss;
158         svr4_sigset_t *sss;
159 {
160         int i, newsig;
161
162         svr4_sigemptyset(sss);
163         sss->bits[0] = bss->__bits[0] & ~((1U << SVR4_SIGTBLSZ) - 1);
164         sss->bits[1] = bss->__bits[1];
165         sss->bits[2] = bss->__bits[2];
166         sss->bits[3] = bss->__bits[3];
167         for (i = 1; i <= SVR4_SIGTBLSZ; i++) {
168                 if (SIGISMEMBER(*bss, i)) {
169                         newsig = bsd_to_svr4_sig[_SIG_IDX(i)];
170                         if (newsig)
171                                 svr4_sigaddset(sss, newsig);
172                 }
173         }
174 }
175
176 /*
177  * XXX: Only a subset of the flags is currently implemented.
178  */
179 void
180 svr4_to_bsd_sigaction(ssa, bsa)
181         const struct svr4_sigaction *ssa;
182         struct sigaction *bsa;
183 {
184
185         bsa->sa_handler = (sig_t) ssa->ssa_handler;
186         svr4_to_bsd_sigset(&ssa->ssa_mask, &bsa->sa_mask);
187         bsa->sa_flags = 0;
188         if ((ssa->ssa_flags & SVR4_SA_ONSTACK) != 0)
189                 bsa->sa_flags |= SA_ONSTACK;
190         if ((ssa->ssa_flags & SVR4_SA_RESETHAND) != 0)
191                 bsa->sa_flags |= SA_RESETHAND;
192         if ((ssa->ssa_flags & SVR4_SA_RESTART) != 0)
193                 bsa->sa_flags |= SA_RESTART;
194         if ((ssa->ssa_flags & SVR4_SA_SIGINFO) != 0)
195                 DPRINTF(("svr4_to_bsd_sigaction: SA_SIGINFO ignored\n"));
196         if ((ssa->ssa_flags & SVR4_SA_NOCLDSTOP) != 0)
197                 bsa->sa_flags |= SA_NOCLDSTOP;
198         if ((ssa->ssa_flags & SVR4_SA_NODEFER) != 0)
199                 bsa->sa_flags |= SA_NODEFER;
200         if ((ssa->ssa_flags & SVR4_SA_NOCLDWAIT) != 0)
201                 bsa->sa_flags |= SA_NOCLDWAIT;
202         if ((ssa->ssa_flags & ~SVR4_SA_ALLBITS) != 0)
203                 DPRINTF(("svr4_to_bsd_sigaction: extra bits ignored\n"));
204 }
205
206 void
207 bsd_to_svr4_sigaction(bsa, ssa)
208         const struct sigaction *bsa;
209         struct svr4_sigaction *ssa;
210 {
211
212         ssa->ssa_handler = (svr4_sig_t) bsa->sa_handler;
213         bsd_to_svr4_sigset(&bsa->sa_mask, &ssa->ssa_mask);
214         ssa->ssa_flags = 0;
215         if ((bsa->sa_flags & SA_ONSTACK) != 0)
216                 ssa->ssa_flags |= SVR4_SA_ONSTACK;
217         if ((bsa->sa_flags & SA_RESETHAND) != 0)
218                 ssa->ssa_flags |= SVR4_SA_RESETHAND;
219         if ((bsa->sa_flags & SA_RESTART) != 0)
220                 ssa->ssa_flags |= SVR4_SA_RESTART;
221         if ((bsa->sa_flags & SA_NODEFER) != 0)
222                 ssa->ssa_flags |= SVR4_SA_NODEFER;
223         if ((bsa->sa_flags & SA_NOCLDSTOP) != 0)
224                 ssa->ssa_flags |= SVR4_SA_NOCLDSTOP;
225 }
226
227 void
228 svr4_to_bsd_sigaltstack(sss, bss)
229         const struct svr4_sigaltstack *sss;
230         struct sigaltstack *bss;
231 {
232
233         bss->ss_sp = sss->ss_sp;
234         bss->ss_size = sss->ss_size;
235         bss->ss_flags = 0;
236         if ((sss->ss_flags & SVR4_SS_DISABLE) != 0)
237                 bss->ss_flags |= SS_DISABLE;
238         if ((sss->ss_flags & SVR4_SS_ONSTACK) != 0)
239                 bss->ss_flags |= SS_ONSTACK;
240         if ((sss->ss_flags & ~SVR4_SS_ALLBITS) != 0)
241           /*XXX*/ uprintf("svr4_to_bsd_sigaltstack: extra bits ignored\n");
242 }
243
244 void
245 bsd_to_svr4_sigaltstack(bss, sss)
246         const struct sigaltstack *bss;
247         struct svr4_sigaltstack *sss;
248 {
249
250         sss->ss_sp = bss->ss_sp;
251         sss->ss_size = bss->ss_size;
252         sss->ss_flags = 0;
253         if ((bss->ss_flags & SS_DISABLE) != 0)
254                 sss->ss_flags |= SVR4_SS_DISABLE;
255         if ((bss->ss_flags & SS_ONSTACK) != 0)
256                 sss->ss_flags |= SVR4_SS_ONSTACK;
257 }
258
259 int
260 svr4_sys_sigaction(struct svr4_sys_sigaction_args *uap)
261 {
262 #if defined(DEBUG_SVR4)
263         struct proc *p = curproc;
264 #endif
265         struct svr4_sigaction *nisa, *oisa, tmpisa;
266         struct sigaction *nbsa, *obsa, tmpbsa;
267         struct sigaction_args sa;
268         caddr_t sg;
269         int error;
270
271         DPRINTF(("@@@ svr4_sys_sigaction(%d, %d, %d)\n", p->p_pid,
272                         SCARG(uap, signum),
273                         SVR4_SVR42BSD_SIG(SCARG(uap, signum))));
274         
275         sg = stackgap_init();
276         nisa = SCARG(uap, nsa);
277         oisa = SCARG(uap, osa);
278
279         if (oisa != NULL)
280                 obsa = stackgap_alloc(&sg, sizeof(struct sigaction));
281         else
282                 obsa = NULL;
283
284         if (nisa != NULL) {
285                 nbsa = stackgap_alloc(&sg, sizeof(struct sigaction));
286                 if ((error = copyin(nisa, &tmpisa, sizeof(tmpisa))) != 0)
287                         return error;
288                 svr4_to_bsd_sigaction(&tmpisa, &tmpbsa);
289                 if ((error = copyout(&tmpbsa, nbsa, sizeof(tmpbsa))) != 0)
290                         return error;
291         } else
292                 nbsa = NULL;
293
294 #if defined(DEBUG_SVR4)
295         {
296                 int i;
297                 for (i = 0; i < 4; i++) 
298                         DPRINTF(("\tssa_mask[%d] = %lx\n", i,
299                                                 nisa->ssa_mask.bits[i]));
300                 DPRINTF(("\tssa_handler = %p\n", nisa->ssa_handler));
301         }
302 #endif
303
304         SCARG(&sa, sig) = SVR4_SVR42BSD_SIG(SCARG(uap, signum));
305         SCARG(&sa, act) = nbsa;
306         SCARG(&sa, oact) = obsa;
307
308         if ((error = sigaction(&sa)) != 0)
309                 return error;
310
311         if (oisa != NULL) {
312                 if ((error = copyin(obsa, &tmpbsa, sizeof(tmpbsa))) != 0)
313                         return error;
314                 bsd_to_svr4_sigaction(&tmpbsa, &tmpisa);
315                 if ((error = copyout(&tmpisa, oisa, sizeof(tmpisa))) != 0)
316                         return error;
317         }
318
319         return 0;
320 }
321
322 int 
323 svr4_sys_sigaltstack(struct svr4_sys_sigaltstack_args *uap)
324 {
325         struct proc *p = curproc;
326         struct svr4_sigaltstack *nsss, *osss, tmpsss;
327         struct sigaltstack *nbss, *obss, tmpbss;
328         struct sigaltstack_args sa;
329         caddr_t sg;
330         int error, *retval;
331
332         retval = p->p_retval;
333         sg = stackgap_init();
334         nsss = SCARG(uap, nss);
335         osss = SCARG(uap, oss);
336
337         if (osss != NULL)
338                 obss = stackgap_alloc(&sg, sizeof(struct sigaltstack));
339         else
340                 obss = NULL;
341
342         if (nsss != NULL) {
343                 nbss = stackgap_alloc(&sg, sizeof(struct sigaltstack));
344                 if ((error = copyin(nsss, &tmpsss, sizeof(tmpsss))) != 0)
345                         return error;
346                 svr4_to_bsd_sigaltstack(&tmpsss, &tmpbss);
347                 if ((error = copyout(&tmpbss, nbss, sizeof(tmpbss))) != 0)
348                         return error;
349         } else
350                 nbss = NULL;
351
352         SCARG(&sa, ss) = nbss;
353         SCARG(&sa, oss) = obss;
354
355         if ((error = sigaltstack(&sa)) != 0)
356                 return error;
357
358         if (obss != NULL) {
359                 if ((error = copyin(obss, &tmpbss, sizeof(tmpbss))) != 0)
360                         return error;
361                 bsd_to_svr4_sigaltstack(&tmpbss, &tmpsss);
362                 if ((error = copyout(&tmpsss, osss, sizeof(tmpsss))) != 0)
363                         return error;
364         }
365
366         return 0;
367 }
368
369 /*
370  * Stolen from the ibcs2 one
371  */
372 int
373 svr4_sys_signal(struct svr4_sys_signal_args *uap)
374 {
375         struct proc *p = curproc;
376         int signum;
377         int error, *retval = p->p_retval;
378         caddr_t sg = stackgap_init();
379
380         DPRINTF(("@@@ svr4_sys_signal(%d)\n", p->p_pid));
381
382         signum = SVR4_SVR42BSD_SIG(SVR4_SIGNO(SCARG(uap, signum)));
383         if (signum <= 0 || signum > SVR4_NSIG)
384                 return (EINVAL);
385
386         switch (SVR4_SIGCALL(SCARG(uap, signum))) {
387         case SVR4_SIGDEFER_MASK:
388                 if (SCARG(uap, handler) == SVR4_SIG_HOLD)
389                         goto sighold;
390                 /* FALLTHROUGH */
391
392         case SVR4_SIGNAL_MASK:
393                 {
394                         struct sigaction_args sa_args;
395                         struct sigaction *nbsa, *obsa, sa;
396
397                         nbsa = stackgap_alloc(&sg, sizeof(struct sigaction));
398                         obsa = stackgap_alloc(&sg, sizeof(struct sigaction));
399                         SCARG(&sa_args, sig) = signum;
400                         SCARG(&sa_args, act) = nbsa;
401                         SCARG(&sa_args, oact) = obsa;
402
403                         sa.sa_handler = (sig_t) SCARG(uap, handler);
404                         SIGEMPTYSET(sa.sa_mask);
405                         sa.sa_flags = 0;
406
407                         if (signum != SIGALRM)
408                                 sa.sa_flags = SA_RESTART;
409
410                         if ((error = copyout(&sa, nbsa, sizeof(sa))) != 0)
411                                 return error;
412                         if ((error = sigaction(&sa_args)) != 0) {
413                                 DPRINTF(("signal: sigaction failed: %d\n",
414                                          error));
415                                 *retval = (int)SVR4_SIG_ERR;
416                                 return error;
417                         }
418                         if ((error = copyin(obsa, &sa, sizeof(sa))) != 0)
419                                 return error;
420                         *retval = (int)sa.sa_handler;
421                         return 0;
422                 }
423
424         case SVR4_SIGHOLD_MASK:
425 sighold:
426                 {
427                         struct sigprocmask_args sa;
428                         sigset_t *set;
429
430                         set = stackgap_alloc(&sg, sizeof(sigset_t));
431                         SIGEMPTYSET(*set);
432                         SIGADDSET(*set, signum);
433                         SCARG(&sa, how) = SIG_BLOCK;
434                         SCARG(&sa, set) = set;
435                         SCARG(&sa, oset) = NULL;
436                         return sigprocmask(&sa);
437                 }
438
439         case SVR4_SIGRELSE_MASK:
440                 {
441                         struct sigprocmask_args sa;
442                         sigset_t *set;
443
444                         set = stackgap_alloc(&sg, sizeof(sigset_t));
445                         SIGEMPTYSET(*set);
446                         SIGADDSET(*set, signum);
447                         SCARG(&sa, how) = SIG_UNBLOCK;
448                         SCARG(&sa, set) = set;
449                         SCARG(&sa, oset) = NULL;
450                         return sigprocmask(&sa);
451                 }
452
453         case SVR4_SIGIGNORE_MASK:
454                 {
455                         struct sigaction_args sa_args;
456                         struct sigaction *bsa, sa;
457
458                         bsa = stackgap_alloc(&sg, sizeof(struct sigaction));
459                         SCARG(&sa_args, sig) = signum;
460                         SCARG(&sa_args, act) = bsa;
461                         SCARG(&sa_args, oact) = NULL;
462
463                         sa.sa_handler = SIG_IGN;
464                         SIGEMPTYSET(sa.sa_mask);
465                         sa.sa_flags = 0;
466                         if ((error = copyout(&sa, bsa, sizeof(sa))) != 0)
467                                 return error;
468                         if ((error = sigaction(&sa_args)) != 0) {
469                                 DPRINTF(("sigignore: sigaction failed\n"));
470                                 return error;
471                         }
472                         return 0;
473                 }
474
475         case SVR4_SIGPAUSE_MASK:
476                 {
477                         struct sigsuspend_args sa;
478                         sigset_t *set;
479
480                         set = stackgap_alloc(&sg, sizeof(sigset_t));
481                         *set = p->p_sigmask;
482                         SIGDELSET(*set, signum);
483                         SCARG(&sa, sigmask) = set;
484                         return sigsuspend(&sa);
485                 }
486
487         default:
488                 return (ENOSYS);
489         }
490 }
491
492
493 int
494 svr4_sys_sigprocmask(struct svr4_sys_sigprocmask_args *uap)
495 {
496         struct proc *p = curproc;
497         svr4_sigset_t sss;
498         sigset_t bss;
499         int error = 0, *retval;
500
501         retval = p->p_retval;
502         if (SCARG(uap, oset) != NULL) {
503                 /* Fix the return value first if needed */
504                 bsd_to_svr4_sigset(&p->p_sigmask, &sss);
505                 if ((error = copyout(&sss, SCARG(uap, oset), sizeof(sss))) != 0)
506                         return error;
507         }
508
509         if (SCARG(uap, set) == NULL)
510                 /* Just examine */
511                 return 0;
512
513         if ((error = copyin(SCARG(uap, set), &sss, sizeof(sss))) != 0)
514                 return error;
515
516         svr4_to_bsd_sigset(&sss, &bss);
517
518         (void) splhigh();
519
520         switch (SCARG(uap, how)) {
521         case SVR4_SIG_BLOCK:
522                 SIGSETOR(p->p_sigmask, bss);
523                 SIG_CANTMASK(p->p_sigmask);
524                 break;
525
526         case SVR4_SIG_UNBLOCK:
527                 SIGSETNAND(p->p_sigmask, bss);
528                 break;
529
530         case SVR4_SIG_SETMASK:
531                 p->p_sigmask = bss;
532                 SIG_CANTMASK(p->p_sigmask);
533                 break;
534
535         default:
536                 error = EINVAL;
537                 break;
538         }
539
540         (void) spl0();
541
542         return error;
543 }
544
545 int
546 svr4_sys_sigpending(struct svr4_sys_sigpending_args *uap)
547 {
548         struct proc *p = curproc;
549         sigset_t bss;
550         int *retval;
551         svr4_sigset_t sss;
552
553         DPRINTF(("@@@ svr4_sys_sigpending(%d)\n", p->p_pid));
554         retval = p->p_retval;
555         switch (SCARG(uap, what)) {
556         case 1: /* sigpending */
557                 if (SCARG(uap, mask) == NULL)
558                         return 0;
559                 bss = p->p_siglist;
560                 SIGSETAND(bss, p->p_sigmask);
561                 bsd_to_svr4_sigset(&bss, &sss);
562                 break;
563
564         case 2: /* sigfillset */
565                 svr4_sigfillset(&sss);
566 #if defined(DEBUG_SVR4)
567                 {
568                         int i;
569                         for (i = 0; i < 4; i++)
570                                 DPRINTF(("new sigset[%d] = %lx\n", i, (long)sss.bits[i]));
571                 }
572 #endif
573                 break;
574
575         default:
576                 return EINVAL;
577         }
578                 
579         return copyout(&sss, SCARG(uap, mask), sizeof(sss));
580 }
581
582 int
583 svr4_sys_sigsuspend(struct svr4_sys_sigsuspend_args *uap)
584 {
585         svr4_sigset_t sss;
586         sigset_t *bss;
587         struct sigsuspend_args sa;
588         int error;
589         caddr_t sg = stackgap_init();
590
591         if ((error = copyin(SCARG(uap, ss), &sss, sizeof(sss))) != 0)
592                 return error;
593
594         bss = stackgap_alloc(&sg, sizeof(sigset_t));
595         svr4_to_bsd_sigset(&sss, bss);
596
597         SCARG(&sa, sigmask) = bss;
598         return sigsuspend(&sa);
599 }
600
601
602 int
603 svr4_sys_kill(struct svr4_sys_kill_args *uap)
604 {
605         struct kill_args ka;
606
607         SCARG(&ka, pid) = SCARG(uap, pid);
608         SCARG(&ka, signum) = SVR4_SVR42BSD_SIG(SCARG(uap, signum));
609         return kill(&ka);
610 }
611
612
613 int 
614 svr4_sys_context(struct svr4_sys_context_args *uap)
615 {
616         struct proc *p = curproc;
617         struct svr4_ucontext uc;
618         int error;
619
620         switch (uap->func) {
621         case 0:
622                 DPRINTF(("getcontext(%p)\n", uap->uc));
623                 svr4_getcontext(p, &uc, &p->p_sigmask,
624                     p->p_sigstk.ss_flags & SS_ONSTACK);
625                 return copyout(&uc, uap->uc, sizeof(uc));
626
627         case 1: 
628                 DPRINTF(("setcontext(%p)\n", uap->uc));
629                 if ((error = copyin(uap->uc, &uc, sizeof(uc))) != 0)
630                         return error;
631                 DPRINTF(("uc_flags = %lx\n", uc.uc_flags));
632 #if defined(DEBUG_SVR4)
633                 {
634                         int i;
635                         for (i = 0; i < 4; i++)
636                                 DPRINTF(("uc_sigmask[%d] = %lx\n", i,
637                                                         uc.uc_sigmask.bits[i]));
638                 }
639 #endif
640                 return svr4_setcontext(p, &uc);
641
642         default:
643                 DPRINTF(("context(%d, %p)\n", uap->func,
644                     uap->uc));
645                 return ENOSYS;
646         }
647         return 0;
648 }
649
650 int
651 svr4_sys_pause(struct svr4_sys_pause_args *uap)
652 {
653         struct proc *p = curproc;
654         struct sigsuspend_args bsa;
655
656         SCARG(&bsa, sigmask) = &p->p_sigmask;
657         return sigsuspend(&bsa);
658 }