ramkomd.c 17.6 KB
Newer Older
Linus Tolke Y's avatar
Linus Tolke Y committed
1
/*
2
 * $Id: ramkomd.c,v 0.118 2003/07/24 08:37:44 ceder Exp $
Per Cederqvist's avatar
Per Cederqvist committed
3
 * Copyright (C) 1991-1999, 2001-2002  Lysator Academic Computer Association.
Linus Tolke Y's avatar
Linus Tolke Y committed
4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
 *
 * This file is part of the LysKOM server.
 * 
 * LysKOM 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 1, or (at your option) 
 * any later version.
 * 
 * LysKOM 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.
 * 
 * You should have received a copy of the GNU General Public License
 * along with LysKOM; see the file COPYING.  If not, write to
 * Lysator, c/o ISY, Linkoping University, S-581 83 Linkoping, SWEDEN,
 * or the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, 
 * MA 02139, USA.
 *
 * Please mail bug reports to bug-lyskom@lysator.liu.se. 
 */
25 26 27 28 29 30 31
/*
 * The next comment block is a historic comment, written in Swedish
 * using ISO 646 since nobody in Lysator knew about ISO 8859-1 by
 * then.  It translates, rougly, to "This is the main program of the
 * server.  It will hopefully be bigger than it is at the moment.
 * Created by Willfr 31-mar-1990."
 */
Per Cederqvist's avatar
Per Cederqvist committed
32 33 34 35 36 37 38 39 40
/*
 * Detta {r serverns huvudprogram. Det kommer f|rhoppningsvis bli st|rre
 * {n det {r just nu...
 *
 * Created by Willf|r 31/3-90
 *
 * It has grown! /ceder
 */

David Byers's avatar
David Byers committed
41 42 43 44 45

#ifdef HAVE_CONFIG_H
#  include <config.h>
#endif

46 47 48
#ifdef HAVE_LOCALE_H
#  include <locale.h>
#endif
Per Cederqvist's avatar
Per Cederqvist committed
49
#include <stdio.h>
Per Cederqvist's avatar
Per Cederqvist committed
50
#include <signal.h>
51 52 53 54 55 56
#ifdef HAVE_STDLIB_H
#  include <stdlib.h>
#endif
#ifdef HAVE_STRING_H
#  include <string.h>
#endif
Per Cederqvist's avatar
Per Cederqvist committed
57
#include <sys/wait.h>
58
#include "timewrap.h"
59 60 61
#ifdef HAVE_SYS_RESOURCE_H
#  include <sys/resource.h>
#endif
Per Cederqvist's avatar
Per Cederqvist committed
62
#include <unistd.h>
Per Cederqvist's avatar
Per Cederqvist committed
63 64 65 66
#include <setjmp.h>
#if defined(HAVE_SYS_PARAM_H) && !defined(HAVE_GETCWD)
# include <sys/param.h>
#endif
Per Cederqvist's avatar
Per Cederqvist committed
67
#include <errno.h>
Per Cederqvist's avatar
Per Cederqvist committed
68
#include <sys/types.h>
69
#include <sys/socket.h>
Per Cederqvist's avatar
Per Cederqvist committed
70
#include <fcntl.h>
Per Cederqvist's avatar
Per Cederqvist committed
71

72 73
#include "oop.h"

