1 /* $NetBSD: soa_6.c,v 1.8 2024/02/21 22:52:14 christos Exp $ */ 2 3 /* 4 * Copyright (C) Internet Systems Consortium, Inc. ("ISC") 5 * 6 * SPDX-License-Identifier: MPL-2.0 7 * 8 * This Source Code Form is subject to the terms of the Mozilla Public 9 * License, v. 2.0. If a copy of the MPL was not distributed with this 10 * file, you can obtain one at https://mozilla.org/MPL/2.0/. 11 * 12 * See the COPYRIGHT file distributed with this work for additional 13 * information regarding copyright ownership. 14 */ 15 16 #ifndef RDATA_GENERIC_SOA_6_C 17 #define RDATA_GENERIC_SOA_6_C 18 19 #define RRTYPE_SOA_ATTRIBUTES (DNS_RDATATYPEATTR_SINGLETON) 20 21 static isc_result_t 22 fromtext_soa(ARGS_FROMTEXT) { 23 isc_token_t token; 24 dns_name_t name; 25 isc_buffer_t buffer; 26 int i; 27 uint32_t n; 28 bool ok; 29 30 REQUIRE(type == dns_rdatatype_soa); 31 32 UNUSED(type); 33 UNUSED(rdclass); 34 UNUSED(callbacks); 35 36 if (origin == NULL) { 37 origin = dns_rootname; 38 } 39 40 for (i = 0; i < 2; i++) { 41 RETERR(isc_lex_getmastertoken(lexer, &token, 42 isc_tokentype_string, false)); 43 44 dns_name_init(&name, NULL); 45 buffer_fromregion(&buffer, &token.value.as_region); 46 RETTOK(dns_name_fromtext(&name, &buffer, origin, options, 47 target)); 48 ok = true; 49 if ((options & DNS_RDATA_CHECKNAMES) != 0) { 50 switch (i) { 51 case 0: 52 ok = dns_name_ishostname(&name, false); 53 break; 54 case 1: 55 ok = dns_name_ismailbox(&name); 56 break; 57 } 58 } 59 if (!ok && (options & DNS_RDATA_CHECKNAMESFAIL) != 0) { 60 RETTOK(DNS_R_BADNAME); 61 } 62 if (!ok && callbacks != NULL) { 63 warn_badname(&name, lexer, callbacks); 64 } 65 } 66 67 RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_number, 68 false)); 69 RETERR(uint32_tobuffer(token.value.as_ulong, target)); 70 71 for (i = 0; i < 4; i++) { 72 RETERR(isc_lex_getmastertoken(lexer, &token, 73 isc_tokentype_string, false)); 74 RETTOK(dns_counter_fromtext(&token.value.as_textregion, &n)); 75 RETERR(uint32_tobuffer(n, target)); 76 } 77 78 return (ISC_R_SUCCESS); 79 } 80 81 static const char *soa_fieldnames[5] = { "serial", "refresh", "retry", "expire", 82 "minimum" }; 83 84 static isc_result_t 85 totext_soa(ARGS_TOTEXT) { 86 isc_region_t dregion; 87 dns_name_t mname; 88 dns_name_t rname; 89 dns_name_t prefix; 90 bool sub; 91 int i; 92 bool multiline; 93 bool comm; 94 95 REQUIRE(rdata->type == dns_rdatatype_soa); 96 REQUIRE(rdata->length != 0); 97 98 multiline = ((tctx->flags & DNS_STYLEFLAG_MULTILINE) != 0); 99 if (multiline) { 100 comm = ((tctx->flags & DNS_STYLEFLAG_RRCOMMENT) != 0); 101 } else { 102 comm = false; 103 } 104 105 dns_name_init(&mname, NULL); 106 dns_name_init(&rname, NULL); 107 dns_name_init(&prefix, NULL); 108 109 dns_rdata_toregion(rdata, &dregion); 110 111 dns_name_fromregion(&mname, &dregion); 112 isc_region_consume(&dregion, name_length(&mname)); 113 114 dns_name_fromregion(&rname, &dregion); 115 isc_region_consume(&dregion, name_length(&rname)); 116 117 sub = name_prefix(&mname, tctx->origin, &prefix); 118 RETERR(dns_name_totext(&prefix, sub, target)); 119 120 RETERR(str_totext(" ", target)); 121 122 sub = name_prefix(&rname, tctx->origin, &prefix); 123 RETERR(dns_name_totext(&prefix, sub, target)); 124 125 if (multiline) { 126 RETERR(str_totext(" (", target)); 127 } 128 RETERR(str_totext(tctx->linebreak, target)); 129 130 for (i = 0; i < 5; i++) { 131 char buf[sizeof("0123456789 ; ")]; 132 unsigned long num; 133 num = uint32_fromregion(&dregion); 134 isc_region_consume(&dregion, 4); 135 snprintf(buf, sizeof(buf), comm ? "%-10lu ; " : "%lu", num); 136 RETERR(str_totext(buf, target)); 137 if (comm) { 138 RETERR(str_totext(soa_fieldnames[i], target)); 139 /* Print times in week/day/hour/minute/second form */ 140 if (i >= 1) { 141 RETERR(str_totext(" (", target)); 142 RETERR(dns_ttl_totext(num, true, true, target)); 143 RETERR(str_totext(")", target)); 144 } 145 RETERR(str_totext(tctx->linebreak, target)); 146 } else if (i < 4) { 147 RETERR(str_totext(tctx->linebreak, target)); 148 } 149 } 150 151 if (multiline) { 152 RETERR(str_totext(")", target)); 153 } 154 155 return (ISC_R_SUCCESS); 156 } 157 158 static isc_result_t 159 fromwire_soa(ARGS_FROMWIRE) { 160 dns_name_t mname; 161 dns_name_t rname; 162 isc_region_t sregion; 163 isc_region_t tregion; 164 165 REQUIRE(type == dns_rdatatype_soa); 166 167 UNUSED(type); 168 UNUSED(rdclass); 169 170 dns_decompress_setmethods(dctx, DNS_COMPRESS_GLOBAL14); 171 172 dns_name_init(&mname, NULL); 173 dns_name_init(&rname, NULL); 174 175 RETERR(dns_name_fromwire(&mname, source, dctx, options, target)); 176 RETERR(dns_name_fromwire(&rname, source, dctx, options, target)); 177 178 isc_buffer_activeregion(source, &sregion); 179 isc_buffer_availableregion(target, &tregion); 180 181 if (sregion.length < 20) { 182 return (ISC_R_UNEXPECTEDEND); 183 } 184 if (tregion.length < 20) { 185 return (ISC_R_NOSPACE); 186 } 187 188 memmove(tregion.base, sregion.base, 20); 189 isc_buffer_forward(source, 20); 190 isc_buffer_add(target, 20); 191 192 return (ISC_R_SUCCESS); 193 } 194 195 static isc_result_t 196 towire_soa(ARGS_TOWIRE) { 197 isc_region_t sregion; 198 isc_region_t tregion; 199 dns_name_t mname; 200 dns_name_t rname; 201 dns_offsets_t moffsets; 202 dns_offsets_t roffsets; 203 204 REQUIRE(rdata->type == dns_rdatatype_soa); 205 REQUIRE(rdata->length != 0); 206 207 dns_compress_setmethods(cctx, DNS_COMPRESS_GLOBAL14); 208 209 dns_name_init(&mname, moffsets); 210 dns_name_init(&rname, roffsets); 211 212 dns_rdata_toregion(rdata, &sregion); 213 214 dns_name_fromregion(&mname, &sregion); 215 isc_region_consume(&sregion, name_length(&mname)); 216 RETERR(dns_name_towire(&mname, cctx, target)); 217 218 dns_name_fromregion(&rname, &sregion); 219 isc_region_consume(&sregion, name_length(&rname)); 220 RETERR(dns_name_towire(&rname, cctx, target)); 221 222 isc_buffer_availableregion(target, &tregion); 223 if (tregion.length < 20) { 224 return (ISC_R_NOSPACE); 225 } 226 227 memmove(tregion.base, sregion.base, 20); 228 isc_buffer_add(target, 20); 229 return (ISC_R_SUCCESS); 230 } 231 232 static int 233 compare_soa(ARGS_COMPARE) { 234 isc_region_t region1; 235 isc_region_t region2; 236 dns_name_t name1; 237 dns_name_t name2; 238 int order; 239 240 REQUIRE(rdata1->type == rdata2->type); 241 REQUIRE(rdata1->rdclass == rdata2->rdclass); 242 REQUIRE(rdata1->type == dns_rdatatype_soa); 243 REQUIRE(rdata1->length != 0); 244 REQUIRE(rdata2->length != 0); 245 246 dns_name_init(&name1, NULL); 247 dns_name_init(&name2, NULL); 248 249 dns_rdata_toregion(rdata1, ®ion1); 250 dns_rdata_toregion(rdata2, ®ion2); 251 252 dns_name_fromregion(&name1, ®ion1); 253 dns_name_fromregion(&name2, ®ion2); 254 255 order = dns_name_rdatacompare(&name1, &name2); 256 if (order != 0) { 257 return (order); 258 } 259 260 isc_region_consume(®ion1, name_length(&name1)); 261 isc_region_consume(®ion2, name_length(&name2)); 262 263 dns_name_init(&name1, NULL); 264 dns_name_init(&name2, NULL); 265 266 dns_name_fromregion(&name1, ®ion1); 267 dns_name_fromregion(&name2, ®ion2); 268 269 order = dns_name_rdatacompare(&name1, &name2); 270 if (order != 0) { 271 return (order); 272 } 273 274 isc_region_consume(®ion1, name_length(&name1)); 275 isc_region_consume(®ion2, name_length(&name2)); 276 277 return (isc_region_compare(®ion1, ®ion2)); 278 } 279 280 static isc_result_t 281 fromstruct_soa(ARGS_FROMSTRUCT) { 282 dns_rdata_soa_t *soa = source; 283 isc_region_t region; 284 285 REQUIRE(type == dns_rdatatype_soa); 286 REQUIRE(soa != NULL); 287 REQUIRE(soa->common.rdtype == type); 288 REQUIRE(soa->common.rdclass == rdclass); 289 290 UNUSED(type); 291 UNUSED(rdclass); 292 293 dns_name_toregion(&soa->origin, ®ion); 294 RETERR(isc_buffer_copyregion(target, ®ion)); 295 dns_name_toregion(&soa->contact, ®ion); 296 RETERR(isc_buffer_copyregion(target, ®ion)); 297 RETERR(uint32_tobuffer(soa->serial, target)); 298 RETERR(uint32_tobuffer(soa->refresh, target)); 299 RETERR(uint32_tobuffer(soa->retry, target)); 300 RETERR(uint32_tobuffer(soa->expire, target)); 301 return (uint32_tobuffer(soa->minimum, target)); 302 } 303 304 static isc_result_t 305 tostruct_soa(ARGS_TOSTRUCT) { 306 isc_region_t region; 307 dns_rdata_soa_t *soa = target; 308 dns_name_t name; 309 310 REQUIRE(rdata->type == dns_rdatatype_soa); 311 REQUIRE(soa != NULL); 312 REQUIRE(rdata->length != 0); 313 314 soa->common.rdclass = rdata->rdclass; 315 soa->common.rdtype = rdata->type; 316 ISC_LINK_INIT(&soa->common, link); 317 318 dns_rdata_toregion(rdata, ®ion); 319 320 dns_name_init(&name, NULL); 321 dns_name_fromregion(&name, ®ion); 322 isc_region_consume(®ion, name_length(&name)); 323 dns_name_init(&soa->origin, NULL); 324 name_duporclone(&name, mctx, &soa->origin); 325 326 dns_name_fromregion(&name, ®ion); 327 isc_region_consume(®ion, name_length(&name)); 328 dns_name_init(&soa->contact, NULL); 329 name_duporclone(&name, mctx, &soa->contact); 330 331 soa->serial = uint32_fromregion(®ion); 332 isc_region_consume(®ion, 4); 333 334 soa->refresh = uint32_fromregion(®ion); 335 isc_region_consume(®ion, 4); 336 337 soa->retry = uint32_fromregion(®ion); 338 isc_region_consume(®ion, 4); 339 340 soa->expire = uint32_fromregion(®ion); 341 isc_region_consume(®ion, 4); 342 343 soa->minimum = uint32_fromregion(®ion); 344 345 soa->mctx = mctx; 346 return (ISC_R_SUCCESS); 347 } 348 349 static void 350 freestruct_soa(ARGS_FREESTRUCT) { 351 dns_rdata_soa_t *soa = source; 352 353 REQUIRE(soa != NULL); 354 REQUIRE(soa->common.rdtype == dns_rdatatype_soa); 355 356 if (soa->mctx == NULL) { 357 return; 358 } 359 360 dns_name_free(&soa->origin, soa->mctx); 361 dns_name_free(&soa->contact, soa->mctx); 362 soa->mctx = NULL; 363 } 364 365 static isc_result_t 366 additionaldata_soa(ARGS_ADDLDATA) { 367 REQUIRE(rdata->type == dns_rdatatype_soa); 368 369 UNUSED(rdata); 370 UNUSED(owner); 371 UNUSED(add); 372 UNUSED(arg); 373 374 return (ISC_R_SUCCESS); 375 } 376 377 static isc_result_t 378 digest_soa(ARGS_DIGEST) { 379 isc_region_t r; 380 dns_name_t name; 381 382 REQUIRE(rdata->type == dns_rdatatype_soa); 383 384 dns_rdata_toregion(rdata, &r); 385 386 dns_name_init(&name, NULL); 387 dns_name_fromregion(&name, &r); 388 RETERR(dns_name_digest(&name, digest, arg)); 389 isc_region_consume(&r, name_length(&name)); 390 391 dns_name_init(&name, NULL); 392 dns_name_fromregion(&name, &r); 393 RETERR(dns_name_digest(&name, digest, arg)); 394 isc_region_consume(&r, name_length(&name)); 395 396 return ((digest)(arg, &r)); 397 } 398 399 static bool 400 checkowner_soa(ARGS_CHECKOWNER) { 401 REQUIRE(type == dns_rdatatype_soa); 402 403 UNUSED(name); 404 UNUSED(type); 405 UNUSED(rdclass); 406 UNUSED(wildcard); 407 408 return (true); 409 } 410 411 static bool 412 checknames_soa(ARGS_CHECKNAMES) { 413 isc_region_t region; 414 dns_name_t name; 415 416 REQUIRE(rdata->type == dns_rdatatype_soa); 417 418 UNUSED(owner); 419 420 dns_rdata_toregion(rdata, ®ion); 421 dns_name_init(&name, NULL); 422 dns_name_fromregion(&name, ®ion); 423 if (!dns_name_ishostname(&name, false)) { 424 if (bad != NULL) { 425 dns_name_clone(&name, bad); 426 } 427 return (false); 428 } 429 isc_region_consume(®ion, name_length(&name)); 430 dns_name_fromregion(&name, ®ion); 431 if (!dns_name_ismailbox(&name)) { 432 if (bad != NULL) { 433 dns_name_clone(&name, bad); 434 } 435 return (false); 436 } 437 return (true); 438 } 439 440 static int 441 casecompare_soa(ARGS_COMPARE) { 442 return (compare_soa(rdata1, rdata2)); 443 } 444 445 #endif /* RDATA_GENERIC_SOA_6_C */ 446