new release
[gnupg.git] / g10 / gpgd.c
1 /* ggpd.c - The GNUPG daemon (keyserver)
2  *      Copyright (C) 1998 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 <errno.h>
24 #include <stdlib.h>
25 #include <string.h>
26 #include <unistd.h>
27 #include <signal.h>
28 #include <sys/stat.h>
29
30 #include "util.h"
31 #include "cipher.h"
32 #include "options.h"
33 #include "main.h"
34
35
36 static ARGPARSE_OPTS opts[] = {
37     { 'v', "verbose",   0, "verbose" },
38     { 501, "options"   ,2, "read options from file"},
39     { 502, "no-daemon", 0, "do not operate as a daemon" },
40     { 510, "debug"     ,4|16, "set debugging flags"},
41     { 511, "debug-all" ,0, "enable full debugging"},
42 {0} };
43
44
45
46 static char *build_list( const char *text,
47                          const char * (*mapf)(int), int (*chkf)(int) );
48 static void become_daemon(void);
49
50 const char *
51 strusage( int level )
52 {
53   static char *digests, *pubkeys, *ciphers;
54     const char *p;
55     switch( level ) {
56       case 11: p = "gpgd (GNUPG)"; break;
57       case 13: p = VERSION; break;
58       case 17: p = PRINTABLE_OS_NAME; break;
59       case 19: p =
60             "Please report bugs to <gnupg-bugs@isil.d.shuttle.de>.\n";
61         break;
62       case 1:
63       case 40:  p = "Usage: gpgd [options] (-h for help)";
64         break;
65       case 41:  p = "Syntax: gpgd [options] [files]\n"
66                     "GNUPG keyserver\n";
67         break;
68       case 31: p = "\n"; break;
69       case 32:
70         if( !ciphers )
71             ciphers = build_list("Supported ciphers: ", cipher_algo_to_string,
72                                                         check_cipher_algo );
73         p = ciphers;
74         break;
75       case 33:
76         if( !pubkeys )
77             pubkeys = build_list("Supported pubkeys: ", pubkey_algo_to_string,
78                                                         check_pubkey_algo );
79         p = pubkeys;
80         break;
81       case 34:
82         if( !digests )
83             digests = build_list("Supported digests: ", digest_algo_to_string,
84                                                         check_digest_algo );
85         p = digests;
86         break;
87
88       default:  p = default_strusage(level);
89     }
90     return p;
91 }
92
93
94 static char *
95 build_list( const char *text, const char * (*mapf)(int), int (*chkf)(int) )
96 {
97     int i;
98     const char *s;
99     size_t n=strlen(text)+2;
100     char *list, *p;
101
102     for(i=1; i < 100; i++ )
103         if( !chkf(i) && (s=mapf(i)) )
104             n += strlen(s) + 2;
105     list = m_alloc( 21 + n ); *list = 0;
106     for(p=NULL, i=1; i < 100; i++ ) {
107         if( !chkf(i) && (s=mapf(i)) ) {
108             if( !p )
109                 p = stpcpy( list, text );
110             else
111                 p = stpcpy( p, ", ");
112             p = stpcpy(p, s );
113         }
114     }
115     if( p )
116         p = stpcpy(p, "\n" );
117     return list;
118 }
119
120
121 static void
122 set_debug(void)
123 {
124     if( opt.debug & DBG_MEMORY_VALUE )
125         memory_debug_mode = 1;
126     if( opt.debug & DBG_MEMSTAT_VALUE )
127         memory_stat_debug_mode = 1;
128     if( opt.debug & DBG_MPI_VALUE )
129         mpi_debug_mode = 1;
130     if( opt.debug & DBG_CIPHER_VALUE )
131         cipher_debug_mode = 1;
132     if( opt.debug & DBG_IOBUF_VALUE )
133         iobuf_debug_mode = 1;
134 }
135
136
137 void
138 main( int argc, char **argv )
139 {
140     ARGPARSE_ARGS pargs;
141     int orig_argc;
142     char **orig_argv;
143     FILE *configfp = NULL;
144     char *configname = NULL;
145     unsigned configlineno;
146     int parse_debug = 0;
147     int default_config =1;
148     int daemon = 1;
149
150     secmem_init( 0 );      /* disable use of secmem */
151     log_set_name("gpgd");
152     log_set_pid( getpid() );
153     opt.compress = -1; /* defaults to standard compress level */
154     opt.batch = 1;
155
156     /* check whether we have a config file on the commandline */
157     orig_argc = argc;
158     orig_argv = argv;
159     pargs.argc = &argc;
160     pargs.argv = &argv;
161     pargs.flags=  1;  /* do not remove the args */
162     while( arg_parse( &pargs, opts) ) {
163         if( pargs.r_opt == 510 || pargs.r_opt == 511 )
164             parse_debug++;
165         else if( pargs.r_opt == 501 ) {
166             /* yes there is one, so we do not try the default one, but
167              * read the option file when it is encountered at the commandline
168              */
169             default_config = 0;
170         }
171     }
172
173     if( default_config )
174         configname = make_filename("/etc/gpgd.conf", NULL );
175
176     argc = orig_argc;
177     argv = orig_argv;
178     pargs.argc = &argc;
179     pargs.argv = &argv;
180     pargs.flags=  1;  /* do not remove the args */
181   next_pass:
182     if( configname ) {
183         configlineno = 0;
184         configfp = fopen( configname, "r" );
185         if( !configfp ) {
186             if( default_config ) {
187                 if( parse_debug )
188                     log_info("note: no default option file '%s'\n",
189                                                             configname );
190             }
191             else {
192                 log_error("option file '%s': %s\n",
193                                     configname, strerror(errno) );
194                 g10_exit(1);
195             }
196             m_free(configname); configname = NULL;
197         }
198         if( parse_debug && configname )
199             log_info("reading options from '%s'\n", configname );
200         default_config = 0;
201     }
202
203     while( optfile_parse( configfp, configname, &configlineno,
204                                                 &pargs, opts) ) {
205         switch( pargs.r_opt ) {
206           case 'v': opt.verbose++; break;
207           case 501:
208             if( !configfp ) {
209                 m_free(configname);
210                 configname = m_strdup(pargs.r.ret_str);
211                 goto next_pass;
212             }
213             break;
214           case 502: daemon = 0; break;
215           case 510: opt.debug |= pargs.r.ret_ulong; break;
216           case 511: opt.debug = ~0; break;
217           default : pargs.err = configfp? 1:2; break;
218         }
219     }
220     if( configfp ) {
221         fclose( configfp );
222         configfp = NULL;
223         m_free(configname); configname = NULL;
224         goto next_pass;
225     }
226     m_free( configname ); configname = NULL;
227     if( log_get_errorcount(0) )
228         g10_exit(2);
229
230     fprintf(stderr, "%s %s; %s\n", strusage(11), strusage(13), strusage(14) );
231     fprintf(stderr, "%s\n", strusage(15) );
232
233     set_debug();
234     if( daemon )
235         become_daemon();
236
237
238
239
240     g10_exit(0);
241 }
242
243
244 void
245 g10_exit( int rc )
246 {
247     secmem_term();
248     rc = rc? rc : log_get_errorcount(0)? 2:0;
249     exit(rc );
250 }
251
252
253 static void
254 become_daemon()
255 {
256     long nfile;
257     int i, n;
258     int childpid;
259
260     if( opt.verbose )
261         log_info("becoming a daemon ...\n");
262     fflush(NULL);
263
264     /* FIXME: handle the TTY signals */
265
266     if( (childpid = fork()) == -1 )
267         log_fatal("can't fork first child: %s\n", strerror(errno));
268     else if( childpid > 0 )
269         exit(0); /* terminate parent */
270
271     /* Disassociate from controlling terminal etc. */
272     if( setsid() == -1 )
273         log_fatal("setsid() failed: %s\n", strerror(errno) );
274
275     log_set_pid( getpid() );
276     /* close all files but not the log files */
277     if( (nfile=sysconf( _SC_OPEN_MAX )) < 0 )
278       #ifdef _POSIX_OPEN_MAX
279         nfile = _POSIX_OPEN_MAX;
280       #else
281         nfile = 20; /* assume a common value */
282       #endif
283     n = fileno( stderr );
284     for(i=0; i < nfile; i++ )
285         if( i != n )
286             close(i);
287     errno = 0;
288
289     if( chdir("/") )
290         log_fatal("chdir to root failed: %s\n", strerror(errno) );
291     umask(0);
292
293     /* do not let possible children become zombies */
294     signal(SIGCHLD, SIG_IGN);
295     if( opt.verbose )
296         log_info("now running as daemon\n");
297 }
298
299
300