Per Cederqvist's avatar
Per Cederqvist committed
74
#include "exp.h"
75
#include "s-string.h"
Per Cederqvist's avatar
Per Cederqvist committed
76
#include "misc-types.h"
77
#include "kom-types.h"
Per Cederqvist's avatar
Per Cederqvist committed
78
#include "com.h"
79
#include "async.h"
Per Cederqvist's avatar
Per Cederqvist committed
80 81 82
#include "connections.h"
#include "internal-connections.h"
#include "kom-errno.h"
83
#include "oop-malloc.h"
Per Cederqvist's avatar
Per Cederqvist committed
84
#include "isc-malloc.h"
85
#include "isc-interface.h"
David Byers's avatar
David Byers committed
86
#include "kom-config.h"
Per Cederqvist's avatar
Per Cederqvist committed
87
#include "cache.h"
Per Cederqvist's avatar
Per Cederqvist committed
88 89
#include "string-malloc.h"
#include "lyskomd.h"
Per Cederqvist's avatar
Per Cederqvist committed
90
#include "log.h"
Per Cederqvist's avatar
Per Cederqvist committed
91 92
#include "server/smalloc.h"
#include "kom-memory.h"
93 94
#include "conf-file.h"
#include "param.h"
95 96
#include "server-config.h"
#include "manipulate.h"
97
#include "version-info.h"
98
#include "aux-items.h"
David Byers's avatar
David Byers committed
99
#include "admin.h"
100
#include "unused.h"
Per Cederqvist's avatar
Per Cederqvist committed
101
#include "sigflags.h"
Per Cederqvist's avatar
Per Cederqvist committed
102
#include "local-to-global.h"
103
#include "server-time.h"
104
#include "lockdb.h"
Per Cederqvist's avatar
Per Cederqvist committed
105
#include "linkansi.h"
106 107 108
#ifdef TRACED_ALLOCATIONS
#  include "trace-alloc.h"
#endif
109
#include "eintr.h"
110
#include "stats.h"
111

112 113 114 115
#if defined(HAVE_SETRLIMIT) && defined(RLIMIT_OFILE) && !defined(RLIMIT_NOFILE)
#  define RLIMIT_NOFILE RLIMIT_OFILE
#endif

116 117 118 119
#if !HAVE_RLIM_T
typedef int rlim_t;
#endif

120
struct timeval current_time = { 0, 0 };
121 122


Per Cederqvist's avatar
Per Cederqvist committed
123
#ifndef NDEBUG
124
int	buglevel = 0;
125
#endif
Per Cederqvist's avatar
Per Cederqvist committed
126

127 128 129 130 131
/* Don't place lyskomd in the background.  Write the log to stdout.
   Prompt for input on stdin before exiting.  This is primarily
   intended for debugging and the test suite. */
static int foreground = 0;

132 133
static oop_adapter_signal *kom_signal_adapter;

134
static void dump_exit_statistics(void);
David Byers's avatar
David Byers committed
135
static void free_kom_info(void);
136 137 138 139 140 141
static oop_call_signal sighandler_hup;
static oop_call_signal sighandler_quit;
static oop_call_signal sighandler_usr1;
static oop_call_signal sighandler_usr2;
static oop_call_signal sighandler_winch;

142

143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159
#ifdef HAVE_STRUCT_SIGACTION

/* Assigning SIG_IGN to sa_handler results in

    ramkomd.c:310: warning: function declaration isn't a prototype

  on certain compilers.  By performing the assignment in a function
  the number of warnings are reduced. */

static inline void
set_handler_sig_ign(struct sigaction *ptr)
{
    ptr->sa_handler = SIG_IGN;
}

#endif

