ramkomd.c 16.8 KB
Newer Older
Linus Tolke Y's avatar
Linus Tolke Y committed
1
/*
2
 * $Id: ramkomd.c,v 0.110 2002/10/31 09:31:19 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
#ifdef HAVE_SYS_RESOURCE_H
59 60 61 62 63 64 65 66 67 68
#  ifdef TIME_WITH_SYS_TIME
#    include <sys/time.h>
#    include <time.h>
#  else
#    ifdef HAVE_SYS_TIME_H
#      include <sys/time.h>
#    else
#      include <time.h>
#    endif
#  endif
69
#  include <sys/resource.h>
70 71
#else
#  include <time.h>
72
#endif
Per Cederqvist's avatar
Per Cederqvist committed
73
#include <unistd.h>
Per Cederqvist's avatar
Per Cederqvist committed
74 75 76 77
#include <setjmp.h>
#if defined(HAVE_SYS_PARAM_H) && !defined(HAVE_GETCWD)
# include <sys/param.h>
#endif
Per Cederqvist's avatar
Per Cederqvist committed
78
#include <errno.h>
Per Cederqvist's avatar
Per Cederqvist committed
79
#include <sys/types.h>
80
#include <sys/socket.h>
Per Cederqvist's avatar
Per Cederqvist committed
81
#include <fcntl.h>
Per Cederqvist's avatar
Per Cederqvist committed
82

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

119 120 121 122
#if defined(HAVE_SETRLIMIT) && defined(RLIMIT_OFILE) && !defined(RLIMIT_NOFILE)
#  define RLIMIT_NOFILE RLIMIT_OFILE
#endif

123 124 125 126
#if !HAVE_RLIM_T
typedef int rlim_t;
#endif

127
time_t            current_time = 0;
128 129


Per Cederqvist's avatar
Per Cederqvist committed
130
#ifndef NDEBUG
131
int	buglevel = 0;
132
#endif
Per Cederqvist's avatar
Per Cederqvist committed
133

134 135 136 137 138
/* 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;

139
static IscSession *listen_client = NULL;      /* ISC listen identifier */
Per Cederqvist's avatar
Per Cederqvist committed
140

141
static void dump_exit_statistics(void);
David Byers's avatar
David Byers committed
142
static void free_kom_info(void);
143

Per Cederqvist's avatar
Per Cederqvist committed
144
static void
Per Cederqvist's avatar
Per Cederqvist committed
145
server_init(const char *host, const char * client_port)
Per Cederqvist's avatar
Per Cederqvist committed
146
{
Per Cederqvist's avatar
Per Cederqvist committed
147
    IscConfig config;
148
    IscAddress *isc_adr = NULL;
149 150 151 152
#ifdef HAVE_STRUCT_SIGACTION
    struct sigaction act;
#endif

Per Cederqvist's avatar
Per Cederqvist committed
153 154 155
    /*
    ** Setup some parameters here
    */
156
    config.version = 1006;
Per Cederqvist's avatar
Per Cederqvist committed
157 158 159 160
    config.master.version = 1001;
    config.master.memfn.alloc = &isc_malloc_wrapper;
    config.master.memfn.realloc = &isc_realloc_wrapper;
    config.master.memfn.free = &isc_free_wrapper;
161
    config.master.abortfn = NULL; /* Use default abort function. */
162
    config.session.version = 1002;
163
    config.session.max.msgsize = -1; /* Use default sizes. */
Per Cederqvist's avatar
Per Cederqvist committed
164 165 166 167
    config.session.max.queuedsize = -1;
    config.session.max.dequeuelen = -1;
    config.session.max.openretries = -1;
    config.session.max.backlog = -1;
168
    config.session.fd_relocate = PROTECTED_FDS;
Per Cederqvist's avatar
Per Cederqvist committed
169

170
    kom_server_mcb  = isc_initialize(&config);
Per Cederqvist's avatar
Per Cederqvist committed
171
    if ( kom_server_mcb == NULL )
Per Cederqvist's avatar
Per Cederqvist committed
172 173
	restart_kom("server_init: can't isc_initialize()\n");

174
    listen_client = isc_listentcp(kom_server_mcb, host, client_port);
Per Cederqvist's avatar
Per Cederqvist committed
175 176
    if (listen_client == NULL)
        restart_kom("server_init: can't isc_listentcp(CLIENT)\n");
Per Cederqvist's avatar
Per Cederqvist committed
177

178 179 180 181
    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
182
    kom_log("Listening for clients on %d.\n", isc_getportnum(isc_adr));
183 184
    isc_freeaddress (isc_adr);
    
Per Cederqvist's avatar
Per Cederqvist committed
185 186 187 188 189 190

    /*
     * 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.
     */
191 192 193 194
#ifdef HAVE_STRUCT_SIGACTION
    sigemptyset(&act.sa_mask);
    act.sa_flags = 0;
    act.sa_handler = SIG_IGN;
195
    sigaction(SIGPIPE, &act, NULL);
196
#else
Per Cederqvist's avatar
Per Cederqvist committed
197
    signal(SIGPIPE, SIG_IGN);
198
#endif
Per Cederqvist's avatar
Per Cederqvist committed
199 200 201
}

