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