Better take the length of SKELEXT into account
[gnupg.git] / g10 / signal.c
1 /* signal.c - signal handling
2  * Copyright (C) 1998, 1999, 2000, 2001, 2003 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 "options.h"
31 #include "errors.h"
32 #include "memory.h"
33 #include "util.h"
34 #include "main.h"
35 #include "ttyio.h"
36
37
38 static volatile int caught_fatal_sig = 0;
39 static volatile int caught_sigusr1 = 0;
40
41 static void
42 init_one_signal (int sig, RETSIGTYPE (*handler)(int), int check_ign )
43 {
44 #ifndef HAVE_DOSISH_SYSTEM
45 #if defined(HAVE_SIGACTION) && defined(HAVE_STRUCT_SIGACTION)
46     struct sigaction oact, nact;
47
48     if (check_ign) {
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         /* Change it back if it was already set to IGN */
65         signal (sig, SIG_IGN);
66     }
67 #endif
68 #endif /*!HAVE_DOSISH_SYSTEM*/
69 }
70
71 static const char *
72 get_signal_name( int signum )
73 {
74 #if defined(SYS_SIGLIST_DECLARED) && defined(NSIG)
75     return (signum >= 0 && signum < NSIG) ? sys_siglist[signum] : "?";
76 #else
77     return "some signal";
78 #endif
79 }
80
81
82 static RETSIGTYPE
83 got_fatal_signal( int sig )
84 {
85     const char *s;
86
87     if( caught_fatal_sig )
88         raise( sig );
89     caught_fatal_sig = 1;
90
91     gcry_control (GCRYCTL_TERM_SECMEM );
92     /* better don't transtale these messages */
93     write(2, "\n", 1 );
94     s = "?" /* FIXME: log_get_name()*/; if( s ) write(2, s, strlen(s) );
95     write(2, ": ", 2 );
96     s = get_signal_name(sig); write(2, s, strlen(s) );
97     write(2, " caught ... exiting\n", 20 );
98
99     /* reset action to default action and raise signal again */
100     init_one_signal (sig, SIG_DFL, 0);
101     dotlock_remove_lockfiles ();
102 #ifdef __riscos__
103     riscos_close_fds ();
104 #endif /* __riscos__ */
105     raise( sig );
106 }
107
108
109 static RETSIGTYPE
110 got_usr_signal( int sig )
111 {
112     caught_sigusr1 = 1;
113 }
114
115
116 void
117 init_signals()
118 {
119 #ifndef HAVE_DOSISH_SYSTEM
120     init_one_signal (SIGINT, got_fatal_signal, 1 );
121     init_one_signal (SIGHUP, got_fatal_signal, 1 );
122     init_one_signal (SIGTERM, got_fatal_signal, 1 );
123     init_one_signal (SIGQUIT, got_fatal_signal, 1 );
124     init_one_signal (SIGSEGV, got_fatal_signal, 1 );
125     init_one_signal (SIGUSR1, got_usr_signal, 0 );
126     init_one_signal (SIGPIPE, SIG_IGN, 0 );
127 #endif
128 }
129
130
131 void
132 pause_on_sigusr( int which )
133 {
134 #ifndef HAVE_DOSISH_SYSTEM
135 #if defined(HAVE_SIGPROCMASK) && defined(HAVE_SIGSET_T)
136     sigset_t mask, oldmask;
137
138     assert( which == 1 );
139     sigemptyset( &mask );
140     sigaddset( &mask, SIGUSR1 );
141
142     sigprocmask( SIG_BLOCK, &mask, &oldmask );
143     while( !caught_sigusr1 )
144         sigsuspend( &oldmask );
145     caught_sigusr1 = 0;
146     sigprocmask( SIG_UNBLOCK, &mask, NULL );
147 #else 
148      assert (which == 1);
149      sighold (SIGUSR1);
150      while (!caught_sigusr1)
151          sigpause(SIGUSR1);
152      caught_sigusr1 = 0;
153      sigrelse(SIGUSR1); 
154 #endif /*!HAVE_SIGPROCMASK && HAVE_SISET_T*/
155 #endif
156 }
157
158
159 static void
160 do_block( int block )
161 {
162 #ifndef HAVE_DOSISH_SYSTEM
163     static int is_blocked;
164 #if defined(HAVE_SIGPROCMASK) && defined(HAVE_SIGSET_T)
165     static sigset_t oldmask;
166
167     if( block ) {
168         sigset_t newmask;
169
170         if( is_blocked )
171             log_bug("signals are already blocked\n");
172         sigfillset( &newmask );
173         sigprocmask( SIG_BLOCK, &newmask, &oldmask );
174         is_blocked = 1;
175     }
176     else {
177         if( !is_blocked )
178             log_bug("signals are not blocked\n");
179         sigprocmask( SIG_SETMASK, &oldmask, NULL );
180         is_blocked = 0;
181     }
182 #else /*!HAVE_SIGPROCMASK*/
183
184 #if defined(NSIG)
185 # define SIGSMAX (NSIG)
186 #elif defined(MAXSIG)
187 # define SIGSMAX (MAXSIG+1)
188 #else
189 # error "define SIGSMAX to the number of signals on your platform plus one"
190 #endif
191
192     static void (*disposition[SIGSMAX])(int);
193     int sig;
194
195     if( block ) {
196         if( is_blocked )
197             log_bug("signals are already blocked\n");
198         for (sig=1; sig < SIGSMAX; sig++) {
199             disposition[sig] = sigset (sig, SIG_HOLD);
200         }
201         is_blocked = 1;
202     }
203     else {
204         if( !is_blocked )
205             log_bug("signals are not blocked\n");
206         for (sig=1; sig < SIGSMAX; 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 block_all_signals()
218 {
219     do_block(1);
220 }
221
222 void
223 unblock_all_signals()
224 {
225     do_block(0);
226 }