static void
202
init_data_base(void)
Per Cederqvist's avatar
Per Cederqvist committed
203
{
David Byers's avatar
David Byers committed
204 205 206
    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);
207
    kom_log("Lock File = %s\n", param.lockfile_name);
Per Cederqvist's avatar
Per Cederqvist committed
208 209
    
    if ( init_cache() == FAILURE )
210
	restart_kom ("Cannot find database.\n");
Per Cederqvist's avatar
Per Cederqvist committed
211 212
}

Per Cederqvist's avatar
Per Cederqvist committed
213
static void
214
sighandler_hup (int UNUSED(sig))
Per Cederqvist's avatar
Per Cederqvist committed
215
{
216
#ifndef HAVE_STRUCT_SIGACTION
217
    signal(SIGHUP, sighandler_hup);
218
#endif
David Byers's avatar
David Byers committed
219
    kom_log ("Signal HUP received. Shutting down server.\n");
Per Cederqvist's avatar
Per Cederqvist committed
220
    go_and_die = 1;
Per Cederqvist's avatar
Per Cederqvist committed
221 222
}

Per Cederqvist's avatar
Per Cederqvist committed
223
static void
224
sighandler_quit (int UNUSED(sig))
Per Cederqvist's avatar
Per Cederqvist committed
225
{
David Byers's avatar
David Byers committed
226
    kom_log ("Signal QUIT received - syncing...\n");
Per Cederqvist's avatar
Per Cederqvist committed
227
    cache_sync_all();
David Byers's avatar
David Byers committed
228
    kom_log ("Dumping core now.\n");
Per Cederqvist's avatar
Per Cederqvist committed
229 230 231
    abort();
}

Per Cederqvist's avatar
Per Cederqvist committed
232
static void
233
sighandler_usr1 (int UNUSED(sig))
Per Cederqvist's avatar
Per Cederqvist committed
234
{
235
#ifndef HAVE_STRUCT_SIGACTION
236
    signal(SIGUSR1, sighandler_usr1);
237
#endif
Per Cederqvist's avatar
Per Cederqvist committed
238
    do_statistics = 1;
Per Cederqvist's avatar
Per Cederqvist committed
239 240
}

Per Cederqvist's avatar
Per Cederqvist committed
241
static void
242
sighandler_usr2 (int UNUSED(sig))
Per Cederqvist's avatar
Per Cederqvist committed
243 244 245
{
    int		  child;

246
#ifndef HAVE_STRUCT_SIGACTION
247
    signal(SIGUSR2, sighandler_usr2);
248
#endif
249

David Byers's avatar
David Byers committed
250
    kom_log ("Signal USR2 received - will dump core now.  (Check that child dies.)\n");
Per Cederqvist's avatar
Per Cederqvist committed
251 252 253
    if ((child = fork()) == 0)
    {
	abort();
254
	kom_log ("Abort() failed!!!\n");
Per Cederqvist's avatar
Per Cederqvist committed
255 256 257 258
	exit(1);
    }
    else if (child < 0)
    {
David Byers's avatar
David Byers committed
259
	kom_log ("Couldn't fork.\n");
Per Cederqvist's avatar
Per Cederqvist committed
260 261 262 263 264 265 266
    }
    else
    {
	wait (NULL);
    }
}

