updates.
[silc.git] / apps / silcd / silcd.c
index ed64407f3b5762a27df78aba40c04b8e7982656d..c2318925f06e52c9596e32555e6f5360bc14199b 100644 (file)
@@ -1,23 +1,23 @@
 /*
 
   silcd.c
-  
+
   Author: Pekka Riikonen <priikone@silcnet.org>
 
-  Copyright (C) 1997 - 2001 Pekka Riikonen
+  Copyright (C) 1997 - 2002 Pekka Riikonen
 
   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2 of the License, or
   (at your option) any later version.
-  
+
   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.
 
 */
-/* 
+/*
  * Created: Wed Mar 19 00:17:12 1997
  *
  * This is the main program for the SILC daemon. This parses command
 
 #include "serverincludes.h"
 #include "server_internal.h"
-#include "version.h"
+#include "silcversion.h"
 
-static void silc_usage();
-static char *silc_server_create_identifier();
-static int 
-silc_server_create_key_pair(char *pkcs_name, int bits, char *path,
-                           char *identifier, 
-                           SilcPublicKey *ret_pub_key,
-                           SilcPrivateKey *ret_prv_key);
+/* For now, we'll have this one server context global for this module. */
+static SilcServer silcd;
+
+static void silc_usage(void);
+static char *silc_server_create_identifier(void);
+static int silc_server_create_key_pair(char *pkcs_name, int bits, char *path,
+                                      char *identifier,
+                                      SilcPublicKey *ret_pub_key,
+                                      SilcPrivateKey *ret_prv_key);
 
 /* Long command line options */
