ramkomd.c 16.4 KB
Newer Older
Linus Tolke Y's avatar
Linus Tolke Y committed
1
/*
2
 * $Id: ramkomd.c,v 0.114 2003/07/12 22:26:34 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

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

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

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


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

126 127 128 129 130
/* 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;

131
static void dump_exit_statistics(void);
David Byers's avatar
David Byers committed
132
static void free_kom_info(void);
133 134 135 136 137 138
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;

139

140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156
#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
157
static void
Per Cederqvist's avatar
Per Cederqvist committed
158
server_init(const char *host, const char * client_port)
Per Cederqvist's avatar
Per Cederqvist committed
159
{
160 161 162
    struct isc_scb *listen_client;
    union isc_address *isc_adr = NULL;
    oop_source *src;
163 164 165 166
#ifdef HAVE_STRUCT_SIGACTION
    struct sigaction act;
#endif

167 168 169 170 171 172 173 174 175 176 177 178 179 180 181
    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");
    src = oop_sys_source(kom_server_oop_src);
    oop_sys_use_sa_restart();
    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
182 183 184
    /*
    ** Setup some parameters here
    */
185 186 187 188 189
    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
190
    if ( kom_server_mcb == NULL )
Per Cederqvist's avatar
Per Cederqvist committed
191
	restart_kom("server_init: can't isc_initialize()\n");
192
    isc_cfg_fd_relocate(kom_server_mcb, PROTECTED_FDS);
Per Cederqvist's avatar
Per Cederqvist committed
193

194 195
    listen_client = isc_listentcp(kom_server_mcb, host, client_port,
				  handle_accept_event);
Per Cederqvist's avatar
Per Cederqvist committed
196 197
    if (listen_client == NULL)
        restart_kom("server_init: can't isc_listentcp(CLIENT)\n");
Per Cederqvist's avatar
Per Cederqvist committed
198

199 200 201 202
    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
203
    kom_log("Listening for clients on %d.\n", isc_getportnum(isc_adr));
204 205
    isc_freeaddress (isc_adr);
    
Per Cederqvist's avatar
Per Cederqvist committed
206 207 208 209 210 211

    /*
     * 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.
     */
212 213 214
#ifdef HAVE_STRUCT_SIGACTION
    sigemptyset(&act.sa_mask);
    act.sa_flags = 0;
215
    set_handler_sig_ign(&act);
216
    sigaction(SIGPIPE, &act, NULL);
217
#else
Per Cederqvist's avatar
Per Cederqvist committed
218
    signal(SIGPIPE, SIG_IGN);
219
#endif
Per Cederqvist's avatar
Per Cederqvist committed
220 221 222
}

static void
223
init_data_base(void)
Per Cederqvist's avatar
Per Cederqvist committed
224
{
David Byers's avatar
David Byers committed
225 226 227
    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);
228
    kom_log("Lock File = %s\n", param.lockfile_name);
Per Cederqvist's avatar
Per Cederqvist committed
229 230
    
    if ( init_cache() == FAILURE )
231
	restart_kom ("Cannot find database.\n");
Per Cederqvist's avatar
Per Cederqvist committed
232 233
}

234 235 236 237
static void *
sighandler_hup(oop_source *UNUSED(source),
	       int UNUSED(sig),
	       void *UNUSED(user))
Per Cederqvist's avatar
Per Cederqvist committed
238
{
David Byers's avatar
David Byers committed
239
    kom_log ("Signal HUP received. Shutting down server.\n");
Per Cederqvist's avatar
Per Cederqvist committed
240
    go_and_die = 1;
241
    return OOP_HALT;
Per Cederqvist's avatar
Per Cederqvist committed
242 243
}

244 245 246 247
static void *
sighandler_quit(oop_source *UNUSED(source),
		int UNUSED(sig),
		void *UNUSED(user))
Per Cederqvist's avatar
Per Cederqvist committed
248
{
David Byers's avatar
David Byers committed
249
    kom_log ("Signal QUIT received - syncing...\n");
Per Cederqvist's avatar
Per Cederqvist committed
250
    cache_sync_all();
David Byers's avatar
David Byers committed
251
    kom_log ("Dumping core now.\n");
Per Cederqvist's avatar
Per Cederqvist committed
252 253 254
    abort();
}

