2 * Copyright (C) 2005, 2007 Internet Systems Consortium, Inc. ("ISC")
4 * Permission to use, copy, modify, and/or distribute this software for any
5 * purpose with or without fee is hereby granted, provided that the above
6 * copyright notice and this permission notice appear in all copies.
8 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH
9 * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
10 * AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT,
11 * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
12 * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
13 * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
14 * PERFORMANCE OF THIS SOFTWARE.
17 /* $Id: a_1.c,v 1.6 2007/06/19 23:47:17 tbox Exp $ */
19 /* by Bjorn.Victor@it.uu.se, 2005-05-07 */
20 /* Based on generic/soa_6.c and generic/mx_15.c */
22 #ifndef RDATA_CH_3_A_1_C
23 #define RDATA_CH_3_A_1_C
27 #define RRTYPE_A_ATTRIBUTES (0)
29 static inline isc_result_t
30 fromtext_ch_a(ARGS_FROMTEXT) {
36 REQUIRE(rdclass == dns_rdataclass_ch); /* 3 */
41 RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_string,
45 dns_name_init(&name, NULL);
46 buffer_fromregion(&buffer, &token.value.as_region);
47 origin = (origin != NULL) ? origin : dns_rootname;
48 RETTOK(dns_name_fromtext(&name, &buffer, origin, options, target));
49 if ((options & DNS_RDATA_CHECKNAMES) != 0 &&
50 (options & DNS_RDATA_CHECKREVERSE) != 0) {
52 ok = dns_name_ishostname(&name, ISC_FALSE);
53 if (!ok && (options & DNS_RDATA_CHECKNAMESFAIL) != 0)
54 RETTOK(DNS_R_BADNAME);
55 if (!ok && callbacks != NULL)
56 warn_badname(&name, lexer, callbacks);
59 /* 16-bit octal address */
60 RETERR(isc_lex_getoctaltoken(lexer, &token, ISC_FALSE));
61 if (token.value.as_ulong > 0xffffU)
63 return (uint16_tobuffer(token.value.as_ulong, target));
66 static inline isc_result_t
67 totext_ch_a(ARGS_TOTEXT) {
72 char buf[sizeof("0177777")];
75 REQUIRE(rdata->type == 1);
76 REQUIRE(rdata->rdclass == dns_rdataclass_ch); /* 3 */
77 REQUIRE(rdata->length != 0);
79 dns_name_init(&name, NULL);
80 dns_name_init(&prefix, NULL);
82 dns_rdata_toregion(rdata, ®ion);
83 dns_name_fromregion(&name, ®ion);
84 isc_region_consume(®ion, name_length(&name));
85 addr = uint16_fromregion(®ion);
87 sub = name_prefix(&name, tctx->origin, &prefix);
88 RETERR(dns_name_totext(&prefix, sub, target));
90 sprintf(buf, "%o", addr); /* note octal */
91 RETERR(str_totext(" ", target));
92 return (str_totext(buf, target));
95 static inline isc_result_t
96 fromwire_ch_a(ARGS_FROMWIRE) {
102 REQUIRE(rdclass == dns_rdataclass_ch);
107 dns_decompress_setmethods(dctx, DNS_COMPRESS_GLOBAL14);
109 dns_name_init(&name, NULL);
111 RETERR(dns_name_fromwire(&name, source, dctx, options, target));
113 isc_buffer_activeregion(source, &sregion);
114 isc_buffer_availableregion(target, &tregion);
115 if (sregion.length < 2)
116 return (ISC_R_UNEXPECTEDEND);
117 if (tregion.length < 2)
118 return (ISC_R_NOSPACE);
120 memcpy(tregion.base, sregion.base, 2);
121 isc_buffer_forward(source, 2);
122 isc_buffer_add(target, 2);
124 return (ISC_R_SUCCESS);
127 static inline isc_result_t
128 towire_ch_a(ARGS_TOWIRE) {
130 dns_offsets_t offsets;
131 isc_region_t sregion;
132 isc_region_t tregion;
134 REQUIRE(rdata->type == 1);
135 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
136 REQUIRE(rdata->length != 0);
138 dns_compress_setmethods(cctx, DNS_COMPRESS_GLOBAL14);
140 dns_name_init(&name, offsets);
142 dns_rdata_toregion(rdata, &sregion);
144 dns_name_fromregion(&name, &sregion);
145 isc_region_consume(&sregion, name_length(&name));
146 RETERR(dns_name_towire(&name, cctx, target));
148 isc_buffer_availableregion(target, &tregion);
149 if (tregion.length < 2)
150 return (ISC_R_NOSPACE);
152 memcpy(tregion.base, sregion.base, 2);
153 isc_buffer_add(target, 2);
154 return (ISC_R_SUCCESS);
158 compare_ch_a(ARGS_COMPARE) {
161 isc_region_t region1;
162 isc_region_t region2;
165 REQUIRE(rdata1->type == rdata2->type);
166 REQUIRE(rdata1->rdclass == rdata2->rdclass);
167 REQUIRE(rdata1->type == 1);
168 REQUIRE(rdata1->rdclass == dns_rdataclass_ch);
169 REQUIRE(rdata1->length != 0);
170 REQUIRE(rdata2->length != 0);
172 dns_name_init(&name1, NULL);
173 dns_name_init(&name2, NULL);
175 dns_rdata_toregion(rdata1, ®ion1);
176 dns_rdata_toregion(rdata2, ®ion2);
178 dns_name_fromregion(&name1, ®ion1);
179 dns_name_fromregion(&name2, ®ion2);
180 isc_region_consume(®ion1, name_length(&name1));
181 isc_region_consume(®ion2, name_length(&name2));
183 order = dns_name_rdatacompare(&name1, &name2);
187 order = memcmp(rdata1->data, rdata2->data, 2);
189 order = (order < 0) ? -1 : 1;
193 static inline isc_result_t
194 fromstruct_ch_a(ARGS_FROMSTRUCT) {
195 dns_rdata_ch_a_t *a = source;
199 REQUIRE(source != NULL);
200 REQUIRE(a->common.rdtype == type);
201 REQUIRE(a->common.rdclass == rdclass);
206 dns_name_toregion(&a->ch_addr_dom, ®ion);
207 RETERR(isc_buffer_copyregion(target, ®ion));
209 return (uint16_tobuffer(ntohs(a->ch_addr), target));
212 static inline isc_result_t
213 tostruct_ch_a(ARGS_TOSTRUCT) {
214 dns_rdata_ch_a_t *a = target;
218 REQUIRE(rdata->type == 1);
219 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
220 REQUIRE(rdata->length != 0);
222 a->common.rdclass = rdata->rdclass;
223 a->common.rdtype = rdata->type;
224 ISC_LINK_INIT(&a->common, link);
226 dns_rdata_toregion(rdata, ®ion);
228 dns_name_init(&name, NULL);
229 dns_name_fromregion(&name, ®ion);
230 isc_region_consume(®ion, name_length(&name));
232 dns_name_init(&a->ch_addr_dom, NULL);
233 RETERR(name_duporclone(&name, mctx, &a->ch_addr_dom));
234 a->ch_addr = htons(uint16_fromregion(®ion));
236 return (ISC_R_SUCCESS);
240 freestruct_ch_a(ARGS_FREESTRUCT) {
241 dns_rdata_ch_a_t *a = source;
243 REQUIRE(source != NULL);
244 REQUIRE(a->common.rdtype == 1);
249 dns_name_free(&a->ch_addr_dom, a->mctx);
253 static inline isc_result_t
254 additionaldata_ch_a(ARGS_ADDLDATA) {
256 REQUIRE(rdata->type == 1);
257 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
263 return (ISC_R_SUCCESS);
266 static inline isc_result_t
267 digest_ch_a(ARGS_DIGEST) {
272 REQUIRE(rdata->type == 1);
273 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
275 dns_rdata_toregion(rdata, &r);
276 dns_name_init(&name, NULL);
277 dns_name_fromregion(&name, &r);
278 isc_region_consume(&r, name_length(&name));
279 RETERR(dns_name_digest(&name, digest, arg));
280 return ((digest)(arg, &r));
283 static inline isc_boolean_t
284 checkowner_ch_a(ARGS_CHECKOWNER) {
287 REQUIRE(rdclass == dns_rdataclass_ch);
291 return (dns_name_ishostname(name, wildcard));
294 static inline isc_boolean_t
295 checknames_ch_a(ARGS_CHECKNAMES) {
299 REQUIRE(rdata->type == 1);
300 REQUIRE(rdata->rdclass == dns_rdataclass_ch);
304 dns_rdata_toregion(rdata, ®ion);
305 dns_name_init(&name, NULL);
306 dns_name_fromregion(&name, ®ion);
307 if (!dns_name_ishostname(&name, ISC_FALSE)) {
309 dns_name_clone(&name, bad);
316 #endif /* RDATA_CH_3_A_1_C */