Per Cederqvist's avatar
Per Cederqvist committed
160
static void
Per Cederqvist's avatar
Per Cederqvist committed
161
server_init(const char *host, const char * client_port)
Per Cederqvist's avatar
Per Cederqvist committed
162
{
163 164 165
    struct isc_scb *listen_client;
    union isc_address *isc_adr = NULL;
    oop_source *src;
166 167 168 169
#ifdef HAVE_STRUCT_SIGACTION
    struct sigaction act;
#endif

170 171 172 173 174 175 176
    oop_malloc = &oop_malloc_wrapper;
    oop_realloc = &oop_realloc_wrapper;
    oop_free = &oop_free_wrapper;

    kom_server_oop_src = oop_sys_new();
    if (kom_server_oop_src == NULL)
	restart_kom("server_init: can't get system event source\n");
177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205

    kom_signal_adapter = oop_signal_new(oop_sys_source(kom_server_oop_src));
    if (kom_signal_adapter == NULL)
	restart_kom("server_init: can't create signal adapter\n");

    /* Ignore the signals before we register them with liboop.  That
       way, when liboop reinstalls the old signal handler during
       shutdown, we will ignore them rather than stop prematurely
       during the shutdown.  This is especially important for the
       SIGHUP signal, which is sent periodically by updateLysKOM. */
#ifdef HAVE_STRUCT_SIGACTION
    sigemptyset(&act.sa_mask);
    act.sa_flags = 0;
    set_handler_sig_ign(&act);
    sigaction(SIGHUP, &act, NULL);
    sigaction(SIGQUIT, &act, NULL);
    sigaction(SIGUSR1, &act, NULL);
    sigaction(SIGUSR2, &act, NULL);
    sigaction(SIGWINCH, &act, NULL);
#else
    signal(SIGHUP, SIG_IGN);
    signal(SIGQUIT, SIG_IGN);
    signal(SIGUSR1, SIG_IGN);
    signal(SIGUSR2, SIG_IGN);
    signal(SIGWINCH, SIG_IGN);
#endif

    src = oop_signal_source(kom_signal_adapter);
    oop_signal_use_sa_restart();
206 207 208 209 210 211
    src->on_signal(src, SIGHUP, sighandler_hup, NULL);
    src->on_signal(src, SIGQUIT, sighandler_quit, NULL);
    src->on_signal(src, SIGUSR1, sighandler_usr1, NULL);
    src->on_signal(src, SIGUSR2, sighandler_usr2, NULL);
    src->on_signal(src, SIGWINCH, sighandler_winch, NULL);

Per Cederqvist's avatar
Per Cederqvist committed
212 213 214
    /*
    ** Setup some parameters here
    */
215 216 217 218 219
    isc_setallocfn(&isc_malloc_wrapper,
		   &isc_realloc_wrapper,
		   &isc_free_wrapper);

    kom_server_mcb  = isc_initialize(oop_sys_source(kom_server_oop_src));
Per Cederqvist's avatar
Per Cederqvist committed
220
    if ( kom_server_mcb == NULL )
Per Cederqvist's avatar
Per Cederqvist committed
221
	restart_kom("server_init: can't isc_initialize()\n");
222
    isc_cfg_fd_relocate(kom_server_mcb, PROTECTED_FDS);
Per Cederqvist's avatar
Per Cederqvist committed
223

224 225
    listen_client = isc_listentcp(kom_server_mcb, host, client_port,
				  handle_accept_event);
Per Cederqvist's avatar
Per Cederqvist committed
226 227
    if (listen_client == NULL)
        restart_kom("server_init: can't isc_listentcp(CLIENT)\n");
Per Cederqvist's avatar
Per Cederqvist committed
228

229 230 231 232
    isc_adr = isc_getladdress (listen_client);
    if (isc_adr == NULL)
	restart_kom("server_init(): can't isc_getladdress (listen_client)\n");

David Byers's avatar
David Byers committed
233
    kom_log("Listening for clients on %d.\n", isc_getportnum(isc_adr));
234 235
    isc_freeaddress (isc_adr);
    
Per Cederqvist's avatar
Per Cederqvist committed
236 237 238 239 240 241

    /*
     * Ignore SIGPIPE, which the server gets if it tries to write to a
     * socket and the client has died. The server will anyhow handle
     * this situation correct.
     */
242 243 244
#ifdef HAVE_STRUCT_SIGACTION
    sigemptyset(&act.sa_mask);
    act.sa_flags = 0;
245
    set_handler_sig_ign(&act);
246
    sigaction(SIGPIPE, &act, NULL);
247
#else
Per Cederqvist's avatar
Per Cederqvist committed
248
    signal(SIGPIPE, SIG_IGN);
249
#endif
Per Cederqvist's avatar
Per Cederqvist committed
250 251 252
}

