Home | History | Annotate | Line # | Download | only in dns
ncache.c revision 1.1.1.2
      1      1.1  christos /*	$NetBSD: ncache.c,v 1.1.1.2 2019/01/09 16:48:21 christos Exp $	*/
      2      1.1  christos 
      3      1.1  christos /*
      4      1.1  christos  * Copyright (C) Internet Systems Consortium, Inc. ("ISC")
      5      1.1  christos  *
      6      1.1  christos  * This Source Code Form is subject to the terms of the Mozilla Public
      7      1.1  christos  * License, v. 2.0. If a copy of the MPL was not distributed with this
      8      1.1  christos  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
      9      1.1  christos  *
     10      1.1  christos  * See the COPYRIGHT file distributed with this work for additional
     11      1.1  christos  * information regarding copyright ownership.
     12      1.1  christos  */
     13      1.1  christos 
     14      1.1  christos 
     15      1.1  christos /*! \file */
     16      1.1  christos 
     17      1.1  christos #include <config.h>
     18      1.1  christos 
     19  1.1.1.2  christos #include <inttypes.h>
     20  1.1.1.2  christos #include <stdbool.h>
     21  1.1.1.2  christos 
     22      1.1  christos #include <isc/buffer.h>
     23      1.1  christos #include <isc/util.h>
     24      1.1  christos 
     25      1.1  christos #include <dns/db.h>
     26      1.1  christos #include <dns/message.h>
     27      1.1  christos #include <dns/ncache.h>
     28      1.1  christos #include <dns/rdata.h>
     29      1.1  christos #include <dns/rdatalist.h>
     30      1.1  christos #include <dns/rdataset.h>
     31      1.1  christos #include <dns/rdatastruct.h>
     32      1.1  christos 
     33      1.1  christos #define DNS_NCACHE_RDATA 20U
     34      1.1  christos 
     35      1.1  christos /*
     36      1.1  christos  * The format of an ncache rdata is a sequence of zero or more records of
     37      1.1  christos  * the following format:
     38      1.1  christos  *
     39      1.1  christos  *	owner name
     40      1.1  christos  *	type
     41      1.1  christos  *	trust
     42      1.1  christos  *	rdata count
     43      1.1  christos  *		rdata length			These two occur 'rdata count'
     44      1.1  christos  *		rdata				times.
     45      1.1  christos  *
     46      1.1  christos  */
     47      1.1  christos 
     48      1.1  christos static isc_result_t
     49      1.1  christos addoptout(dns_message_t *message, dns_db_t *cache, dns_dbnode_t *node,
     50  1.1.1.2  christos 	  dns_rdatatype_t covers, isc_stdtime_t now,
     51  1.1.1.2  christos 	  dns_ttl_t minttl, dns_ttl_t maxttl,
     52  1.1.1.2  christos 	  bool optout, bool secure,
     53      1.1  christos 	  dns_rdataset_t *addedrdataset);
     54      1.1  christos 
     55      1.1  christos static inline isc_result_t
     56      1.1  christos copy_rdataset(dns_rdataset_t *rdataset, isc_buffer_t *buffer) {
     57      1.1  christos 	isc_result_t result;
     58      1.1  christos 	unsigned int count;
     59      1.1  christos 	isc_region_t ar, r;
     60      1.1  christos 	dns_rdata_t rdata = DNS_RDATA_INIT;
     61      1.1  christos 
     62      1.1  christos 	/*
     63      1.1  christos 	 * Copy the rdataset count to the buffer.
     64      1.1  christos 	 */
     65      1.1  christos 	isc_buffer_availableregion(buffer, &ar);
     66      1.1  christos 	if (ar.length < 2)
     67      1.1  christos 		return (ISC_R_NOSPACE);
     68      1.1  christos 	count = dns_rdataset_count(rdataset);
     69      1.1  christos 	INSIST(count <= 65535);
     70  1.1.1.2  christos 	isc_buffer_putuint16(buffer, (uint16_t)count);
     71      1.1  christos 
     72      1.1  christos 	result = dns_rdataset_first(rdataset);
     73      1.1  christos 	while (result == ISC_R_SUCCESS) {
     74      1.1  christos 		dns_rdataset_current(rdataset, &rdata);
     75      1.1  christos 		dns_rdata_toregion(&rdata, &r);
     76      1.1  christos 		INSIST(r.length <= 65535);
     77      1.1  christos 		isc_buffer_availableregion(buffer, &ar);
     78      1.1  christos 		if (ar.length < 2)
     79      1.1  christos 			return (ISC_R_NOSPACE);
     80      1.1  christos 		/*
     81      1.1  christos 		 * Copy the rdata length to the buffer.
     82      1.1  christos 		 */
     83  1.1.1.2  christos 		isc_buffer_putuint16(buffer, (uint16_t)r.length);
     84      1.1  christos 		/*
     85      1.1  christos 		 * Copy the rdata to the buffer.
     86      1.1  christos 		 */
     87      1.1  christos 		result = isc_buffer_copyregion(buffer, &r);
     88      1.1  christos 		if (result != ISC_R_SUCCESS)
     89      1.1  christos 			return (result);
     90      1.1  christos 		dns_rdata_reset(&rdata);
     91      1.1  christos 		result = dns_rdataset_next(rdataset);
     92      1.1  christos 	}
     93      1.1  christos 	if (result != ISC_R_NOMORE)
     94      1.1  christos 		return (result);
     95      1.1  christos 
     96      1.1  christos 	return (ISC_R_SUCCESS);
     97      1.1  christos }
     98      1.1  christos 
     99      1.1  christos isc_result_t
    100      1.1  christos dns_ncache_add(dns_message_t *message, dns_db_t *cache, dns_dbnode_t *node,
    101  1.1.1.2  christos 	       dns_rdatatype_t covers, isc_stdtime_t now,
    102  1.1.1.2  christos 	       dns_ttl_t minttl, dns_ttl_t maxttl,
    103      1.1  christos 	       dns_rdataset_t *addedrdataset)
    104      1.1  christos {
    105  1.1.1.2  christos 	return (addoptout(message, cache, node, covers, now, minttl, maxttl,
    106  1.1.1.2  christos 			  false, false, addedrdataset));
    107      1.1  christos }
    108      1.1  christos 
    109      1.1  christos isc_result_t
    110      1.1  christos dns_ncache_addoptout(dns_message_t *message, dns_db_t *cache,
    111      1.1  christos 		     dns_dbnode_t *node, dns_rdatatype_t covers,
    112  1.1.1.2  christos 		     isc_stdtime_t now,
    113  1.1.1.2  christos 		     dns_ttl_t minttl, dns_ttl_t maxttl,
    114  1.1.1.2  christos 		     bool optout, dns_rdataset_t *addedrdataset)
    115      1.1  christos {
    116  1.1.1.2  christos 	return (addoptout(message, cache, node, covers, now, minttl, maxttl,
    117  1.1.1.2  christos 			  optout, true, addedrdataset));
    118      1.1  christos }
    119      1.1  christos 
    120      1.1  christos static isc_result_t
    121      1.1  christos addoptout(dns_message_t *message, dns_db_t *cache, dns_dbnode_t *node,
    122  1.1.1.2  christos 	  dns_rdatatype_t covers, isc_stdtime_t now,
    123  1.1.1.2  christos 	  dns_ttl_t minttl, dns_ttl_t maxttl,
    124  1.1.1.2  christos 	  bool optout, bool secure,
    125      1.1  christos 	  dns_rdataset_t *addedrdataset)
    126      1.1  christos {
    127      1.1  christos 	isc_result_t result;
    128      1.1  christos 	isc_buffer_t buffer;
    129      1.1  christos 	isc_region_t r;
    130      1.1  christos 	dns_rdataset_t *rdataset;
    131      1.1  christos 	dns_rdatatype_t type;
    132      1.1  christos 	dns_name_t *name;
    133      1.1  christos 	dns_ttl_t ttl;
    134      1.1  christos 	dns_trust_t trust;
    135      1.1  christos 	dns_rdata_t rdata[DNS_NCACHE_RDATA];
    136      1.1  christos 	dns_rdataset_t ncrdataset;
    137      1.1  christos 	dns_rdatalist_t ncrdatalist;
    138      1.1  christos 	unsigned char data[4096];
    139      1.1  christos 	unsigned int next = 0;
    140      1.1  christos 
    141      1.1  christos 	/*
    142      1.1  christos 	 * Convert the authority data from 'message' into a negative cache
    143      1.1  christos 	 * rdataset, and store it in 'cache' at 'node'.
    144      1.1  christos 	 */
    145      1.1  christos 
    146      1.1  christos 	REQUIRE(message != NULL);
    147      1.1  christos 
    148      1.1  christos 	/*
    149      1.1  christos 	 * We assume that all data in the authority section has been
    150      1.1  christos 	 * validated by the caller.
    151      1.1  christos 	 */
    152      1.1  christos 
    153      1.1  christos 	/*
    154      1.1  christos 	 * Initialize the list.
    155      1.1  christos 	 */
    156      1.1  christos 	dns_rdatalist_init(&ncrdatalist);
    157      1.1  christos 	ncrdatalist.rdclass = dns_db_class(cache);
    158      1.1  christos 	ncrdatalist.covers = covers;
    159      1.1  christos 	ncrdatalist.ttl = maxttl;
    160      1.1  christos 
    161      1.1  christos 	/*
    162      1.1  christos 	 * Build an ncache rdatas into buffer.
    163      1.1  christos 	 */
    164      1.1  christos 	ttl = maxttl;
    165      1.1  christos 	trust = 0xffff;
    166      1.1  christos 	isc_buffer_init(&buffer, data, sizeof(data));
    167      1.1  christos 	if (message->counts[DNS_SECTION_AUTHORITY])
    168      1.1  christos 		result = dns_message_firstname(message, DNS_SECTION_AUTHORITY);
    169      1.1  christos 	else
    170      1.1  christos 		result = ISC_R_NOMORE;
    171      1.1  christos 	while (result == ISC_R_SUCCESS) {
    172      1.1  christos 		name = NULL;
    173      1.1  christos 		dns_message_currentname(message, DNS_SECTION_AUTHORITY,
    174      1.1  christos 					&name);
    175      1.1  christos 		if ((name->attributes & DNS_NAMEATTR_NCACHE) != 0) {
    176      1.1  christos 			for (rdataset = ISC_LIST_HEAD(name->list);
    177      1.1  christos 			     rdataset != NULL;
    178      1.1  christos 			     rdataset = ISC_LIST_NEXT(rdataset, link)) {
    179      1.1  christos 				if ((rdataset->attributes &
    180      1.1  christos 				     DNS_RDATASETATTR_NCACHE) == 0)
    181      1.1  christos 					continue;
    182      1.1  christos 				type = rdataset->type;
    183      1.1  christos 				if (type == dns_rdatatype_rrsig)
    184      1.1  christos 					type = rdataset->covers;
    185      1.1  christos 				if (type == dns_rdatatype_soa ||
    186      1.1  christos 				    type == dns_rdatatype_nsec ||
    187      1.1  christos 				    type == dns_rdatatype_nsec3) {
    188  1.1.1.2  christos 					if (ttl > rdataset->ttl) {
    189      1.1  christos 						ttl = rdataset->ttl;
    190  1.1.1.2  christos 					}
    191  1.1.1.2  christos 					if (ttl < minttl) {
    192  1.1.1.2  christos 						ttl = minttl;
    193  1.1.1.2  christos 					}
    194  1.1.1.2  christos 					if (trust > rdataset->trust) {
    195      1.1  christos 						trust = rdataset->trust;
    196  1.1.1.2  christos 					}
    197      1.1  christos 					/*
    198      1.1  christos 					 * Copy the owner name to the buffer.
    199      1.1  christos 					 */
    200      1.1  christos 					dns_name_toregion(name, &r);
    201      1.1  christos 					result = isc_buffer_copyregion(&buffer,
    202      1.1  christos 								       &r);
    203      1.1  christos 					if (result != ISC_R_SUCCESS)
    204      1.1  christos 						return (result);
    205      1.1  christos 					/*
    206      1.1  christos 					 * Copy the type to the buffer.
    207      1.1  christos 					 */
    208      1.1  christos 					isc_buffer_availableregion(&buffer,
    209      1.1  christos 								   &r);
    210      1.1  christos 					if (r.length < 3)
    211      1.1  christos 						return (ISC_R_NOSPACE);
    212      1.1  christos 					isc_buffer_putuint16(&buffer,
    213      1.1  christos 							     rdataset->type);
    214      1.1  christos 					isc_buffer_putuint8(&buffer,
    215      1.1  christos 					       (unsigned char)rdataset->trust);
    216      1.1  christos 					/*
    217      1.1  christos 					 * Copy the rdataset into the buffer.
    218      1.1  christos 					 */
    219      1.1  christos 					result = copy_rdataset(rdataset,
    220      1.1  christos 							       &buffer);
    221      1.1  christos 					if (result != ISC_R_SUCCESS)
    222      1.1  christos 						return (result);
    223      1.1  christos 
    224      1.1  christos 					if (next >= DNS_NCACHE_RDATA)
    225      1.1  christos 						return (ISC_R_NOSPACE);
    226      1.1  christos 					dns_rdata_init(&rdata[next]);
    227      1.1  christos 					isc_buffer_remainingregion(&buffer, &r);
    228      1.1  christos 					rdata[next].data = r.base;
    229      1.1  christos 					rdata[next].length = r.length;
    230      1.1  christos 					rdata[next].rdclass =
    231      1.1  christos 						ncrdatalist.rdclass;
    232      1.1  christos 					rdata[next].type = 0;
    233      1.1  christos 					rdata[next].flags = 0;
    234      1.1  christos 					ISC_LIST_APPEND(ncrdatalist.rdata,
    235      1.1  christos 							&rdata[next], link);
    236      1.1  christos 					isc_buffer_forward(&buffer, r.length);
    237      1.1  christos 					next++;
    238      1.1  christos 				}
    239      1.1  christos 			}
    240      1.1  christos 		}
    241      1.1  christos 		result = dns_message_nextname(message, DNS_SECTION_AUTHORITY);
    242      1.1  christos 	}
    243      1.1  christos 	if (result != ISC_R_NOMORE)
    244      1.1  christos 		return (result);
    245      1.1  christos 
    246      1.1  christos 	if (trust == 0xffff) {
    247      1.1  christos 		if ((message->flags & DNS_MESSAGEFLAG_AA) != 0 &&
    248      1.1  christos 		    message->counts[DNS_SECTION_ANSWER] == 0) {
    249      1.1  christos 			/*
    250      1.1  christos 			 * The response has aa set and we haven't followed
    251      1.1  christos 			 * any CNAME or DNAME chains.
    252      1.1  christos 			 */
    253      1.1  christos 			trust = dns_trust_authauthority;
    254      1.1  christos 		} else
    255      1.1  christos 			trust = dns_trust_additional;
    256      1.1  christos 		ttl = 0;
    257      1.1  christos 	}
    258      1.1  christos 
    259      1.1  christos 	INSIST(trust != 0xffff);
    260      1.1  christos 
    261      1.1  christos 	ncrdatalist.ttl = ttl;
    262      1.1  christos 
    263      1.1  christos 	dns_rdataset_init(&ncrdataset);
    264      1.1  christos 	RUNTIME_CHECK(dns_rdatalist_tordataset(&ncrdatalist, &ncrdataset)
    265      1.1  christos 		      == ISC_R_SUCCESS);
    266      1.1  christos 	if (!secure && trust > dns_trust_answer)
    267      1.1  christos 		trust = dns_trust_answer;
    268      1.1  christos 	ncrdataset.trust = trust;
    269      1.1  christos 	ncrdataset.attributes |= DNS_RDATASETATTR_NEGATIVE;
    270      1.1  christos 	if (message->rcode == dns_rcode_nxdomain)
    271      1.1  christos 		ncrdataset.attributes |= DNS_RDATASETATTR_NXDOMAIN;
    272      1.1  christos 	if (optout)
    273      1.1  christos 		ncrdataset.attributes |= DNS_RDATASETATTR_OPTOUT;
    274      1.1  christos 
    275      1.1  christos 	return (dns_db_addrdataset(cache, node, NULL, now, &ncrdataset,
    276      1.1  christos 				   0, addedrdataset));
    277      1.1  christos }
    278      1.1  christos 
    279      1.1  christos isc_result_t
    280      1.1  christos dns_ncache_towire(dns_rdataset_t *rdataset, dns_compress_t *cctx,
    281      1.1  christos 		  isc_buffer_t *target, unsigned int options,
    282      1.1  christos 		  unsigned int *countp)
    283      1.1  christos {
    284      1.1  christos 	dns_rdata_t rdata = DNS_RDATA_INIT;
    285      1.1  christos 	isc_result_t result;
    286      1.1  christos 	isc_region_t remaining, tavailable;
    287      1.1  christos 	isc_buffer_t source, savedbuffer, rdlen;
    288      1.1  christos 	dns_name_t name;
    289      1.1  christos 	dns_rdatatype_t type;
    290      1.1  christos 	unsigned int i, rcount, count;
    291      1.1  christos 
    292      1.1  christos 	/*
    293      1.1  christos 	 * Convert the negative caching rdataset 'rdataset' to wire format,
    294      1.1  christos 	 * compressing names as specified in 'cctx', and storing the result in
    295      1.1  christos 	 * 'target'.
    296      1.1  christos 	 */
    297      1.1  christos 
    298      1.1  christos 	REQUIRE(rdataset != NULL);
    299      1.1  christos 	REQUIRE(rdataset->type == 0);
    300      1.1  christos 	REQUIRE((rdataset->attributes & DNS_RDATASETATTR_NEGATIVE) != 0);
    301      1.1  christos 
    302      1.1  christos 	savedbuffer = *target;
    303      1.1  christos 	count = 0;
    304      1.1  christos 
    305      1.1  christos 	result = dns_rdataset_first(rdataset);
    306      1.1  christos 	while (result == ISC_R_SUCCESS) {
    307      1.1  christos 		dns_rdataset_current(rdataset, &rdata);
    308      1.1  christos 		isc_buffer_init(&source, rdata.data, rdata.length);
    309      1.1  christos 		isc_buffer_add(&source, rdata.length);
    310      1.1  christos 		dns_name_init(&name, NULL);
    311      1.1  christos 		isc_buffer_remainingregion(&source, &remaining);
    312      1.1  christos 		dns_name_fromregion(&name, &remaining);
    313      1.1  christos 		INSIST(remaining.length >= name.length);
    314      1.1  christos 		isc_buffer_forward(&source, name.length);
    315      1.1  christos 		remaining.length -= name.length;
    316      1.1  christos 
    317      1.1  christos 		INSIST(remaining.length >= 5);
    318      1.1  christos 		type = isc_buffer_getuint16(&source);
    319      1.1  christos 		isc_buffer_forward(&source, 1);
    320      1.1  christos 		rcount = isc_buffer_getuint16(&source);
    321      1.1  christos 
    322      1.1  christos 		for (i = 0; i < rcount; i++) {
    323      1.1  christos 			/*
    324      1.1  christos 			 * Get the length of this rdata and set up an
    325      1.1  christos 			 * rdata structure for it.
    326      1.1  christos 			 */
    327      1.1  christos 			isc_buffer_remainingregion(&source, &remaining);
    328      1.1  christos 			INSIST(remaining.length >= 2);
    329      1.1  christos 			dns_rdata_reset(&rdata);
    330      1.1  christos 			rdata.length = isc_buffer_getuint16(&source);
    331      1.1  christos 			isc_buffer_remainingregion(&source, &remaining);
    332      1.1  christos 			rdata.data = remaining.base;
    333      1.1  christos 			rdata.type = type;
    334      1.1  christos 			rdata.rdclass = rdataset->rdclass;
    335      1.1  christos 			INSIST(remaining.length >= rdata.length);
    336      1.1  christos 			isc_buffer_forward(&source, rdata.length);
    337      1.1  christos 
    338      1.1  christos 			if ((options & DNS_NCACHETOWIRE_OMITDNSSEC) != 0 &&
    339      1.1  christos 			    dns_rdatatype_isdnssec(type))
    340      1.1  christos 				continue;
    341      1.1  christos 
    342      1.1  christos 			/*
    343      1.1  christos 			 * Write the name.
    344      1.1  christos 			 */
    345      1.1  christos 			dns_compress_setmethods(cctx, DNS_COMPRESS_GLOBAL14);
    346      1.1  christos 			result = dns_name_towire(&name, cctx, target);
    347      1.1  christos 			if (result != ISC_R_SUCCESS)
    348      1.1  christos 				goto rollback;
    349      1.1  christos 
    350      1.1  christos 			/*
    351      1.1  christos 			 * See if we have space for type, class, ttl, and
    352      1.1  christos 			 * rdata length.  Write the type, class, and ttl.
    353      1.1  christos 			 */
    354      1.1  christos 			isc_buffer_availableregion(target, &tavailable);
    355      1.1  christos 			if (tavailable.length < 10) {
    356      1.1  christos 				result = ISC_R_NOSPACE;
    357      1.1  christos 				goto rollback;
    358      1.1  christos 			}
    359      1.1  christos 			isc_buffer_putuint16(target, type);
    360      1.1  christos 			isc_buffer_putuint16(target, rdataset->rdclass);
    361      1.1  christos 			isc_buffer_putuint32(target, rdataset->ttl);
    362      1.1  christos 
    363      1.1  christos 			/*
    364      1.1  christos 			 * Save space for rdata length.
    365      1.1  christos 			 */
    366      1.1  christos 			rdlen = *target;
    367      1.1  christos 			isc_buffer_add(target, 2);
    368      1.1  christos 
    369      1.1  christos 			/*
    370      1.1  christos 			 * Write the rdata.
    371      1.1  christos 			 */
    372      1.1  christos 			result = dns_rdata_towire(&rdata, cctx, target);
    373      1.1  christos 			if (result != ISC_R_SUCCESS)
    374      1.1  christos 				goto rollback;
    375      1.1  christos 
    376      1.1  christos 			/*
    377      1.1  christos 			 * Set the rdata length field to the compressed
    378      1.1  christos 			 * length.
    379      1.1  christos 			 */
    380      1.1  christos 			INSIST((target->used >= rdlen.used + 2) &&
    381      1.1  christos 			       (target->used - rdlen.used - 2 < 65536));
    382      1.1  christos 			isc_buffer_putuint16(&rdlen,
    383  1.1.1.2  christos 					     (uint16_t)(target->used -
    384      1.1  christos 							    rdlen.used - 2));
    385      1.1  christos 
    386      1.1  christos 			count++;
    387      1.1  christos 		}
    388      1.1  christos 		INSIST(isc_buffer_remaininglength(&source) == 0);
    389      1.1  christos 		result = dns_rdataset_next(rdataset);
    390      1.1  christos 		dns_rdata_reset(&rdata);
    391      1.1  christos 	}
    392      1.1  christos 	if (result != ISC_R_NOMORE)
    393      1.1  christos 		goto rollback;
    394      1.1  christos 
    395      1.1  christos 	*countp = count;
    396      1.1  christos 
    397      1.1  christos 	return (ISC_R_SUCCESS);
    398      1.1  christos 
    399      1.1  christos  rollback:
    400      1.1  christos 	INSIST(savedbuffer.used < 65536);
    401  1.1.1.2  christos 	dns_compress_rollback(cctx, (uint16_t)savedbuffer.used);
    402      1.1  christos 	*countp = 0;
    403      1.1  christos 	*target = savedbuffer;
    404      1.1  christos 
    405      1.1  christos 	return (result);
    406      1.1  christos }
    407      1.1  christos 
    408      1.1  christos static void
    409      1.1  christos rdataset_disassociate(dns_rdataset_t *rdataset) {
    410      1.1  christos 	UNUSED(rdataset);
    411      1.1  christos }
    412      1.1  christos 
    413      1.1  christos static isc_result_t
    414      1.1  christos rdataset_first(dns_rdataset_t *rdataset) {
    415      1.1  christos 	unsigned char *raw = rdataset->private3;
    416      1.1  christos 	unsigned int count;
    417      1.1  christos 
    418      1.1  christos 	count = raw[0] * 256 + raw[1];
    419      1.1  christos 	if (count == 0) {
    420      1.1  christos 		rdataset->private5 = NULL;
    421      1.1  christos 		return (ISC_R_NOMORE);
    422      1.1  christos 	}
    423      1.1  christos 	raw += 2;
    424      1.1  christos 	/*
    425      1.1  christos 	 * The privateuint4 field is the number of rdata beyond the cursor
    426      1.1  christos 	 * position, so we decrement the total count by one before storing
    427      1.1  christos 	 * it.
    428      1.1  christos 	 */
    429      1.1  christos 	count--;
    430      1.1  christos 	rdataset->privateuint4 = count;
    431      1.1  christos 	rdataset->private5 = raw;
    432      1.1  christos 
    433      1.1  christos 	return (ISC_R_SUCCESS);
    434      1.1  christos }
    435      1.1  christos 
    436      1.1  christos static isc_result_t
    437      1.1  christos rdataset_next(dns_rdataset_t *rdataset) {
    438      1.1  christos 	unsigned int count;
    439      1.1  christos 	unsigned int length;
    440      1.1  christos 	unsigned char *raw;
    441      1.1  christos 
    442      1.1  christos 	count = rdataset->privateuint4;
    443      1.1  christos 	if (count == 0)
    444      1.1  christos 		return (ISC_R_NOMORE);
    445      1.1  christos 	count--;
    446      1.1  christos 	rdataset->privateuint4 = count;
    447      1.1  christos 	raw = rdataset->private5;
    448      1.1  christos 	length = raw[0] * 256 + raw[1];
    449      1.1  christos 	raw += length + 2;
    450      1.1  christos 	rdataset->private5 = raw;
    451      1.1  christos 
    452      1.1  christos 	return (ISC_R_SUCCESS);
    453      1.1  christos }
    454      1.1  christos 
    455      1.1  christos static void
    456      1.1  christos rdataset_current(dns_rdataset_t *rdataset, dns_rdata_t *rdata) {
    457      1.1  christos 	unsigned char *raw = rdataset->private5;
    458      1.1  christos 	isc_region_t r;
    459      1.1  christos 
    460      1.1  christos 	REQUIRE(raw != NULL);
    461      1.1  christos 
    462      1.1  christos 	r.length = raw[0] * 256 + raw[1];
    463      1.1  christos 	raw += 2;
    464      1.1  christos 	r.base = raw;
    465      1.1  christos 	dns_rdata_fromregion(rdata, rdataset->rdclass, rdataset->type, &r);
    466      1.1  christos }
    467      1.1  christos 
    468      1.1  christos static void
    469      1.1  christos rdataset_clone(dns_rdataset_t *source, dns_rdataset_t *target) {
    470      1.1  christos 	*target = *source;
    471      1.1  christos 
    472      1.1  christos 	/*
    473      1.1  christos 	 * Reset iterator state.
    474      1.1  christos 	 */
    475      1.1  christos 	target->privateuint4 = 0;
    476      1.1  christos 	target->private5 = NULL;
    477      1.1  christos }
    478      1.1  christos 
    479      1.1  christos static unsigned int
    480      1.1  christos rdataset_count(dns_rdataset_t *rdataset) {
    481      1.1  christos 	unsigned char *raw = rdataset->private3;
    482      1.1  christos 	unsigned int count;
    483      1.1  christos 
    484      1.1  christos 	count = raw[0] * 256 + raw[1];
    485      1.1  christos 
    486      1.1  christos 	return (count);
    487      1.1  christos }
    488      1.1  christos 
    489      1.1  christos static void
    490      1.1  christos rdataset_settrust(dns_rdataset_t *rdataset, dns_trust_t trust) {
    491      1.1  christos 	unsigned char *raw = rdataset->private3;
    492      1.1  christos 
    493      1.1  christos 	raw[-1] = (unsigned char)trust;
    494      1.1  christos }
    495      1.1  christos 
    496      1.1  christos static dns_rdatasetmethods_t rdataset_methods = {
    497      1.1  christos 	rdataset_disassociate,
    498      1.1  christos 	rdataset_first,
    499      1.1  christos 	rdataset_next,
    500      1.1  christos 	rdataset_current,
    501      1.1  christos 	rdataset_clone,
    502      1.1  christos 	rdataset_count,
    503      1.1  christos 	NULL,			/* addnoqname */
    504      1.1  christos 	NULL,			/* getnoqname */
    505      1.1  christos 	NULL,			/* addclosest */
    506      1.1  christos 	NULL,			/* getclosest */
    507      1.1  christos 	rdataset_settrust,	/* settrust */
    508      1.1  christos 	NULL,			/* expire */
    509      1.1  christos 	NULL,			/* clearprefetch */
    510      1.1  christos 	NULL,			/* setownercase */
    511      1.1  christos 	NULL,			/* getownercase */
    512      1.1  christos 	NULL			/* addglue */
    513      1.1  christos };
    514      1.1  christos 
    515      1.1  christos isc_result_t
    516      1.1  christos dns_ncache_getrdataset(dns_rdataset_t *ncacherdataset, dns_name_t *name,
    517      1.1  christos 		       dns_rdatatype_t type, dns_rdataset_t *rdataset)
    518      1.1  christos {
    519      1.1  christos 	isc_result_t result;
    520      1.1  christos 	dns_rdata_t rdata = DNS_RDATA_INIT;
    521      1.1  christos 	isc_region_t remaining;
    522      1.1  christos 	isc_buffer_t source;
    523      1.1  christos 	dns_name_t tname;
    524      1.1  christos 	dns_rdatatype_t ttype;
    525      1.1  christos 	dns_trust_t trust = dns_trust_none;
    526      1.1  christos 	dns_rdataset_t rclone;
    527      1.1  christos 
    528      1.1  christos 	REQUIRE(ncacherdataset != NULL);
    529      1.1  christos 	REQUIRE(ncacherdataset->type == 0);
    530      1.1  christos 	REQUIRE((ncacherdataset->attributes & DNS_RDATASETATTR_NEGATIVE) != 0);
    531      1.1  christos 	REQUIRE(name != NULL);
    532      1.1  christos 	REQUIRE(!dns_rdataset_isassociated(rdataset));
    533      1.1  christos 	REQUIRE(type != dns_rdatatype_rrsig);
    534      1.1  christos 
    535      1.1  christos 	dns_rdataset_init(&rclone);
    536      1.1  christos 	dns_rdataset_clone(ncacherdataset, &rclone);
    537      1.1  christos 	result = dns_rdataset_first(&rclone);
    538      1.1  christos 	while (result == ISC_R_SUCCESS) {
    539      1.1  christos 		dns_rdataset_current(&rclone, &rdata);
    540      1.1  christos 		isc_buffer_init(&source, rdata.data, rdata.length);
    541      1.1  christos 		isc_buffer_add(&source, rdata.length);
    542      1.1  christos 		dns_name_init(&tname, NULL);
    543      1.1  christos 		isc_buffer_remainingregion(&source, &remaining);
    544      1.1  christos 		dns_name_fromregion(&tname, &remaining);
    545      1.1  christos 		INSIST(remaining.length >= tname.length);
    546      1.1  christos 		isc_buffer_forward(&source, tname.length);
    547      1.1  christos 		remaining.length -= tname.length;
    548      1.1  christos 
    549      1.1  christos 		INSIST(remaining.length >= 3);
    550      1.1  christos 		ttype = isc_buffer_getuint16(&source);
    551      1.1  christos 
    552      1.1  christos 		if (ttype == type && dns_name_equal(&tname, name)) {
    553      1.1  christos 			trust = isc_buffer_getuint8(&source);
    554      1.1  christos 			INSIST(trust <= dns_trust_ultimate);
    555      1.1  christos 			isc_buffer_remainingregion(&source, &remaining);
    556      1.1  christos 			break;
    557      1.1  christos 		}
    558      1.1  christos 		result = dns_rdataset_next(&rclone);
    559      1.1  christos 		dns_rdata_reset(&rdata);
    560      1.1  christos 	}
    561      1.1  christos 	dns_rdataset_disassociate(&rclone);
    562      1.1  christos 	if (result == ISC_R_NOMORE)
    563      1.1  christos 		return (ISC_R_NOTFOUND);
    564      1.1  christos 	if (result != ISC_R_SUCCESS)
    565      1.1  christos 		return (result);
    566      1.1  christos 
    567      1.1  christos 	INSIST(remaining.length != 0);
    568      1.1  christos 
    569      1.1  christos 	rdataset->methods = &rdataset_methods;
    570      1.1  christos 	rdataset->rdclass = ncacherdataset->rdclass;
    571      1.1  christos 	rdataset->type = type;
    572      1.1  christos 	rdataset->covers = 0;
    573      1.1  christos 	rdataset->ttl = ncacherdataset->ttl;
    574      1.1  christos 	rdataset->trust = trust;
    575      1.1  christos 	rdataset->private1 = NULL;
    576      1.1  christos 	rdataset->private2 = NULL;
    577      1.1  christos 
    578      1.1  christos 	rdataset->private3 = remaining.base;
    579      1.1  christos 
    580      1.1  christos 	/*
    581      1.1  christos 	 * Reset iterator state.
    582      1.1  christos 	 */
    583      1.1  christos 	rdataset->privateuint4 = 0;
    584      1.1  christos 	rdataset->private5 = NULL;
    585      1.1  christos 	rdataset->private6 = NULL;
    586      1.1  christos 	return (ISC_R_SUCCESS);
    587      1.1  christos }
    588      1.1  christos 
    589      1.1  christos isc_result_t
    590      1.1  christos dns_ncache_getsigrdataset(dns_rdataset_t *ncacherdataset, dns_name_t *name,
    591      1.1  christos 			  dns_rdatatype_t covers, dns_rdataset_t *rdataset)
    592      1.1  christos {
    593      1.1  christos 	dns_name_t tname;
    594      1.1  christos 	dns_rdata_rrsig_t rrsig;
    595      1.1  christos 	dns_rdata_t rdata = DNS_RDATA_INIT;
    596      1.1  christos 	dns_rdataset_t rclone;
    597      1.1  christos 	dns_rdatatype_t type;
    598      1.1  christos 	dns_trust_t trust = dns_trust_none;
    599      1.1  christos 	isc_buffer_t source;
    600      1.1  christos 	isc_region_t remaining, sigregion;
    601      1.1  christos 	isc_result_t result;
    602      1.1  christos 	unsigned char *raw;
    603      1.1  christos 	unsigned int count;
    604      1.1  christos 
    605      1.1  christos 	REQUIRE(ncacherdataset != NULL);
    606      1.1  christos 	REQUIRE(ncacherdataset->type == 0);
    607      1.1  christos 	REQUIRE((ncacherdataset->attributes & DNS_RDATASETATTR_NEGATIVE) != 0);
    608      1.1  christos 	REQUIRE(name != NULL);
    609      1.1  christos 	REQUIRE(!dns_rdataset_isassociated(rdataset));
    610      1.1  christos 
    611      1.1  christos 	dns_rdataset_init(&rclone);
    612      1.1  christos 	dns_rdataset_clone(ncacherdataset, &rclone);
    613      1.1  christos 	result = dns_rdataset_first(&rclone);
    614      1.1  christos 	while (result == ISC_R_SUCCESS) {
    615      1.1  christos 		dns_rdataset_current(&rclone, &rdata);
    616      1.1  christos 		isc_buffer_init(&source, rdata.data, rdata.length);
    617      1.1  christos 		isc_buffer_add(&source, rdata.length);
    618      1.1  christos 		dns_name_init(&tname, NULL);
    619      1.1  christos 		isc_buffer_remainingregion(&source, &remaining);
    620      1.1  christos 		dns_name_fromregion(&tname, &remaining);
    621      1.1  christos 		INSIST(remaining.length >= tname.length);
    622      1.1  christos 		isc_buffer_forward(&source, tname.length);
    623      1.1  christos 		isc_region_consume(&remaining, tname.length);
    624      1.1  christos 
    625      1.1  christos 		INSIST(remaining.length >= 2);
    626      1.1  christos 		type = isc_buffer_getuint16(&source);
    627      1.1  christos 		isc_region_consume(&remaining, 2);
    628      1.1  christos 
    629      1.1  christos 		if (type != dns_rdatatype_rrsig ||
    630      1.1  christos 		    !dns_name_equal(&tname, name)) {
    631      1.1  christos 			result = dns_rdataset_next(&rclone);
    632      1.1  christos 			dns_rdata_reset(&rdata);
    633      1.1  christos 			continue;
    634      1.1  christos 		}
    635      1.1  christos 
    636      1.1  christos 		INSIST(remaining.length >= 1);
    637      1.1  christos 		trust = isc_buffer_getuint8(&source);
    638      1.1  christos 		INSIST(trust <= dns_trust_ultimate);
    639      1.1  christos 		isc_region_consume(&remaining, 1);
    640      1.1  christos 
    641      1.1  christos 		raw = remaining.base;
    642      1.1  christos 		count = raw[0] * 256 + raw[1];
    643      1.1  christos 		INSIST(count > 0);
    644      1.1  christos 		raw += 2;
    645      1.1  christos 		sigregion.length = raw[0] * 256 + raw[1];
    646      1.1  christos 		raw += 2;
    647      1.1  christos 		sigregion.base = raw;
    648      1.1  christos 		dns_rdata_reset(&rdata);
    649      1.1  christos 		dns_rdata_fromregion(&rdata, rdataset->rdclass,
    650      1.1  christos 				     dns_rdatatype_rrsig, &sigregion);
    651      1.1  christos 		(void)dns_rdata_tostruct(&rdata, &rrsig, NULL);
    652      1.1  christos 		if (rrsig.covered == covers) {
    653      1.1  christos 			isc_buffer_remainingregion(&source, &remaining);
    654      1.1  christos 			break;
    655      1.1  christos 		}
    656      1.1  christos 
    657      1.1  christos 		result = dns_rdataset_next(&rclone);
    658      1.1  christos 		dns_rdata_reset(&rdata);
    659      1.1  christos 	}
    660      1.1  christos 	dns_rdataset_disassociate(&rclone);
    661      1.1  christos 	if (result == ISC_R_NOMORE)
    662      1.1  christos 		return (ISC_R_NOTFOUND);
    663      1.1  christos 	if (result != ISC_R_SUCCESS)
    664      1.1  christos 		return (result);
    665      1.1  christos 
    666      1.1  christos 	INSIST(remaining.length != 0);
    667      1.1  christos 
    668      1.1  christos 	rdataset->methods = &rdataset_methods;
    669      1.1  christos 	rdataset->rdclass = ncacherdataset->rdclass;
    670      1.1  christos 	rdataset->type = dns_rdatatype_rrsig;
    671      1.1  christos 	rdataset->covers = covers;
    672      1.1  christos 	rdataset->ttl = ncacherdataset->ttl;
    673      1.1  christos 	rdataset->trust = trust;
    674      1.1  christos 	rdataset->private1 = NULL;
    675      1.1  christos 	rdataset->private2 = NULL;
    676      1.1  christos 
    677      1.1  christos 	rdataset->private3 = remaining.base;
    678      1.1  christos 
    679      1.1  christos 	/*
    680      1.1  christos 	 * Reset iterator state.
    681      1.1  christos 	 */
    682      1.1  christos 	rdataset->privateuint4 = 0;
    683      1.1  christos 	rdataset->private5 = NULL;
    684      1.1  christos 	rdataset->private6 = NULL;
    685      1.1  christos 	return (ISC_R_SUCCESS);
    686      1.1  christos }
    687      1.1  christos 
    688      1.1  christos void
    689      1.1  christos dns_ncache_current(dns_rdataset_t *ncacherdataset, dns_name_t *found,
    690      1.1  christos 		   dns_rdataset_t *rdataset)
    691      1.1  christos {
    692      1.1  christos 	dns_rdata_t rdata = DNS_RDATA_INIT;
    693      1.1  christos 	dns_trust_t trust;
    694      1.1  christos 	isc_region_t remaining, sigregion;
    695      1.1  christos 	isc_buffer_t source;
    696      1.1  christos 	dns_name_t tname;
    697      1.1  christos 	dns_rdatatype_t type;
    698      1.1  christos 	unsigned int count;
    699      1.1  christos 	dns_rdata_rrsig_t rrsig;
    700      1.1  christos 	unsigned char *raw;
    701      1.1  christos 
    702      1.1  christos 	REQUIRE(ncacherdataset != NULL);
    703      1.1  christos 	REQUIRE(ncacherdataset->type == 0);
    704      1.1  christos 	REQUIRE((ncacherdataset->attributes & DNS_RDATASETATTR_NEGATIVE) != 0);
    705      1.1  christos 	REQUIRE(found != NULL);
    706      1.1  christos 	REQUIRE(!dns_rdataset_isassociated(rdataset));
    707      1.1  christos 
    708      1.1  christos 	dns_rdataset_current(ncacherdataset, &rdata);
    709      1.1  christos 	isc_buffer_init(&source, rdata.data, rdata.length);
    710      1.1  christos 	isc_buffer_add(&source, rdata.length);
    711      1.1  christos 
    712      1.1  christos 	dns_name_init(&tname, NULL);
    713      1.1  christos 	isc_buffer_remainingregion(&source, &remaining);
    714      1.1  christos 	dns_name_fromregion(found, &remaining);
    715      1.1  christos 	INSIST(remaining.length >= found->length);
    716      1.1  christos 	isc_buffer_forward(&source, found->length);
    717      1.1  christos 	remaining.length -= found->length;
    718      1.1  christos 
    719      1.1  christos 	INSIST(remaining.length >= 5);
    720      1.1  christos 	type = isc_buffer_getuint16(&source);
    721      1.1  christos 	trust = isc_buffer_getuint8(&source);
    722      1.1  christos 	INSIST(trust <= dns_trust_ultimate);
    723      1.1  christos 	isc_buffer_remainingregion(&source, &remaining);
    724      1.1  christos 
    725      1.1  christos 	rdataset->methods = &rdataset_methods;
    726      1.1  christos 	rdataset->rdclass = ncacherdataset->rdclass;
    727      1.1  christos 	rdataset->type = type;
    728      1.1  christos 	if (type == dns_rdatatype_rrsig) {
    729      1.1  christos 		/*
    730      1.1  christos 		 * Extract covers from RRSIG.
    731      1.1  christos 		 */
    732      1.1  christos 		raw = remaining.base;
    733      1.1  christos 		count = raw[0] * 256 + raw[1];
    734      1.1  christos 		INSIST(count > 0);
    735      1.1  christos 		raw += 2;
    736      1.1  christos 		sigregion.length = raw[0] * 256 + raw[1];
    737      1.1  christos 		raw += 2;
    738      1.1  christos 		sigregion.base = raw;
    739      1.1  christos 		dns_rdata_reset(&rdata);
    740      1.1  christos 		dns_rdata_fromregion(&rdata, rdataset->rdclass,
    741      1.1  christos 				     rdataset->type, &sigregion);
    742      1.1  christos 		(void)dns_rdata_tostruct(&rdata, &rrsig, NULL);
    743      1.1  christos 		rdataset->covers = rrsig.covered;
    744      1.1  christos 	} else
    745      1.1  christos 		rdataset->covers = 0;
    746      1.1  christos 	rdataset->ttl = ncacherdataset->ttl;
    747      1.1  christos 	rdataset->trust = trust;
    748      1.1  christos 	rdataset->private1 = NULL;
    749      1.1  christos 	rdataset->private2 = NULL;
    750      1.1  christos 
    751      1.1  christos 	rdataset->private3 = remaining.base;
    752      1.1  christos 
    753      1.1  christos 	/*
    754      1.1  christos 	 * Reset iterator state.
    755      1.1  christos 	 */
    756      1.1  christos 	rdataset->privateuint4 = 0;
    757      1.1  christos 	rdataset->private5 = NULL;
    758      1.1  christos 	rdataset->private6 = NULL;
    759      1.1  christos }
    760