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 LIMITED 25 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 26 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE 27 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 28 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 29 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 30 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 31 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 32 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 33 * POSSIBILITY OF SUCH DAMAGE. 34 */ 35 36 /** 37 * \file 38 * 39 * This file contains functions for the config file. 40 */ 41 42 #include "config.h" 43 #include <ctype.h> 44 #include <ldns/ldns.h> 45 #include "util/log.h" 46 47 #include "util/configyyrename.h" 48 #include "util/config_file.h" 49 #include "util/configparser.h" 50 #include "util/net_help.h" 51 #include "util/data/msgparse.h" 52 #include "util/module.h" 53 #include "util/regional.h" 54 #include "util/fptr_wlist.h" 55 #include "util/data/dname.h" 56 #ifdef HAVE_GLOB_H 57 # include <glob.h> 58 #endif 59 60 /** global config during parsing */ 61 struct config_parser_state* cfg_parser = 0; 62 63 /** init ports possible for use */ 64 static void init_outgoing_availports(int* array, int num); 65 66 struct config_file* 67 config_create(void) 68 { 69 struct config_file* cfg; 70 cfg = (struct config_file*)calloc(1, sizeof(struct config_file)); 71 if(!cfg) 72 return NULL; 73 /* the defaults if no config is present */ 74 cfg->verbosity = 1; 75 cfg->stat_interval = 0; 76 cfg->stat_cumulative = 0; 77 cfg->stat_extended = 0; 78 cfg->num_threads = 1; 79 cfg->port = UNBOUND_DNS_PORT; 80 cfg->do_ip4 = 1; 81 cfg->do_ip6 = 1; 82 cfg->do_udp = 1; 83 cfg->do_tcp = 1; 84 cfg->tcp_upstream = 0; 85 cfg->ssl_service_key = NULL; 86 cfg->ssl_service_pem = NULL; 87 cfg->ssl_port = 443; 88 cfg->ssl_upstream = 0; 89 cfg->use_syslog = 1; 90 cfg->log_time_ascii = 0; 91 cfg->log_queries = 0; 92 #ifndef USE_WINSOCK 93 # ifdef USE_MINI_EVENT 94 /* select max 1024 sockets */ 95 cfg->outgoing_num_ports = 960; 96 cfg->num_queries_per_thread = 512; 97 # else 98 /* libevent can use many sockets */ 99 cfg->outgoing_num_ports = 4096; 100 cfg->num_queries_per_thread = 1024; 101 # endif 102 cfg->outgoing_num_tcp = 10; 103 cfg->incoming_num_tcp = 10; 104 #else 105 cfg->outgoing_num_ports = 48; /* windows is limited in num fds */ 106 cfg->num_queries_per_thread = 24; 107 cfg->outgoing_num_tcp = 2; /* leaves 64-52=12 for: 4if,1stop,thread4 */ 108 cfg->incoming_num_tcp = 2; 109 #endif 110 cfg->edns_buffer_size = 4096; /* 4k from rfc recommendation */ 111 cfg->msg_buffer_size = 65552; /* 64 k + a small margin */ 112 cfg->msg_cache_size = 4 * 1024 * 1024; 113 cfg->msg_cache_slabs = 4; 114 cfg->jostle_time = 200; 115 cfg->rrset_cache_size = 4 * 1024 * 1024; 116 cfg->rrset_cache_slabs = 4; 117 cfg->host_ttl = 900; 118 cfg->bogus_ttl = 60; 119 cfg->min_ttl = 0; 120 cfg->max_ttl = 3600 * 24; 121 cfg->prefetch = 0; 122 cfg->prefetch_key = 0; 123 cfg->infra_cache_slabs = 4; 124 cfg->infra_cache_numhosts = 10000; 125 if(!(cfg->outgoing_avail_ports = (int*)calloc(65536, sizeof(int)))) 126 goto error_exit; 127 init_outgoing_availports(cfg->outgoing_avail_ports, 65536); 128 if(!(cfg->username = strdup(UB_USERNAME))) goto error_exit; 129 #ifdef HAVE_CHROOT 130 if(!(cfg->chrootdir = strdup(CHROOT_DIR))) goto error_exit; 131 #endif 132 if(!(cfg->directory = strdup(RUN_DIR))) goto error_exit; 133 if(!(cfg->logfile = strdup(""))) goto error_exit; 134 if(!(cfg->pidfile = strdup(PIDFILE))) goto error_exit; 135 if(!(cfg->target_fetch_policy = strdup("3 2 1 0 0"))) goto error_exit; 136 cfg->donotqueryaddrs = NULL; 137 cfg->donotquery_localhost = 1; 138 cfg->root_hints = NULL; 139 cfg->do_daemonize = 1; 140 cfg->if_automatic = 0; 141 cfg->so_rcvbuf = 0; 142 cfg->so_sndbuf = 0; 143 cfg->num_ifs = 0; 144 cfg->ifs = NULL; 145 cfg->num_out_ifs = 0; 146 cfg->out_ifs = NULL; 147 cfg->stubs = NULL; 148 cfg->forwards = NULL; 149 cfg->acls = NULL; 150 cfg->harden_short_bufsize = 0; 151 cfg->harden_large_queries = 0; 152 cfg->harden_glue = 1; 153 cfg->harden_dnssec_stripped = 1; 154 cfg->harden_below_nxdomain = 0; 155 cfg->harden_referral_path = 0; 156 cfg->use_caps_bits_for_id = 0; 157 cfg->private_address = NULL; 158 cfg->private_domain = NULL; 159 cfg->unwanted_threshold = 0; 160 cfg->hide_identity = 0; 161 cfg->hide_version = 0; 162 cfg->identity = NULL; 163 cfg->version = NULL; 164 cfg->auto_trust_anchor_file_list = NULL; 165 cfg->trust_anchor_file_list = NULL; 166 cfg->trust_anchor_list = NULL; 167 cfg->trusted_keys_file_list = NULL; 168 cfg->dlv_anchor_file = NULL; 169 cfg->dlv_anchor_list = NULL; 170 cfg->domain_insecure = NULL; 171 cfg->val_date_override = 0; 172 cfg->val_sig_skew_min = 3600; /* at least daylight savings trouble */ 173 cfg->val_sig_skew_max = 86400; /* at most timezone settings trouble */ 174 cfg->val_clean_additional = 1; 175 cfg->val_log_level = 0; 176 cfg->val_log_squelch = 0; 177 cfg->val_permissive_mode = 0; 178 cfg->ignore_cd = 0; 179 cfg->add_holddown = 30*24*3600; 180 cfg->del_holddown = 30*24*3600; 181 cfg->keep_missing = 366*24*3600; /* one year plus a little leeway */ 182 cfg->key_cache_size = 4 * 1024 * 1024; 183 cfg->key_cache_slabs = 4; 184 cfg->neg_cache_size = 1 * 1024 * 1024; 185 cfg->local_zones = NULL; 186 cfg->local_zones_nodefault = NULL; 187 cfg->local_data = NULL; 188 cfg->python_script = NULL; 189 cfg->remote_control_enable = 0; 190 cfg->control_ifs = NULL; 191 cfg->control_port = UNBOUND_CONTROL_PORT; 192 cfg->minimal_responses = 0; 193 cfg->rrset_roundrobin = 0; 194 if(!(cfg->server_key_file = strdup(RUN_DIR"/unbound_server.key"))) 195 goto error_exit; 196 if(!(cfg->server_cert_file = strdup(RUN_DIR"/unbound_server.pem"))) 197 goto error_exit; 198 if(!(cfg->control_key_file = strdup(RUN_DIR"/unbound_control.key"))) 199 goto error_exit; 200 if(!(cfg->control_cert_file = strdup(RUN_DIR"/unbound_control.pem"))) 201 goto error_exit; 202 203 if(!(cfg->module_conf = strdup("validator iterator"))) goto error_exit; 204 if(!(cfg->val_nsec3_key_iterations = 205 strdup("1024 150 2048 500 4096 2500"))) goto error_exit; 206 return cfg; 207 error_exit: 208 config_delete(cfg); 209 return NULL; 210 } 211 212 struct config_file* config_create_forlib(void) 213 { 214 struct config_file* cfg = config_create(); 215 if(!cfg) return NULL; 216 /* modifications for library use, less verbose, less memory */ 217 free(cfg->chrootdir); 218 cfg->chrootdir = NULL; 219 cfg->verbosity = 0; 220 cfg->outgoing_num_ports = 16; /* in library use, this is 'reasonable' 221 and probably within the ulimit(maxfds) of the user */ 222 cfg->outgoing_num_tcp = 2; 223 cfg->msg_cache_size = 1024*1024; 224 cfg->msg_cache_slabs = 1; 225 cfg->rrset_cache_size = 1024*1024; 226 cfg->rrset_cache_slabs = 1; 227 cfg->infra_cache_slabs = 1; 228 cfg->use_syslog = 0; 229 cfg->key_cache_size = 1024*1024; 230 cfg->key_cache_slabs = 1; 231 cfg->neg_cache_size = 100 * 1024; 232 cfg->donotquery_localhost = 0; /* allow, so that you can ask a 233 forward nameserver running on localhost */ 234 cfg->val_log_level = 2; /* to fill why_bogus with */ 235 cfg->val_log_squelch = 1; 236 return cfg; 237 } 238 239 /** check that the value passed is >= 0 */ 240 #define IS_NUMBER_OR_ZERO \ 241 if(atoi(val) == 0 && strcmp(val, "0") != 0) return 0 242 /** check that the value passed is > 0 */ 243 #define IS_NONZERO_NUMBER \ 244 if(atoi(val) == 0) return 0 245 /** check that the value passed is not 0 and a power of 2 */ 246 #define IS_POW2_NUMBER \ 247 if(atoi(val) == 0 || !is_pow2((size_t)atoi(val))) return 0 248 /** check that the value passed is yes or no */ 249 #define IS_YES_OR_NO \ 250 if(strcmp(val, "yes") != 0 && strcmp(val, "no") != 0) return 0 251 /** put integer_or_zero into variable */ 252 #define S_NUMBER_OR_ZERO(str, var) if(strcmp(opt, str) == 0) \ 253 { IS_NUMBER_OR_ZERO; cfg->var = atoi(val); } 254 /** put integer_nonzero into variable */ 255 #define S_NUMBER_NONZERO(str, var) if(strcmp(opt, str) == 0) \ 256 { IS_NONZERO_NUMBER; cfg->var = atoi(val); } 257 /** put integer_or_zero into unsigned */ 258 #define S_UNSIGNED_OR_ZERO(str, var) if(strcmp(opt, str) == 0) \ 259 { IS_NUMBER_OR_ZERO; cfg->var = (unsigned)atoi(val); } 260 /** put integer_or_zero into size_t */ 261 #define S_SIZET_OR_ZERO(str, var) if(strcmp(opt, str) == 0) \ 262 { IS_NUMBER_OR_ZERO; cfg->var = (size_t)atoi(val); } 263 /** put integer_nonzero into size_t */ 264 #define S_SIZET_NONZERO(str, var) if(strcmp(opt, str) == 0) \ 265 { IS_NONZERO_NUMBER; cfg->var = (size_t)atoi(val); } 266 /** put yesno into variable */ 267 #define S_YNO(str, var) if(strcmp(opt, str) == 0) \ 268 { IS_YES_OR_NO; cfg->var = (strcmp(val, "yes") == 0); } 269 /** put memsize into variable */ 270 #define S_MEMSIZE(str, var) if(strcmp(opt, str)==0) \ 271 { return cfg_parse_memsize(val, &cfg->var); } 272 /** put pow2 number into variable */ 273 #define S_POW2(str, var) if(strcmp(opt, str)==0) \ 274 { IS_POW2_NUMBER; cfg->var = (size_t)atoi(val); } 275 /** put string into variable */ 276 #define S_STR(str, var) if(strcmp(opt, str)==0) \ 277 { free(cfg->var); return (cfg->var = strdup(val)) != NULL; } 278 /** put string into strlist */ 279 #define S_STRLIST(str, var) if(strcmp(opt, str)==0) \ 280 { return cfg_strlist_insert(&cfg->var, strdup(val)); } 281 282 int config_set_option(struct config_file* cfg, const char* opt, 283 const char* val) 284 { 285 S_NUMBER_OR_ZERO("verbosity:", verbosity) 286 else if(strcmp(opt, "statistics-interval:") == 0) { 287 if(strcmp(val, "0") == 0 || strcmp(val, "") == 0) 288 cfg->stat_interval = 0; 289 else if(atoi(val) == 0) 290 return 0; 291 else cfg->stat_interval = atoi(val); 292 } else if(strcmp(opt, "num_threads:") == 0) { 293 /* not supported, library must have 1 thread in bgworker */ 294 return 0; 295 } else if(strcmp(opt, "outgoing-port-permit:") == 0) { 296 return cfg_mark_ports(val, 1, 297 cfg->outgoing_avail_ports, 65536); 298 } else if(strcmp(opt, "outgoing-port-avoid:") == 0) { 299 return cfg_mark_ports(val, 0, 300 cfg->outgoing_avail_ports, 65536); 301 } else if(strcmp(opt, "local-zone:") == 0) { 302 return cfg_parse_local_zone(cfg, val); 303 } else if(strcmp(opt, "val-override-date:") == 0) { 304 if(strcmp(val, "") == 0 || strcmp(val, "0") == 0) { 305 cfg->val_date_override = 0; 306 } else if(strlen(val) == 14) { 307 cfg->val_date_override = cfg_convert_timeval(val); 308 return cfg->val_date_override != 0; 309 } else { 310 if(atoi(val) == 0) return 0; 311 cfg->val_date_override = (uint32_t)atoi(val); 312 } 313 } else if(strcmp(opt, "local-data-ptr:") == 0) { 314 char* ptr = cfg_ptr_reverse((char*)opt); 315 return cfg_strlist_insert(&cfg->local_data, ptr); 316 } else if(strcmp(opt, "logfile:") == 0) { 317 cfg->use_syslog = 0; 318 free(cfg->logfile); 319 return (cfg->logfile = strdup(val)) != NULL; 320 } 321 else S_YNO("use-syslog:", use_syslog) 322 else S_YNO("extended-statistics:", stat_extended) 323 else S_YNO("statistics-cumulative:", stat_cumulative) 324 else S_YNO("do-ip4:", do_ip4) 325 else S_YNO("do-ip6:", do_ip6) 326 else S_YNO("do-udp:", do_udp) 327 else S_YNO("do-tcp:", do_tcp) 328 else S_YNO("tcp-upstream:", tcp_upstream) 329 else S_YNO("ssl-upstream:", ssl_upstream) 330 else S_STR("ssl-service-key:", ssl_service_key) 331 else S_STR("ssl-service-pem:", ssl_service_pem) 332 else S_NUMBER_NONZERO("ssl-port:", ssl_port) 333 else S_YNO("interface-automatic:", if_automatic) 334 else S_YNO("do-daemonize:", do_daemonize) 335 else S_NUMBER_NONZERO("port:", port) 336 else S_NUMBER_NONZERO("outgoing-range:", outgoing_num_ports) 337 else S_SIZET_OR_ZERO("outgoing-num-tcp:", outgoing_num_tcp) 338 else S_SIZET_OR_ZERO("incoming-num-tcp:", incoming_num_tcp) 339 else S_SIZET_NONZERO("edns-buffer-size:", edns_buffer_size) 340 else S_SIZET_NONZERO("msg-buffer-size:", msg_buffer_size) 341 else S_MEMSIZE("msg-cache-size:", msg_cache_size) 342 else S_POW2("msg-cache-slabs:", msg_cache_slabs) 343 else S_SIZET_NONZERO("num-queries-per-thread:",num_queries_per_thread) 344 else S_SIZET_OR_ZERO("jostle-timeout:", jostle_time) 345 else S_MEMSIZE("so-rcvbuf:", so_rcvbuf) 346 else S_MEMSIZE("so-sndbuf:", so_sndbuf) 347 else S_MEMSIZE("rrset-cache-size:", rrset_cache_size) 348 else S_POW2("rrset-cache-slabs:", rrset_cache_slabs) 349 else S_YNO("prefetch:", prefetch) 350 else S_YNO("prefetch-key:", prefetch_key) 351 else S_NUMBER_OR_ZERO("cache-max-ttl:", max_ttl) 352 else S_NUMBER_OR_ZERO("infra-host-ttl:", host_ttl) 353 else S_POW2("infra-cache-slabs:", infra_cache_slabs) 354 else S_SIZET_NONZERO("infra-cache-numhosts:", infra_cache_numhosts) 355 else S_STR("chroot:", chrootdir) 356 else S_STR("username:", username) 357 else S_STR("directory:", directory) 358 else S_STR("pidfile:", pidfile) 359 else S_YNO("hide-identity:", hide_identity) 360 else S_YNO("hide-version:", hide_version) 361 else S_STR("identity:", identity) 362 else S_STR("version:", version) 363 else S_STRLIST("root-hints:", root_hints) 364 else S_STR("target-fetch-policy:", target_fetch_policy) 365 else S_YNO("harden-glue:", harden_glue) 366 else S_YNO("harden-short-bufsize:", harden_short_bufsize) 367 else S_YNO("harden-large-queries:", harden_large_queries) 368 else S_YNO("harden-dnssec-stripped:", harden_dnssec_stripped) 369 else S_YNO("harden-below-nxdomain:", harden_below_nxdomain) 370 else S_YNO("harden-referral-path:", harden_referral_path) 371 else S_YNO("use-caps-for-id", use_caps_bits_for_id) 372 else S_SIZET_OR_ZERO("unwanted-reply-threshold:", unwanted_threshold) 373 else S_STRLIST("private-address:", private_address) 374 else S_STRLIST("private-domain:", private_domain) 375 else S_YNO("do-not-query-localhost:", donotquery_localhost) 376 else S_STRLIST("do-not-query-address:", donotqueryaddrs) 377 else S_STRLIST("auto-trust-anchor-file:", auto_trust_anchor_file_list) 378 else S_STRLIST("trust-anchor-file:", trust_anchor_file_list) 379 else S_STRLIST("trust-anchor:", trust_anchor_list) 380 else S_STRLIST("trusted-keys-file:", trusted_keys_file_list) 381 else S_STR("dlv-anchor-file:", dlv_anchor_file) 382 else S_STRLIST("dlv-anchor:", dlv_anchor_list) 383 else S_STRLIST("domain-insecure:", domain_insecure) 384 else S_NUMBER_OR_ZERO("val-bogus-ttl:", bogus_ttl) 385 else S_YNO("val-clean-additional:", val_clean_additional) 386 else S_NUMBER_OR_ZERO("val-log-level:", val_log_level) 387 else S_YNO("val-log-squelch:", val_log_squelch) 388 else S_YNO("log-queries:", log_queries) 389 else S_YNO("val-permissive-mode:", val_permissive_mode) 390 else S_YNO("ignore-cd-flag:", ignore_cd) 391 else S_STR("val-nsec3-keysize-iterations:", val_nsec3_key_iterations) 392 else S_UNSIGNED_OR_ZERO("add-holddown:", add_holddown) 393 else S_UNSIGNED_OR_ZERO("del-holddown:", del_holddown) 394 else S_UNSIGNED_OR_ZERO("keep-missing:", keep_missing) 395 else S_MEMSIZE("key-cache-size:", key_cache_size) 396 else S_POW2("key-cache-slabs:", key_cache_slabs) 397 else S_MEMSIZE("neg-cache-size:", neg_cache_size) 398 else S_YNO("minimal-responses:", minimal_responses) 399 else S_YNO("rrset-roundrobin:", rrset_roundrobin) 400 else S_STRLIST("local-data:", local_data) 401 else S_YNO("control-enable:", remote_control_enable) 402 else S_STRLIST("control-interface:", control_ifs) 403 else S_NUMBER_NONZERO("control-port:", control_port) 404 else S_STR("server-key-file:", server_key_file) 405 else S_STR("server-cert-file:", server_cert_file) 406 else S_STR("control-key-file:", control_key_file) 407 else S_STR("control-cert-file:", control_cert_file) 408 else S_STR("module-config:", module_conf) 409 else S_STR("python-script:", python_script) 410 else if (strcmp(opt, "outgoing-interface:") == 0) { 411 char* d = strdup(val); 412 char** oi = (char**)malloc((cfg->num_out_ifs+1)*sizeof(char*)); 413 if(!d || !oi) { free(d); free(oi); return -1; } 414 if(cfg->out_ifs && cfg->num_out_ifs) { 415 memmove(oi, cfg->out_ifs, cfg->num_out_ifs*sizeof(char*)); 416 free(cfg->out_ifs); 417 } 418 oi[cfg->num_out_ifs++] = d; 419 cfg->out_ifs = oi; 420 } else { 421 /* unknown or unsupported (from the set_option interface): 422 * interface, outgoing-interface, access-control, 423 * stub-zone, name, stub-addr, stub-host, stub-prime 424 * forward-first, stub-first, 425 * forward-zone, name, forward-addr, forward-host */ 426 return 0; 427 } 428 return 1; 429 } 430 431 void config_print_func(char* line, void* arg) 432 { 433 FILE* f = (FILE*)arg; 434 (void)fprintf(f, "%s\n", line); 435 } 436 437 /** collate func arg */ 438 struct config_collate_arg { 439 /** list of result items */ 440 struct config_strlist_head list; 441 /** if a malloc error occurred, 0 is OK */ 442 int status; 443 }; 444 445 void config_collate_func(char* line, void* arg) 446 { 447 struct config_collate_arg* m = (struct config_collate_arg*)arg; 448 if(m->status) 449 return; 450 if(!cfg_strlist_append(&m->list, strdup(line))) 451 m->status = 1; 452 } 453 454 int config_get_option_list(struct config_file* cfg, const char* opt, 455 struct config_strlist** list) 456 { 457 struct config_collate_arg m; 458 memset(&m, 0, sizeof(m)); 459 *list = NULL; 460 if(!config_get_option(cfg, opt, config_collate_func, &m)) 461 return 1; 462 if(m.status) { 463 config_delstrlist(m.list.first); 464 return 2; 465 } 466 *list = m.list.first; 467 return 0; 468 } 469 470 int 471 config_get_option_collate(struct config_file* cfg, const char* opt, char** str) 472 { 473 struct config_strlist* list = NULL; 474 int r; 475 *str = NULL; 476 if((r = config_get_option_list(cfg, opt, &list)) != 0) 477 return r; 478 *str = config_collate_cat(list); 479 config_delstrlist(list); 480 if(!*str) return 2; 481 return 0; 482 } 483 484 char* 485 config_collate_cat(struct config_strlist* list) 486 { 487 size_t total = 0, left; 488 struct config_strlist* s; 489 char *r, *w; 490 if(!list) /* no elements */ 491 return strdup(""); 492 if(list->next == NULL) /* one element , no newline at end. */ 493 return strdup(list->str); 494 /* count total length */ 495 for(s=list; s; s=s->next) 496 total += strlen(s->str) + 1; /* len + newline */ 497 left = total+1; /* one extra for nul at end */ 498 r = malloc(left); 499 if(!r) 500 return NULL; 501 w = r; 502 for(s=list; s; s=s->next) { 503 size_t this = strlen(s->str); 504 if(this+2 > left) { /* sanity check */ 505 free(r); 506 return NULL; 507 } 508 snprintf(w, left, "%s\n", s->str); 509 w += this+1; 510 left -= this+1; 511 } 512 return r; 513 } 514 515 /** compare and print decimal option */ 516 #define O_DEC(opt, str, var) if(strcmp(opt, str)==0) \ 517 {snprintf(buf, len, "%d", (int)cfg->var); \ 518 func(buf, arg);} 519 /** compare and print unsigned option */ 520 #define O_UNS(opt, str, var) if(strcmp(opt, str)==0) \ 521 {snprintf(buf, len, "%u", (unsigned)cfg->var); \ 522 func(buf, arg);} 523 /** compare and print yesno option */ 524 #define O_YNO(opt, str, var) if(strcmp(opt, str)==0) \ 525 {func(cfg->var?"yes":"no", arg);} 526 /** compare and print string option */ 527 #define O_STR(opt, str, var) if(strcmp(opt, str)==0) \ 528 {func(cfg->var?cfg->var:"", arg);} 529 /** compare and print array option */ 530 #define O_IFC(opt, str, num, arr) if(strcmp(opt, str)==0) \ 531 {int i; for(i=0; i<cfg->num; i++) func(cfg->arr[i], arg);} 532 /** compare and print memorysize option */ 533 #define O_MEM(opt, str, var) if(strcmp(opt, str)==0) { \ 534 if(cfg->var > 1024*1024*1024) { \ 535 size_t f=cfg->var/(size_t)1000000, b=cfg->var%(size_t)1000000; \ 536 snprintf(buf, len, "%u%6.6u\n", (unsigned)f, (unsigned)b); \ 537 } else snprintf(buf, len, "%u\n", (unsigned)cfg->var); \ 538 func(buf, arg);} 539 /** compare and print list option */ 540 #define O_LST(opt, name, lst) if(strcmp(opt, name)==0) { \ 541 struct config_strlist* p = cfg->lst; \ 542 for(p = cfg->lst; p; p = p->next) \ 543 func(p->str, arg); \ 544 } 545 /** compare and print list option */ 546 #define O_LS2(opt, name, lst) if(strcmp(opt, name)==0) { \ 547 struct config_str2list* p = cfg->lst; \ 548 for(p = cfg->lst; p; p = p->next) \ 549 snprintf(buf, len, "%s %s\n", p->str, p->str2); \ 550 func(buf, arg); \ 551 } 552 553 int 554 config_get_option(struct config_file* cfg, const char* opt, 555 void (*func)(char*,void*), void* arg) 556 { 557 char buf[1024]; 558 size_t len = sizeof(buf); 559 fptr_ok(fptr_whitelist_print_func(func)); 560 O_DEC(opt, "verbosity", verbosity) 561 else O_DEC(opt, "statistics-interval", stat_interval) 562 else O_YNO(opt, "statistics-cumulative", stat_cumulative) 563 else O_YNO(opt, "extended-statistics", stat_extended) 564 else O_YNO(opt, "use-syslog", use_syslog) 565 else O_DEC(opt, "num-threads", num_threads) 566 else O_IFC(opt, "interface", num_ifs, ifs) 567 else O_IFC(opt, "outgoing-interface", num_out_ifs, out_ifs) 568 else O_YNO(opt, "interface-automatic", if_automatic) 569 else O_DEC(opt, "port", port) 570 else O_DEC(opt, "outgoing-range", outgoing_num_ports) 571 else O_DEC(opt, "outgoing-num-tcp", outgoing_num_tcp) 572 else O_DEC(opt, "incoming-num-tcp", incoming_num_tcp) 573 else O_DEC(opt, "edns-buffer-size", edns_buffer_size) 574 else O_DEC(opt, "msg-buffer-size", msg_buffer_size) 575 else O_MEM(opt, "msg-cache-size", msg_cache_size) 576 else O_DEC(opt, "msg-cache-slabs", msg_cache_slabs) 577 else O_DEC(opt, "num-queries-per-thread", num_queries_per_thread) 578 else O_UNS(opt, "jostle-timeout", jostle_time) 579 else O_MEM(opt, "so-rcvbuf", so_rcvbuf) 580 else O_MEM(opt, "so-sndbuf", so_sndbuf) 581 else O_MEM(opt, "rrset-cache-size", rrset_cache_size) 582 else O_DEC(opt, "rrset-cache-slabs", rrset_cache_slabs) 583 else O_YNO(opt, "prefetch-key", prefetch_key) 584 else O_YNO(opt, "prefetch", prefetch) 585 else O_DEC(opt, "cache-max-ttl", max_ttl) 586 else O_DEC(opt, "infra-host-ttl", host_ttl) 587 else O_DEC(opt, "infra-cache-slabs", infra_cache_slabs) 588 else O_MEM(opt, "infra-cache-numhosts", infra_cache_numhosts) 589 else O_YNO(opt, "do-ip4", do_ip4) 590 else O_YNO(opt, "do-ip6", do_ip6) 591 else O_YNO(opt, "do-udp", do_udp) 592 else O_YNO(opt, "do-tcp", do_tcp) 593 else O_YNO(opt, "tcp-upstream", tcp_upstream) 594 else O_YNO(opt, "ssl-upstream", ssl_upstream) 595 else O_STR(opt, "ssl-service-key", ssl_service_key) 596 else O_STR(opt, "ssl-service-pem", ssl_service_pem) 597 else O_DEC(opt, "ssl-port", ssl_port) 598 else O_YNO(opt, "do-daemonize", do_daemonize) 599 else O_STR(opt, "chroot", chrootdir) 600 else O_STR(opt, "username", username) 601 else O_STR(opt, "directory", directory) 602 else O_STR(opt, "logfile", logfile) 603 else O_YNO(opt, "log-queries", log_queries) 604 else O_STR(opt, "pidfile", pidfile) 605 else O_YNO(opt, "hide-identity", hide_identity) 606 else O_YNO(opt, "hide-version", hide_version) 607 else O_STR(opt, "identity", identity) 608 else O_STR(opt, "version", version) 609 else O_STR(opt, "target-fetch-policy", target_fetch_policy) 610 else O_YNO(opt, "harden-short-bufsize", harden_short_bufsize) 611 else O_YNO(opt, "harden-large-queries", harden_large_queries) 612 else O_YNO(opt, "harden-glue", harden_glue) 613 else O_YNO(opt, "harden-dnssec-stripped", harden_dnssec_stripped) 614 else O_YNO(opt, "harden-below-nxdomain", harden_below_nxdomain) 615 else O_YNO(opt, "harden-referral-path", harden_referral_path) 616 else O_YNO(opt, "use-caps-for-id", use_caps_bits_for_id) 617 else O_DEC(opt, "unwanted-reply-threshold", unwanted_threshold) 618 else O_YNO(opt, "do-not-query-localhost", donotquery_localhost) 619 else O_STR(opt, "module-config", module_conf) 620 else O_STR(opt, "dlv-anchor-file", dlv_anchor_file) 621 else O_DEC(opt, "val-bogus-ttl", bogus_ttl) 622 else O_YNO(opt, "val-clean-additional", val_clean_additional) 623 else O_DEC(opt, "val-log-level", val_log_level) 624 else O_YNO(opt, "val-permissive-mode", val_permissive_mode) 625 else O_YNO(opt, "ignore-cd-flag", ignore_cd) 626 else O_STR(opt, "val-nsec3-keysize-iterations",val_nsec3_key_iterations) 627 else O_UNS(opt, "add-holddown", add_holddown) 628 else O_UNS(opt, "del-holddown", del_holddown) 629 else O_UNS(opt, "keep-missing", keep_missing) 630 else O_MEM(opt, "key-cache-size", key_cache_size) 631 else O_DEC(opt, "key-cache-slabs", key_cache_slabs) 632 else O_MEM(opt, "neg-cache-size", neg_cache_size) 633 else O_YNO(opt, "control-enable", remote_control_enable) 634 else O_DEC(opt, "control-port", control_port) 635 else O_STR(opt, "server-key-file", server_key_file) 636 else O_STR(opt, "server-cert-file", server_cert_file) 637 else O_STR(opt, "control-key-file", control_key_file) 638 else O_STR(opt, "control-cert-file", control_cert_file) 639 else O_LST(opt, "root-hints", root_hints) 640 else O_LS2(opt, "access-control", acls) 641 else O_LST(opt, "do-not-query-address", donotqueryaddrs) 642 else O_LST(opt, "private-address", private_address) 643 else O_LST(opt, "private-domain", private_domain) 644 else O_LST(opt, "auto-trust-anchor-file", auto_trust_anchor_file_list) 645 else O_LST(opt, "trust-anchor-file", trust_anchor_file_list) 646 else O_LST(opt, "trust-anchor", trust_anchor_list) 647 else O_LST(opt, "trusted-keys-file", trusted_keys_file_list) 648 else O_LST(opt, "dlv-anchor", dlv_anchor_list) 649 else O_LST(opt, "control-interface", control_ifs) 650 else O_LST(opt, "domain-insecure", domain_insecure) 651 else O_UNS(opt, "val-override-date", val_date_override) 652 else O_YNO(opt, "minimal-responses", minimal_responses) 653 else O_YNO(opt, "rrset-roundrobin", rrset_roundrobin) 654 /* not here: 655 * outgoing-permit, outgoing-avoid - have list of ports 656 * local-zone - zones and nodefault variables 657 * local-data - see below 658 * local-data-ptr - converted to local-data entries 659 * stub-zone, name, stub-addr, stub-host, stub-prime 660 * forward-zone, name, forward-addr, forward-host 661 */ 662 else return 0; 663 return 1; 664 } 665 666 /** initialize the global cfg_parser object */ 667 static void 668 create_cfg_parser(struct config_file* cfg, char* filename, const char* chroot) 669 { 670 static struct config_parser_state st; 671 cfg_parser = &st; 672 cfg_parser->filename = filename; 673 cfg_parser->line = 1; 674 cfg_parser->errors = 0; 675 cfg_parser->cfg = cfg; 676 cfg_parser->chroot = chroot; 677 } 678 679 int 680 config_read(struct config_file* cfg, const char* filename, const char* chroot) 681 { 682 FILE *in; 683 char *fname = (char*)filename; 684 #ifdef HAVE_GLOB 685 glob_t g; 686 size_t i; 687 int r, flags; 688 #endif 689 if(!fname) 690 return 1; 691 692 /* check for wildcards */ 693 #ifdef HAVE_GLOB 694 if(!(!strchr(fname, '*') && !strchr(fname, '?') && !strchr(fname, '[') && 695 !strchr(fname, '{') && !strchr(fname, '~'))) { 696 verbose(VERB_QUERY, "wildcard found, processing %s", fname); 697 flags = 0 698 #ifdef GLOB_ERR 699 | GLOB_ERR 700 #endif 701 #ifdef GLOB_NOSORT 702 | GLOB_NOSORT 703 #endif 704 #ifdef GLOB_BRACE 705 | GLOB_BRACE 706 #endif 707 #ifdef GLOB_TILDE 708 | GLOB_TILDE 709 #endif 710 ; 711 memset(&g, 0, sizeof(g)); 712 r = glob(fname, flags, NULL, &g); 713 if(r) { 714 /* some error */ 715 globfree(&g); 716 if(r == GLOB_NOMATCH) { 717 verbose(VERB_QUERY, "include: " 718 "no matches for %s", fname); 719 return 1; 720 } else if(r == GLOB_NOSPACE) { 721 log_err("include: %s: " 722 "fnametern out of memory", fname); 723 } else if(r == GLOB_ABORTED) { 724 log_err("wildcard include: %s: expansion " 725 "aborted (%s)", fname, strerror(errno)); 726 } else { 727 log_err("wildcard include: %s: expansion " 728 "failed (%s)", fname, strerror(errno)); 729 } 730 /* ignore globs that yield no files */ 731 return 1; 732 } 733 /* process files found, if any */ 734 for(i=0; i<(size_t)g.gl_pathc; i++) { 735 if(!config_read(cfg, g.gl_pathv[i], chroot)) { 736 log_err("error reading wildcard " 737 "include: %s", g.gl_pathv[i]); 738 globfree(&g); 739 return 0; 740 } 741 } 742 globfree(&g); 743 return 1; 744 } 745 #endif /* HAVE_GLOB */ 746 747 in = fopen(fname, "r"); 748 if(!in) { 749 log_err("Could not open %s: %s", fname, strerror(errno)); 750 return 0; 751 } 752 create_cfg_parser(cfg, fname, chroot); 753 ub_c_in = in; 754 ub_c_parse(); 755 fclose(in); 756 757 if(cfg_parser->errors != 0) { 758 fprintf(stderr, "read %s failed: %d errors in configuration file\n", 759 cfg_parser->filename, cfg_parser->errors); 760 errno=EINVAL; 761 return 0; 762 } 763 return 1; 764 } 765 766 void 767 config_delstrlist(struct config_strlist* p) 768 { 769 struct config_strlist *np; 770 while(p) { 771 np = p->next; 772 free(p->str); 773 free(p); 774 p = np; 775 } 776 } 777 778 void 779 config_deldblstrlist(struct config_str2list* p) 780 { 781 struct config_str2list *np; 782 while(p) { 783 np = p->next; 784 free(p->str); 785 free(p->str2); 786 free(p); 787 p = np; 788 } 789 } 790 791 void 792 config_delstubs(struct config_stub* p) 793 { 794 struct config_stub* np; 795 while(p) { 796 np = p->next; 797 free(p->name); 798 config_delstrlist(p->hosts); 799 config_delstrlist(p->addrs); 800 free(p); 801 p = np; 802 } 803 } 804 805 void 806 config_delete(struct config_file* cfg) 807 { 808 if(!cfg) return; 809 free(cfg->username); 810 free(cfg->chrootdir); 811 free(cfg->directory); 812 free(cfg->logfile); 813 free(cfg->pidfile); 814 free(cfg->target_fetch_policy); 815 free(cfg->ssl_service_key); 816 free(cfg->ssl_service_pem); 817 if(cfg->ifs) { 818 int i; 819 for(i=0; i<cfg->num_ifs; i++) 820 free(cfg->ifs[i]); 821 free(cfg->ifs); 822 } 823 if(cfg->out_ifs) { 824 int i; 825 for(i=0; i<cfg->num_out_ifs; i++) 826 free(cfg->out_ifs[i]); 827 free(cfg->out_ifs); 828 } 829 config_delstubs(cfg->stubs); 830 config_delstubs(cfg->forwards); 831 config_delstrlist(cfg->donotqueryaddrs); 832 config_delstrlist(cfg->root_hints); 833 free(cfg->identity); 834 free(cfg->version); 835 free(cfg->module_conf); 836 free(cfg->outgoing_avail_ports); 837 config_delstrlist(cfg->private_address); 838 config_delstrlist(cfg->private_domain); 839 config_delstrlist(cfg->auto_trust_anchor_file_list); 840 config_delstrlist(cfg->trust_anchor_file_list); 841 config_delstrlist(cfg->trusted_keys_file_list); 842 config_delstrlist(cfg->trust_anchor_list); 843 config_delstrlist(cfg->domain_insecure); 844 free(cfg->dlv_anchor_file); 845 config_delstrlist(cfg->dlv_anchor_list); 846 config_deldblstrlist(cfg->acls); 847 free(cfg->val_nsec3_key_iterations); 848 config_deldblstrlist(cfg->local_zones); 849 config_delstrlist(cfg->local_zones_nodefault); 850 config_delstrlist(cfg->local_data); 851 config_delstrlist(cfg->control_ifs); 852 free(cfg->server_key_file); 853 free(cfg->server_cert_file); 854 free(cfg->control_key_file); 855 free(cfg->control_cert_file); 856 free(cfg); 857 } 858 859 static void 860 init_outgoing_availports(int* a, int num) 861 { 862 /* generated with make iana_update */ 863 const int iana_assigned[] = { 864 #include "util/iana_ports.inc" 865 -1 }; /* end marker to put behind trailing comma */ 866 867 int i; 868 /* do not use <1024, that could be trouble with the system, privs */ 869 for(i=1024; i<num; i++) { 870 a[i] = i; 871 } 872 /* create empty spot at 49152 to keep ephemeral ports available 873 * to other programs */ 874 for(i=49152; i<49152+256; i++) 875 a[i] = 0; 876 /* pick out all the IANA assigned ports */ 877 for(i=0; iana_assigned[i]!=-1; i++) { 878 if(iana_assigned[i] < num) 879 a[iana_assigned[i]] = 0; 880 } 881 } 882 883 int 884 cfg_mark_ports(const char* str, int allow, int* avail, int num) 885 { 886 char* mid = strchr(str, '-'); 887 if(!mid) { 888 int port = atoi(str); 889 if(port == 0 && strcmp(str, "0") != 0) { 890 log_err("cannot parse port number '%s'", str); 891 return 0; 892 } 893 if(port < num) 894 avail[port] = (allow?port:0); 895 } else { 896 int i, low, high = atoi(mid+1); 897 char buf[16]; 898 if(high == 0 && strcmp(mid+1, "0") != 0) { 899 log_err("cannot parse port number '%s'", mid+1); 900 return 0; 901 } 902 if( (int)(mid-str)+1 >= (int)sizeof(buf) ) { 903 log_err("cannot parse port number '%s'", str); 904 return 0; 905 } 906 if(mid > str) 907 memcpy(buf, str, (size_t)(mid-str)); 908 buf[mid-str] = 0; 909 low = atoi(buf); 910 if(low == 0 && strcmp(buf, "0") != 0) { 911 log_err("cannot parse port number '%s'", buf); 912 return 0; 913 } 914 for(i=low; i<=high; i++) { 915 if(i < num) 916 avail[i] = (allow?i:0); 917 } 918 return 1; 919 } 920 return 1; 921 } 922 923 int 924 cfg_scan_ports(int* avail, int num) 925 { 926 int i; 927 int count = 0; 928 for(i=0; i<num; i++) { 929 if(avail[i]) 930 count++; 931 } 932 return count; 933 } 934 935 int cfg_condense_ports(struct config_file* cfg, int** avail) 936 { 937 int num = cfg_scan_ports(cfg->outgoing_avail_ports, 65536); 938 int i, at = 0; 939 *avail = NULL; 940 if(num == 0) 941 return 0; 942 *avail = (int*)malloc(sizeof(int)*num); 943 if(!*avail) 944 return 0; 945 for(i=0; i<65536; i++) { 946 if(cfg->outgoing_avail_ports[i]) 947 (*avail)[at++] = cfg->outgoing_avail_ports[i]; 948 } 949 log_assert(at == num); 950 return num; 951 } 952 953 /** print error with file and line number */ 954 static void ub_c_error_va_list(const char *fmt, va_list args) 955 { 956 cfg_parser->errors++; 957 fprintf(stderr, "%s:%d: error: ", cfg_parser->filename, 958 cfg_parser->line); 959 vfprintf(stderr, fmt, args); 960 fprintf(stderr, "\n"); 961 } 962 963 /** print error with file and line number */ 964 void ub_c_error_msg(const char* fmt, ...) 965 { 966 va_list args; 967 va_start(args, fmt); 968 ub_c_error_va_list(fmt, args); 969 va_end(args); 970 } 971 972 void ub_c_error(const char *str) 973 { 974 cfg_parser->errors++; 975 fprintf(stderr, "%s:%d: error: %s\n", cfg_parser->filename, 976 cfg_parser->line, str); 977 } 978 979 int ub_c_wrap(void) 980 { 981 return 1; 982 } 983 984 int cfg_strlist_append(struct config_strlist_head* list, char* item) 985 { 986 struct config_strlist *s; 987 if(!item || !list) 988 return 0; 989 s = (struct config_strlist*)calloc(1, sizeof(struct config_strlist)); 990 if(!s) 991 return 0; 992 s->str = item; 993 s->next = NULL; 994 if(list->last) 995 list->last->next = s; 996 else 997 list->first = s; 998 list->last = s; 999 return 1; 1000 } 1001 1002 int 1003 cfg_strlist_insert(struct config_strlist** head, char* item) 1004 { 1005 struct config_strlist *s; 1006 if(!item || !head) 1007 return 0; 1008 s = (struct config_strlist*)calloc(1, sizeof(struct config_strlist)); 1009 if(!s) 1010 return 0; 1011 s->str = item; 1012 s->next = *head; 1013 *head = s; 1014 return 1; 1015 } 1016 1017 int 1018 cfg_str2list_insert(struct config_str2list** head, char* item, char* i2) 1019 { 1020 struct config_str2list *s; 1021 if(!item || !i2 || !head) 1022 return 0; 1023 s = (struct config_str2list*)calloc(1, sizeof(struct config_str2list)); 1024 if(!s) 1025 return 0; 1026 s->str = item; 1027 s->str2 = i2; 1028 s->next = *head; 1029 *head = s; 1030 return 1; 1031 } 1032 1033 uint32_t 1034 cfg_convert_timeval(const char* str) 1035 { 1036 uint32_t t; 1037 struct tm tm; 1038 memset(&tm, 0, sizeof(tm)); 1039 if(strlen(str) < 14) 1040 return 0; 1041 if(sscanf(str, "%4d%2d%2d%2d%2d%2d", &tm.tm_year, &tm.tm_mon, 1042 &tm.tm_mday, &tm.tm_hour, &tm.tm_min, &tm.tm_sec) != 6) 1043 return 0; 1044 tm.tm_year -= 1900; 1045 tm.tm_mon--; 1046 /* Check values */ 1047 if (tm.tm_year < 70) return 0; 1048 if (tm.tm_mon < 0 || tm.tm_mon > 11) return 0; 1049 if (tm.tm_mday < 1 || tm.tm_mday > 31) return 0; 1050 if (tm.tm_hour < 0 || tm.tm_hour > 23) return 0; 1051 if (tm.tm_min < 0 || tm.tm_min > 59) return 0; 1052 if (tm.tm_sec < 0 || tm.tm_sec > 59) return 0; 1053 /* call ldns conversion function */ 1054 t = mktime_from_utc(&tm); 1055 return t; 1056 } 1057 1058 int 1059 cfg_count_numbers(const char* s) 1060 { 1061 /* format ::= (sp num)+ sp */ 1062 /* num ::= [-](0-9)+ */ 1063 /* sp ::= (space|tab)* */ 1064 int num = 0; 1065 while(*s) { 1066 while(*s && isspace((int)*s)) 1067 s++; 1068 if(!*s) /* end of string */ 1069 break; 1070 if(*s == '-') 1071 s++; 1072 if(!*s) /* only - not allowed */ 1073 return 0; 1074 if(!isdigit((int)*s)) /* bad character */ 1075 return 0; 1076 while(*s && isdigit((int)*s)) 1077 s++; 1078 num++; 1079 } 1080 return num; 1081 } 1082 1083 /** all digit number */ 1084 static int isalldigit(const char* str, size_t l) 1085 { 1086 size_t i; 1087 for(i=0; i<l; i++) 1088 if(!isdigit(str[i])) 1089 return 0; 1090 return 1; 1091 } 1092 1093 int 1094 cfg_parse_memsize(const char* str, size_t* res) 1095 { 1096 size_t len; 1097 size_t mult = 1; 1098 if(!str || (len=(size_t)strlen(str)) == 0) { 1099 log_err("not a size: '%s'", str); 1100 return 0; 1101 } 1102 if(isalldigit(str, len)) { 1103 *res = (size_t)atol(str); 1104 return 1; 1105 } 1106 /* check appended num */ 1107 while(len>0 && str[len-1]==' ') 1108 len--; 1109 if(len > 1 && str[len-1] == 'b') 1110 len--; 1111 else if(len > 1 && str[len-1] == 'B') 1112 len--; 1113 1114 if(len > 1 && tolower(str[len-1]) == 'g') 1115 mult = 1024*1024*1024; 1116 else if(len > 1 && tolower(str[len-1]) == 'm') 1117 mult = 1024*1024; 1118 else if(len > 1 && tolower(str[len-1]) == 'k') 1119 mult = 1024; 1120 else if(len > 0 && isdigit(str[len-1])) 1121 mult = 1; 1122 else { 1123 log_err("unknown size specifier: '%s'", str); 1124 return 0; 1125 } 1126 while(len>1 && str[len-2]==' ') 1127 len--; 1128 1129 if(!isalldigit(str, len-1)) { 1130 log_err("unknown size specifier: '%s'", str); 1131 return 0; 1132 } 1133 *res = ((size_t)atol(str)) * mult; 1134 return 1; 1135 } 1136 1137 void 1138 config_apply(struct config_file* config) 1139 { 1140 MAX_TTL = (uint32_t)config->max_ttl; 1141 MIN_TTL = (uint32_t)config->min_ttl; 1142 EDNS_ADVERTISED_SIZE = (uint16_t)config->edns_buffer_size; 1143 MINIMAL_RESPONSES = config->minimal_responses; 1144 RRSET_ROUNDROBIN = config->rrset_roundrobin; 1145 log_set_time_asc(config->log_time_ascii); 1146 } 1147 1148 /** 1149 * Calculate string length of full pathname in original filesys 1150 * @param fname: the path name to convert. 1151 * Must not be null or empty. 1152 * @param cfg: config struct for chroot and chdir (if set). 1153 * @param use_chdir: if false, only chroot is applied. 1154 * @return length of string. 1155 * remember to allocate one more for 0 at end in mallocs. 1156 */ 1157 static size_t 1158 strlen_after_chroot(const char* fname, struct config_file* cfg, int use_chdir) 1159 { 1160 size_t len = 0; 1161 int slashit = 0; 1162 if(cfg->chrootdir && cfg->chrootdir[0] && 1163 strncmp(cfg->chrootdir, fname, strlen(cfg->chrootdir)) == 0) { 1164 /* already full pathname, return it */ 1165 return strlen(fname); 1166 } 1167 /* chroot */ 1168 if(cfg->chrootdir && cfg->chrootdir[0]) { 1169 /* start with chrootdir */ 1170 len += strlen(cfg->chrootdir); 1171 slashit = 1; 1172 } 1173 /* chdir */ 1174 #ifdef UB_ON_WINDOWS 1175 if(fname[0] != 0 && fname[1] == ':') { 1176 /* full path, no chdir */ 1177 } else 1178 #endif 1179 if(fname[0] == '/' || !use_chdir) { 1180 /* full path, no chdir */ 1181 } else if(cfg->directory && cfg->directory[0]) { 1182 /* prepend chdir */ 1183 if(slashit && cfg->directory[0] != '/') 1184 len++; 1185 if(cfg->chrootdir && cfg->chrootdir[0] && 1186 strncmp(cfg->chrootdir, cfg->directory, 1187 strlen(cfg->chrootdir)) == 0) 1188 len += strlen(cfg->directory)-strlen(cfg->chrootdir); 1189 else len += strlen(cfg->directory); 1190 slashit = 1; 1191 } 1192 /* fname */ 1193 if(slashit && fname[0] != '/') 1194 len++; 1195 len += strlen(fname); 1196 return len; 1197 } 1198 1199 char* 1200 fname_after_chroot(const char* fname, struct config_file* cfg, int use_chdir) 1201 { 1202 size_t len = strlen_after_chroot(fname, cfg, use_chdir); 1203 int slashit = 0; 1204 char* buf = (char*)malloc(len+1); 1205 if(!buf) 1206 return NULL; 1207 buf[0] = 0; 1208 /* is fname already in chroot ? */ 1209 if(cfg->chrootdir && cfg->chrootdir[0] && 1210 strncmp(cfg->chrootdir, fname, strlen(cfg->chrootdir)) == 0) { 1211 /* already full pathname, return it */ 1212 strncpy(buf, fname, len); 1213 buf[len] = 0; 1214 return buf; 1215 } 1216 /* chroot */ 1217 if(cfg->chrootdir && cfg->chrootdir[0]) { 1218 /* start with chrootdir */ 1219 strncpy(buf, cfg->chrootdir, len); 1220 slashit = 1; 1221 } 1222 #ifdef UB_ON_WINDOWS 1223 if(fname[0] != 0 && fname[1] == ':') { 1224 /* full path, no chdir */ 1225 } else 1226 #endif 1227 /* chdir */ 1228 if(fname[0] == '/' || !use_chdir) { 1229 /* full path, no chdir */ 1230 } else if(cfg->directory && cfg->directory[0]) { 1231 /* prepend chdir */ 1232 if(slashit && cfg->directory[0] != '/') 1233 strncat(buf, "/", len-strlen(buf)); 1234 /* is the directory already in the chroot? */ 1235 if(cfg->chrootdir && cfg->chrootdir[0] && 1236 strncmp(cfg->chrootdir, cfg->directory, 1237 strlen(cfg->chrootdir)) == 0) 1238 strncat(buf, cfg->directory+strlen(cfg->chrootdir), 1239 len-strlen(buf)); 1240 else strncat(buf, cfg->directory, len-strlen(buf)); 1241 slashit = 1; 1242 } 1243 /* fname */ 1244 if(slashit && fname[0] != '/') 1245 strncat(buf, "/", len-strlen(buf)); 1246 strncat(buf, fname, len-strlen(buf)); 1247 buf[len] = 0; 1248 return buf; 1249 } 1250 1251 /** return next space character in string */ 1252 static char* next_space_pos(const char* str) 1253 { 1254 char* sp = strchr(str, ' '); 1255 char* tab = strchr(str, '\t'); 1256 if(!tab && !sp) 1257 return NULL; 1258 if(!sp) return tab; 1259 if(!tab) return sp; 1260 return (sp<tab)?sp:tab; 1261 } 1262 1263 /** return last space character in string */ 1264 static char* last_space_pos(const char* str) 1265 { 1266 char* sp = strrchr(str, ' '); 1267 char* tab = strrchr(str, '\t'); 1268 if(!tab && !sp) 1269 return NULL; 1270 if(!sp) return tab; 1271 if(!tab) return sp; 1272 return (sp>tab)?sp:tab; 1273 } 1274 1275 int 1276 cfg_parse_local_zone(struct config_file* cfg, const char* val) 1277 { 1278 const char *type, *name_end, *name; 1279 char buf[256]; 1280 1281 /* parse it as: [zone_name] [between stuff] [zone_type] */ 1282 name = val; 1283 while(*name && isspace(*name)) 1284 name++; 1285 if(!*name) { 1286 log_err("syntax error: too short: %s", val); 1287 return 0; 1288 } 1289 name_end = next_space_pos(name); 1290 if(!name_end || !*name_end) { 1291 log_err("syntax error: expected zone type: %s", val); 1292 return 0; 1293 } 1294 if (name_end - name > 255) { 1295 log_err("syntax error: bad zone name: %s", val); 1296 return 0; 1297 } 1298 strncpy(buf, name, (size_t)(name_end-name)); 1299 buf[name_end-name] = '\0'; 1300 1301 type = last_space_pos(name_end); 1302 while(type && *type && isspace(*type)) 1303 type++; 1304 if(!type || !*type) { 1305 log_err("syntax error: expected zone type: %s", val); 1306 return 0; 1307 } 1308 1309 if(strcmp(type, "nodefault")==0) { 1310 return cfg_strlist_insert(&cfg->local_zones_nodefault, 1311 strdup(name)); 1312 } else { 1313 return cfg_str2list_insert(&cfg->local_zones, strdup(buf), 1314 strdup(type)); 1315 } 1316 } 1317 1318 char* cfg_ptr_reverse(char* str) 1319 { 1320 char* ip, *ip_end; 1321 char* name; 1322 char* result; 1323 char buf[1024]; 1324 struct sockaddr_storage addr; 1325 socklen_t addrlen; 1326 1327 /* parse it as: [IP] [between stuff] [name] */ 1328 ip = str; 1329 while(*ip && isspace(*ip)) 1330 ip++; 1331 if(!*ip) { 1332 log_err("syntax error: too short: %s", str); 1333 return NULL; 1334 } 1335 ip_end = next_space_pos(ip); 1336 if(!ip_end || !*ip_end) { 1337 log_err("syntax error: expected name: %s", str); 1338 return NULL; 1339 } 1340 1341 name = last_space_pos(ip_end); 1342 if(!name || !*name) { 1343 log_err("syntax error: expected name: %s", str); 1344 return NULL; 1345 } 1346 1347 sscanf(ip, "%100s", buf); 1348 buf[sizeof(buf)-1]=0; 1349 1350 if(!ipstrtoaddr(buf, UNBOUND_DNS_PORT, &addr, &addrlen)) { 1351 log_err("syntax error: cannot parse address: %s", str); 1352 return NULL; 1353 } 1354 1355 /* reverse IPv4: 1356 * ddd.ddd.ddd.ddd.in-addr-arpa. 1357 * IPv6: (h.){32}.ip6.arpa. */ 1358 1359 if(addr_is_ip6(&addr, addrlen)) { 1360 uint8_t ad[16]; 1361 const char* hex = "0123456789abcdef"; 1362 char *p = buf; 1363 int i; 1364 memmove(ad, &((struct sockaddr_in6*)&addr)->sin6_addr, 1365 sizeof(ad)); 1366 for(i=15; i>=0; i--) { 1367 uint8_t b = ad[i]; 1368 *p++ = hex[ (b&0x0f) ]; 1369 *p++ = '.'; 1370 *p++ = hex[ (b&0xf0) >> 4 ]; 1371 *p++ = '.'; 1372 } 1373 snprintf(buf+16*4, sizeof(buf)-16*4, "ip6.arpa. "); 1374 } else { 1375 uint8_t ad[4]; 1376 memmove(ad, &((struct sockaddr_in*)&addr)->sin_addr, 1377 sizeof(ad)); 1378 snprintf(buf, sizeof(buf), "%u.%u.%u.%u.in-addr.arpa. ", 1379 (unsigned)ad[3], (unsigned)ad[2], 1380 (unsigned)ad[1], (unsigned)ad[0]); 1381 } 1382 1383 /* printed the reverse address, now the between goop and name on end */ 1384 while(*ip_end && isspace(*ip_end)) 1385 ip_end++; 1386 if(name>ip_end) { 1387 snprintf(buf+strlen(buf), sizeof(buf)-strlen(buf), "%.*s", 1388 (int)(name-ip_end), ip_end); 1389 } 1390 snprintf(buf+strlen(buf), sizeof(buf)-strlen(buf), " PTR %s", name); 1391 1392 result = strdup(buf); 1393 if(!result) { 1394 log_err("out of memory parsing %s", str); 1395 return NULL; 1396 } 1397 return result; 1398 } 1399 1400 #ifdef UB_ON_WINDOWS 1401 char* 1402 w_lookup_reg_str(const char* key, const char* name) 1403 { 1404 HKEY hk = NULL; 1405 DWORD type = 0; 1406 BYTE buf[1024]; 1407 DWORD len = (DWORD)sizeof(buf); 1408 LONG ret; 1409 char* result = NULL; 1410 ret = RegOpenKeyEx(HKEY_LOCAL_MACHINE, key, 0, KEY_READ, &hk); 1411 if(ret == ERROR_FILE_NOT_FOUND) 1412 return NULL; /* key does not exist */ 1413 else if(ret != ERROR_SUCCESS) { 1414 log_err("RegOpenKeyEx failed"); 1415 return NULL; 1416 } 1417 ret = RegQueryValueEx(hk, (LPCTSTR)name, 0, &type, buf, &len); 1418 if(RegCloseKey(hk)) 1419 log_err("RegCloseKey"); 1420 if(ret == ERROR_FILE_NOT_FOUND) 1421 return NULL; /* name does not exist */ 1422 else if(ret != ERROR_SUCCESS) { 1423 log_err("RegQueryValueEx failed"); 1424 return NULL; 1425 } 1426 if(type == REG_SZ || type == REG_MULTI_SZ || type == REG_EXPAND_SZ) { 1427 buf[sizeof(buf)-1] = 0; 1428 buf[sizeof(buf)-2] = 0; /* for multi_sz */ 1429 result = strdup((char*)buf); 1430 if(!result) log_err("out of memory"); 1431 } 1432 return result; 1433 } 1434 #endif /* UB_ON_WINDOWS */ 1435 1436 void errinf(struct module_qstate* qstate, const char* str) 1437 { 1438 struct config_strlist* p; 1439 if(qstate->env->cfg->val_log_level < 2 || !str) 1440 return; 1441 p = (struct config_strlist*)regional_alloc(qstate->region, sizeof(*p)); 1442 if(!p) { 1443 log_err("malloc failure in validator-error-info string"); 1444 return; 1445 } 1446 p->next = NULL; 1447 p->str = regional_strdup(qstate->region, str); 1448 if(!p->str) { 1449 log_err("malloc failure in validator-error-info string"); 1450 return; 1451 } 1452 /* add at end */ 1453 if(qstate->errinf) { 1454 struct config_strlist* q = qstate->errinf; 1455 while(q->next) 1456 q = q->next; 1457 q->next = p; 1458 } else qstate->errinf = p; 1459 } 1460 1461 void errinf_origin(struct module_qstate* qstate, struct sock_list *origin) 1462 { 1463 struct sock_list* p; 1464 if(qstate->env->cfg->val_log_level < 2) 1465 return; 1466 for(p=origin; p; p=p->next) { 1467 char buf[256]; 1468 if(p == origin) 1469 snprintf(buf, sizeof(buf), "from "); 1470 else snprintf(buf, sizeof(buf), "and "); 1471 if(p->len == 0) 1472 snprintf(buf+strlen(buf), sizeof(buf)-strlen(buf), 1473 "cache"); 1474 else 1475 addr_to_str(&p->addr, p->len, buf+strlen(buf), 1476 sizeof(buf)-strlen(buf)); 1477 errinf(qstate, buf); 1478 } 1479 } 1480 1481 char* errinf_to_str(struct module_qstate* qstate) 1482 { 1483 char buf[20480]; 1484 char* p = buf; 1485 size_t left = sizeof(buf); 1486 struct config_strlist* s; 1487 char dname[LDNS_MAX_DOMAINLEN+1]; 1488 char* t = ldns_rr_type2str(qstate->qinfo.qtype); 1489 char* c = ldns_rr_class2str(qstate->qinfo.qclass); 1490 if(!t || !c) { 1491 free(t); 1492 free(c); 1493 log_err("malloc failure in errinf_to_str"); 1494 return NULL; 1495 } 1496 dname_str(qstate->qinfo.qname, dname); 1497 snprintf(p, left, "validation failure <%s %s %s>:", dname, t, c); 1498 free(t); 1499 free(c); 1500 left -= strlen(p); p += strlen(p); 1501 if(!qstate->errinf) 1502 snprintf(p, left, " misc failure"); 1503 else for(s=qstate->errinf; s; s=s->next) { 1504 snprintf(p, left, " %s", s->str); 1505 left -= strlen(p); p += strlen(p); 1506 } 1507 p = strdup(buf); 1508 if(!p) 1509 log_err("malloc failure in errinf_to_str"); 1510 return p; 1511 } 1512 1513 void errinf_rrset(struct module_qstate* qstate, struct ub_packed_rrset_key *rr) 1514 { 1515 char buf[1024]; 1516 char dname[LDNS_MAX_DOMAINLEN+1]; 1517 char *t, *c; 1518 if(qstate->env->cfg->val_log_level < 2 || !rr) 1519 return; 1520 t = ldns_rr_type2str(ntohs(rr->rk.type)); 1521 c = ldns_rr_class2str(ntohs(rr->rk.rrset_class)); 1522 if(!t || !c) { 1523 free(t); 1524 free(c); 1525 log_err("malloc failure in errinf_rrset"); 1526 return; 1527 } 1528 dname_str(rr->rk.dname, dname); 1529 snprintf(buf, sizeof(buf), "for <%s %s %s>", dname, t, c); 1530 free(t); 1531 free(c); 1532 errinf(qstate, buf); 1533 } 1534 1535 void errinf_dname(struct module_qstate* qstate, const char* str, uint8_t* dname) 1536 { 1537 char b[1024]; 1538 char buf[LDNS_MAX_DOMAINLEN+1]; 1539 if(qstate->env->cfg->val_log_level < 2 || !str || !dname) 1540 return; 1541 dname_str(dname, buf); 1542 snprintf(b, sizeof(b), "%s %s", str, buf); 1543 errinf(qstate, b); 1544 } 1545