1/*
2 * daemon/unbound.c - main program for unbound DNS resolver daemon.
3 *
4 * Copyright (c) 2007, NLnet Labs. All rights reserved.
5 *
6 * This software is open source.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 *
12 * Redistributions of source code must retain the above copyright notice,
13 * this list of conditions and the following disclaimer.
14 *
15 * Redistributions in binary form must reproduce the above copyright notice,
16 * this list of conditions and the following disclaimer in the documentation
17 * and/or other materials provided with the distribution.
18 *
19 * Neither the name of the NLNET LABS nor the names of its contributors may
20 * be used to endorse or promote products derived from this software without
21 * specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
24 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
25 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
26 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE
27 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
28 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
29 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
30 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
31 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
32 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
33 * POSSIBILITY OF SUCH DAMAGE.
34 *
35 */
36
37/**
38 * \file
39 *
40 * Main program to start the DNS resolver daemon.
41 */
42
43#include "config.h"
44#ifdef HAVE_GETOPT_H
45#include <getopt.h>
46#endif
47#include <sys/time.h>
48#include "util/log.h"
49#include "daemon/daemon.h"
50#include "daemon/remote.h"
51#include "util/config_file.h"
52#include "util/storage/slabhash.h"
53#include "services/listen_dnsport.h"
54#include "services/cache/rrset.h"
55#include "services/cache/infra.h"
56#include "util/fptr_wlist.h"
57#include "util/data/msgreply.h"
58#include "util/module.h"
59#include "util/net_help.h"
60#include <signal.h>
61#include <fcntl.h>
62#include <openssl/crypto.h>
63#ifdef HAVE_PWD_H
64#include <pwd.h>
65#endif
66#ifdef HAVE_GRP_H
67#include <grp.h>
68#endif
69
70#ifdef HAVE_SYS_RESOURCE_H
71#include <sys/resource.h>
72#endif
73#ifdef HAVE_LOGIN_CAP_H
74#include <login_cap.h>
75#endif
76
77#ifdef USE_MINI_EVENT
78#  ifdef USE_WINSOCK
79#    include "util/winsock_event.h"
80#  else
81#    include "util/mini_event.h"
82#  endif
83#else
84#  include <event.h>
85#endif
86
87#ifdef UB_ON_WINDOWS
88#  include "winrc/win_svc.h"
89#endif
90
91#ifdef HAVE_NSS
92/* nss3 */
93#  include "nss.h"
94#endif
95
96#ifdef HAVE_SBRK
97/** global debug value to keep track of heap memory allocation */
98void* unbound_start_brk = 0;
99#endif
100
101#if !defined(HAVE_EVENT_BASE_GET_METHOD) && (defined(HAVE_EV_LOOP) || defined(HAVE_EV_DEFAULT_LOOP))
102static const char* ev_backend2str(int b)
103{
104	switch(b) {
105	case EVBACKEND_SELECT:	return "select";
106	case EVBACKEND_POLL:	return "poll";
107	case EVBACKEND_EPOLL:	return "epoll";
108	case EVBACKEND_KQUEUE:	return "kqueue";
109	case EVBACKEND_DEVPOLL: return "devpoll";
110	case EVBACKEND_PORT:	return "evport";
111	}
112	return "unknown";
113}
114#endif
115
116/** get the event system in use */
117static void get_event_sys(const char** n, const char** s, const char** m)
118{
119#ifdef USE_WINSOCK
120	*n = "event";
121	*s = "winsock";
122	*m = "WSAWaitForMultipleEvents";
123#elif defined(USE_MINI_EVENT)
124	*n = "mini-event";
125	*s = "internal";
126	*m = "select";
127#else
128	struct event_base* b;
129	*s = event_get_version();
130#  ifdef HAVE_EVENT_BASE_GET_METHOD
131	*n = "libevent";
132	b = event_base_new();
133	*m = event_base_get_method(b);
134#  elif defined(HAVE_EV_LOOP) || defined(HAVE_EV_DEFAULT_LOOP)
135	*n = "libev";
136	b = (struct event_base*)ev_default_loop(EVFLAG_AUTO);
137	*m = ev_backend2str(ev_backend((struct ev_loop*)b));
138#  else
139	*n = "unknown";
140	*m = "not obtainable";
141	b = NULL;
142#  endif
143#  ifdef HAVE_EVENT_BASE_FREE
144	event_base_free(b);
145#  endif
146#endif
147}
148
149/** print usage. */
150static void usage()
151{
152	const char** m;
153	const char *evnm="event", *evsys="", *evmethod="";
154	printf("usage:  unbound [options]\n");
155	printf("	start unbound daemon DNS resolver.\n");
156	printf("-h	this help\n");
157	printf("-c file	config file to read instead of %s\n", CONFIGFILE);
158	printf("	file format is described in unbound.conf(5).\n");
159	printf("-d	do not fork into the background.\n");
160	printf("-v	verbose (more times to increase verbosity)\n");
161#ifdef UB_ON_WINDOWS
162	printf("-w opt	windows option: \n");
163	printf("   	install, remove - manage the services entry\n");
164	printf("   	service - used to start from services control panel\n");
165#endif
166	printf("Version %s\n", PACKAGE_VERSION);
167	get_event_sys(&evnm, &evsys, &evmethod);
168	printf("linked libs: %s %s (it uses %s), ldns %s, %s\n",
169		evnm, evsys, evmethod, ldns_version(),
170#ifdef HAVE_SSL
171		SSLeay_version(SSLEAY_VERSION)
172#elif defined(HAVE_NSS)
173		NSS_GetVersion()
174#endif
175		);
176	printf("linked modules:");
177	for(m = module_list_avail(); *m; m++)
178		printf(" %s", *m);
179	printf("\n");
180	printf("BSD licensed, see LICENSE in source package for details.\n");
181	printf("Report bugs to %s\n", PACKAGE_BUGREPORT);
182}
183
184#ifndef unbound_testbound
185int replay_var_compare(const void* ATTR_UNUSED(a), const void* ATTR_UNUSED(b))
186{
187        log_assert(0);
188        return 0;
189}
190#endif
191
192/** check file descriptor count */
193static void
194checkrlimits(struct config_file* cfg)
195{
196#ifdef HAVE_GETRLIMIT
197	/* list has number of ports to listen to, ifs number addresses */
198	int list = ((cfg->do_udp?1:0) + (cfg->do_tcp?1 +
199			(int)cfg->incoming_num_tcp:0));
200	size_t listen_ifs = (size_t)(cfg->num_ifs==0?
201		((cfg->do_ip4 && !cfg->if_automatic?1:0) +
202		 (cfg->do_ip6?1:0)):cfg->num_ifs);
203	size_t listen_num = list*listen_ifs;
204	size_t outudpnum = (size_t)cfg->outgoing_num_ports;
205	size_t outtcpnum = cfg->outgoing_num_tcp;
206	size_t misc = 4; /* logfile, pidfile, stdout... */
207	size_t perthread_noudp = listen_num + outtcpnum +
208		2/*cmdpipe*/ + 2/*libevent*/ + misc;
209	size_t perthread = perthread_noudp + outudpnum;
210
211#if !defined(HAVE_PTHREAD) && !defined(HAVE_SOLARIS_THREADS)
212	int numthread = 1; /* it forks */
213#else
214	int numthread = (cfg->num_threads?cfg->num_threads:1);
215#endif
216	size_t total = numthread * perthread + misc;
217	size_t avail;
218	struct rlimit rlim;
219
220	if(total > 1024 &&
221		strncmp(event_get_version(), "mini-event", 10) == 0) {
222		log_warn("too many file descriptors requested. The builtin"
223			"mini-event cannot handle more than 1024. Config "
224			"for less fds or compile with libevent");
225		if(numthread*perthread_noudp+15 > 1024)
226			fatal_exit("too much tcp. not enough fds.");
227		cfg->outgoing_num_ports = (int)((1024
228			- numthread*perthread_noudp
229			- 10 /* safety margin */) /numthread);
230		log_warn("continuing with less udp ports: %u",
231			cfg->outgoing_num_ports);
232		total = 1024;
233	}
234	if(perthread > 64 &&
235		strncmp(event_get_version(), "winsock-event", 13) == 0) {
236		log_err("too many file descriptors requested. The winsock"
237			" event handler cannot handle more than 64 per "
238			" thread. Config for less fds");
239		if(perthread_noudp+2 > 64)
240			fatal_exit("too much tcp. not enough fds.");
241		cfg->outgoing_num_ports = (int)((64
242			- perthread_noudp
243			- 2/* safety margin */));
244		log_warn("continuing with less udp ports: %u",
245			cfg->outgoing_num_ports);
246		total = numthread*(perthread_noudp+
247			(size_t)cfg->outgoing_num_ports)+misc;
248	}
249	if(getrlimit(RLIMIT_NOFILE, &rlim) < 0) {
250		log_warn("getrlimit: %s", strerror(errno));
251		return;
252	}
253	if(rlim.rlim_cur == (rlim_t)RLIM_INFINITY)
254		return;
255	if((size_t)rlim.rlim_cur < total) {
256		avail = (size_t)rlim.rlim_cur;
257		rlim.rlim_cur = (rlim_t)(total + 10);
258		rlim.rlim_max = (rlim_t)(total + 10);
259#ifdef HAVE_SETRLIMIT
260		if(setrlimit(RLIMIT_NOFILE, &rlim) < 0) {
261			log_warn("setrlimit: %s", strerror(errno));
262#else
263		if(1) {
264#endif
265			log_warn("cannot increase max open fds from %u to %u",
266				(unsigned)avail, (unsigned)total+10);
267			/* check that calculation below does not underflow,
268			 * with 15 as margin */
269			if(numthread*perthread_noudp+15 > avail)
270				fatal_exit("too much tcp. not enough fds.");
271			cfg->outgoing_num_ports = (int)((avail
272				- numthread*perthread_noudp
273				- 10 /* safety margin */) /numthread);
274			log_warn("continuing with less udp ports: %u",
275				cfg->outgoing_num_ports);
276			log_warn("increase ulimit or decrease threads, "
277				"ports in config to remove this warning");
278			return;
279		}
280		log_warn("increased limit(open files) from %u to %u",
281			(unsigned)avail, (unsigned)total+10);
282	}
283#else
284	(void)cfg;
285#endif /* HAVE_GETRLIMIT */
286}
287
288/** set verbosity, check rlimits, cache settings */
289static void
290apply_settings(struct daemon* daemon, struct config_file* cfg,
291	int cmdline_verbose)
292{
293	/* apply if they have changed */
294	verbosity = cmdline_verbose + cfg->verbosity;
295	daemon_apply_cfg(daemon, cfg);
296	checkrlimits(cfg);
297}
298
299#ifdef HAVE_KILL
300/** Read existing pid from pidfile.
301 * @param file: file name of pid file.
302 * @return: the pid from the file or -1 if none.
303 */
304static pid_t
305readpid (const char* file)
306{
307	int fd;
308	pid_t pid;
309	char pidbuf[32];
310	char* t;
311	ssize_t l;
312
313	if ((fd = open(file, O_RDONLY)) == -1) {
314		if(errno != ENOENT)
315			log_err("Could not read pidfile %s: %s",
316				file, strerror(errno));
317		return -1;
318	}
319
320	if (((l = read(fd, pidbuf, sizeof(pidbuf)))) == -1) {
321		if(errno != ENOENT)
322			log_err("Could not read pidfile %s: %s",
323				file, strerror(errno));
324		close(fd);
325		return -1;
326	}
327
328	close(fd);
329
330	/* Empty pidfile means no pidfile... */
331	if (l == 0) {
332		return -1;
333	}
334
335	pidbuf[sizeof(pidbuf)-1] = 0;
336	pid = (pid_t)strtol(pidbuf, &t, 10);
337
338	if (*t && *t != '\n') {
339		return -1;
340	}
341	return pid;
342}
343
344/** write pid to file.
345 * @param pidfile: file name of pid file.
346 * @param pid: pid to write to file.
347 */
348static void
349writepid (const char* pidfile, pid_t pid)
350{
351	FILE* f;
352
353	if ((f = fopen(pidfile, "w")) ==  NULL ) {
354		log_err("cannot open pidfile %s: %s",
355			pidfile, strerror(errno));
356		return;
357	}
358	if(fprintf(f, "%lu\n", (unsigned long)pid) < 0) {
359		log_err("cannot write to pidfile %s: %s",
360			pidfile, strerror(errno));
361	}
362	fclose(f);
363}
364
365/**
366 * check old pid file.
367 * @param pidfile: the file name of the pid file.
368 * @param inchroot: if pidfile is inchroot and we can thus expect to
369 *	be able to delete it.
370 */
371static void
372checkoldpid(char* pidfile, int inchroot)
373{
374	pid_t old;
375	if((old = readpid(pidfile)) != -1) {
376		/* see if it is still alive */
377		if(kill(old, 0) == 0 || errno == EPERM)
378			log_warn("unbound is already running as pid %u.",
379				(unsigned)old);
380		else	if(inchroot)
381			log_warn("did not exit gracefully last time (%u)",
382				(unsigned)old);
383	}
384}
385#endif /* HAVE_KILL */
386
387/** detach from command line */
388static void
389detach(void)
390{
391#if defined(HAVE_DAEMON) && !defined(DEPRECATED_DAEMON)
392	/* use POSIX daemon(3) function */
393	if(daemon(1, 0) != 0)
394		fatal_exit("daemon failed: %s", strerror(errno));
395#else /* no HAVE_DAEMON */
396#ifdef HAVE_FORK
397	int fd;
398	/* Take off... */
399	switch (fork()) {
400		case 0:
401			break;
402		case -1:
403			fatal_exit("fork failed: %s", strerror(errno));
404		default:
405			/* exit interactive session */
406			exit(0);
407	}
408	/* detach */
409#ifdef HAVE_SETSID
410	if(setsid() == -1)
411		fatal_exit("setsid() failed: %s", strerror(errno));
412#endif
413	if ((fd = open("/dev/null", O_RDWR, 0)) != -1) {
414		(void)dup2(fd, STDIN_FILENO);
415		(void)dup2(fd, STDOUT_FILENO);
416		(void)dup2(fd, STDERR_FILENO);
417		if (fd > 2)
418			(void)close(fd);
419	}
420#endif /* HAVE_FORK */
421#endif /* HAVE_DAEMON */
422}
423
424/** daemonize, drop user priviliges and chroot if needed */
425static void
426perform_setup(struct daemon* daemon, struct config_file* cfg, int debug_mode,
427	const char** cfgfile)
428{
429#ifdef HAVE_GETPWNAM
430	struct passwd *pwd = NULL;
431	uid_t uid;
432	gid_t gid;
433	/* initialize, but not to 0 (root) */
434	memset(&uid, 112, sizeof(uid));
435	memset(&gid, 112, sizeof(gid));
436	log_assert(cfg);
437
438	if(cfg->username && cfg->username[0]) {
439		if((pwd = getpwnam(cfg->username)) == NULL)
440			fatal_exit("user '%s' does not exist.", cfg->username);
441		uid = pwd->pw_uid;
442		gid = pwd->pw_gid;
443		/* endpwent below, in case we need pwd for setusercontext */
444	}
445#endif
446
447	/* init syslog (as root) if needed, before daemonize, otherwise
448	 * a fork error could not be printed since daemonize closed stderr.*/
449	if(cfg->use_syslog) {
450		log_init(cfg->logfile, cfg->use_syslog, cfg->chrootdir);
451	}
452	/* if using a logfile, we cannot open it because the logfile would
453	 * be created with the wrong permissions, we cannot chown it because
454	 * we cannot chown system logfiles, so we do not open at all.
455	 * So, using a logfile, the user does not see errors unless -d is
456	 * given to unbound on the commandline. */
457
458	/* read ssl keys while superuser and outside chroot */
459#ifdef HAVE_SSL
460	if(!(daemon->rc = daemon_remote_create(cfg)))
461		fatal_exit("could not set up remote-control");
462	if(cfg->ssl_service_key && cfg->ssl_service_key[0]) {
463		if(!(daemon->listen_sslctx = listen_sslctx_create(
464			cfg->ssl_service_key, cfg->ssl_service_pem, NULL)))
465			fatal_exit("could not set up listen SSL_CTX");
466	}
467	if(!(daemon->connect_sslctx = connect_sslctx_create(NULL, NULL, NULL)))
468		fatal_exit("could not set up connect SSL_CTX");
469#endif
470
471#ifdef HAVE_KILL
472	/* check old pid file before forking */
473	if(cfg->pidfile && cfg->pidfile[0]) {
474		/* calculate position of pidfile */
475		if(cfg->pidfile[0] == '/')
476			daemon->pidfile = strdup(cfg->pidfile);
477		else	daemon->pidfile = fname_after_chroot(cfg->pidfile,
478				cfg, 1);
479		if(!daemon->pidfile)
480			fatal_exit("pidfile alloc: out of memory");
481		checkoldpid(daemon->pidfile,
482			/* true if pidfile is inside chrootdir, or nochroot */
483			!(cfg->chrootdir && cfg->chrootdir[0]) ||
484			(cfg->chrootdir && cfg->chrootdir[0] &&
485			strncmp(daemon->pidfile, cfg->chrootdir,
486				strlen(cfg->chrootdir))==0));
487	}
488#endif
489
490	/* daemonize because pid is needed by the writepid func */
491	if(!debug_mode && cfg->do_daemonize) {
492		detach();
493	}
494
495	/* write new pidfile (while still root, so can be outside chroot) */
496#ifdef HAVE_KILL
497	if(cfg->pidfile && cfg->pidfile[0]) {
498		writepid(daemon->pidfile, getpid());
499		if(!(cfg->chrootdir && cfg->chrootdir[0]) ||
500			(cfg->chrootdir && cfg->chrootdir[0] &&
501			strncmp(daemon->pidfile, cfg->chrootdir,
502			strlen(cfg->chrootdir))==0)) {
503			/* delete of pidfile could potentially work,
504			 * chown to get permissions */
505			if(cfg->username && cfg->username[0]) {
506			  if(chown(daemon->pidfile, uid, gid) == -1) {
507				log_err("cannot chown %u.%u %s: %s",
508					(unsigned)uid, (unsigned)gid,
509					daemon->pidfile, strerror(errno));
510			  }
511			}
512		}
513	}
514#else
515	(void)daemon;
516#endif
517
518	/* Set user context */
519#ifdef HAVE_GETPWNAM
520	if(cfg->username && cfg->username[0]) {
521#ifdef HAVE_SETUSERCONTEXT
522		/* setusercontext does initgroups, setuid, setgid, and
523		 * also resource limits from login config, but we
524		 * still call setresuid, setresgid to be sure to set all uid*/
525		if(setusercontext(NULL, pwd, uid,
526			LOGIN_SETALL & ~LOGIN_SETUSER & ~LOGIN_SETGROUP) != 0)
527			log_warn("unable to setusercontext %s: %s",
528				cfg->username, strerror(errno));
529#endif /* HAVE_SETUSERCONTEXT */
530	}
531#endif /* HAVE_GETPWNAM */
532
533	/* box into the chroot */
534#ifdef HAVE_CHROOT
535	if(cfg->chrootdir && cfg->chrootdir[0]) {
536		if(chdir(cfg->chrootdir)) {
537			fatal_exit("unable to chdir to chroot %s: %s",
538				cfg->chrootdir, strerror(errno));
539		}
540		verbose(VERB_QUERY, "chdir to %s", cfg->chrootdir);
541		if(chroot(cfg->chrootdir))
542			fatal_exit("unable to chroot to %s: %s",
543				cfg->chrootdir, strerror(errno));
544		if(chdir("/"))
545			fatal_exit("unable to chdir to / in chroot %s: %s",
546				cfg->chrootdir, strerror(errno));
547		verbose(VERB_QUERY, "chroot to %s", cfg->chrootdir);
548		if(strncmp(*cfgfile, cfg->chrootdir,
549			strlen(cfg->chrootdir)) == 0)
550			(*cfgfile) += strlen(cfg->chrootdir);
551
552		/* adjust stored pidfile for chroot */
553		if(daemon->pidfile && daemon->pidfile[0] &&
554			strncmp(daemon->pidfile, cfg->chrootdir,
555			strlen(cfg->chrootdir))==0) {
556			char* old = daemon->pidfile;
557			daemon->pidfile = strdup(old+strlen(cfg->chrootdir));
558			free(old);
559			if(!daemon->pidfile)
560				log_err("out of memory in pidfile adjust");
561		}
562		daemon->chroot = strdup(cfg->chrootdir);
563		if(!daemon->chroot)
564			log_err("out of memory in daemon chroot dir storage");
565	}
566#else
567	(void)cfgfile;
568#endif
569	/* change to working directory inside chroot */
570	if(cfg->directory && cfg->directory[0]) {
571		char* dir = cfg->directory;
572		if(cfg->chrootdir && cfg->chrootdir[0] &&
573			strncmp(dir, cfg->chrootdir,
574			strlen(cfg->chrootdir)) == 0)
575			dir += strlen(cfg->chrootdir);
576		if(dir[0]) {
577			if(chdir(dir)) {
578				fatal_exit("Could not chdir to %s: %s",
579					dir, strerror(errno));
580			}
581			verbose(VERB_QUERY, "chdir to %s", dir);
582		}
583	}
584
585	/* drop permissions after chroot, getpwnam, pidfile, syslog done*/
586#ifdef HAVE_GETPWNAM
587	if(cfg->username && cfg->username[0]) {
588#  ifdef HAVE_INITGROUPS
589		if(initgroups(cfg->username, gid) != 0)
590			log_warn("unable to initgroups %s: %s",
591				cfg->username, strerror(errno));
592#  endif /* HAVE_INITGROUPS */
593		endpwent();
594
595#ifdef HAVE_SETRESGID
596		if(setresgid(gid,gid,gid) != 0)
597#elif defined(HAVE_SETREGID) && !defined(DARWIN_BROKEN_SETREUID)
598		if(setregid(gid,gid) != 0)
599#else /* use setgid */
600		if(setgid(gid) != 0)
601#endif /* HAVE_SETRESGID */
602			fatal_exit("unable to set group id of %s: %s",
603				cfg->username, strerror(errno));
604#ifdef HAVE_SETRESUID
605		if(setresuid(uid,uid,uid) != 0)
606#elif defined(HAVE_SETREUID) && !defined(DARWIN_BROKEN_SETREUID)
607		if(setreuid(uid,uid) != 0)
608#else /* use setuid */
609		if(setuid(uid) != 0)
610#endif /* HAVE_SETRESUID */
611			fatal_exit("unable to set user id of %s: %s",
612				cfg->username, strerror(errno));
613		verbose(VERB_QUERY, "drop user privileges, run as %s",
614			cfg->username);
615	}
616#endif /* HAVE_GETPWNAM */
617	/* file logging inited after chroot,chdir,setuid is done so that
618	 * it would succeed on SIGHUP as well */
619	if(!cfg->use_syslog)
620		log_init(cfg->logfile, cfg->use_syslog, cfg->chrootdir);
621}
622
623/**
624 * Run the daemon.
625 * @param cfgfile: the config file name.
626 * @param cmdline_verbose: verbosity resulting from commandline -v.
627 *    These increase verbosity as specified in the config file.
628 * @param debug_mode: if set, do not daemonize.
629 */
630static void
631run_daemon(const char* cfgfile, int cmdline_verbose, int debug_mode)
632{
633	struct config_file* cfg = NULL;
634	struct daemon* daemon = NULL;
635	int done_setup = 0;
636
637	if(!(daemon = daemon_init()))
638		fatal_exit("alloc failure");
639	while(!daemon->need_to_exit) {
640		if(done_setup)
641			verbose(VERB_OPS, "Restart of %s.", PACKAGE_STRING);
642		else	verbose(VERB_OPS, "Start of %s.", PACKAGE_STRING);
643
644		/* config stuff */
645		if(!(cfg = config_create()))
646			fatal_exit("Could not alloc config defaults");
647		if(!config_read(cfg, cfgfile, daemon->chroot)) {
648			if(errno != ENOENT)
649				fatal_exit("Could not read config file: %s",
650					cfgfile);
651			log_warn("Continuing with default config settings");
652		}
653		apply_settings(daemon, cfg, cmdline_verbose);
654
655		/* prepare */
656		if(!daemon_open_shared_ports(daemon))
657			fatal_exit("could not open ports");
658		if(!done_setup) {
659			perform_setup(daemon, cfg, debug_mode, &cfgfile);
660			done_setup = 1;
661		} else {
662			/* reopen log after HUP to facilitate log rotation */
663			if(!cfg->use_syslog)
664				log_init(cfg->logfile, 0, cfg->chrootdir);
665		}
666		/* work */
667		daemon_fork(daemon);
668
669		/* clean up for restart */
670		verbose(VERB_ALGO, "cleanup.");
671		daemon_cleanup(daemon);
672		config_delete(cfg);
673	}
674	verbose(VERB_ALGO, "Exit cleanup.");
675	/* this unlink may not work if the pidfile is located outside
676	 * of the chroot/workdir or we no longer have permissions */
677	if(daemon->pidfile) {
678		int fd;
679		/* truncate pidfile */
680		fd = open(daemon->pidfile, O_WRONLY | O_TRUNC, 0644);
681		if(fd != -1)
682			close(fd);
683		/* delete pidfile */
684		unlink(daemon->pidfile);
685	}
686	daemon_delete(daemon);
687}
688
689/** getopt global, in case header files fail to declare it. */
690extern int optind;
691/** getopt global, in case header files fail to declare it. */
692extern char* optarg;
693
694/**
695 * main program. Set options given commandline arguments.
696 * @param argc: number of commandline arguments.
697 * @param argv: array of commandline arguments.
698 * @return: exit status of the program.
699 */
700int
701main(int argc, char* argv[])
702{
703	int c;
704	const char* cfgfile = CONFIGFILE;
705	const char* winopt = NULL;
706	int cmdline_verbose = 0;
707	int debug_mode = 0;
708#ifdef UB_ON_WINDOWS
709	int cmdline_cfg = 0;
710#endif
711
712#ifdef HAVE_SBRK
713	/* take debug snapshot of heap */
714	unbound_start_brk = sbrk(0);
715#endif
716
717	log_init(NULL, 0, NULL);
718	/* parse the options */
719	while( (c=getopt(argc, argv, "c:dhvw:")) != -1) {
720		switch(c) {
721		case 'c':
722			cfgfile = optarg;
723#ifdef UB_ON_WINDOWS
724			cmdline_cfg = 1;
725#endif
726			break;
727		case 'v':
728			cmdline_verbose ++;
729			verbosity++;
730			break;
731		case 'd':
732			debug_mode = 1;
733			break;
734		case 'w':
735			winopt = optarg;
736			break;
737		case '?':
738		case 'h':
739		default:
740			usage();
741			return 1;
742		}
743	}
744	argc -= optind;
745	argv += optind;
746
747	if(winopt) {
748#ifdef UB_ON_WINDOWS
749		wsvc_command_option(winopt, cfgfile, cmdline_verbose,
750			cmdline_cfg);
751#else
752		fatal_exit("option not supported");
753#endif
754	}
755
756	if(argc != 0) {
757		usage();
758		return 1;
759	}
760
761	run_daemon(cfgfile, cmdline_verbose, debug_mode);
762	log_init(NULL, 0, NULL); /* close logfile */
763	return 0;
764}
765