static void
253
init_data_base(void)
Per Cederqvist's avatar
Per Cederqvist committed
254
{
David Byers's avatar
David Byers committed
255 256 257
    kom_log("Database = %s\n",  param.datafile_name);
    kom_log("Backup = %s\n", param.backupfile_name);
    kom_log("2nd Backup = %s\n", param.backupfile_name_2);
258
    kom_log("Lock File = %s\n", param.lockfile_name);
Per Cederqvist's avatar
Per Cederqvist committed
259 260
    
    if ( init_cache() == FAILURE )
261
	restart_kom ("Cannot find database.\n");
Per Cederqvist's avatar
Per Cederqvist committed
262 263
}

264 265 266 267
static void *
sighandler_hup(oop_source *UNUSED(source),
	       int UNUSED(sig),
	       void *UNUSED(user))
Per Cederqvist's avatar
Per Cederqvist committed
268
{
David Byers's avatar
David Byers committed
269
    kom_log ("Signal HUP received. Shutting down server.\n");
270
    go_and_die = TRUE;
271
    return OOP_HALT;
Per Cederqvist's avatar
Per Cederqvist committed
272 273
}

274 275 276 277
static void *
sighandler_quit(oop_source *UNUSED(source),
		int UNUSED(sig),
		void *UNUSED(user))
Per Cederqvist's avatar
Per Cederqvist committed
278
{
David Byers's avatar
David Byers committed
279
    kom_log ("Signal QUIT received - syncing...\n");
Per Cederqvist's avatar
Per Cederqvist committed
280
    cache_sync_all();
David Byers's avatar
David Byers committed
281
    kom_log ("Dumping core now.\n");
Per Cederqvist's avatar
Per Cederqvist committed
282 283 284
    abort();
}

285 286 287 288
static void *
sighandler_usr1(oop_source *UNUSED(source),
		int UNUSED(sig),
		void *UNUSED(user))
Per Cederqvist's avatar
Per Cederqvist committed
289
{
290 291
    dump_statistics();
    return OOP_CONTINUE;
Per Cederqvist's avatar
Per Cederqvist committed
292 293
}

294 295 296 297
static void *
sighandler_usr2(oop_source *UNUSED(source),
		int UNUSED(sig),
		void *UNUSED(user))
Per Cederqvist's avatar
Per Cederqvist committed
298 299 300
{
    int		  child;

David Byers's avatar
David Byers committed
301
    kom_log ("Signal USR2 received - will dump core now.  (Check that child dies.)\n");
Per Cederqvist's avatar
Per Cederqvist committed
302 303 304
    if ((child = fork()) == 0)
    {
	abort();
305
	kom_log ("Abort() failed!!!\n");
Per Cederqvist's avatar
Per Cederqvist committed
306 307 308 309
	exit(1);
    }
    else if (child < 0)
    {
David Byers's avatar
David Byers committed
310
	kom_log ("Couldn't fork.\n");
Per Cederqvist's avatar
Per Cederqvist committed
311 312 313 314 315
    }
    else
    {
	wait (NULL);
    }
316
    return OOP_CONTINUE;
Per Cederqvist's avatar
Per Cederqvist committed
317 318
}

319 320 321 322
static void *
sighandler_winch(oop_source *UNUSED(source),
		 int UNUSED(sig),
		 void *UNUSED(user))
323
{
324 325 326 327
    free_aux_item_definitions();
    initialize_aux_items(param.aux_def_file);
    kom_log("Signal WINCH received. aux definitions reloaded.\n");
    return OOP_CONTINUE;
328 329
}

