* revoke.c (export_minimal_pk, gen_desig_revoke, gen_revoke): Export a
[gnupg.git] / g10 / signal.c
1 /* signal.c - signal handling
2  * Copyright (C) 1998, 1999, 2000, 2001 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   #ifdef HAVE_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     secmem_term();
92     /* better don't transtale these messages */
93     write(2, "\n", 1 );
94     s = 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     remove_lockfiles ();
102 #ifdef __riscos__
103     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    #ifdef HAVE_SIGPROCMASK
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*/
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   #ifdef HAVE_SIGPROCMASK
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     static void (*disposition[MAXSIG])();
184     int sig;
185
186     if( block ) {
187         if( is_blocked )
188             log_bug("signals are already blocked\n");
189         for (sig=1; sig < MAXSIG; sig++) {
190             disposition[sig] = sigset (sig, SIG_HOLD);
191         }
192         is_blocked = 1;
193     }
194     else {
195         if( !is_blocked )
196             log_bug("signals are not blocked\n");
197         for (sig=1; sig < MAXSIG; sig++) {
198             sigset (sig, disposition[sig]);
199         }
200         is_blocked = 0;
201     }
202   #endif /*!HAVE_SIGPROCMASK*/
203  #endif /*HAVE_DOSISH_SYSTEM*/
204 }
205
206
207 void
208 block_all_signals()
209 {
210     do_block(1);
211 }
212
213 void
214 unblock_all_signals()
215 {
216     do_block(0);
217 }