proc->thread stage 4: rework the VFS and DEVICE subsystems to take thread
[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.4 2003/06/23 18:12:04 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         struct proc *p = curproc;
263         struct svr4_sigaction *nisa, *oisa, tmpisa;
264         struct sigaction *nbsa, *obsa, tmpbsa;
265         struct sigaction_args sa;
266         caddr_t sg;
267         int error;
268
269         DPRINTF(("@@@ svr4_sys_sigaction(%d, %d, %d)\n", p->p_pid,
270                         SCARG(uap, signum),
271                         SVR4_SVR42BSD_SIG(SCARG(uap, signum))));
272         
273         sg = stackgap_init();
274         nisa = SCARG(uap, nsa);
275         oisa = SCARG(uap, osa);
276
277         if (oisa != NULL)
278                 obsa = stackgap_alloc(&sg, sizeof(struct sigaction));
279         else
280                 obsa = NULL;
281
282         if (nisa != NULL) {
283                 nbsa = stackgap_alloc(&sg, sizeof(struct sigaction));
284                 if ((error = copyin(nisa, &tmpisa, sizeof(tmpisa))) != 0)
285                         return error;
286                 svr4_to_bsd_sigaction(&tmpisa, &tmpbsa);
287                 if ((error = copyout(&tmpbsa, nbsa, sizeof(tmpbsa))) != 0)
288                         return error;
289         } else
290                 nbsa = NULL;
291
292 #if defined(DEBUG_SVR4)
293         {
294                 int i;
295                 for (i = 0; i < 4; i++) 
296                         DPRINTF(("\tssa_mask[%d] = %lx\n", i,
297                                                 nisa->ssa_mask.bits[i]));
298                 DPRINTF(("\tssa_handler = %p\n", nisa->ssa_handler));
299         }
300 #endif
301
302         SCARG(&sa, sig) = SVR4_SVR42BSD_SIG(SCARG(uap, signum));
303         SCARG(&sa, act) = nbsa;
304         SCARG(&sa, oact) = obsa;
305
306         if ((error = sigaction(&sa)) != 0)
307                 return error;
308
309         if (oisa != NULL) {
310                 if ((error = copyin(obsa, &tmpbsa, sizeof(tmpbsa))) != 0)
311                         return error;
312                 bsd_to_svr4_sigaction(&tmpbsa, &tmpisa);
313                 if ((error = copyout(&tmpisa, oisa, sizeof(tmpisa))) != 0)
314                         return error;
315         }
316
317         return 0;
318 }
319
320 int 
321 svr4_sys_sigaltstack(struct svr4_sys_sigaltstack_args *uap)
322 {
323         struct proc *p = curproc;
324         struct svr4_sigaltstack *nsss, *osss, tmpsss;
325         struct sigaltstack *nbss, *obss, tmpbss;
326         struct sigaltstack_args sa;
327         caddr_t sg;
328         int error, *retval;
329
330         retval = p->p_retval;
331         sg = stackgap_init();
332         nsss = SCARG(uap, nss);
333         osss = SCARG(uap, oss);
334
335         if (osss != NULL)
336                 obss = stackgap_alloc(&sg, sizeof(struct sigaltstack));
337         else
338                 obss = NULL;
339
340         if (nsss != NULL) {
341                 nbss = stackgap_alloc(&sg, sizeof(struct sigaltstack));
342                 if ((error = copyin(nsss, &tmpsss, sizeof(tmpsss))) != 0)
343                         return error;
344                 svr4_to_bsd_sigaltstack(&tmpsss, &tmpbss);
345                 if ((error = copyout(&tmpbss, nbss, sizeof(tmpbss))) != 0)
346                         return error;
347         } else
348                 nbss = NULL;
349
350         SCARG(&sa, ss) = nbss;
351         SCARG(&sa, oss) = obss;
352
353         if ((error = sigaltstack(&sa)) != 0)
354                 return error;
355
356         if (obss != NULL) {
357                 if ((error = copyin(obss, &tmpbss, sizeof(tmpbss))) != 0)
358                         return error;
359                 bsd_to_svr4_sigaltstack(&tmpbss, &tmpsss);
360                 if ((error = copyout(&tmpsss, osss, sizeof(tmpsss))) != 0)
361                         return error;
362         }
363
364         return 0;
365 }
366
367 /*
368  * Stolen from the ibcs2 one
369  */
370 int
371 svr4_sys_signal(struct svr4_sys_signal_args *uap)
372 {
373         struct proc *p = curproc;
374         int signum;
375         int error, *retval = p->p_retval;
376         caddr_t sg = stackgap_init();
377
378         DPRINTF(("@@@ svr4_sys_signal(%d)\n", p->p_pid));
379
380         signum = SVR4_SVR42BSD_SIG(SVR4_SIGNO(SCARG(uap, signum)));
381         if (signum <= 0 || signum > SVR4_NSIG)
382                 return (EINVAL);
383
384         switch (SVR4_SIGCALL(SCARG(uap, signum))) {
385         case SVR4_SIGDEFER_MASK:
386                 if (SCARG(uap, handler) == SVR4_SIG_HOLD)
387                         goto sighold;
388                 /* FALLTHROUGH */
389
390         case SVR4_SIGNAL_MASK:
391                 {
392                         struct sigaction_args sa_args;
393                         struct sigaction *nbsa, *obsa, sa;
394
395                         nbsa = stackgap_alloc(&sg, sizeof(struct sigaction));
396                         obsa = stackgap_alloc(&sg, sizeof(struct sigaction));
397                         SCARG(&sa_args, sig) = signum;
398                         SCARG(&sa_args, act) = nbsa;
399                         SCARG(&sa_args, oact) = obsa;
400
401                         sa.sa_handler = (sig_t) SCARG(uap, handler);
402                         SIGEMPTYSET(sa.sa_mask);
403                         sa.sa_flags = 0;
404
405                         if (signum != SIGALRM)
406                                 sa.sa_flags = SA_RESTART;
407
408                         if ((error = copyout(&sa, nbsa, sizeof(sa))) != 0)
409                                 return error;
410                         if ((error = sigaction(&sa_args)) != 0) {
411                                 DPRINTF(("signal: sigaction failed: %d\n",
412                                          error));
413                                 *retval = (int)SVR4_SIG_ERR;
414                                 return error;
415                         }
416                         if ((error = copyin(obsa, &sa, sizeof(sa))) != 0)
417                                 return error;
418                         *retval = (int)sa.sa_handler;
419                         return 0;
420                 }
421
422         case SVR4_SIGHOLD_MASK:
423 sighold:
424                 {
425                         struct sigprocmask_args sa;
426                         sigset_t *set;
427
428                         set = stackgap_alloc(&sg, sizeof(sigset_t));
429                         SIGEMPTYSET(*set);
430                         SIGADDSET(*set, signum);
431                         SCARG(&sa, how) = SIG_BLOCK;
432                         SCARG(&sa, set) = set;
433                         SCARG(&sa, oset) = NULL;
434                         return sigprocmask(&sa);
435                 }
436
437         case SVR4_SIGRELSE_MASK:
438                 {
439                         struct sigprocmask_args sa;
440                         sigset_t *set;
441
442                         set = stackgap_alloc(&sg, sizeof(sigset_t));
443                         SIGEMPTYSET(*set);
444                         SIGADDSET(*set, signum);
445                         SCARG(&sa, how) = SIG_UNBLOCK;
446                         SCARG(&sa, set) = set;
447                         SCARG(&sa, oset) = NULL;
448                         return sigprocmask(&sa);
449                 }
450
451         case SVR4_SIGIGNORE_MASK:
452                 {
453                         struct sigaction_args sa_args;
454                         struct sigaction *bsa, sa;
455
456                         bsa = stackgap_alloc(&sg, sizeof(struct sigaction));
457                         SCARG(&sa_args, sig) = signum;
458                         SCARG(&sa_args, act) = bsa;
459                         SCARG(&sa_args, oact) = NULL;
460
461                         sa.sa_handler = SIG_IGN;
462                         SIGEMPTYSET(sa.sa_mask);
463                         sa.sa_flags = 0;
464                         if ((error = copyout(&sa, bsa, sizeof(sa))) != 0)
465                                 return error;
466                         if ((error = sigaction(&sa_args)) != 0) {
467                                 DPRINTF(("sigignore: sigaction failed\n"));
468                                 return error;
469                         }
470                         return 0;
471                 }
472
473         case SVR4_SIGPAUSE_MASK:
474                 {
475                         struct sigsuspend_args sa;
476                         sigset_t *set;
477
478                         set = stackgap_alloc(&sg, sizeof(sigset_t));
479                         *set = p->p_sigmask;
480                         SIGDELSET(*set, signum);
481                         SCARG(&sa, sigmask) = set;
482                         return sigsuspend(&sa);
483                 }
484
485         default:
486                 return (ENOSYS);
487         }
488 }
489
490
491 int
492 svr4_sys_sigprocmask(struct svr4_sys_sigprocmask_args *uap)
493 {
494         struct proc *p = curproc;
495         svr4_sigset_t sss;
496         sigset_t bss;
497         int error = 0, *retval;
498
499         retval = p->p_retval;
500         if (SCARG(uap, oset) != NULL) {
501                 /* Fix the return value first if needed */
502                 bsd_to_svr4_sigset(&p->p_sigmask, &sss);
503                 if ((error = copyout(&sss, SCARG(uap, oset), sizeof(sss))) != 0)
504                         return error;
505         }
506
507         if (SCARG(uap, set) == NULL)
508                 /* Just examine */
509                 return 0;
510
511         if ((error = copyin(SCARG(uap, set), &sss, sizeof(sss))) != 0)
512                 return error;
513
514         svr4_to_bsd_sigset(&sss, &bss);
515
516         (void) splhigh();
517
518         switch (SCARG(uap, how)) {
519         case SVR4_SIG_BLOCK:
520                 SIGSETOR(p->p_sigmask, bss);
521                 SIG_CANTMASK(p->p_sigmask);
522                 break;
523
524         case SVR4_SIG_UNBLOCK:
525                 SIGSETNAND(p->p_sigmask, bss);
526                 break;
527
528         case SVR4_SIG_SETMASK:
529                 p->p_sigmask = bss;
530                 SIG_CANTMASK(p->p_sigmask);
531                 break;
532
533         default:
534                 error = EINVAL;
535                 break;
536         }
537
538         (void) spl0();
539
540         return error;
541 }
542
543 int
544 svr4_sys_sigpending(struct svr4_sys_sigpending_args *uap)
545 {
546         struct proc *p = curproc;
547         sigset_t bss;
548         int *retval;
549         svr4_sigset_t sss;
550
551         DPRINTF(("@@@ svr4_sys_sigpending(%d)\n", p->p_pid));
552         retval = p->p_retval;
553         switch (SCARG(uap, what)) {
554         case 1: /* sigpending */
555                 if (SCARG(uap, mask) == NULL)
556                         return 0;
557                 bss = p->p_siglist;
558                 SIGSETAND(bss, p->p_sigmask);
559                 bsd_to_svr4_sigset(&bss, &sss);
560                 break;
561
562         case 2: /* sigfillset */
563                 svr4_sigfillset(&sss);
564 #if defined(DEBUG_SVR4)
565                 {
566                         int i;
567                         for (i = 0; i < 4; i++)
568                                 DPRINTF(("new sigset[%d] = %lx\n", i, (long)sss.bits[i]));
569                 }
570 #endif
571                 break;
572
573         default:
574                 return EINVAL;
575         }
576                 
577         return copyout(&sss, SCARG(uap, mask), sizeof(sss));
578 }
579
580 int
581 svr4_sys_sigsuspend(struct svr4_sys_sigsuspend_args *uap)
582 {
583         svr4_sigset_t sss;
584         sigset_t *bss;
585         struct sigsuspend_args sa;
586         int error;
587         caddr_t sg = stackgap_init();
588
589         if ((error = copyin(SCARG(uap, ss), &sss, sizeof(sss))) != 0)
590                 return error;
591
592         bss = stackgap_alloc(&sg, sizeof(sigset_t));
593         svr4_to_bsd_sigset(&sss, bss);
594
595         SCARG(&sa, sigmask) = bss;
596         return sigsuspend(&sa);
597 }
598
599
600 int
601 svr4_sys_kill(struct svr4_sys_kill_args *uap)
602 {
603         struct kill_args ka;
604
605         SCARG(&ka, pid) = SCARG(uap, pid);
606         SCARG(&ka, signum) = SVR4_SVR42BSD_SIG(SCARG(uap, signum));
607         return kill(&ka);
608 }
609
610
611 int 
612 svr4_sys_context(struct svr4_sys_context_args *uap)
613 {
614         struct proc *p = curproc;
615         struct svr4_ucontext uc;
616         int error;
617
618         switch (uap->func) {
619         case 0:
620                 DPRINTF(("getcontext(%p)\n", uap->uc));
621                 svr4_getcontext(p, &uc, &p->p_sigmask,
622                     p->p_sigstk.ss_flags & SS_ONSTACK);
623                 return copyout(&uc, uap->uc, sizeof(uc));
624
625         case 1: 
626                 DPRINTF(("setcontext(%p)\n", uap->uc));
627                 if ((error = copyin(uap->uc, &uc, sizeof(uc))) != 0)
628                         return error;
629                 DPRINTF(("uc_flags = %lx\n", uc.uc_flags));
630 #if defined(DEBUG_SVR4)
631                 {
632                         int i;
633                         for (i = 0; i < 4; i++)
634                                 DPRINTF(("uc_sigmask[%d] = %lx\n", i,
635                                                         uc.uc_sigmask.bits[i]));
636                 }
637 #endif
638                 return svr4_setcontext(p, &uc);
639
640         default:
641                 DPRINTF(("context(%d, %p)\n", uap->func,
642                     uap->uc));
643                 return ENOSYS;
644         }
645         return 0;
646 }
647
648 int
649 svr4_sys_pause(struct svr4_sys_pause_args *uap)
650 {
651         struct proc *p = curproc;
652         struct sigsuspend_args bsa;
653
654         SCARG(&bsa, sigmask) = &p->p_sigmask;
655         return sigsuspend(&bsa);
656 }