255 256 257 258
static void *
sighandler_usr1(oop_source *UNUSED(source),
		int UNUSED(sig),
		void *UNUSED(user))
Per Cederqvist's avatar
Per Cederqvist committed
259
{
260 261
    dump_statistics();
    return OOP_CONTINUE;
Per Cederqvist's avatar
Per Cederqvist committed
262 263
}

264 265 266 267
static void *
sighandler_usr2(oop_source *UNUSED(source),
		int UNUSED(sig),
		void *UNUSED(user))
Per Cederqvist's avatar
Per Cederqvist committed
268 269 270
{
    int		  child;

David Byers's avatar
David Byers committed
271
    kom_log ("Signal USR2 received - will dump core now.  (Check that child dies.)\n");
Per Cederqvist's avatar
Per Cederqvist committed
272 273 274
    if ((child = fork()) == 0)
    {
	abort();
275
	kom_log ("Abort() failed!!!\n");
Per Cederqvist's avatar
Per Cederqvist committed
276 277 278 279
	exit(1);
    }
    else if (child < 0)
    {
David Byers's avatar
David Byers committed
280
	kom_log ("Couldn't fork.\n");
Per Cederqvist's avatar
Per Cederqvist committed
281 282 283 284 285
    }
    else
    {
	wait (NULL);
    }
286
    return OOP_CONTINUE;
Per Cederqvist's avatar
Per Cederqvist committed
287 288
}

289 290 291 292
static void *
sighandler_winch(oop_source *UNUSED(source),
		 int UNUSED(sig),
		 void *UNUSED(user))
293
{
294 295 296 297
    free_aux_item_definitions();
    initialize_aux_items(param.aux_def_file);
    kom_log("Signal WINCH received. aux definitions reloaded.\n");
    return OOP_CONTINUE;
298 299
}

Per Cederqvist's avatar
Per Cederqvist committed
300
static void
Per Cederqvist's avatar
Per Cederqvist committed
301 302 303 304
save_pid(void)
{
    FILE *fp;

305
    if ((fp = i_fopen(param.pid_name, "w")) == NULL)
Per Cederqvist's avatar
Per Cederqvist committed
306 307
	return;

308
    fprintf(fp, "%ld\n", (long)getpid());
309
    i_fclose(fp);
Per Cederqvist's avatar
Per Cederqvist committed
310 311
}

Per Cederqvist's avatar
Per Cederqvist committed
312
static void
313
go_daemon(void)
Per Cederqvist's avatar
Per Cederqvist committed
314 315 316
{
    pid_t child;
    int fd;
317 318 319 320
#ifdef HAVE_STRUCT_SIGACTION
    struct sigaction act;
#endif
    
321
    if (foreground != 0)
322 323 324 325
    {
	return;
    }

Per Cederqvist's avatar
Per Cederqvist committed
326 327 328 329 330
    if (getppid() != 1)
    {
	/* We were not invoked from /etc/inittab, so
	   disassociate from controlling terminal. */

331 332 333
#ifdef HAVE_STRUCT_SIGACTION
	sigemptyset(&act.sa_mask);
	act.sa_flags = 0;
334
	set_handler_sig_ign(&act);
335 336 337 338 339 340 341 342 343 344 345 346 347 348

#  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
349
	signal(SIGTTOU, SIG_IGN);
350 351
#  endif
#  ifdef SIGTTIN
Per Cederqvist's avatar
Per Cederqvist committed
352
	signal(SIGTTIN, SIG_IGN);
353 354
#  endif
#  ifdef SIGTSTP
Per Cederqvist's avatar
Per Cederqvist committed
355
	signal(SIGTSTP, SIG_IGN);
356 357
#  endif

Per Cederqvist's avatar
Per Cederqvist committed
358 359 360 361 362 363 364 365 366 367 368 369
#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 */
370
    for (fd = 0; fd < fd_ceiling; fd++)
Per Cederqvist's avatar
Per Cederqvist committed
371 372 373
	close(fd);
    if (open("/dev/null", O_RDONLY) != 0
	||open("/dev/null", O_WRONLY) != 1
374
	||open(param.logfile_name, O_WRONLY|O_CREAT|O_APPEND, 0644) != 2)
Per Cederqvist's avatar
Per Cederqvist committed
375 376 377
    {
	/* Kinda stupid to try to log an error message now, but
	   who knows? */
378
	restart_kom("open of log file failed: %d\n", errno);
Per Cederqvist's avatar
Per Cederqvist committed
379
    }
David Byers's avatar
David Byers committed
380 381
    kom_log("*** Version %s (process %lu) coming up.\n",
            kom_version_info.server_version, (unsigned long)getpid());
Per Cederqvist's avatar
Per Cederqvist committed
382 383
}

384
static void
385
initialize(const char *config_file)
386
{
387
#ifdef USING_RLIMIT_NOFILE
388 389 390
    struct rlimit rlim;
#endif

391
    read_configuration(config_file);
392
    initialize_aux_items(param.aux_def_file);
393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408

#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
409

410 411 412 413 414 415 416 417
    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);
    }

