util/config_file.c

   1 /*
   2  * util/config_file.c - reads and stores the config file for unbound.
   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  * \file
  38  *
  39  * This file contains functions for the config file.
  40  */
  41
  42 #include "config.h"
  43 #include <ctype.h>
  44 #include <stdarg.h>
  45 #ifdef HAVE_TIME_H
  46 #include <time.h>
  47 #endif
  48 #include "util/log.h"
  49 #include "util/configyyrename.h"
  50 #include "util/config_file.h"
  51 #include "util/configparser.h"
  52 #include "util/net_help.h"
  53 #include "util/data/msgparse.h"
  54 #include "util/module.h"
  55 #include "util/regional.h"
  56 #include "util/fptr_wlist.h"
  57 #include "util/data/dname.h"
  58 #include "util/rtt.h"
  59 #include "services/cache/infra.h"
  60 #include "sldns/wire2str.h"
  61 #include "sldns/parseutil.h"
  62 #include "iterator/iterator.h"
  63 #ifdef HAVE_GLOB_H
  64 # include <glob.h>
  65 #endif
  66 #ifdef CLIENT_SUBNET
  67 #include "edns-subnet/edns-subnet.h"
  68 #endif
  69 #ifdef HAVE_PWD_H
  70 #include <pwd.h>
  71 #endif
  72
  73 /** from cfg username, after daemonize setup performed */
  74 uid_t cfg_uid = (uid_t)-1;
  75 /** from cfg username, after daemonize setup performed */
  76 gid_t cfg_gid = (gid_t)-1;
  77 /** for debug allow small timeout values for fast rollovers */
  78 int autr_permit_small_holddown = 0;
  79 /** size (in bytes) of stream wait buffers max */
  80 size_t stream_wait_max = 4 * 1024 * 1024;
  81 size_t http2_query_buffer_max = 4 * 1024 * 1024;
  82 size_t http2_response_buffer_max = 4 * 1024 * 1024;
  83
  84 /** global config during parsing */
  85 struct config_parser_state* cfg_parser = 0;
  86
  87 /** init ports possible for use */
  88 static void init_outgoing_availports(int* array, int num);
  89
  90 struct config_file*
  91 config_create(void)
  92 {
  93         struct config_file* cfg;
  94         cfg = (struct config_file*)calloc(1, sizeof(struct config_file));
  95         if(!cfg)
  96                 return NULL;
  97         /* the defaults if no config is present */
  98         cfg->verbosity = 1;
  99         cfg->stat_interval = 0;
 100         cfg->stat_cumulative = 0;
 101         cfg->stat_extended = 0;
 102         cfg->num_threads = 1;
 103         cfg->port = UNBOUND_DNS_PORT;
 104         cfg->do_ip4 = 1;
 105         cfg->do_ip6 = 1;
 106         cfg->do_udp = 1;
 107         cfg->do_tcp = 1;
 108         cfg->tcp_upstream = 0;
 109         cfg->udp_upstream_without_downstream = 0;
 110         cfg->tcp_mss = 0;
 111         cfg->outgoing_tcp_mss = 0;
 112         cfg->tcp_idle_timeout = 30 * 1000; /* 30s in millisecs */
 113         cfg->do_tcp_keepalive = 0;
 114         cfg->tcp_keepalive_timeout = 120 * 1000; /* 120s in millisecs */
 115         cfg->ssl_service_key = NULL;
 116         cfg->ssl_service_pem = NULL;
 117         cfg->ssl_port = UNBOUND_DNS_OVER_TLS_PORT;
 118         cfg->ssl_upstream = 0;
 119         cfg->tls_cert_bundle = NULL;
 120         cfg->tls_win_cert = 0;
 121         cfg->tls_use_sni = 1;
 122         cfg->https_port = UNBOUND_DNS_OVER_HTTPS_PORT;
 123         if(!(cfg->http_endpoint = strdup("/dns-query"))) goto error_exit;
 124         cfg->http_max_streams = 100;
 125         cfg->http_query_buffer_size = 4*1024*1024;
 126         cfg->http_response_buffer_size = 4*1024*1024;
 127         cfg->http_nodelay = 1;
 128         cfg->use_syslog = 1;
 129         cfg->log_identity = NULL; /* changed later with argv[0] */
 130         cfg->log_time_ascii = 0;
 131         cfg->log_queries = 0;
 132         cfg->log_replies = 0;
 133         cfg->log_tag_queryreply = 0;
 134         cfg->log_local_actions = 0;
 135         cfg->log_servfail = 0;
 136 #ifndef USE_WINSOCK
 137 #  ifdef USE_MINI_EVENT
 138         /* select max 1024 sockets */
 139         cfg->outgoing_num_ports = 960;
 140         cfg->num_queries_per_thread = 512;
 141 #  else
 142         /* libevent can use many sockets */
 143         cfg->outgoing_num_ports = 4096;
 144         cfg->num_queries_per_thread = 1024;
 145 #  endif
 146         cfg->outgoing_num_tcp = 10;
 147         cfg->incoming_num_tcp = 10;
 148 #else
 149         cfg->outgoing_num_ports = 48; /* windows is limited in num fds */
 150         cfg->num_queries_per_thread = 24;
 151         cfg->outgoing_num_tcp = 2; /* leaves 64-52=12 for: 4if,1stop,thread4 */
 152         cfg->incoming_num_tcp = 2;
 153 #endif
 154         cfg->stream_wait_size = 4 * 1024 * 1024;
 155         cfg->edns_buffer_size = 1232; /* from DNS flagday recommendation */
 156         cfg->msg_buffer_size = 65552; /* 64 k + a small margin */
 157         cfg->msg_cache_size = 4 * 1024 * 1024;
 158         cfg->msg_cache_slabs = 4;
 159         cfg->jostle_time = 200;
 160         cfg->rrset_cache_size = 4 * 1024 * 1024;
 161         cfg->rrset_cache_slabs = 4;
 162         cfg->host_ttl = 900;
 163         cfg->bogus_ttl = 60;
 164         cfg->min_ttl = 0;
 165         cfg->max_ttl = 3600 * 24;
 166         cfg->max_negative_ttl = 3600;
 167         cfg->prefetch = 0;
 168         cfg->prefetch_key = 0;
 169         cfg->deny_any = 0;
 170         cfg->infra_cache_slabs = 4;
 171         cfg->infra_cache_numhosts = 10000;
 172         cfg->infra_cache_min_rtt = 50;
 173         cfg->delay_close = 0;
 174         if(!(cfg->outgoing_avail_ports = (int*)calloc(65536, sizeof(int))))
 175                 goto error_exit;
 176         init_outgoing_availports(cfg->outgoing_avail_ports, 65536);
 177         if(!(cfg->username = strdup(UB_USERNAME))) goto error_exit;
 178 #ifdef HAVE_CHROOT
 179         if(!(cfg->chrootdir = strdup(CHROOT_DIR))) goto error_exit;
 180 #endif
 181         if(!(cfg->directory = strdup(RUN_DIR))) goto error_exit;
 182         if(!(cfg->logfile = strdup(""))) goto error_exit;
 183         if(!(cfg->pidfile = strdup(PIDFILE))) goto error_exit;
 184         if(!(cfg->target_fetch_policy = strdup("3 2 1 0 0"))) goto error_exit;
 185         cfg->fast_server_permil = 0;
 186         cfg->fast_server_num = 3;
 187         cfg->donotqueryaddrs = NULL;
 188         cfg->donotquery_localhost = 1;
 189         cfg->root_hints = NULL;
 190         cfg->use_systemd = 0;
 191         cfg->do_daemonize = 1;
 192         cfg->if_automatic = 0;
 193         cfg->so_rcvbuf = 0;
 194         cfg->so_sndbuf = 0;
 195         cfg->so_reuseport = REUSEPORT_DEFAULT;
 196         cfg->ip_transparent = 0;
 197         cfg->ip_freebind = 0;
 198         cfg->ip_dscp = 0;
 199         cfg->num_ifs = 0;
 200         cfg->ifs = NULL;
 201         cfg->num_out_ifs = 0;
 202         cfg->out_ifs = NULL;
 203         cfg->stubs = NULL;
 204         cfg->forwards = NULL;
 205         cfg->auths = NULL;
 206 #ifdef CLIENT_SUBNET
 207         cfg->client_subnet = NULL;
 208         cfg->client_subnet_zone = NULL;
 209         cfg->client_subnet_opcode = LDNS_EDNS_CLIENT_SUBNET;
 210         cfg->client_subnet_always_forward = 0;
 211         cfg->max_client_subnet_ipv4 = 24;
 212         cfg->max_client_subnet_ipv6 = 56;
 213         cfg->min_client_subnet_ipv4 = 0;
 214         cfg->min_client_subnet_ipv6 = 0;
 215         cfg->max_ecs_tree_size_ipv4 = 100;
 216         cfg->max_ecs_tree_size_ipv6 = 100;
 217 #endif
 218         cfg->views = NULL;
 219         cfg->acls = NULL;
 220         cfg->tcp_connection_limits = NULL;
 221         cfg->harden_short_bufsize = 0;
 222         cfg->harden_large_queries = 0;
 223         cfg->harden_glue = 1;
 224         cfg->harden_dnssec_stripped = 1;
 225         cfg->harden_below_nxdomain = 1;
 226         cfg->harden_referral_path = 0;
 227         cfg->harden_algo_downgrade = 0;
 228         cfg->use_caps_bits_for_id = 0;
 229         cfg->caps_whitelist = NULL;
 230         cfg->private_address = NULL;
 231         cfg->private_domain = NULL;
 232         cfg->unwanted_threshold = 0;
 233         cfg->hide_identity = 0;
 234         cfg->hide_version = 0;
 235         cfg->hide_trustanchor = 0;
 236         cfg->identity = NULL;
 237         cfg->version = NULL;
 238         cfg->auto_trust_anchor_file_list = NULL;
 239         cfg->trust_anchor_file_list = NULL;
 240         cfg->trust_anchor_list = NULL;
 241         cfg->trusted_keys_file_list = NULL;
 242         cfg->trust_anchor_signaling = 1;
 243         cfg->root_key_sentinel = 1;
 244         cfg->domain_insecure = NULL;
 245         cfg->val_date_override = 0;
 246         cfg->val_sig_skew_min = 3600; /* at least daylight savings trouble */
 247         cfg->val_sig_skew_max = 86400; /* at most timezone settings trouble */
 248         cfg->val_clean_additional = 1;
 249         cfg->val_log_level = 0;
 250         cfg->val_log_squelch = 0;
 251         cfg->val_permissive_mode = 0;
 252         cfg->aggressive_nsec = 0;
 253         cfg->ignore_cd = 0;
 254         cfg->serve_expired = 0;
 255         cfg->serve_expired_ttl = 0;
 256         cfg->serve_expired_ttl_reset = 0;
 257         cfg->serve_expired_reply_ttl = 30;
 258         cfg->serve_expired_client_timeout = 0;
 259         cfg->add_holddown = 30*24*3600;
 260         cfg->del_holddown = 30*24*3600;
 261         cfg->keep_missing = 366*24*3600; /* one year plus a little leeway */
 262         cfg->permit_small_holddown = 0;
 263         cfg->key_cache_size = 4 * 1024 * 1024;
 264         cfg->key_cache_slabs = 4;
 265         cfg->neg_cache_size = 1 * 1024 * 1024;
 266         cfg->local_zones = NULL;
 267         cfg->local_zones_nodefault = NULL;
 268 #ifdef USE_IPSET
 269         cfg->local_zones_ipset = NULL;
 270 #endif
 271         cfg->local_zones_disable_default = 0;
 272         cfg->local_data = NULL;
 273         cfg->local_zone_overrides = NULL;
 274         cfg->unblock_lan_zones = 0;
 275         cfg->insecure_lan_zones = 0;
 276         cfg->python_script = NULL;
 277         cfg->dynlib_file = NULL;
 278         cfg->remote_control_enable = 0;
 279         cfg->control_ifs.first = NULL;
 280         cfg->control_ifs.last = NULL;
 281         cfg->control_port = UNBOUND_CONTROL_PORT;
 282         cfg->control_use_cert = 1;
 283         cfg->minimal_responses = 1;
 284         cfg->rrset_roundrobin = 1;
 285         cfg->unknown_server_time_limit = 376;
 286         cfg->max_udp_size = 4096;
 287         if(!(cfg->server_key_file = strdup(RUN_DIR"/unbound_server.key")))
 288                 goto error_exit;
 289         if(!(cfg->server_cert_file = strdup(RUN_DIR"/unbound_server.pem")))
 290                 goto error_exit;
 291         if(!(cfg->control_key_file = strdup(RUN_DIR"/unbound_control.key")))
 292                 goto error_exit;
 293         if(!(cfg->control_cert_file = strdup(RUN_DIR"/unbound_control.pem")))
 294                 goto error_exit;
 295
 296 #ifdef CLIENT_SUBNET
 297         if(!(cfg->module_conf = strdup("subnetcache validator iterator"))) goto error_exit;
 298 #else
 299         if(!(cfg->module_conf = strdup("validator iterator"))) goto error_exit;
 300 #endif
 301         if(!(cfg->val_nsec3_key_iterations =
 302                 strdup("1024 150 2048 500 4096 2500"))) goto error_exit;
 303 #if defined(DNSTAP_SOCKET_PATH)
 304         if(!(cfg->dnstap_socket_path = strdup(DNSTAP_SOCKET_PATH)))
 305                 goto error_exit;
 306 #endif
 307         cfg->dnstap_bidirectional = 1;
 308         cfg->dnstap_tls = 1;
 309         cfg->disable_dnssec_lame_check = 0;
 310         cfg->ip_ratelimit = 0;
 311         cfg->ratelimit = 0;
 312         cfg->ip_ratelimit_slabs = 4;
 313         cfg->ratelimit_slabs = 4;
 314         cfg->ip_ratelimit_size = 4*1024*1024;
 315         cfg->ratelimit_size = 4*1024*1024;
 316         cfg->ratelimit_for_domain = NULL;
 317         cfg->ratelimit_below_domain = NULL;
 318         cfg->ip_ratelimit_factor = 10;
 319         cfg->ratelimit_factor = 10;
 320         cfg->qname_minimisation = 1;
 321         cfg->qname_minimisation_strict = 0;
 322         cfg->shm_enable = 0;
 323         cfg->shm_key = 11777;
 324         cfg->edns_client_tags = NULL;
 325         cfg->edns_client_tag_opcode = LDNS_EDNS_CLIENT_TAG;
 326         cfg->dnscrypt = 0;
 327         cfg->dnscrypt_port = 0;
 328         cfg->dnscrypt_provider = NULL;
 329         cfg->dnscrypt_provider_cert = NULL;
 330         cfg->dnscrypt_provider_cert_rotated = NULL;
 331         cfg->dnscrypt_secret_key = NULL;
 332         cfg->dnscrypt_shared_secret_cache_size = 4*1024*1024;
 333         cfg->dnscrypt_shared_secret_cache_slabs = 4;
 334         cfg->dnscrypt_nonce_cache_size = 4*1024*1024;
 335         cfg->dnscrypt_nonce_cache_slabs = 4;
 336 #ifdef USE_IPSECMOD
 337         cfg->ipsecmod_enabled = 1;
 338         cfg->ipsecmod_ignore_bogus = 0;
 339         cfg->ipsecmod_hook = NULL;
 340         cfg->ipsecmod_max_ttl = 3600;
 341         cfg->ipsecmod_whitelist = NULL;
 342         cfg->ipsecmod_strict = 0;
 343 #endif
 344 #ifdef USE_CACHEDB
 345         if(!(cfg->cachedb_backend = strdup("testframe"))) goto error_exit;
 346         if(!(cfg->cachedb_secret = strdup("default"))) goto error_exit;
 347 #ifdef USE_REDIS
 348         if(!(cfg->redis_server_host = strdup("127.0.0.1"))) goto error_exit;
 349         cfg->redis_timeout = 100;
 350         cfg->redis_server_port = 6379;
 351         cfg->redis_expire_records = 0;
 352 #endif  /* USE_REDIS */
 353 #endif  /* USE_CACHEDB */
 354 #ifdef USE_IPSET
 355         cfg->ipset_name_v4 = NULL;
 356         cfg->ipset_name_v6 = NULL;
 357 #endif
 358         return cfg;
 359 error_exit:
 360         config_delete(cfg);
 361         return NULL;
 362 }
 363
 364 struct config_file* config_create_forlib(void)
 365 {
 366         struct config_file* cfg = config_create();
 367         if(!cfg) return NULL;
 368         /* modifications for library use, less verbose, less memory */
 369         free(cfg->chrootdir);
 370         cfg->chrootdir = NULL;
 371         cfg->verbosity = 0;
 372         cfg->outgoing_num_ports = 16; /* in library use, this is 'reasonable'
 373                 and probably within the ulimit(maxfds) of the user */
 374         cfg->outgoing_num_tcp = 2;
 375         cfg->msg_cache_size = 1024*1024;
 376         cfg->msg_cache_slabs = 1;
 377         cfg->rrset_cache_size = 1024*1024;
 378         cfg->rrset_cache_slabs = 1;
 379         cfg->infra_cache_slabs = 1;
 380         cfg->use_syslog = 0;
 381         cfg->key_cache_size = 1024*1024;
 382         cfg->key_cache_slabs = 1;
 383         cfg->neg_cache_size = 100 * 1024;
 384         cfg->donotquery_localhost = 0; /* allow, so that you can ask a
 385                 forward nameserver running on localhost */
 386         cfg->val_log_level = 2; /* to fill why_bogus with */
 387         cfg->val_log_squelch = 1;
 388         cfg->minimal_responses = 0;
 389         return cfg;
 390 }
 391
 392 /** check that the value passed is >= 0 */
 393 #define IS_NUMBER_OR_ZERO \
 394         if(atoi(val) == 0 && strcmp(val, "0") != 0) return 0
 395 /** check that the value passed is > 0 */
 396 #define IS_NONZERO_NUMBER \
 397         if(atoi(val) == 0) return 0
 398 /** check that the value passed is not 0 and a power of 2 */
 399 #define IS_POW2_NUMBER \
 400         if(atoi(val) == 0 || !is_pow2((size_t)atoi(val))) return 0
 401 /** check that the value passed is yes or no */
 402 #define IS_YES_OR_NO \
 403         if(strcmp(val, "yes") != 0 && strcmp(val, "no") != 0) return 0
 404 /** put integer_or_zero into variable */
 405 #define S_NUMBER_OR_ZERO(str, var) if(strcmp(opt, str) == 0) \
 406         { IS_NUMBER_OR_ZERO; cfg->var = atoi(val); }
 407 /** put integer_nonzero into variable */
 408 #define S_NUMBER_NONZERO(str, var) if(strcmp(opt, str) == 0) \
 409         { IS_NONZERO_NUMBER; cfg->var = atoi(val); }
 410 /** put integer_or_zero into unsigned */
 411 #define S_UNSIGNED_OR_ZERO(str, var) if(strcmp(opt, str) == 0) \
 412         { IS_NUMBER_OR_ZERO; cfg->var = (unsigned)atoi(val); }
 413 /** put integer_or_zero into size_t */
 414 #define S_SIZET_OR_ZERO(str, var) if(strcmp(opt, str) == 0) \
 415         { IS_NUMBER_OR_ZERO; cfg->var = (size_t)atoi(val); }
 416 /** put integer_nonzero into size_t */
 417 #define S_SIZET_NONZERO(str, var) if(strcmp(opt, str) == 0) \
 418         { IS_NONZERO_NUMBER; cfg->var = (size_t)atoi(val); }
 419 /** put yesno into variable */
 420 #define S_YNO(str, var) if(strcmp(opt, str) == 0) \
 421         { IS_YES_OR_NO; cfg->var = (strcmp(val, "yes") == 0); }
 422 /** put memsize into variable */
 423 #define S_MEMSIZE(str, var) if(strcmp(opt, str)==0) \
 424         { return cfg_parse_memsize(val, &cfg->var); }
 425 /** put pow2 number into variable */
 426 #define S_POW2(str, var) if(strcmp(opt, str)==0) \
 427         { IS_POW2_NUMBER; cfg->var = (size_t)atoi(val); }
 428 /** put string into variable */
 429 #define S_STR(str, var) if(strcmp(opt, str)==0) \
 430         { free(cfg->var); return (cfg->var = strdup(val)) != NULL; }
 431 /** put string into strlist */
 432 #define S_STRLIST(str, var) if(strcmp(opt, str)==0) \
 433         { return cfg_strlist_insert(&cfg->var, strdup(val)); }
 434 /** put string into strlist if not present yet*/
 435 #define S_STRLIST_UNIQ(str, var) if(strcmp(opt, str)==0) \
 436         { if(cfg_strlist_find(cfg->var, val)) { return 0;} \
 437           return cfg_strlist_insert(&cfg->var, strdup(val)); }
 438 /** append string to strlist */
 439 #define S_STRLIST_APPEND(str, var) if(strcmp(opt, str)==0) \
 440         { return cfg_strlist_append(&cfg->var, strdup(val)); }
 441
 442 int config_set_option(struct config_file* cfg, const char* opt,
 443         const char* val)
 444 {
 445         char buf[64];
 446         if(!opt) return 0;
 447         if(opt[strlen(opt)-1] != ':' && strlen(opt)+2<sizeof(buf)) {
 448                 snprintf(buf, sizeof(buf), "%s:", opt);
 449                 opt = buf;
 450         }
 451         S_NUMBER_OR_ZERO("verbosity:", verbosity)
 452         else if(strcmp(opt, "statistics-interval:") == 0) {
 453                 if(strcmp(val, "0") == 0 || strcmp(val, "") == 0)
 454                         cfg->stat_interval = 0;
 455                 else if(atoi(val) == 0)
 456                         return 0;
 457                 else cfg->stat_interval = atoi(val);
 458         } else if(strcmp(opt, "num_threads:") == 0) {
 459                 /* not supported, library must have 1 thread in bgworker */
 460                 return 0;
 461         } else if(strcmp(opt, "outgoing-port-permit:") == 0) {
 462                 return cfg_mark_ports(val, 1,
 463                         cfg->outgoing_avail_ports, 65536);
 464         } else if(strcmp(opt, "outgoing-port-avoid:") == 0) {
 465                 return cfg_mark_ports(val, 0,
 466                         cfg->outgoing_avail_ports, 65536);
 467         } else if(strcmp(opt, "local-zone:") == 0) {
 468                 return cfg_parse_local_zone(cfg, val);
 469         } else if(strcmp(opt, "val-override-date:") == 0) {
 470                 if(strcmp(val, "") == 0 || strcmp(val, "0") == 0) {
 471                         cfg->val_date_override = 0;
 472                 } else if(strlen(val) == 14) {
 473                         cfg->val_date_override = cfg_convert_timeval(val);
 474                         return cfg->val_date_override != 0;
 475                 } else {
 476                         if(atoi(val) == 0) return 0;
 477                         cfg->val_date_override = (uint32_t)atoi(val);
 478                 }
 479         } else if(strcmp(opt, "local-data-ptr:") == 0) {
 480                 char* ptr = cfg_ptr_reverse((char*)opt);
 481                 return cfg_strlist_insert(&cfg->local_data, ptr);
 482         } else if(strcmp(opt, "logfile:") == 0) {
 483                 cfg->use_syslog = 0;
 484                 free(cfg->logfile);
 485                 return (cfg->logfile = strdup(val)) != NULL;
 486         }
 487         else if(strcmp(opt, "log-time-ascii:") == 0)
 488         { IS_YES_OR_NO; cfg->log_time_ascii = (strcmp(val, "yes") == 0);
 489           log_set_time_asc(cfg->log_time_ascii); }
 490         else S_SIZET_NONZERO("max-udp-size:", max_udp_size)
 491         else S_YNO("use-syslog:", use_syslog)
 492         else S_STR("log-identity:", log_identity)
 493         else S_YNO("extended-statistics:", stat_extended)
 494         else S_YNO("statistics-cumulative:", stat_cumulative)
 495         else S_YNO("shm-enable:", shm_enable)
 496         else S_NUMBER_OR_ZERO("shm-key:", shm_key)
 497         else S_YNO("do-ip4:", do_ip4)
 498         else S_YNO("do-ip6:", do_ip6)
 499         else S_YNO("do-udp:", do_udp)
 500         else S_YNO("do-tcp:", do_tcp)
 501         else S_YNO("prefer-ip4:", prefer_ip4)
 502         else S_YNO("prefer-ip6:", prefer_ip6)
 503         else S_YNO("tcp-upstream:", tcp_upstream)
 504         else S_YNO("udp-upstream-without-downstream:",
 505                 udp_upstream_without_downstream)
 506         else S_NUMBER_NONZERO("tcp-mss:", tcp_mss)
 507         else S_NUMBER_NONZERO("outgoing-tcp-mss:", outgoing_tcp_mss)
 508         else S_NUMBER_NONZERO("tcp-idle-timeout:", tcp_idle_timeout)
 509         else S_YNO("edns-tcp-keepalive:", do_tcp_keepalive)
 510         else S_NUMBER_NONZERO("edns-tcp-keepalive-timeout:", tcp_keepalive_timeout)
 511         else S_YNO("ssl-upstream:", ssl_upstream)
 512         else S_STR("ssl-service-key:", ssl_service_key)
 513         else S_STR("ssl-service-pem:", ssl_service_pem)
 514         else S_NUMBER_NONZERO("ssl-port:", ssl_port)
 515         else S_STR("tls-cert-bundle:", tls_cert_bundle)
 516         else S_YNO("tls-win-cert:", tls_win_cert)
 517         else S_STRLIST("additional-tls-port:", tls_additional_port)
 518         else S_STRLIST("tls-additional-ports:", tls_additional_port)
 519         else S_STRLIST("tls-additional-port:", tls_additional_port)
 520         else S_STRLIST_APPEND("tls-session-ticket-keys:", tls_session_ticket_keys)
 521         else S_STR("tls-ciphers:", tls_ciphers)
 522         else S_STR("tls-ciphersuites:", tls_ciphersuites)
 523         else S_YNO("tls-use-sni:", tls_use_sni)
 524         else S_NUMBER_NONZERO("https-port:", https_port)
 525         else S_STR("http-endpoint", http_endpoint)
 526         else S_NUMBER_NONZERO("http-max-streams", http_max_streams)
 527         else S_MEMSIZE("http-query-buffer-size", http_query_buffer_size)
 528         else S_MEMSIZE("http-response-buffer-size", http_response_buffer_size)
 529         else S_YNO("http-nodelay", http_nodelay)
 530         else S_YNO("interface-automatic:", if_automatic)
 531         else S_YNO("use-systemd:", use_systemd)
 532         else S_YNO("do-daemonize:", do_daemonize)
 533         else S_NUMBER_NONZERO("port:", port)
 534         else S_NUMBER_NONZERO("outgoing-range:", outgoing_num_ports)
 535         else S_SIZET_OR_ZERO("outgoing-num-tcp:", outgoing_num_tcp)
 536         else S_SIZET_OR_ZERO("incoming-num-tcp:", incoming_num_tcp)
 537         else S_MEMSIZE("stream-wait-size:", stream_wait_size)
 538         else S_SIZET_NONZERO("edns-buffer-size:", edns_buffer_size)
 539         else S_SIZET_NONZERO("msg-buffer-size:", msg_buffer_size)
 540         else S_MEMSIZE("msg-cache-size:", msg_cache_size)
 541         else S_POW2("msg-cache-slabs:", msg_cache_slabs)
 542         else S_SIZET_NONZERO("num-queries-per-thread:",num_queries_per_thread)
 543         else S_SIZET_OR_ZERO("jostle-timeout:", jostle_time)
 544         else S_MEMSIZE("so-rcvbuf:", so_rcvbuf)
 545         else S_MEMSIZE("so-sndbuf:", so_sndbuf)
 546         else S_YNO("so-reuseport:", so_reuseport)
 547         else S_YNO("ip-transparent:", ip_transparent)
 548         else S_YNO("ip-freebind:", ip_freebind)
 549         else S_NUMBER_OR_ZERO("ip-dscp:", ip_dscp)
 550         else S_MEMSIZE("rrset-cache-size:", rrset_cache_size)
 551         else S_POW2("rrset-cache-slabs:", rrset_cache_slabs)
 552         else S_YNO("prefetch:", prefetch)
 553         else S_YNO("prefetch-key:", prefetch_key)
 554         else S_YNO("deny-any:", deny_any)
 555         else if(strcmp(opt, "cache-max-ttl:") == 0)
 556         { IS_NUMBER_OR_ZERO; cfg->max_ttl = atoi(val); MAX_TTL=(time_t)cfg->max_ttl;}
 557         else if(strcmp(opt, "cache-max-negative-ttl:") == 0)
 558         { IS_NUMBER_OR_ZERO; cfg->max_negative_ttl = atoi(val); MAX_NEG_TTL=(time_t)cfg->max_negative_ttl;}
 559         else if(strcmp(opt, "cache-min-ttl:") == 0)
 560         { IS_NUMBER_OR_ZERO; cfg->min_ttl = atoi(val); MIN_TTL=(time_t)cfg->min_ttl;}
 561         else if(strcmp(opt, "infra-cache-min-rtt:") == 0) {
 562             IS_NUMBER_OR_ZERO; cfg->infra_cache_min_rtt = atoi(val);
 563             RTT_MIN_TIMEOUT=cfg->infra_cache_min_rtt;
 564         }
 565         else S_NUMBER_OR_ZERO("infra-host-ttl:", host_ttl)
 566         else S_POW2("infra-cache-slabs:", infra_cache_slabs)
 567         else S_SIZET_NONZERO("infra-cache-numhosts:", infra_cache_numhosts)
 568         else S_NUMBER_OR_ZERO("delay-close:", delay_close)
 569         else S_STR("chroot:", chrootdir)
 570         else S_STR("username:", username)
 571         else S_STR("directory:", directory)
 572         else S_STR("pidfile:", pidfile)
 573         else S_YNO("hide-identity:", hide_identity)
 574         else S_YNO("hide-version:", hide_version)
 575         else S_YNO("hide-trustanchor:", hide_trustanchor)
 576         else S_STR("identity:", identity)
 577         else S_STR("version:", version)
 578         else S_STRLIST("root-hints:", root_hints)
 579         else S_STR("target-fetch-policy:", target_fetch_policy)
 580         else S_YNO("harden-glue:", harden_glue)
 581         else S_YNO("harden-short-bufsize:", harden_short_bufsize)
 582         else S_YNO("harden-large-queries:", harden_large_queries)
 583         else S_YNO("harden-dnssec-stripped:", harden_dnssec_stripped)
 584         else S_YNO("harden-below-nxdomain:", harden_below_nxdomain)
 585         else S_YNO("harden-referral-path:", harden_referral_path)
 586         else S_YNO("harden-algo-downgrade:", harden_algo_downgrade)
 587         else S_YNO("use-caps-for-id:", use_caps_bits_for_id)
 588         else S_STRLIST("caps-whitelist:", caps_whitelist)
 589         else S_SIZET_OR_ZERO("unwanted-reply-threshold:", unwanted_threshold)
 590         else S_STRLIST("private-address:", private_address)
 591         else S_STRLIST("private-domain:", private_domain)
 592         else S_YNO("do-not-query-localhost:", donotquery_localhost)
 593         else S_STRLIST("do-not-query-address:", donotqueryaddrs)
 594         else S_STRLIST("auto-trust-anchor-file:", auto_trust_anchor_file_list)
 595         else S_STRLIST("trust-anchor-file:", trust_anchor_file_list)
 596         else S_STRLIST("trust-anchor:", trust_anchor_list)
 597         else S_STRLIST("trusted-keys-file:", trusted_keys_file_list)
 598         else S_YNO("trust-anchor-signaling:", trust_anchor_signaling)
 599         else S_YNO("root-key-sentinel:", root_key_sentinel)
 600         else S_STRLIST("domain-insecure:", domain_insecure)
 601         else S_NUMBER_OR_ZERO("val-bogus-ttl:", bogus_ttl)
 602         else S_YNO("val-clean-additional:", val_clean_additional)
 603         else S_NUMBER_OR_ZERO("val-log-level:", val_log_level)
 604         else S_YNO("val-log-squelch:", val_log_squelch)
 605         else S_YNO("log-queries:", log_queries)
 606         else S_YNO("log-replies:", log_replies)
 607         else S_YNO("log-tag-queryreply:", log_tag_queryreply)
 608         else S_YNO("log-local-actions:", log_local_actions)
 609         else S_YNO("log-servfail:", log_servfail)
 610         else S_YNO("val-permissive-mode:", val_permissive_mode)
 611         else S_YNO("aggressive-nsec:", aggressive_nsec)
 612         else S_YNO("ignore-cd-flag:", ignore_cd)
 613         else if(strcmp(opt, "serve-expired:") == 0)
 614         { IS_YES_OR_NO; cfg->serve_expired = (strcmp(val, "yes") == 0);
 615           SERVE_EXPIRED = cfg->serve_expired; }
 616         else if(strcmp(opt, "serve-expired-ttl:") == 0)
 617         { IS_NUMBER_OR_ZERO; cfg->serve_expired_ttl = atoi(val); SERVE_EXPIRED_TTL=(time_t)cfg->serve_expired_ttl;}
 618         else S_YNO("serve-expired-ttl-reset:", serve_expired_ttl_reset)
 619         else if(strcmp(opt, "serve-expired-reply-ttl:") == 0)
 620         { IS_NUMBER_OR_ZERO; cfg->serve_expired_reply_ttl = atoi(val); SERVE_EXPIRED_REPLY_TTL=(time_t)cfg->serve_expired_reply_ttl;}
 621         else S_NUMBER_OR_ZERO("serve-expired-client-timeout:", serve_expired_client_timeout)
 622         else S_STR("val-nsec3-keysize-iterations:", val_nsec3_key_iterations)
 623         else S_UNSIGNED_OR_ZERO("add-holddown:", add_holddown)
 624         else S_UNSIGNED_OR_ZERO("del-holddown:", del_holddown)
 625         else S_UNSIGNED_OR_ZERO("keep-missing:", keep_missing)
 626         else if(strcmp(opt, "permit-small-holddown:") == 0)
 627         { IS_YES_OR_NO; cfg->permit_small_holddown = (strcmp(val, "yes") == 0);
 628           autr_permit_small_holddown = cfg->permit_small_holddown; }
 629         else S_MEMSIZE("key-cache-size:", key_cache_size)
 630         else S_POW2("key-cache-slabs:", key_cache_slabs)
 631         else S_MEMSIZE("neg-cache-size:", neg_cache_size)
 632         else S_YNO("minimal-responses:", minimal_responses)
 633         else S_YNO("rrset-roundrobin:", rrset_roundrobin)
 634         else S_NUMBER_OR_ZERO("unknown-server-time-limit:", unknown_server_time_limit)
 635         else S_STRLIST("local-data:", local_data)
 636         else S_YNO("unblock-lan-zones:", unblock_lan_zones)
 637         else S_YNO("insecure-lan-zones:", insecure_lan_zones)
 638         else S_YNO("control-enable:", remote_control_enable)
 639         else S_STRLIST_APPEND("control-interface:", control_ifs)
 640         else S_NUMBER_NONZERO("control-port:", control_port)
 641         else S_STR("server-key-file:", server_key_file)
 642         else S_STR("server-cert-file:", server_cert_file)
 643         else S_STR("control-key-file:", control_key_file)
 644         else S_STR("control-cert-file:", control_cert_file)
 645         else S_STR("module-config:", module_conf)
 646         else S_STRLIST("python-script:", python_script)
 647         else S_STRLIST("dynlib-file:", dynlib_file)
 648         else S_YNO("disable-dnssec-lame-check:", disable_dnssec_lame_check)
 649 #ifdef CLIENT_SUBNET
 650         /* Can't set max subnet prefix here, since that value is used when
 651          * generating the address tree. */
 652         /* No client-subnet-always-forward here, module registration depends on
 653          * this option. */
 654 #endif
 655 #ifdef USE_DNSTAP
 656         else S_YNO("dnstap-enable:", dnstap)
 657         else S_YNO("dnstap-bidirectional:", dnstap_bidirectional)
 658         else S_STR("dnstap-socket-path:", dnstap_socket_path)
 659         else S_STR("dnstap-ip:", dnstap_ip)
 660         else S_YNO("dnstap-tls:", dnstap_tls)
 661         else S_STR("dnstap-tls-server-name:", dnstap_tls_server_name)
 662         else S_STR("dnstap-tls-cert-bundle:", dnstap_tls_cert_bundle)
 663         else S_STR("dnstap-tls-client-key-file:", dnstap_tls_client_key_file)
 664         else S_STR("dnstap-tls-client-cert-file:",
 665                 dnstap_tls_client_cert_file)
 666         else S_YNO("dnstap-send-identity:", dnstap_send_identity)
 667         else S_YNO("dnstap-send-version:", dnstap_send_version)
 668         else S_STR("dnstap-identity:", dnstap_identity)
 669         else S_STR("dnstap-version:", dnstap_version)
 670         else S_YNO("dnstap-log-resolver-query-messages:",
 671                 dnstap_log_resolver_query_messages)
 672         else S_YNO("dnstap-log-resolver-response-messages:",
 673                 dnstap_log_resolver_response_messages)
 674         else S_YNO("dnstap-log-client-query-messages:",
 675                 dnstap_log_client_query_messages)
 676         else S_YNO("dnstap-log-client-response-messages:",
 677                 dnstap_log_client_response_messages)
 678         else S_YNO("dnstap-log-forwarder-query-messages:",
 679                 dnstap_log_forwarder_query_messages)
 680         else S_YNO("dnstap-log-forwarder-response-messages:",
 681                 dnstap_log_forwarder_response_messages)
 682 #endif
 683 #ifdef USE_DNSCRYPT
 684         else S_YNO("dnscrypt-enable:", dnscrypt)
 685         else S_NUMBER_NONZERO("dnscrypt-port:", dnscrypt_port)
 686         else S_STR("dnscrypt-provider:", dnscrypt_provider)
 687         else S_STRLIST_UNIQ("dnscrypt-provider-cert:", dnscrypt_provider_cert)
 688         else S_STRLIST("dnscrypt-provider-cert-rotated:", dnscrypt_provider_cert_rotated)
 689         else S_STRLIST_UNIQ("dnscrypt-secret-key:", dnscrypt_secret_key)
 690         else S_MEMSIZE("dnscrypt-shared-secret-cache-size:",
 691                 dnscrypt_shared_secret_cache_size)
 692         else S_POW2("dnscrypt-shared-secret-cache-slabs:",
 693                 dnscrypt_shared_secret_cache_slabs)
 694         else S_MEMSIZE("dnscrypt-nonce-cache-size:",
 695                 dnscrypt_nonce_cache_size)
 696         else S_POW2("dnscrypt-nonce-cache-slabs:",
 697                 dnscrypt_nonce_cache_slabs)
 698 #endif
 699         else if(strcmp(opt, "ip-ratelimit:") == 0) {
 700             IS_NUMBER_OR_ZERO; cfg->ip_ratelimit = atoi(val);
 701             infra_ip_ratelimit=cfg->ip_ratelimit;
 702         }
 703         else if(strcmp(opt, "ratelimit:") == 0) {
 704             IS_NUMBER_OR_ZERO; cfg->ratelimit = atoi(val);
 705             infra_dp_ratelimit=cfg->ratelimit;
 706         }
 707         else S_MEMSIZE("ip-ratelimit-size:", ip_ratelimit_size)
 708         else S_MEMSIZE("ratelimit-size:", ratelimit_size)
 709         else S_POW2("ip-ratelimit-slabs:", ip_ratelimit_slabs)
 710         else S_POW2("ratelimit-slabs:", ratelimit_slabs)
 711         else S_NUMBER_OR_ZERO("ip-ratelimit-factor:", ip_ratelimit_factor)
 712         else S_NUMBER_OR_ZERO("ratelimit-factor:", ratelimit_factor)
 713         else S_SIZET_NONZERO("fast-server-num:", fast_server_num)
 714         else S_NUMBER_OR_ZERO("fast-server-permil:", fast_server_permil)
 715         else S_YNO("qname-minimisation:", qname_minimisation)
 716         else S_YNO("qname-minimisation-strict:", qname_minimisation_strict)
 717 #ifdef USE_IPSECMOD
 718         else S_YNO("ipsecmod-enabled:", ipsecmod_enabled)
 719         else S_YNO("ipsecmod-ignore-bogus:", ipsecmod_ignore_bogus)
 720         else if(strcmp(opt, "ipsecmod-max-ttl:") == 0)
 721         { IS_NUMBER_OR_ZERO; cfg->ipsecmod_max_ttl = atoi(val); }
 722         else S_YNO("ipsecmod-strict:", ipsecmod_strict)
 723 #endif
 724         else if(strcmp(opt, "define-tag:") ==0) {
 725                 return config_add_tag(cfg, val);
 726         /* val_sig_skew_min and max are copied into val_env during init,
 727          * so this does not update val_env with set_option */
 728         } else if(strcmp(opt, "val-sig-skew-min:") == 0)
 729         { IS_NUMBER_OR_ZERO; cfg->val_sig_skew_min = (int32_t)atoi(val); }
 730         else if(strcmp(opt, "val-sig-skew-max:") == 0)
 731         { IS_NUMBER_OR_ZERO; cfg->val_sig_skew_max = (int32_t)atoi(val); }
 732         else if (strcmp(opt, "outgoing-interface:") == 0) {
 733                 char* d = strdup(val);
 734                 char** oi =
 735                 (char**)reallocarray(NULL, (size_t)cfg->num_out_ifs+1, sizeof(char*));
 736                 if(!d || !oi) { free(d); free(oi); return -1; }
 737                 if(cfg->out_ifs && cfg->num_out_ifs) {
 738                         memmove(oi, cfg->out_ifs, cfg->num_out_ifs*sizeof(char*));
 739                         free(cfg->out_ifs);
 740                 }
 741                 oi[cfg->num_out_ifs++] = d;
 742                 cfg->out_ifs = oi;
 743         } else {
 744                 /* unknown or unsupported (from the set_option interface):
 745                  * interface, outgoing-interface, access-control,
 746                  * stub-zone, name, stub-addr, stub-host, stub-prime
 747                  * forward-first, stub-first, forward-ssl-upstream,
 748                  * stub-ssl-upstream, forward-zone, auth-zone
 749                  * name, forward-addr, forward-host,
 750                  * ratelimit-for-domain, ratelimit-below-domain,
 751                  * local-zone-tag, access-control-view,
 752                  * send-client-subnet, client-subnet-always-forward,
 753                  * max-client-subnet-ipv4, max-client-subnet-ipv6,
 754                  * min-client-subnet-ipv4, min-client-subnet-ipv6,
 755                  * max-ecs-tree-size-ipv4, max-ecs-tree-size-ipv6, ipsecmod_hook,
 756                  * ipsecmod_whitelist. */
 757                 return 0;
 758         }
 759         return 1;
 760 }
 761
 762 void config_print_func(char* line, void* arg)
 763 {
 764         FILE* f = (FILE*)arg;
 765         (void)fprintf(f, "%s\n", line);
 766 }
 767
 768 /** collate func arg */
 769 struct config_collate_arg {
 770         /** list of result items */
 771         struct config_strlist_head list;
 772         /** if a malloc error occurred, 0 is OK */
 773         int status;
 774 };
 775
 776 void config_collate_func(char* line, void* arg)
 777 {
 778         struct config_collate_arg* m = (struct config_collate_arg*)arg;
 779         if(m->status)
 780                 return;
 781         if(!cfg_strlist_append(&m->list, strdup(line)))
 782                 m->status = 1;
 783 }
 784
 785 int config_get_option_list(struct config_file* cfg, const char* opt,
 786         struct config_strlist** list)
 787 {
 788         struct config_collate_arg m;
 789         memset(&m, 0, sizeof(m));
 790         *list = NULL;
 791         if(!config_get_option(cfg, opt, config_collate_func, &m))
 792                 return 1;
 793         if(m.status) {
 794                 config_delstrlist(m.list.first);
 795                 return 2;
 796         }
 797         *list = m.list.first;
 798         return 0;
 799 }
 800
 801 int
 802 config_get_option_collate(struct config_file* cfg, const char* opt, char** str)
 803 {
 804         struct config_strlist* list = NULL;
 805         int r;
 806         *str = NULL;
 807         if((r = config_get_option_list(cfg, opt, &list)) != 0)
 808                 return r;
 809         *str = config_collate_cat(list);
 810         config_delstrlist(list);
 811         if(!*str) return 2;
 812         return 0;
 813 }
 814
 815 char*
 816 config_collate_cat(struct config_strlist* list)
 817 {
 818         size_t total = 0, left;
 819         struct config_strlist* s;
 820         char *r, *w;
 821         if(!list) /* no elements */
 822                 return strdup("");
 823         if(list->next == NULL) /* one element , no newline at end. */
 824                 return strdup(list->str);
 825         /* count total length */
 826         for(s=list; s; s=s->next)
 827                 total += strlen(s->str) + 1; /* len + newline */
 828         left = total+1; /* one extra for nul at end */
 829         r = malloc(left);
 830         if(!r)
 831                 return NULL;
 832         w = r;
 833         for(s=list; s; s=s->next) {
 834                 size_t this = strlen(s->str);
 835                 if(this+2 > left) { /* sanity check */
 836                         free(r);
 837                         return NULL;
 838                 }
 839                 snprintf(w, left, "%s\n", s->str);
 840                 this = strlen(w);
 841                 w += this;
 842                 left -= this;
 843         }
 844         return r;
 845 }
 846
 847 /** compare and print decimal option */
 848 #define O_DEC(opt, str, var) if(strcmp(opt, str)==0) \
 849         {snprintf(buf, len, "%d", (int)cfg->var); \
 850         func(buf, arg);}
 851 /** compare and print unsigned option */
 852 #define O_UNS(opt, str, var) if(strcmp(opt, str)==0) \
 853         {snprintf(buf, len, "%u", (unsigned)cfg->var); \
 854         func(buf, arg);}
 855 /** compare and print yesno option */
 856 #define O_YNO(opt, str, var) if(strcmp(opt, str)==0) \
 857         {func(cfg->var?"yes":"no", arg);}
 858 /** compare and print string option */
 859 #define O_STR(opt, str, var) if(strcmp(opt, str)==0) \
 860         {func(cfg->var?cfg->var:"", arg);}
 861 /** compare and print array option */
 862 #define O_IFC(opt, str, num, arr) if(strcmp(opt, str)==0) \
 863         {int i; for(i=0; i<cfg->num; i++) func(cfg->arr[i], arg);}
 864 /** compare and print memorysize option */
 865 #define O_MEM(opt, str, var) if(strcmp(opt, str)==0) { \
 866         if(cfg->var > 1024*1024*1024) { \
 867           size_t f=cfg->var/(size_t)1000000, b=cfg->var%(size_t)1000000; \
 868           snprintf(buf, len, "%u%6.6u", (unsigned)f, (unsigned)b); \
 869         } else snprintf(buf, len, "%u", (unsigned)cfg->var); \
 870         func(buf, arg);}
 871 /** compare and print list option */
 872 #define O_LST(opt, name, lst) if(strcmp(opt, name)==0) { \
 873         struct config_strlist* p = cfg->lst; \
 874         for(p = cfg->lst; p; p = p->next) \
 875                 func(p->str, arg); \
 876         }
 877 /** compare and print list option */
 878 #define O_LS2(opt, name, lst) if(strcmp(opt, name)==0) { \
 879         struct config_str2list* p = cfg->lst; \
 880         for(p = cfg->lst; p; p = p->next) { \
 881                 snprintf(buf, len, "%s %s", p->str, p->str2); \
 882                 func(buf, arg); \
 883         } \
 884         }
 885 /** compare and print list option */
 886 #define O_LS3(opt, name, lst) if(strcmp(opt, name)==0) { \
 887         struct config_str3list* p = cfg->lst; \
 888         for(p = cfg->lst; p; p = p->next) { \
 889                 snprintf(buf, len, "%s %s %s", p->str, p->str2, p->str3); \
 890                 func(buf, arg); \
 891         } \
 892         }
 893 /** compare and print taglist option */
 894 #define O_LTG(opt, name, lst) if(strcmp(opt, name)==0) { \
 895         char* tmpstr = NULL; \
 896         struct config_strbytelist *p = cfg->lst; \
 897         for(p = cfg->lst; p; p = p->next) {\
 898                 tmpstr = config_taglist2str(cfg, p->str2, p->str2len); \
 899                 if(tmpstr) {\
 900                         snprintf(buf, len, "%s %s", p->str, tmpstr); \
 901                         func(buf, arg); \
 902                         free(tmpstr); \
 903                 } \
 904         } \
 905         }
 906
 907 int
 908 config_get_option(struct config_file* cfg, const char* opt,
 909         void (*func)(char*,void*), void* arg)
 910 {
 911         char buf[1024], nopt[64];
 912         size_t len = sizeof(buf);
 913         if(!opt) return 0;
 914         if(opt && opt[strlen(opt)-1] == ':' && strlen(opt)<sizeof(nopt)) {
 915                 memmove(nopt, opt, strlen(opt));
 916                 nopt[strlen(opt)-1] = 0;
 917                 opt = nopt;
 918         }
 919         fptr_ok(fptr_whitelist_print_func(func));
 920         O_DEC(opt, "verbosity", verbosity)
 921         else O_DEC(opt, "statistics-interval", stat_interval)
 922         else O_YNO(opt, "statistics-cumulative", stat_cumulative)
 923         else O_YNO(opt, "extended-statistics", stat_extended)
 924         else O_YNO(opt, "shm-enable", shm_enable)
 925         else O_DEC(opt, "shm-key", shm_key)
 926         else O_YNO(opt, "use-syslog", use_syslog)
 927         else O_STR(opt, "log-identity", log_identity)
 928         else O_YNO(opt, "log-time-ascii", log_time_ascii)
 929         else O_DEC(opt, "num-threads", num_threads)
 930         else O_IFC(opt, "interface", num_ifs, ifs)
 931         else O_IFC(opt, "outgoing-interface", num_out_ifs, out_ifs)
 932         else O_YNO(opt, "interface-automatic", if_automatic)
 933         else O_DEC(opt, "port", port)
 934         else O_DEC(opt, "outgoing-range", outgoing_num_ports)
 935         else O_DEC(opt, "outgoing-num-tcp", outgoing_num_tcp)
 936         else O_DEC(opt, "incoming-num-tcp", incoming_num_tcp)
 937         else O_MEM(opt, "stream-wait-size", stream_wait_size)
 938         else O_DEC(opt, "edns-buffer-size", edns_buffer_size)
 939         else O_DEC(opt, "msg-buffer-size", msg_buffer_size)
 940         else O_MEM(opt, "msg-cache-size", msg_cache_size)
 941         else O_DEC(opt, "msg-cache-slabs", msg_cache_slabs)
 942         else O_DEC(opt, "num-queries-per-thread", num_queries_per_thread)
 943         else O_UNS(opt, "jostle-timeout", jostle_time)
 944         else O_MEM(opt, "so-rcvbuf", so_rcvbuf)
 945         else O_MEM(opt, "so-sndbuf", so_sndbuf)
 946         else O_YNO(opt, "so-reuseport", so_reuseport)
 947         else O_YNO(opt, "ip-transparent", ip_transparent)
 948         else O_YNO(opt, "ip-freebind", ip_freebind)
 949         else O_DEC(opt, "ip-dscp", ip_dscp)
 950         else O_MEM(opt, "rrset-cache-size", rrset_cache_size)
 951         else O_DEC(opt, "rrset-cache-slabs", rrset_cache_slabs)
 952         else O_YNO(opt, "prefetch-key", prefetch_key)
 953         else O_YNO(opt, "prefetch", prefetch)
 954         else O_YNO(opt, "deny-any", deny_any)
 955         else O_DEC(opt, "cache-max-ttl", max_ttl)
 956         else O_DEC(opt, "cache-max-negative-ttl", max_negative_ttl)
 957         else O_DEC(opt, "cache-min-ttl", min_ttl)
 958         else O_DEC(opt, "infra-host-ttl", host_ttl)
 959         else O_DEC(opt, "infra-cache-slabs", infra_cache_slabs)
 960         else O_DEC(opt, "infra-cache-min-rtt", infra_cache_min_rtt)
 961         else O_MEM(opt, "infra-cache-numhosts", infra_cache_numhosts)
 962         else O_UNS(opt, "delay-close", delay_close)
 963         else O_YNO(opt, "do-ip4", do_ip4)
 964         else O_YNO(opt, "do-ip6", do_ip6)
 965         else O_YNO(opt, "do-udp", do_udp)
 966         else O_YNO(opt, "do-tcp", do_tcp)
 967         else O_YNO(opt, "prefer-ip4", prefer_ip4)
 968         else O_YNO(opt, "prefer-ip6", prefer_ip6)
 969         else O_YNO(opt, "tcp-upstream", tcp_upstream)
 970         else O_YNO(opt, "udp-upstream-without-downstream", udp_upstream_without_downstream)
 971         else O_DEC(opt, "tcp-mss", tcp_mss)
 972         else O_DEC(opt, "outgoing-tcp-mss", outgoing_tcp_mss)
 973         else O_DEC(opt, "tcp-idle-timeout", tcp_idle_timeout)
 974         else O_YNO(opt, "edns-tcp-keepalive", do_tcp_keepalive)
 975         else O_DEC(opt, "edns-tcp-keepalive-timeout", tcp_keepalive_timeout)
 976         else O_YNO(opt, "ssl-upstream", ssl_upstream)
 977         else O_STR(opt, "ssl-service-key", ssl_service_key)
 978         else O_STR(opt, "ssl-service-pem", ssl_service_pem)
 979         else O_DEC(opt, "ssl-port", ssl_port)
 980         else O_STR(opt, "tls-cert-bundle", tls_cert_bundle)
 981         else O_YNO(opt, "tls-win-cert", tls_win_cert)
 982         else O_LST(opt, "tls-additional-port", tls_additional_port)
 983         else O_LST(opt, "tls-session-ticket-keys", tls_session_ticket_keys.first)
 984         else O_STR(opt, "tls-ciphers", tls_ciphers)
 985         else O_STR(opt, "tls-ciphersuites", tls_ciphersuites)
 986         else O_YNO(opt, "tls-use-sni", tls_use_sni)
 987         else O_DEC(opt, "https-port", https_port)
 988         else O_STR(opt, "http-endpoint", http_endpoint)
 989         else O_UNS(opt, "http-max-streams", http_max_streams)
 990         else O_MEM(opt, "http-query-buffer-size", http_query_buffer_size)
 991         else O_MEM(opt, "http-response-buffer-size", http_response_buffer_size)
 992         else O_YNO(opt, "http-nodelay", http_nodelay)
 993         else O_YNO(opt, "use-systemd", use_systemd)
 994         else O_YNO(opt, "do-daemonize", do_daemonize)
 995         else O_STR(opt, "chroot", chrootdir)
 996         else O_STR(opt, "username", username)
 997         else O_STR(opt, "directory", directory)
 998         else O_STR(opt, "logfile", logfile)
 999         else O_YNO(opt, "log-queries", log_queries)
1000         else O_YNO(opt, "log-replies", log_replies)
1001         else O_YNO(opt, "log-tag-queryreply", log_tag_queryreply)
1002         else O_YNO(opt, "log-local-actions", log_local_actions)
1003         else O_YNO(opt, "log-servfail", log_servfail)
1004         else O_STR(opt, "pidfile", pidfile)
1005         else O_YNO(opt, "hide-identity", hide_identity)
1006         else O_YNO(opt, "hide-version", hide_version)
1007         else O_YNO(opt, "hide-trustanchor", hide_trustanchor)
1008         else O_STR(opt, "identity", identity)
1009         else O_STR(opt, "version", version)
1010         else O_STR(opt, "target-fetch-policy", target_fetch_policy)
1011         else O_YNO(opt, "harden-short-bufsize", harden_short_bufsize)
1012         else O_YNO(opt, "harden-large-queries", harden_large_queries)
1013         else O_YNO(opt, "harden-glue", harden_glue)
1014         else O_YNO(opt, "harden-dnssec-stripped", harden_dnssec_stripped)
1015         else O_YNO(opt, "harden-below-nxdomain", harden_below_nxdomain)
1016         else O_YNO(opt, "harden-referral-path", harden_referral_path)
1017         else O_YNO(opt, "harden-algo-downgrade", harden_algo_downgrade)
1018         else O_YNO(opt, "use-caps-for-id", use_caps_bits_for_id)
1019         else O_LST(opt, "caps-whitelist", caps_whitelist)
1020         else O_DEC(opt, "unwanted-reply-threshold", unwanted_threshold)
1021         else O_YNO(opt, "do-not-query-localhost", donotquery_localhost)
1022         else O_STR(opt, "module-config", module_conf)
1023         else O_DEC(opt, "val-bogus-ttl", bogus_ttl)
1024         else O_YNO(opt, "val-clean-additional", val_clean_additional)
1025         else O_DEC(opt, "val-log-level", val_log_level)
1026         else O_YNO(opt, "val-permissive-mode", val_permissive_mode)
1027         else O_YNO(opt, "aggressive-nsec", aggressive_nsec)
1028         else O_YNO(opt, "ignore-cd-flag", ignore_cd)
1029         else O_YNO(opt, "serve-expired", serve_expired)
1030         else O_DEC(opt, "serve-expired-ttl", serve_expired_ttl)
1031         else O_YNO(opt, "serve-expired-ttl-reset", serve_expired_ttl_reset)
1032         else O_DEC(opt, "serve-expired-reply-ttl", serve_expired_reply_ttl)
1033         else O_DEC(opt, "serve-expired-client-timeout", serve_expired_client_timeout)
1034         else O_STR(opt, "val-nsec3-keysize-iterations",val_nsec3_key_iterations)
1035         else O_UNS(opt, "add-holddown", add_holddown)
1036         else O_UNS(opt, "del-holddown", del_holddown)
1037         else O_UNS(opt, "keep-missing", keep_missing)
1038         else O_YNO(opt, "permit-small-holddown", permit_small_holddown)
1039         else O_MEM(opt, "key-cache-size", key_cache_size)
1040         else O_DEC(opt, "key-cache-slabs", key_cache_slabs)
1041         else O_MEM(opt, "neg-cache-size", neg_cache_size)
1042         else O_YNO(opt, "control-enable", remote_control_enable)
1043         else O_DEC(opt, "control-port", control_port)
1044         else O_STR(opt, "server-key-file", server_key_file)
1045         else O_STR(opt, "server-cert-file", server_cert_file)
1046         else O_STR(opt, "control-key-file", control_key_file)
1047         else O_STR(opt, "control-cert-file", control_cert_file)
1048         else O_LST(opt, "root-hints", root_hints)
1049         else O_LS2(opt, "access-control", acls)
1050         else O_LS2(opt, "tcp-connection-limit", tcp_connection_limits)
1051         else O_LST(opt, "do-not-query-address", donotqueryaddrs)
1052         else O_LST(opt, "private-address", private_address)
1053         else O_LST(opt, "private-domain", private_domain)
1054         else O_LST(opt, "auto-trust-anchor-file", auto_trust_anchor_file_list)
1055         else O_LST(opt, "trust-anchor-file", trust_anchor_file_list)
1056         else O_LST(opt, "trust-anchor", trust_anchor_list)
1057         else O_LST(opt, "trusted-keys-file", trusted_keys_file_list)
1058         else O_YNO(opt, "trust-anchor-signaling", trust_anchor_signaling)
1059         else O_YNO(opt, "root-key-sentinel", root_key_sentinel)
1060         else O_LST(opt, "control-interface", control_ifs.first)
1061         else O_LST(opt, "domain-insecure", domain_insecure)
1062         else O_UNS(opt, "val-override-date", val_date_override)
1063         else O_YNO(opt, "minimal-responses", minimal_responses)
1064         else O_YNO(opt, "rrset-roundrobin", rrset_roundrobin)
1065         else O_DEC(opt, "unknown-server-time-limit", unknown_server_time_limit)
1066 #ifdef CLIENT_SUBNET
1067         else O_LST(opt, "send-client-subnet", client_subnet)
1068         else O_LST(opt, "client-subnet-zone", client_subnet_zone)
1069         else O_DEC(opt, "max-client-subnet-ipv4", max_client_subnet_ipv4)
1070         else O_DEC(opt, "max-client-subnet-ipv6", max_client_subnet_ipv6)
1071         else O_DEC(opt, "min-client-subnet-ipv4", min_client_subnet_ipv4)
1072         else O_DEC(opt, "min-client-subnet-ipv6", min_client_subnet_ipv6)
1073         else O_DEC(opt, "max-ecs-tree-size-ipv4", max_ecs_tree_size_ipv4)
1074         else O_DEC(opt, "max-ecs-tree-size-ipv6", max_ecs_tree_size_ipv6)
1075         else O_YNO(opt, "client-subnet-always-forward:",
1076                 client_subnet_always_forward)
1077 #endif
1078 #ifdef USE_DNSTAP
1079         else O_YNO(opt, "dnstap-enable", dnstap)
1080         else O_YNO(opt, "dnstap-bidirectional", dnstap_bidirectional)
1081         else O_STR(opt, "dnstap-socket-path", dnstap_socket_path)
1082         else O_STR(opt, "dnstap-ip", dnstap_ip)
1083         else O_YNO(opt, "dnstap-tls", dnstap_tls)
1084         else O_STR(opt, "dnstap-tls-server-name", dnstap_tls_server_name)
1085         else O_STR(opt, "dnstap-tls-cert-bundle", dnstap_tls_cert_bundle)
1086         else O_STR(opt, "dnstap-tls-client-key-file",
1087                 dnstap_tls_client_key_file)
1088         else O_STR(opt, "dnstap-tls-client-cert-file",
1089                 dnstap_tls_client_cert_file)
1090         else O_YNO(opt, "dnstap-send-identity", dnstap_send_identity)
1091         else O_YNO(opt, "dnstap-send-version", dnstap_send_version)
1092         else O_STR(opt, "dnstap-identity", dnstap_identity)
1093         else O_STR(opt, "dnstap-version", dnstap_version)
1094         else O_YNO(opt, "dnstap-log-resolver-query-messages",
1095                 dnstap_log_resolver_query_messages)
1096         else O_YNO(opt, "dnstap-log-resolver-response-messages",
1097                 dnstap_log_resolver_response_messages)
1098         else O_YNO(opt, "dnstap-log-client-query-messages",
1099                 dnstap_log_client_query_messages)
1100         else O_YNO(opt, "dnstap-log-client-response-messages",
1101                 dnstap_log_client_response_messages)
1102         else O_YNO(opt, "dnstap-log-forwarder-query-messages",
1103                 dnstap_log_forwarder_query_messages)
1104         else O_YNO(opt, "dnstap-log-forwarder-response-messages",
1105                 dnstap_log_forwarder_response_messages)
1106 #endif
1107 #ifdef USE_DNSCRYPT
1108         else O_YNO(opt, "dnscrypt-enable", dnscrypt)
1109         else O_DEC(opt, "dnscrypt-port", dnscrypt_port)
1110         else O_STR(opt, "dnscrypt-provider", dnscrypt_provider)
1111         else O_LST(opt, "dnscrypt-provider-cert", dnscrypt_provider_cert)
1112         else O_LST(opt, "dnscrypt-provider-cert-rotated", dnscrypt_provider_cert_rotated)
1113         else O_LST(opt, "dnscrypt-secret-key", dnscrypt_secret_key)
1114         else O_MEM(opt, "dnscrypt-shared-secret-cache-size",
1115                 dnscrypt_shared_secret_cache_size)
1116         else O_DEC(opt, "dnscrypt-shared-secret-cache-slabs",
1117                 dnscrypt_shared_secret_cache_slabs)
1118         else O_MEM(opt, "dnscrypt-nonce-cache-size",
1119                 dnscrypt_nonce_cache_size)
1120         else O_DEC(opt, "dnscrypt-nonce-cache-slabs",
1121                 dnscrypt_nonce_cache_slabs)
1122 #endif
1123         else O_YNO(opt, "unblock-lan-zones", unblock_lan_zones)
1124         else O_YNO(opt, "insecure-lan-zones", insecure_lan_zones)
1125         else O_DEC(opt, "max-udp-size", max_udp_size)
1126         else O_LST(opt, "python-script", python_script)
1127         else O_LST(opt, "dynlib-file", dynlib_file)
1128         else O_YNO(opt, "disable-dnssec-lame-check", disable_dnssec_lame_check)
1129         else O_DEC(opt, "ip-ratelimit", ip_ratelimit)
1130         else O_DEC(opt, "ratelimit", ratelimit)
1131         else O_MEM(opt, "ip-ratelimit-size", ip_ratelimit_size)
1132         else O_MEM(opt, "ratelimit-size", ratelimit_size)
1133         else O_DEC(opt, "ip-ratelimit-slabs", ip_ratelimit_slabs)
1134         else O_DEC(opt, "ratelimit-slabs", ratelimit_slabs)
1135         else O_LS2(opt, "ratelimit-for-domain", ratelimit_for_domain)
1136         else O_LS2(opt, "ratelimit-below-domain", ratelimit_below_domain)
1137         else O_DEC(opt, "ip-ratelimit-factor", ip_ratelimit_factor)
1138         else O_DEC(opt, "ratelimit-factor", ratelimit_factor)
1139         else O_DEC(opt, "fast-server-num", fast_server_num)
1140         else O_DEC(opt, "fast-server-permil", fast_server_permil)
1141         else O_DEC(opt, "val-sig-skew-min", val_sig_skew_min)
1142         else O_DEC(opt, "val-sig-skew-max", val_sig_skew_max)
1143         else O_YNO(opt, "qname-minimisation", qname_minimisation)
1144         else O_YNO(opt, "qname-minimisation-strict", qname_minimisation_strict)
1145         else O_IFC(opt, "define-tag", num_tags, tagname)
1146         else O_LTG(opt, "local-zone-tag", local_zone_tags)
1147         else O_LTG(opt, "access-control-tag", acl_tags)
1148         else O_LTG(opt, "response-ip-tag", respip_tags)
1149         else O_LS3(opt, "local-zone-override", local_zone_overrides)
1150         else O_LS3(opt, "access-control-tag-action", acl_tag_actions)
1151         else O_LS3(opt, "access-control-tag-data", acl_tag_datas)
1152         else O_LS2(opt, "access-control-view", acl_view)
1153         else O_LS2(opt, "edns-client-tags", edns_client_tags)
1154 #ifdef USE_IPSECMOD
1155         else O_YNO(opt, "ipsecmod-enabled", ipsecmod_enabled)
1156         else O_YNO(opt, "ipsecmod-ignore-bogus", ipsecmod_ignore_bogus)
1157         else O_STR(opt, "ipsecmod-hook", ipsecmod_hook)
1158         else O_DEC(opt, "ipsecmod-max-ttl", ipsecmod_max_ttl)
1159         else O_LST(opt, "ipsecmod-whitelist", ipsecmod_whitelist)
1160         else O_YNO(opt, "ipsecmod-strict", ipsecmod_strict)
1161 #endif
1162 #ifdef USE_CACHEDB
1163         else O_STR(opt, "backend", cachedb_backend)
1164         else O_STR(opt, "secret-seed", cachedb_secret)
1165 #ifdef USE_REDIS
1166         else O_STR(opt, "redis-server-host", redis_server_host)
1167         else O_DEC(opt, "redis-server-port", redis_server_port)
1168         else O_DEC(opt, "redis-timeout", redis_timeout)
1169         else O_YNO(opt, "redis-expire-records", redis_expire_records)
1170 #endif  /* USE_REDIS */
1171 #endif  /* USE_CACHEDB */
1172 #ifdef USE_IPSET
1173         else O_STR(opt, "name-v4", ipset_name_v4)
1174         else O_STR(opt, "name-v6", ipset_name_v6)
1175 #endif
1176         /* not here:
1177          * outgoing-permit, outgoing-avoid - have list of ports
1178          * local-zone - zones and nodefault variables
1179          * local-data - see below
1180          * local-data-ptr - converted to local-data entries
1181          * stub-zone, name, stub-addr, stub-host, stub-prime
1182          * forward-zone, name, forward-addr, forward-host
1183          */
1184         else return 0;
1185         return 1;
1186 }
1187
1188 /** initialize the global cfg_parser object */
1189 static void
1190 create_cfg_parser(struct config_file* cfg, char* filename, const char* chroot)
1191 {
1192         static struct config_parser_state st;
1193         cfg_parser = &st;
1194         cfg_parser->filename = filename;
1195         cfg_parser->line = 1;
1196         cfg_parser->errors = 0;
1197         cfg_parser->cfg = cfg;
1198         cfg_parser->chroot = chroot;
1199         init_cfg_parse();
1200 }
1201
1202 int
1203 config_read(struct config_file* cfg, const char* filename, const char* chroot)
1204 {
1205         FILE *in;
1206         char *fname = (char*)filename;
1207 #ifdef HAVE_GLOB
1208         glob_t g;
1209         size_t i;
1210         int r, flags;
1211 #endif
1212         if(!fname)
1213                 return 1;
1214
1215         /* check for wildcards */
1216 #ifdef HAVE_GLOB
1217         if(!(!strchr(fname, '*') && !strchr(fname, '?') && !strchr(fname, '[') &&
1218                 !strchr(fname, '{') && !strchr(fname, '~'))) {
1219                 verbose(VERB_QUERY, "wildcard found, processing %s", fname);
1220                 flags = 0
1221 #ifdef GLOB_ERR
1222                         | GLOB_ERR
1223 #endif
1224 #ifdef GLOB_NOSORT
1225                         | GLOB_NOSORT
1226 #endif
1227 #ifdef GLOB_BRACE
1228                         | GLOB_BRACE
1229 #endif
1230 #ifdef GLOB_TILDE
1231                         | GLOB_TILDE
1232 #endif
1233                 ;
1234                 memset(&g, 0, sizeof(g));
1235                 r = glob(fname, flags, NULL, &g);
1236                 if(r) {
1237                         /* some error */
1238                         globfree(&g);
1239                         if(r == GLOB_NOMATCH) {
1240                                 verbose(VERB_QUERY, "include: "
1241                                 "no matches for %s", fname);
1242                                 return 1;
1243                         } else if(r == GLOB_NOSPACE) {
1244                                 log_err("include: %s: "
1245                                         "fnametern out of memory", fname);
1246                         } else if(r == GLOB_ABORTED) {
1247                                 log_err("wildcard include: %s: expansion "
1248                                         "aborted (%s)", fname, strerror(errno));
1249                         } else {
1250                                 log_err("wildcard include: %s: expansion "
1251                                         "failed (%s)", fname, strerror(errno));
1252                         }
1253                         /* ignore globs that yield no files */
1254                         return 1;
1255                 }
1256                 /* process files found, if any */
1257                 for(i=0; i<(size_t)g.gl_pathc; i++) {
1258                         if(!config_read(cfg, g.gl_pathv[i], chroot)) {
1259                                 log_err("error reading wildcard "
1260                                         "include: %s", g.gl_pathv[i]);
1261                                 globfree(&g);
1262                                 return 0;
1263                         }
1264                 }
1265                 globfree(&g);
1266                 return 1;
1267         }
1268 #endif /* HAVE_GLOB */
1269
1270         in = fopen(fname, "r");
1271         if(!in) {
1272                 log_err("Could not open %s: %s", fname, strerror(errno));
1273                 return 0;
1274         }
1275         create_cfg_parser(cfg, fname, chroot);
1276         ub_c_in = in;
1277         ub_c_parse();
1278         fclose(in);
1279
1280         if(!cfg->dnscrypt) cfg->dnscrypt_port = 0;
1281
1282         if(cfg_parser->errors != 0) {
1283                 fprintf(stderr, "read %s failed: %d errors in configuration file\n",
1284                         fname, cfg_parser->errors);
1285                 errno=EINVAL;
1286                 return 0;
1287         }
1288
1289         return 1;
1290 }
1291
1292 struct config_stub* cfg_stub_find(struct config_stub*** pp, const char* nm)
1293 {
1294         struct config_stub* p = *(*pp);
1295         while(p) {
1296                 if(strcmp(p->name, nm) == 0)
1297                         return p;
1298                 (*pp) = &p->next;
1299                 p = p->next;
1300         }
1301         return NULL;
1302 }
1303
1304 void
1305 config_delstrlist(struct config_strlist* p)
1306 {
1307         struct config_strlist *np;
1308         while(p) {
1309                 np = p->next;
1310                 free(p->str);
1311                 free(p);
1312                 p = np;
1313         }
1314 }
1315
1316 void
1317 config_deldblstrlist(struct config_str2list* p)
1318 {
1319         struct config_str2list *np;
1320         while(p) {
1321                 np = p->next;
1322                 free(p->str);
1323                 free(p->str2);
1324                 free(p);
1325                 p = np;
1326         }
1327 }
1328
1329 void
1330 config_deltrplstrlist(struct config_str3list* p)
1331 {
1332         struct config_str3list *np;
1333         while(p) {
1334                 np = p->next;
1335                 free(p->str);
1336                 free(p->str2);
1337                 free(p->str3);
1338                 free(p);
1339                 p = np;
1340         }
1341 }
1342
1343 void
1344 config_delauth(struct config_auth* p)
1345 {
1346         if(!p) return;
1347         free(p->name);
1348         config_delstrlist(p->masters);
1349         config_delstrlist(p->urls);
1350         config_delstrlist(p->allow_notify);
1351         free(p->zonefile);
1352         free(p->rpz_taglist);
1353         free(p->rpz_action_override);
1354         free(p->rpz_cname);
1355         free(p->rpz_log_name);
1356         free(p);
1357 }
1358
1359 void
1360 config_delauths(struct config_auth* p)
1361 {
1362         struct config_auth* np;
1363         while(p) {
1364                 np = p->next;
1365                 config_delauth(p);
1366                 p = np;
1367         }
1368 }
1369
1370 void
1371 config_delstub(struct config_stub* p)
1372 {
1373         if(!p) return;
1374         free(p->name);
1375         config_delstrlist(p->hosts);
1376         config_delstrlist(p->addrs);
1377         free(p);
1378 }
1379
1380 void
1381 config_delstubs(struct config_stub* p)
1382 {
1383         struct config_stub* np;
1384         while(p) {
1385                 np = p->next;
1386                 config_delstub(p);
1387                 p = np;
1388         }
1389 }
1390
1391 void
1392 config_delview(struct config_view* p)
1393 {
1394         if(!p) return;
1395         free(p->name);
1396         config_deldblstrlist(p->local_zones);
1397         config_delstrlist(p->local_zones_nodefault);
1398 #ifdef USE_IPSET
1399         config_delstrlist(p->local_zones_ipset);
1400 #endif
1401         config_delstrlist(p->local_data);
1402         free(p);
1403 }
1404
1405 void
1406 config_delviews(struct config_view* p)
1407 {
1408         struct config_view* np;
1409         while(p) {
1410                 np = p->next;
1411                 config_delview(p);
1412                 p = np;
1413         }
1414 }
1415
1416 void
1417 config_del_strarray(char** array, int num)
1418 {
1419         int i;
1420         if(!array)
1421                 return;
1422         for(i=0; i<num; i++) {
1423                 free(array[i]);
1424         }
1425         free(array);
1426 }
1427
1428 void
1429 config_del_strbytelist(struct config_strbytelist* p)
1430 {
1431         struct config_strbytelist* np;
1432         while(p) {
1433                 np = p->next;
1434                 free(p->str);
1435                 free(p->str2);
1436                 free(p);
1437                 p = np;
1438         }
1439 }
1440
1441 void
1442 config_delete(struct config_file* cfg)
1443 {
1444         if(!cfg) return;
1445         free(cfg->username);
1446         free(cfg->chrootdir);
1447         free(cfg->directory);
1448         free(cfg->logfile);
1449         free(cfg->pidfile);
1450         free(cfg->target_fetch_policy);
1451         free(cfg->ssl_service_key);
1452         free(cfg->ssl_service_pem);
1453         free(cfg->tls_cert_bundle);
1454         config_delstrlist(cfg->tls_additional_port);
1455         config_delstrlist(cfg->tls_session_ticket_keys.first);
1456         free(cfg->tls_ciphers);
1457         free(cfg->tls_ciphersuites);
1458         free(cfg->http_endpoint);
1459         if(cfg->log_identity) {
1460                 log_ident_revert_to_default();
1461                 free(cfg->log_identity);
1462         }
1463         config_del_strarray(cfg->ifs, cfg->num_ifs);
1464         config_del_strarray(cfg->out_ifs, cfg->num_out_ifs);
1465         config_delstubs(cfg->stubs);
1466         config_delstubs(cfg->forwards);
1467         config_delauths(cfg->auths);
1468         config_delviews(cfg->views);
1469         config_delstrlist(cfg->donotqueryaddrs);
1470         config_delstrlist(cfg->root_hints);
1471 #ifdef CLIENT_SUBNET
1472         config_delstrlist(cfg->client_subnet);
1473         config_delstrlist(cfg->client_subnet_zone);
1474 #endif
1475         free(cfg->identity);
1476         free(cfg->version);
1477         free(cfg->module_conf);
1478         free(cfg->outgoing_avail_ports);
1479         config_delstrlist(cfg->caps_whitelist);
1480         config_delstrlist(cfg->private_address);
1481         config_delstrlist(cfg->private_domain);
1482         config_delstrlist(cfg->auto_trust_anchor_file_list);
1483         config_delstrlist(cfg->trust_anchor_file_list);
1484         config_delstrlist(cfg->trusted_keys_file_list);
1485         config_delstrlist(cfg->trust_anchor_list);
1486         config_delstrlist(cfg->domain_insecure);
1487         config_deldblstrlist(cfg->acls);
1488         config_deldblstrlist(cfg->tcp_connection_limits);
1489         free(cfg->val_nsec3_key_iterations);
1490         config_deldblstrlist(cfg->local_zones);
1491         config_delstrlist(cfg->local_zones_nodefault);
1492 #ifdef USE_IPSET
1493         config_delstrlist(cfg->local_zones_ipset);
1494 #endif
1495         config_delstrlist(cfg->local_data);
1496         config_deltrplstrlist(cfg->local_zone_overrides);
1497         config_del_strarray(cfg->tagname, cfg->num_tags);
1498         config_del_strbytelist(cfg->local_zone_tags);
1499         config_del_strbytelist(cfg->acl_tags);
1500         config_del_strbytelist(cfg->respip_tags);
1501         config_deltrplstrlist(cfg->acl_tag_actions);
1502         config_deltrplstrlist(cfg->acl_tag_datas);
1503         config_delstrlist(cfg->control_ifs.first);
1504         free(cfg->server_key_file);
1505         free(cfg->server_cert_file);
1506         free(cfg->control_key_file);
1507         free(cfg->control_cert_file);
1508         free(cfg->dns64_prefix);
1509         config_delstrlist(cfg->dns64_ignore_aaaa);
1510         free(cfg->dnstap_socket_path);
1511         free(cfg->dnstap_ip);
1512         free(cfg->dnstap_tls_server_name);
1513         free(cfg->dnstap_tls_cert_bundle);
1514         free(cfg->dnstap_tls_client_key_file);
1515         free(cfg->dnstap_tls_client_cert_file);
1516         free(cfg->dnstap_identity);
1517         free(cfg->dnstap_version);
1518         config_deldblstrlist(cfg->ratelimit_for_domain);
1519         config_deldblstrlist(cfg->ratelimit_below_domain);
1520         config_delstrlist(cfg->python_script);
1521         config_delstrlist(cfg->dynlib_file);
1522         config_deldblstrlist(cfg->edns_client_tags);
1523 #ifdef USE_IPSECMOD
1524         free(cfg->ipsecmod_hook);
1525         config_delstrlist(cfg->ipsecmod_whitelist);
1526 #endif
1527 #ifdef USE_CACHEDB
1528         free(cfg->cachedb_backend);
1529         free(cfg->cachedb_secret);
1530 #ifdef USE_REDIS
1531         free(cfg->redis_server_host);
1532 #endif  /* USE_REDIS */
1533 #endif  /* USE_CACHEDB */
1534 #ifdef USE_IPSET
1535         free(cfg->ipset_name_v4);
1536         free(cfg->ipset_name_v6);
1537 #endif
1538         free(cfg);
1539 }
1540
1541 static void
1542 init_outgoing_availports(int* a, int num)
1543 {
1544         /* generated with make iana_update */
1545         const int iana_assigned[] = {
1546 #include "util/iana_ports.inc"
1547                 -1 }; /* end marker to put behind trailing comma */
1548
1549         int i;
1550         /* do not use <1024, that could be trouble with the system, privs */
1551         for(i=1024; i<num; i++) {
1552                 a[i] = i;
1553         }
1554         /* create empty spot at 49152 to keep ephemeral ports available
1555          * to other programs */
1556         for(i=49152; i<49152+256; i++)
1557                 a[i] = 0;
1558         /* pick out all the IANA assigned ports */
1559         for(i=0; iana_assigned[i]!=-1; i++) {
1560                 if(iana_assigned[i] < num)
1561                         a[iana_assigned[i]] = 0;
1562         }
1563 }
1564
1565 int
1566 cfg_mark_ports(const char* str, int allow, int* avail, int num)
1567 {
1568         char* mid = strchr(str, '-');
1569 #ifdef DISABLE_EXPLICIT_PORT_RANDOMISATION
1570         log_warn("Explicit port randomisation disabled, ignoring "
1571                 "outgoing-port-permit and outgoing-port-avoid configuration "
1572                 "options");
1573 #endif
1574         if(!mid) {
1575                 int port = atoi(str);
1576                 if(port == 0 && strcmp(str, "0") != 0) {
1577                         log_err("cannot parse port number '%s'", str);
1578                         return 0;
1579                 }
1580                 if(port < num)
1581                         avail[port] = (allow?port:0);
1582         } else {
1583                 int i, low, high = atoi(mid+1);
1584                 char buf[16];
1585                 if(high == 0 && strcmp(mid+1, "0") != 0) {
1586                         log_err("cannot parse port number '%s'", mid+1);
1587                         return 0;
1588                 }
1589                 if( (int)(mid-str)+1 >= (int)sizeof(buf) ) {
1590                         log_err("cannot parse port number '%s'", str);
1591                         return 0;
1592                 }
1593                 if(mid > str)
1594                         memcpy(buf, str, (size_t)(mid-str));
1595                 buf[mid-str] = 0;
1596                 low = atoi(buf);
1597                 if(low == 0 && strcmp(buf, "0") != 0) {
1598                         log_err("cannot parse port number '%s'", buf);
1599                         return 0;
1600                 }
1601                 for(i=low; i<=high; i++) {
1602                         if(i < num)
1603                                 avail[i] = (allow?i:0);
1604                 }
1605                 return 1;
1606         }
1607         return 1;
1608 }
1609
1610 int
1611 cfg_scan_ports(int* avail, int num)
1612 {
1613         int i;
1614         int count = 0;
1615         for(i=0; i<num; i++) {
1616                 if(avail[i])
1617                         count++;
1618         }
1619         return count;
1620 }
1621
1622 int cfg_condense_ports(struct config_file* cfg, int** avail)
1623 {
1624         int num = cfg_scan_ports(cfg->outgoing_avail_ports, 65536);
1625         int i, at = 0;
1626         *avail = NULL;
1627         if(num == 0)
1628                 return 0;
1629         *avail = (int*)reallocarray(NULL, (size_t)num, sizeof(int));
1630         if(!*avail)
1631                 return 0;
1632         for(i=0; i<65536; i++) {
1633                 if(cfg->outgoing_avail_ports[i])
1634                         (*avail)[at++] = cfg->outgoing_avail_ports[i];
1635         }
1636         log_assert(at == num);
1637         return num;
1638 }
1639
1640 /** print error with file and line number */
1641 static void ub_c_error_va_list(const char *fmt, va_list args)
1642 {
1643         cfg_parser->errors++;
1644         fprintf(stderr, "%s:%d: error: ", cfg_parser->filename,
1645         cfg_parser->line);
1646         vfprintf(stderr, fmt, args);
1647         fprintf(stderr, "\n");
1648 }
1649
1650 /** print error with file and line number */
1651 void ub_c_error_msg(const char* fmt, ...)
1652 {
1653         va_list args;
1654         va_start(args, fmt);
1655         ub_c_error_va_list(fmt, args);
1656         va_end(args);
1657 }
1658
1659 void ub_c_error(const char *str)
1660 {
1661         cfg_parser->errors++;
1662         fprintf(stderr, "%s:%d: error: %s\n", cfg_parser->filename,
1663                 cfg_parser->line, str);
1664 }
1665
1666 int ub_c_wrap(void)
1667 {
1668         return 1;
1669 }
1670
1671 int cfg_strlist_append(struct config_strlist_head* list, char* item)
1672 {
1673         struct config_strlist *s;
1674         if(!item || !list) {
1675                 free(item);
1676                 return 0;
1677         }
1678         s = (struct config_strlist*)calloc(1, sizeof(struct config_strlist));
1679         if(!s) {
1680                 free(item);
1681                 return 0;
1682         }
1683         s->str = item;
1684         s->next = NULL;
1685         if(list->last)
1686                 list->last->next = s;
1687         else
1688                 list->first = s;
1689         list->last = s;
1690         return 1;
1691 }
1692
1693 int
1694 cfg_region_strlist_insert(struct regional* region,
1695         struct config_strlist** head, char* item)
1696 {
1697         struct config_strlist *s;
1698         if(!item || !head)
1699                 return 0;
1700         s = (struct config_strlist*)regional_alloc_zero(region,
1701                 sizeof(struct config_strlist));
1702         if(!s)
1703                 return 0;
1704         s->str = item;
1705         s->next = *head;
1706         *head = s;
1707         return 1;
1708 }
1709
1710 struct config_strlist*
1711 cfg_strlist_find(struct config_strlist* head, const char *item)
1712 {
1713         struct config_strlist *s = head;
1714         if(!head){
1715                 return NULL;
1716         }
1717         while(s) {
1718                 if(strcmp(s->str, item) == 0) {
1719                         return s;
1720                 }
1721                 s = s->next;
1722         }
1723         return NULL;
1724 }
1725
1726 int
1727 cfg_strlist_insert(struct config_strlist** head, char* item)
1728 {
1729         struct config_strlist *s;
1730         if(!item || !head) {
1731                 free(item);
1732                 return 0;
1733         }
1734         s = (struct config_strlist*)calloc(1, sizeof(struct config_strlist));
1735         if(!s) {
1736                 free(item);
1737                 return 0;
1738         }
1739         s->str = item;
1740         s->next = *head;
1741         *head = s;
1742         return 1;
1743 }
1744
1745 int
1746 cfg_strlist_append_ex(struct config_strlist** head, char* item)
1747 {
1748         struct config_strlist *s;
1749         if(!item || !head)
1750                 return 0;
1751         s = (struct config_strlist*)calloc(1, sizeof(struct config_strlist));
1752         if(!s)
1753                 return 0;
1754         s->str = item;
1755         s->next = NULL;
1756
1757         if (*head==NULL) {
1758                 *head = s;
1759         } else {
1760                 struct config_strlist *last = *head;
1761                 while (last->next!=NULL) {
1762                     last = last->next;
1763                 }
1764                 last->next = s;
1765         }
1766
1767         return 1;
1768 }
1769
1770 int
1771 cfg_str2list_insert(struct config_str2list** head, char* item, char* i2)
1772 {
1773         struct config_str2list *s;
1774         if(!item || !i2 || !head) {
1775                 free(item);
1776                 free(i2);
1777                 return 0;
1778         }
1779         s = (struct config_str2list*)calloc(1, sizeof(struct config_str2list));
1780         if(!s) {
1781                 free(item);
1782                 free(i2);
1783                 return 0;
1784         }
1785         s->str = item;
1786         s->str2 = i2;
1787         s->next = *head;
1788         *head = s;
1789         return 1;
1790 }
1791
1792 int
1793 cfg_str3list_insert(struct config_str3list** head, char* item, char* i2,
1794         char* i3)
1795 {
1796         struct config_str3list *s;
1797         if(!item || !i2 || !i3 || !head)
1798                 return 0;
1799         s = (struct config_str3list*)calloc(1, sizeof(struct config_str3list));
1800         if(!s)
1801                 return 0;
1802         s->str = item;
1803         s->str2 = i2;
1804         s->str3 = i3;
1805         s->next = *head;
1806         *head = s;
1807         return 1;
1808 }
1809
1810 int
1811 cfg_strbytelist_insert(struct config_strbytelist** head, char* item,
1812         uint8_t* i2, size_t i2len)
1813 {
1814         struct config_strbytelist* s;
1815         if(!item || !i2 || !head)
1816                 return 0;
1817         s = (struct config_strbytelist*)calloc(1, sizeof(*s));
1818         if(!s)
1819                 return 0;
1820         s->str = item;
1821         s->str2 = i2;
1822         s->str2len = i2len;
1823         s->next = *head;
1824         *head = s;
1825         return 1;
1826 }
1827
1828 time_t
1829 cfg_convert_timeval(const char* str)
1830 {
1831         time_t t;
1832         struct tm tm;
1833         memset(&tm, 0, sizeof(tm));
1834         if(strlen(str) < 14)
1835                 return 0;
1836         if(sscanf(str, "%4d%2d%2d%2d%2d%2d", &tm.tm_year, &tm.tm_mon,
1837                 &tm.tm_mday, &tm.tm_hour, &tm.tm_min, &tm.tm_sec) != 6)
1838                 return 0;
1839         tm.tm_year -= 1900;
1840         tm.tm_mon--;
1841         /* Check values */
1842         if (tm.tm_year < 70)    return 0;
1843         if (tm.tm_mon < 0 || tm.tm_mon > 11)    return 0;
1844         if (tm.tm_mday < 1 || tm.tm_mday > 31)  return 0;
1845         if (tm.tm_hour < 0 || tm.tm_hour > 23)  return 0;
1846         if (tm.tm_min < 0 || tm.tm_min > 59)    return 0;
1847         if (tm.tm_sec < 0 || tm.tm_sec > 59)    return 0;
1848         /* call ldns conversion function */
1849         t = sldns_mktime_from_utc(&tm);
1850         return t;
1851 }
1852
1853 int
1854 cfg_count_numbers(const char* s)
1855 {
1856         /* format ::= (sp num)+ sp  */
1857         /* num ::= [-](0-9)+        */
1858         /* sp ::= (space|tab)*      */
1859         int num = 0;
1860         while(*s) {
1861                 while(*s && isspace((unsigned char)*s))
1862                         s++;
1863                 if(!*s) /* end of string */
1864                         break;
1865                 if(*s == '-')
1866                         s++;
1867                 if(!*s) /* only - not allowed */
1868                         return 0;
1869                 if(!isdigit((unsigned char)*s)) /* bad character */
1870                         return 0;
1871                 while(*s && isdigit((unsigned char)*s))
1872                         s++;
1873                 num++;
1874         }
1875         return num;
1876 }
1877
1878 /** all digit number */
1879 static int isalldigit(const char* str, size_t l)
1880 {
1881         size_t i;
1882         for(i=0; i<l; i++)
1883                 if(!isdigit((unsigned char)str[i]))
1884                         return 0;
1885         return 1;
1886 }
1887
1888 int
1889 cfg_parse_memsize(const char* str, size_t* res)
1890 {
1891         size_t len;
1892         size_t mult = 1;
1893         if(!str || (len=(size_t)strlen(str)) == 0) {
1894                 log_err("not a size: '%s'", str);
1895                 return 0;
1896         }
1897         if(isalldigit(str, len)) {
1898                 *res = (size_t)atol(str);
1899                 return 1;
1900         }
1901         /* check appended num */
1902         while(len>0 && str[len-1]==' ')
1903                 len--;
1904         if(len > 1 && str[len-1] == 'b')
1905                 len--;
1906         else if(len > 1 && str[len-1] == 'B')
1907                 len--;
1908
1909         if(len > 1 && tolower((unsigned char)str[len-1]) == 'g')
1910                 mult = 1024*1024*1024;
1911         else if(len > 1 && tolower((unsigned char)str[len-1]) == 'm')
1912                 mult = 1024*1024;
1913         else if(len > 1 && tolower((unsigned char)str[len-1]) == 'k')
1914                 mult = 1024;
1915         else if(len > 0 && isdigit((unsigned char)str[len-1]))
1916                 mult = 1;
1917         else {
1918                 log_err("unknown size specifier: '%s'", str);
1919                 return 0;
1920         }
1921         while(len>1 && str[len-2]==' ')
1922                 len--;
1923
1924         if(!isalldigit(str, len-1)) {
1925                 log_err("unknown size specifier: '%s'", str);
1926                 return 0;
1927         }
1928         *res = ((size_t)atol(str)) * mult;
1929         return 1;
1930 }
1931
1932 int
1933 find_tag_id(struct config_file* cfg, const char* tag)
1934 {
1935         int i;
1936         for(i=0; i<cfg->num_tags; i++) {
1937                 if(strcmp(cfg->tagname[i], tag) == 0)
1938                         return i;
1939         }
1940         return -1;
1941 }
1942
1943 int
1944 config_add_tag(struct config_file* cfg, const char* tag)
1945 {
1946         char** newarray;
1947         char* newtag;
1948         if(find_tag_id(cfg, tag) != -1)
1949                 return 1; /* nothing to do */
1950         newarray = (char**)malloc(sizeof(char*)*(cfg->num_tags+1));
1951         if(!newarray)
1952                 return 0;
1953         newtag = strdup(tag);
1954         if(!newtag) {
1955                 free(newarray);
1956                 return 0;
1957         }
1958         if(cfg->tagname) {
1959                 memcpy(newarray, cfg->tagname, sizeof(char*)*cfg->num_tags);
1960                 free(cfg->tagname);
1961         }
1962         newarray[cfg->num_tags++] = newtag;
1963         cfg->tagname = newarray;
1964         return 1;
1965 }
1966
1967 /** set a bit in a bit array */
1968 static void
1969 cfg_set_bit(uint8_t* bitlist, size_t len, int id)
1970 {
1971         int pos = id/8;
1972         log_assert((size_t)pos < len);
1973         (void)len;
1974         bitlist[pos] |= 1<<(id%8);
1975 }
1976
1977 uint8_t* config_parse_taglist(struct config_file* cfg, char* str,
1978         size_t* listlen)
1979 {
1980         uint8_t* taglist = NULL;
1981         size_t len = 0;
1982         char* p, *s;
1983
1984         /* allocate */
1985         if(cfg->num_tags == 0) {
1986                 log_err("parse taglist, but no tags defined");
1987                 return 0;
1988         }
1989         len = (size_t)(cfg->num_tags+7)/8;
1990         taglist = calloc(1, len);
1991         if(!taglist) {
1992                 log_err("out of memory");
1993                 return 0;
1994         }
1995
1996         /* parse */
1997         s = str;
1998         while((p=strsep(&s, " \t\n")) != NULL) {
1999                 if(*p) {
2000                         int id = find_tag_id(cfg, p);
2001                         /* set this bit in the bitlist */
2002                         if(id == -1) {
2003                                 log_err("unknown tag: %s", p);
2004                                 free(taglist);
2005                                 return 0;
2006                         }
2007                         cfg_set_bit(taglist, len, id);
2008                 }
2009         }
2010
2011         *listlen = len;
2012         return taglist;
2013 }
2014
2015 char* config_taglist2str(struct config_file* cfg, uint8_t* taglist,
2016         size_t taglen)
2017 {
2018         char buf[10240];
2019         size_t i, j, len = 0;
2020         buf[0] = 0;
2021         for(i=0; i<taglen; i++) {
2022                 if(taglist[i] == 0)
2023                         continue;
2024                 for(j=0; j<8; j++) {
2025                         if((taglist[i] & (1<<j)) != 0) {
2026                                 size_t id = i*8 + j;
2027                                 snprintf(buf+len, sizeof(buf)-len, "%s%s",
2028                                         (len==0?"":" "), cfg->tagname[id]);
2029                                 len += strlen(buf+len);
2030                         }
2031                 }
2032         }
2033         return strdup(buf);
2034 }
2035
2036 int taglist_intersect(uint8_t* list1, size_t list1len, const uint8_t* list2,
2037         size_t list2len)
2038 {
2039         size_t i;
2040         if(!list1 || !list2)
2041                 return 0;
2042         for(i=0; i<list1len && i<list2len; i++) {
2043                 if((list1[i] & list2[i]) != 0)
2044                         return 1;
2045         }
2046         return 0;
2047 }
2048
2049 void
2050 config_apply(struct config_file* config)
2051 {
2052         MAX_TTL = (time_t)config->max_ttl;
2053         MIN_TTL = (time_t)config->min_ttl;
2054         SERVE_EXPIRED = config->serve_expired;
2055         SERVE_EXPIRED_TTL = (time_t)config->serve_expired_ttl;
2056         SERVE_EXPIRED_REPLY_TTL = (time_t)config->serve_expired_reply_ttl;
2057         MAX_NEG_TTL = (time_t)config->max_negative_ttl;
2058         RTT_MIN_TIMEOUT = config->infra_cache_min_rtt;
2059         EDNS_ADVERTISED_SIZE = (uint16_t)config->edns_buffer_size;
2060         MINIMAL_RESPONSES = config->minimal_responses;
2061         RRSET_ROUNDROBIN = config->rrset_roundrobin;
2062         LOG_TAG_QUERYREPLY = config->log_tag_queryreply;
2063         UNKNOWN_SERVER_NICENESS = config->unknown_server_time_limit;
2064         log_set_time_asc(config->log_time_ascii);
2065         autr_permit_small_holddown = config->permit_small_holddown;
2066         stream_wait_max = config->stream_wait_size;
2067         http2_query_buffer_max = config->http_query_buffer_size;
2068         http2_response_buffer_max = config->http_response_buffer_size;
2069 }
2070
2071 void config_lookup_uid(struct config_file* cfg)
2072 {
2073 #ifdef HAVE_GETPWNAM
2074         /* translate username into uid and gid */
2075         if(cfg->username && cfg->username[0]) {
2076                 struct passwd *pwd;
2077                 if((pwd = getpwnam(cfg->username)) != NULL) {
2078                         cfg_uid = pwd->pw_uid;
2079                         cfg_gid = pwd->pw_gid;
2080                 }
2081         }
2082 #else
2083         (void)cfg;
2084 #endif
2085 }
2086
2087 /**
2088  * Calculate string length of full pathname in original filesys
2089  * @param fname: the path name to convert.
2090  *      Must not be null or empty.
2091  * @param cfg: config struct for chroot and chdir (if set).
2092  * @param use_chdir: if false, only chroot is applied.
2093  * @return length of string.
2094  *      remember to allocate one more for 0 at end in mallocs.
2095  */
2096 static size_t
2097 strlen_after_chroot(const char* fname, struct config_file* cfg, int use_chdir)
2098 {
2099         size_t len = 0;
2100         int slashit = 0;
2101         if(cfg->chrootdir && cfg->chrootdir[0] &&
2102                 strncmp(cfg->chrootdir, fname, strlen(cfg->chrootdir)) == 0) {
2103                 /* already full pathname, return it */
2104                 return strlen(fname);
2105         }
2106         /* chroot */
2107         if(cfg->chrootdir && cfg->chrootdir[0]) {
2108                 /* start with chrootdir */
2109                 len += strlen(cfg->chrootdir);
2110                 slashit = 1;
2111         }
2112         /* chdir */
2113 #ifdef UB_ON_WINDOWS
2114         if(fname[0] != 0 && fname[1] == ':') {
2115                 /* full path, no chdir */
2116         } else
2117 #endif
2118         if(fname[0] == '/' || !use_chdir) {
2119                 /* full path, no chdir */
2120         } else if(cfg->directory && cfg->directory[0]) {
2121                 /* prepend chdir */
2122                 if(slashit && cfg->directory[0] != '/')
2123                         len++;
2124                 if(cfg->chrootdir && cfg->chrootdir[0] &&
2125                         strncmp(cfg->chrootdir, cfg->directory,
2126                         strlen(cfg->chrootdir)) == 0)
2127                         len += strlen(cfg->directory)-strlen(cfg->chrootdir);
2128                 else    len += strlen(cfg->directory);
2129                 slashit = 1;
2130         }
2131         /* fname */
2132         if(slashit && fname[0] != '/')
2133                 len++;
2134         len += strlen(fname);
2135         return len;
2136 }
2137
2138 char*
2139 fname_after_chroot(const char* fname, struct config_file* cfg, int use_chdir)
2140 {
2141         size_t len = strlen_after_chroot(fname, cfg, use_chdir)+1;
2142         int slashit = 0;
2143         char* buf = (char*)malloc(len);
2144         if(!buf)
2145                 return NULL;
2146         buf[0] = 0;
2147         /* is fname already in chroot ? */
2148         if(cfg->chrootdir && cfg->chrootdir[0] &&
2149                 strncmp(cfg->chrootdir, fname, strlen(cfg->chrootdir)) == 0) {
2150                 /* already full pathname, return it */
2151                 (void)strlcpy(buf, fname, len);
2152                 buf[len-1] = 0;
2153                 return buf;
2154         }
2155         /* chroot */
2156         if(cfg->chrootdir && cfg->chrootdir[0]) {
2157                 /* start with chrootdir */
2158                 (void)strlcpy(buf, cfg->chrootdir, len);
2159                 slashit = 1;
2160         }
2161 #ifdef UB_ON_WINDOWS
2162         if(fname[0] != 0 && fname[1] == ':') {
2163                 /* full path, no chdir */
2164         } else
2165 #endif
2166         /* chdir */
2167         if(fname[0] == '/' || !use_chdir) {
2168                 /* full path, no chdir */
2169         } else if(cfg->directory && cfg->directory[0]) {
2170                 /* prepend chdir */
2171                 if(slashit && cfg->directory[0] != '/')
2172                         (void)strlcat(buf, "/", len);
2173                 /* is the directory already in the chroot? */
2174                 if(cfg->chrootdir && cfg->chrootdir[0] &&
2175                         strncmp(cfg->chrootdir, cfg->directory,
2176                         strlen(cfg->chrootdir)) == 0)
2177                         (void)strlcat(buf, cfg->directory+strlen(cfg->chrootdir),
2178                                    len);
2179                 else (void)strlcat(buf, cfg->directory, len);
2180                 slashit = 1;
2181         }
2182         /* fname */
2183         if(slashit && fname[0] != '/')
2184                 (void)strlcat(buf, "/", len);
2185         (void)strlcat(buf, fname, len);
2186         buf[len-1] = 0;
2187         return buf;
2188 }
2189
2190 /** return next space character in string */
2191 static char* next_space_pos(const char* str)
2192 {
2193         char* sp = strchr(str, ' ');
2194         char* tab = strchr(str, '\t');
2195         if(!tab && !sp)
2196                 return NULL;
2197         if(!sp) return tab;
2198         if(!tab) return sp;
2199         return (sp<tab)?sp:tab;
2200 }
2201
2202 /** return last space character in string */
2203 static char* last_space_pos(const char* str)
2204 {
2205         char* sp = strrchr(str, ' ');
2206         char* tab = strrchr(str, '\t');
2207         if(!tab && !sp)
2208                 return NULL;
2209         if(!sp) return tab;
2210         if(!tab) return sp;
2211         return (sp>tab)?sp:tab;
2212 }
2213
2214 int
2215 cfg_parse_local_zone(struct config_file* cfg, const char* val)
2216 {
2217         const char *type, *name_end, *name;
2218         char buf[256];
2219
2220         /* parse it as: [zone_name] [between stuff] [zone_type] */
2221         name = val;
2222         while(*name && isspace((unsigned char)*name))
2223                 name++;
2224         if(!*name) {
2225                 log_err("syntax error: too short: %s", val);
2226                 return 0;
2227         }
2228         name_end = next_space_pos(name);
2229         if(!name_end || !*name_end) {
2230                 log_err("syntax error: expected zone type: %s", val);
2231                 return 0;
2232         }
2233         if (name_end - name > 255) {
2234                 log_err("syntax error: bad zone name: %s", val);
2235                 return 0;
2236         }
2237         (void)strlcpy(buf, name, sizeof(buf));
2238         buf[name_end-name] = '\0';
2239
2240         type = last_space_pos(name_end);
2241         while(type && *type && isspace((unsigned char)*type))
2242                 type++;
2243         if(!type || !*type) {
2244                 log_err("syntax error: expected zone type: %s", val);
2245                 return 0;
2246         }
2247
2248         if(strcmp(type, "nodefault")==0) {
2249                 return cfg_strlist_insert(&cfg->local_zones_nodefault,
2250                         strdup(name));
2251 #ifdef USE_IPSET
2252         } else if(strcmp(type, "ipset")==0) {
2253                 return cfg_strlist_insert(&cfg->local_zones_ipset,
2254                         strdup(name));
2255 #endif
2256         } else {
2257                 return cfg_str2list_insert(&cfg->local_zones, strdup(buf),
2258                         strdup(type));
2259         }
2260 }
2261
2262 char* cfg_ptr_reverse(char* str)
2263 {
2264         char* ip, *ip_end;
2265         char* name;
2266         char* result;
2267         char buf[1024];
2268         struct sockaddr_storage addr;
2269         socklen_t addrlen;
2270
2271         /* parse it as: [IP] [between stuff] [name] */
2272         ip = str;
2273         while(*ip && isspace((unsigned char)*ip))
2274                 ip++;
2275         if(!*ip) {
2276                 log_err("syntax error: too short: %s", str);
2277                 return NULL;
2278         }
2279         ip_end = next_space_pos(ip);
2280         if(!ip_end || !*ip_end) {
2281                 log_err("syntax error: expected name: %s", str);
2282                 return NULL;
2283         }
2284
2285         name = last_space_pos(ip_end);
2286         if(!name || !*name) {
2287                 log_err("syntax error: expected name: %s", str);
2288                 return NULL;
2289         }
2290
2291         sscanf(ip, "%100s", buf);
2292         buf[sizeof(buf)-1]=0;
2293
2294         if(!ipstrtoaddr(buf, UNBOUND_DNS_PORT, &addr, &addrlen)) {
2295                 log_err("syntax error: cannot parse address: %s", str);
2296                 return NULL;
2297         }
2298
2299         /* reverse IPv4:
2300          * ddd.ddd.ddd.ddd.in-addr-arpa.
2301          * IPv6: (h.){32}.ip6.arpa.  */
2302
2303         if(addr_is_ip6(&addr, addrlen)) {
2304                 uint8_t ad[16];
2305                 const char* hex = "0123456789abcdef";
2306                 char *p = buf;
2307                 int i;
2308                 memmove(ad, &((struct sockaddr_in6*)&addr)->sin6_addr,
2309                         sizeof(ad));
2310                 for(i=15; i>=0; i--) {
2311                         uint8_t b = ad[i];
2312                         *p++ = hex[ (b&0x0f) ];
2313                         *p++ = '.';
2314                         *p++ = hex[ (b&0xf0) >> 4 ];
2315                         *p++ = '.';
2316                 }
2317                 snprintf(buf+16*4, sizeof(buf)-16*4, "ip6.arpa. ");
2318         } else {
2319                 uint8_t ad[4];
2320                 memmove(ad, &((struct sockaddr_in*)&addr)->sin_addr,
2321                         sizeof(ad));
2322                 snprintf(buf, sizeof(buf), "%u.%u.%u.%u.in-addr.arpa. ",
2323                         (unsigned)ad[3], (unsigned)ad[2],
2324                         (unsigned)ad[1], (unsigned)ad[0]);
2325         }
2326
2327         /* printed the reverse address, now the between goop and name on end */
2328         while(*ip_end && isspace((unsigned char)*ip_end))
2329                 ip_end++;
2330         if(name>ip_end) {
2331                 snprintf(buf+strlen(buf), sizeof(buf)-strlen(buf), "%.*s",
2332                         (int)(name-ip_end), ip_end);
2333         }
2334         snprintf(buf+strlen(buf), sizeof(buf)-strlen(buf), " PTR %s", name);
2335
2336         result = strdup(buf);
2337         if(!result) {
2338                 log_err("out of memory parsing %s", str);
2339                 return NULL;
2340         }
2341         return result;
2342 }
2343
2344 #ifdef UB_ON_WINDOWS
2345 char*
2346 w_lookup_reg_str(const char* key, const char* name)
2347 {
2348         HKEY hk = NULL;
2349         DWORD type = 0;
2350         BYTE buf[1024];
2351         DWORD len = (DWORD)sizeof(buf);
2352         LONG ret;
2353         char* result = NULL;
2354         ret = RegOpenKeyEx(HKEY_LOCAL_MACHINE, key, 0, KEY_READ, &hk);
2355         if(ret == ERROR_FILE_NOT_FOUND)
2356                 return NULL; /* key does not exist */
2357         else if(ret != ERROR_SUCCESS) {
2358                 log_err("RegOpenKeyEx failed");
2359                 return NULL;
2360         }
2361         ret = RegQueryValueEx(hk, (LPCTSTR)name, 0, &type, buf, &len);
2362         if(RegCloseKey(hk))
2363                 log_err("RegCloseKey");
2364         if(ret == ERROR_FILE_NOT_FOUND)
2365                 return NULL; /* name does not exist */
2366         else if(ret != ERROR_SUCCESS) {
2367                 log_err("RegQueryValueEx failed");
2368                 return NULL;
2369         }
2370         if(type == REG_SZ || type == REG_MULTI_SZ || type == REG_EXPAND_SZ) {
2371                 buf[sizeof(buf)-1] = 0;
2372                 buf[sizeof(buf)-2] = 0; /* for multi_sz */
2373                 result = strdup((char*)buf);
2374                 if(!result) log_err("out of memory");
2375         }
2376         return result;
2377 }
2378
2379 void w_config_adjust_directory(struct config_file* cfg)
2380 {
2381         if(cfg->directory && cfg->directory[0]) {
2382                 TCHAR dirbuf[2*MAX_PATH+4];
2383                 if(strcmp(cfg->directory, "%EXECUTABLE%") == 0) {
2384                         /* get executable path, and if that contains
2385                          * directories, snip off the filename part */
2386                         dirbuf[0] = 0;
2387                         if(!GetModuleFileName(NULL, dirbuf, MAX_PATH))
2388                                 log_err("could not GetModuleFileName");
2389                         if(strrchr(dirbuf, '\\')) {
2390                                 (strrchr(dirbuf, '\\'))[0] = 0;
2391                         } else log_err("GetModuleFileName had no path");
2392                         if(dirbuf[0]) {
2393                                 /* adjust directory for later lookups to work*/
2394                                 free(cfg->directory);
2395                                 cfg->directory = memdup(dirbuf, strlen(dirbuf)+1);
2396                         }
2397                 }
2398         }
2399 }
2400 #endif /* UB_ON_WINDOWS */
2401
2402 void errinf(struct module_qstate* qstate, const char* str)
2403 {
2404         struct config_strlist* p;
2405         if((qstate->env->cfg->val_log_level < 2 && !qstate->env->cfg->log_servfail) || !str)
2406                 return;
2407         p = (struct config_strlist*)regional_alloc(qstate->region, sizeof(*p));
2408         if(!p) {
2409                 log_err("malloc failure in validator-error-info string");
2410                 return;
2411         }
2412         p->next = NULL;
2413         p->str = regional_strdup(qstate->region, str);
2414         if(!p->str) {
2415                 log_err("malloc failure in validator-error-info string");
2416                 return;
2417         }
2418         /* add at end */
2419         if(qstate->errinf) {
2420                 struct config_strlist* q = qstate->errinf;
2421                 while(q->next)
2422                         q = q->next;
2423                 q->next = p;
2424         } else  qstate->errinf = p;
2425 }
2426
2427 void errinf_origin(struct module_qstate* qstate, struct sock_list *origin)
2428 {
2429         struct sock_list* p;
2430         if(qstate->env->cfg->val_log_level < 2 && !qstate->env->cfg->log_servfail)
2431                 return;
2432         for(p=origin; p; p=p->next) {
2433                 char buf[256];
2434                 if(p == origin)
2435                         snprintf(buf, sizeof(buf), "from ");
2436                 else    snprintf(buf, sizeof(buf), "and ");
2437                 if(p->len == 0)
2438                         snprintf(buf+strlen(buf), sizeof(buf)-strlen(buf),
2439                                 "cache");
2440                 else
2441                         addr_to_str(&p->addr, p->len, buf+strlen(buf),
2442                                 sizeof(buf)-strlen(buf));
2443                 errinf(qstate, buf);
2444         }
2445 }
2446
2447 char* errinf_to_str_bogus(struct module_qstate* qstate)
2448 {
2449         char buf[20480];
2450         char* p = buf;
2451         size_t left = sizeof(buf);
2452         struct config_strlist* s;
2453         char dname[LDNS_MAX_DOMAINLEN+1];
2454         char t[16], c[16];
2455         sldns_wire2str_type_buf(qstate->qinfo.qtype, t, sizeof(t));
2456         sldns_wire2str_class_buf(qstate->qinfo.qclass, c, sizeof(c));
2457         dname_str(qstate->qinfo.qname, dname);
2458         snprintf(p, left, "validation failure <%s %s %s>:", dname, t, c);
2459         left -= strlen(p); p += strlen(p);
2460         if(!qstate->errinf)
2461                 snprintf(p, left, " misc failure");
2462         else for(s=qstate->errinf; s; s=s->next) {
2463                 snprintf(p, left, " %s", s->str);
2464                 left -= strlen(p); p += strlen(p);
2465         }
2466         p = strdup(buf);
2467         if(!p)
2468                 log_err("malloc failure in errinf_to_str");
2469         return p;
2470 }
2471
2472 char* errinf_to_str_servfail(struct module_qstate* qstate)
2473 {
2474         char buf[20480];
2475         char* p = buf;
2476         size_t left = sizeof(buf);
2477         struct config_strlist* s;
2478         char dname[LDNS_MAX_DOMAINLEN+1];
2479         char t[16], c[16];
2480         sldns_wire2str_type_buf(qstate->qinfo.qtype, t, sizeof(t));
2481         sldns_wire2str_class_buf(qstate->qinfo.qclass, c, sizeof(c));
2482         dname_str(qstate->qinfo.qname, dname);
2483         snprintf(p, left, "SERVFAIL <%s %s %s>:", dname, t, c);
2484         left -= strlen(p); p += strlen(p);
2485         if(!qstate->errinf)
2486                 snprintf(p, left, " misc failure");
2487         else for(s=qstate->errinf; s; s=s->next) {
2488                 snprintf(p, left, " %s", s->str);
2489                 left -= strlen(p); p += strlen(p);
2490         }
2491         p = strdup(buf);
2492         if(!p)
2493                 log_err("malloc failure in errinf_to_str");
2494         return p;
2495 }
2496
2497 void errinf_rrset(struct module_qstate* qstate, struct ub_packed_rrset_key *rr)
2498 {
2499         char buf[1024];
2500         char dname[LDNS_MAX_DOMAINLEN+1];
2501         char t[16], c[16];
2502         if((qstate->env->cfg->val_log_level < 2 && !qstate->env->cfg->log_servfail) || !rr)
2503                 return;
2504         sldns_wire2str_type_buf(ntohs(rr->rk.type), t, sizeof(t));
2505         sldns_wire2str_class_buf(ntohs(rr->rk.rrset_class), c, sizeof(c));
2506         dname_str(rr->rk.dname, dname);
2507         snprintf(buf, sizeof(buf), "for <%s %s %s>", dname, t, c);
2508         errinf(qstate, buf);
2509 }
2510
2511 void errinf_dname(struct module_qstate* qstate, const char* str, uint8_t* dname)
2512 {
2513         char b[1024];
2514         char buf[LDNS_MAX_DOMAINLEN+1];
2515         if((qstate->env->cfg->val_log_level < 2 && !qstate->env->cfg->log_servfail) || !str || !dname)
2516                 return;
2517         dname_str(dname, buf);
2518         snprintf(b, sizeof(b), "%s %s", str, buf);
2519         errinf(qstate, b);
2520 }
2521
2522 int options_remote_is_address(struct config_file* cfg)
2523 {
2524         if(!cfg->remote_control_enable) return 0;
2525         if(!cfg->control_ifs.first) return 1;
2526         if(!cfg->control_ifs.first->str) return 1;
2527         if(cfg->control_ifs.first->str[0] == 0) return 1;
2528         return (cfg->control_ifs.first->str[0] != '/');
2529 }
2530