267 268 269 270 271 272 273 274 275
static void
sighandler_winch(int UNUSED(sig))
{
#ifndef HAVE_STRUCT_SIGACTION
    signal(SIGWINCH, sighandler_winch);
#endif
    reread_param = TRUE;
}

Per Cederqvist's avatar
Per Cederqvist committed
276
static void
Per Cederqvist's avatar
Per Cederqvist committed
277 278 279 280
save_pid(void)
{
    FILE *fp;

281
    if ((fp = i_fopen(param.pid_name, "w")) == NULL)
Per Cederqvist's avatar
Per Cederqvist committed
282 283
	return;

284
    fprintf(fp, "%ld\n", (long)getpid());
285
    i_fclose(fp);
Per Cederqvist's avatar
Per Cederqvist committed
286 287
}

Per Cederqvist's avatar
Per Cederqvist committed
288
static void
289
go_daemon(void)
Per Cederqvist's avatar
Per Cederqvist committed
290 291 292
{
    pid_t child;
    int fd;
293 294 295 296
#ifdef HAVE_STRUCT_SIGACTION
    struct sigaction act;
#endif
    
297
    if (foreground != 0)
298 299 300 301
    {
	return;
    }

Per Cederqvist's avatar
Per Cederqvist committed
302 303 304 305 306
    if (getppid() != 1)
    {
	/* We were not invoked from /etc/inittab, so
	   disassociate from controlling terminal. */

307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324
#ifdef HAVE_STRUCT_SIGACTION
	sigemptyset(&act.sa_mask);
	act.sa_flags = 0;
	act.sa_handler = SIG_IGN;

#  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
325
	signal(SIGTTOU, SIG_IGN);
326 327
#  endif
#  ifdef SIGTTIN
Per Cederqvist's avatar
Per Cederqvist committed
328
	signal(SIGTTIN, SIG_IGN);
329 330
#  endif
#  ifdef SIGTSTP
Per Cederqvist's avatar
Per Cederqvist committed
331
	signal(SIGTSTP, SIG_IGN);
332 333
#  endif

Per Cederqvist's avatar
Per Cederqvist committed
334 335 336 337 338 339 340 341 342 343 344 345
#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 */
346
    for (fd = 0; fd < fd_ceiling; fd++)
Per Cederqvist's avatar
Per Cederqvist committed
347 348 349
	close(fd);
    if (open("/dev/null", O_RDONLY) != 0
	||open("/dev/null", O_WRONLY) != 1
350
	||open(param.logfile_name, O_WRONLY|O_CREAT|O_APPEND, 0644) != 2)
Per Cederqvist's avatar
Per Cederqvist committed
351 352 353
    {
	/* Kinda stupid to try to log an error message now, but
	   who knows? */
354
	restart_kom("open of log file failed: %d\n", errno);
Per Cederqvist's avatar
Per Cederqvist committed
355
    }
David Byers's avatar
David Byers committed
356 357
    kom_log("*** Version %s (process %lu) coming up.\n",
            kom_version_info.server_version, (unsigned long)getpid());
Per Cederqvist's avatar
Per Cederqvist committed
358 359
}

360
static void
361
initialize(const char *config_file)
362
{
363
#ifdef USING_RLIMIT_NOFILE
364 365 366
    struct rlimit rlim;
#endif

367
    read_configuration(config_file);
368
    initialize_aux_items(param.aux_def_file);
369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384

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

386 387 388 389 390 391 392 393
    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);
    }

394
#ifdef USING_RLIMIT_NOFILE
395 396 397 398 399 400
    if (getrlimit(RLIMIT_NOFILE, &rlim) < 0)
    {
	perror("getrlimit(RLIMIT_NOFILE) failed");
	exit(1);
    }

