ramkomd.c 16.4 KB
Newer Older
Linus Tolke Y's avatar
Linus Tolke Y committed
1
/*
2
 * $Id: ramkomd.c,v 0.114 2003/07/12 22:26:34 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
#include "timewrap.h"
59
60
61
#ifdef HAVE_SYS_RESOURCE_H
#  include <sys/resource.h>
#endif
Per Cederqvist's avatar
Per Cederqvist committed
62
#include <unistd.h>
Per Cederqvist's avatar
Per Cederqvist committed
63
64
65
66
#include <setjmp.h>
#if defined(HAVE_SYS_PARAM_H) && !defined(HAVE_GETCWD)
# include <sys/param.h>
#endif
Per Cederqvist's avatar
Per Cederqvist committed
67
#include <errno.h>
Per Cederqvist's avatar
Per Cederqvist committed
68
#include <sys/types.h>
69
#include <sys/socket.h>
Per Cederqvist's avatar
Per Cederqvist committed
70
#include <fcntl.h>
Per Cederqvist's avatar
Per Cederqvist committed
71

72
73
#include "oop.h"

Per Cederqvist's avatar
Per Cederqvist committed
74
#include "exp.h"
75
#include "s-string.h"
Per Cederqvist's avatar
Per Cederqvist committed
76
#include "misc-types.h"
77
#include "kom-types.h"
Per Cederqvist's avatar
Per Cederqvist committed
78
#include "com.h"
79
#include "async.h"
Per Cederqvist's avatar
Per Cederqvist committed
80
81
82
#include "connections.h"
#include "internal-connections.h"
#include "kom-errno.h"
83
#include "oop-malloc.h"
Per Cederqvist's avatar
Per Cederqvist committed
84
#include "isc-malloc.h"
85
#include "isc-interface.h"
David Byers's avatar
David Byers committed
86
#include "kom-config.h"
Per Cederqvist's avatar
Per Cederqvist committed
87
#include "cache.h"
Per Cederqvist's avatar
Per Cederqvist committed
88
89
#include "string-malloc.h"
#include "lyskomd.h"
Per Cederqvist's avatar
Per Cederqvist committed
90
#include "log.h"
Per Cederqvist's avatar
Per Cederqvist committed
91
92
#include "server/smalloc.h"
#include "kom-memory.h"
93
94
#include "conf-file.h"
#include "param.h"
95
96
#include "server-config.h"
#include "manipulate.h"
97
#include "version-info.h"
98
#include "aux-items.h"
David Byers's avatar
David Byers committed
99
#include "admin.h"
100
#include "unused.h"
Per Cederqvist's avatar
Per Cederqvist committed
101
#include "sigflags.h"
Per Cederqvist's avatar
Per Cederqvist committed
102
#include "local-to-global.h"
103
#include "server-time.h"
104
#include "lockdb.h"
Per Cederqvist's avatar
Per Cederqvist committed
105
#include "linkansi.h"
106
107
108
#ifdef TRACED_ALLOCATIONS
#  include "trace-alloc.h"
#endif
109
#include "eintr.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
#if !HAVE_RLIM_T
typedef int rlim_t;
#endif

119
struct timeval current_time = { 0, 0 };
120
121


Per Cederqvist's avatar
Per Cederqvist committed
122
#ifndef NDEBUG
123
int	buglevel = 0;
124
#endif
Per Cederqvist's avatar
Per Cederqvist committed
125

126
127
128
129
130
/* 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;

131
static void dump_exit_statistics(void);
David Byers's avatar
David Byers committed
132
static void free_kom_info(void);
133
134
135
136
137
138
static oop_call_signal sighandler_hup;
static oop_call_signal sighandler_quit;
static oop_call_signal sighandler_usr1;
static oop_call_signal sighandler_usr2;
static oop_call_signal sighandler_winch;

139

140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
#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
157
static void
Per Cederqvist's avatar
Per Cederqvist committed
158
server_init(const char *host, const char * client_port)
Per Cederqvist's avatar
Per Cederqvist committed
159
{
160
161
162
    struct isc_scb *listen_client;
    union isc_address *isc_adr = NULL;
    oop_source *src;
163
164
165
166
#ifdef HAVE_STRUCT_SIGACTION
    struct sigaction act;
#endif

167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
    oop_malloc = &oop_malloc_wrapper;
    oop_realloc = &oop_realloc_wrapper;
    oop_free = &oop_free_wrapper;

    kom_server_oop_src = oop_sys_new();
    if (kom_server_oop_src == NULL)
	restart_kom("server_init: can't get system event source\n");
    src = oop_sys_source(kom_server_oop_src);
    oop_sys_use_sa_restart();
    src->on_signal(src, SIGHUP, sighandler_hup, NULL);
    src->on_signal(src, SIGQUIT, sighandler_quit, NULL);
    src->on_signal(src, SIGUSR1, sighandler_usr1, NULL);
    src->on_signal(src, SIGUSR2, sighandler_usr2, NULL);
    src->on_signal(src, SIGWINCH, sighandler_winch, NULL);

Per Cederqvist's avatar
Per Cederqvist committed
182
183
184
    /*
    ** Setup some parameters here
    */
