ds_43.c 8.15 KB
Newer Older
1
/*
2
 * Copyright (C) Internet Systems Consortium, Inc. ("ISC")
3
 *
4 5 6
 * This Source Code Form is subject to the terms of the Mozilla Public
 * License, v. 2.0. If a copy of the MPL was not distributed with this
 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
7 8 9
 *
 * See the COPYRIGHT file distributed with this work for additional
 * information regarding copyright ownership.
10 11 12
 */


13
/* RFC3658 */
14 15 16 17

#ifndef RDATA_GENERIC_DS_43_C
#define RDATA_GENERIC_DS_43_C

18
#define RRTYPE_DS_ATTRIBUTES \
19 20
	( DNS_RDATATYPEATTR_DNSSEC | DNS_RDATATYPEATTR_ZONECUTAUTH | \
	  DNS_RDATATYPEATTR_ATPARENT )
21

22
#include <isc/md.h>
23 24 25

#include <dns/ds.h>

26
static inline isc_result_t
27
generic_fromtext_ds(ARGS_FROMTEXT) {
28
	isc_token_t token;
29
	unsigned char c;
30
	int length;
31 32 33 34

	UNUSED(type);
	UNUSED(rdclass);
	UNUSED(origin);
35
	UNUSED(options);
36 37 38 39 40 41
	UNUSED(callbacks);

	/*
	 * Key tag.
	 */
	RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_number,
42
				      false));
Mark Andrews's avatar
Mark Andrews committed
43
	if (token.value.as_ulong > 0xffffU)
44 45 46 47 48 49
		RETTOK(ISC_R_RANGE);
	RETERR(uint16_tobuffer(token.value.as_ulong, target));

	/*
	 * Algorithm.
	 */
50
	RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_string,
51
				      false));
52 53
	RETTOK(dns_secalg_fromtext(&c, &token.value.as_textregion));
	RETERR(mem_tobuffer(target, &c, 1));
54 55 56 57

	/*
	 * Digest type.
	 */
58
	RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_string,
59
				      false));
60 61
	RETTOK(dns_dsdigest_fromtext(&c, &token.value.as_textregion));
	RETERR(mem_tobuffer(target, &c, 1));
62 63 64 65

	/*
	 * Digest.
	 */
66 67
	switch (c) {
	case DNS_DSDIGEST_SHA1:
68
		length = ISC_SHA1_DIGESTLENGTH;
69 70
		break;
	case DNS_DSDIGEST_SHA256:
71
		length = ISC_SHA256_DIGESTLENGTH;
72
		break;
73 74 75
	case DNS_DSDIGEST_SHA384:
		length = ISC_SHA384_DIGESTLENGTH;
		break;
76
	default:
77
		length = -2;
78 79
		break;
	}
80
	return (isc_hex_tobuffer(lexer, target, length));
81 82 83
}

static inline isc_result_t
84 85 86 87 88 89 90 91 92 93
fromtext_ds(ARGS_FROMTEXT) {

	REQUIRE(type == dns_rdatatype_ds);

	return (generic_fromtext_ds(rdclass, type, lexer, origin, options,
				    target, callbacks));
}

static inline isc_result_t
generic_totext_ds(ARGS_TOTEXT) {
94 95 96 97 98 99 100 101 102 103 104 105 106 107 108
	isc_region_t sr;
	char buf[sizeof("64000 ")];
	unsigned int n;

	REQUIRE(rdata->length != 0);

	UNUSED(tctx);

	dns_rdata_toregion(rdata, &sr);

	/*
	 * Key tag.
	 */
	n = uint16_fromregion(&sr);
	isc_region_consume(&sr, 2);
109
	snprintf(buf, sizeof(buf), "%u ", n);
110 111 112 113 114 115 116
	RETERR(str_totext(buf, target));

	/*
	 * Algorithm.
	 */
	n = uint8_fromregion(&sr);
	isc_region_consume(&sr, 1);
117
	snprintf(buf, sizeof(buf), "%u ", n);
118 119 120 121 122 123 124
	RETERR(str_totext(buf, target));

	/*
	 * Digest type.
	 */
	n = uint8_fromregion(&sr);
	isc_region_consume(&sr, 1);
125
	snprintf(buf, sizeof(buf), "%u", n);
126 127 128 129 130 131 132 133
	RETERR(str_totext(buf, target));

	/*
	 * Digest.
	 */
	if ((tctx->flags & DNS_STYLEFLAG_MULTILINE) != 0)
		RETERR(str_totext(" (", target));
	RETERR(str_totext(tctx->linebreak, target));
134 135 136 137 138 139
	if ((tctx->flags & DNS_STYLEFLAG_NOCRYPTO) == 0) {
		if (tctx->width == 0) /* No splitting */
			RETERR(isc_hex_totext(&sr, 0, "", target));
		else
			RETERR(isc_hex_totext(&sr, tctx->width - 2,
					      tctx->linebreak, target));
Tinderbox User's avatar
Tinderbox User committed
140
	} else
141
		RETERR(str_totext("[omitted]", target));
142 143 144 145 146 147
	if ((tctx->flags & DNS_STYLEFLAG_MULTILINE) != 0)
		RETERR(str_totext(" )", target));
	return (ISC_R_SUCCESS);
}

