* Makefile.am (sm): Build kbx only if gpgsm is to be build.
[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 static volatile int caught_fatal_sig;
34 static volatile int caught_sigusr1;
35 static void (*cleanup_fnc)(void);
36
37
38 static void
39 init_one_signal (int sig, RETSIGTYPE (*handler)(int), int check_ign )
40 {
41 #ifndef HAVE_DOSISH_SYSTEM
42 # ifdef HAVE_SIGACTION
43   struct sigaction oact, nact;
44   
45   if (check_ign)
46     {
47       /* we don't want to change an IGN handler */
48       sigaction (sig, NULL, &oact );
49       if (oact.sa_handler == SIG_IGN )
50         return;
51     }
52
53   nact.sa_handler = handler;
54   sigemptyset (&nact.sa_mask);
55   nact.sa_flags = 0;
56   sigaction ( sig, &nact, NULL);
57 # else 
58   RETSIGTYPE (*ohandler)(int);
59   
60   ohandler = signal (sig, handler);
61   if (check_ign && ohandler == SIG_IGN) 
62     {
63       /* Change it back if it was already set to IGN */
64       signal (sig, SIG_IGN);
65     }
66 # endif
67 #endif /*!HAVE_DOSISH_SYSTEM*/
68 }
69
70 static const char *
71 get_signal_name( int signum )
72 {
73 #if defined(SYS_SIGLIST_DECLARED) && defined(NSIG)
74   return (signum >= 0 && signum < NSIG) ? sys_siglist[signum] : "?";
75 #else
76   return "some signal";
77 #endif
78 }
79
80 static RETSIGTYPE
81 got_fatal_signal (int sig)
82 {
83   const char *s;
84
85   if (caught_fatal_sig)
86         raise (sig);
87   caught_fatal_sig = 1;
88
89   if (cleanup_fnc)
90     cleanup_fnc ();
91   /* better don't translate these messages */
92   write (2, "\n", 1 );
93   s = log_get_prefix (NULL);
94   if (s)
95     write(2, s, strlen (s));
96   write (2, ": ", 2 );
97   s = get_signal_name(sig);
98   write (2, s, strlen(s) );
99   write (2, " caught ... exiting\n", 20);
100   
101   /* reset action to default action and raise signal again */
102   init_one_signal (sig, SIG_DFL, 0);
103   /* fixme: remove_lockfiles ();*/
104 #ifdef __riscos__
105   close_fds ();
106 #endif /* __riscos__ */
107   raise( sig );
108 }
109
110
111 static RETSIGTYPE
112 got_usr_signal (int sig)
113 {
114   caught_sigusr1 = 1;
115 }
116
117
118 void
119 gnupg_init_signals (int mode, void (*fast_cleanup)(void))
120 {
121   assert (!mode);
122
123   cleanup_fnc = fast_cleanup;
124 #ifndef HAVE_DOSISH_SYSTEM
125   init_one_signal (SIGINT, got_fatal_signal, 1 );
126   init_one_signal (SIGHUP, got_fatal_signal, 1 );
127   init_one_signal (SIGTERM, got_fatal_signal, 1 );
128   init_one_signal (SIGQUIT, got_fatal_signal, 1 );
129   init_one_signal (SIGSEGV, got_fatal_signal, 1 );
130   init_one_signal (SIGUSR1, got_usr_signal, 0 );
131   init_one_signal (SIGPIPE, SIG_IGN, 0 );
132 #endif
133 }
134
135 void
136 gnupg_pause_on_sigusr (int which)
137 {
138 #ifndef HAVE_DOSISH_SYSTEM
139 # ifdef HAVE_SIGPROCMASK
140   sigset_t mask, oldmask;
141
142   assert (which == 1);
143   sigemptyset( &mask );
144   sigaddset( &mask, SIGUSR1 );
145   
146   sigprocmask( SIG_BLOCK, &mask, &oldmask );
147   while (!caught_sigusr1)
148     sigsuspend (&oldmask);
149   caught_sigusr1 = 0;
150   sigprocmask (SIG_UNBLOCK, &mask, NULL);
151 # else 
152   assert (which == 1);
153   sighold (SIGUSR1);
154   while (!caught_sigusr1)
155     sigpause(SIGUSR1);
156   caught_sigusr1 = 0;
157   sigrelease(SIGUSR1);
158 # endif /*!HAVE_SIGPROCMASK*/
159 #endif
160 }
161
162
163 static void
164 do_block( int block )
165 {
166 #ifndef HAVE_DOSISH_SYSTEM
167   static int is_blocked;
168 #ifdef HAVE_SIGPROCMASK
169   static sigset_t oldmask;
170
171   if (block)
172     {
173       sigset_t newmask;
174
175       if (is_blocked)
176         log_bug ("signals are already blocked\n");
177       sigfillset( &newmask );
178       sigprocmask( SIG_BLOCK, &newmask, &oldmask );
179       is_blocked = 1;
180     }
181   else
182     {
183       if (!is_blocked)
184         log_bug("signals are not blocked\n");
185       sigprocmask (SIG_SETMASK, &oldmask, NULL);
186       is_blocked = 0;
187     }
188 #else /*!HAVE_SIGPROCMASK*/
189   static void (*disposition[MAXSIG])();
190   int sig;
191
192   if (block)
193     {
194       if (is_blocked)
195         log_bug("signals are already blocked\n");
196       for (sig=1; sig < MAXSIG; sig++)
197         {
198           disposition[sig] = sigset (sig, SIG_HOLD);
199         }
200       is_blocked = 1;
201     }
202   else
203     {
204       if (!is_blocked)
205         log_bug ("signals are not blocked\n");
206       for (sig=1; sig < MAXSIG; sig++) {
207         sigset (sig, disposition[sig]);
208       }
209       is_blocked = 0;
210     }
211 #endif /*!HAVE_SIGPROCMASK*/
212 #endif /*HAVE_DOSISH_SYSTEM*/
213 }
214
215
216 void
217 gnupg_block_all_signals ()
218 {
219   do_block(1);
220 }
221
222 void
223 gnupg_unblock_all_signals ()
224 {
225   do_block(0);
226 }