* configure.ac: Require libksba 0.9.11.
[gnupg.git] / common / signal.c
1 /* signal.c - signal handling
2  * Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
3  *
4  * This file is part of GnuPG.
5  *
6  * GnuPG is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * GnuPG is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19  */
20
21 #include <config.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <signal.h>
25 #include <unistd.h>
26 #include <string.h>
27 #include <errno.h>
28 #include <assert.h>
29
30 #include "util.h"
31
32
33 #ifndef HAVE_DOSISH_SYSTEM
34 static volatile int caught_fatal_sig;
35 static volatile int caught_sigusr1;
36 #endif
37 static void (*cleanup_fnc)(void);
38
39
40 #ifndef HAVE_DOSISH_SYSTEM
41 static void
42 init_one_signal (int sig, RETSIGTYPE (*handler)(int), int check_ign )
43 {
44 # ifdef HAVE_SIGACTION
45   struct sigaction oact, nact;
46   
47   if (check_ign)
48     {
49       /* we don't want to change an IGN handler */
50       sigaction (sig, NULL, &oact );
51       if (oact.sa_handler == SIG_IGN )
52         return;
53     }
54
55   nact.sa_handler = handler;
56   sigemptyset (&nact.sa_mask);
57   nact.sa_flags = 0;
58   sigaction ( sig, &nact, NULL);
59 # else 
60   RETSIGTYPE (*ohandler)(int);
61   
62   ohandler = signal (sig, handler);
63   if (check_ign && ohandler == SIG_IGN) 
64     {
65       /* Change it back if it was already set to IGN */
66       signal (sig, SIG_IGN);
67     }
68 # endif
69 }
70 #endif /*!HAVE_DOSISH_SYSTEM*/
71
72 #ifndef HAVE_DOSISH_SYSTEM
73 static const char *
74 get_signal_name( int signum )
75 {
76 #if defined(SYS_SIGLIST_DECLARED) && defined(NSIG)
77   return (signum >= 0 && signum < NSIG) ? sys_siglist[signum] : "?";
78 #else
79   return "some signal";
80 #endif
81 }
82 #endif /*!HAVE_DOSISH_SYSTEM*/
83
84 #ifndef HAVE_DOSISH_SYSTEM
85 static RETSIGTYPE
86 got_fatal_signal (int sig)
87 {
88   const char *s;
89
90   if (caught_fatal_sig)
91         raise (sig);
92   caught_fatal_sig = 1;
93
94   if (cleanup_fnc)
95     cleanup_fnc ();
96   /* better don't translate these messages */
97   write (2, "\n", 1 );
98   s = log_get_prefix (NULL);
99   if (s)
100     write(2, s, strlen (s));
101   write (2, ": ", 2 );
102   s = get_signal_name(sig);
103   write (2, s, strlen(s) );
104   write (2, " caught ... exiting\n", 20);
105   
106   /* reset action to default action and raise signal again */
107   init_one_signal (sig, SIG_DFL, 0);
108   /* fixme: remove_lockfiles ();*/
109 #ifdef __riscos__
110   close_fds ();
111 #endif /* __riscos__ */
112   raise( sig );
113 }
114 #endif /*!HAVE_DOSISH_SYSTEM*/
115
116 #ifndef HAVE_DOSISH_SYSTEM
117 static RETSIGTYPE
118 got_usr_signal (int sig)
119 {
120   caught_sigusr1 = 1;
121 }
122 #endif /*!HAVE_DOSISH_SYSTEM*/
123
124 void
125 gnupg_init_signals (int mode, void (*fast_cleanup)(void))
126 {
127   assert (!mode);
128
129   cleanup_fnc = fast_cleanup;
130 #ifndef HAVE_DOSISH_SYSTEM
131   init_one_signal (SIGINT, got_fatal_signal, 1 );
132   init_one_signal (SIGHUP, got_fatal_signal, 1 );
133   init_one_signal (SIGTERM, got_fatal_signal, 1 );
134   init_one_signal (SIGQUIT, got_fatal_signal, 1 );
135   init_one_signal (SIGSEGV, got_fatal_signal, 1 );
136   init_one_signal (SIGUSR1, got_usr_signal, 0 );
137   init_one_signal (SIGPIPE, SIG_IGN, 0 );
138 #endif
139 }
140
141 void
142 gnupg_pause_on_sigusr (int which)
143 {
144 #ifndef HAVE_DOSISH_SYSTEM
145 # ifdef HAVE_SIGPROCMASK
146   sigset_t mask, oldmask;
147
148   assert (which == 1);
149   sigemptyset( &mask );
150   sigaddset( &mask, SIGUSR1 );
151   
152   sigprocmask( SIG_BLOCK, &mask, &oldmask );
153   while (!caught_sigusr1)
154     sigsuspend (&oldmask);
155   caught_sigusr1 = 0;
156   sigprocmask (SIG_UNBLOCK, &mask, NULL);
157 # else 
158   assert (which == 1);
159   sighold (SIGUSR1);
160   while (!caught_sigusr1)
161     sigpause(SIGUSR1);
162   caught_sigusr1 = 0;
163   sigrelease(SIGUSR1);
164 # endif /*!HAVE_SIGPROCMASK*/
165 #endif
166 }
167
168
169 static void
170 do_block( int block )
171 {
172 #ifndef HAVE_DOSISH_SYSTEM
173   static int is_blocked;
174 #ifdef HAVE_SIGPROCMASK
175   static sigset_t oldmask;
176
177   if (block)
178     {
179       sigset_t newmask;
180
181       if (is_blocked)
182         log_bug ("signals are already blocked\n");
183       sigfillset( &newmask );
184       sigprocmask( SIG_BLOCK, &newmask, &oldmask );
185       is_blocked = 1;
186     }
187   else
188     {
189       if (!is_blocked)
190         log_bug("signals are not blocked\n");
191       sigprocmask (SIG_SETMASK, &oldmask, NULL);
192       is_blocked = 0;
193     }
194 #else /*!HAVE_SIGPROCMASK*/
195   static void (*disposition[MAXSIG])();
196   int sig;
197
198   if (block)
199     {
200       if (is_blocked)
201         log_bug("signals are already blocked\n");
202       for (sig=1; sig < MAXSIG; sig++)
203         {
204           disposition[sig] = sigset (sig, SIG_HOLD);
205         }
206       is_blocked = 1;
207     }
208   else
209     {
210       if (!is_blocked)
211         log_bug ("signals are not blocked\n");
212       for (sig=1; sig < MAXSIG; sig++) {
213         sigset (sig, disposition[sig]);
214       }
215       is_blocked = 0;
216     }
217 #endif /*!HAVE_SIGPROCMASK*/
218 #endif /*HAVE_DOSISH_SYSTEM*/
219 }
220
221
222 void
223 gnupg_block_all_signals ()
224 {
225   do_block(1);
226 }
227
228 void
229 gnupg_unblock_all_signals ()
230 {
231   do_block(0);
232 }