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