185
186
187
188
189
    isc_setallocfn(&isc_malloc_wrapper,
		   &isc_realloc_wrapper,
		   &isc_free_wrapper);

    kom_server_mcb  = isc_initialize(oop_sys_source(kom_server_oop_src));
Per Cederqvist's avatar
Per Cederqvist committed
190
    if ( kom_server_mcb == NULL )
Per Cederqvist's avatar
Per Cederqvist committed
191
	restart_kom("server_init: can't isc_initialize()\n");
192
    isc_cfg_fd_relocate(kom_server_mcb, PROTECTED_FDS);
Per Cederqvist's avatar
Per Cederqvist committed
193

194
195
    listen_client = isc_listentcp(kom_server_mcb, host, client_port,
				  handle_accept_event);
Per Cederqvist's avatar
Per Cederqvist committed
196
197
    if (listen_client == NULL)
        restart_kom("server_init: can't isc_listentcp(CLIENT)\n");
Per Cederqvist's avatar
Per Cederqvist committed
198

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

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

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

234
235
236
237
static void *
sighandler_hup(oop_source *UNUSED(source),
	       int UNUSED(sig),
	       void *UNUSED(user))
Per Cederqvist's avatar
Per Cederqvist committed
238
{
David Byers's avatar
David Byers committed
239
    kom_log ("Signal HUP received. Shutting down server.\n");
Per Cederqvist's avatar
Per Cederqvist committed
240
    go_and_die = 1;
241
    return OOP_HALT;
Per Cederqvist's avatar
Per Cederqvist committed
242
243
}

244
245
246
247
static void *
sighandler_quit(oop_source *UNUSED(source),
		int UNUSED(sig),
		void *UNUSED(user))
Per Cederqvist's avatar
Per Cederqvist committed
248
{
David Byers's avatar
David Byers committed
249
    kom_log ("Signal QUIT received - syncing...\n");
Per Cederqvist's avatar
Per Cederqvist committed
250
    cache_sync_all();
David Byers's avatar
David Byers committed
251
    kom_log ("Dumping core now.\n");
Per Cederqvist's avatar
Per Cederqvist committed
252
253
254
    abort();
}

255
256
257
258
static void *
sighandler_usr1(oop_source *UNUSED(source),
		int UNUSED(sig),
		void *UNUSED(user))
Per Cederqvist's avatar
Per Cederqvist committed
259
{
260
261
    dump_statistics();
    return OOP_CONTINUE;
Per Cederqvist's avatar
Per Cederqvist committed
262
263
}

264
265
266
267
static void *
sighandler_usr2(oop_source *UNUSED(source),
		int UNUSED(sig),
		void *UNUSED(user))
