ramkomd.c 13.8 KB
Newer Older
Linus Tolke Y's avatar
Linus Tolke Y committed
1
/*
Per Cederqvist's avatar
Per Cederqvist committed
2
 * $Id: ramkomd.c,v 0.81 1999/04/28 22:13:29 ceder Exp $
Per Cederqvist's avatar
Per Cederqvist committed
3
 * Copyright (C) 1991, 1992, 1993, 1994, 1995, 1996  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
static const char *
Per Cederqvist's avatar
Per Cederqvist committed
47
rcsid = "$Id: ramkomd.c,v 0.81 1999/04/28 22:13:29 ceder Exp $";
48 49
#include "rcs.h"
USE(rcsid);
Per Cederqvist's avatar
Per Cederqvist committed
50

51 52 53
#ifdef HAVE_LOCALE_H
#  include <locale.h>
#endif
Per Cederqvist's avatar
Per Cederqvist committed
54
#include <stdio.h>
Per Cederqvist's avatar
Per Cederqvist committed
55
#include <signal.h>
Per Cederqvist's avatar
Per Cederqvist committed
56 57 58
#ifdef HAVE_STDARG_H
#  include <stdarg.h>
#endif
59 60 61 62 63 64
#ifdef HAVE_STDLIB_H
#  include <stdlib.h>
#endif
#ifdef HAVE_STRING_H
#  include <string.h>
#endif
Per Cederqvist's avatar
Per Cederqvist committed
65
#include <sys/wait.h>
Per Cederqvist's avatar
Per Cederqvist committed
66
#include <time.h>
67
#ifdef HAVE_SYS_RESOURCE_H
Per Cederqvist's avatar
Per Cederqvist committed
68
#  include <sys/time.h>
69 70
#  include <sys/resource.h>
#endif
Per Cederqvist's avatar
Per Cederqvist committed
71
#include <unistd.h>
Per Cederqvist's avatar
Per Cederqvist committed
72 73 74 75
#include <setjmp.h>
#if defined(HAVE_SYS_PARAM_H) && !defined(HAVE_GETCWD)
# include <sys/param.h>
#endif
Per Cederqvist's avatar
Per Cederqvist committed
76
#include <errno.h>
Per Cederqvist's avatar
Per Cederqvist committed
77
#include <sys/types.h>
78
#include <sys/socket.h>
Per Cederqvist's avatar
Per Cederqvist committed
79
#include <fcntl.h>
Per Cederqvist's avatar
Per Cederqvist committed
80

Per Cederqvist's avatar
Per Cederqvist committed
81
#include "exp.h"
82
#include "s-string.h"
Per Cederqvist's avatar
Per Cederqvist committed
83
#include "misc-types.h"
84
#include "kom-types.h"
Per Cederqvist's avatar
Per Cederqvist committed
85
#include "com.h"
86
#include "async.h"
Per Cederqvist's avatar
Per Cederqvist committed
87 88 89
#include "connections.h"
#include "internal-connections.h"
#include "kom-errno.h"
Per Cederqvist's avatar
Per Cederqvist committed
90
#include "isc-malloc.h"
91
#include "isc-interface.h"
David Byers's avatar
David Byers committed
92
#include "kom-config.h"
Per Cederqvist's avatar
Per Cederqvist committed
93
#include "cache.h"
Per Cederqvist's avatar
Per Cederqvist committed
94 95
#include "string-malloc.h"
#include "lyskomd.h"
Per Cederqvist's avatar
Per Cederqvist committed
96
#include "log.h"
Per Cederqvist's avatar
Per Cederqvist committed
97 98 99
#include "internal-services.h"
#include "server/smalloc.h"
#include "kom-memory.h"
100 101
#include "conf-file.h"
#include "param.h"
102 103
#include "server-config.h"
#include "manipulate.h"
104
#include "version-info.h"
105
#include "aux-items.h"
David Byers's avatar
David Byers committed
106
#include "admin.h"
107
#include "unused.h"
Per Cederqvist's avatar
Per Cederqvist committed
108
#include "sigflags.h"
Per Cederqvist's avatar
Per Cederqvist committed
109
#include "local-to-global.h"
110

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

115 116 117 118
Kom_err		  kom_errno = KOM_NO_ERROR;
unsigned long	  err_stat = 0;


Per Cederqvist's avatar
Per Cederqvist committed
119
#ifndef NDEBUG
120
int	buglevel = 0;
121
#endif
Per Cederqvist's avatar
Per Cederqvist committed
122

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

125
static void dump_exit_statistics(void);
David Byers's avatar
David Byers committed
126
static void free_kom_info(void);
127

Per Cederqvist's avatar
Per Cederqvist committed
128
static void
Per Cederqvist's avatar
Per Cederqvist committed
129
server_init(const char *host, const char * client_port)
Per Cederqvist's avatar
Per Cederqvist committed
130
{
Per Cederqvist's avatar
Per Cederqvist committed
131
    IscConfig config;
132
    IscAddress *isc_adr = NULL;
133 134 135 136
#ifdef HAVE_STRUCT_SIGACTION
    struct sigaction act;
#endif

Per Cederqvist's avatar
Per Cederqvist committed
137 138 139
    /*
    ** Setup some parameters here
    */