418
#ifdef USING_RLIMIT_NOFILE
419 420 421 422 423 424
    if (getrlimit(RLIMIT_NOFILE, &rlim) < 0)
    {
	perror("getrlimit(RLIMIT_NOFILE) failed");
	exit(1);
    }

Per Cederqvist's avatar
Per Cederqvist committed
425
    if (param.no_files != -1)
426
    {
427
	if ((rlim_t)param.no_files > rlim.rlim_max)
428
	{
429 430 431 432
	    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);
433 434 435 436 437 438 439 440 441 442
	    rlim.rlim_cur = rlim.rlim_max;
	}
	else
	    rlim.rlim_cur = param.no_files;
	
	if (setrlimit(RLIMIT_NOFILE, &rlim) < 0)
	{
	    perror("setrlimit failed");
	    exit(1);
	}
443 444 445 446 447 448 449 450
	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);
451
    }
452 453 454 455 456
    fd_ceiling = rlim.rlim_cur;
#elif HAVE_GETDTABLESIZE
    if (param.no_files == -1)
	fd_ceiling = getdtablesize();
    else if (param.no_files >= getdtablesize())
457
    {
458 459
	fprintf(stderr, "getdtablesize() indicates that at most %ld files"
		" can be used.\n", (long)getdtablesize());
460 461
	exit(1);
    }
462 463 464 465 466 467 468 469 470 471 472 473 474
    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;
475
#else
476
#  error Do not know how to find maximum number of open files.
477 478
#endif

479 480 481
    if (fd_ceiling > FD_SETSIZE)
	fd_ceiling = FD_SETSIZE;

482
    go_daemon();
483
    if (lock_db() < 0)
484 485 486 487 488
    {
	/* 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.  */
489
	kom_log("Cannot obtain database lock.  Exiting.\n");
490
	if (foreground)
491 492 493 494 495
	{
	    kom_log("Press enter to terminate lyskomd\n");
	    getchar();
	}

496
	exit(1);
497 498
    }

Per Cederqvist's avatar
Per Cederqvist committed
499
    server_init(param.ip_client_host, param.ip_client_port);
500
    init_data_base();
501 502
}

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

506
	