Per Cederqvist's avatar
Per Cederqvist committed
401
    if (param.no_files != -1)
402
    {
403
	if ((rlim_t)param.no_files > rlim.rlim_max)
404
	{
405 406 407 408
	    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);
409 410 411 412 413 414 415 416 417 418
	    rlim.rlim_cur = rlim.rlim_max;
	}
	else
	    rlim.rlim_cur = param.no_files;
	
	if (setrlimit(RLIMIT_NOFILE, &rlim) < 0)
	{
	    perror("setrlimit failed");
	    exit(1);
	}
419 420 421 422 423 424 425 426
	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);
427
    }
428 429 430 431 432
    fd_ceiling = rlim.rlim_cur;
#elif HAVE_GETDTABLESIZE
    if (param.no_files == -1)
	fd_ceiling = getdtablesize();
    else if (param.no_files >= getdtablesize())
433
    {
434 435
	fprintf(stderr, "getdtablesize() indicates that at most %ld files"
		" can be used.\n", (long)getdtablesize());
436 437
	exit(1);
    }
438 439 440 441 442 443 444 445 446 447 448 449 450
    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;
451
#else
452
#  error Do not know how to find maximum number of open files.
453 454
#endif

455 456 457
    if (fd_ceiling > FD_SETSIZE)
	fd_ceiling = FD_SETSIZE;

458
    go_daemon();
459
    if (lock_db() < 0)
460 461 462 463 464
    {
	/* 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.  */
465
	kom_log("Cannot obtain database lock.  Exiting.\n");
466
	if (foreground)
467 468 469 470 471
	{
	    kom_log("Press enter to terminate lyskomd\n");
	    getchar();
	}

472
	exit(1);
473 474
    }

Per Cederqvist's avatar
Per Cederqvist committed
475
    server_init(param.ip_client_host, param.ip_client_port);
476
    init_data_base();
477 478
}

479 480 481 482 483 484 485 486 487 488 489 490 491 492
static void
setup_sighandlers(int restartable)
{
#ifdef HAVE_STRUCT_SIGACTION
    struct sigaction act;

    sigemptyset(&act.sa_mask);

#ifdef SA_RESTART
    act.sa_flags = restartable ? SA_RESTART : 0;
#else
    /* SunOS 4.1.1 doesn't have SA_RESTART, but it always uses
       restartable syscalls, and select() returns with EINTR, so
       we get what we want there. */
493
    act.sa_flags = 0;
494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541
#endif

    act.sa_handler = sighandler_hup;
    sigaction(SIGHUP, &act, NULL);

    act.sa_handler = sighandler_quit;
    sigaction(SIGQUIT, &act, NULL);

    act.sa_handler = sighandler_usr1;
    sigaction(SIGUSR1, &act, NULL);

    act.sa_handler = sighandler_usr2;
    sigaction(SIGUSR2, &act, NULL);

    act.sa_handler = sighandler_winch;
    sigaction(SIGWINCH, &act, NULL);
#else
    signal(SIGHUP, sighandler_hup);
    signal(SIGQUIT, sighandler_quit);
    signal(SIGUSR1, sighandler_usr1);
    signal(SIGUSR2, sighandler_usr2);
    signal(SIGWINCH, sighandler_winch);
#endif
}


void
restart_syscalls_on_intr(void)
{
    /* FIXME (bug 845): This should be a noop, except on HP-UX and
       other systems where select() don't return immediately when
       interrupted by a signal.  To always reinstall the signal
       handlers decreases performance for no good reason on systems
       such as Solaris and Linux where select always returns with
       EINTR, even if SA_RESTART has been specified for the signals.
       We should test this at configure-time.  testsuite/test-select.c
       is a suitable test program.  */
    setup_sighandlers(1);
}

void
intr_syscalls_on_intr(void)
{
    /* FIXME (bug 845): see restart_syscalls_on_intr(). */
    setup_sighandlers(0);
}

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

545
	
