2 Unix SMB/CIFS implementation.
4 DNS server handler for queries
6 Copyright (C) 2010 Kai Blin <kai@samba.org>
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>.
23 #include "smbd/service_task.h"
24 #include "libcli/util/werror.h"
25 #include "librpc/ndr/libndr.h"
26 #include "librpc/gen_ndr/ndr_dns.h"
27 #include "librpc/gen_ndr/ndr_dnsp.h"
29 #include "param/param.h"
30 #include "dsdb/samdb/samdb.h"
31 #include "dsdb/common/util.h"
32 #include "dns_server/dns_server.h"
33 #include "libcli/dns/libdns.h"
34 #include "lib/util/util_net.h"
35 #include "lib/util/tevent_werror.h"
37 static WERROR
create_response_rr(const struct dns_name_question
*question
,
38 const struct dnsp_DnssrvRpcRecord
*rec
,
39 struct dns_res_rec
**answers
, uint16_t *ancount
)
41 struct dns_res_rec
*ans
= *answers
;
42 uint16_t ai
= *ancount
;
50 ans
[ai
].rdata
.cname_record
= talloc_strdup(ans
, rec
->data
.cname
);
51 if (ans
[ai
].rdata
.cname_record
== NULL
) {
56 ans
[ai
].rdata
.ipv4_record
= talloc_strdup(ans
, rec
->data
.ipv4
);
57 if (ans
[ai
].rdata
.ipv4_record
== NULL
) {
62 ans
[ai
].rdata
.ipv6_record
= talloc_strdup(ans
, rec
->data
.ipv6
);
63 W_ERROR_HAVE_NO_MEMORY(ans
[ai
].rdata
.ipv6_record
);
66 ans
[ai
].rdata
.ns_record
= rec
->data
.ns
;
69 ans
[ai
].rdata
.srv_record
.priority
= rec
->data
.srv
.wPriority
;
70 ans
[ai
].rdata
.srv_record
.weight
= rec
->data
.srv
.wWeight
;
71 ans
[ai
].rdata
.srv_record
.port
= rec
->data
.srv
.wPort
;
72 ans
[ai
].rdata
.srv_record
.target
= talloc_strdup(
73 ans
, rec
->data
.srv
.nameTarget
);
74 if (ans
[ai
].rdata
.srv_record
.target
== NULL
) {
79 ans
[ai
].rdata
.soa_record
.mname
= talloc_strdup(
80 ans
, rec
->data
.soa
.mname
);
81 if (ans
[ai
].rdata
.soa_record
.mname
== NULL
) {
84 ans
[ai
].rdata
.soa_record
.rname
= talloc_strdup(
85 ans
, rec
->data
.soa
.rname
);
86 if (ans
[ai
].rdata
.soa_record
.rname
== NULL
) {
89 ans
[ai
].rdata
.soa_record
.serial
= rec
->data
.soa
.serial
;
90 ans
[ai
].rdata
.soa_record
.refresh
= rec
->data
.soa
.refresh
;
91 ans
[ai
].rdata
.soa_record
.retry
= rec
->data
.soa
.retry
;
92 ans
[ai
].rdata
.soa_record
.expire
= rec
->data
.soa
.expire
;
93 ans
[ai
].rdata
.soa_record
.minimum
= rec
->data
.soa
.minimum
;
96 ans
[ai
].rdata
.ptr_record
= talloc_strdup(ans
, rec
->data
.ptr
);
99 tmp
= talloc_asprintf(ans
, "\"%s\"", rec
->data
.txt
.str
[0]);
103 for (i
=1; i
<rec
->data
.txt
.count
; i
++) {
104 tmp
= talloc_asprintf_append_buffer(
105 tmp
, " \"%s\"", rec
->data
.txt
.str
[i
]);
110 ans
[ai
].rdata
.txt_record
.txt
= tmp
;
113 DEBUG(0, ("Got unhandled type %u query.\n", rec
->wType
));
114 return DNS_ERR(NOT_IMPLEMENTED
);
117 ans
[ai
].name
= talloc_strdup(ans
, question
->name
);
118 if (ans
[ai
].name
== NULL
) {
121 ans
[ai
].rr_type
= rec
->wType
;
122 ans
[ai
].rr_class
= DNS_QCLASS_IN
;
123 ans
[ai
].ttl
= rec
->dwTtlSeconds
;
124 ans
[ai
].length
= UINT16_MAX
;
133 struct ask_forwarder_state
{
134 struct tevent_context
*ev
;
136 struct dns_name_packet in_packet
;
139 static void ask_forwarder_done(struct tevent_req
*subreq
);
141 static struct tevent_req
*ask_forwarder_send(
142 TALLOC_CTX
*mem_ctx
, struct tevent_context
*ev
,
143 const char *forwarder
, struct dns_name_question
*question
)
145 struct tevent_req
*req
, *subreq
;
146 struct ask_forwarder_state
*state
;
147 struct dns_name_packet out_packet
= { 0, };
149 enum ndr_err_code ndr_err
;
151 req
= tevent_req_create(mem_ctx
, &state
, struct ask_forwarder_state
);
156 generate_random_buffer((uint8_t *)&state
->id
, sizeof(state
->id
));
158 if (!is_ipaddress(forwarder
)) {
159 DEBUG(0, ("Invalid 'dns forwarder' setting '%s', needs to be "
160 "an IP address\n", forwarder
));
161 tevent_req_werror(req
, DNS_ERR(NAME_ERROR
));
162 return tevent_req_post(req
, ev
);
165 out_packet
.id
= state
->id
;
166 out_packet
.operation
|= DNS_OPCODE_QUERY
| DNS_FLAG_RECURSION_DESIRED
;
167 out_packet
.qdcount
= 1;
168 out_packet
.questions
= question
;
170 ndr_err
= ndr_push_struct_blob(
171 &out_blob
, state
, &out_packet
,
172 (ndr_push_flags_fn_t
)ndr_push_dns_name_packet
);
173 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err
)) {
174 tevent_req_werror(req
, DNS_ERR(SERVER_FAILURE
));
175 return tevent_req_post(req
, ev
);
177 subreq
= dns_udp_request_send(state
, ev
, forwarder
, out_blob
.data
,
179 if (tevent_req_nomem(subreq
, req
)) {
180 return tevent_req_post(req
, ev
);
182 tevent_req_set_callback(subreq
, ask_forwarder_done
, req
);
186 static void ask_forwarder_done(struct tevent_req
*subreq
)
188 struct tevent_req
*req
= tevent_req_callback_data(
189 subreq
, struct tevent_req
);
190 struct ask_forwarder_state
*state
= tevent_req_data(
191 req
, struct ask_forwarder_state
);
193 enum ndr_err_code ndr_err
;
196 ret
= dns_udp_request_recv(subreq
, state
,
197 &in_blob
.data
, &in_blob
.length
);
199 if (tevent_req_werror(req
, ret
)) {
203 ndr_err
= ndr_pull_struct_blob(
204 &in_blob
, state
, &state
->in_packet
,
205 (ndr_pull_flags_fn_t
)ndr_pull_dns_name_packet
);
206 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err
)) {
207 tevent_req_werror(req
, DNS_ERR(SERVER_FAILURE
));
210 if (state
->in_packet
.id
!= state
->id
) {
211 tevent_req_werror(req
, DNS_ERR(NAME_ERROR
));
214 tevent_req_done(req
);
217 static WERROR
ask_forwarder_recv(
218 struct tevent_req
*req
, TALLOC_CTX
*mem_ctx
,
219 struct dns_res_rec
**answers
, uint16_t *ancount
,
220 struct dns_res_rec
**nsrecs
, uint16_t *nscount
,
221 struct dns_res_rec
**additional
, uint16_t *arcount
)
223 struct ask_forwarder_state
*state
= tevent_req_data(
224 req
, struct ask_forwarder_state
);
225 struct dns_name_packet
*in_packet
= &state
->in_packet
;
228 if (tevent_req_is_werror(req
, &err
)) {
232 *ancount
= in_packet
->ancount
;
233 *answers
= talloc_move(mem_ctx
, &in_packet
->answers
);
235 *nscount
= in_packet
->nscount
;
236 *nsrecs
= talloc_move(mem_ctx
, &in_packet
->nsrecs
);
238 *arcount
= in_packet
->arcount
;
239 *additional
= talloc_move(mem_ctx
, &in_packet
->additional
);
244 static WERROR
handle_question(struct dns_server
*dns
,
246 const struct dns_name_question
*question
,
247 struct dns_res_rec
**answers
, uint16_t *ancount
)
249 struct dns_res_rec
*ans
;
252 struct dnsp_DnssrvRpcRecord
*recs
;
253 uint16_t rec_count
, ai
= 0;
254 struct ldb_dn
*dn
= NULL
;
256 werror
= dns_name2dn(dns
, mem_ctx
, question
->name
, &dn
);
257 W_ERROR_NOT_OK_RETURN(werror
);
259 werror
= dns_lookup_records(dns
, mem_ctx
, dn
, &recs
, &rec_count
);
260 W_ERROR_NOT_OK_RETURN(werror
);
262 ans
= talloc_zero_array(mem_ctx
, struct dns_res_rec
, rec_count
);
263 W_ERROR_HAVE_NO_MEMORY(ans
);
265 for (ri
= 0; ri
< rec_count
; ri
++) {
266 if ((question
->question_type
!= DNS_QTYPE_ALL
) &&
267 (recs
[ri
].wType
!= question
->question_type
)) {
270 werror
= create_response_rr(question
, &recs
[ri
], &ans
, &ai
);
271 W_ERROR_NOT_OK_RETURN(werror
);
275 return DNS_ERR(NAME_ERROR
);
285 struct dns_server_process_query_state
{
286 struct dns_res_rec
*answers
;
288 struct dns_res_rec
*nsrecs
;
290 struct dns_res_rec
*additional
;
294 static void dns_server_process_query_got_response(struct tevent_req
*subreq
);
296 struct tevent_req
*dns_server_process_query_send(
297 TALLOC_CTX
*mem_ctx
, struct tevent_context
*ev
,
298 struct dns_server
*dns
, struct dns_request_state
*req_state
,
299 const struct dns_name_packet
*in
)
301 struct tevent_req
*req
, *subreq
;
302 struct dns_server_process_query_state
*state
;
304 req
= tevent_req_create(mem_ctx
, &state
,
305 struct dns_server_process_query_state
);
309 if (in
->qdcount
!= 1) {
310 tevent_req_werror(req
, DNS_ERR(FORMAT_ERROR
));
311 return tevent_req_post(req
, ev
);
314 /* Windows returns NOT_IMPLEMENTED on this as well */
315 if (in
->questions
[0].question_class
== DNS_QCLASS_NONE
) {
316 tevent_req_werror(req
, DNS_ERR(NOT_IMPLEMENTED
));
317 return tevent_req_post(req
, ev
);
320 if (dns_authorative_for_zone(dns
, in
->questions
[0].name
)) {
323 req_state
->flags
|= DNS_FLAG_AUTHORITATIVE
;
324 err
= handle_question(dns
, state
, &in
->questions
[0],
325 &state
->answers
, &state
->ancount
);
326 if (tevent_req_werror(req
, err
)) {
327 return tevent_req_post(req
, ev
);
329 tevent_req_done(req
);
330 return tevent_req_post(req
, ev
);
333 if ((req_state
->flags
& DNS_FLAG_RECURSION_DESIRED
) &&
334 (req_state
->flags
& DNS_FLAG_RECURSION_AVAIL
)) {
335 DEBUG(2, ("Not authoritative for '%s', forwarding\n",
336 in
->questions
[0].name
));
338 subreq
= ask_forwarder_send(
339 state
, ev
, lpcfg_dns_forwarder(dns
->task
->lp_ctx
),
341 if (tevent_req_nomem(subreq
, req
)) {
342 return tevent_req_post(req
, ev
);
344 tevent_req_set_callback(
345 subreq
, dns_server_process_query_got_response
, req
);
349 tevent_req_werror(req
, DNS_ERR(NAME_ERROR
));
350 return tevent_req_post(req
, ev
);
353 static void dns_server_process_query_got_response(struct tevent_req
*subreq
)
355 struct tevent_req
*req
= tevent_req_callback_data(
356 subreq
, struct tevent_req
);
357 struct dns_server_process_query_state
*state
= tevent_req_data(
358 req
, struct dns_server_process_query_state
);
361 err
= ask_forwarder_recv(subreq
, state
,
362 &state
->answers
, &state
->ancount
,
363 &state
->nsrecs
, &state
->nscount
,
364 &state
->additional
, &state
->arcount
);
366 if (tevent_req_werror(req
, err
)) {
369 tevent_req_done(req
);
372 WERROR
dns_server_process_query_recv(
373 struct tevent_req
*req
, TALLOC_CTX
*mem_ctx
,
374 struct dns_res_rec
**answers
, uint16_t *ancount
,
375 struct dns_res_rec
**nsrecs
, uint16_t *nscount
,
376 struct dns_res_rec
**additional
, uint16_t *arcount
)
378 struct dns_server_process_query_state
*state
= tevent_req_data(
379 req
, struct dns_server_process_query_state
);
382 if (tevent_req_is_werror(req
, &err
)) {
385 *answers
= talloc_move(mem_ctx
, &state
->answers
);
386 *ancount
= state
->ancount
;
387 *nsrecs
= talloc_move(mem_ctx
, &state
->nsrecs
);
388 *nscount
= state
->nscount
;
389 *additional
= talloc_move(mem_ctx
, &state
->additional
);
390 *arcount
= state
->arcount
;