Per Cederqvist's avatar
Per Cederqvist committed
507 508 509 510 511
int
main (int    argc,
      char **argv)
{
    int i;
512 513
    char *default_config_file;
    char *config_file;
514
    oop_source *src;
Per Cederqvist's avatar
Per Cederqvist committed
515 516 517

    link_ansi();

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

521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536
#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
537
    kom_log("*** Version %s (process %lu) started.\n",
538
	kom_version_info.server_version, (unsigned long)getpid());
539
#ifdef DEBUG_CALLS
David Byers's avatar
David Byers committed
540 541
    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");
542
#endif
543

Per Cederqvist's avatar
Per Cederqvist committed
544
#ifdef ENCRYPT_PASSWORDS
545
    /* Seed the random number generator. */
Per Cederqvist's avatar
Per Cederqvist committed
546 547
    srand(time(NULL) + getpid());
#endif
Per Cederqvist's avatar
Per Cederqvist committed
548

549 550
    /* Initialize the string handling package. */
    s_set_storage_management(string_malloc, string_realloc, string_free);
551

552
    /* Parse command line arguments. */
Per Cederqvist's avatar
Per Cederqvist committed
553 554 555 556 557 558 559
    for (i = 1; i < argc && argv[i][0] == '-'; i++)
	switch (argv[i][1])
	{
	case 'd':
	    buglevel++;
	    break;

560 561 562 563
	case 'f':
	    foreground = 1;
	    break;

564
	default:
565
	    restart_kom("usage: %s [-f] [-d ...] [config-file]\n", argv[0]);
566
	}
Per Cederqvist's avatar
Per Cederqvist committed
567

568

569
    /* Read in the configuration file. */
570

571 572 573
    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
574
    if (i < argc)
575 576 577
	config_file = argv[i++];
    else
	config_file = default_config_file;
Per Cederqvist's avatar
Per Cederqvist committed
578

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

582
    initialize(config_file);	/* Read config, listen, and start db */
583
    chdir(param.core_dir);
584 585 586

    read_config_file = smalloc(strlen(config_file) + 1);
    strcpy(read_config_file, config_file);
587 588
    sfree(default_config_file);

Per Cederqvist's avatar
Per Cederqvist committed
589
    save_pid();
Per Cederqvist's avatar
Per Cederqvist committed
590

Per Cederqvist's avatar
Per Cederqvist committed
591
    toploop();
Per Cederqvist's avatar
Per Cederqvist committed
592

593 594 595
    /* There is no use sending logout messages to all sessions. */
    param.send_async_messages = FALSE;
    
Per Cederqvist's avatar
Per Cederqvist committed
596
    logout_all_clients();
597
    isc_shutdown(kom_server_mcb);
Per Cederqvist's avatar
Per Cederqvist committed
598
    cache_sync_all();
599
    unlock_db();
600 601 602 603 604 605 606
    src = oop_sys_source(kom_server_oop_src);
    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);
    oop_sys_delete(kom_server_oop_src);
Per Cederqvist's avatar
Per Cederqvist committed
607

David Byers's avatar
David Byers committed
608 609
    /* Finish */

610 611
    dump_exit_statistics();

David Byers's avatar
David Byers committed
612
    kom_log("%s terminated normally.\n", argv[0]);
613 614 615 616 617

    /* 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.  */
618
    if (foreground)
619
    {
David Byers's avatar
David Byers committed
620
	kom_log("Press enter to terminate lyskomd\n");
621 622
	getchar();
    }
David Byers's avatar
David Byers committed
623

624
    exit(0);
625 626 627 628 629 630 631 632
}

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

633 634
    time(&now);
    stat_file = i_fopen(param.memuse_name, "a");
Per Cederqvist's avatar
Per Cederqvist committed
635 636 637 638

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

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

641 642 643 644
    dump_cache_stats (stat_file);

    free_all_tmp();
    free_all_cache();
645
    free_all_jubel();
David Byers's avatar
David Byers committed
646 647 648
    free_kom_info();
    free_aux_item_definitions();
    free_configuration();
649
    sfree(read_config_file);
650

Per Cederqvist's avatar
Per Cederqvist committed
651 652
    dump_smalloc_counts(stat_file);
    dump_alloc_counts(stat_file);
653
    dump_cache_mem_usage(stat_file);
Per Cederqvist's avatar
Per Cederqvist committed
654
    dump_string_alloc_counts(stat_file);
655
    dump_allocated_connections(stat_file);
656
    dump_isc_alloc_counts(stat_file);
657
    dump_oop_alloc_counts(stat_file);
658
    dump_l2g_stats(stat_file);
659
    i_fclose (stat_file);
Per Cederqvist's avatar
Per Cederqvist committed
660
}
David Byers's avatar
David Byers committed
661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677

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;
}