-static struct option long_opts[] = 
+static struct option long_opts[] =
 {
   { "config-file", 1, NULL, 'f' },
-  { "debug", 0, NULL, 'd' },
+  { "passphrase", 1, NULL, 'p' },
+  { "debug", 2, NULL, 'd' },
+  { "hexdump", 0, NULL, 'x' },
   { "help", 0, NULL, 'h' },
+  { "foreground", 0, NULL, 'F' },
   { "version", 0, NULL,'V' },
 
   /* Key management options */
@@ -63,54 +68,113 @@ static int opt_bits = 1024;
 
 /* Prints out the usage of silc client */
 
-static void silc_usage()
+static void silc_usage(void)
 {
-  printf("\
-Usage: silcd [options]\n\
-\n\
-  Generic Options:\n\
-  -f  --config-file=FILE        Alternate configuration file\n\
-  -d  --debug                   Enable debugging (no daemon)\n\
-  -h  --help                    Display this message\n\
-  -V  --version                 Display version\n\
-\n\
-  Key Management Options:\n\
-  -C, --create-key-pair=PATH    Create new public key pair\n\
-      --pkcs=PKCS               Set the PKCS of the public key pair\n\
-      --bits=VALUE              Set length of the public key pair\n\
-      --identifier=IDENTIFIER   Public key identifier\n\
-\n\
-      The public key identifier may be of the following format:\n\
-\n\
-      UN=<username>, HN=<hostname or IP>, RN=<real name>, E=<email>,\n\
-      O=<organization>, C=<country>\n\
-\n\
-      The UN and HN must be provided, the others are optional.  If the\n\
-      --identifier option is not used an identifier will be created for\n\
-      the public key automatically.\n\
-\n\
-      Example identifier: \"UN=foobar, HN=foo.bar.com, RN=Foo T. Bar, \n\
-                           E=foo@bar.com, C=FI\"\n\
-\n");
+  printf(""
+"Usage: silcd [options]\n"
+"\n"
+"  Generic Options:\n"
+"  -f  --config-file=FILE        Alternate configuration file\n"
+"  -d  --debug=string            Enable debugging (Implies --foreground)\n"
+"  -x  --hexdump                 Enable hexdumps (Implies --debug)\n"
+"  -h  --help                    Display this message\n"
+"  -F  --foreground              Dont fork\n"
+"  -V  --version                 Display version\n"
+"\n"
+"  Key Management Options:\n"
+"  -C, --create-key-pair=PATH    Create new public key pair\n"
+"      --pkcs=PKCS               Set the PKCS of the public key pair\n"
+"      --bits=VALUE              Set length of the public key pair\n"
+"      --identifier=IDENTIFIER   Public key identifier\n"
+"\n"
+"      The public key identifier may be of the following format:\n"
+"\n"
+"      UN=<username>, HN=<hostname or IP>, RN=<real name>, E=<email>,\n"
+"      O=<organization>, C=<country>\n"
+"\n"
+"      The UN and HN must be provided, the others are optional.  If the\n"
+"      --identifier option is not used an identifier will be created for\n"
+"      the public key automatically.\n"
+"\n"
+"      Example identifier: \"UN=foobar, HN=foo.bar.com, RN=Foo T. Bar, \n"
+"                           E=foo@bar.com, C=FI\"\n"
+"\n");
   exit(0);
 }
 
+/* Dies if a *valid* pid file exists already */
+
+static void silc_server_checkpid(SilcServer silcd)
+{
+  if (silcd->config->server_info->pid_file) {
+    int oldpid;
+    char *buf;
+    SilcUInt32 buf_len;
+
+    SILC_LOG_DEBUG(("Checking for another silcd running"));
+    buf = silc_file_readfile(silcd->config->server_info->pid_file, &buf_len);
+    if (!buf)
+      return;
+    oldpid = atoi(buf);
+    silc_free(buf);
+    if (oldpid <= 0)
+      return;
+    kill(oldpid, SIGCHLD); /* this signal does nothing, check if alive */
+    if (errno != ESRCH) {
+      fprintf(stderr, "\nI detected another daemon running with the "
+             "same pid file.\n");
+      fprintf(stderr, "Please change the config file, or erase the %s\n",
+       silcd->config->server_info->pid_file);
+      exit(1);
+    }
+  }
+}
+
+static void signal_handler(int sig)
+{
+  /* Mark the signal to be caller after this signal is over. */
+  silc_schedule_signal_call(silcd->schedule, sig);
+}
+
+SILC_TASK_CALLBACK(got_hup)
+{
+  /* First, reset all log files (they might have been deleted) */
+  /* XXX this may be redundant with the silc_server_config_setlogfiles() call.
+   * merge these two with the appropriate checking. */
+  silc_log_reset_all();
+  /* Rehash the configuration file */
+  silc_server_rehash(silcd);
+}
+
+SILC_TASK_CALLBACK(stop_server)
+{
+  /* Stop scheduler, the program will stop eventually after noticing
+     that the scheduler is down. */
+  silc_schedule_stop(silcd->schedule);
+}
+
+void silc_server_stderr(char *message)
+{
+  if (silcd->background)
+    silc_log_output(SILC_LOG_ERROR, message);
+  else {
+    fprintf(stderr, "%s", message);
+    silc_free(message);
+  }
+}
+
 int main(int argc, char **argv)
 {
-  int ret;
-  int opt, option_index;
-  char *config_file = NULL;
-  SilcServer silcd;
+  int ret, opt, option_index;
+  bool foreground = FALSE;
+  char *silcd_config_file = NULL;
   struct sigaction sa;
-  char pid[10];
-
-  silc_debug = FALSE;
 
   /* Parse command line arguments */
   if (argc > 1) {
-    while ((opt = getopt_long(argc, argv, "cf:dhVC:",
+    while ((opt = getopt_long(argc, argv, "f:p:d::xhFVC:",
                              long_opts, &option_index)) != EOF) {
-      switch(opt) 
+      switch(opt)
        {
        case 'h':
          silc_usage();
@@ -119,15 +183,40 @@ int main(int argc, char **argv)
          printf("SILCd Secure Internet Live Conferencing daemon, "
                 "version %s (base: SILC Toolkit %s)\n",
                  silc_dist_version, silc_version);
-         printf("(c) 1997 - 2001 Pekka Riikonen "
+         printf("(c) 1997 - 2002 Pekka Riikonen "
                 "<priikone@silcnet.org>\n");
          exit(0);
          break;
        case 'd':
+#ifdef SILC_DEBUG
          silc_debug = TRUE;
+         if (optarg)
+           silc_log_set_debug_string(optarg);
+         foreground = TRUE; /* implied */
+         silc_log_quick = TRUE; /* implied */
+#else
+         fprintf(stderr,
+                 "Run-time debugging is not enabled. To enable it recompile\n"
+                 "the server with --enable-debug configuration option.\n");
+#endif
+         break;
+       case 'x':
+#ifdef SILC_DEBUG
+         silc_debug_hexdump = TRUE;
+         silc_debug = TRUE; /* implied */
+         foreground = TRUE; /* implied */
+         silc_log_quick = TRUE; /* implied */
+#else
+         fprintf(stderr,
+                 "Run-time debugging is not enabled. To enable it recompile\n"
+                 "the server with --enable-debug configuration option.\n");
+#endif
          break;
        case 'f':
-         config_file = strdup(optarg);
+         silcd_config_file = strdup(optarg);
+         break;
+       case 'F':
+         foreground = TRUE;
          break;
 
          /*
@@ -170,8 +259,8 @@ int main(int argc, char **argv)
   }
 
   /* Default configuration file */
-  if (!config_file)
-    config_file = strdup(SILC_SERVER_CONFIG_FILE);
+  if (!silcd_config_file)
+    silcd_config_file = strdup(SILC_SERVER_CONFIG_FILE);
 
   /* Create SILC Server object */
   ret = silc_server_alloc(&silcd);
@@ -179,13 +268,16 @@ int main(int argc, char **argv)
     goto fail;
 
   /* Read configuration files */
-  silcd->config = silc_server_config_alloc(config_file);
+  silcd->config = silc_server_config_alloc(silcd, silcd_config_file);
   if (silcd->config == NULL)
     goto fail;
+  silcd->config_file = silcd_config_file;
+
+  /* Check for another silcd running */
+  silc_server_checkpid(silcd);
 
   /* Initialize the server */
-  ret = silc_server_init(silcd);
-  if (ret == FALSE)
+  if (silc_server_init(silcd) == FALSE)
     goto fail;
 
   /* Ignore SIGPIPE */
@@ -193,27 +285,42 @@ int main(int argc, char **argv)
   sa.sa_flags = 0;
   sigemptyset(&sa.sa_mask);
   sigaction(SIGPIPE, &sa, NULL);
-
-  if (silc_debug == FALSE)
-    /* Before running the server, fork to background and set
-       both user and group no non-root */    
+  sa.sa_handler = signal_handler;
+  sigaction(SIGHUP, &sa, NULL);
+  sigaction(SIGTERM, &sa, NULL);
+  sigaction(SIGINT, &sa, NULL);
+  silc_schedule_signal_register(silcd->schedule, SIGHUP, got_hup, NULL);
+  silc_schedule_signal_register(silcd->schedule, SIGTERM, stop_server, NULL);
+  silc_schedule_signal_register(silcd->schedule, SIGINT, stop_server, NULL);
+
+  if (!foreground) {
+    /* Drop root. */
+    silc_server_drop(silcd);
+
+    /* Before running the server, fork to background. */
     silc_server_daemonise(silcd);
 
-  /* Set /var/run/silcd.pid */
-  unlink("/var/run/silcd/pid");
-  memset(pid, 0, sizeof(pid));
-  snprintf(pid, sizeof(pid) - 1, "%d\n", getpid());
-  silc_file_writefile("/var/run/silcd.pid", pid, strlen(pid));
-  
+    /* If set, write pid to file */
+    if (silcd->config->server_info->pid_file) {
+      char buf[10], *pidfile = silcd->config->server_info->pid_file;
+      unlink(pidfile);
+      snprintf(buf, sizeof(buf) - 1, "%d\n", getpid());
+      silc_file_writefile(pidfile, buf, strlen(buf));
+    }
+  }
+
   /* Run the server. When this returns the server has been stopped
      and we will exit. */
   silc_server_run(silcd);
-  
-  /* Stop the server. This probably has been done already but it
-     doesn't hurt to do it here again. */
+
+  /* Stop the server and free it. */
   silc_server_stop(silcd);
   silc_server_free(silcd);
-  
+  silc_server_config_destroy(silcd->config);
+
+  /* Flush the logging system */
+  silc_log_flush_all();
+
   exit(0);
  fail:
   exit(1);
@@ -221,11 +328,11 @@ int main(int argc, char **argv)
 
 /* Returns identifier string for public key generation. */
 
-static char *silc_server_create_identifier()
+static char *silc_server_create_identifier(void)
 {
   char *username = NULL, *realname = NULL;
   char hostname[256], email[256];
-  
+
   /* Get realname */
   realname = silc_get_real_name();
 
@@ -248,9 +355,9 @@ static char *silc_server_create_identifier()
 /* Creates new public key and private key pair. This is used only
    when user wants to create new key pair from command line. */
 
-static int 
+static int
 silc_server_create_key_pair(char *pkcs_name, int bits, char *path,
-                           char *identifier, 
+                           char *identifier,
                            SilcPublicKey *ret_pub_key,
                            SilcPrivateKey *ret_prv_key)
 {
@@ -259,7 +366,7 @@ silc_server_create_key_pair(char *pkcs_name, int bits, char *path,
   SilcPrivateKey prv_key;
   SilcRng rng;
   unsigned char *key;
-  uint32 key_len;
+  SilcUInt32 key_len;
   char pkfile[256], prvfile[256];
 
   if (!pkcs_name || !path)
@@ -287,7 +394,7 @@ silc_server_create_key_pair(char *pkcs_name, int bits, char *path,
 
   /* Generate keys */
   silc_pkcs_alloc(pkcs_name, &pkcs);
-  pkcs->pkcs->init(pkcs->context, bits, rng);
+  silc_pkcs_generate_key(pkcs, bits, rng);
 
   /* Save public key into file */
   key = silc_pkcs_get_public_key(pkcs, &key_len);