Per Cederqvist's avatar
Per Cederqvist committed
546 547 548 549 550
int
main (int    argc,
      char **argv)
{
    int i;
551 552
    char *default_config_file;
    char *config_file;
Per Cederqvist's avatar
Per Cederqvist committed
553 554 555

    link_ansi();

556
    current_time = time(NULL);
Per Cederqvist's avatar
Per Cederqvist committed
557

558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573
#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
574
    kom_log("*** Version %s (process %lu) started.\n",
575
	kom_version_info.server_version, (unsigned long)getpid());
576
#ifdef DEBUG_CALLS
David Byers's avatar
David Byers committed
577 578
    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");
579
#endif
580

Per Cederqvist's avatar
Per Cederqvist committed
581
#ifdef ENCRYPT_PASSWORDS
582
    /* Seed the random number generator. */
Per Cederqvist's avatar
Per Cederqvist committed
583 584
    srand(time(NULL) + getpid());
#endif
Per Cederqvist's avatar
Per Cederqvist committed
585

586 587
    /* Initialize the string handling package. */
    s_set_storage_management(string_malloc, string_realloc, string_free);
588

589
    /* Parse command line arguments. */
Per Cederqvist's avatar
Per Cederqvist committed
590 591 592 593 594 595 596
    for (i = 1; i < argc && argv[i][0] == '-'; i++)
	switch (argv[i][1])
	{
	case 'd':
	    buglevel++;
	    break;

597 598 599 600
	case 'f':
	    foreground = 1;
	    break;

601
	default:
602
	    restart_kom("usage: %s [-f] [-d ...] [config-file]\n", argv[0]);
603
	}
Per Cederqvist's avatar
Per Cederqvist committed
604

605

606
    /* Read in the configuration file. */
607

608 609 610
    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
611
    if (i < argc)
612 613 614
	config_file = argv[i++];
    else
	config_file = default_config_file;
Per Cederqvist's avatar
Per Cederqvist committed
615

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

619
    setup_sighandlers(1);
620
    initialize(config_file);	/* Read config, listen, and start db */
621
    chdir(param.core_dir);
622 623 624

    read_config_file = smalloc(strlen(config_file) + 1);
    strcpy(read_config_file, config_file);
625 626
    sfree(default_config_file);

Per Cederqvist's avatar
Per Cederqvist committed
627
    save_pid();
Per Cederqvist's avatar
Per Cederqvist committed
628

Per Cederqvist's avatar
Per Cederqvist committed
629
    toploop();
Per Cederqvist's avatar
Per Cederqvist committed
630

631 632 633
    /* There is no use sending logout messages to all sessions. */
    param.send_async_messages = FALSE;
    
Per Cederqvist's avatar
Per Cederqvist committed
634
    logout_all_clients();
635
    isc_shutdown(kom_server_mcb);
Per Cederqvist's avatar
Per Cederqvist committed
636
    cache_sync_all();
637
    unlock_db();
Per Cederqvist's avatar
Per Cederqvist committed
638

David Byers's avatar
David Byers committed
639 640
    /* Finish */

641 642
    dump_exit_statistics();

David Byers's avatar
David Byers committed
643
    kom_log("%s terminated normally.\n", argv[0]);
644 645 646 647 648

    /* 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.  */
649
    if (foreground)
650
    {
David Byers's avatar
David Byers committed
651
	kom_log("Press enter to terminate lyskomd\n");
652 653
	getchar();
    }
David Byers's avatar
David Byers committed
654

655
    exit(0);
656 657 658 659 660 661 662 663
}

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

664 665
    time(&now);
    stat_file = i_fopen(param.memuse_name, "a");
Per Cederqvist's avatar
Per Cederqvist committed
666 667 668 669

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

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

672 673 674 675
    dump_cache_stats (stat_file);

    free_all_tmp();
    free_all_cache();
676
    free_all_jubel();
David Byers's avatar
David Byers committed
677 678 679
    free_kom_info();
    free_aux_item_definitions();
    free_configuration();
680
    sfree(read_config_file);
681

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

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