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

144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160
#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
161
static void
Per Cederqvist's avatar
Per Cederqvist committed
162
server_init(const char *host, const char * client_port)
Per Cederqvist's avatar
Per Cederqvist committed
163
{
Per Cederqvist's avatar
Per Cederqvist committed
164
    IscConfig config;
165
    IscAddress *isc_adr = NULL;
166 167 168 169
#ifdef HAVE_STRUCT_SIGACTION
    struct sigaction act;
#endif

Per Cederqvist's avatar
Per Cederqvist committed
170 171 172
    /*
    ** Setup some parameters here
    */
173
    config.version = 1006;
Per Cederqvist's avatar
Per Cederqvist committed
174 175 176 177
    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;
178
    config.master.abortfn = NULL; /* Use default abort function. */
179
    config.session.version = 1002;
180
    config.session.max.msgsize = -1; /* Use default sizes. */
Per Cederqvist's avatar
Per Cederqvist committed
181 182 183 184
    config.session.max.queuedsize = -1;
    config.session.max.dequeuelen = -1;
    config.session.max.openretries = -1;
    config.session.max.backlog = -1;
185
    config.session.fd_relocate = PROTECTED_FDS;
Per Cederqvist's avatar
Per Cederqvist committed
186

187
    kom_server_mcb  = isc_initialize(&config);
Per Cederqvist's avatar
Per Cederqvist committed
188
    if ( kom_server_mcb == NULL )
Per Cederqvist's avatar
Per Cederqvist committed
189 190
	restart_kom("server_init: can't isc_initialize()\n");

191
    listen_client = isc_listentcp(kom_server_mcb, host, client_port);
Per Cederqvist's avatar
Per Cederqvist committed
192 193
    if (listen_client == NULL)
        restart_kom("server_init: can't isc_listentcp(CLIENT)\n");
Per Cederqvist's avatar
Per Cederqvist committed
194

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

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

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

Per Cederqvist's avatar
Per Cederqvist committed
230
static void
231
sighandler_hup (int UNUSED(sig))
Per Cederqvist's avatar
Per Cederqvist committed
232
{
233
#ifndef HAVE_STRUCT_SIGACTION
234
    signal(SIGHUP, sighandler_hup);
235
#endif
David Byers's avatar
David Byers committed
236
    kom_log ("Signal HUP received. Shutting down server.\n");
Per Cederqvist's avatar
Per Cederqvist committed
237
    go_and_die = 1;
Per Cederqvist's avatar
Per Cederqvist committed
238 239
}

Per Cederqvist's avatar
Per Cederqvist committed
240
static void
241
sighandler_quit (int UNUSED(sig))
Per Cederqvist's avatar
Per Cederqvist committed
242
{
David Byers's avatar
David Byers committed
243
    kom_log ("Signal QUIT received - syncing...\n");
Per Cederqvist's avatar
Per Cederqvist committed
244
    cache_sync_all();
David Byers's avatar
David Byers committed
245
    kom_log ("Dumping core now.\n");
Per Cederqvist's avatar
Per Cederqvist committed
246 247 248
    abort();
}

Per Cederqvist's avatar
Per Cederqvist committed
249
static void
250
sighandler_usr1 (int UNUSED(sig))
Per Cederqvist's avatar
Per Cederqvist committed
251
{
252
#ifndef HAVE_STRUCT_SIGACTION
253
    signal(SIGUSR1, sighandler_usr1);
254
#endif
Per Cederqvist's avatar
Per Cederqvist committed
255
    do_statistics = 1;
Per Cederqvist's avatar
Per Cederqvist committed
256 257
}

Per Cederqvist's avatar
Per Cederqvist committed
258
static void
259
sighandler_usr2 (int UNUSED(sig))
Per Cederqvist's avatar
Per Cederqvist committed
260 261 262
{
    int		  child;

263
#ifndef HAVE_STRUCT_SIGACTION
264
    signal(SIGUSR2, sighandler_usr2);
265
#endif
266

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

284 285 286 287 288 289 290 291 292
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
293
static void
Per Cederqvist's avatar
Per Cederqvist committed
294 295 296 297
save_pid(void)
{
    FILE *fp;

298
    if ((fp = i_fopen(param.pid_name, "w")) == NULL)
Per Cederqvist's avatar
Per Cederqvist committed
299 300
	return;

301
    fprintf(fp, "%ld\n", (long)getpid());
302
    i_fclose(fp);
Per Cederqvist's avatar
Per Cederqvist committed
303 304
}

Per Cederqvist's avatar
Per Cederqvist committed
305
static void
306
go_daemon(void)
Per Cederqvist's avatar
Per Cederqvist committed
307 308 309
{
    pid_t child;
    int fd;
310 311 312 313
#ifdef HAVE_STRUCT_SIGACTION
    struct sigaction act;
#endif
    
314
    if (foreground != 0)
315 316 317 318
    {
	return;
    }

Per Cederqvist's avatar
Per Cederqvist committed
319 320 321 322 323
    if (getppid() != 1)
    {
	/* We were not invoked from /etc/inittab, so
	   disassociate from controlling terminal. */

324 325 326
#ifdef HAVE_STRUCT_SIGACTION
	sigemptyset(&act.sa_mask);
	act.sa_flags = 0;
327
	set_handler_sig_ign(&act);
328 329 330 331 332 333 334 335 336 337 338 339 340 341

#  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
342
	signal(SIGTTOU, SIG_IGN);
343 344
#  endif
#  ifdef SIGTTIN
Per Cederqvist's avatar
Per Cederqvist committed
345
	signal(SIGTTIN, SIG_IGN);
346 347
#  endif
#  ifdef SIGTSTP
Per Cederqvist's avatar
Per Cederqvist committed
348
	signal(SIGTSTP, SIG_IGN);
349 350
#  endif

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

377
static void
378
initialize(const char *config_file)
379
{
380
#ifdef USING_RLIMIT_NOFILE
381 382 383
    struct rlimit rlim;
#endif

384
    read_configuration(config_file);
385
    initialize_aux_items(param.aux_def_file);
386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401

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

403 404 405 406 407 408 409 410
    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);
    }

411
#ifdef USING_RLIMIT_NOFILE
412 413 414 415 416 417
    if (getrlimit(RLIMIT_NOFILE, &rlim) < 0)
    {
	perror("getrlimit(RLIMIT_NOFILE) failed");
	exit(1);
    }

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

472 473 474
    if (fd_ceiling > FD_SETSIZE)
	fd_ceiling = FD_SETSIZE;

475
    go_daemon();
476
    if (lock_db() < 0)
477 478 479 480 481
    {
	/* 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.  */
482
	kom_log("Cannot obtain database lock.  Exiting.\n");
483
	if (foreground)
484 485 486 487 488
	{
	    kom_log("Press enter to terminate lyskomd\n");
	    getchar();
	}

489
	exit(1);
490 491
    }

Per Cederqvist's avatar
Per Cederqvist committed
492
    server_init(param.ip_client_host, param.ip_client_port);
493
    init_data_base();
494 495
}

496 497 498 499 500 501 502 503 504 505 506 507 508 509
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. */
510
    act.sa_flags = 0;
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 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558
#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
559 560 561
/* Stop complaint from gcc 2.0 about "no previous prototype for `main'". */
int main(int argc, char **argv);

562
	
Per Cederqvist's avatar
Per Cederqvist committed
563 564 565 566 567
int
main (int    argc,
      char **argv)
{
    int i;
568 569
    char *default_config_file;
    char *config_file;
Per Cederqvist's avatar
Per Cederqvist committed
570 571 572

    link_ansi();

573
    current_time = time(NULL);
Per Cederqvist's avatar
Per Cederqvist committed
574

575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590
#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
591
    kom_log("*** Version %s (process %lu) started.\n",
592
	kom_version_info.server_version, (unsigned long)getpid());
593
#ifdef DEBUG_CALLS
David Byers's avatar
David Byers committed
594 595
    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");
596
#endif
597

Per Cederqvist's avatar
Per Cederqvist committed
598
#ifdef ENCRYPT_PASSWORDS
599
    /* Seed the random number generator. */
Per Cederqvist's avatar
Per Cederqvist committed
600 601
    srand(time(NULL) + getpid());
#endif
Per Cederqvist's avatar
Per Cederqvist committed
602

603 604
    /* Initialize the string handling package. */
    s_set_storage_management(string_malloc, string_realloc, string_free);
605

606
    /* Parse command line arguments. */
Per Cederqvist's avatar
Per Cederqvist committed
607 608 609 610 611 612 613
    for (i = 1; i < argc && argv[i][0] == '-'; i++)
	switch (argv[i][1])
	{
	case 'd':
	    buglevel++;
	    break;

614 615 616 617
	case 'f':
	    foreground = 1;
	    break;

618
	default:
619
	    restart_kom("usage: %s [-f] [-d ...] [config-file]\n", argv[0]);
620
	}
Per Cederqvist's avatar
Per Cederqvist committed
621

622

623
    /* Read in the configuration file. */
624

625 626 627
    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
628
    if (i < argc)
629 630 631
	config_file = argv[i++];
    else
	config_file = default_config_file;
Per Cederqvist's avatar
Per Cederqvist committed
632

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

636
    setup_sighandlers(1);
637
    initialize(config_file);	/* Read config, listen, and start db */
638
    chdir(param.core_dir);
639 640 641

    read_config_file = smalloc(strlen(config_file) + 1);
    strcpy(read_config_file, config_file);
642 643
    sfree(default_config_file);

Per Cederqvist's avatar
Per Cederqvist committed
644
    save_pid();
Per Cederqvist's avatar
Per Cederqvist committed
645

Per Cederqvist's avatar
Per Cederqvist committed
646
    toploop();
Per Cederqvist's avatar
Per Cederqvist committed
647

648 649 650
    /* There is no use sending logout messages to all sessions. */
    param.send_async_messages = FALSE;
    
Per Cederqvist's avatar
Per Cederqvist committed
651
    logout_all_clients();
652
    isc_shutdown(kom_server_mcb);
Per Cederqvist's avatar
Per Cederqvist committed
653
    cache_sync_all();
654
    unlock_db();
Per Cederqvist's avatar
Per Cederqvist committed
655

David Byers's avatar
David Byers committed
656 657
    /* Finish */

658 659
    dump_exit_statistics();

David Byers's avatar
David Byers committed
660
    kom_log("%s terminated normally.\n", argv[0]);
661 662 663 664 665

    /* 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.  */
666
    if (foreground)
667
    {
David Byers's avatar
David Byers committed
668
	kom_log("Press enter to terminate lyskomd\n");
669 670
	getchar();
    }
David Byers's avatar
David Byers committed
671

672
    exit(0);
673 674 675 676 677 678 679 680
}

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

681 682
    time(&now);
    stat_file = i_fopen(param.memuse_name, "a");
Per Cederqvist's avatar
Per Cederqvist committed
683 684 685 686

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

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

689 690 691 692
    dump_cache_stats (stat_file);

    free_all_tmp();
    free_all_cache();
693
    free_all_jubel();
David Byers's avatar
David Byers committed
694 695 696
    free_kom_info();
    free_aux_item_definitions();
    free_configuration();
697
    sfree(read_config_file);
698

Per Cederqvist's avatar
Per Cederqvist committed
699 700
    dump_smalloc_counts(stat_file);
    dump_alloc_counts(stat_file);
701
    dump_cache_mem_usage(stat_file);
Per Cederqvist's avatar
Per Cederqvist committed
702
    dump_string_alloc_counts(stat_file);
703
    dump_allocated_connections(stat_file);
704
    dump_isc_alloc_counts(stat_file);
705
    dump_l2g_stats(stat_file);
706
    i_fclose (stat_file);
Per Cederqvist's avatar
Per Cederqvist committed
707
}
David Byers's avatar
David Byers committed
708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724

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