Merge branch 'vendor/LESS'
[dragonfly.git] / sys / emulation / 43bsd / 43bsd_signal.c
1 /*
2  * 43BSD_SIGNAL.C       - 4.3BSD compatibility signal syscalls
3  *
4  * Copyright (c) 1989, 1993
5  *      The Regents of the University of California.  All rights reserved.
6  * (c) UNIX System Laboratories, Inc.
7  * All or some portions of this file are derived from material licensed
8  * to the University of California by American Telephone and Telegraph
9  * Co. or Unix System Laboratories, Inc. and are reproduced herein with
10  * the permission of UNIX System Laboratories, Inc.
11  *
12  * Redistribution and use in source and binary forms, with or without
13  * modification, are permitted provided that the following conditions
14  * are met:
15  * 1. Redistributions of source code must retain the above copyright
16  *    notice, this list of conditions and the following disclaimer.
17  * 2. Redistributions in binary form must reproduce the above copyright
18  *    notice, this list of conditions and the following disclaimer in the
19  *    documentation and/or other materials provided with the distribution.
20  * 3. All advertising materials mentioning features or use of this software
21  *    must display the following acknowledgement:
22  *      This product includes software developed by the University of
23  *      California, Berkeley and its contributors.
24  * 4. Neither the name of the University nor the names of its contributors
25  *    may be used to endorse or promote products derived from this software
26  *    without specific prior written permission.
27  *
28  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
29  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
30  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
31  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
32  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
33  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
34  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
35  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
36  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
37  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
38  * SUCH DAMAGE.
39  *
40  * $DragonFly: src/sys/emulation/43bsd/43bsd_signal.c,v 1.5 2007/03/12 21:07:42 corecode Exp $
41  *      from: DragonFly kern/kern_sig.c,v 1.22
42  *
43  * These syscalls used to live in kern/kern_sig.c.  They are modified
44  * to use the new split syscalls.
45  */
46
47 #include "opt_compat.h"
48
49 #include <sys/param.h>
50 #include <sys/systm.h>
51 #include <sys/sysproto.h>
52 #include <sys/conf.h>
53 #include <sys/kernel.h>
54 #include <sys/kern_syscall.h>
55 #include <sys/proc.h>
56 #include <sys/signal.h>
57 #include <sys/signalvar.h>
58 #include <sys/thread2.h>
59
60 #define ONSIG   32              /* NSIG for osig* syscalls.  XXX. */
61
62 #define SIG2OSIG(sig, osig)     osig = (sig).__bits[0]
63 #define OSIG2SIG(osig, sig)     SIGEMPTYSET(sig); (sig).__bits[0] = osig
64
65 #define SIGSETLO(set1, set2)    ((set1).__bits[0] = (set2).__bits[0])
66
67 /*
68  * These syscalls are unncessary because it is next to impossible to
69  * find 4.3BSD binaries built for i386.  The current libc has routines
70  * which fake the 4.3BSD family of signal syscalls, so anything built
71  * from source won't be using these.
72  *
73  * This file is provided for educational purposes only.  The osigvec()
74  * syscall is probably broken because the current signal code uses
75  * a different signal trampoline.
76  */
77
78 int
79 sys_osigvec(struct osigvec_args *uap)
80 {
81         struct sigvec vec;
82         struct sigaction nsa, osa;
83         struct sigaction *nsap, *osap;
84         int error;
85
86         if (uap->signum <= 0 || uap->signum >= ONSIG)
87                 return (EINVAL);
88         nsap = (uap->nsv != NULL) ? &nsa : NULL;
89         osap = (uap->osv != NULL) ? &osa : NULL;
90         if (nsap) {
91                 error = copyin(uap->nsv, &vec, sizeof(vec));
92                 if (error)
93                         return (error);
94                 nsap->sa_handler = vec.sv_handler;
95                 OSIG2SIG(vec.sv_mask, nsap->sa_mask);
96                 nsap->sa_flags = vec.sv_flags;
97                 nsap->sa_flags ^= SA_RESTART;   /* opposite of SV_INTERRUPT */
98         }
99
100         error = kern_sigaction(uap->signum, nsap, osap);
101
102         if (osap && !error) {
103                 vec.sv_handler = osap->sa_handler;
104                 SIG2OSIG(osap->sa_mask, vec.sv_mask);
105                 vec.sv_flags = osap->sa_flags;
106                 vec.sv_flags &= ~SA_NOCLDWAIT;
107                 vec.sv_flags ^= SA_RESTART;
108                 error = copyout(&vec, uap->osv, sizeof(vec));
109         }
110         return (error);
111 }
112
113 int
114 sys_osigblock(struct osigblock_args *uap)
115 {
116         struct lwp *lp = curthread->td_lwp;
117         sigset_t set;
118
119         OSIG2SIG(uap->mask, set);
120         SIG_CANTMASK(set);
121         crit_enter();
122         SIG2OSIG(lp->lwp_sigmask, uap->sysmsg_result);
123         SIGSETOR(lp->lwp_sigmask, set);
124         crit_exit();
125         return (0);
126 }
127
128 int
129 sys_osigsetmask(struct osigsetmask_args *uap)
130 {
131         struct lwp *lp = curthread->td_lwp;
132         sigset_t set;
133
134         OSIG2SIG(uap->mask, set);
135         SIG_CANTMASK(set);
136         crit_enter();
137         SIG2OSIG(lp->lwp_sigmask, uap->sysmsg_result);
138         SIGSETLO(lp->lwp_sigmask, set);
139         crit_exit();
140         return (0);
141 }
142
143 int
144 sys_osigstack(struct osigstack_args *uap)
145 {
146         struct lwp *lp = curthread->td_lwp;
147         struct sigstack ss;
148         int error = 0;
149
150         ss.ss_sp = lp->lwp_sigstk.ss_sp;
151         ss.ss_onstack = lp->lwp_sigstk.ss_flags & SS_ONSTACK;
152         if (uap->oss && (error = copyout(&ss, uap->oss,
153             sizeof(struct sigstack))))
154                 return (error);
155         if (uap->nss && (error = copyin(uap->nss, &ss, sizeof(ss))) == 0) {
156                 lp->lwp_sigstk.ss_sp = ss.ss_sp;
157                 lp->lwp_sigstk.ss_size = 0;
158                 lp->lwp_sigstk.ss_flags |= ss.ss_onstack & SS_ONSTACK;
159                 lp->lwp_flag |= LWP_ALTSTACK;
160         }
161         return (error);
162 }
163
164 int
165 sys_okillpg(struct okillpg_args *uap)
166 {
167         int error;
168
169         error = kern_kill(uap->signum, -uap->pgid, -1);
170
171         return (error);
172 }