![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to hpux_sig.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Net/2] / Net2 / arch / hp300 / hpux|
Return to hpux_sig.c CVS log | Up to [Net/2] / Net2 / arch / hp300 / hpux |
1.1 root 1: /*
2: * Copyright (c) 1988 University of Utah.
3: * Copyright (c) 1990 The Regents of the University of California.
4: * All rights reserved.
5: *
6: * This code is derived from software contributed to Berkeley by
7: * the Systems Programming Group of the University of Utah Computer
8: * Science Department.
9: *
10: * Redistribution and use in source and binary forms, with or without
11: * modification, are permitted provided that the following conditions
12: * are met:
13: * 1. Redistributions of source code must retain the above copyright
14: * notice, this list of conditions and the following disclaimer.
15: * 2. Redistributions in binary form must reproduce the above copyright
16: * notice, this list of conditions and the following disclaimer in the
17: * documentation and/or other materials provided with the distribution.
18: * 3. All advertising materials mentioning features or use of this software
19: * must display the following acknowledgement:
20: * This product includes software developed by the University of
21: * California, Berkeley and its contributors.
22: * 4. Neither the name of the University nor the names of its contributors
23: * may be used to endorse or promote products derived from this software
24: * without specific prior written permission.
25: *
26: * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27: * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29: * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30: * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31: * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32: * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36: * SUCH DAMAGE.
37: *
38: * from: Utah $Hdr: hpux_sig.c 1.1 90/07/09$
39: *
1.1.1.2 ! root 40: * from: @(#)hpux_sig.c 7.8 (Berkeley) 4/20/91
! 41: * hpux_sig.c,v 1.2 1993/05/22 07:58:06 cgd Exp
1.1 root 42: */
43:
44: /*
45: * Signal related HPUX compatibility routines
46: */
47:
48: #ifdef HPUXCOMPAT
49:
50: #include "param.h"
51: #include "systm.h"
52: #include "kernel.h"
53: #include "proc.h"
54: #include "signalvar.h"
55: #include "hpux.h"
56:
57: /* indexed by HPUX signal number - 1 */
58: char hpuxtobsdsigmap[NSIG] = {
59: /*01*/ SIGHUP, SIGINT, SIGQUIT, SIGILL, SIGTRAP, SIGIOT, SIGEMT, SIGFPE,
60: /*09*/ SIGKILL, SIGBUS, SIGSEGV, SIGSYS, SIGPIPE, SIGALRM, SIGTERM, SIGUSR1,
61: /*17*/ SIGUSR2, SIGCHLD, 0, SIGVTALRM,SIGPROF, SIGIO, SIGWINCH, SIGSTOP,
62: /*25*/ SIGTSTP, SIGCONT,SIGTTIN, SIGTTOU, SIGURG, 0, 0, 0
63: };
64:
65: /* indexed by BSD signal number - 1 */
66: char bsdtohpuxsigmap[NSIG] = {
67: /*01*/ 1, 2, 3, 4, 5, 6, 7, 8,
68: /*09*/ 9, 10, 11, 12, 13, 14, 15, 29,
69: /*17*/ 24, 25, 26, 18, 27, 28, 22, 0,
70: /*25*/ 0, 20, 21, 23, 0, 16, 17, 0
71: };
72:
73: /*
74: * XXX: In addition to mapping the signal number we also have
75: * to see if the "old" style signal mechinism is needed.
76: * If so, we set the OUSIG flag. This is not really correct
77: * as under HP-UX "old" style handling can be set on a per
78: * signal basis and we are setting it for all signals in one
79: * swell foop. I suspect we can get away with this since I
80: * doubt any program of interest mixes the two semantics.
81: */
82: hpuxsigvec(p, uap, retval)
83: struct proc *p;
84: register struct args {
85: int signo;
86: struct sigvec *nsv;
87: struct sigvec *osv;
88: } *uap;
89: int *retval;
90: {
91: struct sigvec vec;
92: register struct sigacts *ps = p->p_sigacts;
93: register struct sigvec *sv;
94: register int sig;
95: int bit, error;
96:
97: sig = hpuxtobsdsig(uap->signo);
98: if (sig <= 0 || sig >= NSIG || sig == SIGKILL || sig == SIGSTOP)
99: return (EINVAL);
100: sv = &vec;
101: if (uap->osv) {
102: sv->sv_handler = ps->ps_sigact[sig];
103: sv->sv_mask = ps->ps_catchmask[sig];
104: bit = sigmask(sig);
105: sv->sv_flags = 0;
106: if ((ps->ps_sigonstack & bit) != 0)
107: sv->sv_flags |= SV_ONSTACK;
108: if ((ps->ps_sigintr & bit) != 0)
109: sv->sv_flags |= SV_INTERRUPT;
110: #if 0
111: /* XXX -- SOUSIG no longer exists, do something here */
112: if (p->p_flag & SOUSIG)
113: sv->sv_flags |= HPUXSV_RESET; /* XXX */
114: #endif
115: error = copyout((caddr_t)sv, (caddr_t)uap->osv, sizeof (vec));
116: if (error)
117: return (error);
118: }
119: if (uap->nsv) {
120: error = copyin((caddr_t)uap->nsv, (caddr_t)sv, sizeof (vec));
121: if (error)
122: return (error);
123: if (sig == SIGCONT && sv->sv_handler == SIG_IGN)
124: return (EINVAL);
125: sv->sv_flags ^= SA_RESTART;
126: setsigvec(p, sig, (struct sigaction *)sv);
127: #if 0
128: /* XXX -- SOUSIG no longer exists, do something here */
129: if (sv->sv_flags & HPUXSV_RESET)
130: p->p_flag |= SOUSIG; /* XXX */
131: #endif
132: }
133: return (0);
134: }
135:
136: hpuxsigblock(p, uap, retval)
137: register struct proc *p;
138: struct args {
139: int mask;
140: } *uap;
141: int *retval;
142: {
143:
144: (void) splhigh();
145: *retval = bsdtohpuxmask(p->p_sigmask);
146: p->p_sigmask |= hpuxtobsdmask(uap->mask) &~ sigcantmask;
147: (void) spl0();
148: return (0);
149: }
150:
151: hpuxsigsetmask(p, uap, retval)
152: struct proc *p;
153: struct args {
154: int mask;
155: } *uap;
156: int *retval;
157: {
158:
159: (void) splhigh();
160: *retval = bsdtohpuxmask(p->p_sigmask);
161: p->p_sigmask = hpuxtobsdmask(uap->mask) &~ sigcantmask;
162: (void) spl0();
163: return (0);
164: }
165:
166: hpuxsigpause(p, uap, retval)
167: struct proc *p;
168: struct args {
169: int mask;
170: } *uap;
171: int *retval;
172: {
173:
174: uap->mask = hpuxtobsdmask(uap->mask);
175: return (sigsuspend(p, uap, retval));
176: }
177:
178: /* not totally correct, but close enuf' */
179: hpuxkill(p, uap, retval)
180: struct proc *p;
181: struct args {
182: int pid;
183: int signo;
184: } *uap;
185: int *retval;
186: {
187:
188: if (uap->signo) {
189: uap->signo = hpuxtobsdsig(uap->signo);
190: if (uap->signo == 0)
191: uap->signo = NSIG;
192: }
193: return (kill(p, uap, retval));
194: }
195:
196: /*
197: * The following (sigprocmask, sigpending, sigsuspend, sigaction are
198: * POSIX calls. Under BSD, the library routine dereferences the sigset_t
199: * pointers before traping. Not so under HP-UX.
200: */
201:
202: /*
203: * Manipulate signal mask.
204: * Note that we receive new mask, not pointer,
205: * and return old mask as return value;
206: * the library stub does the rest.
207: */
208: hpuxsigprocmask(p, uap, retval)
209: register struct proc *p;
210: struct args {
211: int how;
212: hpuxsigset_t *set;
213: hpuxsigset_t *oset;
214: } *uap;
215: int *retval;
216: {
217: int mask, error = 0;
218: hpuxsigset_t sigset;
219:
220: /*
221: * Copy out old mask first to ensure no errors.
222: * (proc sigmask should not be changed if call fails for any reason)
223: */
224: if (uap->oset) {
225: bzero((caddr_t)&sigset, sizeof(sigset));
226: sigset.sigset[0] = bsdtohpuxmask(p->p_sigmask);
227: if (copyout((caddr_t)&sigset, (caddr_t)uap->oset, sizeof(sigset)))
228: return (EFAULT);
229: }
230: if (uap->set) {
231: if (copyin((caddr_t)uap->set, (caddr_t)&sigset, sizeof(sigset)))
232: return (EFAULT);
233: mask = hpuxtobsdmask(sigset.sigset[0]);
234: (void) splhigh();
235: switch (uap->how) {
236: case HPUXSIG_BLOCK:
237: p->p_sigmask |= mask &~ sigcantmask;
238: break;
239: case HPUXSIG_UNBLOCK:
240: p->p_sigmask &= ~mask;
241: break;
242: case HPUXSIG_SETMASK:
243: p->p_sigmask = mask &~ sigcantmask;
244: break;
245: default:
246: error = EINVAL;
247: break;
248: }
249: (void) spl0();
250: }
251: return (error);
252: }
253:
254: hpuxsigpending(p, uap, retval)
255: register struct proc *p;
256: struct args {
257: hpuxsigset_t *set;
258: } *uap;
259: int *retval;
260: {
261: hpuxsigset_t sigset;
262:
263: sigset.sigset[0] = bsdtohpuxmask(p->p_sig);
264: return (copyout((caddr_t)&sigset, (caddr_t)uap->set, sizeof(sigset)));
265: }
266:
267: hpuxsigsuspend(p, uap, retval)
268: register struct proc *p;
269: struct args {
270: hpuxsigset_t *set;
271: } *uap;
272: int *retval;
273: {
274: register struct sigacts *ps = p->p_sigacts;
275: hpuxsigset_t sigset;
276: int mask;
277:
278: if (copyin((caddr_t)uap->set, (caddr_t)&sigset, sizeof(sigset)))
279: return (EFAULT);
280: mask = hpuxtobsdmask(sigset.sigset[0]);
281: ps->ps_oldmask = p->p_sigmask;
282: ps->ps_flags |= SA_OLDMASK;
283: p->p_sigmask = mask &~ sigcantmask;
284: (void) tsleep((caddr_t)ps, PPAUSE | PCATCH, "pause", 0);
285: /* always return EINTR rather than ERESTART... */
286: return (EINTR);
287: }
288:
289: hpuxsigaction(p, uap, retval)
290: struct proc *p;
291: register struct args {
292: int signo;
293: struct hpuxsigaction *nsa;
294: struct hpuxsigaction *osa;
295: } *uap;
296: int *retval;
297: {
298: struct hpuxsigaction action;
299: register struct sigacts *ps = p->p_sigacts;
300: register struct hpuxsigaction *sa;
301: register int sig;
302: int bit;
303:
304: sig = hpuxtobsdsig(uap->signo);
305: if (sig <= 0 || sig >= NSIG || sig == SIGKILL || sig == SIGSTOP)
306: return (EINVAL);
307:
308: sa = &action;
309: if (uap->osa) {
310: sa->sa_handler = ps->ps_sigact[sig];
311: bzero((caddr_t)&sa->sa_mask, sizeof(sa->sa_mask));
312: sa->sa_mask.sigset[0] = bsdtohpuxmask(ps->ps_catchmask[sig]);
313: bit = sigmask(sig);
314: sa->sa_flags = 0;
315: if ((ps->ps_sigonstack & bit) != 0)
316: sa->sa_flags |= HPUXSA_ONSTACK;
317: #if 0
318: /* XXX -- SOUSIG no longer exists, do something here */
319: if (p->p_flag & SOUSIG)
320: sa->sa_flags |= HPUXSA_RESETHAND; /* XXX */
321: #endif
322: if (p->p_flag & SNOCLDSTOP)
323: sa->sa_flags |= HPUXSA_NOCLDSTOP;
324: if (copyout((caddr_t)sa, (caddr_t)uap->osa, sizeof (action)))
325: return (EFAULT);
326: }
327: if (uap->nsa) {
328: struct sigaction act;
329:
330: if (copyin((caddr_t)uap->nsa, (caddr_t)sa, sizeof (action)))
331: return (EFAULT);
332: if (sig == SIGCONT && sa->sa_handler == SIG_IGN)
333: return (EINVAL);
334: /*
335: * Create a sigaction struct for setsigvec
336: */
337: act.sa_handler = sa->sa_handler;
338: act.sa_mask = hpuxtobsdmask(sa->sa_mask.sigset[0]);
339: act.sa_flags == SA_RESTART;
340: if (sa->sa_flags & HPUXSA_ONSTACK)
341: act.sa_flags |= SA_ONSTACK;
342: if (sa->sa_flags & HPUXSA_NOCLDSTOP)
343: act.sa_flags |= SA_NOCLDSTOP;
344: setsigvec(p, sig, &act);
345: #if 0
346: /* XXX -- SOUSIG no longer exists, do something here */
347: if (sa->sa_flags & HPUXSA_RESETHAND)
348: p->p_flag |= SOUSIG; /* XXX */
349: #endif
350: }
351: return (0);
352: }
353:
354: ohpuxssig(p, uap, retval)
355: struct proc *p;
356: struct args {
357: int signo;
358: sig_t fun;
359: } *uap;
360: int *retval;
361: {
362: register int a;
363: struct sigaction vec;
364: register struct sigaction *sa = &vec;
365:
366: a = hpuxtobsdsig(uap->signo);
367: sa->sa_handler = uap->fun;
368: /*
369: * Kill processes trying to use job control facilities
370: * (this'll help us find any vestiges of the old stuff).
371: */
372: if ((a &~ 0377) ||
373: (sa->sa_handler != SIG_DFL && sa->sa_handler != SIG_IGN &&
374: ((int)sa->sa_handler) & 1)) {
375: psignal(p, SIGSYS);
376: return (0);
377: }
378: if (a <= 0 || a >= NSIG || a == SIGKILL || a == SIGSTOP ||
379: a == SIGCONT && sa->sa_handler == SIG_IGN)
380: return (EINVAL);
381: sa->sa_mask = 0;
382: sa->sa_flags = 0;
383: *retval = (int)p->p_sigacts->ps_sigact[a];
384: setsigvec(p, a, sa);
385: #if 0
386: p->p_flag |= SOUSIG; /* mark as simulating old stuff */
387: #endif
388: return (0);
389: }
390:
391: /* signal numbers: convert from HPUX to BSD */
392: hpuxtobsdsig(sig)
393: register int sig;
394: {
395: if (--sig < 0 || sig >= NSIG)
396: return(0);
397: return((int)hpuxtobsdsigmap[sig]);
398: }
399:
400: /* signal numbers: convert from BSD to HPUX */
401: bsdtohpuxsig(sig)
402: register int sig;
403: {
404: if (--sig < 0 || sig >= NSIG)
405: return(0);
406: return((int)bsdtohpuxsigmap[sig]);
407: }
408:
409: /* signal masks: convert from HPUX to BSD (not pretty or fast) */
410: hpuxtobsdmask(mask)
411: register int mask;
412: {
413: register int nmask, sig, nsig;
414:
415: if (mask == 0 || mask == -1)
416: return(mask);
417: nmask = 0;
418: for (sig = 1; sig < NSIG; sig++)
419: if ((mask & sigmask(sig)) && (nsig = hpuxtobsdsig(sig)))
420: nmask |= sigmask(nsig);
421: return(nmask);
422: }
423:
424: bsdtohpuxmask(mask)
425: register int mask;
426: {
427: register int nmask, sig, nsig;
428:
429: if (mask == 0 || mask == -1)
430: return(mask);
431: nmask = 0;
432: for (sig = 1; sig < NSIG; sig++)
433: if ((mask & sigmask(sig)) && (nsig = bsdtohpuxsig(sig)))
434: nmask |= sigmask(nsig);
435: return(nmask);
436: }
437: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.