/*
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", 1, 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' },
};
/* Command line option variables */
-static bool opt_create_keypair = FALSE;
static char *opt_keypath = NULL;
static char *opt_pkcs = "rsa";
static char *opt_identifier = NULL;
/* 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=string Enable debugging (Implies --foreground)\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");
+ 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);
}
+/* Die 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);
+ }
+ }
+}
+
+/* Drop root privileges. If some system call fails, die. */
+
+static void silc_server_drop(SilcServer server)
+{
+ /* Are we executing silcd as root or a regular user? */
+ if (geteuid()) {
+ SILC_LOG_DEBUG(("Server started as user"));
+ }
+ else {
+ struct passwd *pw;
+ struct group *gr;
+ char *user, *group;
+
+ SILC_LOG_DEBUG(("Server started as root. Dropping privileges."));
+
+ /* Get the values given for user and group in configuration file */
+ user = server->config->server_info->user;
+ group = server->config->server_info->group;
+
+ if (!user || !group) {
+ fprintf(stderr, "Error:"
+ "\tSILC server must not be run as root. For the security of your\n"
+ "\tsystem it is strongly suggested that you run SILC under dedicated\n"
+ "\tuser account. Modify the ServerInfo configuration section to run\n"
+ "\tthe server as non-root user.\n");
+ exit(1);
+ }
+
+ /* Check whether the user/group does not begin with a number */
+ if (isdigit(user[0]) || isdigit(group[0])) {
+ SILC_LOG_DEBUG(("User and/or group starts with a number"));
+ fprintf(stderr, "Invalid user and/or group information\n");
+ fprintf(stderr, "Please assign them as names, not numbers\n");
+ exit(1);
+ }
+
+ if (!(pw = getpwnam(user))) {
+ fprintf(stderr, "Error: No such user %s found.\n", user);
+ exit(1);
+ }
+ if (!(gr = getgrnam(group))) {
+ fprintf(stderr, "Error: No such group %s found.\n", group);
+ exit(1);
+ }
+
+ /* Check whether user and/or group is set to root. If yes, exit
+ immediately. Otherwise, setgid and setuid server to user.group */
+ if ((gr->gr_gid == 0) || (pw->pw_uid == 0)) {
+ fprintf(stderr, "Error:"
+ "\tSILC server must not be run as root. For the security of your\n"
+ "\tsystem it is strongly suggested that you run SILC under dedicated\n"
+ "\tuser account. Modify the ServerInfo configuration section to run\n"
+ "\tthe server as non-root user.\n");
+ exit(1);
+ }
+
+ SILC_LOG_DEBUG(("Changing to group %s (gid=%u)", group, gr->gr_gid));
+ if (setgid(gr->gr_gid) != 0) {
+ fprintf(stderr, "Error: Failed setgid() to %s (gid=%u). Exiting.\n",
+ group, gr->gr_gid);
+ exit(1);
+ }
+#if defined HAVE_SETGROUPS && defined HAVE_INITGROUPS
+ SILC_LOG_DEBUG(("Removing supplementary groups"));
+ if (setgroups(0, NULL) != 0) {
+ fprintf(stderr, "Error: Failed setgroups() to NULL. Exiting.\n");
+ exit(1);
+ }
+ SILC_LOG_DEBUG(("Setting supplementary groups for user %s", user));
+ if (initgroups(user, gr->gr_gid) != 0) {
+ fprintf(stderr, "Error: Failed initgroups() for user %s (gid=%u). "
+ "Exiting.\n", user, gr->gr_gid);
+ exit(1);
+ }
+#endif
+ SILC_LOG_DEBUG(("Changing to user %s (uid=%u)", user, pw->pw_uid));
+ if (setuid(pw->pw_uid) != 0) {
+ fprintf(stderr, "Error: Failed to setuid() to %s (gid=%u). Exiting.\n",
+ user, pw->pw_uid);
+ exit(1);
+ }
+ }
+}
+
+/* Fork server to background */
+
+static void silc_server_daemonise(SilcServer server)
+{
+ int i;
+
+ SILC_LOG_DEBUG(("Forking SILC server to background"));
+
+ if ((i = fork()) < 0) {
+ fprintf(stderr, "Error: fork() failed: %s\n", strerror(errno));
+ exit(1);
+ }
+
+ if (i) /* Kill the parent */
+ exit(0);
+
+ server->background = TRUE;
+ setsid();
+
+ /* XXX close stdin, stdout, stderr -- before this, check that all writes
+ to stderr are changed to SILC_SERVER_LOG_ERROR() */
+}
+
+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);
+}
+
+/* This function should not be called directly but throught the wrapper
+ macro SILC_SERVER_LOG_STDERR() */
+
+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;
- int foreground = FALSE;
- char *config_file = NULL;
- SilcServer silcd;
+ int ret, opt, option_index;
+ bool foreground = FALSE;
+ bool opt_create_keypair = 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:d:hFVC:",
+ while ((opt = getopt_long(argc, argv, "f:p:d:xhFVC:",
long_opts, &option_index)) != EOF) {
- switch(opt)
- {
+ switch(opt) {
case 'h':
silc_usage();
break;
case 'V':
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 "
+ silc_dist_version, silc_version);
+ 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_log_set_debug_string(optarg);
-#ifndef SILC_DEBUG
- fprintf(stdout,
+ 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;
default:
silc_usage();
break;
- }
+ }
}
}
}
/* 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);
goto fail;
/* Read configuration files */
- silcd->config = silc_server_config_alloc(config_file);
+ silcd->config = silc_server_config_alloc(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 */
sa.sa_flags = 0;
sigemptyset(&sa.sa_mask);
sigaction(SIGPIPE, &sa, NULL);
-
- if ((silc_debug == FALSE) && (foreground == FALSE))
- /* Before running the server, fork to background. */
+ 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(SILC_SERVER_PID_FILE);
- memset(pid, 0, sizeof(pid));
- snprintf(pid, sizeof(pid) - 1, "%d\n", getpid());
- if (silcd->config->pidfile && silcd->config->pidfile->pid_file) {
- silc_file_writefile(silcd->config->pidfile->pid_file, pid, strlen(pid));
- } else {
- silc_file_writefile(SILC_SERVER_PID_FILE, 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));
+ }
}
-
- /* Drop root. */
- silc_server_drop(silcd);
/* 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);
/* 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();
/* 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)
{
SilcPrivateKey prv_key;
SilcRng rng;
unsigned char *key;
- uint32 key_len;
+ SilcUInt32 key_len;
char pkfile[256], prvfile[256];
if (!pkcs_name || !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);