1 /* $NetBSD: a_1.c,v 1.5 2014/12/10 04:37:58 christos Exp $ */
2
3 /*
4 * Copyright (C) 2005, 2007, 2009, 2014 Internet Systems Consortium, Inc. ("ISC")
5 *
6 * Permission to use, copy, modify, and/or distribute this software for any
7 * purpose with or without fee is hereby granted, provided that the above
8 * copyright notice and this permission notice appear in all copies.
9 *
10 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH
11 * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
12 * AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT,
13 * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
14 * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
15 * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
16 * PERFORMANCE OF THIS SOFTWARE.
17 */
18
19 /* Id: a_1.c,v 1.8 2009/12/04 22:06:37 tbox Exp */
20
21 /* by Bjorn.Victor@it.uu.se, 2005-05-07 */
22 /* Based on generic/soa_6.c and generic/mx_15.c */
23
24 #ifndef RDATA_CH_3_A_1_C
25 #define RDATA_CH_3_A_1_C
26
27 #include <isc/net.h>
28
29 #define RRTYPE_A_ATTRIBUTES (0)
30
31 static inline isc_result_t
fromtext_ch_a(ARGS_FROMTEXT)32 fromtext_ch_a(ARGS_FROMTEXT) {
33 isc_token_t token;
34 dns_name_t name;
35 isc_buffer_t buffer;
36
37 REQUIRE(type == 1);
38 REQUIRE(rdclass == dns_rdataclass_ch); /* 3 */
39
40 UNUSED(type);
41 UNUSED(callbacks);
42
43 RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_string,
44 ISC_FALSE));
45
46 /* get domain name */
47 dns_name_init(&name, NULL);
48 buffer_fromregion(&buffer, &token.value.as_region);
49 origin = (origin != NULL) ? origin : dns_rootname;
50 RETTOK(dns_name_fromtext(&name, &buffer, origin, options, target));
51 if ((options & DNS_RDATA_CHECKNAMES) != 0 &&
52 (options & DNS_RDATA_CHECKREVERSE) != 0) {
53 isc_boolean_t ok;
54 ok = dns_name_ishostname(&name, ISC_FALSE);
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 /* 16-bit octal address */
62 RETERR(isc_lex_getoctaltoken(lexer, &token, ISC_FALSE));
63 if (token.value.as_ulong > 0xffffU)
64 RETTOK(ISC_R_RANGE);
65 return (uint16_tobuffer(token.value.as_ulong, target));
66 }
67
68 static inline isc_result_t
totext_ch_a(ARGS_TOTEXT)69 totext_ch_a(ARGS_TOTEXT) {
70 isc_region_t region;
71 dns_name_t name;
72 dns_name_t prefix;
73 isc_boolean_t sub;
74 char buf[sizeof("0177777")];
75 isc_uint16_t addr;
76
77 REQUIRE(rdata->type == 1);
78 REQUIRE(rdata->rdclass == dns_rdataclass_ch); /* 3 */
79 REQUIRE(rdata->length != 0);
80
81 dns_name_init(&name, NULL);
82 dns_name_init(&prefix, NULL);
83
84 dns_rdata_toregion(rdata, ®ion);
85 dns_name_fromregion(&name, ®ion);
86 isc_region_consume(®ion, name_length(&name));
87 addr = uint16_fromregion(®ion);
88
89 sub = name_prefix(&name, tctx->origin, &prefix);
90 RETERR(dns_name_totext(&prefix, sub, target));
91
92 sprintf(buf, "%o", addr); /* note octal */
93 RETERR(str_totext(" ", target));
94 return (str_totext(buf, target));
95 }
96
97 static inline isc_result_t
fromwire_ch_a(ARGS_FROMWIRE)98 fromwire_ch_a(ARGS_FROMWIRE) {
99 isc_region_t sregion;
100 isc_region_t tregion;
101 dns_name_t name;
102
103 REQUIRE(type == 1);
104 REQUIRE(rdclass == dns_rdataclass_ch);
105
106 UNUSED(type);
107 UNUSED(rdclass);
108
109 dns_decompress_setmethods(dctx, DNS_COMPRESS_GLOBAL14);
110
111 dns_name_init(&name, NULL);
112
113 RETERR(dns_name_fromwire(&name, source, dctx, options, target));
114
115 isc_buffer_activeregion(source, &sregion);
116 isc_buffer_availableregion(target, &tregion);
117 if (sregion.length < 2)
118 return (ISC_R_UNEXPECTEDEND);
119 if (tregion.length < 2)
120 return (ISC_R_NOSPACE);
121
122 memmove(tregion.base, sregion.base, 2);
123 isc_buffer_forward(source, 2);
124 isc_buffer_add(target, 2);
125
126 return (ISC_R_SUCCESS);
127 }
128
129 static inline isc_result_t
towire_ch_a(ARGS_TOWIRE)130 towire_ch_a(ARGS_TOWIRE) {
131 dns_name_t name;
132 dns_offsets_t offsets;
133 isc_region_t sregion;
134 isc_region_t tregion;
135
136 REQUIRE(rdata->type == 1);
137 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
138 REQUIRE(rdata->length != 0);
139
140 dns_compress_setmethods(cctx, DNS_COMPRESS_GLOBAL14);
141
142 dns_name_init(&name, offsets);
143
144 dns_rdata_toregion(rdata, &sregion);
145
146 dns_name_fromregion(&name, &sregion);
147 isc_region_consume(&sregion, name_length(&name));
148 RETERR(dns_name_towire(&name, cctx, target));
149
150 isc_buffer_availableregion(target, &tregion);
151 if (tregion.length < 2)
152 return (ISC_R_NOSPACE);
153
154 memmove(tregion.base, sregion.base, 2);
155 isc_buffer_add(target, 2);
156 return (ISC_R_SUCCESS);
157 }
158
159 static inline int
compare_ch_a(ARGS_COMPARE)160 compare_ch_a(ARGS_COMPARE) {
161 dns_name_t name1;
162 dns_name_t name2;
163 isc_region_t region1;
164 isc_region_t region2;
165 int order;
166
167 REQUIRE(rdata1->type == rdata2->type);
168 REQUIRE(rdata1->rdclass == rdata2->rdclass);
169 REQUIRE(rdata1->type == 1);
170 REQUIRE(rdata1->rdclass == dns_rdataclass_ch);
171 REQUIRE(rdata1->length != 0);
172 REQUIRE(rdata2->length != 0);
173
174 dns_name_init(&name1, NULL);
175 dns_name_init(&name2, NULL);
176
177 dns_rdata_toregion(rdata1, ®ion1);
178 dns_rdata_toregion(rdata2, ®ion2);
179
180 dns_name_fromregion(&name1, ®ion1);
181 dns_name_fromregion(&name2, ®ion2);
182 isc_region_consume(®ion1, name_length(&name1));
183 isc_region_consume(®ion2, name_length(&name2));
184
185 order = dns_name_rdatacompare(&name1, &name2);
186 if (order != 0)
187 return (order);
188
189 order = memcmp(rdata1->data, rdata2->data, 2);
190 if (order != 0)
191 order = (order < 0) ? -1 : 1;
192 return (order);
193 }
194
195 static inline isc_result_t
fromstruct_ch_a(ARGS_FROMSTRUCT)196 fromstruct_ch_a(ARGS_FROMSTRUCT) {
197 dns_rdata_ch_a_t *a = source;
198 isc_region_t region;
199
200 REQUIRE(type == 1);
201 REQUIRE(source != NULL);
202 REQUIRE(a->common.rdtype == type);
203 REQUIRE(a->common.rdclass == rdclass);
204
205 UNUSED(type);
206 UNUSED(rdclass);
207
208 dns_name_toregion(&a->ch_addr_dom, ®ion);
209 RETERR(isc_buffer_copyregion(target, ®ion));
210
211 return (uint16_tobuffer(ntohs(a->ch_addr), target));
212 }
213
214 static inline isc_result_t
tostruct_ch_a(ARGS_TOSTRUCT)215 tostruct_ch_a(ARGS_TOSTRUCT) {
216 dns_rdata_ch_a_t *a = target;
217 isc_region_t region;
218 dns_name_t name;
219
220 REQUIRE(rdata->type == 1);
221 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
222 REQUIRE(rdata->length != 0);
223
224 a->common.rdclass = rdata->rdclass;
225 a->common.rdtype = rdata->type;
226 ISC_LINK_INIT(&a->common, link);
227
228 dns_rdata_toregion(rdata, ®ion);
229
230 dns_name_init(&name, NULL);
231 dns_name_fromregion(&name, ®ion);
232 isc_region_consume(®ion, name_length(&name));
233
234 dns_name_init(&a->ch_addr_dom, NULL);
235 RETERR(name_duporclone(&name, mctx, &a->ch_addr_dom));
236 a->ch_addr = htons(uint16_fromregion(®ion));
237 a->mctx = mctx;
238 return (ISC_R_SUCCESS);
239 }
240
241 static inline void
freestruct_ch_a(ARGS_FREESTRUCT)242 freestruct_ch_a(ARGS_FREESTRUCT) {
243 dns_rdata_ch_a_t *a = source;
244
245 REQUIRE(source != NULL);
246 REQUIRE(a->common.rdtype == 1);
247
248 if (a->mctx == NULL)
249 return;
250
251 dns_name_free(&a->ch_addr_dom, a->mctx);
252 a->mctx = NULL;
253 }
254
255 static inline isc_result_t
additionaldata_ch_a(ARGS_ADDLDATA)256 additionaldata_ch_a(ARGS_ADDLDATA) {
257
258 REQUIRE(rdata->type == 1);
259 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
260
261 UNUSED(rdata);
262 UNUSED(add);
263 UNUSED(arg);
264
265 return (ISC_R_SUCCESS);
266 }
267
268 static inline isc_result_t
digest_ch_a(ARGS_DIGEST)269 digest_ch_a(ARGS_DIGEST) {
270 isc_region_t r;
271
272 dns_name_t name;
273
274 REQUIRE(rdata->type == 1);
275 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
276
277 dns_rdata_toregion(rdata, &r);
278 dns_name_init(&name, NULL);
279 dns_name_fromregion(&name, &r);
280 isc_region_consume(&r, name_length(&name));
281 RETERR(dns_name_digest(&name, digest, arg));
282 return ((digest)(arg, &r));
283 }
284
285 static inline isc_boolean_t
checkowner_ch_a(ARGS_CHECKOWNER)286 checkowner_ch_a(ARGS_CHECKOWNER) {
287
288 REQUIRE(type == 1);
289 REQUIRE(rdclass == dns_rdataclass_ch);
290
291 UNUSED(type);
292
293 return (dns_name_ishostname(name, wildcard));
294 }
295
296 static inline isc_boolean_t
checknames_ch_a(ARGS_CHECKNAMES)297 checknames_ch_a(ARGS_CHECKNAMES) {
298 isc_region_t region;
299 dns_name_t name;
300
301 REQUIRE(rdata->type == 1);
302 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
303
304 UNUSED(owner);
305
306 dns_rdata_toregion(rdata, ®ion);
307 dns_name_init(&name, NULL);
308 dns_name_fromregion(&name, ®ion);
309 if (!dns_name_ishostname(&name, ISC_FALSE)) {
310 if (bad != NULL)
311 dns_name_clone(&name, bad);
312 return (ISC_FALSE);
313 }
314
315 return (ISC_TRUE);
316 }
317
318 static inline int
casecompare_ch_a(ARGS_COMPARE)319 casecompare_ch_a(ARGS_COMPARE) {
320 return (compare_ch_a(rdata1, rdata2));
321 }
322 #endif /* RDATA_CH_3_A_1_C */
323