Per Cederqvist's avatar
Per Cederqvist committed
330
static void
Per Cederqvist's avatar
Per Cederqvist committed
331 332 333 334
save_pid(void)
{
    FILE *fp;

335
    if ((fp = i_fopen(param.pid_name, "w")) == NULL)
Per Cederqvist's avatar
Per Cederqvist committed
336 337
	return;

338
    fprintf(fp, "%ld\n", (long)getpid());
339
    i_fclose(fp);
Per Cederqvist's avatar
Per Cederqvist committed
340 341
}

Per Cederqvist's avatar
Per Cederqvist committed
342
static void
343
go_daemon(void)
Per Cederqvist's avatar
Per Cederqvist committed
344 345 346
{
    pid_t child;
    int fd;
347 348 349 350
#ifdef HAVE_STRUCT_SIGACTION
    struct sigaction act;
#endif
    
351
    if (foreground != 0)
352 353 354 355
    {
	return;
    }

Per Cederqvist's avatar
Per Cederqvist committed
356 357 358 359 360
    if (getppid() != 1)
    {
	/* We were not invoked from /etc/inittab, so
	   disassociate from controlling terminal. */

361 362 363
#ifdef HAVE_STRUCT_SIGACTION
	sigemptyset(&act.sa_mask);
	act.sa_flags = 0;
364
	set_handler_sig_ign(&act);
365 366 367 368 369 370 371 372 373 374 375 376 377 378

#  ifdef SIGTTOU
	sigaction(SIGTTOU, &act, NULL);
#  endif
#  ifdef SIGTTIN
	sigaction(SIGTTIN, &act, NULL);
#  endif
#  ifdef SIGTSTP
	sigaction(SIGTSTP, &act, NULL);
#  endif

#else  /* !HAVE_STRUCT_SIGACTION */

#  ifdef SIGTTOU
Per Cederqvist's avatar
Per Cederqvist committed
379
	signal(SIGTTOU, SIG_IGN);
380 381
#  endif
#  ifdef SIGTTIN
Per Cederqvist's avatar
Per Cederqvist committed
382
	signal(SIGTTIN, SIG_IGN);
383 384
#  endif
#  ifdef SIGTSTP
Per Cederqvist's avatar
Per Cederqvist committed
385
	signal(SIGTSTP, SIG_IGN);
386 387
#  endif

Per Cederqvist's avatar
Per Cederqvist committed
388 389 390 391 392 393 394 395 396 397 398 399
#endif

	child = fork();
	if (child < 0)
	    restart_kom("fork failed: %d\n", errno);
	else if (child > 0)
	    exit (0);		/* parent */
	
	setsid();
    }

    /* Close all file descriptors */
400
    for (fd = 0; fd < fd_ceiling; fd++)
Per Cederqvist's avatar
Per Cederqvist committed
401 402 403
	close(fd);
    if (open("/dev/null", O_RDONLY) != 0
	||open("/dev/null", O_WRONLY) != 1
404
	||open(param.logfile_name, O_WRONLY|O_CREAT|O_APPEND, 0644) != 2)
Per Cederqvist's avatar
Per Cederqvist committed
405 406 407
    {
	/* Kinda stupid to try to log an error message now, but
	   who knows? */
408
	restart_kom("open of log file failed: %d\n", errno);
Per Cederqvist's avatar
Per Cederqvist committed
409
    }
David Byers's avatar
David Byers committed
410 411
    kom_log("*** Version %s (process %lu) coming up.\n",
            kom_version_info.server_version, (unsigned long)getpid());
Per Cederqvist's avatar
Per Cederqvist committed
412 413
}