static inline isc_result_t
148
totext_ds(ARGS_TOTEXT) {
149

150 151 152 153 154 155 156 157
	REQUIRE(rdata->type == dns_rdatatype_ds);

	return (generic_totext_ds(rdata, tctx, target));
}

static inline isc_result_t
generic_fromwire_ds(ARGS_FROMWIRE) {
	isc_region_t sr;
158 159 160 161

	UNUSED(type);
	UNUSED(rdclass);
	UNUSED(dctx);
162
	UNUSED(options);
163 164

	isc_buffer_activeregion(source, &sr);
165 166 167 168 169 170 171 172

	/*
	 * Check digest lengths if we know them.
	 */
	if (sr.length < 4 ||
	    (sr.base[3] == DNS_DSDIGEST_SHA1 &&
	     sr.length < 4 + ISC_SHA1_DIGESTLENGTH) ||
	    (sr.base[3] == DNS_DSDIGEST_SHA256 &&
173
	     sr.length < 4 + ISC_SHA256_DIGESTLENGTH) ||
174 175
	    (sr.base[3] == DNS_DSDIGEST_SHA384 &&
	     sr.length < 4 + ISC_SHA384_DIGESTLENGTH))
176 177
		return (ISC_R_UNEXPECTEDEND);

178 179 180 181 182 183 184 185 186
	/*
	 * Only copy digest lengths if we know them.
	 * If there is extra data dns_rdata_fromwire() will
	 * detect that.
	 */
	if (sr.base[3] == DNS_DSDIGEST_SHA1)
		sr.length = 4 + ISC_SHA1_DIGESTLENGTH;
	else if (sr.base[3] == DNS_DSDIGEST_SHA256)
		sr.length = 4 + ISC_SHA256_DIGESTLENGTH;
187 188
	else if (sr.base[3] == DNS_DSDIGEST_SHA384)
		sr.length = 4 + ISC_SHA384_DIGESTLENGTH;
189

190 191 192 193
	isc_buffer_forward(source, sr.length);
	return (mem_tobuffer(target, sr.base, sr.length));
}

194 195 196 197 198 199 200 201 202
static inline isc_result_t
fromwire_ds(ARGS_FROMWIRE) {

	REQUIRE(type == dns_rdatatype_ds);

	return (generic_fromwire_ds(rdclass, type, source, dctx, options,
				    target));
}

203 204 205 206
static inline isc_result_t
towire_ds(ARGS_TOWIRE) {
	isc_region_t sr;

207
	REQUIRE(rdata->type == dns_rdatatype_ds);
208 209 210 211 212 213 214 215 216 217 218 219 220 221 222
	REQUIRE(rdata->length != 0);

	UNUSED(cctx);

	dns_rdata_toregion(rdata, &sr);
	return (mem_tobuffer(target, sr.base, sr.length));
}

static inline int
compare_ds(ARGS_COMPARE) {
	isc_region_t r1;
	isc_region_t r2;

	REQUIRE(rdata1->type == rdata2->type);
	REQUIRE(rdata1->rdclass == rdata2->rdclass);
223
	REQUIRE(rdata1->type == dns_rdatatype_ds);
224 225 226 227 228 229 230 231 232
	REQUIRE(rdata1->length != 0);
	REQUIRE(rdata2->length != 0);

	dns_rdata_toregion(rdata1, &r1);
	dns_rdata_toregion(rdata2, &r2);
	return (isc_region_compare(&r1, &r2));
}

