2 * Copyright (C) 2004, 2007, 2009, 2011, 2012, 2014, 2015 Internet Systems Consortium, Inc. ("ISC")
3 * Copyright (C) 1998-2002 Internet Software Consortium.
5 * Permission to use, copy, modify, and/or distribute this software for any
6 * purpose with or without fee is hereby granted, provided that the above
7 * copyright notice and this permission notice appear in all copies.
9 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH
10 * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
11 * AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT,
12 * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
13 * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
14 * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
15 * PERFORMANCE OF THIS SOFTWARE.
20 /* Reviewed: Thu Mar 16 15:18:32 PST 2000 by explorer */
22 #ifndef RDATA_GENERIC_SOA_6_C
23 #define RDATA_GENERIC_SOA_6_C
25 #define RRTYPE_SOA_ATTRIBUTES (DNS_RDATATYPEATTR_SINGLETON)
27 static inline isc_result_t
28 fromtext_soa(ARGS_FROMTEXT) {
36 REQUIRE(type == dns_rdatatype_soa);
43 origin = dns_rootname;
45 for (i = 0; i < 2; i++) {
46 RETERR(isc_lex_getmastertoken(lexer, &token,
50 dns_name_init(&name, NULL);
51 buffer_fromregion(&buffer, &token.value.as_region);
52 RETTOK(dns_name_fromtext(&name, &buffer, origin,
55 if ((options & DNS_RDATA_CHECKNAMES) != 0)
58 ok = dns_name_ishostname(&name, ISC_FALSE);
61 ok = dns_name_ismailbox(&name);
65 if (!ok && (options & DNS_RDATA_CHECKNAMESFAIL) != 0)
66 RETTOK(DNS_R_BADNAME);
67 if (!ok && callbacks != NULL)
68 warn_badname(&name, lexer, callbacks);
71 RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_number,
73 RETERR(uint32_tobuffer(token.value.as_ulong, target));
75 for (i = 0; i < 4; i++) {
76 RETERR(isc_lex_getmastertoken(lexer, &token,
79 RETTOK(dns_counter_fromtext(&token.value.as_textregion, &n));
80 RETERR(uint32_tobuffer(n, target));
83 return (ISC_R_SUCCESS);
86 static const char *soa_fieldnames[5] = {
87 "serial", "refresh", "retry", "expire", "minimum"
90 static inline isc_result_t
91 totext_soa(ARGS_TOTEXT) {
98 isc_boolean_t multiline;
101 REQUIRE(rdata->type == dns_rdatatype_soa);
102 REQUIRE(rdata->length != 0);
104 multiline = ISC_TF((tctx->flags & DNS_STYLEFLAG_MULTILINE) != 0);
106 comm = ISC_TF((tctx->flags & DNS_STYLEFLAG_RRCOMMENT) != 0);
111 dns_name_init(&mname, NULL);
112 dns_name_init(&rname, NULL);
113 dns_name_init(&prefix, NULL);
115 dns_rdata_toregion(rdata, &dregion);
117 dns_name_fromregion(&mname, &dregion);
118 isc_region_consume(&dregion, name_length(&mname));
120 dns_name_fromregion(&rname, &dregion);
121 isc_region_consume(&dregion, name_length(&rname));
123 sub = name_prefix(&mname, tctx->origin, &prefix);
124 RETERR(dns_name_totext(&prefix, sub, target));
126 RETERR(str_totext(" ", target));
128 sub = name_prefix(&rname, tctx->origin, &prefix);
129 RETERR(dns_name_totext(&prefix, sub, target));
132 RETERR(str_totext(" (" , target));
133 RETERR(str_totext(tctx->linebreak, target));
135 for (i = 0; i < 5; i++) {
136 char buf[sizeof("0123456789 ; ")];
138 num = uint32_fromregion(&dregion);
139 isc_region_consume(&dregion, 4);
140 sprintf(buf, comm ? "%-10lu ; " : "%lu", num);
141 RETERR(str_totext(buf, target));
143 RETERR(str_totext(soa_fieldnames[i], target));
144 /* Print times in week/day/hour/minute/second form */
146 RETERR(str_totext(" (", target));
147 RETERR(dns_ttl_totext(num, ISC_TRUE, target));
148 RETERR(str_totext(")", target));
150 RETERR(str_totext(tctx->linebreak, target));
152 RETERR(str_totext(tctx->linebreak, target));
157 RETERR(str_totext(")", target));
159 return (ISC_R_SUCCESS);
162 static inline isc_result_t
163 fromwire_soa(ARGS_FROMWIRE) {
166 isc_region_t sregion;
167 isc_region_t tregion;
169 REQUIRE(type == dns_rdatatype_soa);
174 dns_decompress_setmethods(dctx, DNS_COMPRESS_GLOBAL14);
176 dns_name_init(&mname, NULL);
177 dns_name_init(&rname, NULL);
179 RETERR(dns_name_fromwire(&mname, source, dctx, options, target));
180 RETERR(dns_name_fromwire(&rname, source, dctx, options, target));
182 isc_buffer_activeregion(source, &sregion);
183 isc_buffer_availableregion(target, &tregion);
185 if (sregion.length < 20)
186 return (ISC_R_UNEXPECTEDEND);
187 if (tregion.length < 20)
188 return (ISC_R_NOSPACE);
190 memmove(tregion.base, sregion.base, 20);
191 isc_buffer_forward(source, 20);
192 isc_buffer_add(target, 20);
194 return (ISC_R_SUCCESS);
197 static inline isc_result_t
198 towire_soa(ARGS_TOWIRE) {
199 isc_region_t sregion;
200 isc_region_t tregion;
203 dns_offsets_t moffsets;
204 dns_offsets_t roffsets;
206 REQUIRE(rdata->type == dns_rdatatype_soa);
207 REQUIRE(rdata->length != 0);
209 dns_compress_setmethods(cctx, DNS_COMPRESS_GLOBAL14);
211 dns_name_init(&mname, moffsets);
212 dns_name_init(&rname, roffsets);
214 dns_rdata_toregion(rdata, &sregion);
216 dns_name_fromregion(&mname, &sregion);
217 isc_region_consume(&sregion, name_length(&mname));
218 RETERR(dns_name_towire(&mname, cctx, target));
220 dns_name_fromregion(&rname, &sregion);
221 isc_region_consume(&sregion, name_length(&rname));
222 RETERR(dns_name_towire(&rname, cctx, target));
224 isc_buffer_availableregion(target, &tregion);
225 if (tregion.length < 20)
226 return (ISC_R_NOSPACE);
228 memmove(tregion.base, sregion.base, 20);
229 isc_buffer_add(target, 20);
230 return (ISC_R_SUCCESS);
234 compare_soa(ARGS_COMPARE) {
235 isc_region_t region1;
236 isc_region_t region2;
241 REQUIRE(rdata1->type == rdata2->type);
242 REQUIRE(rdata1->rdclass == rdata2->rdclass);
243 REQUIRE(rdata1->type == dns_rdatatype_soa);
244 REQUIRE(rdata1->length != 0);
245 REQUIRE(rdata2->length != 0);
247 dns_name_init(&name1, NULL);
248 dns_name_init(&name2, NULL);
250 dns_rdata_toregion(rdata1, ®ion1);
251 dns_rdata_toregion(rdata2, ®ion2);
253 dns_name_fromregion(&name1, ®ion1);
254 dns_name_fromregion(&name2, ®ion2);
256 order = dns_name_rdatacompare(&name1, &name2);
260 isc_region_consume(®ion1, name_length(&name1));
261 isc_region_consume(®ion2, name_length(&name2));
263 dns_name_init(&name1, NULL);
264 dns_name_init(&name2, NULL);
266 dns_name_fromregion(&name1, ®ion1);
267 dns_name_fromregion(&name2, ®ion2);
269 order = dns_name_rdatacompare(&name1, &name2);
273 isc_region_consume(®ion1, name_length(&name1));
274 isc_region_consume(®ion2, name_length(&name2));
276 return (isc_region_compare(®ion1, ®ion2));
279 static inline isc_result_t
280 fromstruct_soa(ARGS_FROMSTRUCT) {
281 dns_rdata_soa_t *soa = source;
284 REQUIRE(type == dns_rdatatype_soa);
285 REQUIRE(source != NULL);
286 REQUIRE(soa->common.rdtype == type);
287 REQUIRE(soa->common.rdclass == rdclass);
292 dns_name_toregion(&soa->origin, ®ion);
293 RETERR(isc_buffer_copyregion(target, ®ion));
294 dns_name_toregion(&soa->contact, ®ion);
295 RETERR(isc_buffer_copyregion(target, ®ion));
296 RETERR(uint32_tobuffer(soa->serial, target));
297 RETERR(uint32_tobuffer(soa->refresh, target));
298 RETERR(uint32_tobuffer(soa->retry, target));
299 RETERR(uint32_tobuffer(soa->expire, target));
300 return (uint32_tobuffer(soa->minimum, target));
303 static inline isc_result_t
304 tostruct_soa(ARGS_TOSTRUCT) {
306 dns_rdata_soa_t *soa = target;
310 REQUIRE(rdata->type == dns_rdatatype_soa);
311 REQUIRE(target != NULL);
312 REQUIRE(rdata->length != 0);
314 soa->common.rdclass = rdata->rdclass;
315 soa->common.rdtype = rdata->type;
316 ISC_LINK_INIT(&soa->common, link);
319 dns_rdata_toregion(rdata, ®ion);
321 dns_name_init(&name, NULL);
322 dns_name_fromregion(&name, ®ion);
323 isc_region_consume(®ion, name_length(&name));
324 dns_name_init(&soa->origin, NULL);
325 RETERR(name_duporclone(&name, mctx, &soa->origin));
327 dns_name_fromregion(&name, ®ion);
328 isc_region_consume(®ion, name_length(&name));
329 dns_name_init(&soa->contact, NULL);
330 result = name_duporclone(&name, mctx, &soa->contact);
331 if (result != ISC_R_SUCCESS)
334 soa->serial = uint32_fromregion(®ion);
335 isc_region_consume(®ion, 4);
337 soa->refresh = uint32_fromregion(®ion);
338 isc_region_consume(®ion, 4);
340 soa->retry = uint32_fromregion(®ion);
341 isc_region_consume(®ion, 4);
343 soa->expire = uint32_fromregion(®ion);
344 isc_region_consume(®ion, 4);
346 soa->minimum = uint32_fromregion(®ion);
349 return (ISC_R_SUCCESS);
353 dns_name_free(&soa->origin, mctx);
354 return (ISC_R_NOMEMORY);
358 freestruct_soa(ARGS_FREESTRUCT) {
359 dns_rdata_soa_t *soa = source;
361 REQUIRE(source != NULL);
362 REQUIRE(soa->common.rdtype == dns_rdatatype_soa);
364 if (soa->mctx == NULL)
367 dns_name_free(&soa->origin, soa->mctx);
368 dns_name_free(&soa->contact, soa->mctx);
372 static inline isc_result_t
373 additionaldata_soa(ARGS_ADDLDATA) {
378 REQUIRE(rdata->type == dns_rdatatype_soa);
380 return (ISC_R_SUCCESS);
383 static inline isc_result_t
384 digest_soa(ARGS_DIGEST) {
388 REQUIRE(rdata->type == dns_rdatatype_soa);
390 dns_rdata_toregion(rdata, &r);
392 dns_name_init(&name, NULL);
393 dns_name_fromregion(&name, &r);
394 RETERR(dns_name_digest(&name, digest, arg));
395 isc_region_consume(&r, name_length(&name));
397 dns_name_init(&name, NULL);
398 dns_name_fromregion(&name, &r);
399 RETERR(dns_name_digest(&name, digest, arg));
400 isc_region_consume(&r, name_length(&name));
402 return ((digest)(arg, &r));
405 static inline isc_boolean_t
406 checkowner_soa(ARGS_CHECKOWNER) {
408 REQUIRE(type == dns_rdatatype_soa);
418 static inline isc_boolean_t
419 checknames_soa(ARGS_CHECKNAMES) {
423 REQUIRE(rdata->type == dns_rdatatype_soa);
427 dns_rdata_toregion(rdata, ®ion);
428 dns_name_init(&name, NULL);
429 dns_name_fromregion(&name, ®ion);
430 if (!dns_name_ishostname(&name, ISC_FALSE)) {
432 dns_name_clone(&name, bad);
435 isc_region_consume(®ion, name_length(&name));
436 dns_name_fromregion(&name, ®ion);
437 if (!dns_name_ismailbox(&name)) {
439 dns_name_clone(&name, bad);
446 casecompare_soa(ARGS_COMPARE) {
447 return (compare_soa(rdata1, rdata2));
450 #endif /* RDATA_GENERIC_SOA_6_C */