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