static inline isc_result_t
233
generic_fromstruct_ds(ARGS_FROMSTRUCT) {
234 235 236 237 238
	dns_rdata_ds_t *ds = source;

	REQUIRE(source != NULL);
	REQUIRE(ds->common.rdtype == type);
	REQUIRE(ds->common.rdclass == rdclass);
239 240 241 242

	UNUSED(type);
	UNUSED(rdclass);

243 244 245 246 247 248 249
	switch (ds->digest_type) {
	case DNS_DSDIGEST_SHA1:
		REQUIRE(ds->length == ISC_SHA1_DIGESTLENGTH);
		break;
	case DNS_DSDIGEST_SHA256:
		REQUIRE(ds->length == ISC_SHA256_DIGESTLENGTH);
		break;
250 251 252
	case DNS_DSDIGEST_SHA384:
		REQUIRE(ds->length == ISC_SHA384_DIGESTLENGTH);
		break;
253
	}
254 255 256 257 258 259 260 261 262

	RETERR(uint16_tobuffer(ds->key_tag, target));
	RETERR(uint8_tobuffer(ds->algorithm, target));
	RETERR(uint8_tobuffer(ds->digest_type, target));

	return (mem_tobuffer(target, ds->digest, ds->length));
}

static inline isc_result_t
263 264 265 266 267 268 269 270 271
fromstruct_ds(ARGS_FROMSTRUCT) {

	REQUIRE(type == dns_rdatatype_ds);

	return (generic_fromstruct_ds(rdclass, type, source, target));
}

static inline isc_result_t
generic_tostruct_ds(ARGS_TOSTRUCT) {
272 273 274 275 276
	dns_rdata_ds_t *ds = target;
	isc_region_t region;

	REQUIRE(target != NULL);
	REQUIRE(rdata->length != 0);
277 278 279
	REQUIRE(ds->common.rdtype == rdata->type);
	REQUIRE(ds->common.rdclass == rdata->rdclass);
	REQUIRE(!ISC_LINK_LINKED(&ds->common, link));
280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298

	dns_rdata_toregion(rdata, &region);

	ds->key_tag = uint16_fromregion(&region);
	isc_region_consume(&region, 2);
	ds->algorithm = uint8_fromregion(&region);
	isc_region_consume(&region, 1);
	ds->digest_type = uint8_fromregion(&region);
	isc_region_consume(&region, 1);
	ds->length = region.length;

	ds->digest = mem_maybedup(mctx, region.base, region.length);
	if (ds->digest == NULL)
		return (ISC_R_NOMEMORY);

	ds->mctx = mctx;
	return (ISC_R_SUCCESS);
}

299 300 301 302 303 304 305 306 307 308 309 310 311 312
static inline isc_result_t
tostruct_ds(ARGS_TOSTRUCT) {
	dns_rdata_ds_t *ds = target;

	REQUIRE(rdata->type == dns_rdatatype_ds);
	REQUIRE(target != NULL);

	ds->common.rdclass = rdata->rdclass;
	ds->common.rdtype = rdata->type;
	ISC_LINK_INIT(&ds->common, link);

	return (generic_tostruct_ds(rdata, target, mctx));
}

313 314 315 316 317
static inline void
freestruct_ds(ARGS_FREESTRUCT) {
	dns_rdata_ds_t *ds = source;

	REQUIRE(ds != NULL);
318
	REQUIRE(ds->common.rdtype == dns_rdatatype_ds);
319 320 321 322 323 324 325 326 327 328 329

	if (ds->mctx == NULL)
		return;

	if (ds->digest != NULL)
		isc_mem_free(ds->mctx, ds->digest);
	ds->mctx = NULL;
}

static inline isc_result_t
additionaldata_ds(ARGS_ADDLDATA) {
330
	REQUIRE(rdata->type == dns_rdatatype_ds);
331 332 333 334 335 336 337 338 339 340 341 342

	UNUSED(rdata);
	UNUSED(add);
	UNUSED(arg);

	return (ISC_R_SUCCESS);
}

static inline isc_result_t
digest_ds(ARGS_DIGEST) {
	isc_region_t r;

343
	REQUIRE(rdata->type == dns_rdatatype_ds);
344 345 346 347 348 349

	dns_rdata_toregion(rdata, &r);

	return ((digest)(arg, &r));
}

350
static inline bool
351 352
checkowner_ds(ARGS_CHECKOWNER) {

353
	REQUIRE(type == dns_rdatatype_ds);
354 355 356 357 358 359

	UNUSED(name);
	UNUSED(type);
	UNUSED(rdclass);
	UNUSED(wildcard);

360
	return (true);
361 362
}

363
static inline bool
364 365
checknames_ds(ARGS_CHECKNAMES) {

366
	REQUIRE(rdata->type == dns_rdatatype_ds);
367 368 369 370 371

	UNUSED(rdata);
	UNUSED(owner);
	UNUSED(bad);

372
	return (true);
373 374
}

375 376 377 378 379
static inline int
casecompare_ds(ARGS_COMPARE) {
	return (compare_ds(rdata1, rdata2));
}

380
#endif	/* RDATA_GENERIC_DS_43_C */