2 * Copyright (C) 2004 Internet Systems Consortium, Inc. ("ISC")
3 * Copyright (C) 1998-2002 Internet Software Consortium.
5 * Permission to use, copy, modify, and 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.
18 /* $Id: soa_6.c,v 1.53.12.6 2004/03/08 09:04:42 marka Exp $ */
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) {
42 origin = (origin != NULL) ? origin : dns_rootname;
44 for (i = 0; i < 2; i++) {
45 RETERR(isc_lex_getmastertoken(lexer, &token,
49 dns_name_init(&name, NULL);
50 buffer_fromregion(&buffer, &token.value.as_region);
51 RETTOK(dns_name_fromtext(&name, &buffer, origin,
54 if ((options & DNS_RDATA_CHECKNAMES) != 0)
57 ok = dns_name_ishostname(&name, ISC_FALSE);
60 ok = dns_name_ismailbox(&name);
64 if (!ok && (options & DNS_RDATA_CHECKNAMESFAIL) != 0)
65 RETTOK(DNS_R_BADNAME);
66 if (!ok && callbacks != NULL)
67 warn_badname(&name, lexer, callbacks);
70 RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_number,
72 RETERR(uint32_tobuffer(token.value.as_ulong, target));
74 for (i = 0; i < 4; i++) {
75 RETERR(isc_lex_getmastertoken(lexer, &token,
78 RETTOK(dns_counter_fromtext(&token.value.as_textregion, &n));
79 RETERR(uint32_tobuffer(n, target));
82 return (ISC_R_SUCCESS);
85 static const char *soa_fieldnames[5] = {
86 "serial", "refresh", "retry", "expire", "minimum"
89 static inline isc_result_t
90 totext_soa(ARGS_TOTEXT) {
97 isc_boolean_t multiline;
98 isc_boolean_t comment;
100 REQUIRE(rdata->type == 6);
101 REQUIRE(rdata->length != 0);
103 multiline = ISC_TF((tctx->flags & DNS_STYLEFLAG_MULTILINE) != 0);
104 comment = ISC_TF((tctx->flags & DNS_STYLEFLAG_COMMENT) != 0);
106 dns_name_init(&mname, NULL);
107 dns_name_init(&rname, NULL);
108 dns_name_init(&prefix, NULL);
110 dns_rdata_toregion(rdata, &dregion);
112 dns_name_fromregion(&mname, &dregion);
113 isc_region_consume(&dregion, name_length(&mname));
115 dns_name_fromregion(&rname, &dregion);
116 isc_region_consume(&dregion, name_length(&rname));
118 sub = name_prefix(&mname, tctx->origin, &prefix);
119 RETERR(dns_name_totext(&prefix, sub, target));
121 RETERR(str_totext(" ", target));
123 sub = name_prefix(&rname, tctx->origin, &prefix);
124 RETERR(dns_name_totext(&prefix, sub, target));
127 RETERR(str_totext(" (" , target));
128 RETERR(str_totext(tctx->linebreak, target));
130 for (i = 0; i < 5; i++) {
131 char buf[sizeof("2147483647")];
134 num = uint32_fromregion(&dregion);
135 isc_region_consume(&dregion, 4);
136 numlen = sprintf(buf, "%lu", num);
137 INSIST(numlen > 0 && numlen < sizeof("2147483647"));
138 RETERR(str_totext(buf, target));
139 if (multiline && comment) {
140 RETERR(str_totext(" ; " + numlen, target));
141 RETERR(str_totext(soa_fieldnames[i], target));
142 /* Print times in week/day/hour/minute/second form */
144 RETERR(str_totext(" (", target));
145 RETERR(dns_ttl_totext(num, ISC_TRUE, target));
146 RETERR(str_totext(")", target));
148 RETERR(str_totext(tctx->linebreak, target));
150 RETERR(str_totext(tctx->linebreak, target));
155 RETERR(str_totext(")", target));
157 return (ISC_R_SUCCESS);
160 static inline isc_result_t
161 fromwire_soa(ARGS_FROMWIRE) {
164 isc_region_t sregion;
165 isc_region_t tregion;
172 dns_decompress_setmethods(dctx, DNS_COMPRESS_GLOBAL14);
174 dns_name_init(&mname, NULL);
175 dns_name_init(&rname, NULL);
177 RETERR(dns_name_fromwire(&mname, source, dctx, options, target));
178 RETERR(dns_name_fromwire(&rname, source, dctx, options, target));
180 isc_buffer_activeregion(source, &sregion);
181 isc_buffer_availableregion(target, &tregion);
183 if (sregion.length < 20)
184 return (ISC_R_UNEXPECTEDEND);
185 if (tregion.length < 20)
186 return (ISC_R_NOSPACE);
188 memcpy(tregion.base, sregion.base, 20);
189 isc_buffer_forward(source, 20);
190 isc_buffer_add(target, 20);
192 return (ISC_R_SUCCESS);
195 static inline isc_result_t
196 towire_soa(ARGS_TOWIRE) {
197 isc_region_t sregion;
198 isc_region_t tregion;
201 dns_offsets_t moffsets;
202 dns_offsets_t roffsets;
204 REQUIRE(rdata->type == 6);
205 REQUIRE(rdata->length != 0);
207 dns_compress_setmethods(cctx, DNS_COMPRESS_GLOBAL14);
209 dns_name_init(&mname, moffsets);
210 dns_name_init(&rname, roffsets);
212 dns_rdata_toregion(rdata, &sregion);
214 dns_name_fromregion(&mname, &sregion);
215 isc_region_consume(&sregion, name_length(&mname));
216 RETERR(dns_name_towire(&mname, cctx, target));
218 dns_name_fromregion(&rname, &sregion);
219 isc_region_consume(&sregion, name_length(&rname));
220 RETERR(dns_name_towire(&rname, cctx, target));
222 isc_buffer_availableregion(target, &tregion);
223 if (tregion.length < 20)
224 return (ISC_R_NOSPACE);
226 memcpy(tregion.base, sregion.base, 20);
227 isc_buffer_add(target, 20);
228 return (ISC_R_SUCCESS);
232 compare_soa(ARGS_COMPARE) {
233 isc_region_t region1;
234 isc_region_t region2;
239 REQUIRE(rdata1->type == rdata2->type);
240 REQUIRE(rdata1->rdclass == rdata2->rdclass);
241 REQUIRE(rdata1->type == 6);
242 REQUIRE(rdata1->length != 0);
243 REQUIRE(rdata2->length != 0);
245 dns_name_init(&name1, NULL);
246 dns_name_init(&name2, NULL);
248 dns_rdata_toregion(rdata1, ®ion1);
249 dns_rdata_toregion(rdata2, ®ion2);
251 dns_name_fromregion(&name1, ®ion1);
252 dns_name_fromregion(&name2, ®ion2);
254 order = dns_name_rdatacompare(&name1, &name2);
258 isc_region_consume(®ion1, name_length(&name1));
259 isc_region_consume(®ion2, name_length(&name2));
261 dns_name_init(&name1, NULL);
262 dns_name_init(&name2, NULL);
264 dns_name_fromregion(&name1, ®ion1);
265 dns_name_fromregion(&name2, ®ion2);
267 order = dns_name_rdatacompare(&name1, &name2);
271 isc_region_consume(®ion1, name_length(&name1));
272 isc_region_consume(®ion2, name_length(&name2));
274 return (isc_region_compare(®ion1, ®ion2));
277 static inline isc_result_t
278 fromstruct_soa(ARGS_FROMSTRUCT) {
279 dns_rdata_soa_t *soa = source;
283 REQUIRE(source != NULL);
284 REQUIRE(soa->common.rdtype == type);
285 REQUIRE(soa->common.rdclass == rdclass);
290 dns_name_toregion(&soa->origin, ®ion);
291 RETERR(isc_buffer_copyregion(target, ®ion));
292 dns_name_toregion(&soa->contact, ®ion);
293 RETERR(isc_buffer_copyregion(target, ®ion));
294 RETERR(uint32_tobuffer(soa->serial, target));
295 RETERR(uint32_tobuffer(soa->refresh, target));
296 RETERR(uint32_tobuffer(soa->retry, target));
297 RETERR(uint32_tobuffer(soa->expire, target));
298 return (uint32_tobuffer(soa->minimum, target));
301 static inline isc_result_t
302 tostruct_soa(ARGS_TOSTRUCT) {
304 dns_rdata_soa_t *soa = target;
308 REQUIRE(rdata->type == 6);
309 REQUIRE(target != NULL);
310 REQUIRE(rdata->length != 0);
312 soa->common.rdclass = rdata->rdclass;
313 soa->common.rdtype = rdata->type;
314 ISC_LINK_INIT(&soa->common, link);
317 dns_rdata_toregion(rdata, ®ion);
319 dns_name_init(&name, NULL);
320 dns_name_fromregion(&name, ®ion);
321 isc_region_consume(®ion, name_length(&name));
322 dns_name_init(&soa->origin, NULL);
323 RETERR(name_duporclone(&name, mctx, &soa->origin));
325 dns_name_fromregion(&name, ®ion);
326 isc_region_consume(®ion, name_length(&name));
327 dns_name_init(&soa->contact, NULL);
328 result = name_duporclone(&name, mctx, &soa->contact);
329 if (result != ISC_R_SUCCESS)
332 soa->serial = uint32_fromregion(®ion);
333 isc_region_consume(®ion, 4);
335 soa->refresh = uint32_fromregion(®ion);
336 isc_region_consume(®ion, 4);
338 soa->retry = uint32_fromregion(®ion);
339 isc_region_consume(®ion, 4);
341 soa->expire = uint32_fromregion(®ion);
342 isc_region_consume(®ion, 4);
344 soa->minimum = uint32_fromregion(®ion);
347 return (ISC_R_SUCCESS);
351 dns_name_free(&soa->origin, mctx);
352 return (ISC_R_NOMEMORY);
356 freestruct_soa(ARGS_FREESTRUCT) {
357 dns_rdata_soa_t *soa = source;
359 REQUIRE(source != NULL);
360 REQUIRE(soa->common.rdtype == 6);
362 if (soa->mctx == NULL)
365 dns_name_free(&soa->origin, soa->mctx);
366 dns_name_free(&soa->contact, soa->mctx);
370 static inline isc_result_t
371 additionaldata_soa(ARGS_ADDLDATA) {
376 REQUIRE(rdata->type == 6);
378 return (ISC_R_SUCCESS);
381 static inline isc_result_t
382 digest_soa(ARGS_DIGEST) {
386 REQUIRE(rdata->type == 6);
388 dns_rdata_toregion(rdata, &r);
390 dns_name_init(&name, NULL);
391 dns_name_fromregion(&name, &r);
392 RETERR(dns_name_digest(&name, digest, arg));
393 isc_region_consume(&r, name_length(&name));
395 dns_name_init(&name, NULL);
396 dns_name_fromregion(&name, &r);
397 RETERR(dns_name_digest(&name, digest, arg));
398 isc_region_consume(&r, name_length(&name));
400 return ((digest)(arg, &r));
403 static inline isc_boolean_t
404 checkowner_soa(ARGS_CHECKOWNER) {
416 static inline isc_boolean_t
417 checknames_soa(ARGS_CHECKNAMES) {
421 REQUIRE(rdata->type == 6);
425 dns_rdata_toregion(rdata, ®ion);
426 dns_name_init(&name, NULL);
427 dns_name_fromregion(&name, ®ion);
428 if (!dns_name_ishostname(&name, ISC_FALSE)) {
430 dns_name_clone(&name, bad);
433 isc_region_consume(®ion, name_length(&name));
434 dns_name_fromregion(&name, ®ion);
435 if (!dns_name_ismailbox(&name)) {
437 dns_name_clone(&name, bad);
443 #endif /* RDATA_GENERIC_SOA_6_C */