2 * Copyright (C) 2004 Internet Systems Consortium, Inc. ("ISC")
3 * Copyright (C) 2000-2002 Internet Software Consortium.
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.
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.
18 /* $Id: lwdgnba.c,v 1.13.2.1.2.5 2004/03/08 04:04:19 marka Exp $ */
22 #include <isc/socket.h>
23 #include <isc/string.h> /* Required for HP/UX (and others?) */
27 #include <dns/byaddr.h>
28 #include <dns/result.h>
30 #include <named/types.h>
31 #include <named/lwdclient.h>
33 static void start_byaddr(ns_lwdclient_t *);
36 byaddr_done(isc_task_t *task, isc_event_t *event) {
37 ns_lwdclient_t *client;
38 ns_lwdclientmgr_t *cm;
39 dns_byaddrevent_t *bevent;
44 lwres_result_t lwresult;
47 lwres_gnbaresponse_t *gnba;
48 isc_uint16_t naliases;
53 client = event->ev_arg;
54 cm = client->clientmgr;
55 INSIST(client->byaddr == (dns_byaddr_t *)event->ev_sender);
57 bevent = (dns_byaddrevent_t *)event;
60 ns_lwdclient_log(50, "byaddr event result = %s",
61 isc_result_totext(bevent->result));
63 result = bevent->result;
64 if (result != ISC_R_SUCCESS) {
65 dns_byaddr_destroy(&client->byaddr);
66 isc_event_free(&event);
69 if (client->na.family != AF_INET6 ||
70 (client->options & DNS_BYADDROPT_IPV6INT) != 0) {
71 if (result == DNS_R_NCACHENXDOMAIN ||
72 result == DNS_R_NCACHENXRRSET ||
73 result == DNS_R_NXDOMAIN ||
74 result == DNS_R_NXRRSET)
75 lwresult = LWRES_R_NOTFOUND;
77 lwresult = LWRES_R_FAILURE;
78 ns_lwdclient_errorpktsend(client, lwresult);
83 * Fall back to ip6.int reverse if the default ip6.arpa
86 client->options |= DNS_BYADDROPT_IPV6INT;
92 for (name = ISC_LIST_HEAD(bevent->names);
94 name = ISC_LIST_NEXT(name, link))
96 b = client->recv_buffer;
98 result = dns_name_totext(name, ISC_TRUE, &client->recv_buffer);
99 if (result != ISC_R_SUCCESS)
101 ns_lwdclient_log(50, "found name '%.*s'",
102 (int)(client->recv_buffer.used - b.used),
103 (char *)(b.base) + b.used);
104 if (gnba->realname == NULL) {
105 gnba->realname = (char *)(b.base) + b.used;
106 gnba->realnamelen = client->recv_buffer.used - b.used;
108 naliases = gnba->naliases;
109 if (naliases >= LWRES_MAX_ALIASES)
111 gnba->aliases[naliases] = (char *)(b.base) + b.used;
112 gnba->aliaslen[naliases] =
113 client->recv_buffer.used - b.used;
118 dns_byaddr_destroy(&client->byaddr);
119 isc_event_free(&event);
124 client->pkt.recvlength = LWRES_RECVLENGTH;
125 client->pkt.authtype = 0; /* XXXMLG */
126 client->pkt.authlength = 0;
127 client->pkt.result = LWRES_R_SUCCESS;
129 lwres = lwres_gnbaresponse_render(cm->lwctx,
130 gnba, &client->pkt, &lwb);
131 if (lwres != LWRES_R_SUCCESS)
136 client->sendbuf = r.base;
137 client->sendlength = r.length;
138 result = ns_lwdclient_sendreply(client, &r);
139 if (result != ISC_R_SUCCESS)
142 NS_LWDCLIENT_SETSEND(client);
147 if (client->byaddr != NULL)
148 dns_byaddr_destroy(&client->byaddr);
149 if (lwb.base != NULL)
150 lwres_context_freemem(cm->lwctx,
151 lwb.base, lwb.length);
154 isc_event_free(&event);
158 start_byaddr(ns_lwdclient_t *client) {
160 ns_lwdclientmgr_t *cm;
162 cm = client->clientmgr;
164 INSIST(client->byaddr == NULL);
166 result = dns_byaddr_create(cm->mctx, &client->na, cm->view,
167 client->options, cm->task, byaddr_done,
168 client, &client->byaddr);
169 if (result != ISC_R_SUCCESS) {
170 ns_lwdclient_errorpktsend(client, LWRES_R_FAILURE);
176 init_gnba(ns_lwdclient_t *client) {
180 * Initialize the real name and alias arrays in the reply we're
183 for (i = 0; i < LWRES_MAX_ALIASES; i++) {
184 client->aliases[i] = NULL;
185 client->aliaslen[i] = 0;
187 for (i = 0; i < LWRES_MAX_ADDRS; i++) {
188 client->addrs[i].family = 0;
189 client->addrs[i].length = 0;
190 memset(client->addrs[i].address, 0, LWRES_ADDR_MAXLEN);
191 LWRES_LINK_INIT(&client->addrs[i], link);
194 client->gnba.naliases = 0;
195 client->gnba.realname = NULL;
196 client->gnba.aliases = client->aliases;
197 client->gnba.realnamelen = 0;
198 client->gnba.aliaslen = client->aliaslen;
199 client->gnba.base = NULL;
200 client->gnba.baselen = 0;
201 isc_buffer_init(&client->recv_buffer, client->buffer, LWRES_RECVLENGTH);
205 ns_lwdclient_processgnba(ns_lwdclient_t *client, lwres_buffer_t *b) {
206 lwres_gnbarequest_t *req;
209 ns_lwdclientmgr_t *cm;
211 REQUIRE(NS_LWDCLIENT_ISRECVDONE(client));
212 INSIST(client->byaddr == NULL);
214 cm = client->clientmgr;
217 result = lwres_gnbarequest_parse(cm->lwctx,
218 b, &client->pkt, &req);
219 if (result != LWRES_R_SUCCESS)
221 if (req->addr.address == NULL)
225 if (req->addr.family == LWRES_ADDRTYPE_V4) {
226 client->na.family = AF_INET;
227 if (req->addr.length != 4)
229 memcpy(&client->na.type.in, req->addr.address, 4);
230 } else if (req->addr.family == LWRES_ADDRTYPE_V6) {
231 client->na.family = AF_INET6;
232 if (req->addr.length != 16)
234 memcpy(&client->na.type.in6, req->addr.address, 16);
238 isc_sockaddr_fromnetaddr(&sa, &client->na, 53);
240 ns_lwdclient_log(50, "client %p looking for addrtype %08x",
241 client, req->addr.family);
244 * We no longer need to keep this around.
246 lwres_gnbarequest_free(cm->lwctx, &req);
249 * Initialize the real name and alias arrays in the reply we're
258 start_byaddr(client);
263 * We're screwed. Return an error packet to our caller.
267 lwres_gnbarequest_free(cm->lwctx, &req);
269 ns_lwdclient_errorpktsend(client, LWRES_R_FAILURE);