140
    config.version = 1006;
Per Cederqvist's avatar
Per Cederqvist committed
141 142 143 144
    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;
145
    config.master.abortfn = NULL; /* Use default abort function. */
146
    config.session.version = 1002;
147
    config.session.max.msgsize = -1; /* Use default sizes. */
Per Cederqvist's avatar
Per Cederqvist committed
148 149 150 151
    config.session.max.queuedsize = -1;
    config.session.max.dequeuelen = -1;
    config.session.max.openretries = -1;
    config.session.max.backlog = -1;
152
    config.session.fd_relocate = PROTECTED_FDS;
Per Cederqvist's avatar
Per Cederqvist committed
153

154
    kom_server_mcb  = isc_initialize(&config);
Per Cederqvist's avatar
Per Cederqvist committed
155
    if ( kom_server_mcb == NULL )
Per Cederqvist's avatar
Per Cederqvist committed
156 157
	restart_kom("server_init: can't isc_initialize()\n");

158
    listen_client = isc_listentcp(kom_server_mcb, host, client_port);
Per Cederqvist's avatar
Per Cederqvist committed
159 160
    if (listen_client == NULL)
        restart_kom("server_init: can't isc_listentcp(CLIENT)\n");
Per Cederqvist's avatar
Per Cederqvist committed
161

162 163 164 165
    isc_adr = isc_getladdress (listen_client);
    if (isc_adr == NULL)
	restart_kom("server_init(): can't isc_getladdress (listen_client)\n");

Per Cederqvist's avatar
Per Cederqvist committed
166
    log("Listening for clients on %d.\n", isc_getportnum(isc_adr));
167 168
    isc_freeaddress (isc_adr);
    
Per Cederqvist's avatar
Per Cederqvist committed
169 170 171 172 173 174

    /*
     * 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.
     */
175 176 177 178
#ifdef HAVE_STRUCT_SIGACTION
    sigemptyset(&act.sa_mask);
    act.sa_flags = 0;
    act.sa_handler = SIG_IGN;
179
    sigaction(SIGPIPE, &act, NULL);
180
#else
Per Cederqvist's avatar
Per Cederqvist committed
181
    signal(SIGPIPE, SIG_IGN);
182
#endif
Per Cederqvist's avatar
Per Cederqvist committed
183 184 185
}

static void
186
init_data_base(void)
Per Cederqvist's avatar
Per Cederqvist committed
187
{
188 189
    log("Database = %s\n",  param.datafile_name);
    log("Backup = %s\n", param.backupfile_name);
190
    log("2nd Backup = %s\n", param.backupfile_name_2);
Per Cederqvist's avatar
Per Cederqvist committed
191 192
    
    if ( init_cache() == FAILURE )
193
	restart_kom ("Cannot find database.\n");
Per Cederqvist's avatar
Per Cederqvist committed
194 195
}

Per Cederqvist's avatar
Per Cederqvist committed
196
static void
197
sighandler_hup (int UNUSED(sig))
Per Cederqvist's avatar
Per Cederqvist committed
198
{
199
#ifndef HAVE_STRUCT_SIGACTION
200
    signal(SIGHUP, sighandler_hup);
201
#endif
Per Cederqvist's avatar
Per Cederqvist committed
202
    log ("Signal HUP received. Shutting down server.\n");
Per Cederqvist's avatar
Per Cederqvist committed
203
    go_and_die = 1;
Per Cederqvist's avatar
Per Cederqvist committed
204 205
}

Per Cederqvist's avatar
Per Cederqvist committed
206
static void
207
sighandler_quit (int UNUSED(sig))
Per Cederqvist's avatar
Per Cederqvist committed
208 209 210 211 212 213 214
{
    log ("Signal QUIT received - syncing...\n");
    cache_sync_all();
    log ("Dumping core now.\n");
    abort();
}

Per Cederqvist's avatar
Per Cederqvist committed
215
static void
216
sighandler_usr1 (int UNUSED(sig))
Per Cederqvist's avatar
Per Cederqvist committed
217
{
218
#ifndef HAVE_STRUCT_SIGACTION
219
    signal(SIGUSR1, sighandler_usr1);
220
#endif
Per Cederqvist's avatar
Per Cederqvist committed
221
    do_statistics = 1;
Per Cederqvist's avatar
Per Cederqvist committed
222 223
}

