1 /*
2 * Copyright (C) Internet Systems Consortium, Inc. ("ISC")
3 *
4 * SPDX-License-Identifier: MPL-2.0
5 *
6 * This Source Code Form is subject to the terms of the Mozilla Public
7 * License, v. 2.0. If a copy of the MPL was not distributed with this
8 * file, you can obtain one at https://mozilla.org/MPL/2.0/.
9 *
10 * See the COPYRIGHT file distributed with this work for additional
11 * information regarding copyright ownership.
12 */
13
14 /* by Bjorn.Victor@it.uu.se, 2005-05-07 */
15 /* Based on generic/soa_6.c and generic/mx_15.c */
16
17 #ifndef RDATA_CH_3_A_1_C
18 #define RDATA_CH_3_A_1_C
19
20 #include <isc/net.h>
21
22 #define RRTYPE_A_ATTRIBUTES (0)
23
24 static inline isc_result_t
fromtext_ch_a(ARGS_FROMTEXT)25 fromtext_ch_a(ARGS_FROMTEXT) {
26 isc_token_t token;
27 dns_name_t name;
28 isc_buffer_t buffer;
29
30 REQUIRE(type == dns_rdatatype_a);
31 REQUIRE(rdclass == dns_rdataclass_ch); /* 3 */
32
33 UNUSED(type);
34 UNUSED(callbacks);
35
36 RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_string,
37 false));
38
39 /* get domain name */
40 dns_name_init(&name, NULL);
41 buffer_fromregion(&buffer, &token.value.as_region);
42 if (origin == NULL) {
43 origin = dns_rootname;
44 }
45 RETTOK(dns_name_fromtext(&name, &buffer, origin, options, target));
46 if ((options & DNS_RDATA_CHECKNAMES) != 0 &&
47 (options & DNS_RDATA_CHECKREVERSE) != 0)
48 {
49 bool ok;
50 ok = dns_name_ishostname(&name, false);
51 if (!ok && (options & DNS_RDATA_CHECKNAMESFAIL) != 0) {
52 RETTOK(DNS_R_BADNAME);
53 }
54 if (!ok && callbacks != NULL) {
55 warn_badname(&name, lexer, callbacks);
56 }
57 }
58
59 /* 16-bit octal address */
60 RETERR(isc_lex_getoctaltoken(lexer, &token, false));
61 if (token.value.as_ulong > 0xffffU) {
62 RETTOK(ISC_R_RANGE);
63 }
64 return (uint16_tobuffer(token.value.as_ulong, target));
65 }
66
67 static inline isc_result_t
totext_ch_a(ARGS_TOTEXT)68 totext_ch_a(ARGS_TOTEXT) {
69 isc_region_t region;
70 dns_name_t name;
71 dns_name_t prefix;
72 bool sub;
73 char buf[sizeof("0177777")];
74 uint16_t addr;
75
76 REQUIRE(rdata->type == dns_rdatatype_a);
77 REQUIRE(rdata->rdclass == dns_rdataclass_ch); /* 3 */
78 REQUIRE(rdata->length != 0);
79
80 dns_name_init(&name, NULL);
81 dns_name_init(&prefix, NULL);
82
83 dns_rdata_toregion(rdata, ®ion);
84 dns_name_fromregion(&name, ®ion);
85 isc_region_consume(®ion, name_length(&name));
86 addr = uint16_fromregion(®ion);
87
88 sub = name_prefix(&name, tctx->origin, &prefix);
89 RETERR(dns_name_totext(&prefix, sub, target));
90
91 snprintf(buf, sizeof(buf), "%o", addr); /* note octal */
92 RETERR(str_totext(" ", target));
93 return (str_totext(buf, target));
94 }
95
96 static inline isc_result_t
fromwire_ch_a(ARGS_FROMWIRE)97 fromwire_ch_a(ARGS_FROMWIRE) {
98 isc_region_t sregion;
99 isc_region_t tregion;
100 dns_name_t name;
101
102 REQUIRE(type == dns_rdatatype_a);
103 REQUIRE(rdclass == dns_rdataclass_ch);
104
105 UNUSED(type);
106 UNUSED(rdclass);
107
108 dns_decompress_setmethods(dctx, DNS_COMPRESS_GLOBAL14);
109
110 dns_name_init(&name, NULL);
111
112 RETERR(dns_name_fromwire(&name, source, dctx, options, target));
113
114 isc_buffer_activeregion(source, &sregion);
115 isc_buffer_availableregion(target, &tregion);
116 if (sregion.length < 2) {
117 return (ISC_R_UNEXPECTEDEND);
118 }
119 if (tregion.length < 2) {
120 return (ISC_R_NOSPACE);
121 }
122
123 memmove(tregion.base, sregion.base, 2);
124 isc_buffer_forward(source, 2);
125 isc_buffer_add(target, 2);
126
127 return (ISC_R_SUCCESS);
128 }
129
130 static inline isc_result_t
towire_ch_a(ARGS_TOWIRE)131 towire_ch_a(ARGS_TOWIRE) {
132 dns_name_t name;
133 dns_offsets_t offsets;
134 isc_region_t sregion;
135 isc_region_t tregion;
136
137 REQUIRE(rdata->type == dns_rdatatype_a);
138 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
139 REQUIRE(rdata->length != 0);
140
141 dns_compress_setmethods(cctx, DNS_COMPRESS_GLOBAL14);
142
143 dns_name_init(&name, offsets);
144
145 dns_rdata_toregion(rdata, &sregion);
146
147 dns_name_fromregion(&name, &sregion);
148 isc_region_consume(&sregion, name_length(&name));
149 RETERR(dns_name_towire(&name, cctx, target));
150
151 isc_buffer_availableregion(target, &tregion);
152 if (tregion.length < 2) {
153 return (ISC_R_NOSPACE);
154 }
155
156 memmove(tregion.base, sregion.base, 2);
157 isc_buffer_add(target, 2);
158 return (ISC_R_SUCCESS);
159 }
160
161 static inline int
compare_ch_a(ARGS_COMPARE)162 compare_ch_a(ARGS_COMPARE) {
163 dns_name_t name1;
164 dns_name_t name2;
165 isc_region_t region1;
166 isc_region_t region2;
167 int order;
168
169 REQUIRE(rdata1->type == rdata2->type);
170 REQUIRE(rdata1->rdclass == rdata2->rdclass);
171 REQUIRE(rdata1->type == dns_rdatatype_a);
172 REQUIRE(rdata1->rdclass == dns_rdataclass_ch);
173 REQUIRE(rdata1->length != 0);
174 REQUIRE(rdata2->length != 0);
175
176 dns_name_init(&name1, NULL);
177 dns_name_init(&name2, NULL);
178
179 dns_rdata_toregion(rdata1, ®ion1);
180 dns_rdata_toregion(rdata2, ®ion2);
181
182 dns_name_fromregion(&name1, ®ion1);
183 dns_name_fromregion(&name2, ®ion2);
184 isc_region_consume(®ion1, name_length(&name1));
185 isc_region_consume(®ion2, name_length(&name2));
186
187 order = dns_name_rdatacompare(&name1, &name2);
188 if (order != 0) {
189 return (order);
190 }
191
192 order = memcmp(region1.base, region2.base, 2);
193 if (order != 0) {
194 order = (order < 0) ? -1 : 1;
195 }
196 return (order);
197 }
198
199 static inline isc_result_t
fromstruct_ch_a(ARGS_FROMSTRUCT)200 fromstruct_ch_a(ARGS_FROMSTRUCT) {
201 dns_rdata_ch_a_t *a = source;
202 isc_region_t region;
203
204 REQUIRE(type == dns_rdatatype_a);
205 REQUIRE(a != NULL);
206 REQUIRE(a->common.rdtype == type);
207 REQUIRE(a->common.rdclass == rdclass);
208
209 UNUSED(type);
210 UNUSED(rdclass);
211
212 dns_name_toregion(&a->ch_addr_dom, ®ion);
213 RETERR(isc_buffer_copyregion(target, ®ion));
214
215 return (uint16_tobuffer(ntohs(a->ch_addr), target));
216 }
217
218 static inline isc_result_t
tostruct_ch_a(ARGS_TOSTRUCT)219 tostruct_ch_a(ARGS_TOSTRUCT) {
220 dns_rdata_ch_a_t *a = target;
221 isc_region_t region;
222 dns_name_t name;
223
224 REQUIRE(rdata->type == dns_rdatatype_a);
225 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
226 REQUIRE(rdata->length != 0);
227
228 a->common.rdclass = rdata->rdclass;
229 a->common.rdtype = rdata->type;
230 ISC_LINK_INIT(&a->common, link);
231
232 dns_rdata_toregion(rdata, ®ion);
233
234 dns_name_init(&name, NULL);
235 dns_name_fromregion(&name, ®ion);
236 isc_region_consume(®ion, name_length(&name));
237
238 dns_name_init(&a->ch_addr_dom, NULL);
239 RETERR(name_duporclone(&name, mctx, &a->ch_addr_dom));
240 a->ch_addr = htons(uint16_fromregion(®ion));
241 a->mctx = mctx;
242 return (ISC_R_SUCCESS);
243 }
244
245 static inline void
freestruct_ch_a(ARGS_FREESTRUCT)246 freestruct_ch_a(ARGS_FREESTRUCT) {
247 dns_rdata_ch_a_t *a = source;
248
249 REQUIRE(a != NULL);
250 REQUIRE(a->common.rdtype == dns_rdatatype_a);
251
252 if (a->mctx == NULL) {
253 return;
254 }
255
256 dns_name_free(&a->ch_addr_dom, a->mctx);
257 a->mctx = NULL;
258 }
259
260 static inline isc_result_t
additionaldata_ch_a(ARGS_ADDLDATA)261 additionaldata_ch_a(ARGS_ADDLDATA) {
262 REQUIRE(rdata->type == dns_rdatatype_a);
263 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
264
265 UNUSED(rdata);
266 UNUSED(add);
267 UNUSED(arg);
268
269 return (ISC_R_SUCCESS);
270 }
271
272 static inline isc_result_t
digest_ch_a(ARGS_DIGEST)273 digest_ch_a(ARGS_DIGEST) {
274 isc_region_t r;
275 dns_name_t name;
276
277 REQUIRE(rdata->type == dns_rdatatype_a);
278 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
279
280 dns_rdata_toregion(rdata, &r);
281 dns_name_init(&name, NULL);
282 dns_name_fromregion(&name, &r);
283 isc_region_consume(&r, name_length(&name));
284 RETERR(dns_name_digest(&name, digest, arg));
285 return ((digest)(arg, &r));
286 }
287
288 static inline bool
checkowner_ch_a(ARGS_CHECKOWNER)289 checkowner_ch_a(ARGS_CHECKOWNER) {
290 REQUIRE(type == dns_rdatatype_a);
291 REQUIRE(rdclass == dns_rdataclass_ch);
292
293 UNUSED(type);
294
295 return (dns_name_ishostname(name, wildcard));
296 }
297
298 static inline bool
checknames_ch_a(ARGS_CHECKNAMES)299 checknames_ch_a(ARGS_CHECKNAMES) {
300 isc_region_t region;
301 dns_name_t name;
302
303 REQUIRE(rdata->type == dns_rdatatype_a);
304 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
305
306 UNUSED(owner);
307
308 dns_rdata_toregion(rdata, ®ion);
309 dns_name_init(&name, NULL);
310 dns_name_fromregion(&name, ®ion);
311 if (!dns_name_ishostname(&name, false)) {
312 if (bad != NULL) {
313 dns_name_clone(&name, bad);
314 }
315 return (false);
316 }
317
318 return (true);
319 }
320
321 static inline int
casecompare_ch_a(ARGS_COMPARE)322 casecompare_ch_a(ARGS_COMPARE) {
323 return (compare_ch_a(rdata1, rdata2));
324 }
325 #endif /* RDATA_CH_3_A_1_C */
326