2 Unix SMB/CIFS implementation.
4 DNS server handler for update requests
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 "libcli/util/ntstatus.h"
24 #include "librpc/ndr/libndr.h"
25 #include "librpc/gen_ndr/ndr_dns.h"
26 #include "librpc/gen_ndr/ndr_dnsp.h"
28 #include "param/param.h"
29 #include "param/loadparm.h"
30 #include "dsdb/samdb/samdb.h"
31 #include "dsdb/common/util.h"
32 #include "samba/service_task.h"
33 #include "dns_server/dns_server.h"
34 #include "auth/auth.h"
37 #define DBGC_CLASS DBGC_DNS
39 static WERROR
dns_rr_to_dnsp(TALLOC_CTX
*mem_ctx
,
40 const struct dns_res_rec
*rrec
,
41 struct dnsp_DnssrvRpcRecord
*r
,
44 static WERROR
check_one_prerequisite(struct dns_server
*dns
,
46 const struct dns_name_question
*zone
,
47 const struct dns_res_rec
*pr
,
55 struct dnsp_DnssrvRpcRecord
*rec
= NULL
;
56 struct dnsp_DnssrvRpcRecord
*ans
;
59 size_t host_part_len
= 0;
64 return DNS_ERR(FORMAT_ERROR
);
67 match
= dns_name_match(zone
->name
, pr
->name
, &host_part_len
);
69 return DNS_ERR(NOTZONE
);
72 werror
= dns_name2dn(dns
, mem_ctx
, pr
->name
, &dn
);
73 W_ERROR_NOT_OK_RETURN(werror
);
75 if (pr
->rr_class
== DNS_QCLASS_ANY
) {
77 if (pr
->length
!= 0) {
78 return DNS_ERR(FORMAT_ERROR
);
82 if (pr
->rr_type
== DNS_QTYPE_ALL
) {
85 werror
= dns_lookup_records(dns
, mem_ctx
, dn
, &ans
, &acount
);
86 if (W_ERROR_EQUAL(werror
, WERR_DNS_ERROR_NAME_DOES_NOT_EXIST
)) {
87 return DNS_ERR(NAME_ERROR
);
89 W_ERROR_NOT_OK_RETURN(werror
);
92 return DNS_ERR(NAME_ERROR
);
97 werror
= dns_lookup_records(dns
, mem_ctx
, dn
, &ans
, &acount
);
98 if (W_ERROR_EQUAL(werror
, WERR_DNS_ERROR_NAME_DOES_NOT_EXIST
)) {
99 return DNS_ERR(NXRRSET
);
101 if (W_ERROR_EQUAL(werror
, DNS_ERR(NAME_ERROR
))) {
102 return DNS_ERR(NXRRSET
);
104 W_ERROR_NOT_OK_RETURN(werror
);
106 for (i
= 0; i
< acount
; i
++) {
107 if (ans
[i
].wType
== (enum dns_record_type
) pr
->rr_type
) {
113 return DNS_ERR(NXRRSET
);
118 * RFC2136 3.2.5 doesn't actually mention the need to return
119 * OK here, but otherwise we'd always return a FORMAT_ERROR
120 * later on. This also matches Microsoft DNS behavior.
125 if (pr
->rr_class
== DNS_QCLASS_NONE
) {
126 if (pr
->length
!= 0) {
127 return DNS_ERR(FORMAT_ERROR
);
130 if (pr
->rr_type
== DNS_QTYPE_ALL
) {
133 werror
= dns_lookup_records(dns
, mem_ctx
, dn
, &ans
, &acount
);
134 if (W_ERROR_EQUAL(werror
, WERR_OK
)) {
135 return DNS_ERR(YXDOMAIN
);
140 werror
= dns_lookup_records(dns
, mem_ctx
, dn
, &ans
, &acount
);
141 if (W_ERROR_EQUAL(werror
, WERR_DNS_ERROR_NAME_DOES_NOT_EXIST
)) {
144 if (W_ERROR_EQUAL(werror
, DNS_ERR(NAME_ERROR
))) {
148 for (i
= 0; i
< acount
; i
++) {
149 if (ans
[i
].wType
== (enum dns_record_type
) pr
->rr_type
) {
155 return DNS_ERR(YXRRSET
);
160 * RFC2136 3.2.5 doesn't actually mention the need to return
161 * OK here, but otherwise we'd always return a FORMAT_ERROR
162 * later on. This also matches Microsoft DNS behavior.
167 if (pr
->rr_class
!= zone
->question_class
) {
168 return DNS_ERR(FORMAT_ERROR
);
171 *final_result
= false;
173 werror
= dns_lookup_records(dns
, mem_ctx
, dn
, &ans
, &acount
);
174 if (W_ERROR_EQUAL(werror
, WERR_DNS_ERROR_NAME_DOES_NOT_EXIST
)) {
175 return DNS_ERR(NXRRSET
);
177 if (W_ERROR_EQUAL(werror
, DNS_ERR(NAME_ERROR
))) {
178 return DNS_ERR(NXRRSET
);
180 W_ERROR_NOT_OK_RETURN(werror
);
182 rec
= talloc_zero(mem_ctx
, struct dnsp_DnssrvRpcRecord
);
183 W_ERROR_HAVE_NO_MEMORY(rec
);
185 werror
= dns_rr_to_dnsp(rec
, pr
, rec
, dns_name_is_static(ans
, acount
));
186 W_ERROR_NOT_OK_RETURN(werror
);
188 for (i
= 0; i
< acount
; i
++) {
189 if (dns_records_match(rec
, &ans
[i
])) {
196 return DNS_ERR(NXRRSET
);
202 static WERROR
check_prerequisites(struct dns_server
*dns
,
204 const struct dns_name_question
*zone
,
205 const struct dns_res_rec
*prereqs
, uint16_t count
)
208 WERROR final_error
= WERR_OK
;
210 for (i
= 0; i
< count
; i
++) {
214 werror
= check_one_prerequisite(dns
, mem_ctx
, zone
,
215 &prereqs
[i
], &final
);
216 if (!W_ERROR_IS_OK(werror
)) {
220 if (W_ERROR_IS_OK(final_error
)) {
221 final_error
= werror
;
226 if (!W_ERROR_IS_OK(final_error
)) {
233 static WERROR
update_prescan(const struct dns_name_question
*zone
,
234 const struct dns_res_rec
*updates
, uint16_t count
)
236 const struct dns_res_rec
*r
;
238 size_t host_part_len
;
241 for (i
= 0; i
< count
; i
++) {
243 match
= dns_name_match(zone
->name
, r
->name
, &host_part_len
);
245 return DNS_ERR(NOTZONE
);
247 if (zone
->question_class
== r
->rr_class
) {
248 if (r
->rr_type
== DNS_QTYPE_ALL
) {
249 return DNS_ERR(FORMAT_ERROR
);
251 if (r
->rr_type
== DNS_QTYPE_AXFR
) {
252 return DNS_ERR(FORMAT_ERROR
);
254 if (r
->rr_type
== DNS_QTYPE_MAILB
) {
255 return DNS_ERR(FORMAT_ERROR
);
257 if (r
->rr_type
== DNS_QTYPE_MAILA
) {
258 return DNS_ERR(FORMAT_ERROR
);
260 } else if (r
->rr_class
== DNS_QCLASS_ANY
) {
262 return DNS_ERR(FORMAT_ERROR
);
264 if (r
->length
!= 0) {
265 return DNS_ERR(FORMAT_ERROR
);
267 if (r
->rr_type
== DNS_QTYPE_AXFR
) {
268 return DNS_ERR(FORMAT_ERROR
);
270 if (r
->rr_type
== DNS_QTYPE_MAILB
) {
271 return DNS_ERR(FORMAT_ERROR
);
273 if (r
->rr_type
== DNS_QTYPE_MAILA
) {
274 return DNS_ERR(FORMAT_ERROR
);
276 } else if (r
->rr_class
== DNS_QCLASS_NONE
) {
278 return DNS_ERR(FORMAT_ERROR
);
280 if (r
->rr_type
== DNS_QTYPE_ALL
) {
281 return DNS_ERR(FORMAT_ERROR
);
283 if (r
->rr_type
== DNS_QTYPE_AXFR
) {
284 return DNS_ERR(FORMAT_ERROR
);
286 if (r
->rr_type
== DNS_QTYPE_MAILB
) {
287 return DNS_ERR(FORMAT_ERROR
);
289 if (r
->rr_type
== DNS_QTYPE_MAILA
) {
290 return DNS_ERR(FORMAT_ERROR
);
293 return DNS_ERR(FORMAT_ERROR
);
299 static WERROR
dns_rr_to_dnsp(TALLOC_CTX
*mem_ctx
,
300 const struct dns_res_rec
*rrec
,
301 struct dnsp_DnssrvRpcRecord
*r
,
304 enum ndr_err_code ndr_err
;
306 if (rrec
->rr_type
== DNS_QTYPE_ALL
) {
307 return DNS_ERR(FORMAT_ERROR
);
312 r
->wType
= (enum dns_record_type
) rrec
->rr_type
;
313 r
->dwTtlSeconds
= rrec
->ttl
;
314 r
->rank
= DNS_RANK_ZONE
;
315 if (name_is_static
) {
318 r
->dwTimeStamp
= unix_to_dns_timestamp(time(NULL
));
321 /* If we get QCLASS_ANY, we're done here */
322 if (rrec
->rr_class
== DNS_QCLASS_ANY
) {
326 switch(rrec
->rr_type
) {
328 r
->data
.ipv4
= talloc_strdup(mem_ctx
, rrec
->rdata
.ipv4_record
);
329 W_ERROR_HAVE_NO_MEMORY(r
->data
.ipv4
);
332 r
->data
.ipv6
= talloc_strdup(mem_ctx
, rrec
->rdata
.ipv6_record
);
333 W_ERROR_HAVE_NO_MEMORY(r
->data
.ipv6
);
336 r
->data
.ns
= talloc_strdup(mem_ctx
, rrec
->rdata
.ns_record
);
337 W_ERROR_HAVE_NO_MEMORY(r
->data
.ns
);
339 case DNS_QTYPE_CNAME
:
340 r
->data
.cname
= talloc_strdup(mem_ctx
, rrec
->rdata
.cname_record
);
341 W_ERROR_HAVE_NO_MEMORY(r
->data
.cname
);
344 r
->data
.srv
.wPriority
= rrec
->rdata
.srv_record
.priority
;
345 r
->data
.srv
.wWeight
= rrec
->rdata
.srv_record
.weight
;
346 r
->data
.srv
.wPort
= rrec
->rdata
.srv_record
.port
;
347 r
->data
.srv
.nameTarget
= talloc_strdup(mem_ctx
,
348 rrec
->rdata
.srv_record
.target
);
349 W_ERROR_HAVE_NO_MEMORY(r
->data
.srv
.nameTarget
);
352 r
->data
.ptr
= talloc_strdup(mem_ctx
, rrec
->rdata
.ptr_record
);
353 W_ERROR_HAVE_NO_MEMORY(r
->data
.ptr
);
356 r
->data
.mx
.wPriority
= rrec
->rdata
.mx_record
.preference
;
357 r
->data
.mx
.nameTarget
= talloc_strdup(mem_ctx
,
358 rrec
->rdata
.mx_record
.exchange
);
359 W_ERROR_HAVE_NO_MEMORY(r
->data
.mx
.nameTarget
);
362 ndr_err
= ndr_dnsp_string_list_copy(mem_ctx
,
363 &rrec
->rdata
.txt_record
.txt
,
365 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err
)) {
366 return WERR_NOT_ENOUGH_MEMORY
;
371 DEBUG(0, ("Got a qytpe of %d\n", rrec
->rr_type
));
372 return DNS_ERR(NOT_IMPLEMENTED
);
381 static WERROR
handle_one_update(struct dns_server
*dns
,
383 const struct dns_name_question
*zone
,
384 const struct dns_res_rec
*update
,
385 const struct dns_server_tkey
*tkey
)
387 struct dnsp_DnssrvRpcRecord
*recs
= NULL
;
393 bool tombstoned
= false;
394 bool needs_add
= false;
397 DEBUG(2, ("Looking at record: \n"));
399 NDR_PRINT_DEBUG(dns_res_rec
, discard_const(update
));
402 switch (update
->rr_type
) {
405 case DNS_QTYPE_CNAME
:
415 DEBUG(0, ("Can't handle updates of type %u yet\n",
417 return DNS_ERR(NOT_IMPLEMENTED
);
420 werror
= dns_name2dn(dns
, mem_ctx
, update
->name
, &dn
);
421 W_ERROR_NOT_OK_RETURN(werror
);
423 werror
= dns_common_lookup(dns
->samdb
, mem_ctx
, dn
,
424 &recs
, &rcount
, &tombstoned
);
425 if (W_ERROR_EQUAL(werror
, WERR_DNS_ERROR_NAME_DOES_NOT_EXIST
)) {
429 W_ERROR_NOT_OK_RETURN(werror
);
433 * we need to keep the existing tombstone record
439 name_is_static
= dns_name_is_static(recs
, rcount
);
441 if (update
->rr_class
== zone
->question_class
) {
442 if (update
->rr_type
== DNS_QTYPE_CNAME
) {
444 * If there is a record in the directory
445 * that's not a CNAME, ignore update
447 for (i
= first
; i
< rcount
; i
++) {
448 if (recs
[i
].wType
!= DNS_TYPE_CNAME
) {
449 DEBUG(5, ("Skipping update\n"));
456 * There should be no entries besides one CNAME record
457 * per name, so replace everything with the new CNAME
461 recs
= talloc_realloc(mem_ctx
, recs
,
462 struct dnsp_DnssrvRpcRecord
, rcount
+ 1);
463 W_ERROR_HAVE_NO_MEMORY(recs
);
465 werror
= dns_rr_to_dnsp(
466 recs
, update
, &recs
[rcount
], name_is_static
);
467 W_ERROR_NOT_OK_RETURN(werror
);
470 werror
= dns_replace_records(dns
, mem_ctx
, dn
,
471 needs_add
, recs
, rcount
);
472 W_ERROR_NOT_OK_RETURN(werror
);
477 * If there is a CNAME record for this name,
480 for (i
= first
; i
< rcount
; i
++) {
481 if (recs
[i
].wType
== DNS_TYPE_CNAME
) {
482 DEBUG(5, ("Skipping update\n"));
487 if (update
->rr_type
== DNS_QTYPE_SOA
) {
491 * If the zone has no SOA record?? or update's
492 * serial number is smaller than existing SOA's,
495 for (i
= first
; i
< rcount
; i
++) {
496 if (recs
[i
].wType
== DNS_TYPE_SOA
) {
499 n
= update
->rdata
.soa_record
.serial
;
500 o
= recs
[i
].data
.soa
.serial
;
502 * TODO: Implement RFC 1982 comparison
506 DEBUG(5, ("Skipping update\n"));
514 DEBUG(5, ("Skipping update\n"));
518 werror
= dns_rr_to_dnsp(
519 mem_ctx
, update
, &recs
[i
], name_is_static
);
520 W_ERROR_NOT_OK_RETURN(werror
);
522 for (i
++; i
< rcount
; i
++) {
523 if (recs
[i
].wType
!= DNS_TYPE_SOA
) {
527 recs
[i
] = (struct dnsp_DnssrvRpcRecord
) {
528 .wType
= DNS_TYPE_TOMBSTONE
,
532 werror
= dns_replace_records(dns
, mem_ctx
, dn
,
533 needs_add
, recs
, rcount
);
534 W_ERROR_NOT_OK_RETURN(werror
);
539 recs
= talloc_realloc(mem_ctx
, recs
,
540 struct dnsp_DnssrvRpcRecord
, rcount
+1);
541 W_ERROR_HAVE_NO_MEMORY(recs
);
544 dns_rr_to_dnsp(recs
, update
, &recs
[rcount
], name_is_static
);
545 W_ERROR_NOT_OK_RETURN(werror
);
547 for (i
= first
; i
< rcount
; i
++) {
548 if (!dns_records_match(&recs
[i
], &recs
[rcount
])) {
552 recs
[i
].data
= recs
[rcount
].data
;
553 recs
[i
].wType
= recs
[rcount
].wType
;
554 recs
[i
].dwTtlSeconds
= recs
[rcount
].dwTtlSeconds
;
555 recs
[i
].rank
= recs
[rcount
].rank
;
557 werror
= dns_replace_records(dns
, mem_ctx
, dn
,
558 needs_add
, recs
, rcount
);
559 W_ERROR_NOT_OK_RETURN(werror
);
564 werror
= dns_replace_records(dns
, mem_ctx
, dn
,
565 needs_add
, recs
, rcount
+1);
566 W_ERROR_NOT_OK_RETURN(werror
);
569 } else if (update
->rr_class
== DNS_QCLASS_ANY
) {
570 if (update
->rr_type
== DNS_QTYPE_ALL
) {
571 if (dns_name_equal(update
->name
, zone
->name
)) {
572 for (i
= first
; i
< rcount
; i
++) {
574 if (recs
[i
].wType
== DNS_TYPE_SOA
) {
578 if (recs
[i
].wType
== DNS_TYPE_NS
) {
582 recs
[i
] = (struct dnsp_DnssrvRpcRecord
) {
583 .wType
= DNS_TYPE_TOMBSTONE
,
588 for (i
= first
; i
< rcount
; i
++) {
589 recs
[i
] = (struct dnsp_DnssrvRpcRecord
) {
590 .wType
= DNS_TYPE_TOMBSTONE
,
595 } else if (dns_name_equal(update
->name
, zone
->name
)) {
597 if (update
->rr_type
== DNS_QTYPE_SOA
) {
601 if (update
->rr_type
== DNS_QTYPE_NS
) {
605 for (i
= first
; i
< rcount
; i
++) {
606 if (recs
[i
].wType
== (enum dns_record_type
) update
->rr_type
) {
607 recs
[i
] = (struct dnsp_DnssrvRpcRecord
) {
608 .wType
= DNS_TYPE_TOMBSTONE
,
613 werror
= dns_replace_records(dns
, mem_ctx
, dn
,
614 needs_add
, recs
, rcount
);
615 W_ERROR_NOT_OK_RETURN(werror
);
618 } else if (update
->rr_class
== DNS_QCLASS_NONE
) {
619 struct dnsp_DnssrvRpcRecord
*del_rec
;
621 if (update
->rr_type
== DNS_QTYPE_SOA
) {
624 if (update
->rr_type
== DNS_QTYPE_NS
) {
626 struct dnsp_DnssrvRpcRecord
*ns_rec
= talloc(mem_ctx
,
627 struct dnsp_DnssrvRpcRecord
);
628 W_ERROR_HAVE_NO_MEMORY(ns_rec
);
630 werror
= dns_rr_to_dnsp(
631 ns_rec
, update
, ns_rec
, name_is_static
);
632 W_ERROR_NOT_OK_RETURN(werror
);
634 for (i
= first
; i
< rcount
; i
++) {
635 if (dns_records_match(ns_rec
, &recs
[i
])) {
645 del_rec
= talloc(mem_ctx
, struct dnsp_DnssrvRpcRecord
);
646 W_ERROR_HAVE_NO_MEMORY(del_rec
);
649 dns_rr_to_dnsp(del_rec
, update
, del_rec
, name_is_static
);
650 W_ERROR_NOT_OK_RETURN(werror
);
652 for (i
= first
; i
< rcount
; i
++) {
653 if (dns_records_match(del_rec
, &recs
[i
])) {
654 recs
[i
] = (struct dnsp_DnssrvRpcRecord
) {
655 .wType
= DNS_TYPE_TOMBSTONE
,
660 werror
= dns_replace_records(dns
, mem_ctx
, dn
,
661 needs_add
, recs
, rcount
);
662 W_ERROR_NOT_OK_RETURN(werror
);
668 static WERROR
handle_updates(struct dns_server
*dns
,
670 const struct dns_name_question
*zone
,
671 const struct dns_res_rec
*prereqs
, uint16_t pcount
,
672 struct dns_res_rec
*updates
, uint16_t upd_count
,
673 struct dns_server_tkey
*tkey
)
675 struct ldb_dn
*zone_dn
= NULL
;
676 WERROR werror
= WERR_OK
;
679 TALLOC_CTX
*tmp_ctx
= talloc_new(mem_ctx
);
682 ret
= ldb_set_opaque(
686 if (ret
!= LDB_SUCCESS
) {
687 DEBUG(1, ("unable to set session info\n"));
688 werror
= DNS_ERR(SERVER_FAILURE
);
693 werror
= dns_name2dn(dns
, tmp_ctx
, zone
->name
, &zone_dn
);
694 W_ERROR_NOT_OK_GOTO(werror
, failed
);
696 ret
= ldb_transaction_start(dns
->samdb
);
697 if (ret
!= LDB_SUCCESS
) {
698 werror
= DNS_ERR(SERVER_FAILURE
);
702 werror
= check_prerequisites(dns
, tmp_ctx
, zone
, prereqs
, pcount
);
703 W_ERROR_NOT_OK_GOTO(werror
, failed
);
705 DBG_DEBUG("dns update count is %u\n", upd_count
);
707 for (ri
= 0; ri
< upd_count
; ri
++) {
708 werror
= handle_one_update(dns
, tmp_ctx
, zone
,
710 W_ERROR_NOT_OK_GOTO(werror
, failed
);
713 ldb_transaction_commit(dns
->samdb
);
714 TALLOC_FREE(tmp_ctx
);
720 system_session(dns
->task
->lp_ctx
));
726 ldb_transaction_cancel(dns
->samdb
);
732 system_session(dns
->task
->lp_ctx
));
735 TALLOC_FREE(tmp_ctx
);
740 static WERROR
dns_update_allowed(struct dns_server
*dns
,
741 const struct dns_request_state
*state
,
742 struct dns_server_tkey
**tkey
)
744 if (lpcfg_allow_dns_updates(dns
->task
->lp_ctx
) == DNS_UPDATE_ON
) {
745 DEBUG(2, ("All updates allowed.\n"));
749 if (lpcfg_allow_dns_updates(dns
->task
->lp_ctx
) == DNS_UPDATE_OFF
) {
750 DEBUG(2, ("Updates disabled.\n"));
751 return DNS_ERR(REFUSED
);
754 if (state
->authenticated
== false ) {
755 DEBUG(2, ("Update not allowed for unsigned packet.\n"));
756 return DNS_ERR(REFUSED
);
759 *tkey
= dns_find_tkey(dns
->tkeys
, state
->key_name
);
761 DEBUG(0, ("Authenticated, but key not found. Something is wrong.\n"));
762 return DNS_ERR(REFUSED
);
769 WERROR
dns_server_process_update(struct dns_server
*dns
,
770 const struct dns_request_state
*state
,
772 const struct dns_name_packet
*in
,
773 struct dns_res_rec
**prereqs
, uint16_t *prereq_count
,
774 struct dns_res_rec
**updates
, uint16_t *update_count
,
775 struct dns_res_rec
**additional
, uint16_t *arcount
)
777 struct dns_name_question
*zone
;
778 const struct dns_server_zone
*z
;
779 size_t host_part_len
= 0;
780 WERROR werror
= DNS_ERR(NOT_IMPLEMENTED
);
781 struct dns_server_tkey
*tkey
= NULL
;
783 if (in
->qdcount
!= 1) {
784 return DNS_ERR(FORMAT_ERROR
);
787 zone
= &in
->questions
[0];
789 if (zone
->question_class
!= DNS_QCLASS_IN
&&
790 zone
->question_class
!= DNS_QCLASS_ANY
) {
791 return DNS_ERR(NOT_IMPLEMENTED
);
794 if (zone
->question_type
!= DNS_QTYPE_SOA
) {
795 return DNS_ERR(FORMAT_ERROR
);
798 DEBUG(2, ("Got a dns update request.\n"));
800 for (z
= dns
->zones
; z
!= NULL
; z
= z
->next
) {
803 match
= dns_name_match(z
->name
, zone
->name
, &host_part_len
);
810 DEBUG(1, ("We're not authoritative for this zone\n"));
811 return DNS_ERR(NOTAUTH
);
814 if (host_part_len
!= 0) {
815 /* TODO: We need to delegate this one */
816 DEBUG(1, ("Would have to delegate zone '%s'.\n", zone
->name
));
817 return DNS_ERR(NOT_IMPLEMENTED
);
820 *prereq_count
= in
->ancount
;
821 *prereqs
= in
->answers
;
822 werror
= check_prerequisites(dns
, mem_ctx
, in
->questions
, *prereqs
,
824 W_ERROR_NOT_OK_RETURN(werror
);
826 werror
= dns_update_allowed(dns
, state
, &tkey
);
827 if (!W_ERROR_IS_OK(werror
)) {
831 *update_count
= in
->nscount
;
832 *updates
= in
->nsrecs
;
833 werror
= update_prescan(in
->questions
, *updates
, *update_count
);
834 W_ERROR_NOT_OK_RETURN(werror
);
836 werror
= handle_updates(dns
, mem_ctx
, in
->questions
, *prereqs
,
837 *prereq_count
, *updates
, *update_count
, tkey
);
838 W_ERROR_NOT_OK_RETURN(werror
);