Per Cederqvist's avatar
Per Cederqvist committed
224
static void
225
sighandler_usr2 (int UNUSED(sig))
Per Cederqvist's avatar
Per Cederqvist committed
226 227 228
{
    int		  child;

229
#ifndef HAVE_STRUCT_SIGACTION
230
    signal(SIGUSR2, sighandler_usr2);
231
#endif
232

Per Cederqvist's avatar
Per Cederqvist committed
233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249
    log ("Signal USR2 received - will dump core now.  (Check that child dies.)\n");
    if ((child = fork()) == 0)
    {
	abort();
	log ("Abort() failed!!!");
	exit(1);
    }
    else if (child < 0)
    {
	log ("Couldn't fork.\n");
    }
    else
    {
	wait (NULL);
    }
}

Per Cederqvist's avatar
Per Cederqvist committed
250
static void
Per Cederqvist's avatar
Per Cederqvist committed
251 252 253 254
save_pid(void)
{
    FILE *fp;

255
    if ((fp = fopen(param.pid_name, "w")) == NULL)
Per Cederqvist's avatar
Per Cederqvist committed
256 257
	return;

258
    fprintf(fp, "%ld\n", (long)getpid());
Per Cederqvist's avatar
Per Cederqvist committed
259 260 261
    fclose(fp);
}

Per Cederqvist's avatar
Per Cederqvist committed
262
static void
263
go_daemon(void)
Per Cederqvist's avatar
Per Cederqvist committed
264 265 266
{
    pid_t child;
    int fd;
267 268 269 270
#ifdef HAVE_STRUCT_SIGACTION
    struct sigaction act;
#endif
    
271 272 273 274 275
    if (buglevel != 0)
    {
	return;
    }

Per Cederqvist's avatar
Per Cederqvist committed
276 277 278 279 280
    if (getppid() != 1)
    {
	/* We were not invoked from /etc/inittab, so
	   disassociate from controlling terminal. */

281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298
#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
299
	signal(SIGTTOU, SIG_IGN);
300 301
#  endif
#  ifdef SIGTTIN
Per Cederqvist's avatar
Per Cederqvist committed
302
	signal(SIGTTIN, SIG_IGN);
303 304
#  endif
#  ifdef SIGTSTP
Per Cederqvist's avatar
Per Cederqvist committed
305
	signal(SIGTSTP, SIG_IGN);
306 307
#  endif

Per Cederqvist's avatar
Per Cederqvist committed
308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323
#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
324
	||open(param.logfile_name, O_WRONLY|O_CREAT|O_APPEND, 0644) != 2)
Per Cederqvist's avatar
Per Cederqvist committed
325 326 327
    {
	/* Kinda stupid to try to log an error message now, but
	   who knows? */
328
	restart_kom("open of log file failed: %d\n", errno);
Per Cederqvist's avatar
Per Cederqvist committed
329
    }
330 331
    log("*** Version %s (process %lu) coming up.\n",
	kom_version_info.server_version, (unsigned long)getpid());
Per Cederqvist's avatar
Per Cederqvist committed
332 333
}

