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