414
static void
415
initialize(const char *config_file)
416
{
417
#ifdef USING_RLIMIT_NOFILE
418 419 420
    struct rlimit rlim;
#endif

421
    read_configuration(config_file);
422
    initialize_aux_items(param.aux_def_file);
423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438

#ifdef HAVE_LOCALE_H
    if (param.use_locale != NULL)
	if (setlocale(LC_CTYPE, param.use_locale) == NULL)
	{
	    fprintf(stderr, "setlocale: ");
	    perror(param.use_locale);
	    exit(1);
	}
#else
    if (param.use_locale != NULL)
    {
	fprintf(stderr, "locale not supported in your environment.\n");
	exit(1);
    }
#endif
439

440 441 442 443 444 445 446 447
    if (param.no_files != -1 && param.no_files > FD_SETSIZE)
    {
	fprintf(stderr,
		"The \"Open files: %ld\" is too large: FD_SETSIZE is %ld\n",
		(long)param.no_files, (long)FD_SETSIZE);
	exit(1);
    }

448
#ifdef USING_RLIMIT_NOFILE
449 450 451 452 453 454
    if (getrlimit(RLIMIT_NOFILE, &rlim) < 0)
    {
	perror("getrlimit(RLIMIT_NOFILE) failed");
	exit(1);
    }

Per Cederqvist's avatar
Per Cederqvist committed
455
    if (param.no_files != -1)
456
    {
457
	if ((rlim_t)param.no_files > rlim.rlim_max)
458
	{
459 460 461 462
	    fprintf(stderr, "attempt to raise open files from %ld to %ld, "
		    "but only %ld is allowed\n",
		    (long)rlim.rlim_cur, (long)param.no_files,
		    (long)rlim.rlim_max);
463 464 465 466 467 468 469 470 471 472
	    rlim.rlim_cur = rlim.rlim_max;
	}
	else
	    rlim.rlim_cur = param.no_files;
	
	if (setrlimit(RLIMIT_NOFILE, &rlim) < 0)
	{
	    perror("setrlimit failed");
	    exit(1);
	}
473 474 475 476 477 478 479 480
	if (getrlimit(RLIMIT_NOFILE, &rlim) < 0)
	{
	    perror("getrlimit(RLIMIT_NOFILE) failed");
	    exit(1);
	}
	if (rlim.rlim_cur != (rlim_t)param.no_files)
	    restart_kom("getrlimit after setrlimit returns %ld, not %ld.\n",
			(long)rlim.rlim_cur, (long)param.no_files);
481
    }
482 483 484 485 486
    fd_ceiling = rlim.rlim_cur;
#elif HAVE_GETDTABLESIZE
    if (param.no_files == -1)
	fd_ceiling = getdtablesize();
    else if (param.no_files >= getdtablesize())
487
    {
488 489
	fprintf(stderr, "getdtablesize() indicates that at most %ld files"
		" can be used.\n", (long)getdtablesize());
490 491
	exit(1);
    }
492 493 494 495 496 497 498 499 500 501 502 503 504
    else
	fd_ceiling = param.no_files;
#elif defined(OPEN_MAX)
    if (param.no_files == -1)
	fd_ceiling = OPEN_MAX;
    else if (param.no_files >= OPEN_MAX)
    {
	fprintf(stderr, "OPEN_MAX indicates that at most %ld files"
		" can be used.\n", (long)OPEN_MAX);
	exit(1);
    }
    else
	fd_ceiling = param.no_files;
505
#else
506
#  error Do not know how to find maximum number of open files.
507 508
#endif

509 510 511
    if (fd_ceiling > FD_SETSIZE)
	fd_ceiling = FD_SETSIZE;

512
    go_daemon();
513
    if (lock_db() < 0)
514 515 516 517 518
    {
	/* Don't actually die until something is entered on stdin in debug
	   mode.  This is mainly here for the benefit of the test suite,
	   but is could also be useful to be able to attach a debugger and
	   do pre-mortem debugging of the process at this point.  */
519
	kom_log("Cannot obtain database lock.  Exiting.\n");
520
	if (foreground)
521 522 523 524 525
	{
	    kom_log("Press enter to terminate lyskomd\n");
	    getchar();
	}

526
	exit(1);
527 528
    }

Per Cederqvist's avatar
Per Cederqvist committed
529
    server_init(param.ip_client_host, param.ip_client_port);
530
    init_data_base();
531 532
}