334
static void
335
initialize(const char *config_file)
336
{
337 338 339 340
#if defined(HAVE_SETRLIMIT) && defined(RLIMIT_NOFILE)
    struct rlimit rlim;
#endif

341
    read_configuration(config_file);
342
    initialize_aux_items(param.aux_def_file);
343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358

#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
359 360

#if defined(HAVE_SETRLIMIT) && defined(RLIMIT_NOFILE)
361 362 363 364 365 366
    if (getrlimit(RLIMIT_NOFILE, &rlim) < 0)
    {
	perror("getrlimit(RLIMIT_NOFILE) failed");
	exit(1);
    }

Per Cederqvist's avatar
Per Cederqvist committed
367
    if (param.no_files != -1)
368 369 370
    {
	if (param.no_files > rlim.rlim_max)
	{
371 372 373 374
	    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);
375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406
	    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

407 408 409 410 411 412 413 414 415 416 417 418 419
#if defined(HAVE_SETRLIMIT) && defined(RLIMIT_NOFILE)
    /* Check that getrlimit and sysconf/getdtablesize/the compiled default
       makes sense. */
    if (rlim.rlim_cur > MAX_NO_OF_CONNECTIONS + PROTECTED_FDS)
	log("WARNING: getrlimit indicates that %ld files can be open, "
	    "but MAX_NO_OF_CONNECTIONS is only %ld\n",
	    (long)rlim.rlim_cur, (long)MAX_NO_OF_CONNECTIONS);
    else if (rlim.rlim_cur < MAX_NO_OF_CONNECTIONS + PROTECTED_FDS)
	log("warning: getrlimit indicates that only %ld files can be open, "
	    "but MAX_NO_OF_CONNECTIONS is %ld (this should be harmless)\n",
	    (long)rlim.rlim_cur, (long)MAX_NO_OF_CONNECTIONS);
#endif

420
    go_daemon();
Per Cederqvist's avatar
Per Cederqvist committed
421
    server_init(param.ip_client_host, param.ip_client_port);
422
    init_data_base();
423 424
}

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

428
	
Per Cederqvist's avatar
Per Cederqvist committed
429 430 431 432 433
int
main (int    argc,
      char **argv)
{
    int i;
434 435
    char *default_config_file;
    char *config_file;
436 437 438
#ifdef HAVE_STRUCT_SIGACTION
    struct sigaction act;
#endif
Per Cederqvist's avatar
Per Cederqvist committed
439

440 441
    log("*** Version %s (process %lu) started.\n",
	kom_version_info.server_version, (unsigned long)getpid());
442 443 444 445
#ifdef DEBUG_CALLS
    log("WARNING: This server was compiled with --with-debug-calls.\n");
    log("It isn't safe to use in a production environment.\n");
#endif
446

Per Cederqvist's avatar
Per Cederqvist committed
447
#ifdef ENCRYPT_PASSWORDS
448
    /* Seed the random number generator. */
Per Cederqvist's avatar
Per Cederqvist committed
449 450
    srand(time(NULL) + getpid());
#endif
Per Cederqvist's avatar
Per Cederqvist committed
451

452 453
    /* Initialize the string handling package. */
    s_set_storage_management(string_malloc, string_realloc, string_free);
454

455
    /* Parse command line arguments. */
Per Cederqvist's avatar
Per Cederqvist committed
456 457 458 459 460 461 462
    for (i = 1; i < argc && argv[i][0] == '-'; i++)
	switch (argv[i][1])
	{
	case 'd':
	    buglevel++;
	    break;

463
	default:
464
	    restart_kom("usage: %s [-d ...] [config-file]\n", argv[0]);
465
	}
Per Cederqvist's avatar
Per Cederqvist committed
466

467

468
    /* Read in the configuration file. */
469

470 471 472
    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
473
    if (i < argc)
474 475 476
	config_file = argv[i++];
    else
	config_file = default_config_file;
Per Cederqvist's avatar
Per Cederqvist committed
477

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

481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496
#ifdef HAVE_STRUCT_SIGACTION
    sigemptyset(&act.sa_mask);
    act.sa_flags = 0;

    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);
#else
Per Cederqvist's avatar
Per Cederqvist committed
497 498 499 500
    signal(SIGHUP, sighandler_hup);
    signal(SIGQUIT, sighandler_quit);
    signal(SIGUSR1, sighandler_usr1);
    signal(SIGUSR2, sighandler_usr2);
501 502
#endif

503
    initialize(config_file);	/* Read config, listen, and start db */
504
    chdir(param.core_dir);
505 506
    sfree(default_config_file);

Per Cederqvist's avatar
Per Cederqvist committed
507
    save_pid();
Per Cederqvist's avatar
Per Cederqvist committed
508

Per Cederqvist's avatar
Per Cederqvist committed
509
    toploop();
Per Cederqvist's avatar
Per Cederqvist committed
510 511

    logout_all_clients();
512
    isc_shutdown(kom_server_mcb);
Per Cederqvist's avatar
Per Cederqvist committed
513
    cache_sync_all();
Per Cederqvist's avatar
Per Cederqvist committed
514

David Byers's avatar
David Byers committed
515
    free_kom_info();
516 517
    dump_exit_statistics();

Per Cederqvist's avatar
Per Cederqvist committed
518
    log("%s terminated normally.\n", argv[0]);
519 520 521 522 523 524 525 526 527 528

    /* 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.  */
    if (buglevel > 0)
    {
	log("Press enter to terminate lyskomd\n");
	getchar();
    }
529
    
530
    exit(0);
531 532 533 534 535 536 537 538 539
}

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

    time(&now);
540
    stat_file = fopen(param.memuse_name, "a");
Per Cederqvist's avatar
Per Cederqvist committed
541 542 543 544

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

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

547 548 549 550
    dump_cache_stats (stat_file);

    free_all_tmp();
    free_all_cache();
551
    free_all_jubel();
552

Per Cederqvist's avatar
Per Cederqvist committed
553 554
    dump_smalloc_counts(stat_file);
    dump_alloc_counts(stat_file);
555
    dump_cache_mem_usage(stat_file);
Per Cederqvist's avatar
Per Cederqvist committed
556
    dump_string_alloc_counts(stat_file);
557
    dump_allocated_connections(stat_file);
558
    dump_isc_alloc_counts(stat_file);
559
    dump_l2g_stats(stat_file);
Per Cederqvist's avatar
Per Cederqvist committed
560
    fclose (stat_file);
Per Cederqvist's avatar
Per Cederqvist committed
561
}
David Byers's avatar
David Byers committed
562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578

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