Per Cederqvist's avatar
Per Cederqvist committed
268
269
270
{
    int		  child;

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

289
290
291
292
static void *
sighandler_winch(oop_source *UNUSED(source),
		 int UNUSED(sig),
		 void *UNUSED(user))
293
{
294
295
296
297
    free_aux_item_definitions();
    initialize_aux_items(param.aux_def_file);
    kom_log("Signal WINCH received. aux definitions reloaded.\n");
    return OOP_CONTINUE;
298
299
}

Per Cederqvist's avatar
Per Cederqvist committed
300
static void
Per Cederqvist's avatar
Per Cederqvist committed
301
302
303
304
save_pid(void)
{
    FILE *fp;

305
    if ((fp = i_fopen(param.pid_name, "w")) == NULL)
Per Cederqvist's avatar
Per Cederqvist committed
306
307
	return;

308
    fprintf(fp, "%ld\n", (long)getpid());
309
    i_fclose(fp);
Per Cederqvist's avatar
Per Cederqvist committed
310
311
}

Per Cederqvist's avatar
Per Cederqvist committed
312
static void
313
go_daemon(void)
Per Cederqvist's avatar
Per Cederqvist committed
314
315
316
{
    pid_t child;
    int fd;
317
318
319
320
#ifdef HAVE_STRUCT_SIGACTION
    struct sigaction act;
#endif
    
321
    if (foreground != 0)
322
323
324
325
    {
	return;
    }

Per Cederqvist's avatar
Per Cederqvist committed
326
327
328
329
330
    if (getppid() != 1)
    {
	/* We were not invoked from /etc/inittab, so
	   disassociate from controlling terminal. */

331
332
333
#ifdef HAVE_STRUCT_SIGACTION
	sigemptyset(&act.sa_mask);
	act.sa_flags = 0;
334
	set_handler_sig_ign(&act);
335
336
337
338
339
340
341
342
343
344
345
346
347
348

#  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
349
	signal(SIGTTOU, SIG_IGN);
350
351
#  endif
#  ifdef SIGTTIN
Per Cederqvist's avatar
Per Cederqvist committed
352
	signal(SIGTTIN, SIG_IGN);
353
354
#  endif
#  ifdef SIGTSTP
Per Cederqvist's avatar
Per Cederqvist committed
355
	signal(SIGTSTP, SIG_IGN);
356
357
#  endif

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

384
static void
385
initialize(const char *config_file)
386
{
387
#ifdef USING_RLIMIT_NOFILE
388
389
390
    struct rlimit rlim;
#endif

391
    read_configuration(config_file);
392
    initialize_aux_items(param.aux_def_file);
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408

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

410
411
412
413
414
415
416
417
    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);
    }

418
#ifdef USING_RLIMIT_NOFILE
419
420
421
422
423
424
    if (getrlimit(RLIMIT_NOFILE, &rlim) < 0)
    {
	perror("getrlimit(RLIMIT_NOFILE) failed");
	exit(1);
    }

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

479
480
481
    if (fd_ceiling > FD_SETSIZE)
	fd_ceiling = FD_SETSIZE;

482
    go_daemon();
483
    if (lock_db() < 0)
484
485
486
487
488
    {
	/* 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.  */
489
	kom_log("Cannot obtain database lock.  Exiting.\n");
490
	if (foreground)
491
492
493
494
495
	{
	    kom_log("Press enter to terminate lyskomd\n");
	    getchar();
	}

496
	exit(1);
497
498
    }

Per Cederqvist's avatar
Per Cederqvist committed
499
    server_init(param.ip_client_host, param.ip_client_port);
500
    init_data_base();
501
502
}

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

506
	
Per Cederqvist's avatar
Per Cederqvist committed
507
508
509
510
511
int
main (int    argc,
      char **argv)
{
    int i;
512
513
    char *default_config_file;
    char *config_file;
514
    oop_source *src;
Per Cederqvist's avatar
Per Cederqvist committed
515
516
517

    link_ansi();

518
519
    if (gettimeofday(&current_time, NULL) < 0)
	restart_kom("gettimeofday failed: %s\n", strerror(errno));
Per Cederqvist's avatar
Per Cederqvist committed
520

521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
#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
537
    kom_log("*** Version %s (process %lu) started.\n",
538
	kom_version_info.server_version, (unsigned long)getpid());
539
#ifdef DEBUG_CALLS
David Byers's avatar
David Byers committed
540
541
    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");
542
#endif
543

Per Cederqvist's avatar
Per Cederqvist committed
544
#ifdef ENCRYPT_PASSWORDS
545
    /* Seed the random number generator. */
Per Cederqvist's avatar
Per Cederqvist committed
546
547
    srand(time(NULL) + getpid());
#endif
Per Cederqvist's avatar
Per Cederqvist committed
548

549
550
    /* Initialize the string handling package. */
    s_set_storage_management(string_malloc, string_realloc, string_free);
551

552
    /* Parse command line arguments. */
Per Cederqvist's avatar
Per Cederqvist committed
553
554
555
556
557
558
559
    for (i = 1; i < argc && argv[i][0] == '-'; i++)
	switch (argv[i][1])
	{
	case 'd':
	    buglevel++;
	    break;

560
561
562
563
	case 'f':
	    foreground = 1;
	    break;

564
	default:
565
	    restart_kom("usage: %s [-f] [-d ...] [config-file]\n", argv[0]);
566
	}
Per Cederqvist's avatar
Per Cederqvist committed
567

568

569
    /* Read in the configuration file. */
570

571
572
573
    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
574
    if (i < argc)
575
576
577
	config_file = argv[i++];
    else
	config_file = default_config_file;
Per Cederqvist's avatar
Per Cederqvist committed
578

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

582
    initialize(config_file);	/* Read config, listen, and start db */
583
    chdir(param.core_dir);
584
585
586

    read_config_file = smalloc(strlen(config_file) + 1);
    strcpy(read_config_file, config_file);
587
588
    sfree(default_config_file);

Per Cederqvist's avatar
Per Cederqvist committed
589
    save_pid();
Per Cederqvist's avatar
Per Cederqvist committed
590

Per Cederqvist's avatar
Per Cederqvist committed
591
    toploop();
Per Cederqvist's avatar
Per Cederqvist committed
592

593
594
595
    /* There is no use sending logout messages to all sessions. */
    param.send_async_messages = FALSE;
    
Per Cederqvist's avatar
Per Cederqvist committed
596
    logout_all_clients();
597
    isc_shutdown(kom_server_mcb);
Per Cederqvist's avatar
Per Cederqvist committed
598
    cache_sync_all();
599
    unlock_db();
600
601
602
603
604
605
606
    src = oop_sys_source(kom_server_oop_src);
    src->cancel_signal(src, SIGWINCH, sighandler_winch, NULL);
    src->cancel_signal(src, SIGUSR2, sighandler_usr2, NULL);
    src->cancel_signal(src, SIGUSR1, sighandler_usr1, NULL);
    src->cancel_signal(src, SIGQUIT, sighandler_quit, NULL);
    src->cancel_signal(src, SIGHUP, sighandler_hup, NULL);
    oop_sys_delete(kom_server_oop_src);
Per Cederqvist's avatar
Per Cederqvist committed
607

David Byers's avatar
David Byers committed
608
609
    /* Finish */

610
611
    dump_exit_statistics();

David Byers's avatar
David Byers committed
612
    kom_log("%s terminated normally.\n", argv[0]);
613
614
615
616
617

    /* 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.  */
618
    if (foreground)
619
    {
David Byers's avatar
David Byers committed
620
	kom_log("Press enter to terminate lyskomd\n");
621
622
	getchar();
    }
David Byers's avatar
David Byers committed
623

624
    exit(0);
625
626
627
628
629
630
631
632
}

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

633
634
    time(&now);
    stat_file = i_fopen(param.memuse_name, "a");
Per Cederqvist's avatar
Per Cederqvist committed
635
636
637
638

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

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

641
642
643
644
    dump_cache_stats (stat_file);

    free_all_tmp();
    free_all_cache();
645
    free_all_jubel();
David Byers's avatar
David Byers committed
646
647
648
    free_kom_info();
    free_aux_item_definitions();
    free_configuration();
649
    sfree(read_config_file);
650

Per Cederqvist's avatar
Per Cederqvist committed
651
652
    dump_smalloc_counts(stat_file);
    dump_alloc_counts(stat_file);
653
    dump_cache_mem_usage(stat_file);
Per Cederqvist's avatar
Per Cederqvist committed
654
    dump_string_alloc_counts(stat_file);
655
    dump_allocated_connections(stat_file);
656
    dump_isc_alloc_counts(stat_file);
657
    dump_oop_alloc_counts(stat_file);
658
    dump_l2g_stats(stat_file);
659
    i_fclose (stat_file);
Per Cederqvist's avatar
Per Cederqvist committed
660
}
David Byers's avatar
David Byers committed
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677

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