ramkomd.c 16.8 KB
Newer Older
Linus Tolke Y's avatar
Linus Tolke Y committed
1
/*
2
 * $Id: ramkomd.c,v 0.106 2002/10/26 11:59:03 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

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

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

126
time_t            current_time = 0;
127 128


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

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

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

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

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

Per Cederqvist's avatar
Per Cederqvist committed
152 153 154
    /*
    ** Setup some parameters here
    */
155
    config.version = 1006;
Per Cederqvist's avatar
Per Cederqvist committed
156 157 158 159
    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;
160
    config.master.abortfn = NULL; /* Use default abort function. */
161
    config.session.version = 1002;
162
    config.session.max.msgsize = -1; /* Use default sizes. */
Per Cederqvist's avatar
Per Cederqvist committed
163 164 165 166
    config.session.max.queuedsize = -1;
    config.session.max.dequeuelen = -1;
    config.session.max.openretries = -1;
    config.session.max.backlog = -1;
167
    config.session.fd_relocate = PROTECTED_FDS;
Per Cederqvist's avatar
Per Cederqvist committed
168

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

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

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

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

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

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

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

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

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

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

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

266 267 268 269 270 271 272 273 274
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
275
static void
Per Cederqvist's avatar
Per Cederqvist committed
276 277 278 279
save_pid(void)
{
    FILE *fp;

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

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

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

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

306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323
#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
324
	signal(SIGTTOU, SIG_IGN);
325 326
#  endif
#  ifdef SIGTTIN
Per Cederqvist's avatar
Per Cederqvist committed
327
	signal(SIGTTIN, SIG_IGN);
328 329
#  endif
#  ifdef SIGTSTP
Per Cederqvist's avatar
Per Cederqvist committed
330
	signal(SIGTSTP, SIG_IGN);
331 332
#  endif

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

359
static void
360
initialize(const char *config_file)
361
{
362 363 364 365
#if defined(HAVE_SETRLIMIT) && defined(RLIMIT_NOFILE)
    struct rlimit rlim;
#endif

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

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

#if defined(HAVE_SETRLIMIT) && defined(RLIMIT_NOFILE)
386 387 388 389 390 391
    if (getrlimit(RLIMIT_NOFILE, &rlim) < 0)
    {
	perror("getrlimit(RLIMIT_NOFILE) failed");
	exit(1);
    }

Per Cederqvist's avatar
Per Cederqvist committed
392
    if (param.no_files != -1)
393
    {
394
	if ((rlim_t)param.no_files > rlim.rlim_max)
395
	{
396 397 398 399
	    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);
400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431
	    rlim.rlim_cur = rlim.rlim_max;
	}
	else
	    rlim.rlim_cur = param.no_files;
	
	if (setrlimit(RLIMIT_NOFILE, &rlim) < 0)
	{
	    perror("setrlimit failed");
	    exit(1);
	}
    }
#else
    if (param.no_files != -1)
    {
	fprintf(stderr,
		"can't alter number of open files in your environment.\n");
	exit(1);
    }
#endif

    /* Find out how many connections we can handle. */
#if defined (HAVE_SYSCONF)
    MAX_NO_OF_CONNECTIONS = sysconf(_SC_OPEN_MAX) - PROTECTED_FDS;
#else
# ifdef HAVE_GETDTABLESIZE
    MAX_NO_OF_CONNECTIONS = getdtablesize() - PROTECTED_FDS;
# else
    /* If we don't have getdtablesize or sysconf, MAX_NO_OF_CONNECTIONS is
       set at compile time. */
# endif
#endif

432 433 434
#if defined(HAVE_SETRLIMIT) && defined(RLIMIT_NOFILE)
    /* Check that getrlimit and sysconf/getdtablesize/the compiled default
       makes sense. */
435
    if (rlim.rlim_cur > (rlim_t)(MAX_NO_OF_CONNECTIONS + PROTECTED_FDS))
David Byers's avatar
David Byers committed
436
	kom_log("WARNING: getrlimit indicates that %ld files can be open, "
437 438
	    "but MAX_NO_OF_CONNECTIONS is only %ld\n",
	    (long)rlim.rlim_cur, (long)MAX_NO_OF_CONNECTIONS);
439
    else if (rlim.rlim_cur < (rlim_t)(MAX_NO_OF_CONNECTIONS + PROTECTED_FDS))
David Byers's avatar
David Byers committed
440
	kom_log("warning: getrlimit indicates that only %ld files can be open, "
441 442 443 444
	    "but MAX_NO_OF_CONNECTIONS is %ld (this should be harmless)\n",
	    (long)rlim.rlim_cur, (long)MAX_NO_OF_CONNECTIONS);
#endif

445
    go_daemon();
446
    if (lock_db() < 0)
447 448 449 450 451
    {
	/* 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.  */
452
	kom_log("Cannot obtain database lock.  Exiting.\n");
453
	if (foreground)
454 455 456 457 458
	{
	    kom_log("Press enter to terminate lyskomd\n");
	    getchar();
	}

459
	exit(1);
460 461
    }

Per Cederqvist's avatar
Per Cederqvist committed
462
    server_init(param.ip_client_host, param.ip_client_port);
463
    init_data_base();
464 465
}