Per Cederqvist's avatar
Per Cederqvist committed
533 534 535
/* Stop complaint from gcc 2.0 about "no previous prototype for `main'". */
int main(int argc, char **argv);

536
	
Per Cederqvist's avatar
Per Cederqvist committed
537 538 539 540 541
int
main (int    argc,
      char **argv)
{
    int i;
542 543
    char *default_config_file;
    char *config_file;
544
    oop_source *src;
Per Cederqvist's avatar
Per Cederqvist committed
545 546 547

    link_ansi();

548 549
    if (gettimeofday(&current_time, NULL) < 0)
	restart_kom("gettimeofday failed: %s\n", strerror(errno));
Per Cederqvist's avatar
Per Cederqvist committed
550

551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566
#ifdef TRACED_ALLOCATIONS
    /* We must do this before we allocate any memory... */
    {
      char buf[1024];
      char *nl;

      fputs("Where does the trace want to go today? [stderr]\n", stdout);
      fflush(stdout);
      if (fgets(buf, sizeof(buf), stdin) != buf)
	  restart_kom("main(): unable to read trace location\n");
      if ((nl = strchr(buf, '\n')) != NULL)
	  *nl = '\0';
      trace_alloc_file(buf);
    }
#endif

David Byers's avatar
David Byers committed
567
    kom_log("*** Version %s (process %lu) started.\n",
568
	kom_version_info.server_version, (unsigned long)getpid());
569
#ifdef DEBUG_CALLS
David Byers's avatar
David Byers committed
570 571
    kom_log("WARNING: This server was compiled with --with-debug-calls.\n");
    kom_log("It isn't safe to use in a production environment.\n");
572
#endif
573

Per Cederqvist's avatar
Per Cederqvist committed
574
#ifdef ENCRYPT_PASSWORDS
575
    /* Seed the random number generator. */
576
    /* FIXME (bug 1068): This is not a good way to seed it... */
Per Cederqvist's avatar
Per Cederqvist committed
577 578
    srand(time(NULL) + getpid());
#endif
Per Cederqvist's avatar
Per Cederqvist committed
579

580 581
    /* Initialize the string handling package. */
    s_set_storage_management(string_malloc, string_realloc, string_free);
582

583
    /* Parse command line arguments. */
Per Cederqvist's avatar
Per Cederqvist committed
584 585 586 587 588 589 590
    for (i = 1; i < argc && argv[i][0] == '-'; i++)
	switch (argv[i][1])
	{
	case 'd':
	    buglevel++;
	    break;

591 592 593 594
	case 'f':
	    foreground = 1;
	    break;

595
	default:
596
	    restart_kom("usage: %s [-f] [-d ...] [config-file]\n", argv[0]);
597
	}
Per Cederqvist's avatar
Per Cederqvist committed
598

599

600
    /* Read in the configuration file. */
601

602 603 604
    default_config_file = smalloc(strlen(DEFAULT_DBASE_DIR) +
				  strlen(CONFIG_FILE) + 2);
    sprintf(default_config_file, "%s/%s", DEFAULT_DBASE_DIR, CONFIG_FILE);
Per Cederqvist's avatar
Per Cederqvist committed
605
    if (i < argc)
606 607 608
	config_file = argv[i++];
    else
	config_file = default_config_file;
Per Cederqvist's avatar
Per Cederqvist committed
609

610 611
    if (i < argc)
	    restart_kom("usage: %s [-d ...] [config-file]\n", argv[0]);
612

613
    initialize(config_file);	/* Read config, listen, and start db */
614
    chdir(param.core_dir);
615 616 617

    read_config_file = smalloc(strlen(config_file) + 1);
    strcpy(read_config_file, config_file);
618 619
    sfree(default_config_file);

Per Cederqvist's avatar
Per Cederqvist committed
620
    save_pid();
621
    init_stats();
622
    check_all_stats("init");
Per Cederqvist's avatar
Per Cederqvist committed
623

Per Cederqvist's avatar
Per Cederqvist committed
624
    toploop();
Per Cederqvist's avatar
Per Cederqvist committed
625

626 627 628
    /* There is no use sending logout messages to all sessions. */
    param.send_async_messages = FALSE;
    
Per Cederqvist's avatar
Per Cederqvist committed
629
    logout_all_clients();
630
    isc_shutdown(kom_server_mcb);
Per Cederqvist's avatar
Per Cederqvist committed
631
    cache_sync_all();
632
    unlock_db();
633
    src = oop_signal_source(kom_signal_adapter);
634 635 636 637 638
    src->cancel_signal(src, SIGWINCH, sighandler_winch, NULL);
    src->cancel_signal(src, SIGUSR2, sighandler_usr2, NULL);
    src->cancel_signal(src, SIGUSR1, sighandler_usr1, NULL);
    src->cancel_signal(src, SIGQUIT, sighandler_quit, NULL);
    src->cancel_signal(src, SIGHUP, sighandler_hup, NULL);
639
    oop_signal_delete(kom_signal_adapter);
640
    oop_sys_delete(kom_server_oop_src);
Per Cederqvist's avatar
Per Cederqvist committed
641

David Byers's avatar
David Byers committed
642 643
    /* Finish */

644
    dump_exit_statistics();
645
    check_all_stats("shutdown");
646

David Byers's avatar
David Byers committed
647
    kom_log("%s terminated normally.\n", argv[0]);
648 649 650 651 652

    /* Don't actually die until something is entered on stdin in debug
       mode.  This is mainly here for the benefit of the test suite,
       but is could also be useful to be able to attach a debugger and
       do pre-mortem debugging of the process at this point.  */
653
    if (foreground)
654
    {
David Byers's avatar
David Byers committed
655
	kom_log("Press enter to terminate lyskomd\n");
656 657
	getchar();
    }
David Byers's avatar
David Byers committed
658

659
    exit(0);
660 661 662 663 664 665 666 667
}

