ramkomd.c 16.7 KB
Newer Older
Linus Tolke Y's avatar
Linus Tolke Y committed
1
/*
2
 * $Id: ramkomd.c,v 0.108 2002/10/27 11:06:10 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
#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 */
345
    for (fd = 0; fd < fd_ceiling; fd++)
Per Cederqvist's avatar
Per Cederqvist committed
346 347 348
	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
#ifdef USING_RLIMIT_NOFILE
363 364 365
    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 386 387 388 389 390 391 392
    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);
    }

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

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

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

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

471
	exit(1);
472 473
    }

Per Cederqvist's avatar
Per Cederqvist committed
474
    server_init(param.ip_client_host, param.ip_client_port);
475
    init_data_base();
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 529 530 531 532 533 534 535 536 537 538 539 540
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
541 542 543
/* Stop complaint from gcc 2.0 about "no previous prototype for `main'". */
int main(int argc, char **argv);

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

    link_ansi();

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

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

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

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

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

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

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

604

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

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

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

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

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

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

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

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

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

640 641
    dump_exit_statistics();

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

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

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

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

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

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

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

671 672 673 674
    dump_cache_stats (stat_file);

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

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

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