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
25 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
26 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
27 * HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
28 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
29 * TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
30 * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
31 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
32 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
33 * SOFTWARE, EVEN IF ADVISED OF THE 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 "util/ub_event.h"
61#include <signal.h>
62#include <fcntl.h>
63#include <openssl/crypto.h>
64#ifdef HAVE_PWD_H
65#include <pwd.h>
66#endif
67#ifdef HAVE_GRP_H
68#include <grp.h>
69#endif
70#include <openssl/ssl.h>
71
72#ifndef S_SPLINT_S
73/* splint chokes on this system header file */
74#ifdef HAVE_SYS_RESOURCE_H
75#include <sys/resource.h>
76#endif
77#endif /* S_SPLINT_S */
78#ifdef HAVE_LOGIN_CAP_H
79#include <login_cap.h>
80#endif
81
82#ifdef UB_ON_WINDOWS
83#  include "winrc/win_svc.h"
84#endif
85
86#ifdef HAVE_NSS
87/* nss3 */
88#  include "nss.h"
89#endif
90
91#ifdef HAVE_TARGETCONDITIONALS_H
92#include <TargetConditionals.h>
93#endif
94
95#if (defined(TARGET_OS_TV) && TARGET_OS_TV) || (defined(TARGET_OS_WATCH) && TARGET_OS_WATCH)
96#undef HAVE_FORK
97#endif
98
99/** print build options. */
100static void
101print_build_options(void)
102{
103	const char** m;
104	const char *evnm="event", *evsys="", *evmethod="";
105	time_t t;
106	struct timeval now;
107	struct ub_event_base* base;
108	printf("Version %s\n\n", PACKAGE_VERSION);
109	printf("Configure line: %s\n", CONFCMDLINE);
110	base = ub_default_event_base(0,&t,&now);
111	ub_get_event_sys(base, &evnm, &evsys, &evmethod);
112	printf("Linked libs: %s %s (it uses %s), %s\n",
113		evnm, evsys, evmethod,
114#ifdef HAVE_SSL
115#  ifdef SSLEAY_VERSION
116		SSLeay_version(SSLEAY_VERSION)
117#  else
118		OpenSSL_version(OPENSSL_VERSION)
119#  endif
120#elif defined(HAVE_NSS)
121		NSS_GetVersion()
122#elif defined(HAVE_NETTLE)
123		"nettle"
124#endif
125		);
126	printf("Linked modules:");
127	for(m = module_list_avail(); *m; m++)
128		printf(" %s", *m);
129	printf("\n");
130#ifdef USE_DNSCRYPT
131	printf("DNSCrypt feature available\n");
132#endif
133#ifdef USE_TCP_FASTOPEN
134	printf("TCP Fastopen feature available\n");
135#endif
136	ub_event_base_free(base);
137	printf("\nBSD licensed, see LICENSE in source package for details.\n");
138	printf("Report bugs to %s\n", PACKAGE_BUGREPORT);
139}
140
141/** print usage. */
142static void
143usage(void)
144{
145	printf("usage:  unbound [options]\n");
146	printf("	start unbound daemon DNS resolver.\n");
147	printf("-h	this help.\n");
148	printf("-c file	config file to read instead of %s\n", CONFIGFILE);
149	printf("	file format is described in unbound.conf(5).\n");
150	printf("-d	do not fork into the background.\n");
151	printf("-p	do not create a pidfile.\n");
152	printf("-v	verbose (more times to increase verbosity).\n");
153	printf("-V	show version number and build options.\n");
154#ifdef UB_ON_WINDOWS
155	printf("-w opt	windows option: \n");
156	printf("   	install, remove - manage the services entry\n");
157	printf("   	service - used to start from services control panel\n");
158#endif
159	printf("\nVersion %s\n", PACKAGE_VERSION);
160	printf("BSD licensed, see LICENSE in source package for details.\n");
161	printf("Report bugs to %s\n", PACKAGE_BUGREPORT);
162}
163
164#ifndef unbound_testbound
165int replay_var_compare(const void* ATTR_UNUSED(a), const void* ATTR_UNUSED(b))
166{
167        log_assert(0);
168        return 0;
169}
170#endif
171
172/** check file descriptor count */
173static void
174checkrlimits(struct config_file* cfg)
175{
176#ifndef S_SPLINT_S
177#ifdef HAVE_GETRLIMIT
178	/* list has number of ports to listen to, ifs number addresses */
179	int list = ((cfg->do_udp?1:0) + (cfg->do_tcp?1 +
180			(int)cfg->incoming_num_tcp:0));
181	size_t listen_ifs = (size_t)(cfg->num_ifs==0?
182		((cfg->do_ip4 && !cfg->if_automatic?1:0) +
183		 (cfg->do_ip6?1:0)):cfg->num_ifs);
184	size_t listen_num = list*listen_ifs;
185	size_t outudpnum = (size_t)cfg->outgoing_num_ports;
186	size_t outtcpnum = cfg->outgoing_num_tcp;
187	size_t misc = 4; /* logfile, pidfile, stdout... */
188	size_t perthread_noudp = listen_num + outtcpnum +
189		2/*cmdpipe*/ + 2/*libevent*/ + misc;
190	size_t perthread = perthread_noudp + outudpnum;
191
192#if !defined(HAVE_PTHREAD) && !defined(HAVE_SOLARIS_THREADS)
193	int numthread = 1; /* it forks */
194#else
195	int numthread = (cfg->num_threads?cfg->num_threads:1);
196#endif
197	size_t total = numthread * perthread + misc;
198	size_t avail;
199	struct rlimit rlim;
200	size_t memsize_expect = cfg->msg_cache_size + cfg->rrset_cache_size
201		+ (cfg->do_tcp?cfg->stream_wait_size:0)
202		+ (cfg->ip_ratelimit?cfg->ip_ratelimit_size:0)
203		+ (cfg->ratelimit?cfg->ratelimit_size:0)
204		+ (cfg->dnscrypt?cfg->dnscrypt_shared_secret_cache_size + cfg->dnscrypt_nonce_cache_size:0)
205		+ cfg->infra_cache_numhosts * (sizeof(struct infra_key)+sizeof(struct infra_data));
206	if(strstr(cfg->module_conf, "validator") && (cfg->trust_anchor_file_list || cfg->trust_anchor_list || cfg->auto_trust_anchor_file_list || cfg->trusted_keys_file_list)) {
207		memsize_expect += cfg->key_cache_size + cfg->neg_cache_size;
208	}
209#ifdef HAVE_NGHTTP2_NGHTTP2_H
210	if(cfg_has_https(cfg)) {
211		memsize_expect += cfg->http_query_buffer_size + cfg->http_response_buffer_size;
212	}
213#endif
214
215#ifdef RLIMIT_AS
216	if(getrlimit(RLIMIT_AS, &rlim) == 0) {
217		if(rlim.rlim_cur != (rlim_t)RLIM_INFINITY &&
218			rlim.rlim_cur < (rlim_t)memsize_expect) {
219			log_warn("the ulimit(max memory size) is smaller than the expected memory usage (added size of caches). %u < %u bytes", (unsigned)rlim.rlim_cur, (unsigned)memsize_expect);
220		}
221	}
222#endif
223	if(getrlimit(RLIMIT_DATA, &rlim) == 0) {
224		if(rlim.rlim_cur != (rlim_t)RLIM_INFINITY &&
225			rlim.rlim_cur < (rlim_t)memsize_expect) {
226			log_warn("the ulimit(data seg size) is smaller than the expected memory usage (added size of caches). %u < %u bytes", (unsigned)rlim.rlim_cur, (unsigned)memsize_expect);
227		}
228	}
229
230	if(total > 1024 &&
231		strncmp(ub_event_get_version(), "mini-event", 10) == 0) {
232		log_warn("too many file descriptors requested. The builtin"
233			"mini-event cannot handle more than 1024. Config "
234			"for less fds or compile with libevent");
235		if(numthread*perthread_noudp+15 > 1024)
236			fatal_exit("too much tcp. not enough fds.");
237		cfg->outgoing_num_ports = (int)((1024
238			- numthread*perthread_noudp
239			- 10 /* safety margin */) /numthread);
240		log_warn("continuing with less udp ports: %u",
241			cfg->outgoing_num_ports);
242		total = 1024;
243	}
244	if(perthread > 64 &&
245		strncmp(ub_event_get_version(), "winsock-event", 13) == 0) {
246		log_err("too many file descriptors requested. The winsock"
247			" event handler cannot handle more than 64 per "
248			" thread. Config for less fds");
249		if(perthread_noudp+2 > 64)
250			fatal_exit("too much tcp. not enough fds.");
251		cfg->outgoing_num_ports = (int)((64
252			- perthread_noudp
253			- 2/* safety margin */));
254		log_warn("continuing with less udp ports: %u",
255			cfg->outgoing_num_ports);
256		total = numthread*(perthread_noudp+
257			(size_t)cfg->outgoing_num_ports)+misc;
258	}
259	if(getrlimit(RLIMIT_NOFILE, &rlim) < 0) {
260		log_warn("getrlimit: %s", strerror(errno));
261		return;
262	}
263	if(rlim.rlim_cur == (rlim_t)RLIM_INFINITY)
264		return;
265	if((size_t)rlim.rlim_cur < total) {
266		avail = (size_t)rlim.rlim_cur;
267		rlim.rlim_cur = (rlim_t)(total + 10);
268		rlim.rlim_max = (rlim_t)(total + 10);
269#ifdef HAVE_SETRLIMIT
270		if(setrlimit(RLIMIT_NOFILE, &rlim) < 0) {
271			log_warn("setrlimit: %s", strerror(errno));
272#endif
273			log_warn("cannot increase max open fds from %u to %u",
274				(unsigned)avail, (unsigned)total+10);
275			/* check that calculation below does not underflow,
276			 * with 15 as margin */
277			if(numthread*perthread_noudp+15 > avail)
278				fatal_exit("too much tcp. not enough fds.");
279			cfg->outgoing_num_ports = (int)((avail
280				- numthread*perthread_noudp
281				- 10 /* safety margin */) /numthread);
282			log_warn("continuing with less udp ports: %u",
283				cfg->outgoing_num_ports);
284			log_warn("increase ulimit or decrease threads, "
285				"ports in config to remove this warning");
286			return;
287#ifdef HAVE_SETRLIMIT
288		}
289#endif
290		verbose(VERB_ALGO, "increased limit(open files) from %u to %u",
291			(unsigned)avail, (unsigned)total+10);
292	}
293#else
294	(void)cfg;
295#endif /* HAVE_GETRLIMIT */
296#endif /* S_SPLINT_S */
297}
298
299/** set verbosity, check rlimits, cache settings */
300static void
301apply_settings(struct daemon* daemon, struct config_file* cfg,
302	int cmdline_verbose, int debug_mode)
303{
304	/* apply if they have changed */
305	verbosity = cmdline_verbose + cfg->verbosity;
306	if (debug_mode > 1) {
307		cfg->use_syslog = 0;
308		free(cfg->logfile);
309		cfg->logfile = NULL;
310	}
311	daemon_apply_cfg(daemon, cfg);
312	checkrlimits(cfg);
313
314	if (cfg->use_systemd && cfg->do_daemonize) {
315		log_warn("use-systemd and do-daemonize should not be enabled at the same time");
316	}
317
318	log_ident_set_or_default(cfg->log_identity);
319}
320
321#ifdef HAVE_KILL
322/** Read existing pid from pidfile.
323 * @param file: file name of pid file.
324 * @return: the pid from the file or -1 if none.
325 */
326static pid_t
327readpid (const char* file)
328{
329	int fd;
330	pid_t pid;
331	char pidbuf[32];
332	char* t;
333	ssize_t l;
334
335	if ((fd = open(file, O_RDONLY)) == -1) {
336		if(errno != ENOENT)
337			log_err("Could not read pidfile %s: %s",
338				file, strerror(errno));
339		return -1;
340	}
341
342	if (((l = read(fd, pidbuf, sizeof(pidbuf)))) == -1) {
343		if(errno != ENOENT)
344			log_err("Could not read pidfile %s: %s",
345				file, strerror(errno));
346		close(fd);
347		return -1;
348	}
349
350	close(fd);
351
352	/* Empty pidfile means no pidfile... */
353	if (l == 0) {
354		return -1;
355	}
356
357	pidbuf[sizeof(pidbuf)-1] = 0;
358	pid = (pid_t)strtol(pidbuf, &t, 10);
359
360	if (*t && *t != '\n') {
361		return -1;
362	}
363	return pid;
364}
365
366/** write pid to file.
367 * @param pidfile: file name of pid file.
368 * @param pid: pid to write to file.
369 * @return false on failure
370 */
371static int
372writepid (const char* pidfile, pid_t pid)
373{
374	int fd;
375	char pidbuf[32];
376	size_t count = 0;
377	snprintf(pidbuf, sizeof(pidbuf), "%lu\n", (unsigned long)pid);
378
379	if((fd = open(pidfile, O_WRONLY | O_CREAT | O_TRUNC
380#ifdef O_NOFOLLOW
381		| O_NOFOLLOW
382#endif
383		, 0644)) == -1) {
384		log_err("cannot open pidfile %s: %s",
385			pidfile, strerror(errno));
386		return 0;
387	}
388	while(count < strlen(pidbuf)) {
389		ssize_t r = write(fd, pidbuf+count, strlen(pidbuf)-count);
390		if(r == -1) {
391			if(errno == EAGAIN || errno == EINTR)
392				continue;
393			log_err("cannot write to pidfile %s: %s",
394				pidfile, strerror(errno));
395			close(fd);
396			return 0;
397		} else if(r == 0) {
398			log_err("cannot write any bytes to pidfile %s: "
399				"write returns 0 bytes written", pidfile);
400			close(fd);
401			return 0;
402		}
403		count += r;
404	}
405	close(fd);
406	return 1;
407}
408
409/**
410 * check old pid file.
411 * @param pidfile: the file name of the pid file.
412 * @param inchroot: if pidfile is inchroot and we can thus expect to
413 *	be able to delete it.
414 */
415static void
416checkoldpid(char* pidfile, int inchroot)
417{
418	pid_t old;
419	if((old = readpid(pidfile)) != -1) {
420		/* see if it is still alive */
421		if(kill(old, 0) == 0 || errno == EPERM)
422			log_warn("unbound is already running as pid %u.",
423				(unsigned)old);
424		else	if(inchroot)
425			log_warn("did not exit gracefully last time (%u)",
426				(unsigned)old);
427	}
428}
429#endif /* HAVE_KILL */
430
431/** detach from command line */
432static void
433detach(void)
434{
435#if defined(HAVE_DAEMON) && !defined(DEPRECATED_DAEMON)
436	/* use POSIX daemon(3) function */
437	if(daemon(1, 0) != 0)
438		fatal_exit("daemon failed: %s", strerror(errno));
439#else /* no HAVE_DAEMON */
440#ifdef HAVE_FORK
441	int fd;
442	/* Take off... */
443	switch (fork()) {
444		case 0:
445			break;
446		case -1:
447			fatal_exit("fork failed: %s", strerror(errno));
448		default:
449			/* exit interactive session */
450			exit(0);
451	}
452	/* detach */
453#ifdef HAVE_SETSID
454	if(setsid() == -1)
455		fatal_exit("setsid() failed: %s", strerror(errno));
456#endif
457	if ((fd = open("/dev/null", O_RDWR, 0)) != -1) {
458		(void)dup2(fd, STDIN_FILENO);
459		(void)dup2(fd, STDOUT_FILENO);
460		(void)dup2(fd, STDERR_FILENO);
461		if (fd > 2)
462			(void)close(fd);
463	}
464#endif /* HAVE_FORK */
465#endif /* HAVE_DAEMON */
466}
467
468/** daemonize, drop user privileges and chroot if needed */
469static void
470perform_setup(struct daemon* daemon, struct config_file* cfg, int debug_mode,
471	const char** cfgfile, int need_pidfile)
472{
473#ifdef HAVE_KILL
474	int pidinchroot;
475#endif
476#ifdef HAVE_GETPWNAM
477	struct passwd *pwd = NULL;
478
479	if(cfg->username && cfg->username[0]) {
480		if((pwd = getpwnam(cfg->username)) == NULL)
481			fatal_exit("user '%s' does not exist.", cfg->username);
482		/* endpwent below, in case we need pwd for setusercontext */
483	}
484#endif
485#ifdef UB_ON_WINDOWS
486	w_config_adjust_directory(cfg);
487#endif
488
489	/* read ssl keys while superuser and outside chroot */
490#ifdef HAVE_SSL
491	if(!(daemon->rc = daemon_remote_create(cfg)))
492		fatal_exit("could not set up remote-control");
493	if(cfg->ssl_service_key && cfg->ssl_service_key[0]) {
494		if(!(daemon->listen_sslctx = listen_sslctx_create(
495			cfg->ssl_service_key, cfg->ssl_service_pem, NULL)))
496			fatal_exit("could not set up listen SSL_CTX");
497		if(cfg->tls_ciphers && cfg->tls_ciphers[0]) {
498			if (!SSL_CTX_set_cipher_list(daemon->listen_sslctx, cfg->tls_ciphers)) {
499				fatal_exit("failed to set tls-cipher %s", cfg->tls_ciphers);
500			}
501		}
502#ifdef HAVE_SSL_CTX_SET_CIPHERSUITES
503		if(cfg->tls_ciphersuites && cfg->tls_ciphersuites[0]) {
504			if (!SSL_CTX_set_ciphersuites(daemon->listen_sslctx, cfg->tls_ciphersuites)) {
505				fatal_exit("failed to set tls-ciphersuites %s", cfg->tls_ciphersuites);
506			}
507		}
508#endif
509		if(cfg->tls_session_ticket_keys.first &&
510			cfg->tls_session_ticket_keys.first->str[0] != 0) {
511			if(!listen_sslctx_setup_ticket_keys(daemon->listen_sslctx, cfg->tls_session_ticket_keys.first)) {
512				fatal_exit("could not set session ticket SSL_CTX");
513			}
514		}
515	}
516	if(!(daemon->connect_sslctx = connect_sslctx_create(NULL, NULL,
517		cfg->tls_cert_bundle, cfg->tls_win_cert)))
518		fatal_exit("could not set up connect SSL_CTX");
519#endif
520
521	/* init syslog (as root) if needed, before daemonize, otherwise
522	 * a fork error could not be printed since daemonize closed stderr.*/
523	if(cfg->use_syslog) {
524		log_init(cfg->logfile, cfg->use_syslog, cfg->chrootdir);
525	}
526	/* if using a logfile, we cannot open it because the logfile would
527	 * be created with the wrong permissions, we cannot chown it because
528	 * we cannot chown system logfiles, so we do not open at all.
529	 * So, using a logfile, the user does not see errors unless -d is
530	 * given to unbound on the commandline. */
531
532#ifdef HAVE_KILL
533	/* true if pidfile is inside chrootdir, or nochroot */
534	pidinchroot = need_pidfile && (!(cfg->chrootdir && cfg->chrootdir[0]) ||
535				(cfg->chrootdir && cfg->chrootdir[0] &&
536				strncmp(cfg->pidfile, cfg->chrootdir,
537				strlen(cfg->chrootdir))==0));
538
539	/* check old pid file before forking */
540	if(cfg->pidfile && cfg->pidfile[0] && need_pidfile) {
541		/* calculate position of pidfile */
542		if(cfg->pidfile[0] == '/')
543			daemon->pidfile = strdup(cfg->pidfile);
544		else	daemon->pidfile = fname_after_chroot(cfg->pidfile,
545				cfg, 1);
546		if(!daemon->pidfile)
547			fatal_exit("pidfile alloc: out of memory");
548		checkoldpid(daemon->pidfile, pidinchroot);
549	}
550#endif
551
552	/* daemonize because pid is needed by the writepid func */
553	if(!debug_mode && cfg->do_daemonize) {
554		detach();
555	}
556
557	/* write new pidfile (while still root, so can be outside chroot) */
558#ifdef HAVE_KILL
559	if(cfg->pidfile && cfg->pidfile[0] && need_pidfile) {
560		if(writepid(daemon->pidfile, getpid())) {
561			if(cfg->username && cfg->username[0] && cfg_uid != (uid_t)-1 &&
562				pidinchroot) {
563#  ifdef HAVE_CHOWN
564				if(chown(daemon->pidfile, cfg_uid, cfg_gid) == -1) {
565					verbose(VERB_QUERY, "cannot chown %u.%u %s: %s",
566						(unsigned)cfg_uid, (unsigned)cfg_gid,
567						daemon->pidfile, strerror(errno));
568				}
569#  endif /* HAVE_CHOWN */
570			}
571		}
572	}
573#else
574	(void)daemon;
575	(void)need_pidfile;
576#endif /* HAVE_KILL */
577
578	/* Set user context */
579#ifdef HAVE_GETPWNAM
580	if(cfg->username && cfg->username[0] && cfg_uid != (uid_t)-1) {
581#ifdef HAVE_SETUSERCONTEXT
582		/* setusercontext does initgroups, setuid, setgid, and
583		 * also resource limits from login config, but we
584		 * still call setresuid, setresgid to be sure to set all uid*/
585		if(setusercontext(NULL, pwd, cfg_uid, (unsigned)
586			LOGIN_SETALL & ~LOGIN_SETUSER & ~LOGIN_SETGROUP) != 0)
587			log_warn("unable to setusercontext %s: %s",
588				cfg->username, strerror(errno));
589#else
590		(void)pwd;
591#endif /* HAVE_SETUSERCONTEXT */
592	}
593#endif /* HAVE_GETPWNAM */
594
595	/* box into the chroot */
596#ifdef HAVE_CHROOT
597	if(cfg->chrootdir && cfg->chrootdir[0]) {
598		if(chdir(cfg->chrootdir)) {
599			fatal_exit("unable to chdir to chroot %s: %s",
600				cfg->chrootdir, strerror(errno));
601		}
602		verbose(VERB_QUERY, "chdir to %s", cfg->chrootdir);
603		if(chroot(cfg->chrootdir))
604			fatal_exit("unable to chroot to %s: %s",
605				cfg->chrootdir, strerror(errno));
606		if(chdir("/"))
607			fatal_exit("unable to chdir to / in chroot %s: %s",
608				cfg->chrootdir, strerror(errno));
609		verbose(VERB_QUERY, "chroot to %s", cfg->chrootdir);
610		if(strncmp(*cfgfile, cfg->chrootdir,
611			strlen(cfg->chrootdir)) == 0)
612			(*cfgfile) += strlen(cfg->chrootdir);
613
614		/* adjust stored pidfile for chroot */
615		if(daemon->pidfile && daemon->pidfile[0] &&
616			strncmp(daemon->pidfile, cfg->chrootdir,
617			strlen(cfg->chrootdir))==0) {
618			char* old = daemon->pidfile;
619			daemon->pidfile = strdup(old+strlen(cfg->chrootdir));
620			free(old);
621			if(!daemon->pidfile)
622				log_err("out of memory in pidfile adjust");
623		}
624		daemon->chroot = strdup(cfg->chrootdir);
625		if(!daemon->chroot)
626			log_err("out of memory in daemon chroot dir storage");
627	}
628#else
629	(void)cfgfile;
630#endif
631	/* change to working directory inside chroot */
632	if(cfg->directory && cfg->directory[0]) {
633		char* dir = cfg->directory;
634		if(cfg->chrootdir && cfg->chrootdir[0] &&
635			strncmp(dir, cfg->chrootdir,
636			strlen(cfg->chrootdir)) == 0)
637			dir += strlen(cfg->chrootdir);
638		if(dir[0]) {
639			if(chdir(dir)) {
640				fatal_exit("Could not chdir to %s: %s",
641					dir, strerror(errno));
642			}
643			verbose(VERB_QUERY, "chdir to %s", dir);
644		}
645	}
646
647	/* drop permissions after chroot, getpwnam, pidfile, syslog done*/
648#ifdef HAVE_GETPWNAM
649	if(cfg->username && cfg->username[0] && cfg_uid != (uid_t)-1) {
650#  ifdef HAVE_INITGROUPS
651		if(initgroups(cfg->username, cfg_gid) != 0)
652			log_warn("unable to initgroups %s: %s",
653				cfg->username, strerror(errno));
654#  endif /* HAVE_INITGROUPS */
655#  ifdef HAVE_ENDPWENT
656		endpwent();
657#  endif
658
659#ifdef HAVE_SETRESGID
660		if(setresgid(cfg_gid,cfg_gid,cfg_gid) != 0)
661#elif defined(HAVE_SETREGID) && !defined(DARWIN_BROKEN_SETREUID)
662		if(setregid(cfg_gid,cfg_gid) != 0)
663#else /* use setgid */
664		if(setgid(cfg_gid) != 0)
665#endif /* HAVE_SETRESGID */
666			fatal_exit("unable to set group id of %s: %s",
667				cfg->username, strerror(errno));
668#ifdef HAVE_SETRESUID
669		if(setresuid(cfg_uid,cfg_uid,cfg_uid) != 0)
670#elif defined(HAVE_SETREUID) && !defined(DARWIN_BROKEN_SETREUID)
671		if(setreuid(cfg_uid,cfg_uid) != 0)
672#else /* use setuid */
673		if(setuid(cfg_uid) != 0)
674#endif /* HAVE_SETRESUID */
675			fatal_exit("unable to set user id of %s: %s",
676				cfg->username, strerror(errno));
677		verbose(VERB_QUERY, "drop user privileges, run as %s",
678			cfg->username);
679	}
680#endif /* HAVE_GETPWNAM */
681	/* file logging inited after chroot,chdir,setuid is done so that
682	 * it would succeed on SIGHUP as well */
683	if(!cfg->use_syslog)
684		log_init(cfg->logfile, cfg->use_syslog, cfg->chrootdir);
685}
686
687/**
688 * Run the daemon.
689 * @param cfgfile: the config file name.
690 * @param cmdline_verbose: verbosity resulting from commandline -v.
691 *    These increase verbosity as specified in the config file.
692 * @param debug_mode: if set, do not daemonize.
693 * @param need_pidfile: if false, no pidfile is checked or created.
694 */
695static void
696run_daemon(const char* cfgfile, int cmdline_verbose, int debug_mode, int need_pidfile)
697{
698	struct config_file* cfg = NULL;
699	struct daemon* daemon = NULL;
700	int done_setup = 0;
701
702	if(!(daemon = daemon_init()))
703		fatal_exit("alloc failure");
704	while(!daemon->need_to_exit) {
705		if(done_setup)
706			verbose(VERB_OPS, "Restart of %s.", PACKAGE_STRING);
707		else	verbose(VERB_OPS, "Start of %s.", PACKAGE_STRING);
708
709		/* config stuff */
710		if(!(cfg = config_create()))
711			fatal_exit("Could not alloc config defaults");
712		if(!config_read(cfg, cfgfile, daemon->chroot)) {
713			if(errno != ENOENT)
714				fatal_exit("Could not read config file: %s."
715					" Maybe try unbound -dd, it stays on "
716					"the commandline to see more errors, "
717					"or unbound-checkconf", cfgfile);
718			log_warn("Continuing with default config settings");
719		}
720		apply_settings(daemon, cfg, cmdline_verbose, debug_mode);
721		if(!done_setup)
722			config_lookup_uid(cfg);
723
724		/* prepare */
725		if(!daemon_open_shared_ports(daemon))
726			fatal_exit("could not open ports");
727		if(!done_setup) {
728			perform_setup(daemon, cfg, debug_mode, &cfgfile, need_pidfile);
729			done_setup = 1;
730		} else {
731			/* reopen log after HUP to facilitate log rotation */
732			if(!cfg->use_syslog)
733				log_init(cfg->logfile, 0, cfg->chrootdir);
734		}
735		/* work */
736		daemon_fork(daemon);
737
738		/* clean up for restart */
739		verbose(VERB_ALGO, "cleanup.");
740		daemon_cleanup(daemon);
741		config_delete(cfg);
742	}
743	verbose(VERB_ALGO, "Exit cleanup.");
744	/* this unlink may not work if the pidfile is located outside
745	 * of the chroot/workdir or we no longer have permissions */
746	if(daemon->pidfile) {
747		int fd;
748		/* truncate pidfile */
749		fd = open(daemon->pidfile, O_WRONLY | O_TRUNC, 0644);
750		if(fd != -1)
751			close(fd);
752		/* delete pidfile */
753		unlink(daemon->pidfile);
754	}
755	daemon_delete(daemon);
756}
757
758/** getopt global, in case header files fail to declare it. */
759extern int optind;
760/** getopt global, in case header files fail to declare it. */
761extern char* optarg;
762
763/**
764 * main program. Set options given commandline arguments.
765 * @param argc: number of commandline arguments.
766 * @param argv: array of commandline arguments.
767 * @return: exit status of the program.
768 */
769int
770main(int argc, char* argv[])
771{
772	int c;
773	const char* cfgfile = CONFIGFILE;
774	const char* winopt = NULL;
775	const char* log_ident_default;
776	int cmdline_verbose = 0;
777	int debug_mode = 0;
778	int need_pidfile = 1;
779
780#ifdef UB_ON_WINDOWS
781	int cmdline_cfg = 0;
782#endif
783
784	checklock_start();
785	log_init(NULL, 0, NULL);
786	log_ident_default = strrchr(argv[0],'/')?strrchr(argv[0],'/')+1:argv[0];
787	log_ident_set_default(log_ident_default);
788	log_ident_set(log_ident_default);
789	/* parse the options */
790	while( (c=getopt(argc, argv, "c:dhpvw:V")) != -1) {
791		switch(c) {
792		case 'c':
793			cfgfile = optarg;
794#ifdef UB_ON_WINDOWS
795			cmdline_cfg = 1;
796#endif
797			break;
798		case 'v':
799			cmdline_verbose++;
800			verbosity++;
801			break;
802		case 'p':
803			need_pidfile = 0;
804			break;
805		case 'd':
806			debug_mode++;
807			break;
808		case 'w':
809			winopt = optarg;
810			break;
811		case 'V':
812			print_build_options();
813			return 0;
814		case '?':
815		case 'h':
816		default:
817			usage();
818			return 1;
819		}
820	}
821	argc -= optind;
822	/* argv += optind; not using further arguments */
823
824	if(winopt) {
825#ifdef UB_ON_WINDOWS
826		wsvc_command_option(winopt, cfgfile, cmdline_verbose,
827			cmdline_cfg);
828#else
829		fatal_exit("option not supported");
830#endif
831	}
832
833	if(argc != 0) {
834		usage();
835		return 1;
836	}
837
838	run_daemon(cfgfile, cmdline_verbose, debug_mode, need_pidfile);
839	log_init(NULL, 0, NULL); /* close logfile */
840#ifndef unbound_testbound
841	if(log_get_lock()) {
842		lock_basic_destroy((lock_basic_type*)log_get_lock());
843	}
844#endif
845	return 0;
846}
847