static void 
dump_exit_statistics(void)
{
    FILE *stat_file;
    time_t now;

668 669
    time(&now);
    stat_file = i_fopen(param.memuse_name, "a");
Per Cederqvist's avatar
Per Cederqvist committed
670 671 672 673

    if ( stat_file == NULL )
	restart_kom("Can't open file to save memory usage to.\n");

674 675
    fprintf(stat_file, "\nLysKOM Server going down at %s\n", ctime(&now));

676 677 678 679
    dump_cache_stats (stat_file);

    free_all_tmp();
    free_all_cache();
680
    free_all_jubel();
David Byers's avatar
David Byers committed
681 682 683
    free_kom_info();
    free_aux_item_definitions();
    free_configuration();
684
    sfree(read_config_file);
685

Per Cederqvist's avatar
Per Cederqvist committed
686 687
    dump_smalloc_counts(stat_file);
    dump_alloc_counts(stat_file);
688
    dump_cache_mem_usage(stat_file);
Per Cederqvist's avatar
Per Cederqvist committed
689
    dump_string_alloc_counts(stat_file);
690
    dump_allocated_connections(stat_file);
691
    dump_isc_alloc_counts(stat_file);
692
    dump_oop_alloc_counts(stat_file);
693
    dump_l2g_stats(stat_file);
694
    i_fclose (stat_file);
Per Cederqvist's avatar
Per Cederqvist committed
695
}
David Byers's avatar
David Byers committed
696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712

static void
free_kom_info(void)
{
    unsigned long i;

    if (kom_info.aux_item_list.items != NULL)
    {
        for (i = 0; i < kom_info.aux_item_list.length; i++)
        {
            s_clear(&kom_info.aux_item_list.items[i].data);
        }
        sfree(kom_info.aux_item_list.items);
    }
    kom_info.aux_item_list.length = 0;
    kom_info.aux_item_list.items = 0;
}