Merge from vendor branch GCC:
[dragonfly.git] / contrib / bind-9.2.4rc7 / lib / dns / rdata / generic / mx_15.c
1 /*
2  * Copyright (C) 2004  Internet Systems Consortium, Inc. ("ISC")
3  * Copyright (C) 1998-2001, 2003  Internet Software Consortium.
4  *
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.
8  *
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.
16  */
17
18 /* $Id: mx_15.c,v 1.48.2.3 2004/03/09 06:11:31 marka Exp $ */
19
20 /* reviewed: Wed Mar 15 18:05:46 PST 2000 by brister */
21
22 #ifndef RDATA_GENERIC_MX_15_C
23 #define RDATA_GENERIC_MX_15_C
24
25 #define RRTYPE_MX_ATTRIBUTES (0)
26
27 static inline isc_result_t
28 fromtext_mx(ARGS_FROMTEXT) {
29         isc_token_t token;
30         dns_name_t name;
31         isc_buffer_t buffer;
32
33         REQUIRE(type == 15);
34
35         UNUSED(type);
36         UNUSED(rdclass);
37         UNUSED(callbacks);
38
39         RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_number,
40                                       ISC_FALSE));
41         if (token.value.as_ulong > 0xffffU)
42                 RETTOK(ISC_R_RANGE);
43         RETERR(uint16_tobuffer(token.value.as_ulong, target));
44
45         RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_string,
46                                       ISC_FALSE));
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, downcase, target));
51         return (ISC_R_SUCCESS);
52 }
53
54 static inline isc_result_t
55 totext_mx(ARGS_TOTEXT) {
56         isc_region_t region;
57         dns_name_t name;
58         dns_name_t prefix;
59         isc_boolean_t sub;
60         char buf[sizeof "64000"];
61         unsigned short num;
62
63         REQUIRE(rdata->type == 15);
64         REQUIRE(rdata->length != 0);
65
66         dns_name_init(&name, NULL);
67         dns_name_init(&prefix, NULL);
68
69         dns_rdata_toregion(rdata, &region);
70         num = uint16_fromregion(&region);
71         isc_region_consume(&region, 2);
72         sprintf(buf, "%u", num);
73         RETERR(str_totext(buf, target));
74
75         RETERR(str_totext(" ", target));
76
77         dns_name_fromregion(&name, &region);
78         sub = name_prefix(&name, tctx->origin, &prefix);
79         return (dns_name_totext(&prefix, sub, target));
80 }
81
82 static inline isc_result_t
83 fromwire_mx(ARGS_FROMWIRE) {
84         dns_name_t name;
85         isc_region_t sregion;
86
87         REQUIRE(type == 15);
88
89         UNUSED(type);
90         UNUSED(rdclass);
91
92         dns_decompress_setmethods(dctx, DNS_COMPRESS_GLOBAL14);
93
94         dns_name_init(&name, NULL);
95
96         isc_buffer_activeregion(source, &sregion);
97         if (sregion.length < 2)
98                 return (ISC_R_UNEXPECTEDEND);
99         RETERR(mem_tobuffer(target, sregion.base, 2));
100         isc_buffer_forward(source, 2);
101         return (dns_name_fromwire(&name, source, dctx, downcase, target));
102 }
103
104 static inline isc_result_t
105 towire_mx(ARGS_TOWIRE) {
106         dns_name_t name;
107         dns_offsets_t offsets;
108         isc_region_t region;
109
110         REQUIRE(rdata->type == 15);
111         REQUIRE(rdata->length != 0);
112
113         dns_compress_setmethods(cctx, DNS_COMPRESS_GLOBAL14);
114
115         dns_rdata_toregion(rdata, &region);
116         RETERR(mem_tobuffer(target, region.base, 2));
117         isc_region_consume(&region, 2);
118
119         dns_name_init(&name, offsets);
120         dns_name_fromregion(&name, &region);
121
122         return (dns_name_towire(&name, cctx, target));
123 }
124
125 static inline int
126 compare_mx(ARGS_COMPARE) {
127         dns_name_t name1;
128         dns_name_t name2;
129         isc_region_t region1;
130         isc_region_t region2;
131         int order;
132
133         REQUIRE(rdata1->type == rdata2->type);
134         REQUIRE(rdata1->rdclass == rdata2->rdclass);
135         REQUIRE(rdata1->type == 15);
136         REQUIRE(rdata1->length != 0);
137         REQUIRE(rdata2->length != 0);
138
139         order = memcmp(rdata1->data, rdata2->data, 2);
140         if (order != 0)
141                 return (order < 0 ? -1 : 1);
142
143         dns_name_init(&name1, NULL);
144         dns_name_init(&name2, NULL);
145
146         dns_rdata_toregion(rdata1, &region1);
147         dns_rdata_toregion(rdata2, &region2);
148
149         isc_region_consume(&region1, 2);
150         isc_region_consume(&region2, 2);
151
152         dns_name_fromregion(&name1, &region1);
153         dns_name_fromregion(&name2, &region2);
154
155         return (dns_name_rdatacompare(&name1, &name2));
156 }
157
158 static inline isc_result_t
159 fromstruct_mx(ARGS_FROMSTRUCT) {
160         dns_rdata_mx_t *mx = source;
161         isc_region_t region;
162
163         REQUIRE(type == 15);
164         REQUIRE(source != NULL);
165         REQUIRE(mx->common.rdtype == type);
166         REQUIRE(mx->common.rdclass == rdclass);
167
168         UNUSED(type);
169         UNUSED(rdclass);
170
171         RETERR(uint16_tobuffer(mx->pref, target));
172         dns_name_toregion(&mx->mx, &region);
173         return (isc_buffer_copyregion(target, &region));
174 }
175
176 static inline isc_result_t
177 tostruct_mx(ARGS_TOSTRUCT) {
178         isc_region_t region;
179         dns_rdata_mx_t *mx = target;
180         dns_name_t name;
181
182         REQUIRE(rdata->type == 15);
183         REQUIRE(target != NULL);
184         REQUIRE(rdata->length != 0);
185
186         mx->common.rdclass = rdata->rdclass;
187         mx->common.rdtype = rdata->type;
188         ISC_LINK_INIT(&mx->common, link);
189
190         dns_name_init(&name, NULL);
191         dns_rdata_toregion(rdata, &region);
192         mx->pref = uint16_fromregion(&region);
193         isc_region_consume(&region, 2);
194         dns_name_fromregion(&name, &region);
195         dns_name_init(&mx->mx, NULL);
196         RETERR(name_duporclone(&name, mctx, &mx->mx));
197         mx->mctx = mctx;
198         return (ISC_R_SUCCESS);
199 }
200
201 static inline void
202 freestruct_mx(ARGS_FREESTRUCT) {
203         dns_rdata_mx_t *mx = source;
204
205         REQUIRE(source != NULL);
206         REQUIRE(mx->common.rdtype == 15);
207
208         if (mx->mctx == NULL)
209                 return;
210
211         dns_name_free(&mx->mx, mx->mctx);
212         mx->mctx = NULL;
213 }
214
215 static inline isc_result_t
216 additionaldata_mx(ARGS_ADDLDATA) {
217         dns_name_t name;
218         dns_offsets_t offsets;
219         isc_region_t region;
220
221         REQUIRE(rdata->type == 15);
222
223         dns_name_init(&name, offsets);
224         dns_rdata_toregion(rdata, &region);
225         isc_region_consume(&region, 2);
226         dns_name_fromregion(&name, &region);
227
228         return ((add)(arg, &name, dns_rdatatype_a));
229 }
230
231 static inline isc_result_t
232 digest_mx(ARGS_DIGEST) {
233         isc_region_t r1, r2;
234         dns_name_t name;
235
236         REQUIRE(rdata->type == 15);
237
238         dns_rdata_toregion(rdata, &r1);
239         r2 = r1;
240         isc_region_consume(&r2, 2);
241         r1.length = 2;
242         RETERR((digest)(arg, &r1));
243         dns_name_init(&name, NULL);
244         dns_name_fromregion(&name, &r2);
245         return (dns_name_digest(&name, digest, arg));
246 }
247
248 #endif  /* RDATA_GENERIC_MX_15_C */