466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 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
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. */
    act.sa_flags = 0
#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
529 530 531
/* Stop complaint from gcc 2.0 about "no previous prototype for `main'". */
int main(int argc, char **argv);

532
	
Per Cederqvist's avatar
Per Cederqvist committed
533 534 535 536 537
int
main (int    argc,
      char **argv)
{
    int i;
538 539
    char *default_config_file;
    char *config_file;
Per Cederqvist's avatar
Per Cederqvist committed
540 541 542

    link_ansi();

543
    current_time = time(NULL);
Per Cederqvist's avatar
Per Cederqvist committed
544

545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560
#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
561
    kom_log("*** Version %s (process %lu) started.\n",
562
	kom_version_info.server_version, (unsigned long)getpid());
563
#ifdef DEBUG_CALLS
David Byers's avatar
David Byers committed
564 565
    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");
566
#endif
567

Per Cederqvist's avatar
Per Cederqvist committed
568
#ifdef ENCRYPT_PASSWORDS
569
    /* Seed the random number generator. */
Per Cederqvist's avatar
Per Cederqvist committed
570 571
    srand(time(NULL) + getpid());
#endif
Per Cederqvist's avatar
Per Cederqvist committed
572

573 574
    /* Initialize the string handling package. */
    s_set_storage_management(string_malloc, string_realloc, string_free);
575

576
    /* Parse command line arguments. */
Per Cederqvist's avatar
Per Cederqvist committed
577 578 579 580 581 582 583
    for (i = 1; i < argc && argv[i][0] == '-'; i++)
	switch (argv[i][1])
	{
	case 'd':
	    buglevel++;
	    break;

584 585 586 587
	case 'f':
	    foreground = 1;
	    break;

588
	default:
589
	    restart_kom("usage: %s [-f] [-d ...] [config-file]\n", argv[0]);
590
	}
Per Cederqvist's avatar
Per Cederqvist committed
591

592

593
    /* Read in the configuration file. */
594

595 596 597
    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
598
    if (i < argc)
599 600 601
	config_file = argv[i++];
    else
	config_file = default_config_file;
Per Cederqvist's avatar
Per Cederqvist committed
602

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

606
    setup_sighandlers(1);
607
    initialize(config_file);	/* Read config, listen, and start db */
608
    chdir(param.core_dir);
609 610 611

    read_config_file = smalloc(strlen(config_file) + 1);
    strcpy(read_config_file, config_file);
612 613
    sfree(default_config_file);

Per Cederqvist's avatar
Per Cederqvist committed
614
    save_pid();
Per Cederqvist's avatar
Per Cederqvist committed
615

Per Cederqvist's avatar
Per Cederqvist committed
616
    toploop();
Per Cederqvist's avatar
Per Cederqvist committed
617

618 619 620
    /* There is no use sending logout messages to all sessions. */
    param.send_async_messages = FALSE;
    
Per Cederqvist's avatar
Per Cederqvist committed
621
    logout_all_clients();
622
    isc_shutdown(kom_server_mcb);
Per Cederqvist's avatar
Per Cederqvist committed
623
    cache_sync_all();
624
    unlock_db();
Per Cederqvist's avatar
Per Cederqvist committed
625

David Byers's avatar
David Byers committed
626 627
    /* Finish */

628 629
    dump_exit_statistics();

David Byers's avatar
David Byers committed
630
    kom_log("%s terminated normally.\n", argv[0]);
631 632 633 634 635

    /* 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.  */
636
    if (foreground)
637
    {
David Byers's avatar
David Byers committed
638
	kom_log("Press enter to terminate lyskomd\n");
639 640
	getchar();
    }
David Byers's avatar
David Byers committed
641

642
    exit(0);
643 644 645 646 647 648 649 650
}

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

David Byers's avatar
David Byers committed
651
     time(&now);
652
    stat_file = fopen(param.memuse_name, "a");
Per Cederqvist's avatar
Per Cederqvist committed
653 654 655 656

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

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

659 660 661 662
    dump_cache_stats (stat_file);

    free_all_tmp();
    free_all_cache();
663
    free_all_jubel();
David Byers's avatar
David Byers committed
664 665 666
    free_kom_info();
    free_aux_item_definitions();
    free_configuration();
667
    sfree(read_config_file);
668

Per Cederqvist's avatar
Per Cederqvist committed
669 670
    dump_smalloc_counts(stat_file);
    dump_alloc_counts(stat_file);
671
    dump_cache_mem_usage(stat_file);
Per Cederqvist's avatar
Per Cederqvist committed
672
    dump_string_alloc_counts(stat_file);
673
    dump_allocated_connections(stat_file);
674
    dump_isc_alloc_counts(stat_file);
675
    dump_l2g_stats(stat_file);
Per Cederqvist's avatar
Per Cederqvist committed
676
    fclose (stat_file);
Per Cederqvist's avatar
Per Cederqvist committed
677
}
David Byers's avatar
David Byers committed
678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694

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