Update.
[platform/upstream/glibc.git] / sysdeps / unix / sysv / linux / i386 / sigaction.c
1 /* POSIX.1 `sigaction' call for Linux/i386.
2    Copyright (C) 1991, 1995, 1996, 1997 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
4
5    The GNU C Library is free software; you can redistribute it and/or
6    modify it under the terms of the GNU Library General Public License as
7    published by the Free Software Foundation; either version 2 of the
8    License, or (at your option) any later version.
9
10    The GNU C Library is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13    Library General Public License for more details.
14
15    You should have received a copy of the GNU Library General Public
16    License along with the GNU C Library; see the file COPYING.LIB.  If not,
17    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18    Boston, MA 02111-1307, USA.  */
19
20 #include <sysdep.h>
21 #include <errno.h>
22 #include <stddef.h>
23 #include <signal.h>
24
25 /* The difference here is that the sigaction structure used in the
26    kernel is not the same as we use in the libc.  Therefore we must
27    translate it here.  */
28 #include <kernel_sigaction.h>
29
30
31 extern int __syscall_rt_signal (int, const struct sigaction *,
32                                 struct sigaction *, size_t);
33
34 /* The variable is shared between all wrappers around signal handling
35    functions which have RT equivalents.  It is defined in sigsuspend.c.  */
36 extern int __libc_have_rt_sigs;
37
38
39 /* If ACT is not NULL, change the action for SIG to *ACT.
40    If OACT is not NULL, put the old action for SIG in *OACT.  */
41 int
42 __sigaction (int sig, const struct sigaction *act, struct sigaction *oact)
43 {
44   struct old_kernel_sigaction k_newact, k_oldact;
45   int result;
46
47   /* First try the RT signals.  */
48   if (__libc_have_rt_sigs)
49     {
50       struct sigaction nact;
51
52       nact.sa_handler = act->sa_handler;
53       memcpy (&nact.sa_mask, &act->sa_mask, sizeof (sigset_t));
54       nact.sa_flags = act->sa_flags;
55
56       nact.sa_restorer = ((act->sa_flags & SA_NOMASK)
57                           ? &&restore_nomask : &&restore);
58
59       /* XXX The size argument hopefully will have to be changed to the
60          real size of the user-level sigset_t.  */
61       result = __syscall_rt_sigaction (sig, &nact, oact,
62                                        _NSIG / (8 * sizeof (long int)));
63
64       if (result >= 0 || errno != ENOSYS)
65         return result;
66
67       __libc_have_rt_sigs = 0;
68     }
69
70   if (act)
71     {
72       k_newact.k_sa_handler = act->sa_handler;
73       k_newact.sa_mask = act->sa_mask.__val[0];
74       k_newact.sa_flags = act->sa_flags;
75
76       k_newact.sa_restorer = ((act->sa_flags & SA_NOMASK)
77                               ? &&restore_nomask : &&restore);
78     }
79
80   asm volatile ("pushl %%ebx\n"
81                 "movl %2, %%ebx\n"
82                 "int $0x80\n"
83                 "popl %%ebx"
84                 : "=a" (result)
85                 : "0" (SYS_ify (sigaction)), "r" (sig),
86                   "c" (act ? &k_newact : 0), "d" (oact ? &k_oldact : 0));
87
88   if (result < 0)
89     {
90       __set_errno (-result);
91       return -1;
92     }
93
94   if (oact)
95     {
96       oact->sa_handler = k_oldact.k_sa_handler;
97       oact->sa_mask.__val[0] = k_oldact.sa_mask;
98       oact->sa_flags = k_oldact.sa_flags;
99       oact->sa_restorer = k_oldact.sa_restorer;
100     }
101
102   return 0;
103
104  restore:
105   asm (
106 #ifdef  PIC
107        "        pushl %%ebx\n"
108        "        call 0f\n"
109        "0:      popl %%ebx\n"
110        "        addl $_GLOBAL_OFFSET_TABLE_+[.-0b], %%ebx\n"
111        "        addl $8, %%esp\n"
112        "        call __sigsetmask@PLT\n"
113        "        addl $8, %%esp\n"
114        "        popl %%ebx\n"
115 #else
116        "        addl $4, %%esp\n"
117        "        call __sigsetmask\n"
118        "        addl $4, %%esp\n"
119 #endif
120        "        popl %%eax\n"
121        "        popl %%ecx\n"
122        "        popl %%edx\n"
123        "        popf\n"
124        "        ret"
125        : : );
126
127  restore_nomask:
128   asm ("        addl $4, %%esp\n"
129        "        popl %%eax\n"
130        "        popl %%ecx\n"
131        "        popl %%edx\n"
132        "        popf\n"
133        "        ret"
134        : : );
135
136   /* NOTREACHED */
137   return -1;
138 }
139
140 weak_alias (__sigaction, sigaction)