1b7579f77SDag-Erling Smørgrav /* 2b7579f77SDag-Erling Smørgrav * iterator/iterator.c - iterative resolver DNS query response module 3b7579f77SDag-Erling Smørgrav * 4b7579f77SDag-Erling Smørgrav * Copyright (c) 2007, NLnet Labs. All rights reserved. 5b7579f77SDag-Erling Smørgrav * 6b7579f77SDag-Erling Smørgrav * This software is open source. 7b7579f77SDag-Erling Smørgrav * 8b7579f77SDag-Erling Smørgrav * Redistribution and use in source and binary forms, with or without 9b7579f77SDag-Erling Smørgrav * modification, are permitted provided that the following conditions 10b7579f77SDag-Erling Smørgrav * are met: 11b7579f77SDag-Erling Smørgrav * 12b7579f77SDag-Erling Smørgrav * Redistributions of source code must retain the above copyright notice, 13b7579f77SDag-Erling Smørgrav * this list of conditions and the following disclaimer. 14b7579f77SDag-Erling Smørgrav * 15b7579f77SDag-Erling Smørgrav * Redistributions in binary form must reproduce the above copyright notice, 16b7579f77SDag-Erling Smørgrav * this list of conditions and the following disclaimer in the documentation 17b7579f77SDag-Erling Smørgrav * and/or other materials provided with the distribution. 18b7579f77SDag-Erling Smørgrav * 19b7579f77SDag-Erling Smørgrav * Neither the name of the NLNET LABS nor the names of its contributors may 20b7579f77SDag-Erling Smørgrav * be used to endorse or promote products derived from this software without 21b7579f77SDag-Erling Smørgrav * specific prior written permission. 22b7579f77SDag-Erling Smørgrav * 23b7579f77SDag-Erling Smørgrav * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 2417d15b25SDag-Erling Smørgrav * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 2517d15b25SDag-Erling Smørgrav * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR 2617d15b25SDag-Erling Smørgrav * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 2717d15b25SDag-Erling Smørgrav * HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 2817d15b25SDag-Erling Smørgrav * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED 2917d15b25SDag-Erling Smørgrav * TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR 3017d15b25SDag-Erling Smørgrav * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF 3117d15b25SDag-Erling Smørgrav * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING 3217d15b25SDag-Erling Smørgrav * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS 3317d15b25SDag-Erling Smørgrav * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 34b7579f77SDag-Erling Smørgrav */ 35b7579f77SDag-Erling Smørgrav 36b7579f77SDag-Erling Smørgrav /** 37b7579f77SDag-Erling Smørgrav * \file 38b7579f77SDag-Erling Smørgrav * 39b7579f77SDag-Erling Smørgrav * This file contains a module that performs recusive iterative DNS query 40b7579f77SDag-Erling Smørgrav * processing. 41b7579f77SDag-Erling Smørgrav */ 42b7579f77SDag-Erling Smørgrav 43b7579f77SDag-Erling Smørgrav #include "config.h" 44b7579f77SDag-Erling Smørgrav #include "iterator/iterator.h" 45b7579f77SDag-Erling Smørgrav #include "iterator/iter_utils.h" 46b7579f77SDag-Erling Smørgrav #include "iterator/iter_hints.h" 47b7579f77SDag-Erling Smørgrav #include "iterator/iter_fwd.h" 48b7579f77SDag-Erling Smørgrav #include "iterator/iter_donotq.h" 49b7579f77SDag-Erling Smørgrav #include "iterator/iter_delegpt.h" 50b7579f77SDag-Erling Smørgrav #include "iterator/iter_resptype.h" 51b7579f77SDag-Erling Smørgrav #include "iterator/iter_scrub.h" 52b7579f77SDag-Erling Smørgrav #include "iterator/iter_priv.h" 53b7579f77SDag-Erling Smørgrav #include "validator/val_neg.h" 54b7579f77SDag-Erling Smørgrav #include "services/cache/dns.h" 55b7579f77SDag-Erling Smørgrav #include "services/cache/infra.h" 56b7579f77SDag-Erling Smørgrav #include "util/module.h" 57b7579f77SDag-Erling Smørgrav #include "util/netevent.h" 58b7579f77SDag-Erling Smørgrav #include "util/net_help.h" 59b7579f77SDag-Erling Smørgrav #include "util/regional.h" 60b7579f77SDag-Erling Smørgrav #include "util/data/dname.h" 61b7579f77SDag-Erling Smørgrav #include "util/data/msgencode.h" 62b7579f77SDag-Erling Smørgrav #include "util/fptr_wlist.h" 63b7579f77SDag-Erling Smørgrav #include "util/config_file.h" 6409a3aaf3SDag-Erling Smørgrav #include "util/random.h" 6509a3aaf3SDag-Erling Smørgrav #include "sldns/rrdef.h" 6609a3aaf3SDag-Erling Smørgrav #include "sldns/wire2str.h" 6705ab2901SDag-Erling Smørgrav #include "sldns/str2wire.h" 6809a3aaf3SDag-Erling Smørgrav #include "sldns/parseutil.h" 6909a3aaf3SDag-Erling Smørgrav #include "sldns/sbuffer.h" 70b7579f77SDag-Erling Smørgrav 71b7579f77SDag-Erling Smørgrav int 72b7579f77SDag-Erling Smørgrav iter_init(struct module_env* env, int id) 73b7579f77SDag-Erling Smørgrav { 74b7579f77SDag-Erling Smørgrav struct iter_env* iter_env = (struct iter_env*)calloc(1, 75b7579f77SDag-Erling Smørgrav sizeof(struct iter_env)); 76b7579f77SDag-Erling Smørgrav if(!iter_env) { 77b7579f77SDag-Erling Smørgrav log_err("malloc failure"); 78b7579f77SDag-Erling Smørgrav return 0; 79b7579f77SDag-Erling Smørgrav } 80b7579f77SDag-Erling Smørgrav env->modinfo[id] = (void*)iter_env; 81b7579f77SDag-Erling Smørgrav if(!iter_apply_cfg(iter_env, env->cfg)) { 82b7579f77SDag-Erling Smørgrav log_err("iterator: could not apply configuration settings."); 83b7579f77SDag-Erling Smørgrav return 0; 84b7579f77SDag-Erling Smørgrav } 8505ab2901SDag-Erling Smørgrav 86b7579f77SDag-Erling Smørgrav return 1; 87b7579f77SDag-Erling Smørgrav } 88b7579f77SDag-Erling Smørgrav 8909a3aaf3SDag-Erling Smørgrav /** delete caps_whitelist element */ 9009a3aaf3SDag-Erling Smørgrav static void 9109a3aaf3SDag-Erling Smørgrav caps_free(struct rbnode_t* n, void* ATTR_UNUSED(d)) 9209a3aaf3SDag-Erling Smørgrav { 9309a3aaf3SDag-Erling Smørgrav if(n) { 9409a3aaf3SDag-Erling Smørgrav free(((struct name_tree_node*)n)->name); 9509a3aaf3SDag-Erling Smørgrav free(n); 9609a3aaf3SDag-Erling Smørgrav } 9709a3aaf3SDag-Erling Smørgrav } 9809a3aaf3SDag-Erling Smørgrav 99b7579f77SDag-Erling Smørgrav void 100b7579f77SDag-Erling Smørgrav iter_deinit(struct module_env* env, int id) 101b7579f77SDag-Erling Smørgrav { 102b7579f77SDag-Erling Smørgrav struct iter_env* iter_env; 103b7579f77SDag-Erling Smørgrav if(!env || !env->modinfo[id]) 104b7579f77SDag-Erling Smørgrav return; 105b7579f77SDag-Erling Smørgrav iter_env = (struct iter_env*)env->modinfo[id]; 106b7579f77SDag-Erling Smørgrav free(iter_env->target_fetch_policy); 107b7579f77SDag-Erling Smørgrav priv_delete(iter_env->priv); 108b7579f77SDag-Erling Smørgrav donotq_delete(iter_env->donotq); 10909a3aaf3SDag-Erling Smørgrav if(iter_env->caps_white) { 11009a3aaf3SDag-Erling Smørgrav traverse_postorder(iter_env->caps_white, caps_free, NULL); 11109a3aaf3SDag-Erling Smørgrav free(iter_env->caps_white); 11209a3aaf3SDag-Erling Smørgrav } 113b7579f77SDag-Erling Smørgrav free(iter_env); 114b7579f77SDag-Erling Smørgrav env->modinfo[id] = NULL; 115b7579f77SDag-Erling Smørgrav } 116b7579f77SDag-Erling Smørgrav 117b7579f77SDag-Erling Smørgrav /** new query for iterator */ 118b7579f77SDag-Erling Smørgrav static int 119b7579f77SDag-Erling Smørgrav iter_new(struct module_qstate* qstate, int id) 120b7579f77SDag-Erling Smørgrav { 121b7579f77SDag-Erling Smørgrav struct iter_qstate* iq = (struct iter_qstate*)regional_alloc( 122b7579f77SDag-Erling Smørgrav qstate->region, sizeof(struct iter_qstate)); 123b7579f77SDag-Erling Smørgrav qstate->minfo[id] = iq; 124b7579f77SDag-Erling Smørgrav if(!iq) 125b7579f77SDag-Erling Smørgrav return 0; 126b7579f77SDag-Erling Smørgrav memset(iq, 0, sizeof(*iq)); 127b7579f77SDag-Erling Smørgrav iq->state = INIT_REQUEST_STATE; 128b7579f77SDag-Erling Smørgrav iq->final_state = FINISHED_STATE; 129b7579f77SDag-Erling Smørgrav iq->an_prepend_list = NULL; 130b7579f77SDag-Erling Smørgrav iq->an_prepend_last = NULL; 131b7579f77SDag-Erling Smørgrav iq->ns_prepend_list = NULL; 132b7579f77SDag-Erling Smørgrav iq->ns_prepend_last = NULL; 133b7579f77SDag-Erling Smørgrav iq->dp = NULL; 134b7579f77SDag-Erling Smørgrav iq->depth = 0; 135b7579f77SDag-Erling Smørgrav iq->num_target_queries = 0; 136b7579f77SDag-Erling Smørgrav iq->num_current_queries = 0; 137b7579f77SDag-Erling Smørgrav iq->query_restart_count = 0; 138b7579f77SDag-Erling Smørgrav iq->referral_count = 0; 139b7579f77SDag-Erling Smørgrav iq->sent_count = 0; 14009a3aaf3SDag-Erling Smørgrav iq->ratelimit_ok = 0; 14152df462fSXin LI iq->target_count = NULL; 142b7579f77SDag-Erling Smørgrav iq->wait_priming_stub = 0; 143b7579f77SDag-Erling Smørgrav iq->refetch_glue = 0; 144b7579f77SDag-Erling Smørgrav iq->dnssec_expected = 0; 145b7579f77SDag-Erling Smørgrav iq->dnssec_lame_query = 0; 146b7579f77SDag-Erling Smørgrav iq->chase_flags = qstate->query_flags; 147b7579f77SDag-Erling Smørgrav /* Start with the (current) qname. */ 148b7579f77SDag-Erling Smørgrav iq->qchase = qstate->qinfo; 149b7579f77SDag-Erling Smørgrav outbound_list_init(&iq->outlist); 150*e2d15004SDag-Erling Smørgrav iq->minimise_count = 0; 15105ab2901SDag-Erling Smørgrav if (qstate->env->cfg->qname_minimisation) 15205ab2901SDag-Erling Smørgrav iq->minimisation_state = INIT_MINIMISE_STATE; 15305ab2901SDag-Erling Smørgrav else 15405ab2901SDag-Erling Smørgrav iq->minimisation_state = DONOT_MINIMISE_STATE; 15505ab2901SDag-Erling Smørgrav 15605ab2901SDag-Erling Smørgrav memset(&iq->qinfo_out, 0, sizeof(struct query_info)); 157b7579f77SDag-Erling Smørgrav return 1; 158b7579f77SDag-Erling Smørgrav } 159b7579f77SDag-Erling Smørgrav 160b7579f77SDag-Erling Smørgrav /** 161b7579f77SDag-Erling Smørgrav * Transition to the next state. This can be used to advance a currently 162b7579f77SDag-Erling Smørgrav * processing event. It cannot be used to reactivate a forEvent. 163b7579f77SDag-Erling Smørgrav * 164b7579f77SDag-Erling Smørgrav * @param iq: iterator query state 165b7579f77SDag-Erling Smørgrav * @param nextstate The state to transition to. 166b7579f77SDag-Erling Smørgrav * @return true. This is so this can be called as the return value for the 167b7579f77SDag-Erling Smørgrav * actual process*State() methods. (Transitioning to the next state 168b7579f77SDag-Erling Smørgrav * implies further processing). 169b7579f77SDag-Erling Smørgrav */ 170b7579f77SDag-Erling Smørgrav static int 171b7579f77SDag-Erling Smørgrav next_state(struct iter_qstate* iq, enum iter_state nextstate) 172b7579f77SDag-Erling Smørgrav { 173b7579f77SDag-Erling Smørgrav /* If transitioning to a "response" state, make sure that there is a 174b7579f77SDag-Erling Smørgrav * response */ 175b7579f77SDag-Erling Smørgrav if(iter_state_is_responsestate(nextstate)) { 176b7579f77SDag-Erling Smørgrav if(iq->response == NULL) { 177b7579f77SDag-Erling Smørgrav log_err("transitioning to response state sans " 178b7579f77SDag-Erling Smørgrav "response."); 179b7579f77SDag-Erling Smørgrav } 180b7579f77SDag-Erling Smørgrav } 181b7579f77SDag-Erling Smørgrav iq->state = nextstate; 182b7579f77SDag-Erling Smørgrav return 1; 183b7579f77SDag-Erling Smørgrav } 184b7579f77SDag-Erling Smørgrav 185b7579f77SDag-Erling Smørgrav /** 186b7579f77SDag-Erling Smørgrav * Transition an event to its final state. Final states always either return 187b7579f77SDag-Erling Smørgrav * a result up the module chain, or reactivate a dependent event. Which 18805ab2901SDag-Erling Smørgrav * final state to transition to is set in the module state for the event when 189b7579f77SDag-Erling Smørgrav * it was created, and depends on the original purpose of the event. 190b7579f77SDag-Erling Smørgrav * 191b7579f77SDag-Erling Smørgrav * The response is stored in the qstate->buf buffer. 192b7579f77SDag-Erling Smørgrav * 193b7579f77SDag-Erling Smørgrav * @param iq: iterator query state 194b7579f77SDag-Erling Smørgrav * @return false. This is so this method can be used as the return value for 195b7579f77SDag-Erling Smørgrav * the processState methods. (Transitioning to the final state 196b7579f77SDag-Erling Smørgrav */ 197b7579f77SDag-Erling Smørgrav static int 198b7579f77SDag-Erling Smørgrav final_state(struct iter_qstate* iq) 199b7579f77SDag-Erling Smørgrav { 200b7579f77SDag-Erling Smørgrav return next_state(iq, iq->final_state); 201b7579f77SDag-Erling Smørgrav } 202b7579f77SDag-Erling Smørgrav 203b7579f77SDag-Erling Smørgrav /** 204b7579f77SDag-Erling Smørgrav * Callback routine to handle errors in parent query states 205b7579f77SDag-Erling Smørgrav * @param qstate: query state that failed. 206b7579f77SDag-Erling Smørgrav * @param id: module id. 207b7579f77SDag-Erling Smørgrav * @param super: super state. 208b7579f77SDag-Erling Smørgrav */ 209b7579f77SDag-Erling Smørgrav static void 210b7579f77SDag-Erling Smørgrav error_supers(struct module_qstate* qstate, int id, struct module_qstate* super) 211b7579f77SDag-Erling Smørgrav { 212b7579f77SDag-Erling Smørgrav struct iter_qstate* super_iq = (struct iter_qstate*)super->minfo[id]; 213b7579f77SDag-Erling Smørgrav 214b7579f77SDag-Erling Smørgrav if(qstate->qinfo.qtype == LDNS_RR_TYPE_A || 215b7579f77SDag-Erling Smørgrav qstate->qinfo.qtype == LDNS_RR_TYPE_AAAA) { 216b7579f77SDag-Erling Smørgrav /* mark address as failed. */ 217b7579f77SDag-Erling Smørgrav struct delegpt_ns* dpns = NULL; 218b7579f77SDag-Erling Smørgrav if(super_iq->dp) 219b7579f77SDag-Erling Smørgrav dpns = delegpt_find_ns(super_iq->dp, 220b7579f77SDag-Erling Smørgrav qstate->qinfo.qname, qstate->qinfo.qname_len); 221b7579f77SDag-Erling Smørgrav if(!dpns) { 222b7579f77SDag-Erling Smørgrav /* not interested */ 223b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "subq error, but not interested"); 224b7579f77SDag-Erling Smørgrav log_query_info(VERB_ALGO, "superq", &super->qinfo); 225b7579f77SDag-Erling Smørgrav if(super_iq->dp) 226b7579f77SDag-Erling Smørgrav delegpt_log(VERB_ALGO, super_iq->dp); 227b7579f77SDag-Erling Smørgrav log_assert(0); 228b7579f77SDag-Erling Smørgrav return; 229b7579f77SDag-Erling Smørgrav } else { 230b7579f77SDag-Erling Smørgrav /* see if the failure did get (parent-lame) info */ 231b7579f77SDag-Erling Smørgrav if(!cache_fill_missing(super->env, 232b7579f77SDag-Erling Smørgrav super_iq->qchase.qclass, super->region, 233b7579f77SDag-Erling Smørgrav super_iq->dp)) 234b7579f77SDag-Erling Smørgrav log_err("out of memory adding missing"); 235b7579f77SDag-Erling Smørgrav } 236b7579f77SDag-Erling Smørgrav dpns->resolved = 1; /* mark as failed */ 237b7579f77SDag-Erling Smørgrav super_iq->num_target_queries--; 238b7579f77SDag-Erling Smørgrav } 239b7579f77SDag-Erling Smørgrav if(qstate->qinfo.qtype == LDNS_RR_TYPE_NS) { 240b7579f77SDag-Erling Smørgrav /* prime failed to get delegation */ 241b7579f77SDag-Erling Smørgrav super_iq->dp = NULL; 242b7579f77SDag-Erling Smørgrav } 243b7579f77SDag-Erling Smørgrav /* evaluate targets again */ 244b7579f77SDag-Erling Smørgrav super_iq->state = QUERYTARGETS_STATE; 245b7579f77SDag-Erling Smørgrav /* super becomes runnable, and will process this change */ 246b7579f77SDag-Erling Smørgrav } 247b7579f77SDag-Erling Smørgrav 248b7579f77SDag-Erling Smørgrav /** 249b7579f77SDag-Erling Smørgrav * Return an error to the client 250b7579f77SDag-Erling Smørgrav * @param qstate: our query state 251b7579f77SDag-Erling Smørgrav * @param id: module id 252b7579f77SDag-Erling Smørgrav * @param rcode: error code (DNS errcode). 253b7579f77SDag-Erling Smørgrav * @return: 0 for use by caller, to make notation easy, like: 254b7579f77SDag-Erling Smørgrav * return error_response(..). 255b7579f77SDag-Erling Smørgrav */ 256b7579f77SDag-Erling Smørgrav static int 257b7579f77SDag-Erling Smørgrav error_response(struct module_qstate* qstate, int id, int rcode) 258b7579f77SDag-Erling Smørgrav { 259b7579f77SDag-Erling Smørgrav verbose(VERB_QUERY, "return error response %s", 26017d15b25SDag-Erling Smørgrav sldns_lookup_by_id(sldns_rcodes, rcode)? 26117d15b25SDag-Erling Smørgrav sldns_lookup_by_id(sldns_rcodes, rcode)->name:"??"); 262b7579f77SDag-Erling Smørgrav qstate->return_rcode = rcode; 263b7579f77SDag-Erling Smørgrav qstate->return_msg = NULL; 264b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_finished; 265b7579f77SDag-Erling Smørgrav return 0; 266b7579f77SDag-Erling Smørgrav } 267b7579f77SDag-Erling Smørgrav 268b7579f77SDag-Erling Smørgrav /** 269b7579f77SDag-Erling Smørgrav * Return an error to the client and cache the error code in the 270b7579f77SDag-Erling Smørgrav * message cache (so per qname, qtype, qclass). 271b7579f77SDag-Erling Smørgrav * @param qstate: our query state 272b7579f77SDag-Erling Smørgrav * @param id: module id 273b7579f77SDag-Erling Smørgrav * @param rcode: error code (DNS errcode). 274b7579f77SDag-Erling Smørgrav * @return: 0 for use by caller, to make notation easy, like: 275b7579f77SDag-Erling Smørgrav * return error_response(..). 276b7579f77SDag-Erling Smørgrav */ 277b7579f77SDag-Erling Smørgrav static int 278b7579f77SDag-Erling Smørgrav error_response_cache(struct module_qstate* qstate, int id, int rcode) 279b7579f77SDag-Erling Smørgrav { 280b7579f77SDag-Erling Smørgrav /* store in cache */ 281b7579f77SDag-Erling Smørgrav struct reply_info err; 282ff825849SDag-Erling Smørgrav if(qstate->prefetch_leeway > NORR_TTL) { 283ff825849SDag-Erling Smørgrav verbose(VERB_ALGO, "error response for prefetch in cache"); 284ff825849SDag-Erling Smørgrav /* attempt to adjust the cache entry prefetch */ 285ff825849SDag-Erling Smørgrav if(dns_cache_prefetch_adjust(qstate->env, &qstate->qinfo, 286ff825849SDag-Erling Smørgrav NORR_TTL, qstate->query_flags)) 287ff825849SDag-Erling Smørgrav return error_response(qstate, id, rcode); 288ff825849SDag-Erling Smørgrav /* if that fails (not in cache), fall through to store err */ 289ff825849SDag-Erling Smørgrav } 290b7579f77SDag-Erling Smørgrav memset(&err, 0, sizeof(err)); 291b7579f77SDag-Erling Smørgrav err.flags = (uint16_t)(BIT_QR | BIT_RA); 292b7579f77SDag-Erling Smørgrav FLAGS_SET_RCODE(err.flags, rcode); 293b7579f77SDag-Erling Smørgrav err.qdcount = 1; 294b7579f77SDag-Erling Smørgrav err.ttl = NORR_TTL; 295b7579f77SDag-Erling Smørgrav err.prefetch_ttl = PREFETCH_TTL_CALC(err.ttl); 296b7579f77SDag-Erling Smørgrav /* do not waste time trying to validate this servfail */ 297b7579f77SDag-Erling Smørgrav err.security = sec_status_indeterminate; 298b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "store error response in message cache"); 299ff825849SDag-Erling Smørgrav iter_dns_store(qstate->env, &qstate->qinfo, &err, 0, 0, 0, NULL, 300ff825849SDag-Erling Smørgrav qstate->query_flags); 301b7579f77SDag-Erling Smørgrav return error_response(qstate, id, rcode); 302b7579f77SDag-Erling Smørgrav } 303b7579f77SDag-Erling Smørgrav 304b7579f77SDag-Erling Smørgrav /** check if prepend item is duplicate item */ 305b7579f77SDag-Erling Smørgrav static int 306b7579f77SDag-Erling Smørgrav prepend_is_duplicate(struct ub_packed_rrset_key** sets, size_t to, 307b7579f77SDag-Erling Smørgrav struct ub_packed_rrset_key* dup) 308b7579f77SDag-Erling Smørgrav { 309b7579f77SDag-Erling Smørgrav size_t i; 310b7579f77SDag-Erling Smørgrav for(i=0; i<to; i++) { 311b7579f77SDag-Erling Smørgrav if(sets[i]->rk.type == dup->rk.type && 312b7579f77SDag-Erling Smørgrav sets[i]->rk.rrset_class == dup->rk.rrset_class && 313b7579f77SDag-Erling Smørgrav sets[i]->rk.dname_len == dup->rk.dname_len && 314b7579f77SDag-Erling Smørgrav query_dname_compare(sets[i]->rk.dname, dup->rk.dname) 315b7579f77SDag-Erling Smørgrav == 0) 316b7579f77SDag-Erling Smørgrav return 1; 317b7579f77SDag-Erling Smørgrav } 318b7579f77SDag-Erling Smørgrav return 0; 319b7579f77SDag-Erling Smørgrav } 320b7579f77SDag-Erling Smørgrav 321b7579f77SDag-Erling Smørgrav /** prepend the prepend list in the answer and authority section of dns_msg */ 322b7579f77SDag-Erling Smørgrav static int 323b7579f77SDag-Erling Smørgrav iter_prepend(struct iter_qstate* iq, struct dns_msg* msg, 324b7579f77SDag-Erling Smørgrav struct regional* region) 325b7579f77SDag-Erling Smørgrav { 326b7579f77SDag-Erling Smørgrav struct iter_prep_list* p; 327b7579f77SDag-Erling Smørgrav struct ub_packed_rrset_key** sets; 328b7579f77SDag-Erling Smørgrav size_t num_an = 0, num_ns = 0;; 329b7579f77SDag-Erling Smørgrav for(p = iq->an_prepend_list; p; p = p->next) 330b7579f77SDag-Erling Smørgrav num_an++; 331b7579f77SDag-Erling Smørgrav for(p = iq->ns_prepend_list; p; p = p->next) 332b7579f77SDag-Erling Smørgrav num_ns++; 333b7579f77SDag-Erling Smørgrav if(num_an + num_ns == 0) 334b7579f77SDag-Erling Smørgrav return 1; 335b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "prepending %d rrsets", (int)num_an + (int)num_ns); 33609a3aaf3SDag-Erling Smørgrav if(num_an > RR_COUNT_MAX || num_ns > RR_COUNT_MAX || 33709a3aaf3SDag-Erling Smørgrav msg->rep->rrset_count > RR_COUNT_MAX) return 0; /* overflow */ 338b7579f77SDag-Erling Smørgrav sets = regional_alloc(region, (num_an+num_ns+msg->rep->rrset_count) * 339b7579f77SDag-Erling Smørgrav sizeof(struct ub_packed_rrset_key*)); 340b7579f77SDag-Erling Smørgrav if(!sets) 341b7579f77SDag-Erling Smørgrav return 0; 342b7579f77SDag-Erling Smørgrav /* ANSWER section */ 343b7579f77SDag-Erling Smørgrav num_an = 0; 344b7579f77SDag-Erling Smørgrav for(p = iq->an_prepend_list; p; p = p->next) { 345b7579f77SDag-Erling Smørgrav sets[num_an++] = p->rrset; 346b7579f77SDag-Erling Smørgrav } 347b7579f77SDag-Erling Smørgrav memcpy(sets+num_an, msg->rep->rrsets, msg->rep->an_numrrsets * 348b7579f77SDag-Erling Smørgrav sizeof(struct ub_packed_rrset_key*)); 349b7579f77SDag-Erling Smørgrav /* AUTH section */ 350b7579f77SDag-Erling Smørgrav num_ns = 0; 351b7579f77SDag-Erling Smørgrav for(p = iq->ns_prepend_list; p; p = p->next) { 352b7579f77SDag-Erling Smørgrav if(prepend_is_duplicate(sets+msg->rep->an_numrrsets+num_an, 353b7579f77SDag-Erling Smørgrav num_ns, p->rrset) || prepend_is_duplicate( 354b7579f77SDag-Erling Smørgrav msg->rep->rrsets+msg->rep->an_numrrsets, 355b7579f77SDag-Erling Smørgrav msg->rep->ns_numrrsets, p->rrset)) 356b7579f77SDag-Erling Smørgrav continue; 357b7579f77SDag-Erling Smørgrav sets[msg->rep->an_numrrsets + num_an + num_ns++] = p->rrset; 358b7579f77SDag-Erling Smørgrav } 359b7579f77SDag-Erling Smørgrav memcpy(sets + num_an + msg->rep->an_numrrsets + num_ns, 360b7579f77SDag-Erling Smørgrav msg->rep->rrsets + msg->rep->an_numrrsets, 361b7579f77SDag-Erling Smørgrav (msg->rep->ns_numrrsets + msg->rep->ar_numrrsets) * 362b7579f77SDag-Erling Smørgrav sizeof(struct ub_packed_rrset_key*)); 363b7579f77SDag-Erling Smørgrav 364b7579f77SDag-Erling Smørgrav /* NXDOMAIN rcode can stay if we prepended DNAME/CNAMEs, because 365b7579f77SDag-Erling Smørgrav * this is what recursors should give. */ 366b7579f77SDag-Erling Smørgrav msg->rep->rrset_count += num_an + num_ns; 367b7579f77SDag-Erling Smørgrav msg->rep->an_numrrsets += num_an; 368b7579f77SDag-Erling Smørgrav msg->rep->ns_numrrsets += num_ns; 369b7579f77SDag-Erling Smørgrav msg->rep->rrsets = sets; 370b7579f77SDag-Erling Smørgrav return 1; 371b7579f77SDag-Erling Smørgrav } 372b7579f77SDag-Erling Smørgrav 373b7579f77SDag-Erling Smørgrav /** 374b7579f77SDag-Erling Smørgrav * Add rrset to ANSWER prepend list 375b7579f77SDag-Erling Smørgrav * @param qstate: query state. 376b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 377b7579f77SDag-Erling Smørgrav * @param rrset: rrset to add. 378b7579f77SDag-Erling Smørgrav * @return false on failure (malloc). 379b7579f77SDag-Erling Smørgrav */ 380b7579f77SDag-Erling Smørgrav static int 381b7579f77SDag-Erling Smørgrav iter_add_prepend_answer(struct module_qstate* qstate, struct iter_qstate* iq, 382b7579f77SDag-Erling Smørgrav struct ub_packed_rrset_key* rrset) 383b7579f77SDag-Erling Smørgrav { 384b7579f77SDag-Erling Smørgrav struct iter_prep_list* p = (struct iter_prep_list*)regional_alloc( 385b7579f77SDag-Erling Smørgrav qstate->region, sizeof(struct iter_prep_list)); 386b7579f77SDag-Erling Smørgrav if(!p) 387b7579f77SDag-Erling Smørgrav return 0; 388b7579f77SDag-Erling Smørgrav p->rrset = rrset; 389b7579f77SDag-Erling Smørgrav p->next = NULL; 390b7579f77SDag-Erling Smørgrav /* add at end */ 391b7579f77SDag-Erling Smørgrav if(iq->an_prepend_last) 392b7579f77SDag-Erling Smørgrav iq->an_prepend_last->next = p; 393b7579f77SDag-Erling Smørgrav else iq->an_prepend_list = p; 394b7579f77SDag-Erling Smørgrav iq->an_prepend_last = p; 395b7579f77SDag-Erling Smørgrav return 1; 396b7579f77SDag-Erling Smørgrav } 397b7579f77SDag-Erling Smørgrav 398b7579f77SDag-Erling Smørgrav /** 399b7579f77SDag-Erling Smørgrav * Add rrset to AUTHORITY prepend list 400b7579f77SDag-Erling Smørgrav * @param qstate: query state. 401b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 402b7579f77SDag-Erling Smørgrav * @param rrset: rrset to add. 403b7579f77SDag-Erling Smørgrav * @return false on failure (malloc). 404b7579f77SDag-Erling Smørgrav */ 405b7579f77SDag-Erling Smørgrav static int 406b7579f77SDag-Erling Smørgrav iter_add_prepend_auth(struct module_qstate* qstate, struct iter_qstate* iq, 407b7579f77SDag-Erling Smørgrav struct ub_packed_rrset_key* rrset) 408b7579f77SDag-Erling Smørgrav { 409b7579f77SDag-Erling Smørgrav struct iter_prep_list* p = (struct iter_prep_list*)regional_alloc( 410b7579f77SDag-Erling Smørgrav qstate->region, sizeof(struct iter_prep_list)); 411b7579f77SDag-Erling Smørgrav if(!p) 412b7579f77SDag-Erling Smørgrav return 0; 413b7579f77SDag-Erling Smørgrav p->rrset = rrset; 414b7579f77SDag-Erling Smørgrav p->next = NULL; 415b7579f77SDag-Erling Smørgrav /* add at end */ 416b7579f77SDag-Erling Smørgrav if(iq->ns_prepend_last) 417b7579f77SDag-Erling Smørgrav iq->ns_prepend_last->next = p; 418b7579f77SDag-Erling Smørgrav else iq->ns_prepend_list = p; 419b7579f77SDag-Erling Smørgrav iq->ns_prepend_last = p; 420b7579f77SDag-Erling Smørgrav return 1; 421b7579f77SDag-Erling Smørgrav } 422b7579f77SDag-Erling Smørgrav 423b7579f77SDag-Erling Smørgrav /** 424b7579f77SDag-Erling Smørgrav * Given a CNAME response (defined as a response containing a CNAME or DNAME 425b7579f77SDag-Erling Smørgrav * that does not answer the request), process the response, modifying the 426b7579f77SDag-Erling Smørgrav * state as necessary. This follows the CNAME/DNAME chain and returns the 427b7579f77SDag-Erling Smørgrav * final query name. 428b7579f77SDag-Erling Smørgrav * 429b7579f77SDag-Erling Smørgrav * sets the new query name, after following the CNAME/DNAME chain. 430b7579f77SDag-Erling Smørgrav * @param qstate: query state. 431b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 432b7579f77SDag-Erling Smørgrav * @param msg: the response. 433b7579f77SDag-Erling Smørgrav * @param mname: returned target new query name. 434b7579f77SDag-Erling Smørgrav * @param mname_len: length of mname. 435b7579f77SDag-Erling Smørgrav * @return false on (malloc) error. 436b7579f77SDag-Erling Smørgrav */ 437b7579f77SDag-Erling Smørgrav static int 438b7579f77SDag-Erling Smørgrav handle_cname_response(struct module_qstate* qstate, struct iter_qstate* iq, 439b7579f77SDag-Erling Smørgrav struct dns_msg* msg, uint8_t** mname, size_t* mname_len) 440b7579f77SDag-Erling Smørgrav { 441b7579f77SDag-Erling Smørgrav size_t i; 442b7579f77SDag-Erling Smørgrav /* Start with the (current) qname. */ 443b7579f77SDag-Erling Smørgrav *mname = iq->qchase.qname; 444b7579f77SDag-Erling Smørgrav *mname_len = iq->qchase.qname_len; 445b7579f77SDag-Erling Smørgrav 446b7579f77SDag-Erling Smørgrav /* Iterate over the ANSWER rrsets in order, looking for CNAMEs and 447b7579f77SDag-Erling Smørgrav * DNAMES. */ 448b7579f77SDag-Erling Smørgrav for(i=0; i<msg->rep->an_numrrsets; i++) { 449b7579f77SDag-Erling Smørgrav struct ub_packed_rrset_key* r = msg->rep->rrsets[i]; 450b7579f77SDag-Erling Smørgrav /* If there is a (relevant) DNAME, add it to the list. 451b7579f77SDag-Erling Smørgrav * We always expect there to be CNAME that was generated 452b7579f77SDag-Erling Smørgrav * by this DNAME following, so we don't process the DNAME 453b7579f77SDag-Erling Smørgrav * directly. */ 454b7579f77SDag-Erling Smørgrav if(ntohs(r->rk.type) == LDNS_RR_TYPE_DNAME && 455b7579f77SDag-Erling Smørgrav dname_strict_subdomain_c(*mname, r->rk.dname)) { 456b7579f77SDag-Erling Smørgrav if(!iter_add_prepend_answer(qstate, iq, r)) 457b7579f77SDag-Erling Smørgrav return 0; 458b7579f77SDag-Erling Smørgrav continue; 459b7579f77SDag-Erling Smørgrav } 460b7579f77SDag-Erling Smørgrav 461b7579f77SDag-Erling Smørgrav if(ntohs(r->rk.type) == LDNS_RR_TYPE_CNAME && 462b7579f77SDag-Erling Smørgrav query_dname_compare(*mname, r->rk.dname) == 0) { 463b7579f77SDag-Erling Smørgrav /* Add this relevant CNAME rrset to the prepend list.*/ 464b7579f77SDag-Erling Smørgrav if(!iter_add_prepend_answer(qstate, iq, r)) 465b7579f77SDag-Erling Smørgrav return 0; 466b7579f77SDag-Erling Smørgrav get_cname_target(r, mname, mname_len); 467b7579f77SDag-Erling Smørgrav } 468b7579f77SDag-Erling Smørgrav 469b7579f77SDag-Erling Smørgrav /* Other rrsets in the section are ignored. */ 470b7579f77SDag-Erling Smørgrav } 471b7579f77SDag-Erling Smørgrav /* add authority rrsets to authority prepend, for wildcarded CNAMEs */ 472b7579f77SDag-Erling Smørgrav for(i=msg->rep->an_numrrsets; i<msg->rep->an_numrrsets + 473b7579f77SDag-Erling Smørgrav msg->rep->ns_numrrsets; i++) { 474b7579f77SDag-Erling Smørgrav struct ub_packed_rrset_key* r = msg->rep->rrsets[i]; 475b7579f77SDag-Erling Smørgrav /* only add NSEC/NSEC3, as they may be needed for validation */ 476b7579f77SDag-Erling Smørgrav if(ntohs(r->rk.type) == LDNS_RR_TYPE_NSEC || 477b7579f77SDag-Erling Smørgrav ntohs(r->rk.type) == LDNS_RR_TYPE_NSEC3) { 478b7579f77SDag-Erling Smørgrav if(!iter_add_prepend_auth(qstate, iq, r)) 479b7579f77SDag-Erling Smørgrav return 0; 480b7579f77SDag-Erling Smørgrav } 481b7579f77SDag-Erling Smørgrav } 482b7579f77SDag-Erling Smørgrav return 1; 483b7579f77SDag-Erling Smørgrav } 484b7579f77SDag-Erling Smørgrav 48509a3aaf3SDag-Erling Smørgrav /** see if target name is caps-for-id whitelisted */ 48609a3aaf3SDag-Erling Smørgrav static int 48709a3aaf3SDag-Erling Smørgrav is_caps_whitelisted(struct iter_env* ie, struct iter_qstate* iq) 48809a3aaf3SDag-Erling Smørgrav { 48909a3aaf3SDag-Erling Smørgrav if(!ie->caps_white) return 0; /* no whitelist, or no capsforid */ 49009a3aaf3SDag-Erling Smørgrav return name_tree_lookup(ie->caps_white, iq->qchase.qname, 49109a3aaf3SDag-Erling Smørgrav iq->qchase.qname_len, dname_count_labels(iq->qchase.qname), 49209a3aaf3SDag-Erling Smørgrav iq->qchase.qclass) != NULL; 49309a3aaf3SDag-Erling Smørgrav } 49409a3aaf3SDag-Erling Smørgrav 49552df462fSXin LI /** create target count structure for this query */ 49652df462fSXin LI static void 49752df462fSXin LI target_count_create(struct iter_qstate* iq) 49852df462fSXin LI { 49952df462fSXin LI if(!iq->target_count) { 50052df462fSXin LI iq->target_count = (int*)calloc(2, sizeof(int)); 50152df462fSXin LI /* if calloc fails we simply do not track this number */ 50252df462fSXin LI if(iq->target_count) 50352df462fSXin LI iq->target_count[0] = 1; 50452df462fSXin LI } 50552df462fSXin LI } 50652df462fSXin LI 50752df462fSXin LI static void 50852df462fSXin LI target_count_increase(struct iter_qstate* iq, int num) 50952df462fSXin LI { 51052df462fSXin LI target_count_create(iq); 51152df462fSXin LI if(iq->target_count) 51252df462fSXin LI iq->target_count[1] += num; 51352df462fSXin LI } 51452df462fSXin LI 515b7579f77SDag-Erling Smørgrav /** 516b7579f77SDag-Erling Smørgrav * Generate a subrequest. 517b7579f77SDag-Erling Smørgrav * Generate a local request event. Local events are tied to this module, and 51805ab2901SDag-Erling Smørgrav * have a corresponding (first tier) event that is waiting for this event to 519b7579f77SDag-Erling Smørgrav * resolve to continue. 520b7579f77SDag-Erling Smørgrav * 521b7579f77SDag-Erling Smørgrav * @param qname The query name for this request. 522b7579f77SDag-Erling Smørgrav * @param qnamelen length of qname 523b7579f77SDag-Erling Smørgrav * @param qtype The query type for this request. 524b7579f77SDag-Erling Smørgrav * @param qclass The query class for this request. 525b7579f77SDag-Erling Smørgrav * @param qstate The event that is generating this event. 526b7579f77SDag-Erling Smørgrav * @param id: module id. 527b7579f77SDag-Erling Smørgrav * @param iq: The iterator state that is generating this event. 528b7579f77SDag-Erling Smørgrav * @param initial_state The initial response state (normally this 529b7579f77SDag-Erling Smørgrav * is QUERY_RESP_STATE, unless it is known that the request won't 530b7579f77SDag-Erling Smørgrav * need iterative processing 531b7579f77SDag-Erling Smørgrav * @param finalstate The final state for the response to this request. 532b7579f77SDag-Erling Smørgrav * @param subq_ret: if newly allocated, the subquerystate, or NULL if it does 533b7579f77SDag-Erling Smørgrav * not need initialisation. 534b7579f77SDag-Erling Smørgrav * @param v: if true, validation is done on the subquery. 535b7579f77SDag-Erling Smørgrav * @return false on error (malloc). 536b7579f77SDag-Erling Smørgrav */ 537b7579f77SDag-Erling Smørgrav static int 538b7579f77SDag-Erling Smørgrav generate_sub_request(uint8_t* qname, size_t qnamelen, uint16_t qtype, 539b7579f77SDag-Erling Smørgrav uint16_t qclass, struct module_qstate* qstate, int id, 540b7579f77SDag-Erling Smørgrav struct iter_qstate* iq, enum iter_state initial_state, 541b7579f77SDag-Erling Smørgrav enum iter_state finalstate, struct module_qstate** subq_ret, int v) 542b7579f77SDag-Erling Smørgrav { 543b7579f77SDag-Erling Smørgrav struct module_qstate* subq = NULL; 544b7579f77SDag-Erling Smørgrav struct iter_qstate* subiq = NULL; 545b7579f77SDag-Erling Smørgrav uint16_t qflags = 0; /* OPCODE QUERY, no flags */ 546b7579f77SDag-Erling Smørgrav struct query_info qinf; 547b7579f77SDag-Erling Smørgrav int prime = (finalstate == PRIME_RESP_STATE)?1:0; 548ff825849SDag-Erling Smørgrav int valrec = 0; 549b7579f77SDag-Erling Smørgrav qinf.qname = qname; 550b7579f77SDag-Erling Smørgrav qinf.qname_len = qnamelen; 551b7579f77SDag-Erling Smørgrav qinf.qtype = qtype; 552b7579f77SDag-Erling Smørgrav qinf.qclass = qclass; 553b7579f77SDag-Erling Smørgrav 554b7579f77SDag-Erling Smørgrav /* RD should be set only when sending the query back through the INIT 555b7579f77SDag-Erling Smørgrav * state. */ 556b7579f77SDag-Erling Smørgrav if(initial_state == INIT_REQUEST_STATE) 557b7579f77SDag-Erling Smørgrav qflags |= BIT_RD; 558b7579f77SDag-Erling Smørgrav /* We set the CD flag so we can send this through the "head" of 559b7579f77SDag-Erling Smørgrav * the resolution chain, which might have a validator. We are 560b7579f77SDag-Erling Smørgrav * uninterested in validating things not on the direct resolution 561b7579f77SDag-Erling Smørgrav * path. */ 562ff825849SDag-Erling Smørgrav if(!v) { 563b7579f77SDag-Erling Smørgrav qflags |= BIT_CD; 564ff825849SDag-Erling Smørgrav valrec = 1; 565ff825849SDag-Erling Smørgrav } 566b7579f77SDag-Erling Smørgrav 567b7579f77SDag-Erling Smørgrav /* attach subquery, lookup existing or make a new one */ 568b7579f77SDag-Erling Smørgrav fptr_ok(fptr_whitelist_modenv_attach_sub(qstate->env->attach_sub)); 569ff825849SDag-Erling Smørgrav if(!(*qstate->env->attach_sub)(qstate, &qinf, qflags, prime, valrec, 570ff825849SDag-Erling Smørgrav &subq)) { 571b7579f77SDag-Erling Smørgrav return 0; 572b7579f77SDag-Erling Smørgrav } 573b7579f77SDag-Erling Smørgrav *subq_ret = subq; 574b7579f77SDag-Erling Smørgrav if(subq) { 575b7579f77SDag-Erling Smørgrav /* initialise the new subquery */ 576b7579f77SDag-Erling Smørgrav subq->curmod = id; 577b7579f77SDag-Erling Smørgrav subq->ext_state[id] = module_state_initial; 578b7579f77SDag-Erling Smørgrav subq->minfo[id] = regional_alloc(subq->region, 579b7579f77SDag-Erling Smørgrav sizeof(struct iter_qstate)); 580b7579f77SDag-Erling Smørgrav if(!subq->minfo[id]) { 581b7579f77SDag-Erling Smørgrav log_err("init subq: out of memory"); 582b7579f77SDag-Erling Smørgrav fptr_ok(fptr_whitelist_modenv_kill_sub( 583b7579f77SDag-Erling Smørgrav qstate->env->kill_sub)); 584b7579f77SDag-Erling Smørgrav (*qstate->env->kill_sub)(subq); 585b7579f77SDag-Erling Smørgrav return 0; 586b7579f77SDag-Erling Smørgrav } 587b7579f77SDag-Erling Smørgrav subiq = (struct iter_qstate*)subq->minfo[id]; 588b7579f77SDag-Erling Smørgrav memset(subiq, 0, sizeof(*subiq)); 589b7579f77SDag-Erling Smørgrav subiq->num_target_queries = 0; 59052df462fSXin LI target_count_create(iq); 59152df462fSXin LI subiq->target_count = iq->target_count; 59252df462fSXin LI if(iq->target_count) 59352df462fSXin LI iq->target_count[0] ++; /* extra reference */ 594b7579f77SDag-Erling Smørgrav subiq->num_current_queries = 0; 595b7579f77SDag-Erling Smørgrav subiq->depth = iq->depth+1; 596b7579f77SDag-Erling Smørgrav outbound_list_init(&subiq->outlist); 597b7579f77SDag-Erling Smørgrav subiq->state = initial_state; 598b7579f77SDag-Erling Smørgrav subiq->final_state = finalstate; 599b7579f77SDag-Erling Smørgrav subiq->qchase = subq->qinfo; 600b7579f77SDag-Erling Smørgrav subiq->chase_flags = subq->query_flags; 601b7579f77SDag-Erling Smørgrav subiq->refetch_glue = 0; 60205ab2901SDag-Erling Smørgrav if(qstate->env->cfg->qname_minimisation) 60305ab2901SDag-Erling Smørgrav subiq->minimisation_state = INIT_MINIMISE_STATE; 60405ab2901SDag-Erling Smørgrav else 60505ab2901SDag-Erling Smørgrav subiq->minimisation_state = DONOT_MINIMISE_STATE; 60605ab2901SDag-Erling Smørgrav memset(&subiq->qinfo_out, 0, sizeof(struct query_info)); 607b7579f77SDag-Erling Smørgrav } 608b7579f77SDag-Erling Smørgrav return 1; 609b7579f77SDag-Erling Smørgrav } 610b7579f77SDag-Erling Smørgrav 611b7579f77SDag-Erling Smørgrav /** 612b7579f77SDag-Erling Smørgrav * Generate and send a root priming request. 613b7579f77SDag-Erling Smørgrav * @param qstate: the qtstate that triggered the need to prime. 614b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 615b7579f77SDag-Erling Smørgrav * @param id: module id. 616b7579f77SDag-Erling Smørgrav * @param qclass: the class to prime. 617b7579f77SDag-Erling Smørgrav * @return 0 on failure 618b7579f77SDag-Erling Smørgrav */ 619b7579f77SDag-Erling Smørgrav static int 620b7579f77SDag-Erling Smørgrav prime_root(struct module_qstate* qstate, struct iter_qstate* iq, int id, 621b7579f77SDag-Erling Smørgrav uint16_t qclass) 622b7579f77SDag-Erling Smørgrav { 623b7579f77SDag-Erling Smørgrav struct delegpt* dp; 624b7579f77SDag-Erling Smørgrav struct module_qstate* subq; 625b7579f77SDag-Erling Smørgrav verbose(VERB_DETAIL, "priming . %s NS", 62617d15b25SDag-Erling Smørgrav sldns_lookup_by_id(sldns_rr_classes, (int)qclass)? 62717d15b25SDag-Erling Smørgrav sldns_lookup_by_id(sldns_rr_classes, (int)qclass)->name:"??"); 628b7579f77SDag-Erling Smørgrav dp = hints_lookup_root(qstate->env->hints, qclass); 629b7579f77SDag-Erling Smørgrav if(!dp) { 630b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "Cannot prime due to lack of hints"); 631b7579f77SDag-Erling Smørgrav return 0; 632b7579f77SDag-Erling Smørgrav } 633b7579f77SDag-Erling Smørgrav /* Priming requests start at the QUERYTARGETS state, skipping 634b7579f77SDag-Erling Smørgrav * the normal INIT state logic (which would cause an infloop). */ 635b7579f77SDag-Erling Smørgrav if(!generate_sub_request((uint8_t*)"\000", 1, LDNS_RR_TYPE_NS, 636b7579f77SDag-Erling Smørgrav qclass, qstate, id, iq, QUERYTARGETS_STATE, PRIME_RESP_STATE, 637b7579f77SDag-Erling Smørgrav &subq, 0)) { 638b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "could not prime root"); 639b7579f77SDag-Erling Smørgrav return 0; 640b7579f77SDag-Erling Smørgrav } 641b7579f77SDag-Erling Smørgrav if(subq) { 642b7579f77SDag-Erling Smørgrav struct iter_qstate* subiq = 643b7579f77SDag-Erling Smørgrav (struct iter_qstate*)subq->minfo[id]; 644b7579f77SDag-Erling Smørgrav /* Set the initial delegation point to the hint. 645b7579f77SDag-Erling Smørgrav * copy dp, it is now part of the root prime query. 646b7579f77SDag-Erling Smørgrav * dp was part of in the fixed hints structure. */ 647b7579f77SDag-Erling Smørgrav subiq->dp = delegpt_copy(dp, subq->region); 648b7579f77SDag-Erling Smørgrav if(!subiq->dp) { 649b7579f77SDag-Erling Smørgrav log_err("out of memory priming root, copydp"); 650b7579f77SDag-Erling Smørgrav fptr_ok(fptr_whitelist_modenv_kill_sub( 651b7579f77SDag-Erling Smørgrav qstate->env->kill_sub)); 652b7579f77SDag-Erling Smørgrav (*qstate->env->kill_sub)(subq); 653b7579f77SDag-Erling Smørgrav return 0; 654b7579f77SDag-Erling Smørgrav } 655b7579f77SDag-Erling Smørgrav /* there should not be any target queries. */ 656b7579f77SDag-Erling Smørgrav subiq->num_target_queries = 0; 657b7579f77SDag-Erling Smørgrav subiq->dnssec_expected = iter_indicates_dnssec( 658b7579f77SDag-Erling Smørgrav qstate->env, subiq->dp, NULL, subq->qinfo.qclass); 659b7579f77SDag-Erling Smørgrav } 660b7579f77SDag-Erling Smørgrav 661b7579f77SDag-Erling Smørgrav /* this module stops, our submodule starts, and does the query. */ 662b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_wait_subquery; 663b7579f77SDag-Erling Smørgrav return 1; 664b7579f77SDag-Erling Smørgrav } 665b7579f77SDag-Erling Smørgrav 666b7579f77SDag-Erling Smørgrav /** 667b7579f77SDag-Erling Smørgrav * Generate and process a stub priming request. This method tests for the 668b7579f77SDag-Erling Smørgrav * need to prime a stub zone, so it is safe to call for every request. 669b7579f77SDag-Erling Smørgrav * 670b7579f77SDag-Erling Smørgrav * @param qstate: the qtstate that triggered the need to prime. 671b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 672b7579f77SDag-Erling Smørgrav * @param id: module id. 673b7579f77SDag-Erling Smørgrav * @param qname: request name. 674b7579f77SDag-Erling Smørgrav * @param qclass: request class. 675b7579f77SDag-Erling Smørgrav * @return true if a priming subrequest was made, false if not. The will only 676b7579f77SDag-Erling Smørgrav * issue a priming request if it detects an unprimed stub. 677b7579f77SDag-Erling Smørgrav * Uses value of 2 to signal during stub-prime in root-prime situation 678b7579f77SDag-Erling Smørgrav * that a noprime-stub is available and resolution can continue. 679b7579f77SDag-Erling Smørgrav */ 680b7579f77SDag-Erling Smørgrav static int 681b7579f77SDag-Erling Smørgrav prime_stub(struct module_qstate* qstate, struct iter_qstate* iq, int id, 682b7579f77SDag-Erling Smørgrav uint8_t* qname, uint16_t qclass) 683b7579f77SDag-Erling Smørgrav { 684b7579f77SDag-Erling Smørgrav /* Lookup the stub hint. This will return null if the stub doesn't 685b7579f77SDag-Erling Smørgrav * need to be re-primed. */ 686b7579f77SDag-Erling Smørgrav struct iter_hints_stub* stub; 687b7579f77SDag-Erling Smørgrav struct delegpt* stub_dp; 688b7579f77SDag-Erling Smørgrav struct module_qstate* subq; 689b7579f77SDag-Erling Smørgrav 690b7579f77SDag-Erling Smørgrav if(!qname) return 0; 691b7579f77SDag-Erling Smørgrav stub = hints_lookup_stub(qstate->env->hints, qname, qclass, iq->dp); 692b7579f77SDag-Erling Smørgrav /* The stub (if there is one) does not need priming. */ 693b7579f77SDag-Erling Smørgrav if(!stub) 694b7579f77SDag-Erling Smørgrav return 0; 695b7579f77SDag-Erling Smørgrav stub_dp = stub->dp; 696b7579f77SDag-Erling Smørgrav 697b7579f77SDag-Erling Smørgrav /* is it a noprime stub (always use) */ 698b7579f77SDag-Erling Smørgrav if(stub->noprime) { 699b7579f77SDag-Erling Smørgrav int r = 0; 700b7579f77SDag-Erling Smørgrav if(iq->dp == NULL) r = 2; 701b7579f77SDag-Erling Smørgrav /* copy the dp out of the fixed hints structure, so that 702b7579f77SDag-Erling Smørgrav * it can be changed when servicing this query */ 703b7579f77SDag-Erling Smørgrav iq->dp = delegpt_copy(stub_dp, qstate->region); 704b7579f77SDag-Erling Smørgrav if(!iq->dp) { 705b7579f77SDag-Erling Smørgrav log_err("out of memory priming stub"); 706b7579f77SDag-Erling Smørgrav (void)error_response(qstate, id, LDNS_RCODE_SERVFAIL); 707b7579f77SDag-Erling Smørgrav return 1; /* return 1 to make module stop, with error */ 708b7579f77SDag-Erling Smørgrav } 709b7579f77SDag-Erling Smørgrav log_nametypeclass(VERB_DETAIL, "use stub", stub_dp->name, 710b7579f77SDag-Erling Smørgrav LDNS_RR_TYPE_NS, qclass); 711b7579f77SDag-Erling Smørgrav return r; 712b7579f77SDag-Erling Smørgrav } 713b7579f77SDag-Erling Smørgrav 714b7579f77SDag-Erling Smørgrav /* Otherwise, we need to (re)prime the stub. */ 715b7579f77SDag-Erling Smørgrav log_nametypeclass(VERB_DETAIL, "priming stub", stub_dp->name, 716b7579f77SDag-Erling Smørgrav LDNS_RR_TYPE_NS, qclass); 717b7579f77SDag-Erling Smørgrav 718b7579f77SDag-Erling Smørgrav /* Stub priming events start at the QUERYTARGETS state to avoid the 719b7579f77SDag-Erling Smørgrav * redundant INIT state processing. */ 720b7579f77SDag-Erling Smørgrav if(!generate_sub_request(stub_dp->name, stub_dp->namelen, 721b7579f77SDag-Erling Smørgrav LDNS_RR_TYPE_NS, qclass, qstate, id, iq, 722b7579f77SDag-Erling Smørgrav QUERYTARGETS_STATE, PRIME_RESP_STATE, &subq, 0)) { 723b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "could not prime stub"); 724b7579f77SDag-Erling Smørgrav (void)error_response(qstate, id, LDNS_RCODE_SERVFAIL); 725b7579f77SDag-Erling Smørgrav return 1; /* return 1 to make module stop, with error */ 726b7579f77SDag-Erling Smørgrav } 727b7579f77SDag-Erling Smørgrav if(subq) { 728b7579f77SDag-Erling Smørgrav struct iter_qstate* subiq = 729b7579f77SDag-Erling Smørgrav (struct iter_qstate*)subq->minfo[id]; 730b7579f77SDag-Erling Smørgrav 731b7579f77SDag-Erling Smørgrav /* Set the initial delegation point to the hint. */ 732b7579f77SDag-Erling Smørgrav /* make copy to avoid use of stub dp by different qs/threads */ 733b7579f77SDag-Erling Smørgrav subiq->dp = delegpt_copy(stub_dp, subq->region); 734b7579f77SDag-Erling Smørgrav if(!subiq->dp) { 735b7579f77SDag-Erling Smørgrav log_err("out of memory priming stub, copydp"); 736b7579f77SDag-Erling Smørgrav fptr_ok(fptr_whitelist_modenv_kill_sub( 737b7579f77SDag-Erling Smørgrav qstate->env->kill_sub)); 738b7579f77SDag-Erling Smørgrav (*qstate->env->kill_sub)(subq); 739b7579f77SDag-Erling Smørgrav (void)error_response(qstate, id, LDNS_RCODE_SERVFAIL); 740b7579f77SDag-Erling Smørgrav return 1; /* return 1 to make module stop, with error */ 741b7579f77SDag-Erling Smørgrav } 742b7579f77SDag-Erling Smørgrav /* there should not be any target queries -- although there 743b7579f77SDag-Erling Smørgrav * wouldn't be anyway, since stub hints never have 744b7579f77SDag-Erling Smørgrav * missing targets. */ 745b7579f77SDag-Erling Smørgrav subiq->num_target_queries = 0; 746b7579f77SDag-Erling Smørgrav subiq->wait_priming_stub = 1; 747b7579f77SDag-Erling Smørgrav subiq->dnssec_expected = iter_indicates_dnssec( 748b7579f77SDag-Erling Smørgrav qstate->env, subiq->dp, NULL, subq->qinfo.qclass); 749b7579f77SDag-Erling Smørgrav } 750b7579f77SDag-Erling Smørgrav 751b7579f77SDag-Erling Smørgrav /* this module stops, our submodule starts, and does the query. */ 752b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_wait_subquery; 753b7579f77SDag-Erling Smørgrav return 1; 754b7579f77SDag-Erling Smørgrav } 755b7579f77SDag-Erling Smørgrav 756b7579f77SDag-Erling Smørgrav /** 757b7579f77SDag-Erling Smørgrav * Generate A and AAAA checks for glue that is in-zone for the referral 758b7579f77SDag-Erling Smørgrav * we just got to obtain authoritative information on the adresses. 759b7579f77SDag-Erling Smørgrav * 760b7579f77SDag-Erling Smørgrav * @param qstate: the qtstate that triggered the need to prime. 761b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 762b7579f77SDag-Erling Smørgrav * @param id: module id. 763b7579f77SDag-Erling Smørgrav */ 764b7579f77SDag-Erling Smørgrav static void 765b7579f77SDag-Erling Smørgrav generate_a_aaaa_check(struct module_qstate* qstate, struct iter_qstate* iq, 766b7579f77SDag-Erling Smørgrav int id) 767b7579f77SDag-Erling Smørgrav { 768b7579f77SDag-Erling Smørgrav struct iter_env* ie = (struct iter_env*)qstate->env->modinfo[id]; 769b7579f77SDag-Erling Smørgrav struct module_qstate* subq; 770b7579f77SDag-Erling Smørgrav size_t i; 771b7579f77SDag-Erling Smørgrav struct reply_info* rep = iq->response->rep; 772b7579f77SDag-Erling Smørgrav struct ub_packed_rrset_key* s; 773b7579f77SDag-Erling Smørgrav log_assert(iq->dp); 774b7579f77SDag-Erling Smørgrav 775b7579f77SDag-Erling Smørgrav if(iq->depth == ie->max_dependency_depth) 776b7579f77SDag-Erling Smørgrav return; 777b7579f77SDag-Erling Smørgrav /* walk through additional, and check if in-zone, 778b7579f77SDag-Erling Smørgrav * only relevant A, AAAA are left after scrub anyway */ 779b7579f77SDag-Erling Smørgrav for(i=rep->an_numrrsets+rep->ns_numrrsets; i<rep->rrset_count; i++) { 780b7579f77SDag-Erling Smørgrav s = rep->rrsets[i]; 781b7579f77SDag-Erling Smørgrav /* check *ALL* addresses that are transmitted in additional*/ 782b7579f77SDag-Erling Smørgrav /* is it an address ? */ 783b7579f77SDag-Erling Smørgrav if( !(ntohs(s->rk.type)==LDNS_RR_TYPE_A || 784b7579f77SDag-Erling Smørgrav ntohs(s->rk.type)==LDNS_RR_TYPE_AAAA)) { 785b7579f77SDag-Erling Smørgrav continue; 786b7579f77SDag-Erling Smørgrav } 787b7579f77SDag-Erling Smørgrav /* is this query the same as the A/AAAA check for it */ 788b7579f77SDag-Erling Smørgrav if(qstate->qinfo.qtype == ntohs(s->rk.type) && 789b7579f77SDag-Erling Smørgrav qstate->qinfo.qclass == ntohs(s->rk.rrset_class) && 790b7579f77SDag-Erling Smørgrav query_dname_compare(qstate->qinfo.qname, 791b7579f77SDag-Erling Smørgrav s->rk.dname)==0 && 792b7579f77SDag-Erling Smørgrav (qstate->query_flags&BIT_RD) && 793b7579f77SDag-Erling Smørgrav !(qstate->query_flags&BIT_CD)) 794b7579f77SDag-Erling Smørgrav continue; 795b7579f77SDag-Erling Smørgrav 796b7579f77SDag-Erling Smørgrav /* generate subrequest for it */ 797b7579f77SDag-Erling Smørgrav log_nametypeclass(VERB_ALGO, "schedule addr fetch", 798b7579f77SDag-Erling Smørgrav s->rk.dname, ntohs(s->rk.type), 799b7579f77SDag-Erling Smørgrav ntohs(s->rk.rrset_class)); 800b7579f77SDag-Erling Smørgrav if(!generate_sub_request(s->rk.dname, s->rk.dname_len, 801b7579f77SDag-Erling Smørgrav ntohs(s->rk.type), ntohs(s->rk.rrset_class), 802b7579f77SDag-Erling Smørgrav qstate, id, iq, 803b7579f77SDag-Erling Smørgrav INIT_REQUEST_STATE, FINISHED_STATE, &subq, 1)) { 804b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "could not generate addr check"); 805b7579f77SDag-Erling Smørgrav return; 806b7579f77SDag-Erling Smørgrav } 807b7579f77SDag-Erling Smørgrav /* ignore subq - not need for more init */ 808b7579f77SDag-Erling Smørgrav } 809b7579f77SDag-Erling Smørgrav } 810b7579f77SDag-Erling Smørgrav 811b7579f77SDag-Erling Smørgrav /** 812b7579f77SDag-Erling Smørgrav * Generate a NS check request to obtain authoritative information 813b7579f77SDag-Erling Smørgrav * on an NS rrset. 814b7579f77SDag-Erling Smørgrav * 815b7579f77SDag-Erling Smørgrav * @param qstate: the qtstate that triggered the need to prime. 816b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 817b7579f77SDag-Erling Smørgrav * @param id: module id. 818b7579f77SDag-Erling Smørgrav */ 819b7579f77SDag-Erling Smørgrav static void 820b7579f77SDag-Erling Smørgrav generate_ns_check(struct module_qstate* qstate, struct iter_qstate* iq, int id) 821b7579f77SDag-Erling Smørgrav { 822b7579f77SDag-Erling Smørgrav struct iter_env* ie = (struct iter_env*)qstate->env->modinfo[id]; 823b7579f77SDag-Erling Smørgrav struct module_qstate* subq; 824b7579f77SDag-Erling Smørgrav log_assert(iq->dp); 825b7579f77SDag-Erling Smørgrav 826b7579f77SDag-Erling Smørgrav if(iq->depth == ie->max_dependency_depth) 827b7579f77SDag-Erling Smørgrav return; 828b7579f77SDag-Erling Smørgrav /* is this query the same as the nscheck? */ 829b7579f77SDag-Erling Smørgrav if(qstate->qinfo.qtype == LDNS_RR_TYPE_NS && 830b7579f77SDag-Erling Smørgrav query_dname_compare(iq->dp->name, qstate->qinfo.qname)==0 && 831b7579f77SDag-Erling Smørgrav (qstate->query_flags&BIT_RD) && !(qstate->query_flags&BIT_CD)){ 832b7579f77SDag-Erling Smørgrav /* spawn off A, AAAA queries for in-zone glue to check */ 833b7579f77SDag-Erling Smørgrav generate_a_aaaa_check(qstate, iq, id); 834b7579f77SDag-Erling Smørgrav return; 835b7579f77SDag-Erling Smørgrav } 836b7579f77SDag-Erling Smørgrav 837b7579f77SDag-Erling Smørgrav log_nametypeclass(VERB_ALGO, "schedule ns fetch", 838b7579f77SDag-Erling Smørgrav iq->dp->name, LDNS_RR_TYPE_NS, iq->qchase.qclass); 839b7579f77SDag-Erling Smørgrav if(!generate_sub_request(iq->dp->name, iq->dp->namelen, 840b7579f77SDag-Erling Smørgrav LDNS_RR_TYPE_NS, iq->qchase.qclass, qstate, id, iq, 841b7579f77SDag-Erling Smørgrav INIT_REQUEST_STATE, FINISHED_STATE, &subq, 1)) { 842b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "could not generate ns check"); 843b7579f77SDag-Erling Smørgrav return; 844b7579f77SDag-Erling Smørgrav } 845b7579f77SDag-Erling Smørgrav if(subq) { 846b7579f77SDag-Erling Smørgrav struct iter_qstate* subiq = 847b7579f77SDag-Erling Smørgrav (struct iter_qstate*)subq->minfo[id]; 848b7579f77SDag-Erling Smørgrav 849b7579f77SDag-Erling Smørgrav /* make copy to avoid use of stub dp by different qs/threads */ 850b7579f77SDag-Erling Smørgrav /* refetch glue to start higher up the tree */ 851b7579f77SDag-Erling Smørgrav subiq->refetch_glue = 1; 852b7579f77SDag-Erling Smørgrav subiq->dp = delegpt_copy(iq->dp, subq->region); 853b7579f77SDag-Erling Smørgrav if(!subiq->dp) { 854b7579f77SDag-Erling Smørgrav log_err("out of memory generating ns check, copydp"); 855b7579f77SDag-Erling Smørgrav fptr_ok(fptr_whitelist_modenv_kill_sub( 856b7579f77SDag-Erling Smørgrav qstate->env->kill_sub)); 857b7579f77SDag-Erling Smørgrav (*qstate->env->kill_sub)(subq); 858b7579f77SDag-Erling Smørgrav return; 859b7579f77SDag-Erling Smørgrav } 860b7579f77SDag-Erling Smørgrav } 861b7579f77SDag-Erling Smørgrav } 862b7579f77SDag-Erling Smørgrav 863b7579f77SDag-Erling Smørgrav /** 864b7579f77SDag-Erling Smørgrav * Generate a DNSKEY prefetch query to get the DNSKEY for the DS record we 865b7579f77SDag-Erling Smørgrav * just got in a referral (where we have dnssec_expected, thus have trust 866b7579f77SDag-Erling Smørgrav * anchors above it). Note that right after calling this routine the 867b7579f77SDag-Erling Smørgrav * iterator detached subqueries (because of following the referral), and thus 868b7579f77SDag-Erling Smørgrav * the DNSKEY query becomes detached, its return stored in the cache for 869b7579f77SDag-Erling Smørgrav * later lookup by the validator. This cache lookup by the validator avoids 870b7579f77SDag-Erling Smørgrav * the roundtrip incurred by the DNSKEY query. The DNSKEY query is now 871b7579f77SDag-Erling Smørgrav * performed at about the same time the original query is sent to the domain, 872b7579f77SDag-Erling Smørgrav * thus the two answers are likely to be returned at about the same time, 873b7579f77SDag-Erling Smørgrav * saving a roundtrip from the validated lookup. 874b7579f77SDag-Erling Smørgrav * 875b7579f77SDag-Erling Smørgrav * @param qstate: the qtstate that triggered the need to prime. 876b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 877b7579f77SDag-Erling Smørgrav * @param id: module id. 878b7579f77SDag-Erling Smørgrav */ 879b7579f77SDag-Erling Smørgrav static void 880b7579f77SDag-Erling Smørgrav generate_dnskey_prefetch(struct module_qstate* qstate, 881b7579f77SDag-Erling Smørgrav struct iter_qstate* iq, int id) 882b7579f77SDag-Erling Smørgrav { 883b7579f77SDag-Erling Smørgrav struct module_qstate* subq; 884b7579f77SDag-Erling Smørgrav log_assert(iq->dp); 885b7579f77SDag-Erling Smørgrav 886b7579f77SDag-Erling Smørgrav /* is this query the same as the prefetch? */ 887b7579f77SDag-Erling Smørgrav if(qstate->qinfo.qtype == LDNS_RR_TYPE_DNSKEY && 888b7579f77SDag-Erling Smørgrav query_dname_compare(iq->dp->name, qstate->qinfo.qname)==0 && 889b7579f77SDag-Erling Smørgrav (qstate->query_flags&BIT_RD) && !(qstate->query_flags&BIT_CD)){ 890b7579f77SDag-Erling Smørgrav return; 891b7579f77SDag-Erling Smørgrav } 892b7579f77SDag-Erling Smørgrav 893b7579f77SDag-Erling Smørgrav /* if the DNSKEY is in the cache this lookup will stop quickly */ 894b7579f77SDag-Erling Smørgrav log_nametypeclass(VERB_ALGO, "schedule dnskey prefetch", 895b7579f77SDag-Erling Smørgrav iq->dp->name, LDNS_RR_TYPE_DNSKEY, iq->qchase.qclass); 896b7579f77SDag-Erling Smørgrav if(!generate_sub_request(iq->dp->name, iq->dp->namelen, 897b7579f77SDag-Erling Smørgrav LDNS_RR_TYPE_DNSKEY, iq->qchase.qclass, qstate, id, iq, 898b7579f77SDag-Erling Smørgrav INIT_REQUEST_STATE, FINISHED_STATE, &subq, 0)) { 899b7579f77SDag-Erling Smørgrav /* we'll be slower, but it'll work */ 900b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "could not generate dnskey prefetch"); 901b7579f77SDag-Erling Smørgrav return; 902b7579f77SDag-Erling Smørgrav } 903b7579f77SDag-Erling Smørgrav if(subq) { 904b7579f77SDag-Erling Smørgrav struct iter_qstate* subiq = 905b7579f77SDag-Erling Smørgrav (struct iter_qstate*)subq->minfo[id]; 906b7579f77SDag-Erling Smørgrav /* this qstate has the right delegation for the dnskey lookup*/ 907b7579f77SDag-Erling Smørgrav /* make copy to avoid use of stub dp by different qs/threads */ 908b7579f77SDag-Erling Smørgrav subiq->dp = delegpt_copy(iq->dp, subq->region); 909b7579f77SDag-Erling Smørgrav /* if !subiq->dp, it'll start from the cache, no problem */ 910b7579f77SDag-Erling Smørgrav } 911b7579f77SDag-Erling Smørgrav } 912b7579f77SDag-Erling Smørgrav 913b7579f77SDag-Erling Smørgrav /** 914b7579f77SDag-Erling Smørgrav * See if the query needs forwarding. 915b7579f77SDag-Erling Smørgrav * 916b7579f77SDag-Erling Smørgrav * @param qstate: query state. 917b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 918b7579f77SDag-Erling Smørgrav * @return true if the request is forwarded, false if not. 919b7579f77SDag-Erling Smørgrav * If returns true but, iq->dp is NULL then a malloc failure occurred. 920b7579f77SDag-Erling Smørgrav */ 921b7579f77SDag-Erling Smørgrav static int 922b7579f77SDag-Erling Smørgrav forward_request(struct module_qstate* qstate, struct iter_qstate* iq) 923b7579f77SDag-Erling Smørgrav { 924b7579f77SDag-Erling Smørgrav struct delegpt* dp; 925b7579f77SDag-Erling Smørgrav uint8_t* delname = iq->qchase.qname; 926b7579f77SDag-Erling Smørgrav size_t delnamelen = iq->qchase.qname_len; 927b7579f77SDag-Erling Smørgrav if(iq->refetch_glue) { 928b7579f77SDag-Erling Smørgrav delname = iq->dp->name; 929b7579f77SDag-Erling Smørgrav delnamelen = iq->dp->namelen; 930b7579f77SDag-Erling Smørgrav } 931b7579f77SDag-Erling Smørgrav /* strip one label off of DS query to lookup higher for it */ 932b7579f77SDag-Erling Smørgrav if( (iq->qchase.qtype == LDNS_RR_TYPE_DS || iq->refetch_glue) 933b7579f77SDag-Erling Smørgrav && !dname_is_root(iq->qchase.qname)) 934b7579f77SDag-Erling Smørgrav dname_remove_label(&delname, &delnamelen); 935b7579f77SDag-Erling Smørgrav dp = forwards_lookup(qstate->env->fwds, delname, iq->qchase.qclass); 936b7579f77SDag-Erling Smørgrav if(!dp) 937b7579f77SDag-Erling Smørgrav return 0; 938b7579f77SDag-Erling Smørgrav /* send recursion desired to forward addr */ 939b7579f77SDag-Erling Smørgrav iq->chase_flags |= BIT_RD; 940b7579f77SDag-Erling Smørgrav iq->dp = delegpt_copy(dp, qstate->region); 941b7579f77SDag-Erling Smørgrav /* iq->dp checked by caller */ 942b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "forwarding request"); 943b7579f77SDag-Erling Smørgrav return 1; 944b7579f77SDag-Erling Smørgrav } 945b7579f77SDag-Erling Smørgrav 946b7579f77SDag-Erling Smørgrav /** 947b7579f77SDag-Erling Smørgrav * Process the initial part of the request handling. This state roughly 948b7579f77SDag-Erling Smørgrav * corresponds to resolver algorithms steps 1 (find answer in cache) and 2 949b7579f77SDag-Erling Smørgrav * (find the best servers to ask). 950b7579f77SDag-Erling Smørgrav * 951b7579f77SDag-Erling Smørgrav * Note that all requests start here, and query restarts revisit this state. 952b7579f77SDag-Erling Smørgrav * 953b7579f77SDag-Erling Smørgrav * This state either generates: 1) a response, from cache or error, 2) a 954b7579f77SDag-Erling Smørgrav * priming event, or 3) forwards the request to the next state (init2, 955b7579f77SDag-Erling Smørgrav * generally). 956b7579f77SDag-Erling Smørgrav * 957b7579f77SDag-Erling Smørgrav * @param qstate: query state. 958b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 959b7579f77SDag-Erling Smørgrav * @param ie: iterator shared global environment. 960b7579f77SDag-Erling Smørgrav * @param id: module id. 961b7579f77SDag-Erling Smørgrav * @return true if the event needs more request processing immediately, 962b7579f77SDag-Erling Smørgrav * false if not. 963b7579f77SDag-Erling Smørgrav */ 964b7579f77SDag-Erling Smørgrav static int 965b7579f77SDag-Erling Smørgrav processInitRequest(struct module_qstate* qstate, struct iter_qstate* iq, 966b7579f77SDag-Erling Smørgrav struct iter_env* ie, int id) 967b7579f77SDag-Erling Smørgrav { 968b7579f77SDag-Erling Smørgrav uint8_t* delname; 969b7579f77SDag-Erling Smørgrav size_t delnamelen; 970b7579f77SDag-Erling Smørgrav struct dns_msg* msg; 971b7579f77SDag-Erling Smørgrav 972b7579f77SDag-Erling Smørgrav log_query_info(VERB_DETAIL, "resolving", &qstate->qinfo); 973b7579f77SDag-Erling Smørgrav /* check effort */ 974b7579f77SDag-Erling Smørgrav 975b7579f77SDag-Erling Smørgrav /* We enforce a maximum number of query restarts. This is primarily a 976b7579f77SDag-Erling Smørgrav * cheap way to prevent CNAME loops. */ 977b7579f77SDag-Erling Smørgrav if(iq->query_restart_count > MAX_RESTART_COUNT) { 978b7579f77SDag-Erling Smørgrav verbose(VERB_QUERY, "request has exceeded the maximum number" 979b7579f77SDag-Erling Smørgrav " of query restarts with %d", iq->query_restart_count); 980b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 981b7579f77SDag-Erling Smørgrav } 982b7579f77SDag-Erling Smørgrav 983b7579f77SDag-Erling Smørgrav /* We enforce a maximum recursion/dependency depth -- in general, 984b7579f77SDag-Erling Smørgrav * this is unnecessary for dependency loops (although it will 985b7579f77SDag-Erling Smørgrav * catch those), but it provides a sensible limit to the amount 986b7579f77SDag-Erling Smørgrav * of work required to answer a given query. */ 987b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "request has dependency depth of %d", iq->depth); 988b7579f77SDag-Erling Smørgrav if(iq->depth > ie->max_dependency_depth) { 989b7579f77SDag-Erling Smørgrav verbose(VERB_QUERY, "request has exceeded the maximum " 990b7579f77SDag-Erling Smørgrav "dependency depth with depth of %d", iq->depth); 991b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 992b7579f77SDag-Erling Smørgrav } 993b7579f77SDag-Erling Smørgrav 994b7579f77SDag-Erling Smørgrav /* If the request is qclass=ANY, setup to generate each class */ 995b7579f77SDag-Erling Smørgrav if(qstate->qinfo.qclass == LDNS_RR_CLASS_ANY) { 996b7579f77SDag-Erling Smørgrav iq->qchase.qclass = 0; 997b7579f77SDag-Erling Smørgrav return next_state(iq, COLLECT_CLASS_STATE); 998b7579f77SDag-Erling Smørgrav } 999b7579f77SDag-Erling Smørgrav 1000b7579f77SDag-Erling Smørgrav /* Resolver Algorithm Step 1 -- Look for the answer in local data. */ 1001b7579f77SDag-Erling Smørgrav 1002b7579f77SDag-Erling Smørgrav /* This either results in a query restart (CNAME cache response), a 1003b7579f77SDag-Erling Smørgrav * terminating response (ANSWER), or a cache miss (null). */ 1004b7579f77SDag-Erling Smørgrav 1005b7579f77SDag-Erling Smørgrav if(qstate->blacklist) { 1006b7579f77SDag-Erling Smørgrav /* if cache, or anything else, was blacklisted then 1007b7579f77SDag-Erling Smørgrav * getting older results from cache is a bad idea, no cache */ 1008b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "cache blacklisted, going to the network"); 1009b7579f77SDag-Erling Smørgrav msg = NULL; 1010b7579f77SDag-Erling Smørgrav } else { 1011b7579f77SDag-Erling Smørgrav msg = dns_cache_lookup(qstate->env, iq->qchase.qname, 1012b7579f77SDag-Erling Smørgrav iq->qchase.qname_len, iq->qchase.qtype, 1013ff825849SDag-Erling Smørgrav iq->qchase.qclass, qstate->query_flags, 1014ff825849SDag-Erling Smørgrav qstate->region, qstate->env->scratch); 1015b7579f77SDag-Erling Smørgrav if(!msg && qstate->env->neg_cache) { 1016b7579f77SDag-Erling Smørgrav /* lookup in negative cache; may result in 1017b7579f77SDag-Erling Smørgrav * NOERROR/NODATA or NXDOMAIN answers that need validation */ 1018b7579f77SDag-Erling Smørgrav msg = val_neg_getmsg(qstate->env->neg_cache, &iq->qchase, 1019b7579f77SDag-Erling Smørgrav qstate->region, qstate->env->rrset_cache, 1020b7579f77SDag-Erling Smørgrav qstate->env->scratch_buffer, 1021b7579f77SDag-Erling Smørgrav *qstate->env->now, 1/*add SOA*/, NULL); 1022b7579f77SDag-Erling Smørgrav } 1023b7579f77SDag-Erling Smørgrav /* item taken from cache does not match our query name, thus 1024b7579f77SDag-Erling Smørgrav * security needs to be re-examined later */ 1025b7579f77SDag-Erling Smørgrav if(msg && query_dname_compare(qstate->qinfo.qname, 1026b7579f77SDag-Erling Smørgrav iq->qchase.qname) != 0) 1027b7579f77SDag-Erling Smørgrav msg->rep->security = sec_status_unchecked; 1028b7579f77SDag-Erling Smørgrav } 1029b7579f77SDag-Erling Smørgrav if(msg) { 1030b7579f77SDag-Erling Smørgrav /* handle positive cache response */ 1031b7579f77SDag-Erling Smørgrav enum response_type type = response_type_from_cache(msg, 1032b7579f77SDag-Erling Smørgrav &iq->qchase); 1033b7579f77SDag-Erling Smørgrav if(verbosity >= VERB_ALGO) { 1034b7579f77SDag-Erling Smørgrav log_dns_msg("msg from cache lookup", &msg->qinfo, 1035b7579f77SDag-Erling Smørgrav msg->rep); 1036b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "msg ttl is %d, prefetch ttl %d", 1037b7579f77SDag-Erling Smørgrav (int)msg->rep->ttl, 1038b7579f77SDag-Erling Smørgrav (int)msg->rep->prefetch_ttl); 1039b7579f77SDag-Erling Smørgrav } 1040b7579f77SDag-Erling Smørgrav 1041b7579f77SDag-Erling Smørgrav if(type == RESPONSE_TYPE_CNAME) { 1042b7579f77SDag-Erling Smørgrav uint8_t* sname = 0; 1043b7579f77SDag-Erling Smørgrav size_t slen = 0; 1044b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "returning CNAME response from " 1045b7579f77SDag-Erling Smørgrav "cache"); 1046b7579f77SDag-Erling Smørgrav if(!handle_cname_response(qstate, iq, msg, 1047b7579f77SDag-Erling Smørgrav &sname, &slen)) 1048b7579f77SDag-Erling Smørgrav return error_response(qstate, id, 1049b7579f77SDag-Erling Smørgrav LDNS_RCODE_SERVFAIL); 1050b7579f77SDag-Erling Smørgrav iq->qchase.qname = sname; 1051b7579f77SDag-Erling Smørgrav iq->qchase.qname_len = slen; 1052b7579f77SDag-Erling Smørgrav /* This *is* a query restart, even if it is a cheap 1053b7579f77SDag-Erling Smørgrav * one. */ 1054b7579f77SDag-Erling Smørgrav iq->dp = NULL; 1055b7579f77SDag-Erling Smørgrav iq->refetch_glue = 0; 1056b7579f77SDag-Erling Smørgrav iq->query_restart_count++; 1057b7579f77SDag-Erling Smørgrav iq->sent_count = 0; 1058b7579f77SDag-Erling Smørgrav sock_list_insert(&qstate->reply_origin, NULL, 0, qstate->region); 105905ab2901SDag-Erling Smørgrav if(qstate->env->cfg->qname_minimisation) 106005ab2901SDag-Erling Smørgrav iq->minimisation_state = INIT_MINIMISE_STATE; 1061b7579f77SDag-Erling Smørgrav return next_state(iq, INIT_REQUEST_STATE); 1062b7579f77SDag-Erling Smørgrav } 1063b7579f77SDag-Erling Smørgrav 1064b7579f77SDag-Erling Smørgrav /* if from cache, NULL, else insert 'cache IP' len=0 */ 1065b7579f77SDag-Erling Smørgrav if(qstate->reply_origin) 1066b7579f77SDag-Erling Smørgrav sock_list_insert(&qstate->reply_origin, NULL, 0, qstate->region); 1067b7579f77SDag-Erling Smørgrav /* it is an answer, response, to final state */ 1068b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "returning answer from cache."); 1069b7579f77SDag-Erling Smørgrav iq->response = msg; 1070b7579f77SDag-Erling Smørgrav return final_state(iq); 1071b7579f77SDag-Erling Smørgrav } 1072b7579f77SDag-Erling Smørgrav 1073b7579f77SDag-Erling Smørgrav /* attempt to forward the request */ 1074b7579f77SDag-Erling Smørgrav if(forward_request(qstate, iq)) 1075b7579f77SDag-Erling Smørgrav { 1076b7579f77SDag-Erling Smørgrav if(!iq->dp) { 1077b7579f77SDag-Erling Smørgrav log_err("alloc failure for forward dp"); 1078b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 1079b7579f77SDag-Erling Smørgrav } 1080b7579f77SDag-Erling Smørgrav iq->refetch_glue = 0; 108105ab2901SDag-Erling Smørgrav iq->minimisation_state = DONOT_MINIMISE_STATE; 1082b7579f77SDag-Erling Smørgrav /* the request has been forwarded. 1083b7579f77SDag-Erling Smørgrav * forwarded requests need to be immediately sent to the 1084b7579f77SDag-Erling Smørgrav * next state, QUERYTARGETS. */ 1085b7579f77SDag-Erling Smørgrav return next_state(iq, QUERYTARGETS_STATE); 1086b7579f77SDag-Erling Smørgrav } 1087b7579f77SDag-Erling Smørgrav 1088b7579f77SDag-Erling Smørgrav /* Resolver Algorithm Step 2 -- find the "best" servers. */ 1089b7579f77SDag-Erling Smørgrav 1090b7579f77SDag-Erling Smørgrav /* first, adjust for DS queries. To avoid the grandparent problem, 1091b7579f77SDag-Erling Smørgrav * we just look for the closest set of server to the parent of qname. 1092b7579f77SDag-Erling Smørgrav * When re-fetching glue we also need to ask the parent. 1093b7579f77SDag-Erling Smørgrav */ 1094b7579f77SDag-Erling Smørgrav if(iq->refetch_glue) { 1095b7579f77SDag-Erling Smørgrav if(!iq->dp) { 1096b7579f77SDag-Erling Smørgrav log_err("internal or malloc fail: no dp for refetch"); 1097b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 1098b7579f77SDag-Erling Smørgrav } 1099b7579f77SDag-Erling Smørgrav delname = iq->dp->name; 1100b7579f77SDag-Erling Smørgrav delnamelen = iq->dp->namelen; 1101b7579f77SDag-Erling Smørgrav } else { 1102b7579f77SDag-Erling Smørgrav delname = iq->qchase.qname; 1103b7579f77SDag-Erling Smørgrav delnamelen = iq->qchase.qname_len; 1104b7579f77SDag-Erling Smørgrav } 1105b7579f77SDag-Erling Smørgrav if(iq->qchase.qtype == LDNS_RR_TYPE_DS || iq->refetch_glue || 1106b7579f77SDag-Erling Smørgrav (iq->qchase.qtype == LDNS_RR_TYPE_NS && qstate->prefetch_leeway)) { 1107b7579f77SDag-Erling Smørgrav /* remove first label from delname, root goes to hints, 1108b7579f77SDag-Erling Smørgrav * but only to fetch glue, not for qtype=DS. */ 1109b7579f77SDag-Erling Smørgrav /* also when prefetching an NS record, fetch it again from 1110b7579f77SDag-Erling Smørgrav * its parent, just as if it expired, so that you do not 1111b7579f77SDag-Erling Smørgrav * get stuck on an older nameserver that gives old NSrecords */ 1112b7579f77SDag-Erling Smørgrav if(dname_is_root(delname) && (iq->refetch_glue || 1113b7579f77SDag-Erling Smørgrav (iq->qchase.qtype == LDNS_RR_TYPE_NS && 1114b7579f77SDag-Erling Smørgrav qstate->prefetch_leeway))) 1115b7579f77SDag-Erling Smørgrav delname = NULL; /* go to root priming */ 1116b7579f77SDag-Erling Smørgrav else dname_remove_label(&delname, &delnamelen); 1117b7579f77SDag-Erling Smørgrav } 1118b7579f77SDag-Erling Smørgrav /* delname is the name to lookup a delegation for. If NULL rootprime */ 1119b7579f77SDag-Erling Smørgrav while(1) { 1120b7579f77SDag-Erling Smørgrav 1121b7579f77SDag-Erling Smørgrav /* Lookup the delegation in the cache. If null, then the 1122b7579f77SDag-Erling Smørgrav * cache needs to be primed for the qclass. */ 1123b7579f77SDag-Erling Smørgrav if(delname) 1124b7579f77SDag-Erling Smørgrav iq->dp = dns_cache_find_delegation(qstate->env, delname, 1125b7579f77SDag-Erling Smørgrav delnamelen, iq->qchase.qtype, iq->qchase.qclass, 1126b7579f77SDag-Erling Smørgrav qstate->region, &iq->deleg_msg, 1127b7579f77SDag-Erling Smørgrav *qstate->env->now+qstate->prefetch_leeway); 1128b7579f77SDag-Erling Smørgrav else iq->dp = NULL; 1129b7579f77SDag-Erling Smørgrav 1130b7579f77SDag-Erling Smørgrav /* If the cache has returned nothing, then we have a 1131b7579f77SDag-Erling Smørgrav * root priming situation. */ 1132b7579f77SDag-Erling Smørgrav if(iq->dp == NULL) { 1133b7579f77SDag-Erling Smørgrav /* if there is a stub, then no root prime needed */ 1134b7579f77SDag-Erling Smørgrav int r = prime_stub(qstate, iq, id, delname, 1135b7579f77SDag-Erling Smørgrav iq->qchase.qclass); 1136b7579f77SDag-Erling Smørgrav if(r == 2) 1137b7579f77SDag-Erling Smørgrav break; /* got noprime-stub-zone, continue */ 1138b7579f77SDag-Erling Smørgrav else if(r) 1139b7579f77SDag-Erling Smørgrav return 0; /* stub prime request made */ 1140b7579f77SDag-Erling Smørgrav if(forwards_lookup_root(qstate->env->fwds, 1141b7579f77SDag-Erling Smørgrav iq->qchase.qclass)) { 1142b7579f77SDag-Erling Smørgrav /* forward zone root, no root prime needed */ 1143b7579f77SDag-Erling Smørgrav /* fill in some dp - safety belt */ 1144b7579f77SDag-Erling Smørgrav iq->dp = hints_lookup_root(qstate->env->hints, 1145b7579f77SDag-Erling Smørgrav iq->qchase.qclass); 1146b7579f77SDag-Erling Smørgrav if(!iq->dp) { 1147b7579f77SDag-Erling Smørgrav log_err("internal error: no hints dp"); 1148b7579f77SDag-Erling Smørgrav return error_response(qstate, id, 1149b7579f77SDag-Erling Smørgrav LDNS_RCODE_SERVFAIL); 1150b7579f77SDag-Erling Smørgrav } 1151b7579f77SDag-Erling Smørgrav iq->dp = delegpt_copy(iq->dp, qstate->region); 1152b7579f77SDag-Erling Smørgrav if(!iq->dp) { 1153b7579f77SDag-Erling Smørgrav log_err("out of memory in safety belt"); 1154b7579f77SDag-Erling Smørgrav return error_response(qstate, id, 1155b7579f77SDag-Erling Smørgrav LDNS_RCODE_SERVFAIL); 1156b7579f77SDag-Erling Smørgrav } 1157b7579f77SDag-Erling Smørgrav return next_state(iq, INIT_REQUEST_2_STATE); 1158b7579f77SDag-Erling Smørgrav } 1159b7579f77SDag-Erling Smørgrav /* Note that the result of this will set a new 1160b7579f77SDag-Erling Smørgrav * DelegationPoint based on the result of priming. */ 1161b7579f77SDag-Erling Smørgrav if(!prime_root(qstate, iq, id, iq->qchase.qclass)) 1162b7579f77SDag-Erling Smørgrav return error_response(qstate, id, 1163b7579f77SDag-Erling Smørgrav LDNS_RCODE_REFUSED); 1164b7579f77SDag-Erling Smørgrav 1165b7579f77SDag-Erling Smørgrav /* priming creates and sends a subordinate query, with 1166b7579f77SDag-Erling Smørgrav * this query as the parent. So further processing for 1167b7579f77SDag-Erling Smørgrav * this event will stop until reactivated by the 1168b7579f77SDag-Erling Smørgrav * results of priming. */ 1169b7579f77SDag-Erling Smørgrav return 0; 1170b7579f77SDag-Erling Smørgrav } 117109a3aaf3SDag-Erling Smørgrav if(!iq->ratelimit_ok && qstate->prefetch_leeway) 117209a3aaf3SDag-Erling Smørgrav iq->ratelimit_ok = 1; /* allow prefetches, this keeps 117309a3aaf3SDag-Erling Smørgrav otherwise valid data in the cache */ 117409a3aaf3SDag-Erling Smørgrav if(!iq->ratelimit_ok && infra_ratelimit_exceeded( 117509a3aaf3SDag-Erling Smørgrav qstate->env->infra_cache, iq->dp->name, 117609a3aaf3SDag-Erling Smørgrav iq->dp->namelen, *qstate->env->now)) { 117709a3aaf3SDag-Erling Smørgrav /* and increment the rate, so that the rate for time 117809a3aaf3SDag-Erling Smørgrav * now will also exceed the rate, keeping cache fresh */ 117909a3aaf3SDag-Erling Smørgrav (void)infra_ratelimit_inc(qstate->env->infra_cache, 118009a3aaf3SDag-Erling Smørgrav iq->dp->name, iq->dp->namelen, 118109a3aaf3SDag-Erling Smørgrav *qstate->env->now); 118209a3aaf3SDag-Erling Smørgrav /* see if we are passed through with slip factor */ 118309a3aaf3SDag-Erling Smørgrav if(qstate->env->cfg->ratelimit_factor != 0 && 118409a3aaf3SDag-Erling Smørgrav ub_random_max(qstate->env->rnd, 118509a3aaf3SDag-Erling Smørgrav qstate->env->cfg->ratelimit_factor) == 1) { 118609a3aaf3SDag-Erling Smørgrav iq->ratelimit_ok = 1; 118709a3aaf3SDag-Erling Smørgrav log_nametypeclass(VERB_ALGO, "ratelimit allowed through for " 118809a3aaf3SDag-Erling Smørgrav "delegation point", iq->dp->name, 118909a3aaf3SDag-Erling Smørgrav LDNS_RR_TYPE_NS, LDNS_RR_CLASS_IN); 119009a3aaf3SDag-Erling Smørgrav } else { 119109a3aaf3SDag-Erling Smørgrav log_nametypeclass(VERB_ALGO, "ratelimit exceeded with " 119209a3aaf3SDag-Erling Smørgrav "delegation point", iq->dp->name, 119309a3aaf3SDag-Erling Smørgrav LDNS_RR_TYPE_NS, LDNS_RR_CLASS_IN); 119409a3aaf3SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 119509a3aaf3SDag-Erling Smørgrav } 119609a3aaf3SDag-Erling Smørgrav } 1197b7579f77SDag-Erling Smørgrav 1198b7579f77SDag-Erling Smørgrav /* see if this dp not useless. 1199b7579f77SDag-Erling Smørgrav * It is useless if: 1200b7579f77SDag-Erling Smørgrav * o all NS items are required glue. 1201b7579f77SDag-Erling Smørgrav * or the query is for NS item that is required glue. 1202b7579f77SDag-Erling Smørgrav * o no addresses are provided. 1203b7579f77SDag-Erling Smørgrav * o RD qflag is on. 1204b7579f77SDag-Erling Smørgrav * Instead, go up one level, and try to get even further 1205b7579f77SDag-Erling Smørgrav * If the root was useless, use safety belt information. 1206b7579f77SDag-Erling Smørgrav * Only check cache returns, because replies for servers 1207b7579f77SDag-Erling Smørgrav * could be useless but lead to loops (bumping into the 1208b7579f77SDag-Erling Smørgrav * same server reply) if useless-checked. 1209b7579f77SDag-Erling Smørgrav */ 1210b7579f77SDag-Erling Smørgrav if(iter_dp_is_useless(&qstate->qinfo, qstate->query_flags, 1211b7579f77SDag-Erling Smørgrav iq->dp)) { 1212b7579f77SDag-Erling Smørgrav if(dname_is_root(iq->dp->name)) { 1213b7579f77SDag-Erling Smørgrav /* use safety belt */ 1214b7579f77SDag-Erling Smørgrav verbose(VERB_QUERY, "Cache has root NS but " 1215b7579f77SDag-Erling Smørgrav "no addresses. Fallback to the safety belt."); 1216b7579f77SDag-Erling Smørgrav iq->dp = hints_lookup_root(qstate->env->hints, 1217b7579f77SDag-Erling Smørgrav iq->qchase.qclass); 1218b7579f77SDag-Erling Smørgrav /* note deleg_msg is from previous lookup, 1219b7579f77SDag-Erling Smørgrav * but RD is on, so it is not used */ 1220b7579f77SDag-Erling Smørgrav if(!iq->dp) { 1221b7579f77SDag-Erling Smørgrav log_err("internal error: no hints dp"); 1222b7579f77SDag-Erling Smørgrav return error_response(qstate, id, 1223b7579f77SDag-Erling Smørgrav LDNS_RCODE_REFUSED); 1224b7579f77SDag-Erling Smørgrav } 1225b7579f77SDag-Erling Smørgrav iq->dp = delegpt_copy(iq->dp, qstate->region); 1226b7579f77SDag-Erling Smørgrav if(!iq->dp) { 1227b7579f77SDag-Erling Smørgrav log_err("out of memory in safety belt"); 1228b7579f77SDag-Erling Smørgrav return error_response(qstate, id, 1229b7579f77SDag-Erling Smørgrav LDNS_RCODE_SERVFAIL); 1230b7579f77SDag-Erling Smørgrav } 1231b7579f77SDag-Erling Smørgrav break; 1232b7579f77SDag-Erling Smørgrav } else { 1233b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, 1234b7579f77SDag-Erling Smørgrav "cache delegation was useless:"); 1235b7579f77SDag-Erling Smørgrav delegpt_log(VERB_ALGO, iq->dp); 1236b7579f77SDag-Erling Smørgrav /* go up */ 1237b7579f77SDag-Erling Smørgrav delname = iq->dp->name; 1238b7579f77SDag-Erling Smørgrav delnamelen = iq->dp->namelen; 1239b7579f77SDag-Erling Smørgrav dname_remove_label(&delname, &delnamelen); 1240b7579f77SDag-Erling Smørgrav } 1241b7579f77SDag-Erling Smørgrav } else break; 1242b7579f77SDag-Erling Smørgrav } 1243b7579f77SDag-Erling Smørgrav 1244b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "cache delegation returns delegpt"); 1245b7579f77SDag-Erling Smørgrav delegpt_log(VERB_ALGO, iq->dp); 1246b7579f77SDag-Erling Smørgrav 1247b7579f77SDag-Erling Smørgrav /* Otherwise, set the current delegation point and move on to the 1248b7579f77SDag-Erling Smørgrav * next state. */ 1249b7579f77SDag-Erling Smørgrav return next_state(iq, INIT_REQUEST_2_STATE); 1250b7579f77SDag-Erling Smørgrav } 1251b7579f77SDag-Erling Smørgrav 1252b7579f77SDag-Erling Smørgrav /** 1253b7579f77SDag-Erling Smørgrav * Process the second part of the initial request handling. This state 1254b7579f77SDag-Erling Smørgrav * basically exists so that queries that generate root priming events have 1255b7579f77SDag-Erling Smørgrav * the same init processing as ones that do not. Request events that reach 1256b7579f77SDag-Erling Smørgrav * this state must have a valid currentDelegationPoint set. 1257b7579f77SDag-Erling Smørgrav * 1258b7579f77SDag-Erling Smørgrav * This part is primarly handling stub zone priming. Events that reach this 1259b7579f77SDag-Erling Smørgrav * state must have a current delegation point. 1260b7579f77SDag-Erling Smørgrav * 1261b7579f77SDag-Erling Smørgrav * @param qstate: query state. 1262b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 1263b7579f77SDag-Erling Smørgrav * @param id: module id. 1264b7579f77SDag-Erling Smørgrav * @return true if the event needs more request processing immediately, 1265b7579f77SDag-Erling Smørgrav * false if not. 1266b7579f77SDag-Erling Smørgrav */ 1267b7579f77SDag-Erling Smørgrav static int 1268b7579f77SDag-Erling Smørgrav processInitRequest2(struct module_qstate* qstate, struct iter_qstate* iq, 1269b7579f77SDag-Erling Smørgrav int id) 1270b7579f77SDag-Erling Smørgrav { 1271b7579f77SDag-Erling Smørgrav uint8_t* delname; 1272b7579f77SDag-Erling Smørgrav size_t delnamelen; 1273b7579f77SDag-Erling Smørgrav log_query_info(VERB_QUERY, "resolving (init part 2): ", 1274b7579f77SDag-Erling Smørgrav &qstate->qinfo); 1275b7579f77SDag-Erling Smørgrav 1276b7579f77SDag-Erling Smørgrav if(iq->refetch_glue) { 1277b7579f77SDag-Erling Smørgrav if(!iq->dp) { 1278b7579f77SDag-Erling Smørgrav log_err("internal or malloc fail: no dp for refetch"); 1279b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 1280b7579f77SDag-Erling Smørgrav } 1281b7579f77SDag-Erling Smørgrav delname = iq->dp->name; 1282b7579f77SDag-Erling Smørgrav delnamelen = iq->dp->namelen; 1283b7579f77SDag-Erling Smørgrav } else { 1284b7579f77SDag-Erling Smørgrav delname = iq->qchase.qname; 1285b7579f77SDag-Erling Smørgrav delnamelen = iq->qchase.qname_len; 1286b7579f77SDag-Erling Smørgrav } 1287b7579f77SDag-Erling Smørgrav if(iq->qchase.qtype == LDNS_RR_TYPE_DS || iq->refetch_glue) { 1288b7579f77SDag-Erling Smørgrav if(!dname_is_root(delname)) 1289b7579f77SDag-Erling Smørgrav dname_remove_label(&delname, &delnamelen); 1290b7579f77SDag-Erling Smørgrav iq->refetch_glue = 0; /* if CNAME causes restart, no refetch */ 1291b7579f77SDag-Erling Smørgrav } 1292b7579f77SDag-Erling Smørgrav /* Check to see if we need to prime a stub zone. */ 1293b7579f77SDag-Erling Smørgrav if(prime_stub(qstate, iq, id, delname, iq->qchase.qclass)) { 1294b7579f77SDag-Erling Smørgrav /* A priming sub request was made */ 1295b7579f77SDag-Erling Smørgrav return 0; 1296b7579f77SDag-Erling Smørgrav } 1297b7579f77SDag-Erling Smørgrav 1298b7579f77SDag-Erling Smørgrav /* most events just get forwarded to the next state. */ 1299b7579f77SDag-Erling Smørgrav return next_state(iq, INIT_REQUEST_3_STATE); 1300b7579f77SDag-Erling Smørgrav } 1301b7579f77SDag-Erling Smørgrav 1302b7579f77SDag-Erling Smørgrav /** 1303b7579f77SDag-Erling Smørgrav * Process the third part of the initial request handling. This state exists 1304b7579f77SDag-Erling Smørgrav * as a separate state so that queries that generate stub priming events 1305b7579f77SDag-Erling Smørgrav * will get the tail end of the init process but not repeat the stub priming 1306b7579f77SDag-Erling Smørgrav * check. 1307b7579f77SDag-Erling Smørgrav * 1308b7579f77SDag-Erling Smørgrav * @param qstate: query state. 1309b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 1310b7579f77SDag-Erling Smørgrav * @param id: module id. 1311b7579f77SDag-Erling Smørgrav * @return true, advancing the event to the QUERYTARGETS_STATE. 1312b7579f77SDag-Erling Smørgrav */ 1313b7579f77SDag-Erling Smørgrav static int 1314b7579f77SDag-Erling Smørgrav processInitRequest3(struct module_qstate* qstate, struct iter_qstate* iq, 1315b7579f77SDag-Erling Smørgrav int id) 1316b7579f77SDag-Erling Smørgrav { 1317b7579f77SDag-Erling Smørgrav log_query_info(VERB_QUERY, "resolving (init part 3): ", 1318b7579f77SDag-Erling Smørgrav &qstate->qinfo); 1319b7579f77SDag-Erling Smørgrav /* if the cache reply dp equals a validation anchor or msg has DS, 1320b7579f77SDag-Erling Smørgrav * then DNSSEC RRSIGs are expected in the reply */ 1321b7579f77SDag-Erling Smørgrav iq->dnssec_expected = iter_indicates_dnssec(qstate->env, iq->dp, 1322b7579f77SDag-Erling Smørgrav iq->deleg_msg, iq->qchase.qclass); 1323b7579f77SDag-Erling Smørgrav 1324b7579f77SDag-Erling Smørgrav /* If the RD flag wasn't set, then we just finish with the 1325b7579f77SDag-Erling Smørgrav * cached referral as the response. */ 1326b7579f77SDag-Erling Smørgrav if(!(qstate->query_flags & BIT_RD)) { 1327b7579f77SDag-Erling Smørgrav iq->response = iq->deleg_msg; 132817d15b25SDag-Erling Smørgrav if(verbosity >= VERB_ALGO && iq->response) 1329b7579f77SDag-Erling Smørgrav log_dns_msg("no RD requested, using delegation msg", 1330b7579f77SDag-Erling Smørgrav &iq->response->qinfo, iq->response->rep); 1331b7579f77SDag-Erling Smørgrav if(qstate->reply_origin) 1332b7579f77SDag-Erling Smørgrav sock_list_insert(&qstate->reply_origin, NULL, 0, qstate->region); 1333b7579f77SDag-Erling Smørgrav return final_state(iq); 1334b7579f77SDag-Erling Smørgrav } 1335b7579f77SDag-Erling Smørgrav /* After this point, unset the RD flag -- this query is going to 1336b7579f77SDag-Erling Smørgrav * be sent to an auth. server. */ 1337b7579f77SDag-Erling Smørgrav iq->chase_flags &= ~BIT_RD; 1338b7579f77SDag-Erling Smørgrav 1339b7579f77SDag-Erling Smørgrav /* if dnssec expected, fetch key for the trust-anchor or cached-DS */ 1340b7579f77SDag-Erling Smørgrav if(iq->dnssec_expected && qstate->env->cfg->prefetch_key && 1341b7579f77SDag-Erling Smørgrav !(qstate->query_flags&BIT_CD)) { 1342b7579f77SDag-Erling Smørgrav generate_dnskey_prefetch(qstate, iq, id); 1343b7579f77SDag-Erling Smørgrav fptr_ok(fptr_whitelist_modenv_detach_subs( 1344b7579f77SDag-Erling Smørgrav qstate->env->detach_subs)); 1345b7579f77SDag-Erling Smørgrav (*qstate->env->detach_subs)(qstate); 1346b7579f77SDag-Erling Smørgrav } 1347b7579f77SDag-Erling Smørgrav 1348b7579f77SDag-Erling Smørgrav /* Jump to the next state. */ 1349b7579f77SDag-Erling Smørgrav return next_state(iq, QUERYTARGETS_STATE); 1350b7579f77SDag-Erling Smørgrav } 1351b7579f77SDag-Erling Smørgrav 1352b7579f77SDag-Erling Smørgrav /** 1353b7579f77SDag-Erling Smørgrav * Given a basic query, generate a parent-side "target" query. 1354b7579f77SDag-Erling Smørgrav * These are subordinate queries for missing delegation point target addresses, 1355b7579f77SDag-Erling Smørgrav * for which only the parent of the delegation provides correct IP addresses. 1356b7579f77SDag-Erling Smørgrav * 1357b7579f77SDag-Erling Smørgrav * @param qstate: query state. 1358b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 1359b7579f77SDag-Erling Smørgrav * @param id: module id. 1360b7579f77SDag-Erling Smørgrav * @param name: target qname. 1361b7579f77SDag-Erling Smørgrav * @param namelen: target qname length. 1362b7579f77SDag-Erling Smørgrav * @param qtype: target qtype (either A or AAAA). 1363b7579f77SDag-Erling Smørgrav * @param qclass: target qclass. 1364b7579f77SDag-Erling Smørgrav * @return true on success, false on failure. 1365b7579f77SDag-Erling Smørgrav */ 1366b7579f77SDag-Erling Smørgrav static int 1367b7579f77SDag-Erling Smørgrav generate_parentside_target_query(struct module_qstate* qstate, 1368b7579f77SDag-Erling Smørgrav struct iter_qstate* iq, int id, uint8_t* name, size_t namelen, 1369b7579f77SDag-Erling Smørgrav uint16_t qtype, uint16_t qclass) 1370b7579f77SDag-Erling Smørgrav { 1371b7579f77SDag-Erling Smørgrav struct module_qstate* subq; 1372b7579f77SDag-Erling Smørgrav if(!generate_sub_request(name, namelen, qtype, qclass, qstate, 1373b7579f77SDag-Erling Smørgrav id, iq, INIT_REQUEST_STATE, FINISHED_STATE, &subq, 0)) 1374b7579f77SDag-Erling Smørgrav return 0; 1375b7579f77SDag-Erling Smørgrav if(subq) { 1376b7579f77SDag-Erling Smørgrav struct iter_qstate* subiq = 1377b7579f77SDag-Erling Smørgrav (struct iter_qstate*)subq->minfo[id]; 1378b7579f77SDag-Erling Smørgrav /* blacklist the cache - we want to fetch parent stuff */ 1379b7579f77SDag-Erling Smørgrav sock_list_insert(&subq->blacklist, NULL, 0, subq->region); 1380b7579f77SDag-Erling Smørgrav subiq->query_for_pside_glue = 1; 1381b7579f77SDag-Erling Smørgrav if(dname_subdomain_c(name, iq->dp->name)) { 1382b7579f77SDag-Erling Smørgrav subiq->dp = delegpt_copy(iq->dp, subq->region); 1383b7579f77SDag-Erling Smørgrav subiq->dnssec_expected = iter_indicates_dnssec( 1384b7579f77SDag-Erling Smørgrav qstate->env, subiq->dp, NULL, 1385b7579f77SDag-Erling Smørgrav subq->qinfo.qclass); 1386b7579f77SDag-Erling Smørgrav subiq->refetch_glue = 1; 1387b7579f77SDag-Erling Smørgrav } else { 1388b7579f77SDag-Erling Smørgrav subiq->dp = dns_cache_find_delegation(qstate->env, 1389b7579f77SDag-Erling Smørgrav name, namelen, qtype, qclass, subq->region, 1390b7579f77SDag-Erling Smørgrav &subiq->deleg_msg, 1391b7579f77SDag-Erling Smørgrav *qstate->env->now+subq->prefetch_leeway); 1392b7579f77SDag-Erling Smørgrav /* if no dp, then it's from root, refetch unneeded */ 1393b7579f77SDag-Erling Smørgrav if(subiq->dp) { 1394b7579f77SDag-Erling Smørgrav subiq->dnssec_expected = iter_indicates_dnssec( 1395b7579f77SDag-Erling Smørgrav qstate->env, subiq->dp, NULL, 1396b7579f77SDag-Erling Smørgrav subq->qinfo.qclass); 1397b7579f77SDag-Erling Smørgrav subiq->refetch_glue = 1; 1398b7579f77SDag-Erling Smørgrav } 1399b7579f77SDag-Erling Smørgrav } 1400b7579f77SDag-Erling Smørgrav } 1401b7579f77SDag-Erling Smørgrav log_nametypeclass(VERB_QUERY, "new pside target", name, qtype, qclass); 1402b7579f77SDag-Erling Smørgrav return 1; 1403b7579f77SDag-Erling Smørgrav } 1404b7579f77SDag-Erling Smørgrav 1405b7579f77SDag-Erling Smørgrav /** 1406b7579f77SDag-Erling Smørgrav * Given a basic query, generate a "target" query. These are subordinate 1407b7579f77SDag-Erling Smørgrav * queries for missing delegation point target addresses. 1408b7579f77SDag-Erling Smørgrav * 1409b7579f77SDag-Erling Smørgrav * @param qstate: query state. 1410b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 1411b7579f77SDag-Erling Smørgrav * @param id: module id. 1412b7579f77SDag-Erling Smørgrav * @param name: target qname. 1413b7579f77SDag-Erling Smørgrav * @param namelen: target qname length. 1414b7579f77SDag-Erling Smørgrav * @param qtype: target qtype (either A or AAAA). 1415b7579f77SDag-Erling Smørgrav * @param qclass: target qclass. 1416b7579f77SDag-Erling Smørgrav * @return true on success, false on failure. 1417b7579f77SDag-Erling Smørgrav */ 1418b7579f77SDag-Erling Smørgrav static int 1419b7579f77SDag-Erling Smørgrav generate_target_query(struct module_qstate* qstate, struct iter_qstate* iq, 1420b7579f77SDag-Erling Smørgrav int id, uint8_t* name, size_t namelen, uint16_t qtype, uint16_t qclass) 1421b7579f77SDag-Erling Smørgrav { 1422b7579f77SDag-Erling Smørgrav struct module_qstate* subq; 1423b7579f77SDag-Erling Smørgrav if(!generate_sub_request(name, namelen, qtype, qclass, qstate, 1424b7579f77SDag-Erling Smørgrav id, iq, INIT_REQUEST_STATE, FINISHED_STATE, &subq, 0)) 1425b7579f77SDag-Erling Smørgrav return 0; 1426b7579f77SDag-Erling Smørgrav log_nametypeclass(VERB_QUERY, "new target", name, qtype, qclass); 1427b7579f77SDag-Erling Smørgrav return 1; 1428b7579f77SDag-Erling Smørgrav } 1429b7579f77SDag-Erling Smørgrav 1430b7579f77SDag-Erling Smørgrav /** 1431b7579f77SDag-Erling Smørgrav * Given an event at a certain state, generate zero or more target queries 1432b7579f77SDag-Erling Smørgrav * for it's current delegation point. 1433b7579f77SDag-Erling Smørgrav * 1434b7579f77SDag-Erling Smørgrav * @param qstate: query state. 1435b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 1436b7579f77SDag-Erling Smørgrav * @param ie: iterator shared global environment. 1437b7579f77SDag-Erling Smørgrav * @param id: module id. 1438b7579f77SDag-Erling Smørgrav * @param maxtargets: The maximum number of targets to query for. 1439b7579f77SDag-Erling Smørgrav * if it is negative, there is no maximum number of targets. 1440b7579f77SDag-Erling Smørgrav * @param num: returns the number of queries generated and processed, 1441b7579f77SDag-Erling Smørgrav * which may be zero if there were no missing targets. 1442b7579f77SDag-Erling Smørgrav * @return false on error. 1443b7579f77SDag-Erling Smørgrav */ 1444b7579f77SDag-Erling Smørgrav static int 1445b7579f77SDag-Erling Smørgrav query_for_targets(struct module_qstate* qstate, struct iter_qstate* iq, 1446b7579f77SDag-Erling Smørgrav struct iter_env* ie, int id, int maxtargets, int* num) 1447b7579f77SDag-Erling Smørgrav { 1448b7579f77SDag-Erling Smørgrav int query_count = 0; 1449b7579f77SDag-Erling Smørgrav struct delegpt_ns* ns; 1450b7579f77SDag-Erling Smørgrav int missing; 1451b7579f77SDag-Erling Smørgrav int toget = 0; 1452b7579f77SDag-Erling Smørgrav 1453b7579f77SDag-Erling Smørgrav if(iq->depth == ie->max_dependency_depth) 1454b7579f77SDag-Erling Smørgrav return 0; 145552df462fSXin LI if(iq->depth > 0 && iq->target_count && 145652df462fSXin LI iq->target_count[1] > MAX_TARGET_COUNT) { 14576480faa8SDag-Erling Smørgrav char s[LDNS_MAX_DOMAINLEN+1]; 14586480faa8SDag-Erling Smørgrav dname_str(qstate->qinfo.qname, s); 14596480faa8SDag-Erling Smørgrav verbose(VERB_QUERY, "request %s has exceeded the maximum " 14606480faa8SDag-Erling Smørgrav "number of glue fetches %d", s, iq->target_count[1]); 146152df462fSXin LI return 0; 146252df462fSXin LI } 1463b7579f77SDag-Erling Smørgrav 1464b7579f77SDag-Erling Smørgrav iter_mark_cycle_targets(qstate, iq->dp); 1465b7579f77SDag-Erling Smørgrav missing = (int)delegpt_count_missing_targets(iq->dp); 1466b7579f77SDag-Erling Smørgrav log_assert(maxtargets != 0); /* that would not be useful */ 1467b7579f77SDag-Erling Smørgrav 1468b7579f77SDag-Erling Smørgrav /* Generate target requests. Basically, any missing targets 1469b7579f77SDag-Erling Smørgrav * are queried for here, regardless if it is necessary to do 1470b7579f77SDag-Erling Smørgrav * so to continue processing. */ 1471b7579f77SDag-Erling Smørgrav if(maxtargets < 0 || maxtargets > missing) 1472b7579f77SDag-Erling Smørgrav toget = missing; 1473b7579f77SDag-Erling Smørgrav else toget = maxtargets; 1474b7579f77SDag-Erling Smørgrav if(toget == 0) { 1475b7579f77SDag-Erling Smørgrav *num = 0; 1476b7579f77SDag-Erling Smørgrav return 1; 1477b7579f77SDag-Erling Smørgrav } 1478b7579f77SDag-Erling Smørgrav /* select 'toget' items from the total of 'missing' items */ 1479b7579f77SDag-Erling Smørgrav log_assert(toget <= missing); 1480b7579f77SDag-Erling Smørgrav 1481b7579f77SDag-Erling Smørgrav /* loop over missing targets */ 1482b7579f77SDag-Erling Smørgrav for(ns = iq->dp->nslist; ns; ns = ns->next) { 1483b7579f77SDag-Erling Smørgrav if(ns->resolved) 1484b7579f77SDag-Erling Smørgrav continue; 1485b7579f77SDag-Erling Smørgrav 1486b7579f77SDag-Erling Smørgrav /* randomly select this item with probability toget/missing */ 1487b7579f77SDag-Erling Smørgrav if(!iter_ns_probability(qstate->env->rnd, toget, missing)) { 1488b7579f77SDag-Erling Smørgrav /* do not select this one, next; select toget number 1489b7579f77SDag-Erling Smørgrav * of items from a list one less in size */ 1490b7579f77SDag-Erling Smørgrav missing --; 1491b7579f77SDag-Erling Smørgrav continue; 1492b7579f77SDag-Erling Smørgrav } 1493b7579f77SDag-Erling Smørgrav 1494b7579f77SDag-Erling Smørgrav if(ie->supports_ipv6 && !ns->got6) { 1495b7579f77SDag-Erling Smørgrav /* Send the AAAA request. */ 1496b7579f77SDag-Erling Smørgrav if(!generate_target_query(qstate, iq, id, 1497b7579f77SDag-Erling Smørgrav ns->name, ns->namelen, 1498b7579f77SDag-Erling Smørgrav LDNS_RR_TYPE_AAAA, iq->qchase.qclass)) { 1499b7579f77SDag-Erling Smørgrav *num = query_count; 1500b7579f77SDag-Erling Smørgrav if(query_count > 0) 1501b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_wait_subquery; 1502b7579f77SDag-Erling Smørgrav return 0; 1503b7579f77SDag-Erling Smørgrav } 1504b7579f77SDag-Erling Smørgrav query_count++; 1505b7579f77SDag-Erling Smørgrav } 1506b7579f77SDag-Erling Smørgrav /* Send the A request. */ 1507b7579f77SDag-Erling Smørgrav if(ie->supports_ipv4 && !ns->got4) { 1508b7579f77SDag-Erling Smørgrav if(!generate_target_query(qstate, iq, id, 1509b7579f77SDag-Erling Smørgrav ns->name, ns->namelen, 1510b7579f77SDag-Erling Smørgrav LDNS_RR_TYPE_A, iq->qchase.qclass)) { 1511b7579f77SDag-Erling Smørgrav *num = query_count; 1512b7579f77SDag-Erling Smørgrav if(query_count > 0) 1513b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_wait_subquery; 1514b7579f77SDag-Erling Smørgrav return 0; 1515b7579f77SDag-Erling Smørgrav } 1516b7579f77SDag-Erling Smørgrav query_count++; 1517b7579f77SDag-Erling Smørgrav } 1518b7579f77SDag-Erling Smørgrav 1519b7579f77SDag-Erling Smørgrav /* mark this target as in progress. */ 1520b7579f77SDag-Erling Smørgrav ns->resolved = 1; 1521b7579f77SDag-Erling Smørgrav missing--; 1522b7579f77SDag-Erling Smørgrav toget--; 1523b7579f77SDag-Erling Smørgrav if(toget == 0) 1524b7579f77SDag-Erling Smørgrav break; 1525b7579f77SDag-Erling Smørgrav } 1526b7579f77SDag-Erling Smørgrav *num = query_count; 1527b7579f77SDag-Erling Smørgrav if(query_count > 0) 1528b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_wait_subquery; 1529b7579f77SDag-Erling Smørgrav 1530b7579f77SDag-Erling Smørgrav return 1; 1531b7579f77SDag-Erling Smørgrav } 1532b7579f77SDag-Erling Smørgrav 153317d15b25SDag-Erling Smørgrav /** see if last resort is possible - does config allow queries to parent */ 153417d15b25SDag-Erling Smørgrav static int 153517d15b25SDag-Erling Smørgrav can_have_last_resort(struct module_env* env, struct delegpt* dp, 153617d15b25SDag-Erling Smørgrav struct iter_qstate* iq) 153717d15b25SDag-Erling Smørgrav { 153817d15b25SDag-Erling Smørgrav struct delegpt* fwddp; 153917d15b25SDag-Erling Smørgrav struct iter_hints_stub* stub; 154017d15b25SDag-Erling Smørgrav /* do not process a last resort (the parent side) if a stub 154117d15b25SDag-Erling Smørgrav * or forward is configured, because we do not want to go 'above' 154217d15b25SDag-Erling Smørgrav * the configured servers */ 154317d15b25SDag-Erling Smørgrav if(!dname_is_root(dp->name) && (stub = (struct iter_hints_stub*) 154417d15b25SDag-Erling Smørgrav name_tree_find(&env->hints->tree, dp->name, dp->namelen, 154517d15b25SDag-Erling Smørgrav dp->namelabs, iq->qchase.qclass)) && 154617d15b25SDag-Erling Smørgrav /* has_parent side is turned off for stub_first, where we 154717d15b25SDag-Erling Smørgrav * are allowed to go to the parent */ 154817d15b25SDag-Erling Smørgrav stub->dp->has_parent_side_NS) { 154917d15b25SDag-Erling Smørgrav verbose(VERB_QUERY, "configured stub servers failed -- returning SERVFAIL"); 155017d15b25SDag-Erling Smørgrav return 0; 155117d15b25SDag-Erling Smørgrav } 155217d15b25SDag-Erling Smørgrav if((fwddp = forwards_find(env->fwds, dp->name, iq->qchase.qclass)) && 155317d15b25SDag-Erling Smørgrav /* has_parent_side is turned off for forward_first, where 155417d15b25SDag-Erling Smørgrav * we are allowed to go to the parent */ 155517d15b25SDag-Erling Smørgrav fwddp->has_parent_side_NS) { 155617d15b25SDag-Erling Smørgrav verbose(VERB_QUERY, "configured forward servers failed -- returning SERVFAIL"); 155717d15b25SDag-Erling Smørgrav return 0; 155817d15b25SDag-Erling Smørgrav } 155917d15b25SDag-Erling Smørgrav return 1; 156017d15b25SDag-Erling Smørgrav } 156117d15b25SDag-Erling Smørgrav 1562b7579f77SDag-Erling Smørgrav /** 1563b7579f77SDag-Erling Smørgrav * Called by processQueryTargets when it would like extra targets to query 1564b7579f77SDag-Erling Smørgrav * but it seems to be out of options. At last resort some less appealing 1565b7579f77SDag-Erling Smørgrav * options are explored. If there are no more options, the result is SERVFAIL 1566b7579f77SDag-Erling Smørgrav * 1567b7579f77SDag-Erling Smørgrav * @param qstate: query state. 1568b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 1569b7579f77SDag-Erling Smørgrav * @param ie: iterator shared global environment. 1570b7579f77SDag-Erling Smørgrav * @param id: module id. 1571b7579f77SDag-Erling Smørgrav * @return true if the event requires more request processing immediately, 1572b7579f77SDag-Erling Smørgrav * false if not. 1573b7579f77SDag-Erling Smørgrav */ 1574b7579f77SDag-Erling Smørgrav static int 1575b7579f77SDag-Erling Smørgrav processLastResort(struct module_qstate* qstate, struct iter_qstate* iq, 1576b7579f77SDag-Erling Smørgrav struct iter_env* ie, int id) 1577b7579f77SDag-Erling Smørgrav { 1578b7579f77SDag-Erling Smørgrav struct delegpt_ns* ns; 1579b7579f77SDag-Erling Smørgrav int query_count = 0; 1580b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "No more query targets, attempting last resort"); 1581b7579f77SDag-Erling Smørgrav log_assert(iq->dp); 1582b7579f77SDag-Erling Smørgrav 158317d15b25SDag-Erling Smørgrav if(!can_have_last_resort(qstate->env, iq->dp, iq)) { 158417d15b25SDag-Erling Smørgrav /* fail -- no more targets, no more hope of targets, no hope 158517d15b25SDag-Erling Smørgrav * of a response. */ 158617d15b25SDag-Erling Smørgrav return error_response_cache(qstate, id, LDNS_RCODE_SERVFAIL); 158717d15b25SDag-Erling Smørgrav } 15888ed2b524SDag-Erling Smørgrav if(!iq->dp->has_parent_side_NS && dname_is_root(iq->dp->name)) { 15898ed2b524SDag-Erling Smørgrav struct delegpt* p = hints_lookup_root(qstate->env->hints, 15908ed2b524SDag-Erling Smørgrav iq->qchase.qclass); 15918ed2b524SDag-Erling Smørgrav if(p) { 15928ed2b524SDag-Erling Smørgrav struct delegpt_ns* ns; 15938ed2b524SDag-Erling Smørgrav struct delegpt_addr* a; 15948ed2b524SDag-Erling Smørgrav iq->chase_flags &= ~BIT_RD; /* go to authorities */ 15958ed2b524SDag-Erling Smørgrav for(ns = p->nslist; ns; ns=ns->next) { 15968ed2b524SDag-Erling Smørgrav (void)delegpt_add_ns(iq->dp, qstate->region, 159717d15b25SDag-Erling Smørgrav ns->name, ns->lame); 15988ed2b524SDag-Erling Smørgrav } 15998ed2b524SDag-Erling Smørgrav for(a = p->target_list; a; a=a->next_target) { 16008ed2b524SDag-Erling Smørgrav (void)delegpt_add_addr(iq->dp, qstate->region, 16018ed2b524SDag-Erling Smørgrav &a->addr, a->addrlen, a->bogus, 16028ed2b524SDag-Erling Smørgrav a->lame); 16038ed2b524SDag-Erling Smørgrav } 16048ed2b524SDag-Erling Smørgrav } 16058ed2b524SDag-Erling Smørgrav iq->dp->has_parent_side_NS = 1; 16068ed2b524SDag-Erling Smørgrav } else if(!iq->dp->has_parent_side_NS) { 1607b7579f77SDag-Erling Smørgrav if(!iter_lookup_parent_NS_from_cache(qstate->env, iq->dp, 1608b7579f77SDag-Erling Smørgrav qstate->region, &qstate->qinfo) 1609b7579f77SDag-Erling Smørgrav || !iq->dp->has_parent_side_NS) { 1610b7579f77SDag-Erling Smørgrav /* if: malloc failure in lookup go up to try */ 1611b7579f77SDag-Erling Smørgrav /* if: no parent NS in cache - go up one level */ 1612b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "try to grab parent NS"); 1613b7579f77SDag-Erling Smørgrav iq->store_parent_NS = iq->dp; 16148ed2b524SDag-Erling Smørgrav iq->chase_flags &= ~BIT_RD; /* go to authorities */ 1615b7579f77SDag-Erling Smørgrav iq->deleg_msg = NULL; 1616b7579f77SDag-Erling Smørgrav iq->refetch_glue = 1; 1617b7579f77SDag-Erling Smørgrav iq->query_restart_count++; 1618b7579f77SDag-Erling Smørgrav iq->sent_count = 0; 161905ab2901SDag-Erling Smørgrav if(qstate->env->cfg->qname_minimisation) 162005ab2901SDag-Erling Smørgrav iq->minimisation_state = INIT_MINIMISE_STATE; 1621b7579f77SDag-Erling Smørgrav return next_state(iq, INIT_REQUEST_STATE); 1622b7579f77SDag-Erling Smørgrav } 1623b7579f77SDag-Erling Smørgrav } 1624b7579f77SDag-Erling Smørgrav /* see if that makes new names available */ 1625b7579f77SDag-Erling Smørgrav if(!cache_fill_missing(qstate->env, iq->qchase.qclass, 1626b7579f77SDag-Erling Smørgrav qstate->region, iq->dp)) 1627b7579f77SDag-Erling Smørgrav log_err("out of memory in cache_fill_missing"); 1628b7579f77SDag-Erling Smørgrav if(iq->dp->usable_list) { 1629b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "try parent-side-name, w. glue from cache"); 1630b7579f77SDag-Erling Smørgrav return next_state(iq, QUERYTARGETS_STATE); 1631b7579f77SDag-Erling Smørgrav } 1632b7579f77SDag-Erling Smørgrav /* try to fill out parent glue from cache */ 1633b7579f77SDag-Erling Smørgrav if(iter_lookup_parent_glue_from_cache(qstate->env, iq->dp, 1634b7579f77SDag-Erling Smørgrav qstate->region, &qstate->qinfo)) { 1635b7579f77SDag-Erling Smørgrav /* got parent stuff from cache, see if we can continue */ 1636b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "try parent-side glue from cache"); 1637b7579f77SDag-Erling Smørgrav return next_state(iq, QUERYTARGETS_STATE); 1638b7579f77SDag-Erling Smørgrav } 1639b7579f77SDag-Erling Smørgrav /* query for an extra name added by the parent-NS record */ 1640b7579f77SDag-Erling Smørgrav if(delegpt_count_missing_targets(iq->dp) > 0) { 1641b7579f77SDag-Erling Smørgrav int qs = 0; 1642b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "try parent-side target name"); 1643b7579f77SDag-Erling Smørgrav if(!query_for_targets(qstate, iq, ie, id, 1, &qs)) { 1644b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 1645b7579f77SDag-Erling Smørgrav } 1646b7579f77SDag-Erling Smørgrav iq->num_target_queries += qs; 164752df462fSXin LI target_count_increase(iq, qs); 1648b7579f77SDag-Erling Smørgrav if(qs != 0) { 1649b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_wait_subquery; 1650b7579f77SDag-Erling Smørgrav return 0; /* and wait for them */ 1651b7579f77SDag-Erling Smørgrav } 1652b7579f77SDag-Erling Smørgrav } 1653b7579f77SDag-Erling Smørgrav if(iq->depth == ie->max_dependency_depth) { 1654b7579f77SDag-Erling Smørgrav verbose(VERB_QUERY, "maxdepth and need more nameservers, fail"); 1655b7579f77SDag-Erling Smørgrav return error_response_cache(qstate, id, LDNS_RCODE_SERVFAIL); 1656b7579f77SDag-Erling Smørgrav } 165752df462fSXin LI if(iq->depth > 0 && iq->target_count && 165852df462fSXin LI iq->target_count[1] > MAX_TARGET_COUNT) { 16596480faa8SDag-Erling Smørgrav char s[LDNS_MAX_DOMAINLEN+1]; 16606480faa8SDag-Erling Smørgrav dname_str(qstate->qinfo.qname, s); 16616480faa8SDag-Erling Smørgrav verbose(VERB_QUERY, "request %s has exceeded the maximum " 16626480faa8SDag-Erling Smørgrav "number of glue fetches %d", s, iq->target_count[1]); 166352df462fSXin LI return error_response_cache(qstate, id, LDNS_RCODE_SERVFAIL); 166452df462fSXin LI } 1665b7579f77SDag-Erling Smørgrav /* mark cycle targets for parent-side lookups */ 1666b7579f77SDag-Erling Smørgrav iter_mark_pside_cycle_targets(qstate, iq->dp); 1667b7579f77SDag-Erling Smørgrav /* see if we can issue queries to get nameserver addresses */ 1668b7579f77SDag-Erling Smørgrav /* this lookup is not randomized, but sequential. */ 1669b7579f77SDag-Erling Smørgrav for(ns = iq->dp->nslist; ns; ns = ns->next) { 1670b7579f77SDag-Erling Smørgrav /* query for parent-side A and AAAA for nameservers */ 1671b7579f77SDag-Erling Smørgrav if(ie->supports_ipv6 && !ns->done_pside6) { 1672b7579f77SDag-Erling Smørgrav /* Send the AAAA request. */ 1673b7579f77SDag-Erling Smørgrav if(!generate_parentside_target_query(qstate, iq, id, 1674b7579f77SDag-Erling Smørgrav ns->name, ns->namelen, 1675b7579f77SDag-Erling Smørgrav LDNS_RR_TYPE_AAAA, iq->qchase.qclass)) 1676b7579f77SDag-Erling Smørgrav return error_response(qstate, id, 1677b7579f77SDag-Erling Smørgrav LDNS_RCODE_SERVFAIL); 1678b7579f77SDag-Erling Smørgrav ns->done_pside6 = 1; 1679b7579f77SDag-Erling Smørgrav query_count++; 1680b7579f77SDag-Erling Smørgrav } 1681b7579f77SDag-Erling Smørgrav if(ie->supports_ipv4 && !ns->done_pside4) { 1682b7579f77SDag-Erling Smørgrav /* Send the A request. */ 1683b7579f77SDag-Erling Smørgrav if(!generate_parentside_target_query(qstate, iq, id, 1684b7579f77SDag-Erling Smørgrav ns->name, ns->namelen, 1685b7579f77SDag-Erling Smørgrav LDNS_RR_TYPE_A, iq->qchase.qclass)) 1686b7579f77SDag-Erling Smørgrav return error_response(qstate, id, 1687b7579f77SDag-Erling Smørgrav LDNS_RCODE_SERVFAIL); 1688b7579f77SDag-Erling Smørgrav ns->done_pside4 = 1; 1689b7579f77SDag-Erling Smørgrav query_count++; 1690b7579f77SDag-Erling Smørgrav } 1691b7579f77SDag-Erling Smørgrav if(query_count != 0) { /* suspend to await results */ 1692b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "try parent-side glue lookup"); 1693b7579f77SDag-Erling Smørgrav iq->num_target_queries += query_count; 169452df462fSXin LI target_count_increase(iq, query_count); 1695b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_wait_subquery; 1696b7579f77SDag-Erling Smørgrav return 0; 1697b7579f77SDag-Erling Smørgrav } 1698b7579f77SDag-Erling Smørgrav } 1699b7579f77SDag-Erling Smørgrav 1700b7579f77SDag-Erling Smørgrav /* if this was a parent-side glue query itself, then store that 1701b7579f77SDag-Erling Smørgrav * failure in cache. */ 1702b7579f77SDag-Erling Smørgrav if(iq->query_for_pside_glue && !iq->pside_glue) 1703b7579f77SDag-Erling Smørgrav iter_store_parentside_neg(qstate->env, &qstate->qinfo, 1704b7579f77SDag-Erling Smørgrav iq->deleg_msg?iq->deleg_msg->rep: 1705b7579f77SDag-Erling Smørgrav (iq->response?iq->response->rep:NULL)); 1706b7579f77SDag-Erling Smørgrav 1707b7579f77SDag-Erling Smørgrav verbose(VERB_QUERY, "out of query targets -- returning SERVFAIL"); 1708b7579f77SDag-Erling Smørgrav /* fail -- no more targets, no more hope of targets, no hope 1709b7579f77SDag-Erling Smørgrav * of a response. */ 1710b7579f77SDag-Erling Smørgrav return error_response_cache(qstate, id, LDNS_RCODE_SERVFAIL); 1711b7579f77SDag-Erling Smørgrav } 1712b7579f77SDag-Erling Smørgrav 1713b7579f77SDag-Erling Smørgrav /** 1714b7579f77SDag-Erling Smørgrav * Try to find the NS record set that will resolve a qtype DS query. Due 1715b7579f77SDag-Erling Smørgrav * to grandparent/grandchild reasons we did not get a proper lookup right 1716b7579f77SDag-Erling Smørgrav * away. We need to create type NS queries until we get the right parent 1717b7579f77SDag-Erling Smørgrav * for this lookup. We remove labels from the query to find the right point. 1718b7579f77SDag-Erling Smørgrav * If we end up at the old dp name, then there is no solution. 1719b7579f77SDag-Erling Smørgrav * 1720b7579f77SDag-Erling Smørgrav * @param qstate: query state. 1721b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 1722b7579f77SDag-Erling Smørgrav * @param id: module id. 1723b7579f77SDag-Erling Smørgrav * @return true if the event requires more immediate processing, false if 1724b7579f77SDag-Erling Smørgrav * not. This is generally only true when forwarding the request to 1725b7579f77SDag-Erling Smørgrav * the final state (i.e., on answer). 1726b7579f77SDag-Erling Smørgrav */ 1727b7579f77SDag-Erling Smørgrav static int 17288ed2b524SDag-Erling Smørgrav processDSNSFind(struct module_qstate* qstate, struct iter_qstate* iq, int id) 1729b7579f77SDag-Erling Smørgrav { 1730b7579f77SDag-Erling Smørgrav struct module_qstate* subq = NULL; 1731b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "processDSNSFind"); 1732b7579f77SDag-Erling Smørgrav 1733b7579f77SDag-Erling Smørgrav if(!iq->dsns_point) { 1734b7579f77SDag-Erling Smørgrav /* initialize */ 1735b7579f77SDag-Erling Smørgrav iq->dsns_point = iq->qchase.qname; 1736b7579f77SDag-Erling Smørgrav iq->dsns_point_len = iq->qchase.qname_len; 1737b7579f77SDag-Erling Smørgrav } 1738b7579f77SDag-Erling Smørgrav /* robustcheck for internal error: we are not underneath the dp */ 1739b7579f77SDag-Erling Smørgrav if(!dname_subdomain_c(iq->dsns_point, iq->dp->name)) { 1740b7579f77SDag-Erling Smørgrav return error_response_cache(qstate, id, LDNS_RCODE_SERVFAIL); 1741b7579f77SDag-Erling Smørgrav } 1742b7579f77SDag-Erling Smørgrav 1743b7579f77SDag-Erling Smørgrav /* go up one (more) step, until we hit the dp, if so, end */ 1744b7579f77SDag-Erling Smørgrav dname_remove_label(&iq->dsns_point, &iq->dsns_point_len); 1745b7579f77SDag-Erling Smørgrav if(query_dname_compare(iq->dsns_point, iq->dp->name) == 0) { 1746b7579f77SDag-Erling Smørgrav /* there was no inbetween nameserver, use the old delegation 1747b7579f77SDag-Erling Smørgrav * point again. And this time, because dsns_point is nonNULL 1748b7579f77SDag-Erling Smørgrav * we are going to accept the (bad) result */ 1749b7579f77SDag-Erling Smørgrav iq->state = QUERYTARGETS_STATE; 1750b7579f77SDag-Erling Smørgrav return 1; 1751b7579f77SDag-Erling Smørgrav } 1752b7579f77SDag-Erling Smørgrav iq->state = DSNS_FIND_STATE; 1753b7579f77SDag-Erling Smørgrav 1754b7579f77SDag-Erling Smørgrav /* spawn NS lookup (validation not needed, this is for DS lookup) */ 1755b7579f77SDag-Erling Smørgrav log_nametypeclass(VERB_ALGO, "fetch nameservers", 1756b7579f77SDag-Erling Smørgrav iq->dsns_point, LDNS_RR_TYPE_NS, iq->qchase.qclass); 1757b7579f77SDag-Erling Smørgrav if(!generate_sub_request(iq->dsns_point, iq->dsns_point_len, 1758b7579f77SDag-Erling Smørgrav LDNS_RR_TYPE_NS, iq->qchase.qclass, qstate, id, iq, 1759b7579f77SDag-Erling Smørgrav INIT_REQUEST_STATE, FINISHED_STATE, &subq, 0)) { 1760b7579f77SDag-Erling Smørgrav return error_response_cache(qstate, id, LDNS_RCODE_SERVFAIL); 1761b7579f77SDag-Erling Smørgrav } 1762b7579f77SDag-Erling Smørgrav 1763b7579f77SDag-Erling Smørgrav return 0; 1764b7579f77SDag-Erling Smørgrav } 1765b7579f77SDag-Erling Smørgrav 1766b7579f77SDag-Erling Smørgrav /** 1767b7579f77SDag-Erling Smørgrav * This is the request event state where the request will be sent to one of 1768b7579f77SDag-Erling Smørgrav * its current query targets. This state also handles issuing target lookup 1769b7579f77SDag-Erling Smørgrav * queries for missing target IP addresses. Queries typically iterate on 1770b7579f77SDag-Erling Smørgrav * this state, both when they are just trying different targets for a given 1771b7579f77SDag-Erling Smørgrav * delegation point, and when they change delegation points. This state 1772b7579f77SDag-Erling Smørgrav * roughly corresponds to RFC 1034 algorithm steps 3 and 4. 1773b7579f77SDag-Erling Smørgrav * 1774b7579f77SDag-Erling Smørgrav * @param qstate: query state. 1775b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 1776b7579f77SDag-Erling Smørgrav * @param ie: iterator shared global environment. 1777b7579f77SDag-Erling Smørgrav * @param id: module id. 1778b7579f77SDag-Erling Smørgrav * @return true if the event requires more request processing immediately, 1779b7579f77SDag-Erling Smørgrav * false if not. This state only returns true when it is generating 1780b7579f77SDag-Erling Smørgrav * a SERVFAIL response because the query has hit a dead end. 1781b7579f77SDag-Erling Smørgrav */ 1782b7579f77SDag-Erling Smørgrav static int 1783b7579f77SDag-Erling Smørgrav processQueryTargets(struct module_qstate* qstate, struct iter_qstate* iq, 1784b7579f77SDag-Erling Smørgrav struct iter_env* ie, int id) 1785b7579f77SDag-Erling Smørgrav { 1786b7579f77SDag-Erling Smørgrav int tf_policy; 1787b7579f77SDag-Erling Smørgrav struct delegpt_addr* target; 1788b7579f77SDag-Erling Smørgrav struct outbound_entry* outq; 1789*e2d15004SDag-Erling Smørgrav /* EDNS options to set on outgoing packet */ 1790*e2d15004SDag-Erling Smørgrav struct edns_option* opt_list = NULL; 1791b7579f77SDag-Erling Smørgrav 1792b7579f77SDag-Erling Smørgrav /* NOTE: a request will encounter this state for each target it 1793b7579f77SDag-Erling Smørgrav * needs to send a query to. That is, at least one per referral, 1794b7579f77SDag-Erling Smørgrav * more if some targets timeout or return throwaway answers. */ 1795b7579f77SDag-Erling Smørgrav 1796b7579f77SDag-Erling Smørgrav log_query_info(VERB_QUERY, "processQueryTargets:", &qstate->qinfo); 1797b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "processQueryTargets: targetqueries %d, " 1798b7579f77SDag-Erling Smørgrav "currentqueries %d sentcount %d", iq->num_target_queries, 1799b7579f77SDag-Erling Smørgrav iq->num_current_queries, iq->sent_count); 1800b7579f77SDag-Erling Smørgrav 1801b7579f77SDag-Erling Smørgrav /* Make sure that we haven't run away */ 1802b7579f77SDag-Erling Smørgrav /* FIXME: is this check even necessary? */ 1803b7579f77SDag-Erling Smørgrav if(iq->referral_count > MAX_REFERRAL_COUNT) { 1804b7579f77SDag-Erling Smørgrav verbose(VERB_QUERY, "request has exceeded the maximum " 1805b7579f77SDag-Erling Smørgrav "number of referrrals with %d", iq->referral_count); 1806b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 1807b7579f77SDag-Erling Smørgrav } 1808b7579f77SDag-Erling Smørgrav if(iq->sent_count > MAX_SENT_COUNT) { 1809b7579f77SDag-Erling Smørgrav verbose(VERB_QUERY, "request has exceeded the maximum " 1810b7579f77SDag-Erling Smørgrav "number of sends with %d", iq->sent_count); 1811b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 1812b7579f77SDag-Erling Smørgrav } 1813b7579f77SDag-Erling Smørgrav 1814b7579f77SDag-Erling Smørgrav /* Make sure we have a delegation point, otherwise priming failed 1815b7579f77SDag-Erling Smørgrav * or another failure occurred */ 1816b7579f77SDag-Erling Smørgrav if(!iq->dp) { 1817b7579f77SDag-Erling Smørgrav verbose(VERB_QUERY, "Failed to get a delegation, giving up"); 1818b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 1819b7579f77SDag-Erling Smørgrav } 1820b7579f77SDag-Erling Smørgrav if(!ie->supports_ipv6) 1821b7579f77SDag-Erling Smørgrav delegpt_no_ipv6(iq->dp); 1822b7579f77SDag-Erling Smørgrav if(!ie->supports_ipv4) 1823b7579f77SDag-Erling Smørgrav delegpt_no_ipv4(iq->dp); 1824b7579f77SDag-Erling Smørgrav delegpt_log(VERB_ALGO, iq->dp); 1825b7579f77SDag-Erling Smørgrav 1826b7579f77SDag-Erling Smørgrav if(iq->num_current_queries>0) { 1827b7579f77SDag-Erling Smørgrav /* already busy answering a query, this restart is because 1828b7579f77SDag-Erling Smørgrav * more delegpt addrs became available, wait for existing 1829b7579f77SDag-Erling Smørgrav * query. */ 1830b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "woke up, but wait for outstanding query"); 1831b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_wait_reply; 1832b7579f77SDag-Erling Smørgrav return 0; 1833b7579f77SDag-Erling Smørgrav } 1834b7579f77SDag-Erling Smørgrav 1835b7579f77SDag-Erling Smørgrav tf_policy = 0; 1836b7579f77SDag-Erling Smørgrav /* < not <=, because although the array is large enough for <=, the 1837b7579f77SDag-Erling Smørgrav * generated query will immediately be discarded due to depth and 1838b7579f77SDag-Erling Smørgrav * that servfail is cached, which is not good as opportunism goes. */ 1839b7579f77SDag-Erling Smørgrav if(iq->depth < ie->max_dependency_depth 1840b7579f77SDag-Erling Smørgrav && iq->sent_count < TARGET_FETCH_STOP) { 1841b7579f77SDag-Erling Smørgrav tf_policy = ie->target_fetch_policy[iq->depth]; 1842b7579f77SDag-Erling Smørgrav } 1843b7579f77SDag-Erling Smørgrav 1844b7579f77SDag-Erling Smørgrav /* if in 0x20 fallback get as many targets as possible */ 1845b7579f77SDag-Erling Smørgrav if(iq->caps_fallback) { 1846b7579f77SDag-Erling Smørgrav int extra = 0; 1847b7579f77SDag-Erling Smørgrav size_t naddr, nres, navail; 1848b7579f77SDag-Erling Smørgrav if(!query_for_targets(qstate, iq, ie, id, -1, &extra)) { 1849b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 1850b7579f77SDag-Erling Smørgrav } 1851b7579f77SDag-Erling Smørgrav iq->num_target_queries += extra; 185252df462fSXin LI target_count_increase(iq, extra); 1853b7579f77SDag-Erling Smørgrav if(iq->num_target_queries > 0) { 1854b7579f77SDag-Erling Smørgrav /* wait to get all targets, we want to try em */ 1855b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "wait for all targets for fallback"); 1856b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_wait_reply; 1857b7579f77SDag-Erling Smørgrav return 0; 1858b7579f77SDag-Erling Smørgrav } 1859b7579f77SDag-Erling Smørgrav /* did we do enough fallback queries already? */ 1860b7579f77SDag-Erling Smørgrav delegpt_count_addr(iq->dp, &naddr, &nres, &navail); 1861b7579f77SDag-Erling Smørgrav /* the current caps_server is the number of fallbacks sent. 1862b7579f77SDag-Erling Smørgrav * the original query is one that matched too, so we have 1863b7579f77SDag-Erling Smørgrav * caps_server+1 number of matching queries now */ 1864b7579f77SDag-Erling Smørgrav if(iq->caps_server+1 >= naddr*3 || 186509a3aaf3SDag-Erling Smørgrav iq->caps_server*2+2 >= MAX_SENT_COUNT) { 186609a3aaf3SDag-Erling Smørgrav /* *2 on sentcount check because ipv6 may fail */ 1867b7579f77SDag-Erling Smørgrav /* we're done, process the response */ 1868b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "0x20 fallback had %d responses " 1869b7579f77SDag-Erling Smørgrav "match for %d wanted, done.", 1870b7579f77SDag-Erling Smørgrav (int)iq->caps_server+1, (int)naddr*3); 187109a3aaf3SDag-Erling Smørgrav iq->response = iq->caps_response; 1872b7579f77SDag-Erling Smørgrav iq->caps_fallback = 0; 1873b7579f77SDag-Erling Smørgrav iter_dec_attempts(iq->dp, 3); /* space for fallback */ 1874b7579f77SDag-Erling Smørgrav iq->num_current_queries++; /* RespState decrements it*/ 1875b7579f77SDag-Erling Smørgrav iq->referral_count++; /* make sure we don't loop */ 1876b7579f77SDag-Erling Smørgrav iq->sent_count = 0; 1877b7579f77SDag-Erling Smørgrav iq->state = QUERY_RESP_STATE; 1878b7579f77SDag-Erling Smørgrav return 1; 1879b7579f77SDag-Erling Smørgrav } 1880b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "0x20 fallback number %d", 1881b7579f77SDag-Erling Smørgrav (int)iq->caps_server); 1882b7579f77SDag-Erling Smørgrav 1883b7579f77SDag-Erling Smørgrav /* if there is a policy to fetch missing targets 1884b7579f77SDag-Erling Smørgrav * opportunistically, do it. we rely on the fact that once a 1885b7579f77SDag-Erling Smørgrav * query (or queries) for a missing name have been issued, 1886b7579f77SDag-Erling Smørgrav * they will not show up again. */ 1887b7579f77SDag-Erling Smørgrav } else if(tf_policy != 0) { 1888b7579f77SDag-Erling Smørgrav int extra = 0; 1889b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "attempt to get extra %d targets", 1890b7579f77SDag-Erling Smørgrav tf_policy); 1891b7579f77SDag-Erling Smørgrav (void)query_for_targets(qstate, iq, ie, id, tf_policy, &extra); 1892b7579f77SDag-Erling Smørgrav /* errors ignored, these targets are not strictly necessary for 1893b7579f77SDag-Erling Smørgrav * this result, we do not have to reply with SERVFAIL */ 1894b7579f77SDag-Erling Smørgrav iq->num_target_queries += extra; 189552df462fSXin LI target_count_increase(iq, extra); 1896b7579f77SDag-Erling Smørgrav } 1897b7579f77SDag-Erling Smørgrav 1898b7579f77SDag-Erling Smørgrav /* Add the current set of unused targets to our queue. */ 1899b7579f77SDag-Erling Smørgrav delegpt_add_unused_targets(iq->dp); 1900b7579f77SDag-Erling Smørgrav 1901b7579f77SDag-Erling Smørgrav /* Select the next usable target, filtering out unsuitable targets. */ 1902b7579f77SDag-Erling Smørgrav target = iter_server_selection(ie, qstate->env, iq->dp, 1903b7579f77SDag-Erling Smørgrav iq->dp->name, iq->dp->namelen, iq->qchase.qtype, 1904b7579f77SDag-Erling Smørgrav &iq->dnssec_lame_query, &iq->chase_to_rd, 1905b7579f77SDag-Erling Smørgrav iq->num_target_queries, qstate->blacklist); 1906b7579f77SDag-Erling Smørgrav 1907b7579f77SDag-Erling Smørgrav /* If no usable target was selected... */ 1908b7579f77SDag-Erling Smørgrav if(!target) { 1909b7579f77SDag-Erling Smørgrav /* Here we distinguish between three states: generate a new 1910b7579f77SDag-Erling Smørgrav * target query, just wait, or quit (with a SERVFAIL). 1911b7579f77SDag-Erling Smørgrav * We have the following information: number of active 1912b7579f77SDag-Erling Smørgrav * target queries, number of active current queries, 1913b7579f77SDag-Erling Smørgrav * the presence of missing targets at this delegation 1914b7579f77SDag-Erling Smørgrav * point, and the given query target policy. */ 1915b7579f77SDag-Erling Smørgrav 1916b7579f77SDag-Erling Smørgrav /* Check for the wait condition. If this is true, then 1917b7579f77SDag-Erling Smørgrav * an action must be taken. */ 1918b7579f77SDag-Erling Smørgrav if(iq->num_target_queries==0 && iq->num_current_queries==0) { 1919b7579f77SDag-Erling Smørgrav /* If there is nothing to wait for, then we need 1920b7579f77SDag-Erling Smørgrav * to distinguish between generating (a) new target 1921b7579f77SDag-Erling Smørgrav * query, or failing. */ 1922b7579f77SDag-Erling Smørgrav if(delegpt_count_missing_targets(iq->dp) > 0) { 1923b7579f77SDag-Erling Smørgrav int qs = 0; 1924b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "querying for next " 1925b7579f77SDag-Erling Smørgrav "missing target"); 1926b7579f77SDag-Erling Smørgrav if(!query_for_targets(qstate, iq, ie, id, 1927b7579f77SDag-Erling Smørgrav 1, &qs)) { 1928b7579f77SDag-Erling Smørgrav return error_response(qstate, id, 1929b7579f77SDag-Erling Smørgrav LDNS_RCODE_SERVFAIL); 1930b7579f77SDag-Erling Smørgrav } 1931b7579f77SDag-Erling Smørgrav if(qs == 0 && 1932b7579f77SDag-Erling Smørgrav delegpt_count_missing_targets(iq->dp) == 0){ 1933b7579f77SDag-Erling Smørgrav /* it looked like there were missing 1934b7579f77SDag-Erling Smørgrav * targets, but they did not turn up. 1935b7579f77SDag-Erling Smørgrav * Try the bad choices again (if any), 1936b7579f77SDag-Erling Smørgrav * when we get back here missing==0, 1937b7579f77SDag-Erling Smørgrav * so this is not a loop. */ 1938b7579f77SDag-Erling Smørgrav return 1; 1939b7579f77SDag-Erling Smørgrav } 1940b7579f77SDag-Erling Smørgrav iq->num_target_queries += qs; 194152df462fSXin LI target_count_increase(iq, qs); 1942b7579f77SDag-Erling Smørgrav } 1943b7579f77SDag-Erling Smørgrav /* Since a target query might have been made, we 1944b7579f77SDag-Erling Smørgrav * need to check again. */ 1945b7579f77SDag-Erling Smørgrav if(iq->num_target_queries == 0) { 194609a3aaf3SDag-Erling Smørgrav /* if in capsforid fallback, instead of last 194709a3aaf3SDag-Erling Smørgrav * resort, we agree with the current reply 194809a3aaf3SDag-Erling Smørgrav * we have (if any) (our count of addrs bad)*/ 194909a3aaf3SDag-Erling Smørgrav if(iq->caps_fallback && iq->caps_reply) { 195009a3aaf3SDag-Erling Smørgrav /* we're done, process the response */ 195109a3aaf3SDag-Erling Smørgrav verbose(VERB_ALGO, "0x20 fallback had %d responses, " 195209a3aaf3SDag-Erling Smørgrav "but no more servers except " 195309a3aaf3SDag-Erling Smørgrav "last resort, done.", 195409a3aaf3SDag-Erling Smørgrav (int)iq->caps_server+1); 195509a3aaf3SDag-Erling Smørgrav iq->response = iq->caps_response; 195609a3aaf3SDag-Erling Smørgrav iq->caps_fallback = 0; 195709a3aaf3SDag-Erling Smørgrav iter_dec_attempts(iq->dp, 3); /* space for fallback */ 195809a3aaf3SDag-Erling Smørgrav iq->num_current_queries++; /* RespState decrements it*/ 195909a3aaf3SDag-Erling Smørgrav iq->referral_count++; /* make sure we don't loop */ 196009a3aaf3SDag-Erling Smørgrav iq->sent_count = 0; 196109a3aaf3SDag-Erling Smørgrav iq->state = QUERY_RESP_STATE; 196209a3aaf3SDag-Erling Smørgrav return 1; 196309a3aaf3SDag-Erling Smørgrav } 1964b7579f77SDag-Erling Smørgrav return processLastResort(qstate, iq, ie, id); 1965b7579f77SDag-Erling Smørgrav } 1966b7579f77SDag-Erling Smørgrav } 1967b7579f77SDag-Erling Smørgrav 1968b7579f77SDag-Erling Smørgrav /* otherwise, we have no current targets, so submerge 1969b7579f77SDag-Erling Smørgrav * until one of the target or direct queries return. */ 1970b7579f77SDag-Erling Smørgrav if(iq->num_target_queries>0 && iq->num_current_queries>0) { 1971b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "no current targets -- waiting " 1972b7579f77SDag-Erling Smørgrav "for %d targets to resolve or %d outstanding" 1973b7579f77SDag-Erling Smørgrav " queries to respond", iq->num_target_queries, 1974b7579f77SDag-Erling Smørgrav iq->num_current_queries); 1975b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_wait_reply; 1976b7579f77SDag-Erling Smørgrav } else if(iq->num_target_queries>0) { 1977b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "no current targets -- waiting " 1978b7579f77SDag-Erling Smørgrav "for %d targets to resolve.", 1979b7579f77SDag-Erling Smørgrav iq->num_target_queries); 1980b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_wait_subquery; 1981b7579f77SDag-Erling Smørgrav } else { 1982b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "no current targets -- waiting " 1983b7579f77SDag-Erling Smørgrav "for %d outstanding queries to respond.", 1984b7579f77SDag-Erling Smørgrav iq->num_current_queries); 1985b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_wait_reply; 1986b7579f77SDag-Erling Smørgrav } 1987b7579f77SDag-Erling Smørgrav return 0; 1988b7579f77SDag-Erling Smørgrav } 1989b7579f77SDag-Erling Smørgrav 199009a3aaf3SDag-Erling Smørgrav /* if not forwarding, check ratelimits per delegationpoint name */ 199109a3aaf3SDag-Erling Smørgrav if(!(iq->chase_flags & BIT_RD) && !iq->ratelimit_ok) { 199209a3aaf3SDag-Erling Smørgrav if(!infra_ratelimit_inc(qstate->env->infra_cache, iq->dp->name, 199309a3aaf3SDag-Erling Smørgrav iq->dp->namelen, *qstate->env->now)) { 199409a3aaf3SDag-Erling Smørgrav verbose(VERB_ALGO, "query exceeded ratelimits"); 199509a3aaf3SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 199609a3aaf3SDag-Erling Smørgrav } 199709a3aaf3SDag-Erling Smørgrav } 199809a3aaf3SDag-Erling Smørgrav 199905ab2901SDag-Erling Smørgrav if(iq->minimisation_state == INIT_MINIMISE_STATE) { 2000*e2d15004SDag-Erling Smørgrav /* (Re)set qinfo_out to (new) delegation point, except when 2001*e2d15004SDag-Erling Smørgrav * qinfo_out is already a subdomain of dp. This happens when 2002*e2d15004SDag-Erling Smørgrav * increasing by more than one label at once (QNAMEs with more 2003*e2d15004SDag-Erling Smørgrav * than MAX_MINIMISE_COUNT labels). */ 200405ab2901SDag-Erling Smørgrav if(!(iq->qinfo_out.qname_len 200505ab2901SDag-Erling Smørgrav && dname_subdomain_c(iq->qchase.qname, 200605ab2901SDag-Erling Smørgrav iq->qinfo_out.qname) 200705ab2901SDag-Erling Smørgrav && dname_subdomain_c(iq->qinfo_out.qname, 200805ab2901SDag-Erling Smørgrav iq->dp->name))) { 200905ab2901SDag-Erling Smørgrav iq->qinfo_out.qname = iq->dp->name; 201005ab2901SDag-Erling Smørgrav iq->qinfo_out.qname_len = iq->dp->namelen; 201105ab2901SDag-Erling Smørgrav iq->qinfo_out.qtype = LDNS_RR_TYPE_NS; 201205ab2901SDag-Erling Smørgrav iq->qinfo_out.qclass = iq->qchase.qclass; 2013*e2d15004SDag-Erling Smørgrav iq->minimise_count = 0; 201405ab2901SDag-Erling Smørgrav } 201505ab2901SDag-Erling Smørgrav 201605ab2901SDag-Erling Smørgrav iq->minimisation_state = MINIMISE_STATE; 201705ab2901SDag-Erling Smørgrav } 201805ab2901SDag-Erling Smørgrav if(iq->minimisation_state == MINIMISE_STATE) { 2019*e2d15004SDag-Erling Smørgrav int qchaselabs = dname_count_labels(iq->qchase.qname); 2020*e2d15004SDag-Erling Smørgrav int labdiff = qchaselabs - 202105ab2901SDag-Erling Smørgrav dname_count_labels(iq->qinfo_out.qname); 202205ab2901SDag-Erling Smørgrav 202305ab2901SDag-Erling Smørgrav iq->qinfo_out.qname = iq->qchase.qname; 202405ab2901SDag-Erling Smørgrav iq->qinfo_out.qname_len = iq->qchase.qname_len; 2025*e2d15004SDag-Erling Smørgrav iq->minimise_count++; 202605ab2901SDag-Erling Smørgrav 2027*e2d15004SDag-Erling Smørgrav /* Limit number of iterations for QNAMEs with more 2028*e2d15004SDag-Erling Smørgrav * than MAX_MINIMISE_COUNT labels. Send first MINIMISE_ONE_LAB 2029*e2d15004SDag-Erling Smørgrav * labels of QNAME always individually. 2030*e2d15004SDag-Erling Smørgrav */ 2031*e2d15004SDag-Erling Smørgrav if(qchaselabs > MAX_MINIMISE_COUNT && labdiff > 1 && 2032*e2d15004SDag-Erling Smørgrav iq->minimise_count > MINIMISE_ONE_LAB) { 2033*e2d15004SDag-Erling Smørgrav if(iq->minimise_count < MAX_MINIMISE_COUNT) { 2034*e2d15004SDag-Erling Smørgrav int multilabs = qchaselabs - 1 - 2035*e2d15004SDag-Erling Smørgrav MINIMISE_ONE_LAB; 2036*e2d15004SDag-Erling Smørgrav int extralabs = multilabs / 2037*e2d15004SDag-Erling Smørgrav MINIMISE_MULTIPLE_LABS; 2038*e2d15004SDag-Erling Smørgrav 2039*e2d15004SDag-Erling Smørgrav if (MAX_MINIMISE_COUNT - iq->minimise_count >= 2040*e2d15004SDag-Erling Smørgrav multilabs % MINIMISE_MULTIPLE_LABS) 2041*e2d15004SDag-Erling Smørgrav /* Default behaviour is to add 1 label 2042*e2d15004SDag-Erling Smørgrav * every iteration. Therefore, decrement 2043*e2d15004SDag-Erling Smørgrav * the extralabs by 1 */ 2044*e2d15004SDag-Erling Smørgrav extralabs--; 2045*e2d15004SDag-Erling Smørgrav if (extralabs < labdiff) 2046*e2d15004SDag-Erling Smørgrav labdiff -= extralabs; 2047*e2d15004SDag-Erling Smørgrav else 2048*e2d15004SDag-Erling Smørgrav labdiff = 1; 2049*e2d15004SDag-Erling Smørgrav } 2050*e2d15004SDag-Erling Smørgrav /* Last minimised iteration, send all labels with 2051*e2d15004SDag-Erling Smørgrav * QTYPE=NS */ 2052*e2d15004SDag-Erling Smørgrav else 2053*e2d15004SDag-Erling Smørgrav labdiff = 1; 205405ab2901SDag-Erling Smørgrav } 205505ab2901SDag-Erling Smørgrav 205605ab2901SDag-Erling Smørgrav if(labdiff > 1) { 205705ab2901SDag-Erling Smørgrav verbose(VERB_QUERY, "removing %d labels", labdiff-1); 205805ab2901SDag-Erling Smørgrav dname_remove_labels(&iq->qinfo_out.qname, 205905ab2901SDag-Erling Smørgrav &iq->qinfo_out.qname_len, 206005ab2901SDag-Erling Smørgrav labdiff-1); 206105ab2901SDag-Erling Smørgrav } 206205ab2901SDag-Erling Smørgrav if(labdiff < 1 || 206305ab2901SDag-Erling Smørgrav (labdiff < 2 && iq->qchase.qtype == LDNS_RR_TYPE_DS)) 206405ab2901SDag-Erling Smørgrav /* Stop minimising this query, resolve "as usual" */ 206505ab2901SDag-Erling Smørgrav iq->minimisation_state = DONOT_MINIMISE_STATE; 206605ab2901SDag-Erling Smørgrav else { 206705ab2901SDag-Erling Smørgrav struct dns_msg* msg = dns_cache_lookup(qstate->env, 206805ab2901SDag-Erling Smørgrav iq->qinfo_out.qname, iq->qinfo_out.qname_len, 206905ab2901SDag-Erling Smørgrav iq->qinfo_out.qtype, iq->qinfo_out.qclass, 207005ab2901SDag-Erling Smørgrav qstate->query_flags, qstate->region, 207105ab2901SDag-Erling Smørgrav qstate->env->scratch); 207205ab2901SDag-Erling Smørgrav if(msg && msg->rep->an_numrrsets == 0 207305ab2901SDag-Erling Smørgrav && FLAGS_GET_RCODE(msg->rep->flags) == 207405ab2901SDag-Erling Smørgrav LDNS_RCODE_NOERROR) 207505ab2901SDag-Erling Smørgrav /* no need to send query if it is already 207605ab2901SDag-Erling Smørgrav * cached as NOERROR/NODATA */ 207705ab2901SDag-Erling Smørgrav return 1; 207805ab2901SDag-Erling Smørgrav } 207905ab2901SDag-Erling Smørgrav } 208005ab2901SDag-Erling Smørgrav if(iq->minimisation_state == SKIP_MINIMISE_STATE) 208105ab2901SDag-Erling Smørgrav /* Do not increment qname, continue incrementing next 208205ab2901SDag-Erling Smørgrav * iteration */ 208305ab2901SDag-Erling Smørgrav iq->minimisation_state = MINIMISE_STATE; 208405ab2901SDag-Erling Smørgrav if(iq->minimisation_state == DONOT_MINIMISE_STATE) 208505ab2901SDag-Erling Smørgrav iq->qinfo_out = iq->qchase; 208605ab2901SDag-Erling Smørgrav 2087b7579f77SDag-Erling Smørgrav /* We have a valid target. */ 2088b7579f77SDag-Erling Smørgrav if(verbosity >= VERB_QUERY) { 208905ab2901SDag-Erling Smørgrav log_query_info(VERB_QUERY, "sending query:", &iq->qinfo_out); 2090b7579f77SDag-Erling Smørgrav log_name_addr(VERB_QUERY, "sending to target:", iq->dp->name, 2091b7579f77SDag-Erling Smørgrav &target->addr, target->addrlen); 2092b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "dnssec status: %s%s", 2093b7579f77SDag-Erling Smørgrav iq->dnssec_expected?"expected": "not expected", 2094b7579f77SDag-Erling Smørgrav iq->dnssec_lame_query?" but lame_query anyway": ""); 2095b7579f77SDag-Erling Smørgrav } 2096b7579f77SDag-Erling Smørgrav fptr_ok(fptr_whitelist_modenv_send_query(qstate->env->send_query)); 2097b7579f77SDag-Erling Smørgrav outq = (*qstate->env->send_query)( 209805ab2901SDag-Erling Smørgrav iq->qinfo_out.qname, iq->qinfo_out.qname_len, 209905ab2901SDag-Erling Smørgrav iq->qinfo_out.qtype, iq->qinfo_out.qclass, 2100*e2d15004SDag-Erling Smørgrav iq->chase_flags | (iq->chase_to_rd?BIT_RD:0), 2101*e2d15004SDag-Erling Smørgrav /* unset CD if to forwarder(RD set) and not dnssec retry 2102*e2d15004SDag-Erling Smørgrav * (blacklist nonempty) and no trust-anchors are configured 2103*e2d15004SDag-Erling Smørgrav * above the qname or on the first attempt when dnssec is on */ 2104*e2d15004SDag-Erling Smørgrav EDNS_DO| ((iq->chase_to_rd||(iq->chase_flags&BIT_RD)!=0)&& 2105*e2d15004SDag-Erling Smørgrav !qstate->blacklist&&(!iter_indicates_dnssec_fwd(qstate->env, 2106*e2d15004SDag-Erling Smørgrav &iq->qinfo_out)||target->attempts==1)?0:BIT_CD), 210709a3aaf3SDag-Erling Smørgrav iq->dnssec_expected, iq->caps_fallback || is_caps_whitelisted( 2108*e2d15004SDag-Erling Smørgrav ie, iq), opt_list, &target->addr, target->addrlen, 2109*e2d15004SDag-Erling Smørgrav iq->dp->name, iq->dp->namelen, qstate); 2110b7579f77SDag-Erling Smørgrav if(!outq) { 2111b7579f77SDag-Erling Smørgrav log_addr(VERB_DETAIL, "error sending query to auth server", 2112b7579f77SDag-Erling Smørgrav &target->addr, target->addrlen); 211309a3aaf3SDag-Erling Smørgrav if(!(iq->chase_flags & BIT_RD) && !iq->ratelimit_ok) 211409a3aaf3SDag-Erling Smørgrav infra_ratelimit_dec(qstate->env->infra_cache, iq->dp->name, 211509a3aaf3SDag-Erling Smørgrav iq->dp->namelen, *qstate->env->now); 2116b7579f77SDag-Erling Smørgrav return next_state(iq, QUERYTARGETS_STATE); 2117b7579f77SDag-Erling Smørgrav } 2118b7579f77SDag-Erling Smørgrav outbound_list_insert(&iq->outlist, outq); 2119b7579f77SDag-Erling Smørgrav iq->num_current_queries++; 2120b7579f77SDag-Erling Smørgrav iq->sent_count++; 2121b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_wait_reply; 2122b7579f77SDag-Erling Smørgrav 2123b7579f77SDag-Erling Smørgrav return 0; 2124b7579f77SDag-Erling Smørgrav } 2125b7579f77SDag-Erling Smørgrav 2126b7579f77SDag-Erling Smørgrav /** find NS rrset in given list */ 2127b7579f77SDag-Erling Smørgrav static struct ub_packed_rrset_key* 2128b7579f77SDag-Erling Smørgrav find_NS(struct reply_info* rep, size_t from, size_t to) 2129b7579f77SDag-Erling Smørgrav { 2130b7579f77SDag-Erling Smørgrav size_t i; 2131b7579f77SDag-Erling Smørgrav for(i=from; i<to; i++) { 2132b7579f77SDag-Erling Smørgrav if(ntohs(rep->rrsets[i]->rk.type) == LDNS_RR_TYPE_NS) 2133b7579f77SDag-Erling Smørgrav return rep->rrsets[i]; 2134b7579f77SDag-Erling Smørgrav } 2135b7579f77SDag-Erling Smørgrav return NULL; 2136b7579f77SDag-Erling Smørgrav } 2137b7579f77SDag-Erling Smørgrav 2138b7579f77SDag-Erling Smørgrav 2139b7579f77SDag-Erling Smørgrav /** 2140b7579f77SDag-Erling Smørgrav * Process the query response. All queries end up at this state first. This 2141b7579f77SDag-Erling Smørgrav * process generally consists of analyzing the response and routing the 2142b7579f77SDag-Erling Smørgrav * event to the next state (either bouncing it back to a request state, or 2143b7579f77SDag-Erling Smørgrav * terminating the processing for this event). 2144b7579f77SDag-Erling Smørgrav * 2145b7579f77SDag-Erling Smørgrav * @param qstate: query state. 2146b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 2147b7579f77SDag-Erling Smørgrav * @param id: module id. 2148b7579f77SDag-Erling Smørgrav * @return true if the event requires more immediate processing, false if 2149b7579f77SDag-Erling Smørgrav * not. This is generally only true when forwarding the request to 2150b7579f77SDag-Erling Smørgrav * the final state (i.e., on answer). 2151b7579f77SDag-Erling Smørgrav */ 2152b7579f77SDag-Erling Smørgrav static int 2153b7579f77SDag-Erling Smørgrav processQueryResponse(struct module_qstate* qstate, struct iter_qstate* iq, 2154b7579f77SDag-Erling Smørgrav int id) 2155b7579f77SDag-Erling Smørgrav { 2156b7579f77SDag-Erling Smørgrav int dnsseclame = 0; 2157b7579f77SDag-Erling Smørgrav enum response_type type; 2158b7579f77SDag-Erling Smørgrav iq->num_current_queries--; 2159b7579f77SDag-Erling Smørgrav if(iq->response == NULL) { 216005ab2901SDag-Erling Smørgrav /* Don't increment qname when QNAME minimisation is enabled */ 216105ab2901SDag-Erling Smørgrav if (qstate->env->cfg->qname_minimisation) 216205ab2901SDag-Erling Smørgrav iq->minimisation_state = SKIP_MINIMISE_STATE; 2163b7579f77SDag-Erling Smørgrav iq->chase_to_rd = 0; 2164b7579f77SDag-Erling Smørgrav iq->dnssec_lame_query = 0; 2165b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "query response was timeout"); 2166b7579f77SDag-Erling Smørgrav return next_state(iq, QUERYTARGETS_STATE); 2167b7579f77SDag-Erling Smørgrav } 2168b7579f77SDag-Erling Smørgrav type = response_type_from_server( 2169b7579f77SDag-Erling Smørgrav (int)((iq->chase_flags&BIT_RD) || iq->chase_to_rd), 2170b7579f77SDag-Erling Smørgrav iq->response, &iq->qchase, iq->dp); 2171b7579f77SDag-Erling Smørgrav iq->chase_to_rd = 0; 2172b7579f77SDag-Erling Smørgrav if(type == RESPONSE_TYPE_REFERRAL && (iq->chase_flags&BIT_RD)) { 2173b7579f77SDag-Erling Smørgrav /* When forwarding (RD bit is set), we handle referrals 2174b7579f77SDag-Erling Smørgrav * differently. No queries should be sent elsewhere */ 2175b7579f77SDag-Erling Smørgrav type = RESPONSE_TYPE_ANSWER; 2176b7579f77SDag-Erling Smørgrav } 2177*e2d15004SDag-Erling Smørgrav if(!qstate->env->cfg->disable_dnssec_lame_check && iq->dnssec_expected 2178*e2d15004SDag-Erling Smørgrav && !iq->dnssec_lame_query && 2179b7579f77SDag-Erling Smørgrav !(iq->chase_flags&BIT_RD) 2180*e2d15004SDag-Erling Smørgrav && iq->sent_count < DNSSEC_LAME_DETECT_COUNT 2181b7579f77SDag-Erling Smørgrav && type != RESPONSE_TYPE_LAME 2182b7579f77SDag-Erling Smørgrav && type != RESPONSE_TYPE_REC_LAME 2183b7579f77SDag-Erling Smørgrav && type != RESPONSE_TYPE_THROWAWAY 2184b7579f77SDag-Erling Smørgrav && type != RESPONSE_TYPE_UNTYPED) { 2185b7579f77SDag-Erling Smørgrav /* a possible answer, see if it is missing DNSSEC */ 2186b7579f77SDag-Erling Smørgrav /* but not when forwarding, so we dont mark fwder lame */ 218717d15b25SDag-Erling Smørgrav if(!iter_msg_has_dnssec(iq->response)) { 218817d15b25SDag-Erling Smørgrav /* Mark this address as dnsseclame in this dp, 218917d15b25SDag-Erling Smørgrav * because that will make serverselection disprefer 219017d15b25SDag-Erling Smørgrav * it, but also, once it is the only final option, 219117d15b25SDag-Erling Smørgrav * use dnssec-lame-bypass if it needs to query there.*/ 219217d15b25SDag-Erling Smørgrav if(qstate->reply) { 219317d15b25SDag-Erling Smørgrav struct delegpt_addr* a = delegpt_find_addr( 219417d15b25SDag-Erling Smørgrav iq->dp, &qstate->reply->addr, 219517d15b25SDag-Erling Smørgrav qstate->reply->addrlen); 219617d15b25SDag-Erling Smørgrav if(a) a->dnsseclame = 1; 219717d15b25SDag-Erling Smørgrav } 219817d15b25SDag-Erling Smørgrav /* test the answer is from the zone we expected, 2199b7579f77SDag-Erling Smørgrav * otherwise, (due to parent,child on same server), we 2200b7579f77SDag-Erling Smørgrav * might mark the server,zone lame inappropriately */ 220117d15b25SDag-Erling Smørgrav if(!iter_msg_from_zone(iq->response, iq->dp, type, 220217d15b25SDag-Erling Smørgrav iq->qchase.qclass)) 220317d15b25SDag-Erling Smørgrav qstate->reply = NULL; 2204b7579f77SDag-Erling Smørgrav type = RESPONSE_TYPE_LAME; 2205b7579f77SDag-Erling Smørgrav dnsseclame = 1; 2206b7579f77SDag-Erling Smørgrav } 2207b7579f77SDag-Erling Smørgrav } else iq->dnssec_lame_query = 0; 2208b7579f77SDag-Erling Smørgrav /* see if referral brings us close to the target */ 2209b7579f77SDag-Erling Smørgrav if(type == RESPONSE_TYPE_REFERRAL) { 2210b7579f77SDag-Erling Smørgrav struct ub_packed_rrset_key* ns = find_NS( 2211b7579f77SDag-Erling Smørgrav iq->response->rep, iq->response->rep->an_numrrsets, 2212b7579f77SDag-Erling Smørgrav iq->response->rep->an_numrrsets 2213b7579f77SDag-Erling Smørgrav + iq->response->rep->ns_numrrsets); 2214b7579f77SDag-Erling Smørgrav if(!ns) ns = find_NS(iq->response->rep, 0, 2215b7579f77SDag-Erling Smørgrav iq->response->rep->an_numrrsets); 2216b7579f77SDag-Erling Smørgrav if(!ns || !dname_strict_subdomain_c(ns->rk.dname, iq->dp->name) 2217b7579f77SDag-Erling Smørgrav || !dname_subdomain_c(iq->qchase.qname, ns->rk.dname)){ 2218b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "bad referral, throwaway"); 2219b7579f77SDag-Erling Smørgrav type = RESPONSE_TYPE_THROWAWAY; 2220b7579f77SDag-Erling Smørgrav } else 2221b7579f77SDag-Erling Smørgrav iter_scrub_ds(iq->response, ns, iq->dp->name); 2222b7579f77SDag-Erling Smørgrav } else iter_scrub_ds(iq->response, NULL, NULL); 2223b7579f77SDag-Erling Smørgrav 2224b7579f77SDag-Erling Smørgrav /* handle each of the type cases */ 2225b7579f77SDag-Erling Smørgrav if(type == RESPONSE_TYPE_ANSWER) { 2226b7579f77SDag-Erling Smørgrav /* ANSWER type responses terminate the query algorithm, 2227b7579f77SDag-Erling Smørgrav * so they sent on their */ 2228b7579f77SDag-Erling Smørgrav if(verbosity >= VERB_DETAIL) { 2229b7579f77SDag-Erling Smørgrav verbose(VERB_DETAIL, "query response was %s", 2230b7579f77SDag-Erling Smørgrav FLAGS_GET_RCODE(iq->response->rep->flags) 2231b7579f77SDag-Erling Smørgrav ==LDNS_RCODE_NXDOMAIN?"NXDOMAIN ANSWER": 2232b7579f77SDag-Erling Smørgrav (iq->response->rep->an_numrrsets?"ANSWER": 2233b7579f77SDag-Erling Smørgrav "nodata ANSWER")); 2234b7579f77SDag-Erling Smørgrav } 2235b7579f77SDag-Erling Smørgrav /* if qtype is DS, check we have the right level of answer, 2236b7579f77SDag-Erling Smørgrav * like grandchild answer but we need the middle, reject it */ 2237b7579f77SDag-Erling Smørgrav if(iq->qchase.qtype == LDNS_RR_TYPE_DS && !iq->dsns_point 2238b7579f77SDag-Erling Smørgrav && !(iq->chase_flags&BIT_RD) 2239b7579f77SDag-Erling Smørgrav && iter_ds_toolow(iq->response, iq->dp) 22408ed2b524SDag-Erling Smørgrav && iter_dp_cangodown(&iq->qchase, iq->dp)) { 22418ed2b524SDag-Erling Smørgrav /* close down outstanding requests to be discarded */ 22428ed2b524SDag-Erling Smørgrav outbound_list_clear(&iq->outlist); 22438ed2b524SDag-Erling Smørgrav iq->num_current_queries = 0; 22448ed2b524SDag-Erling Smørgrav fptr_ok(fptr_whitelist_modenv_detach_subs( 22458ed2b524SDag-Erling Smørgrav qstate->env->detach_subs)); 22468ed2b524SDag-Erling Smørgrav (*qstate->env->detach_subs)(qstate); 22478ed2b524SDag-Erling Smørgrav iq->num_target_queries = 0; 2248b7579f77SDag-Erling Smørgrav return processDSNSFind(qstate, iq, id); 22498ed2b524SDag-Erling Smørgrav } 22508ed2b524SDag-Erling Smørgrav iter_dns_store(qstate->env, &iq->response->qinfo, 2251b7579f77SDag-Erling Smørgrav iq->response->rep, 0, qstate->prefetch_leeway, 2252b7579f77SDag-Erling Smørgrav iq->dp&&iq->dp->has_parent_side_NS, 2253ff825849SDag-Erling Smørgrav qstate->region, qstate->query_flags); 2254b7579f77SDag-Erling Smørgrav /* close down outstanding requests to be discarded */ 2255b7579f77SDag-Erling Smørgrav outbound_list_clear(&iq->outlist); 2256b7579f77SDag-Erling Smørgrav iq->num_current_queries = 0; 2257b7579f77SDag-Erling Smørgrav fptr_ok(fptr_whitelist_modenv_detach_subs( 2258b7579f77SDag-Erling Smørgrav qstate->env->detach_subs)); 2259b7579f77SDag-Erling Smørgrav (*qstate->env->detach_subs)(qstate); 2260b7579f77SDag-Erling Smørgrav iq->num_target_queries = 0; 2261b7579f77SDag-Erling Smørgrav if(qstate->reply) 2262b7579f77SDag-Erling Smørgrav sock_list_insert(&qstate->reply_origin, 2263b7579f77SDag-Erling Smørgrav &qstate->reply->addr, qstate->reply->addrlen, 2264b7579f77SDag-Erling Smørgrav qstate->region); 226505ab2901SDag-Erling Smørgrav if(iq->minimisation_state != DONOT_MINIMISE_STATE) { 226605ab2901SDag-Erling Smørgrav /* Best effort qname-minimisation. 226705ab2901SDag-Erling Smørgrav * Stop minimising and send full query when RCODE 2268*e2d15004SDag-Erling Smørgrav * is not NOERROR. */ 226905ab2901SDag-Erling Smørgrav if(FLAGS_GET_RCODE(iq->response->rep->flags) != 227005ab2901SDag-Erling Smørgrav LDNS_RCODE_NOERROR) 227105ab2901SDag-Erling Smørgrav iq->minimisation_state = DONOT_MINIMISE_STATE; 2272*e2d15004SDag-Erling Smørgrav if(FLAGS_GET_RCODE(iq->response->rep->flags) == 2273*e2d15004SDag-Erling Smørgrav LDNS_RCODE_NXDOMAIN) { 2274*e2d15004SDag-Erling Smørgrav /* Stop resolving when NXDOMAIN is DNSSEC 2275*e2d15004SDag-Erling Smørgrav * signed. Based on assumption that namservers 2276*e2d15004SDag-Erling Smørgrav * serving signed zones do not return NXDOMAIN 2277*e2d15004SDag-Erling Smørgrav * for empty-non-terminals. */ 2278*e2d15004SDag-Erling Smørgrav if(iq->dnssec_expected) 2279*e2d15004SDag-Erling Smørgrav return final_state(iq); 2280*e2d15004SDag-Erling Smørgrav /* Make subrequest to validate intermediate 2281*e2d15004SDag-Erling Smørgrav * NXDOMAIN if harden-below-nxdomain is 2282*e2d15004SDag-Erling Smørgrav * enabled. */ 2283*e2d15004SDag-Erling Smørgrav if(qstate->env->cfg->harden_below_nxdomain) { 2284*e2d15004SDag-Erling Smørgrav struct module_qstate* subq = NULL; 2285*e2d15004SDag-Erling Smørgrav log_query_info(VERB_QUERY, 2286*e2d15004SDag-Erling Smørgrav "schedule NXDOMAIN validation:", 2287*e2d15004SDag-Erling Smørgrav &iq->response->qinfo); 2288*e2d15004SDag-Erling Smørgrav if(!generate_sub_request( 2289*e2d15004SDag-Erling Smørgrav iq->response->qinfo.qname, 2290*e2d15004SDag-Erling Smørgrav iq->response->qinfo.qname_len, 2291*e2d15004SDag-Erling Smørgrav iq->response->qinfo.qtype, 2292*e2d15004SDag-Erling Smørgrav iq->response->qinfo.qclass, 2293*e2d15004SDag-Erling Smørgrav qstate, id, iq, 2294*e2d15004SDag-Erling Smørgrav INIT_REQUEST_STATE, 2295*e2d15004SDag-Erling Smørgrav FINISHED_STATE, &subq, 1)) 2296*e2d15004SDag-Erling Smørgrav verbose(VERB_ALGO, 2297*e2d15004SDag-Erling Smørgrav "could not validate NXDOMAIN " 2298*e2d15004SDag-Erling Smørgrav "response"); 2299*e2d15004SDag-Erling Smørgrav } 2300*e2d15004SDag-Erling Smørgrav } 230105ab2901SDag-Erling Smørgrav return next_state(iq, QUERYTARGETS_STATE); 230205ab2901SDag-Erling Smørgrav } 2303b7579f77SDag-Erling Smørgrav return final_state(iq); 2304b7579f77SDag-Erling Smørgrav } else if(type == RESPONSE_TYPE_REFERRAL) { 2305b7579f77SDag-Erling Smørgrav /* REFERRAL type responses get a reset of the 2306b7579f77SDag-Erling Smørgrav * delegation point, and back to the QUERYTARGETS_STATE. */ 2307b7579f77SDag-Erling Smørgrav verbose(VERB_DETAIL, "query response was REFERRAL"); 2308b7579f77SDag-Erling Smørgrav 230909a3aaf3SDag-Erling Smørgrav if(!(iq->chase_flags & BIT_RD) && !iq->ratelimit_ok) { 231009a3aaf3SDag-Erling Smørgrav /* we have a referral, no ratelimit, we can send 231109a3aaf3SDag-Erling Smørgrav * our queries to the given name */ 231209a3aaf3SDag-Erling Smørgrav infra_ratelimit_dec(qstate->env->infra_cache, 231309a3aaf3SDag-Erling Smørgrav iq->dp->name, iq->dp->namelen, 231409a3aaf3SDag-Erling Smørgrav *qstate->env->now); 231509a3aaf3SDag-Erling Smørgrav } 231609a3aaf3SDag-Erling Smørgrav 2317b7579f77SDag-Erling Smørgrav /* if hardened, only store referral if we asked for it */ 2318b7579f77SDag-Erling Smørgrav if(!qstate->env->cfg->harden_referral_path || 2319b7579f77SDag-Erling Smørgrav ( qstate->qinfo.qtype == LDNS_RR_TYPE_NS 2320b7579f77SDag-Erling Smørgrav && (qstate->query_flags&BIT_RD) 2321b7579f77SDag-Erling Smørgrav && !(qstate->query_flags&BIT_CD) 2322b7579f77SDag-Erling Smørgrav /* we know that all other NS rrsets are scrubbed 2323b7579f77SDag-Erling Smørgrav * away, thus on referral only one is left. 2324b7579f77SDag-Erling Smørgrav * see if that equals the query name... */ 2325b7579f77SDag-Erling Smørgrav && ( /* auth section, but sometimes in answer section*/ 2326b7579f77SDag-Erling Smørgrav reply_find_rrset_section_ns(iq->response->rep, 2327b7579f77SDag-Erling Smørgrav iq->qchase.qname, iq->qchase.qname_len, 2328b7579f77SDag-Erling Smørgrav LDNS_RR_TYPE_NS, iq->qchase.qclass) 2329b7579f77SDag-Erling Smørgrav || reply_find_rrset_section_an(iq->response->rep, 2330b7579f77SDag-Erling Smørgrav iq->qchase.qname, iq->qchase.qname_len, 2331b7579f77SDag-Erling Smørgrav LDNS_RR_TYPE_NS, iq->qchase.qclass) 2332b7579f77SDag-Erling Smørgrav ) 2333b7579f77SDag-Erling Smørgrav )) { 2334b7579f77SDag-Erling Smørgrav /* Store the referral under the current query */ 2335b7579f77SDag-Erling Smørgrav /* no prefetch-leeway, since its not the answer */ 23368ed2b524SDag-Erling Smørgrav iter_dns_store(qstate->env, &iq->response->qinfo, 2337ff825849SDag-Erling Smørgrav iq->response->rep, 1, 0, 0, NULL, 0); 2338b7579f77SDag-Erling Smørgrav if(iq->store_parent_NS) 2339b7579f77SDag-Erling Smørgrav iter_store_parentside_NS(qstate->env, 2340b7579f77SDag-Erling Smørgrav iq->response->rep); 2341b7579f77SDag-Erling Smørgrav if(qstate->env->neg_cache) 2342b7579f77SDag-Erling Smørgrav val_neg_addreferral(qstate->env->neg_cache, 2343b7579f77SDag-Erling Smørgrav iq->response->rep, iq->dp->name); 2344b7579f77SDag-Erling Smørgrav } 2345b7579f77SDag-Erling Smørgrav /* store parent-side-in-zone-glue, if directly queried for */ 2346b7579f77SDag-Erling Smørgrav if(iq->query_for_pside_glue && !iq->pside_glue) { 2347b7579f77SDag-Erling Smørgrav iq->pside_glue = reply_find_rrset(iq->response->rep, 2348b7579f77SDag-Erling Smørgrav iq->qchase.qname, iq->qchase.qname_len, 2349b7579f77SDag-Erling Smørgrav iq->qchase.qtype, iq->qchase.qclass); 2350b7579f77SDag-Erling Smørgrav if(iq->pside_glue) { 2351b7579f77SDag-Erling Smørgrav log_rrset_key(VERB_ALGO, "found parent-side " 2352b7579f77SDag-Erling Smørgrav "glue", iq->pside_glue); 2353b7579f77SDag-Erling Smørgrav iter_store_parentside_rrset(qstate->env, 2354b7579f77SDag-Erling Smørgrav iq->pside_glue); 2355b7579f77SDag-Erling Smørgrav } 2356b7579f77SDag-Erling Smørgrav } 2357b7579f77SDag-Erling Smørgrav 2358b7579f77SDag-Erling Smørgrav /* Reset the event state, setting the current delegation 2359b7579f77SDag-Erling Smørgrav * point to the referral. */ 2360b7579f77SDag-Erling Smørgrav iq->deleg_msg = iq->response; 2361b7579f77SDag-Erling Smørgrav iq->dp = delegpt_from_message(iq->response, qstate->region); 236205ab2901SDag-Erling Smørgrav if (qstate->env->cfg->qname_minimisation) 236305ab2901SDag-Erling Smørgrav iq->minimisation_state = INIT_MINIMISE_STATE; 2364b7579f77SDag-Erling Smørgrav if(!iq->dp) 2365b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 2366b7579f77SDag-Erling Smørgrav if(!cache_fill_missing(qstate->env, iq->qchase.qclass, 2367b7579f77SDag-Erling Smørgrav qstate->region, iq->dp)) 2368b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 2369b7579f77SDag-Erling Smørgrav if(iq->store_parent_NS && query_dname_compare(iq->dp->name, 2370b7579f77SDag-Erling Smørgrav iq->store_parent_NS->name) == 0) 2371b7579f77SDag-Erling Smørgrav iter_merge_retry_counts(iq->dp, iq->store_parent_NS); 2372b7579f77SDag-Erling Smørgrav delegpt_log(VERB_ALGO, iq->dp); 2373b7579f77SDag-Erling Smørgrav /* Count this as a referral. */ 2374b7579f77SDag-Erling Smørgrav iq->referral_count++; 2375b7579f77SDag-Erling Smørgrav iq->sent_count = 0; 2376b7579f77SDag-Erling Smørgrav /* see if the next dp is a trust anchor, or a DS was sent 2377b7579f77SDag-Erling Smørgrav * along, indicating dnssec is expected for next zone */ 2378b7579f77SDag-Erling Smørgrav iq->dnssec_expected = iter_indicates_dnssec(qstate->env, 2379b7579f77SDag-Erling Smørgrav iq->dp, iq->response, iq->qchase.qclass); 2380b7579f77SDag-Erling Smørgrav /* if dnssec, validating then also fetch the key for the DS */ 2381b7579f77SDag-Erling Smørgrav if(iq->dnssec_expected && qstate->env->cfg->prefetch_key && 2382b7579f77SDag-Erling Smørgrav !(qstate->query_flags&BIT_CD)) 2383b7579f77SDag-Erling Smørgrav generate_dnskey_prefetch(qstate, iq, id); 2384b7579f77SDag-Erling Smørgrav 2385b7579f77SDag-Erling Smørgrav /* spawn off NS and addr to auth servers for the NS we just 2386b7579f77SDag-Erling Smørgrav * got in the referral. This gets authoritative answer 2387b7579f77SDag-Erling Smørgrav * (answer section trust level) rrset. 2388b7579f77SDag-Erling Smørgrav * right after, we detach the subs, answer goes to cache. */ 2389b7579f77SDag-Erling Smørgrav if(qstate->env->cfg->harden_referral_path) 2390b7579f77SDag-Erling Smørgrav generate_ns_check(qstate, iq, id); 2391b7579f77SDag-Erling Smørgrav 2392b7579f77SDag-Erling Smørgrav /* stop current outstanding queries. 2393b7579f77SDag-Erling Smørgrav * FIXME: should the outstanding queries be waited for and 2394b7579f77SDag-Erling Smørgrav * handled? Say by a subquery that inherits the outbound_entry. 2395b7579f77SDag-Erling Smørgrav */ 2396b7579f77SDag-Erling Smørgrav outbound_list_clear(&iq->outlist); 2397b7579f77SDag-Erling Smørgrav iq->num_current_queries = 0; 2398b7579f77SDag-Erling Smørgrav fptr_ok(fptr_whitelist_modenv_detach_subs( 2399b7579f77SDag-Erling Smørgrav qstate->env->detach_subs)); 2400b7579f77SDag-Erling Smørgrav (*qstate->env->detach_subs)(qstate); 2401b7579f77SDag-Erling Smørgrav iq->num_target_queries = 0; 2402b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "cleared outbound list for next round"); 2403b7579f77SDag-Erling Smørgrav return next_state(iq, QUERYTARGETS_STATE); 2404b7579f77SDag-Erling Smørgrav } else if(type == RESPONSE_TYPE_CNAME) { 2405b7579f77SDag-Erling Smørgrav uint8_t* sname = NULL; 2406b7579f77SDag-Erling Smørgrav size_t snamelen = 0; 2407b7579f77SDag-Erling Smørgrav /* CNAME type responses get a query restart (i.e., get a 2408b7579f77SDag-Erling Smørgrav * reset of the query state and go back to INIT_REQUEST_STATE). 2409b7579f77SDag-Erling Smørgrav */ 2410b7579f77SDag-Erling Smørgrav verbose(VERB_DETAIL, "query response was CNAME"); 2411b7579f77SDag-Erling Smørgrav if(verbosity >= VERB_ALGO) 2412b7579f77SDag-Erling Smørgrav log_dns_msg("cname msg", &iq->response->qinfo, 2413b7579f77SDag-Erling Smørgrav iq->response->rep); 2414b7579f77SDag-Erling Smørgrav /* if qtype is DS, check we have the right level of answer, 2415b7579f77SDag-Erling Smørgrav * like grandchild answer but we need the middle, reject it */ 2416b7579f77SDag-Erling Smørgrav if(iq->qchase.qtype == LDNS_RR_TYPE_DS && !iq->dsns_point 2417b7579f77SDag-Erling Smørgrav && !(iq->chase_flags&BIT_RD) 2418b7579f77SDag-Erling Smørgrav && iter_ds_toolow(iq->response, iq->dp) 24198ed2b524SDag-Erling Smørgrav && iter_dp_cangodown(&iq->qchase, iq->dp)) { 24208ed2b524SDag-Erling Smørgrav outbound_list_clear(&iq->outlist); 24218ed2b524SDag-Erling Smørgrav iq->num_current_queries = 0; 24228ed2b524SDag-Erling Smørgrav fptr_ok(fptr_whitelist_modenv_detach_subs( 24238ed2b524SDag-Erling Smørgrav qstate->env->detach_subs)); 24248ed2b524SDag-Erling Smørgrav (*qstate->env->detach_subs)(qstate); 24258ed2b524SDag-Erling Smørgrav iq->num_target_queries = 0; 2426b7579f77SDag-Erling Smørgrav return processDSNSFind(qstate, iq, id); 24278ed2b524SDag-Erling Smørgrav } 2428b7579f77SDag-Erling Smørgrav /* Process the CNAME response. */ 2429b7579f77SDag-Erling Smørgrav if(!handle_cname_response(qstate, iq, iq->response, 2430b7579f77SDag-Erling Smørgrav &sname, &snamelen)) 2431b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 2432b7579f77SDag-Erling Smørgrav /* cache the CNAME response under the current query */ 2433b7579f77SDag-Erling Smørgrav /* NOTE : set referral=1, so that rrsets get stored but not 2434b7579f77SDag-Erling Smørgrav * the partial query answer (CNAME only). */ 2435b7579f77SDag-Erling Smørgrav /* prefetchleeway applied because this updates answer parts */ 24368ed2b524SDag-Erling Smørgrav iter_dns_store(qstate->env, &iq->response->qinfo, 2437b7579f77SDag-Erling Smørgrav iq->response->rep, 1, qstate->prefetch_leeway, 2438ff825849SDag-Erling Smørgrav iq->dp&&iq->dp->has_parent_side_NS, NULL, 2439ff825849SDag-Erling Smørgrav qstate->query_flags); 2440b7579f77SDag-Erling Smørgrav /* set the current request's qname to the new value. */ 2441b7579f77SDag-Erling Smørgrav iq->qchase.qname = sname; 2442b7579f77SDag-Erling Smørgrav iq->qchase.qname_len = snamelen; 244305ab2901SDag-Erling Smørgrav if (qstate->env->cfg->qname_minimisation) 244405ab2901SDag-Erling Smørgrav iq->minimisation_state = INIT_MINIMISE_STATE; 2445b7579f77SDag-Erling Smørgrav /* Clear the query state, since this is a query restart. */ 2446b7579f77SDag-Erling Smørgrav iq->deleg_msg = NULL; 2447b7579f77SDag-Erling Smørgrav iq->dp = NULL; 2448b7579f77SDag-Erling Smørgrav iq->dsns_point = NULL; 2449b7579f77SDag-Erling Smørgrav /* Note the query restart. */ 2450b7579f77SDag-Erling Smørgrav iq->query_restart_count++; 2451b7579f77SDag-Erling Smørgrav iq->sent_count = 0; 2452b7579f77SDag-Erling Smørgrav 2453b7579f77SDag-Erling Smørgrav /* stop current outstanding queries. 2454b7579f77SDag-Erling Smørgrav * FIXME: should the outstanding queries be waited for and 2455b7579f77SDag-Erling Smørgrav * handled? Say by a subquery that inherits the outbound_entry. 2456b7579f77SDag-Erling Smørgrav */ 2457b7579f77SDag-Erling Smørgrav outbound_list_clear(&iq->outlist); 2458b7579f77SDag-Erling Smørgrav iq->num_current_queries = 0; 2459b7579f77SDag-Erling Smørgrav fptr_ok(fptr_whitelist_modenv_detach_subs( 2460b7579f77SDag-Erling Smørgrav qstate->env->detach_subs)); 2461b7579f77SDag-Erling Smørgrav (*qstate->env->detach_subs)(qstate); 2462b7579f77SDag-Erling Smørgrav iq->num_target_queries = 0; 2463b7579f77SDag-Erling Smørgrav if(qstate->reply) 2464b7579f77SDag-Erling Smørgrav sock_list_insert(&qstate->reply_origin, 2465b7579f77SDag-Erling Smørgrav &qstate->reply->addr, qstate->reply->addrlen, 2466b7579f77SDag-Erling Smørgrav qstate->region); 2467b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "cleared outbound list for query restart"); 2468b7579f77SDag-Erling Smørgrav /* go to INIT_REQUEST_STATE for new qname. */ 2469b7579f77SDag-Erling Smørgrav return next_state(iq, INIT_REQUEST_STATE); 2470b7579f77SDag-Erling Smørgrav } else if(type == RESPONSE_TYPE_LAME) { 2471b7579f77SDag-Erling Smørgrav /* Cache the LAMEness. */ 2472b7579f77SDag-Erling Smørgrav verbose(VERB_DETAIL, "query response was %sLAME", 2473b7579f77SDag-Erling Smørgrav dnsseclame?"DNSSEC ":""); 2474b7579f77SDag-Erling Smørgrav if(!dname_subdomain_c(iq->qchase.qname, iq->dp->name)) { 2475b7579f77SDag-Erling Smørgrav log_err("mark lame: mismatch in qname and dpname"); 2476b7579f77SDag-Erling Smørgrav /* throwaway this reply below */ 2477b7579f77SDag-Erling Smørgrav } else if(qstate->reply) { 2478b7579f77SDag-Erling Smørgrav /* need addr for lameness cache, but we may have 2479b7579f77SDag-Erling Smørgrav * gotten this from cache, so test to be sure */ 2480b7579f77SDag-Erling Smørgrav if(!infra_set_lame(qstate->env->infra_cache, 2481b7579f77SDag-Erling Smørgrav &qstate->reply->addr, qstate->reply->addrlen, 2482b7579f77SDag-Erling Smørgrav iq->dp->name, iq->dp->namelen, 2483b7579f77SDag-Erling Smørgrav *qstate->env->now, dnsseclame, 0, 2484b7579f77SDag-Erling Smørgrav iq->qchase.qtype)) 2485b7579f77SDag-Erling Smørgrav log_err("mark host lame: out of memory"); 248617d15b25SDag-Erling Smørgrav } 2487b7579f77SDag-Erling Smørgrav } else if(type == RESPONSE_TYPE_REC_LAME) { 2488b7579f77SDag-Erling Smørgrav /* Cache the LAMEness. */ 2489b7579f77SDag-Erling Smørgrav verbose(VERB_DETAIL, "query response REC_LAME: " 2490b7579f77SDag-Erling Smørgrav "recursive but not authoritative server"); 2491b7579f77SDag-Erling Smørgrav if(!dname_subdomain_c(iq->qchase.qname, iq->dp->name)) { 2492b7579f77SDag-Erling Smørgrav log_err("mark rec_lame: mismatch in qname and dpname"); 2493b7579f77SDag-Erling Smørgrav /* throwaway this reply below */ 2494b7579f77SDag-Erling Smørgrav } else if(qstate->reply) { 2495b7579f77SDag-Erling Smørgrav /* need addr for lameness cache, but we may have 2496b7579f77SDag-Erling Smørgrav * gotten this from cache, so test to be sure */ 2497b7579f77SDag-Erling Smørgrav verbose(VERB_DETAIL, "mark as REC_LAME"); 2498b7579f77SDag-Erling Smørgrav if(!infra_set_lame(qstate->env->infra_cache, 2499b7579f77SDag-Erling Smørgrav &qstate->reply->addr, qstate->reply->addrlen, 2500b7579f77SDag-Erling Smørgrav iq->dp->name, iq->dp->namelen, 2501b7579f77SDag-Erling Smørgrav *qstate->env->now, 0, 1, iq->qchase.qtype)) 2502b7579f77SDag-Erling Smørgrav log_err("mark host lame: out of memory"); 2503b7579f77SDag-Erling Smørgrav } 2504b7579f77SDag-Erling Smørgrav } else if(type == RESPONSE_TYPE_THROWAWAY) { 2505b7579f77SDag-Erling Smørgrav /* LAME and THROWAWAY responses are handled the same way. 2506b7579f77SDag-Erling Smørgrav * In this case, the event is just sent directly back to 2507b7579f77SDag-Erling Smørgrav * the QUERYTARGETS_STATE without resetting anything, 2508b7579f77SDag-Erling Smørgrav * because, clearly, the next target must be tried. */ 2509b7579f77SDag-Erling Smørgrav verbose(VERB_DETAIL, "query response was THROWAWAY"); 2510b7579f77SDag-Erling Smørgrav } else { 2511b7579f77SDag-Erling Smørgrav log_warn("A query response came back with an unknown type: %d", 2512b7579f77SDag-Erling Smørgrav (int)type); 2513b7579f77SDag-Erling Smørgrav } 2514b7579f77SDag-Erling Smørgrav 2515b7579f77SDag-Erling Smørgrav /* LAME, THROWAWAY and "unknown" all end up here. 2516b7579f77SDag-Erling Smørgrav * Recycle to the QUERYTARGETS state to hopefully try a 2517b7579f77SDag-Erling Smørgrav * different target. */ 251805ab2901SDag-Erling Smørgrav if (qstate->env->cfg->qname_minimisation) 251905ab2901SDag-Erling Smørgrav iq->minimisation_state = DONOT_MINIMISE_STATE; 2520b7579f77SDag-Erling Smørgrav return next_state(iq, QUERYTARGETS_STATE); 2521b7579f77SDag-Erling Smørgrav } 2522b7579f77SDag-Erling Smørgrav 2523b7579f77SDag-Erling Smørgrav /** 2524ff825849SDag-Erling Smørgrav * Return priming query results to interested super querystates. 2525b7579f77SDag-Erling Smørgrav * 2526b7579f77SDag-Erling Smørgrav * Sets the delegation point and delegation message (not nonRD queries). 2527b7579f77SDag-Erling Smørgrav * This is a callback from walk_supers. 2528b7579f77SDag-Erling Smørgrav * 2529b7579f77SDag-Erling Smørgrav * @param qstate: priming query state that finished. 2530b7579f77SDag-Erling Smørgrav * @param id: module id. 2531b7579f77SDag-Erling Smørgrav * @param forq: the qstate for which priming has been done. 2532b7579f77SDag-Erling Smørgrav */ 2533b7579f77SDag-Erling Smørgrav static void 2534b7579f77SDag-Erling Smørgrav prime_supers(struct module_qstate* qstate, int id, struct module_qstate* forq) 2535b7579f77SDag-Erling Smørgrav { 2536b7579f77SDag-Erling Smørgrav struct iter_qstate* foriq = (struct iter_qstate*)forq->minfo[id]; 2537b7579f77SDag-Erling Smørgrav struct delegpt* dp = NULL; 2538b7579f77SDag-Erling Smørgrav 2539b7579f77SDag-Erling Smørgrav log_assert(qstate->is_priming || foriq->wait_priming_stub); 2540b7579f77SDag-Erling Smørgrav log_assert(qstate->return_rcode == LDNS_RCODE_NOERROR); 2541b7579f77SDag-Erling Smørgrav /* Convert our response to a delegation point */ 2542b7579f77SDag-Erling Smørgrav dp = delegpt_from_message(qstate->return_msg, forq->region); 2543b7579f77SDag-Erling Smørgrav if(!dp) { 2544b7579f77SDag-Erling Smørgrav /* if there is no convertable delegation point, then 2545b7579f77SDag-Erling Smørgrav * the ANSWER type was (presumably) a negative answer. */ 2546b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "prime response was not a positive " 2547b7579f77SDag-Erling Smørgrav "ANSWER; failing"); 2548b7579f77SDag-Erling Smørgrav foriq->dp = NULL; 2549b7579f77SDag-Erling Smørgrav foriq->state = QUERYTARGETS_STATE; 2550b7579f77SDag-Erling Smørgrav return; 2551b7579f77SDag-Erling Smørgrav } 2552b7579f77SDag-Erling Smørgrav 2553b7579f77SDag-Erling Smørgrav log_query_info(VERB_DETAIL, "priming successful for", &qstate->qinfo); 2554b7579f77SDag-Erling Smørgrav delegpt_log(VERB_ALGO, dp); 2555b7579f77SDag-Erling Smørgrav foriq->dp = dp; 2556b7579f77SDag-Erling Smørgrav foriq->deleg_msg = dns_copy_msg(qstate->return_msg, forq->region); 2557b7579f77SDag-Erling Smørgrav if(!foriq->deleg_msg) { 2558b7579f77SDag-Erling Smørgrav log_err("copy prime response: out of memory"); 2559b7579f77SDag-Erling Smørgrav foriq->dp = NULL; 2560b7579f77SDag-Erling Smørgrav foriq->state = QUERYTARGETS_STATE; 2561b7579f77SDag-Erling Smørgrav return; 2562b7579f77SDag-Erling Smørgrav } 2563b7579f77SDag-Erling Smørgrav 2564b7579f77SDag-Erling Smørgrav /* root priming responses go to init stage 2, priming stub 2565b7579f77SDag-Erling Smørgrav * responses to to stage 3. */ 2566b7579f77SDag-Erling Smørgrav if(foriq->wait_priming_stub) { 2567b7579f77SDag-Erling Smørgrav foriq->state = INIT_REQUEST_3_STATE; 2568b7579f77SDag-Erling Smørgrav foriq->wait_priming_stub = 0; 2569b7579f77SDag-Erling Smørgrav } else foriq->state = INIT_REQUEST_2_STATE; 2570b7579f77SDag-Erling Smørgrav /* because we are finished, the parent will be reactivated */ 2571b7579f77SDag-Erling Smørgrav } 2572b7579f77SDag-Erling Smørgrav 2573b7579f77SDag-Erling Smørgrav /** 2574b7579f77SDag-Erling Smørgrav * This handles the response to a priming query. This is used to handle both 2575b7579f77SDag-Erling Smørgrav * root and stub priming responses. This is basically the equivalent of the 2576b7579f77SDag-Erling Smørgrav * QUERY_RESP_STATE, but will not handle CNAME responses and will treat 2577b7579f77SDag-Erling Smørgrav * REFERRALs as ANSWERS. It will also update and reactivate the originating 2578b7579f77SDag-Erling Smørgrav * event. 2579b7579f77SDag-Erling Smørgrav * 2580b7579f77SDag-Erling Smørgrav * @param qstate: query state. 2581b7579f77SDag-Erling Smørgrav * @param id: module id. 2582b7579f77SDag-Erling Smørgrav * @return true if the event needs more immediate processing, false if not. 2583b7579f77SDag-Erling Smørgrav * This state always returns false. 2584b7579f77SDag-Erling Smørgrav */ 2585b7579f77SDag-Erling Smørgrav static int 2586b7579f77SDag-Erling Smørgrav processPrimeResponse(struct module_qstate* qstate, int id) 2587b7579f77SDag-Erling Smørgrav { 2588b7579f77SDag-Erling Smørgrav struct iter_qstate* iq = (struct iter_qstate*)qstate->minfo[id]; 2589b7579f77SDag-Erling Smørgrav enum response_type type; 2590b7579f77SDag-Erling Smørgrav iq->response->rep->flags &= ~(BIT_RD|BIT_RA); /* ignore rec-lame */ 2591b7579f77SDag-Erling Smørgrav type = response_type_from_server( 2592b7579f77SDag-Erling Smørgrav (int)((iq->chase_flags&BIT_RD) || iq->chase_to_rd), 2593b7579f77SDag-Erling Smørgrav iq->response, &iq->qchase, iq->dp); 2594b7579f77SDag-Erling Smørgrav if(type == RESPONSE_TYPE_ANSWER) { 2595b7579f77SDag-Erling Smørgrav qstate->return_rcode = LDNS_RCODE_NOERROR; 2596b7579f77SDag-Erling Smørgrav qstate->return_msg = iq->response; 2597b7579f77SDag-Erling Smørgrav } else { 2598b7579f77SDag-Erling Smørgrav qstate->return_rcode = LDNS_RCODE_SERVFAIL; 2599b7579f77SDag-Erling Smørgrav qstate->return_msg = NULL; 2600b7579f77SDag-Erling Smørgrav } 2601b7579f77SDag-Erling Smørgrav 2602b7579f77SDag-Erling Smørgrav /* validate the root or stub after priming (if enabled). 2603b7579f77SDag-Erling Smørgrav * This is the same query as the prime query, but with validation. 2604b7579f77SDag-Erling Smørgrav * Now that we are primed, the additional queries that validation 2605b7579f77SDag-Erling Smørgrav * may need can be resolved, such as DLV. */ 2606b7579f77SDag-Erling Smørgrav if(qstate->env->cfg->harden_referral_path) { 2607b7579f77SDag-Erling Smørgrav struct module_qstate* subq = NULL; 2608b7579f77SDag-Erling Smørgrav log_nametypeclass(VERB_ALGO, "schedule prime validation", 2609b7579f77SDag-Erling Smørgrav qstate->qinfo.qname, qstate->qinfo.qtype, 2610b7579f77SDag-Erling Smørgrav qstate->qinfo.qclass); 2611b7579f77SDag-Erling Smørgrav if(!generate_sub_request(qstate->qinfo.qname, 2612b7579f77SDag-Erling Smørgrav qstate->qinfo.qname_len, qstate->qinfo.qtype, 2613b7579f77SDag-Erling Smørgrav qstate->qinfo.qclass, qstate, id, iq, 2614b7579f77SDag-Erling Smørgrav INIT_REQUEST_STATE, FINISHED_STATE, &subq, 1)) { 2615b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "could not generate prime check"); 2616b7579f77SDag-Erling Smørgrav } 2617b7579f77SDag-Erling Smørgrav generate_a_aaaa_check(qstate, iq, id); 2618b7579f77SDag-Erling Smørgrav } 2619b7579f77SDag-Erling Smørgrav 2620b7579f77SDag-Erling Smørgrav /* This event is finished. */ 2621b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_finished; 2622b7579f77SDag-Erling Smørgrav return 0; 2623b7579f77SDag-Erling Smørgrav } 2624b7579f77SDag-Erling Smørgrav 2625b7579f77SDag-Erling Smørgrav /** 2626b7579f77SDag-Erling Smørgrav * Do final processing on responses to target queries. Events reach this 2627b7579f77SDag-Erling Smørgrav * state after the iterative resolution algorithm terminates. This state is 2628b7579f77SDag-Erling Smørgrav * responsible for reactiving the original event, and housekeeping related 2629b7579f77SDag-Erling Smørgrav * to received target responses (caching, updating the current delegation 2630b7579f77SDag-Erling Smørgrav * point, etc). 2631b7579f77SDag-Erling Smørgrav * Callback from walk_supers for every super state that is interested in 2632b7579f77SDag-Erling Smørgrav * the results from this query. 2633b7579f77SDag-Erling Smørgrav * 2634b7579f77SDag-Erling Smørgrav * @param qstate: query state. 2635b7579f77SDag-Erling Smørgrav * @param id: module id. 2636b7579f77SDag-Erling Smørgrav * @param forq: super query state. 2637b7579f77SDag-Erling Smørgrav */ 2638b7579f77SDag-Erling Smørgrav static void 2639b7579f77SDag-Erling Smørgrav processTargetResponse(struct module_qstate* qstate, int id, 2640b7579f77SDag-Erling Smørgrav struct module_qstate* forq) 2641b7579f77SDag-Erling Smørgrav { 2642b7579f77SDag-Erling Smørgrav struct iter_qstate* iq = (struct iter_qstate*)qstate->minfo[id]; 2643b7579f77SDag-Erling Smørgrav struct iter_qstate* foriq = (struct iter_qstate*)forq->minfo[id]; 2644b7579f77SDag-Erling Smørgrav struct ub_packed_rrset_key* rrset; 2645b7579f77SDag-Erling Smørgrav struct delegpt_ns* dpns; 2646b7579f77SDag-Erling Smørgrav log_assert(qstate->return_rcode == LDNS_RCODE_NOERROR); 2647b7579f77SDag-Erling Smørgrav 2648b7579f77SDag-Erling Smørgrav foriq->state = QUERYTARGETS_STATE; 2649b7579f77SDag-Erling Smørgrav log_query_info(VERB_ALGO, "processTargetResponse", &qstate->qinfo); 2650b7579f77SDag-Erling Smørgrav log_query_info(VERB_ALGO, "processTargetResponse super", &forq->qinfo); 2651b7579f77SDag-Erling Smørgrav 2652b7579f77SDag-Erling Smørgrav /* check to see if parent event is still interested (in orig name). */ 2653b7579f77SDag-Erling Smørgrav if(!foriq->dp) { 2654b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "subq: parent not interested, was reset"); 2655b7579f77SDag-Erling Smørgrav return; /* not interested anymore */ 2656b7579f77SDag-Erling Smørgrav } 2657b7579f77SDag-Erling Smørgrav dpns = delegpt_find_ns(foriq->dp, qstate->qinfo.qname, 2658b7579f77SDag-Erling Smørgrav qstate->qinfo.qname_len); 2659b7579f77SDag-Erling Smørgrav if(!dpns) { 2660b7579f77SDag-Erling Smørgrav /* If not interested, just stop processing this event */ 2661b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "subq: parent not interested anymore"); 2662b7579f77SDag-Erling Smørgrav /* could be because parent was jostled out of the cache, 2663b7579f77SDag-Erling Smørgrav and a new identical query arrived, that does not want it*/ 2664b7579f77SDag-Erling Smørgrav return; 2665b7579f77SDag-Erling Smørgrav } 2666b7579f77SDag-Erling Smørgrav 2667b7579f77SDag-Erling Smørgrav /* Tell the originating event that this target query has finished 2668b7579f77SDag-Erling Smørgrav * (regardless if it succeeded or not). */ 2669b7579f77SDag-Erling Smørgrav foriq->num_target_queries--; 2670b7579f77SDag-Erling Smørgrav 2671b7579f77SDag-Erling Smørgrav /* if iq->query_for_pside_glue then add the pside_glue (marked lame) */ 2672b7579f77SDag-Erling Smørgrav if(iq->pside_glue) { 2673b7579f77SDag-Erling Smørgrav /* if the pside_glue is NULL, then it could not be found, 2674b7579f77SDag-Erling Smørgrav * the done_pside is already set when created and a cache 2675b7579f77SDag-Erling Smørgrav * entry created in processFinished so nothing to do here */ 2676b7579f77SDag-Erling Smørgrav log_rrset_key(VERB_ALGO, "add parentside glue to dp", 2677b7579f77SDag-Erling Smørgrav iq->pside_glue); 2678b7579f77SDag-Erling Smørgrav if(!delegpt_add_rrset(foriq->dp, forq->region, 2679b7579f77SDag-Erling Smørgrav iq->pside_glue, 1)) 2680b7579f77SDag-Erling Smørgrav log_err("out of memory adding pside glue"); 2681b7579f77SDag-Erling Smørgrav } 2682b7579f77SDag-Erling Smørgrav 2683b7579f77SDag-Erling Smørgrav /* This response is relevant to the current query, so we 2684b7579f77SDag-Erling Smørgrav * add (attempt to add, anyway) this target(s) and reactivate 2685b7579f77SDag-Erling Smørgrav * the original event. 2686b7579f77SDag-Erling Smørgrav * NOTE: we could only look for the AnswerRRset if the 2687b7579f77SDag-Erling Smørgrav * response type was ANSWER. */ 2688b7579f77SDag-Erling Smørgrav rrset = reply_find_answer_rrset(&iq->qchase, qstate->return_msg->rep); 2689b7579f77SDag-Erling Smørgrav if(rrset) { 2690b7579f77SDag-Erling Smørgrav /* if CNAMEs have been followed - add new NS to delegpt. */ 2691b7579f77SDag-Erling Smørgrav /* BTW. RFC 1918 says NS should not have got CNAMEs. Robust. */ 2692b7579f77SDag-Erling Smørgrav if(!delegpt_find_ns(foriq->dp, rrset->rk.dname, 2693b7579f77SDag-Erling Smørgrav rrset->rk.dname_len)) { 2694b7579f77SDag-Erling Smørgrav /* if dpns->lame then set newcname ns lame too */ 2695b7579f77SDag-Erling Smørgrav if(!delegpt_add_ns(foriq->dp, forq->region, 269617d15b25SDag-Erling Smørgrav rrset->rk.dname, dpns->lame)) 2697b7579f77SDag-Erling Smørgrav log_err("out of memory adding cnamed-ns"); 2698b7579f77SDag-Erling Smørgrav } 2699b7579f77SDag-Erling Smørgrav /* if dpns->lame then set the address(es) lame too */ 2700b7579f77SDag-Erling Smørgrav if(!delegpt_add_rrset(foriq->dp, forq->region, rrset, 270117d15b25SDag-Erling Smørgrav dpns->lame)) 2702b7579f77SDag-Erling Smørgrav log_err("out of memory adding targets"); 2703b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "added target response"); 2704b7579f77SDag-Erling Smørgrav delegpt_log(VERB_ALGO, foriq->dp); 2705b7579f77SDag-Erling Smørgrav } else { 2706b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "iterator TargetResponse failed"); 2707b7579f77SDag-Erling Smørgrav dpns->resolved = 1; /* fail the target */ 2708b7579f77SDag-Erling Smørgrav } 2709b7579f77SDag-Erling Smørgrav } 2710b7579f77SDag-Erling Smørgrav 2711b7579f77SDag-Erling Smørgrav /** 2712b7579f77SDag-Erling Smørgrav * Process response for DS NS Find queries, that attempt to find the delegation 2713b7579f77SDag-Erling Smørgrav * point where we ask the DS query from. 2714b7579f77SDag-Erling Smørgrav * 2715b7579f77SDag-Erling Smørgrav * @param qstate: query state. 2716b7579f77SDag-Erling Smørgrav * @param id: module id. 2717b7579f77SDag-Erling Smørgrav * @param forq: super query state. 2718b7579f77SDag-Erling Smørgrav */ 2719b7579f77SDag-Erling Smørgrav static void 2720b7579f77SDag-Erling Smørgrav processDSNSResponse(struct module_qstate* qstate, int id, 2721b7579f77SDag-Erling Smørgrav struct module_qstate* forq) 2722b7579f77SDag-Erling Smørgrav { 2723b7579f77SDag-Erling Smørgrav struct iter_qstate* foriq = (struct iter_qstate*)forq->minfo[id]; 2724b7579f77SDag-Erling Smørgrav 2725b7579f77SDag-Erling Smørgrav /* if the finished (iq->response) query has no NS set: continue 2726b7579f77SDag-Erling Smørgrav * up to look for the right dp; nothing to change, do DPNSstate */ 2727b7579f77SDag-Erling Smørgrav if(qstate->return_rcode != LDNS_RCODE_NOERROR) 2728b7579f77SDag-Erling Smørgrav return; /* seek further */ 2729b7579f77SDag-Erling Smørgrav /* find the NS RRset (without allowing CNAMEs) */ 2730b7579f77SDag-Erling Smørgrav if(!reply_find_rrset(qstate->return_msg->rep, qstate->qinfo.qname, 2731b7579f77SDag-Erling Smørgrav qstate->qinfo.qname_len, LDNS_RR_TYPE_NS, 2732b7579f77SDag-Erling Smørgrav qstate->qinfo.qclass)){ 2733b7579f77SDag-Erling Smørgrav return; /* seek further */ 2734b7579f77SDag-Erling Smørgrav } 2735b7579f77SDag-Erling Smørgrav 2736b7579f77SDag-Erling Smørgrav /* else, store as DP and continue at querytargets */ 2737b7579f77SDag-Erling Smørgrav foriq->state = QUERYTARGETS_STATE; 2738b7579f77SDag-Erling Smørgrav foriq->dp = delegpt_from_message(qstate->return_msg, forq->region); 2739b7579f77SDag-Erling Smørgrav if(!foriq->dp) { 2740b7579f77SDag-Erling Smørgrav log_err("out of memory in dsns dp alloc"); 2741b7579f77SDag-Erling Smørgrav return; /* dp==NULL in QUERYTARGETS makes SERVFAIL */ 2742b7579f77SDag-Erling Smørgrav } 2743b7579f77SDag-Erling Smørgrav /* success, go query the querytargets in the new dp (and go down) */ 2744b7579f77SDag-Erling Smørgrav } 2745b7579f77SDag-Erling Smørgrav 2746b7579f77SDag-Erling Smørgrav /** 2747b7579f77SDag-Erling Smørgrav * Process response for qclass=ANY queries for a particular class. 2748b7579f77SDag-Erling Smørgrav * Append to result or error-exit. 2749b7579f77SDag-Erling Smørgrav * 2750b7579f77SDag-Erling Smørgrav * @param qstate: query state. 2751b7579f77SDag-Erling Smørgrav * @param id: module id. 2752b7579f77SDag-Erling Smørgrav * @param forq: super query state. 2753b7579f77SDag-Erling Smørgrav */ 2754b7579f77SDag-Erling Smørgrav static void 2755b7579f77SDag-Erling Smørgrav processClassResponse(struct module_qstate* qstate, int id, 2756b7579f77SDag-Erling Smørgrav struct module_qstate* forq) 2757b7579f77SDag-Erling Smørgrav { 2758b7579f77SDag-Erling Smørgrav struct iter_qstate* foriq = (struct iter_qstate*)forq->minfo[id]; 2759b7579f77SDag-Erling Smørgrav struct dns_msg* from = qstate->return_msg; 2760b7579f77SDag-Erling Smørgrav log_query_info(VERB_ALGO, "processClassResponse", &qstate->qinfo); 2761b7579f77SDag-Erling Smørgrav log_query_info(VERB_ALGO, "processClassResponse super", &forq->qinfo); 2762b7579f77SDag-Erling Smørgrav if(qstate->return_rcode != LDNS_RCODE_NOERROR) { 2763b7579f77SDag-Erling Smørgrav /* cause servfail for qclass ANY query */ 2764b7579f77SDag-Erling Smørgrav foriq->response = NULL; 2765b7579f77SDag-Erling Smørgrav foriq->state = FINISHED_STATE; 2766b7579f77SDag-Erling Smørgrav return; 2767b7579f77SDag-Erling Smørgrav } 2768b7579f77SDag-Erling Smørgrav /* append result */ 2769b7579f77SDag-Erling Smørgrav if(!foriq->response) { 2770b7579f77SDag-Erling Smørgrav /* allocate the response: copy RCODE, sec_state */ 2771b7579f77SDag-Erling Smørgrav foriq->response = dns_copy_msg(from, forq->region); 2772b7579f77SDag-Erling Smørgrav if(!foriq->response) { 2773b7579f77SDag-Erling Smørgrav log_err("malloc failed for qclass ANY response"); 2774b7579f77SDag-Erling Smørgrav foriq->state = FINISHED_STATE; 2775b7579f77SDag-Erling Smørgrav return; 2776b7579f77SDag-Erling Smørgrav } 2777b7579f77SDag-Erling Smørgrav foriq->response->qinfo.qclass = forq->qinfo.qclass; 2778b7579f77SDag-Erling Smørgrav /* qclass ANY does not receive the AA flag on replies */ 2779b7579f77SDag-Erling Smørgrav foriq->response->rep->authoritative = 0; 2780b7579f77SDag-Erling Smørgrav } else { 2781b7579f77SDag-Erling Smørgrav struct dns_msg* to = foriq->response; 2782b7579f77SDag-Erling Smørgrav /* add _from_ this response _to_ existing collection */ 2783b7579f77SDag-Erling Smørgrav /* if there are records, copy RCODE */ 2784b7579f77SDag-Erling Smørgrav /* lower sec_state if this message is lower */ 2785b7579f77SDag-Erling Smørgrav if(from->rep->rrset_count != 0) { 2786b7579f77SDag-Erling Smørgrav size_t n = from->rep->rrset_count+to->rep->rrset_count; 2787b7579f77SDag-Erling Smørgrav struct ub_packed_rrset_key** dest, **d; 2788b7579f77SDag-Erling Smørgrav /* copy appropriate rcode */ 2789b7579f77SDag-Erling Smørgrav to->rep->flags = from->rep->flags; 2790b7579f77SDag-Erling Smørgrav /* copy rrsets */ 279109a3aaf3SDag-Erling Smørgrav if(from->rep->rrset_count > RR_COUNT_MAX || 279209a3aaf3SDag-Erling Smørgrav to->rep->rrset_count > RR_COUNT_MAX) { 279309a3aaf3SDag-Erling Smørgrav log_err("malloc failed (too many rrsets) in collect ANY"); 279409a3aaf3SDag-Erling Smørgrav foriq->state = FINISHED_STATE; 279509a3aaf3SDag-Erling Smørgrav return; /* integer overflow protection */ 279609a3aaf3SDag-Erling Smørgrav } 2797b7579f77SDag-Erling Smørgrav dest = regional_alloc(forq->region, sizeof(dest[0])*n); 2798b7579f77SDag-Erling Smørgrav if(!dest) { 2799b7579f77SDag-Erling Smørgrav log_err("malloc failed in collect ANY"); 2800b7579f77SDag-Erling Smørgrav foriq->state = FINISHED_STATE; 2801b7579f77SDag-Erling Smørgrav return; 2802b7579f77SDag-Erling Smørgrav } 2803b7579f77SDag-Erling Smørgrav d = dest; 2804b7579f77SDag-Erling Smørgrav /* copy AN */ 2805b7579f77SDag-Erling Smørgrav memcpy(dest, to->rep->rrsets, to->rep->an_numrrsets 2806b7579f77SDag-Erling Smørgrav * sizeof(dest[0])); 2807b7579f77SDag-Erling Smørgrav dest += to->rep->an_numrrsets; 2808b7579f77SDag-Erling Smørgrav memcpy(dest, from->rep->rrsets, from->rep->an_numrrsets 2809b7579f77SDag-Erling Smørgrav * sizeof(dest[0])); 2810b7579f77SDag-Erling Smørgrav dest += from->rep->an_numrrsets; 2811b7579f77SDag-Erling Smørgrav /* copy NS */ 2812b7579f77SDag-Erling Smørgrav memcpy(dest, to->rep->rrsets+to->rep->an_numrrsets, 2813b7579f77SDag-Erling Smørgrav to->rep->ns_numrrsets * sizeof(dest[0])); 2814b7579f77SDag-Erling Smørgrav dest += to->rep->ns_numrrsets; 2815b7579f77SDag-Erling Smørgrav memcpy(dest, from->rep->rrsets+from->rep->an_numrrsets, 2816b7579f77SDag-Erling Smørgrav from->rep->ns_numrrsets * sizeof(dest[0])); 2817b7579f77SDag-Erling Smørgrav dest += from->rep->ns_numrrsets; 2818b7579f77SDag-Erling Smørgrav /* copy AR */ 2819b7579f77SDag-Erling Smørgrav memcpy(dest, to->rep->rrsets+to->rep->an_numrrsets+ 2820b7579f77SDag-Erling Smørgrav to->rep->ns_numrrsets, 2821b7579f77SDag-Erling Smørgrav to->rep->ar_numrrsets * sizeof(dest[0])); 2822b7579f77SDag-Erling Smørgrav dest += to->rep->ar_numrrsets; 2823b7579f77SDag-Erling Smørgrav memcpy(dest, from->rep->rrsets+from->rep->an_numrrsets+ 2824b7579f77SDag-Erling Smørgrav from->rep->ns_numrrsets, 2825b7579f77SDag-Erling Smørgrav from->rep->ar_numrrsets * sizeof(dest[0])); 2826b7579f77SDag-Erling Smørgrav /* update counts */ 2827b7579f77SDag-Erling Smørgrav to->rep->rrsets = d; 2828b7579f77SDag-Erling Smørgrav to->rep->an_numrrsets += from->rep->an_numrrsets; 2829b7579f77SDag-Erling Smørgrav to->rep->ns_numrrsets += from->rep->ns_numrrsets; 2830b7579f77SDag-Erling Smørgrav to->rep->ar_numrrsets += from->rep->ar_numrrsets; 2831b7579f77SDag-Erling Smørgrav to->rep->rrset_count = n; 2832b7579f77SDag-Erling Smørgrav } 2833b7579f77SDag-Erling Smørgrav if(from->rep->security < to->rep->security) /* lowest sec */ 2834b7579f77SDag-Erling Smørgrav to->rep->security = from->rep->security; 2835b7579f77SDag-Erling Smørgrav if(from->rep->qdcount != 0) /* insert qd if appropriate */ 2836b7579f77SDag-Erling Smørgrav to->rep->qdcount = from->rep->qdcount; 2837b7579f77SDag-Erling Smørgrav if(from->rep->ttl < to->rep->ttl) /* use smallest TTL */ 2838b7579f77SDag-Erling Smørgrav to->rep->ttl = from->rep->ttl; 2839b7579f77SDag-Erling Smørgrav if(from->rep->prefetch_ttl < to->rep->prefetch_ttl) 2840b7579f77SDag-Erling Smørgrav to->rep->prefetch_ttl = from->rep->prefetch_ttl; 2841b7579f77SDag-Erling Smørgrav } 2842b7579f77SDag-Erling Smørgrav /* are we done? */ 2843b7579f77SDag-Erling Smørgrav foriq->num_current_queries --; 2844b7579f77SDag-Erling Smørgrav if(foriq->num_current_queries == 0) 2845b7579f77SDag-Erling Smørgrav foriq->state = FINISHED_STATE; 2846b7579f77SDag-Erling Smørgrav } 2847b7579f77SDag-Erling Smørgrav 2848b7579f77SDag-Erling Smørgrav /** 2849b7579f77SDag-Erling Smørgrav * Collect class ANY responses and make them into one response. This 2850b7579f77SDag-Erling Smørgrav * state is started and it creates queries for all classes (that have 2851b7579f77SDag-Erling Smørgrav * root hints). The answers are then collected. 2852b7579f77SDag-Erling Smørgrav * 2853b7579f77SDag-Erling Smørgrav * @param qstate: query state. 2854b7579f77SDag-Erling Smørgrav * @param id: module id. 2855b7579f77SDag-Erling Smørgrav * @return true if the event needs more immediate processing, false if not. 2856b7579f77SDag-Erling Smørgrav */ 2857b7579f77SDag-Erling Smørgrav static int 2858b7579f77SDag-Erling Smørgrav processCollectClass(struct module_qstate* qstate, int id) 2859b7579f77SDag-Erling Smørgrav { 2860b7579f77SDag-Erling Smørgrav struct iter_qstate* iq = (struct iter_qstate*)qstate->minfo[id]; 2861b7579f77SDag-Erling Smørgrav struct module_qstate* subq; 2862b7579f77SDag-Erling Smørgrav /* If qchase.qclass == 0 then send out queries for all classes. 2863b7579f77SDag-Erling Smørgrav * Otherwise, do nothing (wait for all answers to arrive and the 2864b7579f77SDag-Erling Smørgrav * processClassResponse to put them together, and that moves us 2865b7579f77SDag-Erling Smørgrav * towards the Finished state when done. */ 2866b7579f77SDag-Erling Smørgrav if(iq->qchase.qclass == 0) { 2867b7579f77SDag-Erling Smørgrav uint16_t c = 0; 2868b7579f77SDag-Erling Smørgrav iq->qchase.qclass = LDNS_RR_CLASS_ANY; 2869b7579f77SDag-Erling Smørgrav while(iter_get_next_root(qstate->env->hints, 2870b7579f77SDag-Erling Smørgrav qstate->env->fwds, &c)) { 2871b7579f77SDag-Erling Smørgrav /* generate query for this class */ 2872b7579f77SDag-Erling Smørgrav log_nametypeclass(VERB_ALGO, "spawn collect query", 2873b7579f77SDag-Erling Smørgrav qstate->qinfo.qname, qstate->qinfo.qtype, c); 2874b7579f77SDag-Erling Smørgrav if(!generate_sub_request(qstate->qinfo.qname, 2875b7579f77SDag-Erling Smørgrav qstate->qinfo.qname_len, qstate->qinfo.qtype, 2876b7579f77SDag-Erling Smørgrav c, qstate, id, iq, INIT_REQUEST_STATE, 2877b7579f77SDag-Erling Smørgrav FINISHED_STATE, &subq, 2878b7579f77SDag-Erling Smørgrav (int)!(qstate->query_flags&BIT_CD))) { 2879b7579f77SDag-Erling Smørgrav return error_response(qstate, id, 2880b7579f77SDag-Erling Smørgrav LDNS_RCODE_SERVFAIL); 2881b7579f77SDag-Erling Smørgrav } 2882b7579f77SDag-Erling Smørgrav /* ignore subq, no special init required */ 2883b7579f77SDag-Erling Smørgrav iq->num_current_queries ++; 2884b7579f77SDag-Erling Smørgrav if(c == 0xffff) 2885b7579f77SDag-Erling Smørgrav break; 2886b7579f77SDag-Erling Smørgrav else c++; 2887b7579f77SDag-Erling Smørgrav } 2888b7579f77SDag-Erling Smørgrav /* if no roots are configured at all, return */ 2889b7579f77SDag-Erling Smørgrav if(iq->num_current_queries == 0) { 2890b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "No root hints or fwds, giving up " 2891b7579f77SDag-Erling Smørgrav "on qclass ANY"); 2892b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_REFUSED); 2893b7579f77SDag-Erling Smørgrav } 2894b7579f77SDag-Erling Smørgrav /* return false, wait for queries to return */ 2895b7579f77SDag-Erling Smørgrav } 2896b7579f77SDag-Erling Smørgrav /* if woke up here because of an answer, wait for more answers */ 2897b7579f77SDag-Erling Smørgrav return 0; 2898b7579f77SDag-Erling Smørgrav } 2899b7579f77SDag-Erling Smørgrav 2900b7579f77SDag-Erling Smørgrav /** 2901b7579f77SDag-Erling Smørgrav * This handles the final state for first-tier responses (i.e., responses to 2902b7579f77SDag-Erling Smørgrav * externally generated queries). 2903b7579f77SDag-Erling Smørgrav * 2904b7579f77SDag-Erling Smørgrav * @param qstate: query state. 2905b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 2906b7579f77SDag-Erling Smørgrav * @param id: module id. 2907b7579f77SDag-Erling Smørgrav * @return true if the event needs more processing, false if not. Since this 2908b7579f77SDag-Erling Smørgrav * is the final state for an event, it always returns false. 2909b7579f77SDag-Erling Smørgrav */ 2910b7579f77SDag-Erling Smørgrav static int 2911b7579f77SDag-Erling Smørgrav processFinished(struct module_qstate* qstate, struct iter_qstate* iq, 2912b7579f77SDag-Erling Smørgrav int id) 2913b7579f77SDag-Erling Smørgrav { 2914b7579f77SDag-Erling Smørgrav log_query_info(VERB_QUERY, "finishing processing for", 2915b7579f77SDag-Erling Smørgrav &qstate->qinfo); 2916b7579f77SDag-Erling Smørgrav 2917b7579f77SDag-Erling Smørgrav /* store negative cache element for parent side glue. */ 2918b7579f77SDag-Erling Smørgrav if(iq->query_for_pside_glue && !iq->pside_glue) 2919b7579f77SDag-Erling Smørgrav iter_store_parentside_neg(qstate->env, &qstate->qinfo, 2920b7579f77SDag-Erling Smørgrav iq->deleg_msg?iq->deleg_msg->rep: 2921b7579f77SDag-Erling Smørgrav (iq->response?iq->response->rep:NULL)); 2922b7579f77SDag-Erling Smørgrav if(!iq->response) { 2923b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "No response is set, servfail"); 2924b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 2925b7579f77SDag-Erling Smørgrav } 2926b7579f77SDag-Erling Smørgrav 2927b7579f77SDag-Erling Smørgrav /* Make sure that the RA flag is set (since the presence of 2928b7579f77SDag-Erling Smørgrav * this module means that recursion is available) */ 2929b7579f77SDag-Erling Smørgrav iq->response->rep->flags |= BIT_RA; 2930b7579f77SDag-Erling Smørgrav 2931b7579f77SDag-Erling Smørgrav /* Clear the AA flag */ 2932b7579f77SDag-Erling Smørgrav /* FIXME: does this action go here or in some other module? */ 2933b7579f77SDag-Erling Smørgrav iq->response->rep->flags &= ~BIT_AA; 2934b7579f77SDag-Erling Smørgrav 2935b7579f77SDag-Erling Smørgrav /* make sure QR flag is on */ 2936b7579f77SDag-Erling Smørgrav iq->response->rep->flags |= BIT_QR; 2937b7579f77SDag-Erling Smørgrav 2938b7579f77SDag-Erling Smørgrav /* we have finished processing this query */ 2939b7579f77SDag-Erling Smørgrav qstate->ext_state[id] = module_finished; 2940b7579f77SDag-Erling Smørgrav 2941b7579f77SDag-Erling Smørgrav /* TODO: we are using a private TTL, trim the response. */ 2942b7579f77SDag-Erling Smørgrav /* if (mPrivateTTL > 0){IterUtils.setPrivateTTL(resp, mPrivateTTL); } */ 2943b7579f77SDag-Erling Smørgrav 2944b7579f77SDag-Erling Smørgrav /* prepend any items we have accumulated */ 2945b7579f77SDag-Erling Smørgrav if(iq->an_prepend_list || iq->ns_prepend_list) { 2946b7579f77SDag-Erling Smørgrav if(!iter_prepend(iq, iq->response, qstate->region)) { 2947b7579f77SDag-Erling Smørgrav log_err("prepend rrsets: out of memory"); 2948b7579f77SDag-Erling Smørgrav return error_response(qstate, id, LDNS_RCODE_SERVFAIL); 2949b7579f77SDag-Erling Smørgrav } 2950b7579f77SDag-Erling Smørgrav /* reset the query name back */ 2951b7579f77SDag-Erling Smørgrav iq->response->qinfo = qstate->qinfo; 2952b7579f77SDag-Erling Smørgrav /* the security state depends on the combination */ 2953b7579f77SDag-Erling Smørgrav iq->response->rep->security = sec_status_unchecked; 2954b7579f77SDag-Erling Smørgrav /* store message with the finished prepended items, 2955b7579f77SDag-Erling Smørgrav * but only if we did recursion. The nonrecursion referral 2956b7579f77SDag-Erling Smørgrav * from cache does not need to be stored in the msg cache. */ 2957b7579f77SDag-Erling Smørgrav if(qstate->query_flags&BIT_RD) { 29588ed2b524SDag-Erling Smørgrav iter_dns_store(qstate->env, &qstate->qinfo, 2959b7579f77SDag-Erling Smørgrav iq->response->rep, 0, qstate->prefetch_leeway, 2960b7579f77SDag-Erling Smørgrav iq->dp&&iq->dp->has_parent_side_NS, 2961ff825849SDag-Erling Smørgrav qstate->region, qstate->query_flags); 2962b7579f77SDag-Erling Smørgrav } 2963b7579f77SDag-Erling Smørgrav } 2964b7579f77SDag-Erling Smørgrav qstate->return_rcode = LDNS_RCODE_NOERROR; 2965b7579f77SDag-Erling Smørgrav qstate->return_msg = iq->response; 2966b7579f77SDag-Erling Smørgrav return 0; 2967b7579f77SDag-Erling Smørgrav } 2968b7579f77SDag-Erling Smørgrav 2969b7579f77SDag-Erling Smørgrav /* 2970b7579f77SDag-Erling Smørgrav * Return priming query results to interestes super querystates. 2971b7579f77SDag-Erling Smørgrav * 2972b7579f77SDag-Erling Smørgrav * Sets the delegation point and delegation message (not nonRD queries). 2973b7579f77SDag-Erling Smørgrav * This is a callback from walk_supers. 2974b7579f77SDag-Erling Smørgrav * 2975b7579f77SDag-Erling Smørgrav * @param qstate: query state that finished. 2976b7579f77SDag-Erling Smørgrav * @param id: module id. 2977b7579f77SDag-Erling Smørgrav * @param super: the qstate to inform. 2978b7579f77SDag-Erling Smørgrav */ 2979b7579f77SDag-Erling Smørgrav void 2980b7579f77SDag-Erling Smørgrav iter_inform_super(struct module_qstate* qstate, int id, 2981b7579f77SDag-Erling Smørgrav struct module_qstate* super) 2982b7579f77SDag-Erling Smørgrav { 2983b7579f77SDag-Erling Smørgrav if(!qstate->is_priming && super->qinfo.qclass == LDNS_RR_CLASS_ANY) 2984b7579f77SDag-Erling Smørgrav processClassResponse(qstate, id, super); 2985b7579f77SDag-Erling Smørgrav else if(super->qinfo.qtype == LDNS_RR_TYPE_DS && ((struct iter_qstate*) 2986b7579f77SDag-Erling Smørgrav super->minfo[id])->state == DSNS_FIND_STATE) 2987b7579f77SDag-Erling Smørgrav processDSNSResponse(qstate, id, super); 2988b7579f77SDag-Erling Smørgrav else if(qstate->return_rcode != LDNS_RCODE_NOERROR) 2989b7579f77SDag-Erling Smørgrav error_supers(qstate, id, super); 2990b7579f77SDag-Erling Smørgrav else if(qstate->is_priming) 2991b7579f77SDag-Erling Smørgrav prime_supers(qstate, id, super); 2992b7579f77SDag-Erling Smørgrav else processTargetResponse(qstate, id, super); 2993b7579f77SDag-Erling Smørgrav } 2994b7579f77SDag-Erling Smørgrav 2995b7579f77SDag-Erling Smørgrav /** 2996b7579f77SDag-Erling Smørgrav * Handle iterator state. 2997b7579f77SDag-Erling Smørgrav * Handle events. This is the real processing loop for events, responsible 2998b7579f77SDag-Erling Smørgrav * for moving events through the various states. If a processing method 2999b7579f77SDag-Erling Smørgrav * returns true, then it will be advanced to the next state. If false, then 3000b7579f77SDag-Erling Smørgrav * processing will stop. 3001b7579f77SDag-Erling Smørgrav * 3002b7579f77SDag-Erling Smørgrav * @param qstate: query state. 3003b7579f77SDag-Erling Smørgrav * @param ie: iterator shared global environment. 3004b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 3005b7579f77SDag-Erling Smørgrav * @param id: module id. 3006b7579f77SDag-Erling Smørgrav */ 3007b7579f77SDag-Erling Smørgrav static void 3008b7579f77SDag-Erling Smørgrav iter_handle(struct module_qstate* qstate, struct iter_qstate* iq, 3009b7579f77SDag-Erling Smørgrav struct iter_env* ie, int id) 3010b7579f77SDag-Erling Smørgrav { 3011b7579f77SDag-Erling Smørgrav int cont = 1; 3012b7579f77SDag-Erling Smørgrav while(cont) { 3013b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "iter_handle processing q with state %s", 3014b7579f77SDag-Erling Smørgrav iter_state_to_string(iq->state)); 3015b7579f77SDag-Erling Smørgrav switch(iq->state) { 3016b7579f77SDag-Erling Smørgrav case INIT_REQUEST_STATE: 3017b7579f77SDag-Erling Smørgrav cont = processInitRequest(qstate, iq, ie, id); 3018b7579f77SDag-Erling Smørgrav break; 3019b7579f77SDag-Erling Smørgrav case INIT_REQUEST_2_STATE: 3020b7579f77SDag-Erling Smørgrav cont = processInitRequest2(qstate, iq, id); 3021b7579f77SDag-Erling Smørgrav break; 3022b7579f77SDag-Erling Smørgrav case INIT_REQUEST_3_STATE: 3023b7579f77SDag-Erling Smørgrav cont = processInitRequest3(qstate, iq, id); 3024b7579f77SDag-Erling Smørgrav break; 3025b7579f77SDag-Erling Smørgrav case QUERYTARGETS_STATE: 3026b7579f77SDag-Erling Smørgrav cont = processQueryTargets(qstate, iq, ie, id); 3027b7579f77SDag-Erling Smørgrav break; 3028b7579f77SDag-Erling Smørgrav case QUERY_RESP_STATE: 3029b7579f77SDag-Erling Smørgrav cont = processQueryResponse(qstate, iq, id); 3030b7579f77SDag-Erling Smørgrav break; 3031b7579f77SDag-Erling Smørgrav case PRIME_RESP_STATE: 3032b7579f77SDag-Erling Smørgrav cont = processPrimeResponse(qstate, id); 3033b7579f77SDag-Erling Smørgrav break; 3034b7579f77SDag-Erling Smørgrav case COLLECT_CLASS_STATE: 3035b7579f77SDag-Erling Smørgrav cont = processCollectClass(qstate, id); 3036b7579f77SDag-Erling Smørgrav break; 3037b7579f77SDag-Erling Smørgrav case DSNS_FIND_STATE: 3038b7579f77SDag-Erling Smørgrav cont = processDSNSFind(qstate, iq, id); 3039b7579f77SDag-Erling Smørgrav break; 3040b7579f77SDag-Erling Smørgrav case FINISHED_STATE: 3041b7579f77SDag-Erling Smørgrav cont = processFinished(qstate, iq, id); 3042b7579f77SDag-Erling Smørgrav break; 3043b7579f77SDag-Erling Smørgrav default: 3044b7579f77SDag-Erling Smørgrav log_warn("iterator: invalid state: %d", 3045b7579f77SDag-Erling Smørgrav iq->state); 3046b7579f77SDag-Erling Smørgrav cont = 0; 3047b7579f77SDag-Erling Smørgrav break; 3048b7579f77SDag-Erling Smørgrav } 3049b7579f77SDag-Erling Smørgrav } 3050b7579f77SDag-Erling Smørgrav } 3051b7579f77SDag-Erling Smørgrav 3052b7579f77SDag-Erling Smørgrav /** 3053b7579f77SDag-Erling Smørgrav * This is the primary entry point for processing request events. Note that 3054b7579f77SDag-Erling Smørgrav * this method should only be used by external modules. 3055b7579f77SDag-Erling Smørgrav * @param qstate: query state. 3056b7579f77SDag-Erling Smørgrav * @param ie: iterator shared global environment. 3057b7579f77SDag-Erling Smørgrav * @param iq: iterator query state. 3058b7579f77SDag-Erling Smørgrav * @param id: module id. 3059b7579f77SDag-Erling Smørgrav */ 3060b7579f77SDag-Erling Smørgrav static void 3061b7579f77SDag-Erling Smørgrav process_request(struct module_qstate* qstate, struct iter_qstate* iq, 3062b7579f77SDag-Erling Smørgrav struct iter_env* ie, int id) 3063b7579f77SDag-Erling Smørgrav { 3064b7579f77SDag-Erling Smørgrav /* external requests start in the INIT state, and finish using the 3065b7579f77SDag-Erling Smørgrav * FINISHED state. */ 3066b7579f77SDag-Erling Smørgrav iq->state = INIT_REQUEST_STATE; 3067b7579f77SDag-Erling Smørgrav iq->final_state = FINISHED_STATE; 3068b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "process_request: new external request event"); 3069b7579f77SDag-Erling Smørgrav iter_handle(qstate, iq, ie, id); 3070b7579f77SDag-Erling Smørgrav } 3071b7579f77SDag-Erling Smørgrav 3072b7579f77SDag-Erling Smørgrav /** process authoritative server reply */ 3073b7579f77SDag-Erling Smørgrav static void 3074b7579f77SDag-Erling Smørgrav process_response(struct module_qstate* qstate, struct iter_qstate* iq, 3075b7579f77SDag-Erling Smørgrav struct iter_env* ie, int id, struct outbound_entry* outbound, 3076b7579f77SDag-Erling Smørgrav enum module_ev event) 3077b7579f77SDag-Erling Smørgrav { 3078b7579f77SDag-Erling Smørgrav struct msg_parse* prs; 3079b7579f77SDag-Erling Smørgrav struct edns_data edns; 308017d15b25SDag-Erling Smørgrav sldns_buffer* pkt; 3081b7579f77SDag-Erling Smørgrav 3082b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "process_response: new external response event"); 3083b7579f77SDag-Erling Smørgrav iq->response = NULL; 3084b7579f77SDag-Erling Smørgrav iq->state = QUERY_RESP_STATE; 3085b7579f77SDag-Erling Smørgrav if(event == module_event_noreply || event == module_event_error) { 3086ff825849SDag-Erling Smørgrav if(event == module_event_noreply && iq->sent_count >= 3 && 3087ff825849SDag-Erling Smørgrav qstate->env->cfg->use_caps_bits_for_id && 3088ff825849SDag-Erling Smørgrav !iq->caps_fallback) { 3089ff825849SDag-Erling Smørgrav /* start fallback */ 3090ff825849SDag-Erling Smørgrav iq->caps_fallback = 1; 3091ff825849SDag-Erling Smørgrav iq->caps_server = 0; 3092ff825849SDag-Erling Smørgrav iq->caps_reply = NULL; 309309a3aaf3SDag-Erling Smørgrav iq->caps_response = NULL; 3094ff825849SDag-Erling Smørgrav iq->state = QUERYTARGETS_STATE; 3095ff825849SDag-Erling Smørgrav iq->num_current_queries--; 3096ff825849SDag-Erling Smørgrav /* need fresh attempts for the 0x20 fallback, if 3097ff825849SDag-Erling Smørgrav * that was the cause for the failure */ 3098ff825849SDag-Erling Smørgrav iter_dec_attempts(iq->dp, 3); 3099ff825849SDag-Erling Smørgrav verbose(VERB_DETAIL, "Capsforid: timeouts, starting fallback"); 3100ff825849SDag-Erling Smørgrav goto handle_it; 3101ff825849SDag-Erling Smørgrav } 3102b7579f77SDag-Erling Smørgrav goto handle_it; 3103b7579f77SDag-Erling Smørgrav } 3104b7579f77SDag-Erling Smørgrav if( (event != module_event_reply && event != module_event_capsfail) 3105b7579f77SDag-Erling Smørgrav || !qstate->reply) { 3106b7579f77SDag-Erling Smørgrav log_err("Bad event combined with response"); 3107b7579f77SDag-Erling Smørgrav outbound_list_remove(&iq->outlist, outbound); 3108b7579f77SDag-Erling Smørgrav (void)error_response(qstate, id, LDNS_RCODE_SERVFAIL); 3109b7579f77SDag-Erling Smørgrav return; 3110b7579f77SDag-Erling Smørgrav } 3111b7579f77SDag-Erling Smørgrav 3112b7579f77SDag-Erling Smørgrav /* parse message */ 3113b7579f77SDag-Erling Smørgrav prs = (struct msg_parse*)regional_alloc(qstate->env->scratch, 3114b7579f77SDag-Erling Smørgrav sizeof(struct msg_parse)); 3115b7579f77SDag-Erling Smørgrav if(!prs) { 3116b7579f77SDag-Erling Smørgrav log_err("out of memory on incoming message"); 3117b7579f77SDag-Erling Smørgrav /* like packet got dropped */ 3118b7579f77SDag-Erling Smørgrav goto handle_it; 3119b7579f77SDag-Erling Smørgrav } 3120b7579f77SDag-Erling Smørgrav memset(prs, 0, sizeof(*prs)); 3121b7579f77SDag-Erling Smørgrav memset(&edns, 0, sizeof(edns)); 3122b7579f77SDag-Erling Smørgrav pkt = qstate->reply->c->buffer; 312317d15b25SDag-Erling Smørgrav sldns_buffer_set_position(pkt, 0); 3124b7579f77SDag-Erling Smørgrav if(parse_packet(pkt, prs, qstate->env->scratch) != LDNS_RCODE_NOERROR) { 3125b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "parse error on reply packet"); 3126b7579f77SDag-Erling Smørgrav goto handle_it; 3127b7579f77SDag-Erling Smørgrav } 3128b7579f77SDag-Erling Smørgrav /* edns is not examined, but removed from message to help cache */ 3129*e2d15004SDag-Erling Smørgrav if(parse_extract_edns(prs, &edns, qstate->env->scratch) != 3130*e2d15004SDag-Erling Smørgrav LDNS_RCODE_NOERROR) 3131b7579f77SDag-Erling Smørgrav goto handle_it; 3132b7579f77SDag-Erling Smørgrav /* remove CD-bit, we asked for in case we handle validation ourself */ 3133b7579f77SDag-Erling Smørgrav prs->flags &= ~BIT_CD; 3134b7579f77SDag-Erling Smørgrav 3135b7579f77SDag-Erling Smørgrav /* normalize and sanitize: easy to delete items from linked lists */ 313605ab2901SDag-Erling Smørgrav if(!scrub_message(pkt, prs, &iq->qinfo_out, iq->dp->name, 313709a3aaf3SDag-Erling Smørgrav qstate->env->scratch, qstate->env, ie)) { 313809a3aaf3SDag-Erling Smørgrav /* if 0x20 enabled, start fallback, but we have no message */ 313909a3aaf3SDag-Erling Smørgrav if(event == module_event_capsfail && !iq->caps_fallback) { 314009a3aaf3SDag-Erling Smørgrav iq->caps_fallback = 1; 314109a3aaf3SDag-Erling Smørgrav iq->caps_server = 0; 314209a3aaf3SDag-Erling Smørgrav iq->caps_reply = NULL; 314309a3aaf3SDag-Erling Smørgrav iq->caps_response = NULL; 314409a3aaf3SDag-Erling Smørgrav iq->state = QUERYTARGETS_STATE; 314509a3aaf3SDag-Erling Smørgrav iq->num_current_queries--; 314609a3aaf3SDag-Erling Smørgrav verbose(VERB_DETAIL, "Capsforid: scrub failed, starting fallback with no response"); 314709a3aaf3SDag-Erling Smørgrav } 3148b7579f77SDag-Erling Smørgrav goto handle_it; 314909a3aaf3SDag-Erling Smørgrav } 3150b7579f77SDag-Erling Smørgrav 3151b7579f77SDag-Erling Smørgrav /* allocate response dns_msg in region */ 3152b7579f77SDag-Erling Smørgrav iq->response = dns_alloc_msg(pkt, prs, qstate->region); 3153b7579f77SDag-Erling Smørgrav if(!iq->response) 3154b7579f77SDag-Erling Smørgrav goto handle_it; 3155b7579f77SDag-Erling Smørgrav log_query_info(VERB_DETAIL, "response for", &qstate->qinfo); 3156b7579f77SDag-Erling Smørgrav log_name_addr(VERB_DETAIL, "reply from", iq->dp->name, 3157b7579f77SDag-Erling Smørgrav &qstate->reply->addr, qstate->reply->addrlen); 3158b7579f77SDag-Erling Smørgrav if(verbosity >= VERB_ALGO) 3159b7579f77SDag-Erling Smørgrav log_dns_msg("incoming scrubbed packet:", &iq->response->qinfo, 3160b7579f77SDag-Erling Smørgrav iq->response->rep); 3161b7579f77SDag-Erling Smørgrav 3162ff825849SDag-Erling Smørgrav if(event == module_event_capsfail || iq->caps_fallback) { 31636480faa8SDag-Erling Smørgrav /* for fallback we care about main answer, not additionals */ 31646480faa8SDag-Erling Smørgrav /* removing that makes comparison more likely to succeed */ 31656480faa8SDag-Erling Smørgrav caps_strip_reply(iq->response->rep); 3166b7579f77SDag-Erling Smørgrav if(!iq->caps_fallback) { 3167b7579f77SDag-Erling Smørgrav /* start fallback */ 3168b7579f77SDag-Erling Smørgrav iq->caps_fallback = 1; 3169b7579f77SDag-Erling Smørgrav iq->caps_server = 0; 3170b7579f77SDag-Erling Smørgrav iq->caps_reply = iq->response->rep; 317109a3aaf3SDag-Erling Smørgrav iq->caps_response = iq->response; 3172b7579f77SDag-Erling Smørgrav iq->state = QUERYTARGETS_STATE; 3173b7579f77SDag-Erling Smørgrav iq->num_current_queries--; 3174b7579f77SDag-Erling Smørgrav verbose(VERB_DETAIL, "Capsforid: starting fallback"); 3175b7579f77SDag-Erling Smørgrav goto handle_it; 3176b7579f77SDag-Erling Smørgrav } else { 3177b7579f77SDag-Erling Smørgrav /* check if reply is the same, otherwise, fail */ 3178ff825849SDag-Erling Smørgrav if(!iq->caps_reply) { 3179ff825849SDag-Erling Smørgrav iq->caps_reply = iq->response->rep; 318009a3aaf3SDag-Erling Smørgrav iq->caps_response = iq->response; 3181ff825849SDag-Erling Smørgrav iq->caps_server = -1; /*become zero at ++, 3182ff825849SDag-Erling Smørgrav so that we start the full set of trials */ 318309a3aaf3SDag-Erling Smørgrav } else if(caps_failed_rcode(iq->caps_reply) && 318409a3aaf3SDag-Erling Smørgrav !caps_failed_rcode(iq->response->rep)) { 318509a3aaf3SDag-Erling Smørgrav /* prefer to upgrade to non-SERVFAIL */ 318609a3aaf3SDag-Erling Smørgrav iq->caps_reply = iq->response->rep; 318709a3aaf3SDag-Erling Smørgrav iq->caps_response = iq->response; 318809a3aaf3SDag-Erling Smørgrav } else if(!caps_failed_rcode(iq->caps_reply) && 318909a3aaf3SDag-Erling Smørgrav caps_failed_rcode(iq->response->rep)) { 319009a3aaf3SDag-Erling Smørgrav /* if we have non-SERVFAIL as answer then 319109a3aaf3SDag-Erling Smørgrav * we can ignore SERVFAILs for the equality 319209a3aaf3SDag-Erling Smørgrav * comparison */ 319309a3aaf3SDag-Erling Smørgrav /* no instructions here, skip other else */ 319409a3aaf3SDag-Erling Smørgrav } else if(caps_failed_rcode(iq->caps_reply) && 319509a3aaf3SDag-Erling Smørgrav caps_failed_rcode(iq->response->rep)) { 319609a3aaf3SDag-Erling Smørgrav /* failure is same as other failure in fallbk*/ 319709a3aaf3SDag-Erling Smørgrav /* no instructions here, skip other else */ 3198ff825849SDag-Erling Smørgrav } else if(!reply_equal(iq->response->rep, iq->caps_reply, 319917d15b25SDag-Erling Smørgrav qstate->env->scratch)) { 3200b7579f77SDag-Erling Smørgrav verbose(VERB_DETAIL, "Capsforid fallback: " 3201b7579f77SDag-Erling Smørgrav "getting different replies, failed"); 3202b7579f77SDag-Erling Smørgrav outbound_list_remove(&iq->outlist, outbound); 3203b7579f77SDag-Erling Smørgrav (void)error_response(qstate, id, 3204b7579f77SDag-Erling Smørgrav LDNS_RCODE_SERVFAIL); 3205b7579f77SDag-Erling Smørgrav return; 3206b7579f77SDag-Erling Smørgrav } 3207b7579f77SDag-Erling Smørgrav /* continue the fallback procedure at next server */ 3208b7579f77SDag-Erling Smørgrav iq->caps_server++; 3209b7579f77SDag-Erling Smørgrav iq->state = QUERYTARGETS_STATE; 3210b7579f77SDag-Erling Smørgrav iq->num_current_queries--; 3211b7579f77SDag-Erling Smørgrav verbose(VERB_DETAIL, "Capsforid: reply is equal. " 3212b7579f77SDag-Erling Smørgrav "go to next fallback"); 3213b7579f77SDag-Erling Smørgrav goto handle_it; 3214b7579f77SDag-Erling Smørgrav } 3215b7579f77SDag-Erling Smørgrav } 3216b7579f77SDag-Erling Smørgrav iq->caps_fallback = 0; /* if we were in fallback, 0x20 is OK now */ 3217b7579f77SDag-Erling Smørgrav 3218b7579f77SDag-Erling Smørgrav handle_it: 3219b7579f77SDag-Erling Smørgrav outbound_list_remove(&iq->outlist, outbound); 3220b7579f77SDag-Erling Smørgrav iter_handle(qstate, iq, ie, id); 3221b7579f77SDag-Erling Smørgrav } 3222b7579f77SDag-Erling Smørgrav 3223b7579f77SDag-Erling Smørgrav void 3224b7579f77SDag-Erling Smørgrav iter_operate(struct module_qstate* qstate, enum module_ev event, int id, 3225b7579f77SDag-Erling Smørgrav struct outbound_entry* outbound) 3226b7579f77SDag-Erling Smørgrav { 3227b7579f77SDag-Erling Smørgrav struct iter_env* ie = (struct iter_env*)qstate->env->modinfo[id]; 3228b7579f77SDag-Erling Smørgrav struct iter_qstate* iq = (struct iter_qstate*)qstate->minfo[id]; 3229b7579f77SDag-Erling Smørgrav verbose(VERB_QUERY, "iterator[module %d] operate: extstate:%s event:%s", 3230b7579f77SDag-Erling Smørgrav id, strextstate(qstate->ext_state[id]), strmodulevent(event)); 3231b7579f77SDag-Erling Smørgrav if(iq) log_query_info(VERB_QUERY, "iterator operate: query", 3232b7579f77SDag-Erling Smørgrav &qstate->qinfo); 3233b7579f77SDag-Erling Smørgrav if(iq && qstate->qinfo.qname != iq->qchase.qname) 3234b7579f77SDag-Erling Smørgrav log_query_info(VERB_QUERY, "iterator operate: chased to", 3235b7579f77SDag-Erling Smørgrav &iq->qchase); 3236b7579f77SDag-Erling Smørgrav 3237b7579f77SDag-Erling Smørgrav /* perform iterator state machine */ 3238b7579f77SDag-Erling Smørgrav if((event == module_event_new || event == module_event_pass) && 3239b7579f77SDag-Erling Smørgrav iq == NULL) { 3240b7579f77SDag-Erling Smørgrav if(!iter_new(qstate, id)) { 3241b7579f77SDag-Erling Smørgrav (void)error_response(qstate, id, LDNS_RCODE_SERVFAIL); 3242b7579f77SDag-Erling Smørgrav return; 3243b7579f77SDag-Erling Smørgrav } 3244b7579f77SDag-Erling Smørgrav iq = (struct iter_qstate*)qstate->minfo[id]; 3245b7579f77SDag-Erling Smørgrav process_request(qstate, iq, ie, id); 3246b7579f77SDag-Erling Smørgrav return; 3247b7579f77SDag-Erling Smørgrav } 3248b7579f77SDag-Erling Smørgrav if(iq && event == module_event_pass) { 3249b7579f77SDag-Erling Smørgrav iter_handle(qstate, iq, ie, id); 3250b7579f77SDag-Erling Smørgrav return; 3251b7579f77SDag-Erling Smørgrav } 3252b7579f77SDag-Erling Smørgrav if(iq && outbound) { 3253b7579f77SDag-Erling Smørgrav process_response(qstate, iq, ie, id, outbound, event); 3254b7579f77SDag-Erling Smørgrav return; 3255b7579f77SDag-Erling Smørgrav } 3256b7579f77SDag-Erling Smørgrav if(event == module_event_error) { 3257b7579f77SDag-Erling Smørgrav verbose(VERB_ALGO, "got called with event error, giving up"); 3258b7579f77SDag-Erling Smørgrav (void)error_response(qstate, id, LDNS_RCODE_SERVFAIL); 3259b7579f77SDag-Erling Smørgrav return; 3260b7579f77SDag-Erling Smørgrav } 3261b7579f77SDag-Erling Smørgrav 3262b7579f77SDag-Erling Smørgrav log_err("bad event for iterator"); 3263b7579f77SDag-Erling Smørgrav (void)error_response(qstate, id, LDNS_RCODE_SERVFAIL); 3264b7579f77SDag-Erling Smørgrav } 3265b7579f77SDag-Erling Smørgrav 3266b7579f77SDag-Erling Smørgrav void 3267b7579f77SDag-Erling Smørgrav iter_clear(struct module_qstate* qstate, int id) 3268b7579f77SDag-Erling Smørgrav { 3269b7579f77SDag-Erling Smørgrav struct iter_qstate* iq; 3270b7579f77SDag-Erling Smørgrav if(!qstate) 3271b7579f77SDag-Erling Smørgrav return; 3272b7579f77SDag-Erling Smørgrav iq = (struct iter_qstate*)qstate->minfo[id]; 3273b7579f77SDag-Erling Smørgrav if(iq) { 3274b7579f77SDag-Erling Smørgrav outbound_list_clear(&iq->outlist); 327552df462fSXin LI if(iq->target_count && --iq->target_count[0] == 0) 327652df462fSXin LI free(iq->target_count); 3277b7579f77SDag-Erling Smørgrav iq->num_current_queries = 0; 3278b7579f77SDag-Erling Smørgrav } 3279b7579f77SDag-Erling Smørgrav qstate->minfo[id] = NULL; 3280b7579f77SDag-Erling Smørgrav } 3281b7579f77SDag-Erling Smørgrav 3282b7579f77SDag-Erling Smørgrav size_t 3283b7579f77SDag-Erling Smørgrav iter_get_mem(struct module_env* env, int id) 3284b7579f77SDag-Erling Smørgrav { 3285b7579f77SDag-Erling Smørgrav struct iter_env* ie = (struct iter_env*)env->modinfo[id]; 3286b7579f77SDag-Erling Smørgrav if(!ie) 3287b7579f77SDag-Erling Smørgrav return 0; 3288b7579f77SDag-Erling Smørgrav return sizeof(*ie) + sizeof(int)*((size_t)ie->max_dependency_depth+1) 3289b7579f77SDag-Erling Smørgrav + donotq_get_mem(ie->donotq) + priv_get_mem(ie->priv); 3290b7579f77SDag-Erling Smørgrav } 3291b7579f77SDag-Erling Smørgrav 3292b7579f77SDag-Erling Smørgrav /** 3293b7579f77SDag-Erling Smørgrav * The iterator function block 3294b7579f77SDag-Erling Smørgrav */ 3295b7579f77SDag-Erling Smørgrav static struct module_func_block iter_block = { 3296b7579f77SDag-Erling Smørgrav "iterator", 3297b7579f77SDag-Erling Smørgrav &iter_init, &iter_deinit, &iter_operate, &iter_inform_super, 3298b7579f77SDag-Erling Smørgrav &iter_clear, &iter_get_mem 3299b7579f77SDag-Erling Smørgrav }; 3300b7579f77SDag-Erling Smørgrav 3301b7579f77SDag-Erling Smørgrav struct module_func_block* 3302b7579f77SDag-Erling Smørgrav iter_get_funcblock(void) 3303b7579f77SDag-Erling Smørgrav { 3304b7579f77SDag-Erling Smørgrav return &iter_block; 3305b7579f77SDag-Erling Smørgrav } 3306b7579f77SDag-Erling Smørgrav 3307b7579f77SDag-Erling Smørgrav const char* 3308b7579f77SDag-Erling Smørgrav iter_state_to_string(enum iter_state state) 3309b7579f77SDag-Erling Smørgrav { 3310b7579f77SDag-Erling Smørgrav switch (state) 3311b7579f77SDag-Erling Smørgrav { 3312b7579f77SDag-Erling Smørgrav case INIT_REQUEST_STATE : 3313b7579f77SDag-Erling Smørgrav return "INIT REQUEST STATE"; 3314b7579f77SDag-Erling Smørgrav case INIT_REQUEST_2_STATE : 3315b7579f77SDag-Erling Smørgrav return "INIT REQUEST STATE (stage 2)"; 3316b7579f77SDag-Erling Smørgrav case INIT_REQUEST_3_STATE: 3317b7579f77SDag-Erling Smørgrav return "INIT REQUEST STATE (stage 3)"; 3318b7579f77SDag-Erling Smørgrav case QUERYTARGETS_STATE : 3319b7579f77SDag-Erling Smørgrav return "QUERY TARGETS STATE"; 3320b7579f77SDag-Erling Smørgrav case PRIME_RESP_STATE : 3321b7579f77SDag-Erling Smørgrav return "PRIME RESPONSE STATE"; 3322b7579f77SDag-Erling Smørgrav case COLLECT_CLASS_STATE : 3323b7579f77SDag-Erling Smørgrav return "COLLECT CLASS STATE"; 3324b7579f77SDag-Erling Smørgrav case DSNS_FIND_STATE : 3325b7579f77SDag-Erling Smørgrav return "DSNS FIND STATE"; 3326b7579f77SDag-Erling Smørgrav case QUERY_RESP_STATE : 3327b7579f77SDag-Erling Smørgrav return "QUERY RESPONSE STATE"; 3328b7579f77SDag-Erling Smørgrav case FINISHED_STATE : 3329b7579f77SDag-Erling Smørgrav return "FINISHED RESPONSE STATE"; 3330b7579f77SDag-Erling Smørgrav default : 3331b7579f77SDag-Erling Smørgrav return "UNKNOWN ITER STATE"; 3332b7579f77SDag-Erling Smørgrav } 3333b7579f77SDag-Erling Smørgrav } 3334b7579f77SDag-Erling Smørgrav 3335b7579f77SDag-Erling Smørgrav int 3336b7579f77SDag-Erling Smørgrav iter_state_is_responsestate(enum iter_state s) 3337b7579f77SDag-Erling Smørgrav { 3338b7579f77SDag-Erling Smørgrav switch(s) { 3339b7579f77SDag-Erling Smørgrav case INIT_REQUEST_STATE : 3340b7579f77SDag-Erling Smørgrav case INIT_REQUEST_2_STATE : 3341b7579f77SDag-Erling Smørgrav case INIT_REQUEST_3_STATE : 3342b7579f77SDag-Erling Smørgrav case QUERYTARGETS_STATE : 3343b7579f77SDag-Erling Smørgrav case COLLECT_CLASS_STATE : 3344b7579f77SDag-Erling Smørgrav return 0; 3345b7579f77SDag-Erling Smørgrav default: 3346b7579f77SDag-Erling Smørgrav break; 3347b7579f77SDag-Erling Smørgrav } 3348b7579f77SDag-Erling Smørgrav return 1; 3349b7579f77SDag-Erling Smørgrav } 3350