ctdb-failover: omit "restrict" optimization keyword
[Samba.git] / source3 / libsmb / dsgetdcname.c
blob654893c172c63de647e5eaf18cb328ac6ebde6a1
1 /*
2 Unix SMB/CIFS implementation.
4 dsgetdcname
6 Copyright (C) Gerald Carter 2006
7 Copyright (C) Guenther Deschner 2007-2008
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program. If not, see <http://www.gnu.org/licenses/>.
23 #include "includes.h"
24 #include "libsmb/dsgetdcname.h"
25 #include "libsmb/namequery.h"
26 #include "libads/sitename_cache.h"
27 #include "../librpc/gen_ndr/ndr_netlogon.h"
28 #include "libads/cldap.h"
29 #include "lib/addns/dnsquery_srv.h"
30 #include "libsmb/clidgram.h"
31 #include "lib/gencache.h"
32 #include "lib/util/util_net.h"
34 /* 15 minutes */
35 #define DSGETDCNAME_CACHE_TTL 60*15
37 struct ip_service_name {
38 struct samba_sockaddr sa;
39 const char *hostname;
42 static NTSTATUS make_dc_info_from_cldap_reply(
43 TALLOC_CTX *mem_ctx,
44 uint32_t flags,
45 const struct samba_sockaddr *sa,
46 struct NETLOGON_SAM_LOGON_RESPONSE_EX *r,
47 struct netr_DsRGetDCNameInfo **info);
49 /****************************************************************
50 ****************************************************************/
52 static void debug_dsdcinfo_flags(int lvl, uint32_t flags)
54 DEBUG(lvl,("debug_dsdcinfo_flags: 0x%08x\n\t", flags));
56 if (flags & DS_FORCE_REDISCOVERY)
57 DEBUGADD(lvl,("DS_FORCE_REDISCOVERY "));
58 if (flags & 0x00000002)
59 DEBUGADD(lvl,("0x00000002 "));
60 if (flags & 0x00000004)
61 DEBUGADD(lvl,("0x00000004 "));
62 if (flags & 0x00000008)
63 DEBUGADD(lvl,("0x00000008 "));
64 if (flags & DS_DIRECTORY_SERVICE_REQUIRED)
65 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_REQUIRED "));
66 if (flags & DS_DIRECTORY_SERVICE_PREFERRED)
67 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_PREFERRED "));
68 if (flags & DS_GC_SERVER_REQUIRED)
69 DEBUGADD(lvl,("DS_GC_SERVER_REQUIRED "));
70 if (flags & DS_PDC_REQUIRED)
71 DEBUGADD(lvl,("DS_PDC_REQUIRED "));
72 if (flags & DS_BACKGROUND_ONLY)
73 DEBUGADD(lvl,("DS_BACKGROUND_ONLY "));
74 if (flags & DS_IP_REQUIRED)
75 DEBUGADD(lvl,("DS_IP_REQUIRED "));
76 if (flags & DS_KDC_REQUIRED)
77 DEBUGADD(lvl,("DS_KDC_REQUIRED "));
78 if (flags & DS_TIMESERV_REQUIRED)
79 DEBUGADD(lvl,("DS_TIMESERV_REQUIRED "));
80 if (flags & DS_WRITABLE_REQUIRED)
81 DEBUGADD(lvl,("DS_WRITABLE_REQUIRED "));
82 if (flags & DS_GOOD_TIMESERV_PREFERRED)
83 DEBUGADD(lvl,("DS_GOOD_TIMESERV_PREFERRED "));
84 if (flags & DS_AVOID_SELF)
85 DEBUGADD(lvl,("DS_AVOID_SELF "));
86 if (flags & DS_ONLY_LDAP_NEEDED)
87 DEBUGADD(lvl,("DS_ONLY_LDAP_NEEDED "));
88 if (flags & DS_IS_FLAT_NAME)
89 DEBUGADD(lvl,("DS_IS_FLAT_NAME "));
90 if (flags & DS_IS_DNS_NAME)
91 DEBUGADD(lvl,("DS_IS_DNS_NAME "));
92 if (flags & DS_TRY_NEXTCLOSEST_SITE)
93 DEBUGADD(lvl,("DS_TRY_NEXTCLOSEST_SITE "));
94 if (flags & DS_DIRECTORY_SERVICE_6_REQUIRED)
95 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_6_REQUIRED "));
96 if (flags & DS_WEB_SERVICE_REQUIRED)
97 DEBUGADD(lvl,("DS_WEB_SERVICE_REQUIRED "));
98 if (flags & DS_DIRECTORY_SERVICE_8_REQUIRED)
99 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_8_REQUIRED "));
100 if (flags & DS_DIRECTORY_SERVICE_9_REQUIRED)
101 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_9_REQUIRED "));
102 if (flags & DS_DIRECTORY_SERVICE_10_REQUIRED)
103 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_10_REQUIRED "));
104 if (flags & 0x01000000)
105 DEBUGADD(lvl,("0x01000000 "));
106 if (flags & 0x02000000)
107 DEBUGADD(lvl,("0x02000000 "));
108 if (flags & 0x04000000)
109 DEBUGADD(lvl,("0x04000000 "));
110 if (flags & 0x08000000)
111 DEBUGADD(lvl,("0x08000000 "));
112 if (flags & 0x10000000)
113 DEBUGADD(lvl,("0x10000000 "));
114 if (flags & 0x20000000)
115 DEBUGADD(lvl,("0x20000000 "));
116 if (flags & DS_RETURN_DNS_NAME)
117 DEBUGADD(lvl,("DS_RETURN_DNS_NAME "));
118 if (flags & DS_RETURN_FLAT_NAME)
119 DEBUGADD(lvl,("DS_RETURN_FLAT_NAME "));
120 if (flags)
121 DEBUGADD(lvl,("\n"));
124 /****************************************************************
125 ****************************************************************/
127 static char *dsgetdcname_cache_key(TALLOC_CTX *mem_ctx, const char *domain)
129 if (!domain) {
130 return NULL;
133 return talloc_asprintf_strupper_m(mem_ctx, "DSGETDCNAME/DOMAIN/%s",
134 domain);
137 /****************************************************************
138 ****************************************************************/
140 static NTSTATUS dsgetdcname_cache_delete(TALLOC_CTX *mem_ctx,
141 const char *domain_name)
143 char *key;
145 key = dsgetdcname_cache_key(mem_ctx, domain_name);
146 if (!key) {
147 return NT_STATUS_NO_MEMORY;
150 if (!gencache_del(key)) {
151 return NT_STATUS_UNSUCCESSFUL;
154 return NT_STATUS_OK;
157 /****************************************************************
158 ****************************************************************/
160 static NTSTATUS dsgetdcname_cache_store(TALLOC_CTX *mem_ctx,
161 const char *domain_name,
162 DATA_BLOB blob)
164 time_t expire_time;
165 char *key;
166 bool ret = false;
168 key = dsgetdcname_cache_key(mem_ctx, domain_name);
169 if (!key) {
170 return NT_STATUS_NO_MEMORY;
173 expire_time = time(NULL) + DSGETDCNAME_CACHE_TTL;
175 ret = gencache_set_data_blob(key, blob, expire_time);
177 return ret ? NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL;
180 /****************************************************************
181 ****************************************************************/
183 static NTSTATUS store_cldap_reply(TALLOC_CTX *mem_ctx,
184 uint32_t flags,
185 struct samba_sockaddr *sa,
186 uint32_t nt_version,
187 struct NETLOGON_SAM_LOGON_RESPONSE_EX *r)
189 DATA_BLOB blob;
190 enum ndr_err_code ndr_err;
191 NTSTATUS status;
192 char addr[INET6_ADDRSTRLEN];
194 print_sockaddr(addr, sizeof(addr), &sa->u.ss);
196 /* FIXME */
197 r->sockaddr_size = 0x10; /* the w32 winsock addr size */
198 r->sockaddr.sockaddr_family = 2; /* AF_INET */
199 if (is_ipaddress_v4(addr)) {
200 r->sockaddr.pdc_ip = talloc_strdup(mem_ctx, addr);
201 if (r->sockaddr.pdc_ip == NULL) {
202 return NT_STATUS_NO_MEMORY;
204 } else {
206 * ndr_push_NETLOGON_SAM_LOGON_RESPONSE_EX will
207 * fail with an ipv6 address.
209 * This matches windows behaviour in the CLDAP
210 * response when NETLOGON_NT_VERSION_5EX_WITH_IP
211 * is used.
213 * Windows returns the ipv4 address of the ipv6
214 * server interface and falls back to 127.0.0.1
215 * if there's no ipv4 address.
217 r->sockaddr.pdc_ip = talloc_strdup(mem_ctx, "127.0.0.1");
218 if (r->sockaddr.pdc_ip == NULL) {
219 return NT_STATUS_NO_MEMORY;
223 ndr_err = ndr_push_struct_blob(&blob, mem_ctx, r,
224 (ndr_push_flags_fn_t)ndr_push_NETLOGON_SAM_LOGON_RESPONSE_EX);
225 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
226 return ndr_map_error2ntstatus(ndr_err);
229 if (r->domain_name) {
230 status = dsgetdcname_cache_store(mem_ctx, r->domain_name,
231 blob);
232 if (!NT_STATUS_IS_OK(status)) {
233 goto done;
235 if (r->client_site) {
236 sitename_store(r->domain_name, r->client_site);
239 if (r->dns_domain) {
240 status = dsgetdcname_cache_store(mem_ctx, r->dns_domain, blob);
241 if (!NT_STATUS_IS_OK(status)) {
242 goto done;
244 if (r->client_site) {
245 sitename_store(r->dns_domain, r->client_site);
249 status = NT_STATUS_OK;
251 done:
252 data_blob_free(&blob);
254 return status;
257 /****************************************************************
258 ****************************************************************/
260 static uint32_t get_cldap_reply_server_flags(struct netlogon_samlogon_response *r,
261 uint32_t nt_version)
263 switch (nt_version & 0x0000001f) {
264 case 0:
265 case 1:
266 case 16:
267 case 17:
268 return 0;
269 case 2:
270 case 3:
271 case 18:
272 case 19:
273 return r->data.nt5.server_type;
274 case 4:
275 case 5:
276 case 6:
277 case 7:
278 return r->data.nt5_ex.server_type;
279 case 8:
280 case 9:
281 case 10:
282 case 11:
283 case 12:
284 case 13:
285 case 14:
286 case 15:
287 return r->data.nt5_ex.server_type;
288 case 20:
289 case 21:
290 case 22:
291 case 23:
292 case 24:
293 case 25:
294 case 26:
295 case 27:
296 case 28:
297 return r->data.nt5_ex.server_type;
298 case 29:
299 case 30:
300 case 31:
301 return r->data.nt5_ex.server_type;
302 default:
303 return 0;
307 /****************************************************************
308 ****************************************************************/
310 static NTSTATUS dsgetdcname_cache_fetch(TALLOC_CTX *mem_ctx,
311 const char *domain_name,
312 const struct GUID *domain_guid,
313 uint32_t flags,
314 struct netr_DsRGetDCNameInfo **info_p)
316 char *key;
317 DATA_BLOB blob;
318 enum ndr_err_code ndr_err;
319 struct netr_DsRGetDCNameInfo *info;
320 struct NETLOGON_SAM_LOGON_RESPONSE_EX r;
321 NTSTATUS status;
323 key = dsgetdcname_cache_key(mem_ctx, domain_name);
324 if (!key) {
325 return NT_STATUS_NO_MEMORY;
328 if (!gencache_get_data_blob(key, NULL, &blob, NULL, NULL)) {
329 return NT_STATUS_NOT_FOUND;
332 info = talloc_zero(mem_ctx, struct netr_DsRGetDCNameInfo);
333 if (!info) {
334 data_blob_free(&blob);
335 return NT_STATUS_NO_MEMORY;
338 ndr_err = ndr_pull_struct_blob(&blob, mem_ctx, &r,
339 (ndr_pull_flags_fn_t)ndr_pull_NETLOGON_SAM_LOGON_RESPONSE_EX);
341 data_blob_free(&blob);
342 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
343 dsgetdcname_cache_delete(mem_ctx, domain_name);
344 return ndr_map_error2ntstatus(ndr_err);
347 status = make_dc_info_from_cldap_reply(mem_ctx, flags, NULL,
348 &r, &info);
349 if (!NT_STATUS_IS_OK(status)) {
350 return status;
353 if (DEBUGLEVEL >= 10) {
354 NDR_PRINT_DEBUG(netr_DsRGetDCNameInfo, info);
357 /* check flags */
358 if (!check_cldap_reply_required_flags(info->dc_flags, flags)) {
359 DEBUG(10,("invalid flags\n"));
360 return NT_STATUS_INVALID_PARAMETER;
363 if ((flags & DS_IP_REQUIRED) &&
364 (info->dc_address_type != DS_ADDRESS_TYPE_INET)) {
365 return NT_STATUS_INVALID_PARAMETER_MIX;
368 *info_p = info;
370 return NT_STATUS_OK;
373 /****************************************************************
374 ****************************************************************/
376 static NTSTATUS dsgetdcname_cached(TALLOC_CTX *mem_ctx,
377 struct messaging_context *msg_ctx,
378 const char *domain_name,
379 const struct GUID *domain_guid,
380 uint32_t flags,
381 const char *site_name,
382 struct netr_DsRGetDCNameInfo **info)
384 NTSTATUS status;
386 status = dsgetdcname_cache_fetch(mem_ctx, domain_name, domain_guid,
387 flags, info);
388 if (!NT_STATUS_IS_OK(status)
389 && !NT_STATUS_EQUAL(status, NT_STATUS_NOT_FOUND)) {
390 DEBUG(10,("dsgetdcname_cached: cache fetch failed with: %s\n",
391 nt_errstr(status)));
392 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
395 if (flags & DS_BACKGROUND_ONLY) {
396 return status;
399 if (NT_STATUS_EQUAL(status, NT_STATUS_NOT_FOUND)) {
400 struct netr_DsRGetDCNameInfo *dc_info;
402 status = dsgetdcname(mem_ctx, msg_ctx, domain_name,
403 domain_guid, site_name,
404 flags | DS_FORCE_REDISCOVERY,
405 &dc_info);
407 if (!NT_STATUS_IS_OK(status)) {
408 return status;
411 *info = dc_info;
414 return status;
417 /****************************************************************
418 ****************************************************************/
420 static bool check_allowed_required_flags(uint32_t flags,
421 const char *site_name)
423 uint32_t return_type = flags & (DS_RETURN_FLAT_NAME|DS_RETURN_DNS_NAME);
424 uint32_t offered_type = flags & (DS_IS_FLAT_NAME|DS_IS_DNS_NAME);
425 uint32_t query_type = flags & (DS_BACKGROUND_ONLY|DS_FORCE_REDISCOVERY);
427 /* FIXME: check for DSGETDC_VALID_FLAGS and check for exclusive bits
428 * (DS_PDC_REQUIRED, DS_KDC_REQUIRED, DS_GC_SERVER_REQUIRED) */
430 debug_dsdcinfo_flags(10, flags);
432 if ((flags & DS_TRY_NEXTCLOSEST_SITE) && site_name) {
433 return false;
436 if (return_type == (DS_RETURN_FLAT_NAME|DS_RETURN_DNS_NAME)) {
437 return false;
440 if (offered_type == (DS_IS_DNS_NAME|DS_IS_FLAT_NAME)) {
441 return false;
444 if (query_type == (DS_BACKGROUND_ONLY|DS_FORCE_REDISCOVERY)) {
445 return false;
448 #if 0
449 if ((flags & DS_RETURN_DNS_NAME) && (!(flags & DS_IP_REQUIRED))) {
450 printf("gd: here5 \n");
451 return false;
453 #endif
454 return true;
457 /****************************************************************
458 ****************************************************************/
460 static NTSTATUS discover_dc_netbios(TALLOC_CTX *mem_ctx,
461 const char *domain_name,
462 uint32_t flags,
463 struct ip_service_name **returned_dclist,
464 size_t *returned_count)
466 NTSTATUS status;
467 enum nbt_name_type name_type = NBT_NAME_LOGON;
468 struct samba_sockaddr *salist = NULL;
469 size_t i;
470 struct ip_service_name *dclist = NULL;
471 size_t count = 0;
472 static const char *resolve_order[] = { "lmhosts", "wins", "bcast", NULL };
474 if (flags & DS_PDC_REQUIRED) {
475 name_type = NBT_NAME_PDC;
478 status = internal_resolve_name(mem_ctx,
479 domain_name,
480 name_type,
481 NULL,
482 &salist,
483 &count,
484 resolve_order);
485 if (!NT_STATUS_IS_OK(status)) {
486 DEBUG(10,("discover_dc_netbios: failed to find DC\n"));
487 return status;
490 dclist = talloc_zero_array(mem_ctx, struct ip_service_name, count);
491 if (!dclist) {
492 TALLOC_FREE(salist);
493 return NT_STATUS_NO_MEMORY;
496 for (i=0; i<count; i++) {
497 char addr[INET6_ADDRSTRLEN];
498 struct ip_service_name *r = &dclist[i];
500 print_sockaddr(addr, sizeof(addr),
501 &salist[i].u.ss);
503 r->sa = salist[i];
504 r->hostname = talloc_strdup(mem_ctx, addr);
505 if (!r->hostname) {
506 TALLOC_FREE(salist);
507 TALLOC_FREE(dclist);
508 return NT_STATUS_NO_MEMORY;
513 TALLOC_FREE(salist);
515 *returned_dclist = dclist;
516 *returned_count = count;
518 return NT_STATUS_OK;
521 /****************************************************************
522 ****************************************************************/
524 static NTSTATUS discover_dc_dns(TALLOC_CTX *mem_ctx,
525 const char *domain_name,
526 const struct GUID *domain_guid,
527 uint32_t flags,
528 const char *site_name,
529 struct ip_service_name **returned_dclist,
530 size_t *return_count)
532 size_t i;
533 NTSTATUS status;
534 struct dns_rr_srv *dcs = NULL;
535 size_t numdcs = 0;
536 struct ip_service_name *dclist = NULL;
537 size_t ret_count = 0;
538 char *query = NULL;
540 if (flags & DS_PDC_REQUIRED) {
541 query = ads_dns_query_string_pdc(mem_ctx, domain_name);
542 } else if (flags & DS_GC_SERVER_REQUIRED) {
543 query = ads_dns_query_string_gcs(mem_ctx, domain_name);
544 } else if (flags & DS_KDC_REQUIRED) {
545 query = ads_dns_query_string_kdcs(mem_ctx, domain_name);
546 } else if (flags & DS_DIRECTORY_SERVICE_REQUIRED) {
547 query = ads_dns_query_string_dcs(mem_ctx, domain_name);
548 } else if (domain_guid) {
549 query = ads_dns_query_string_dcs_guid(
550 mem_ctx, domain_guid, domain_name);
551 } else {
552 query = ads_dns_query_string_dcs(mem_ctx, domain_name);
555 if (query == NULL) {
556 return NT_STATUS_NO_MEMORY;
559 status = ads_dns_query_srv(
560 mem_ctx,
561 lp_get_async_dns_timeout(),
562 site_name,
563 query,
564 &dcs,
565 &numdcs);
566 TALLOC_FREE(query);
567 if (!NT_STATUS_IS_OK(status)) {
568 return status;
571 if (numdcs == 0) {
572 TALLOC_FREE(dcs);
573 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
576 /* Check for integer wrap. */
577 if (numdcs + numdcs < numdcs) {
578 TALLOC_FREE(dcs);
579 return NT_STATUS_INVALID_PARAMETER;
583 * We're only returning up to 2 addresses per
584 * DC name, so just allocate size numdcs x 2.
587 dclist = talloc_zero_array(mem_ctx,
588 struct ip_service_name,
589 numdcs * 2);
590 if (!dclist) {
591 TALLOC_FREE(dcs);
592 return NT_STATUS_NO_MEMORY;
596 * First, copy the SRV record replies that
597 * have IP addresses returned with them.
599 ret_count = 0;
600 for (i = 0; i < numdcs; i++) {
601 size_t j;
602 bool have_v4_addr = false;
603 bool have_v6_addr = false;
605 if (dcs[i].num_ips == 0) {
606 continue;
610 * Pick up to 1 address from each address
611 * family (IPv4, IPv6).
613 * This is different from the previous
614 * code which picked a 'next ip' address
615 * each time, incrementing an index.
616 * Too complex to maintain :-(.
618 for (j = 0; j < dcs[i].num_ips; j++) {
619 if ((dcs[i].ss_s[j].ss_family == AF_INET && !have_v4_addr) ||
620 (dcs[i].ss_s[j].ss_family == AF_INET6 && !have_v6_addr)) {
621 bool ok;
622 dclist[ret_count].hostname =
623 talloc_strdup(dclist, dcs[i].hostname);
624 ok = sockaddr_storage_to_samba_sockaddr(
625 &dclist[ret_count].sa,
626 &dcs[i].ss_s[j]);
627 if (!ok) {
628 TALLOC_FREE(dcs);
629 TALLOC_FREE(dclist);
630 return NT_STATUS_INVALID_PARAMETER;
632 ret_count++;
633 if (dcs[i].ss_s[j].ss_family == AF_INET) {
634 have_v4_addr = true;
635 } else {
636 have_v6_addr = true;
638 if (have_v4_addr && have_v6_addr) {
639 break;
645 TALLOC_FREE(dcs);
647 if (ret_count == 0) {
648 TALLOC_FREE(dclist);
649 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
652 *returned_dclist = dclist;
653 *return_count = ret_count;
654 return NT_STATUS_OK;
657 /****************************************************************
658 ****************************************************************/
660 static NTSTATUS make_domain_controller_info(TALLOC_CTX *mem_ctx,
661 const char *dc_unc,
662 const char *dc_address,
663 uint32_t dc_address_type,
664 const struct GUID *domain_guid,
665 const char *domain_name,
666 const char *forest_name,
667 uint32_t flags,
668 const char *dc_site_name,
669 const char *client_site_name,
670 struct netr_DsRGetDCNameInfo **info_out)
672 struct netr_DsRGetDCNameInfo *info;
674 info = talloc_zero(mem_ctx, struct netr_DsRGetDCNameInfo);
675 NT_STATUS_HAVE_NO_MEMORY(info);
677 if (dc_unc) {
678 if (!(dc_unc[0] == '\\' && dc_unc[1] == '\\')) {
679 info->dc_unc = talloc_asprintf(mem_ctx, "\\\\%s",
680 dc_unc);
681 } else {
682 info->dc_unc = talloc_strdup(mem_ctx, dc_unc);
684 NT_STATUS_HAVE_NO_MEMORY(info->dc_unc);
687 if (dc_address) {
688 if (!(dc_address[0] == '\\' && dc_address[1] == '\\')) {
689 info->dc_address = talloc_asprintf(mem_ctx, "\\\\%s",
690 dc_address);
691 } else {
692 info->dc_address = talloc_strdup(mem_ctx, dc_address);
694 NT_STATUS_HAVE_NO_MEMORY(info->dc_address);
697 info->dc_address_type = dc_address_type;
699 if (domain_guid) {
700 info->domain_guid = *domain_guid;
703 if (domain_name) {
704 info->domain_name = talloc_strdup(mem_ctx, domain_name);
705 NT_STATUS_HAVE_NO_MEMORY(info->domain_name);
708 if (forest_name && *forest_name) {
709 info->forest_name = talloc_strdup(mem_ctx, forest_name);
710 NT_STATUS_HAVE_NO_MEMORY(info->forest_name);
711 flags |= DS_DNS_FOREST_ROOT;
714 info->dc_flags = flags;
716 if (dc_site_name) {
717 info->dc_site_name = talloc_strdup(mem_ctx, dc_site_name);
718 NT_STATUS_HAVE_NO_MEMORY(info->dc_site_name);
721 if (client_site_name) {
722 info->client_site_name = talloc_strdup(mem_ctx,
723 client_site_name);
724 NT_STATUS_HAVE_NO_MEMORY(info->client_site_name);
727 *info_out = info;
729 return NT_STATUS_OK;
732 /****************************************************************
733 ****************************************************************/
735 static void map_dc_and_domain_names(uint32_t flags,
736 const char *dc_name,
737 const char *domain_name,
738 const char *dns_dc_name,
739 const char *dns_domain_name,
740 uint32_t *dc_flags,
741 const char **hostname_p,
742 const char **domain_p)
744 switch (flags & 0xf0000000) {
745 case DS_RETURN_FLAT_NAME:
746 if (dc_name && domain_name &&
747 *dc_name && *domain_name) {
748 *hostname_p = dc_name;
749 *domain_p = domain_name;
750 break;
753 FALL_THROUGH;
754 case DS_RETURN_DNS_NAME:
755 default:
756 if (dns_dc_name && dns_domain_name &&
757 *dns_dc_name && *dns_domain_name) {
758 *hostname_p = dns_dc_name;
759 *domain_p = dns_domain_name;
760 *dc_flags |= DS_DNS_DOMAIN | DS_DNS_CONTROLLER;
761 break;
763 if (dc_name && domain_name &&
764 *dc_name && *domain_name) {
765 *hostname_p = dc_name;
766 *domain_p = domain_name;
767 break;
772 /****************************************************************
773 ****************************************************************/
775 static NTSTATUS make_dc_info_from_cldap_reply(
776 TALLOC_CTX *mem_ctx,
777 uint32_t flags,
778 const struct samba_sockaddr *sa,
779 struct NETLOGON_SAM_LOGON_RESPONSE_EX *r,
780 struct netr_DsRGetDCNameInfo **info)
782 const char *dc_hostname = NULL;
783 const char *dc_domain_name = NULL;
784 const char *dc_address = NULL;
785 const char *dc_forest = NULL;
786 uint32_t dc_address_type = 0;
787 uint32_t dc_flags = 0;
788 struct GUID *dc_domain_guid = NULL;
789 const char *dc_server_site = NULL;
790 const char *dc_client_site = NULL;
792 char addr[INET6_ADDRSTRLEN];
794 if (sa != NULL) {
795 print_sockaddr(addr, sizeof(addr), &sa->u.ss);
796 dc_address = addr;
797 dc_address_type = DS_ADDRESS_TYPE_INET;
798 } else {
799 if (r->sockaddr.pdc_ip) {
800 dc_address = r->sockaddr.pdc_ip;
801 dc_address_type = DS_ADDRESS_TYPE_INET;
802 } else {
803 dc_address = r->pdc_name;
804 dc_address_type = DS_ADDRESS_TYPE_NETBIOS;
808 map_dc_and_domain_names(flags,
809 r->pdc_name,
810 r->domain_name,
811 r->pdc_dns_name,
812 r->dns_domain,
813 &dc_flags,
814 &dc_hostname,
815 &dc_domain_name);
817 dc_flags |= r->server_type;
818 dc_forest = r->forest;
819 dc_domain_guid = &r->domain_uuid;
820 dc_server_site = r->server_site;
821 dc_client_site = r->client_site;
823 return make_domain_controller_info(mem_ctx,
824 dc_hostname,
825 dc_address,
826 dc_address_type,
827 dc_domain_guid,
828 dc_domain_name,
829 dc_forest,
830 dc_flags,
831 dc_server_site,
832 dc_client_site,
833 info);
836 /****************************************************************
837 ****************************************************************/
839 static uint32_t map_ds_flags_to_nt_version(uint32_t flags)
841 uint32_t nt_version = 0;
843 if (flags & DS_PDC_REQUIRED) {
844 nt_version |= NETLOGON_NT_VERSION_PDC;
847 if (flags & DS_GC_SERVER_REQUIRED) {
848 nt_version |= NETLOGON_NT_VERSION_GC;
851 if (flags & DS_TRY_NEXTCLOSEST_SITE) {
852 nt_version |= NETLOGON_NT_VERSION_WITH_CLOSEST_SITE;
855 if (flags & DS_IP_REQUIRED) {
856 nt_version |= NETLOGON_NT_VERSION_IP;
859 return nt_version;
862 /****************************************************************
863 ****************************************************************/
865 static NTSTATUS process_dc_dns(TALLOC_CTX *mem_ctx,
866 const char *domain_name,
867 uint32_t flags,
868 struct ip_service_name *dclist,
869 size_t num_dcs,
870 struct netr_DsRGetDCNameInfo **info)
872 size_t i = 0;
873 bool valid_dc = false;
874 struct netlogon_samlogon_response *r = NULL;
875 uint32_t nt_version = NETLOGON_NT_VERSION_5 |
876 NETLOGON_NT_VERSION_5EX;
877 uint32_t ret_flags = 0;
878 NTSTATUS status;
880 nt_version |= map_ds_flags_to_nt_version(flags);
882 for (i=0; i<num_dcs; i++) {
883 char addr[INET6_ADDRSTRLEN];
885 print_sockaddr(addr, sizeof(addr), &dclist[i].sa.u.ss);
887 DEBUG(10,("LDAP ping to %s (%s)\n", dclist[i].hostname, addr));
889 if (ads_cldap_netlogon(mem_ctx, &dclist[i].sa.u.ss,
890 domain_name,
891 nt_version,
892 &r))
894 nt_version = r->ntver;
895 ret_flags = get_cldap_reply_server_flags(r, nt_version);
897 if (check_cldap_reply_required_flags(ret_flags, flags)) {
898 valid_dc = true;
899 break;
903 continue;
906 if (!valid_dc) {
907 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
910 status = make_dc_info_from_cldap_reply(mem_ctx, flags, &dclist[i].sa,
911 &r->data.nt5_ex, info);
912 if (NT_STATUS_IS_OK(status)) {
913 return store_cldap_reply(mem_ctx, flags, &dclist[i].sa,
914 nt_version, &r->data.nt5_ex);
917 return status;
920 /****************************************************************
921 ****************************************************************/
923 /****************************************************************
924 ****************************************************************/
926 static NTSTATUS process_dc_netbios(TALLOC_CTX *mem_ctx,
927 struct messaging_context *msg_ctx,
928 const char *domain_name,
929 uint32_t flags,
930 struct ip_service_name *dclist,
931 size_t num_dcs,
932 struct netr_DsRGetDCNameInfo **info)
934 enum nbt_name_type name_type = NBT_NAME_LOGON;
935 NTSTATUS status;
936 size_t i;
937 const char *dc_name = NULL;
938 fstring tmp_dc_name;
939 struct netlogon_samlogon_response *r = NULL;
940 bool store_cache = false;
941 uint32_t nt_version = NETLOGON_NT_VERSION_1 |
942 NETLOGON_NT_VERSION_5 |
943 NETLOGON_NT_VERSION_5EX_WITH_IP;
944 size_t len = strlen(lp_netbios_name());
945 char my_acct_name[len+2];
947 if (msg_ctx == NULL) {
948 return NT_STATUS_INVALID_PARAMETER;
951 if (flags & DS_PDC_REQUIRED) {
952 name_type = NBT_NAME_PDC;
956 * It's 2024 we always want an AD style response!
958 nt_version |= NETLOGON_NT_VERSION_AVOID_NT4EMUL;
960 nt_version |= map_ds_flags_to_nt_version(flags);
962 snprintf(my_acct_name,
963 sizeof(my_acct_name),
964 "%s$",
965 lp_netbios_name());
967 DEBUG(10,("process_dc_netbios\n"));
969 for (i=0; i<num_dcs; i++) {
970 uint16_t val;
972 generate_random_buffer((uint8_t *)&val, 2);
974 status = nbt_getdc(msg_ctx, 10, &dclist[i].sa.u.ss, domain_name,
975 NULL, my_acct_name, ACB_WSTRUST, nt_version,
976 mem_ctx, &nt_version, &dc_name, &r);
977 if (NT_STATUS_IS_OK(status)) {
978 store_cache = true;
979 namecache_store(dc_name,
980 NBT_NAME_SERVER,
982 &dclist[i].sa);
983 goto make_reply;
986 if (name_status_find(domain_name,
987 name_type,
988 NBT_NAME_SERVER,
989 &dclist[i].sa.u.ss,
990 tmp_dc_name))
992 struct NETLOGON_SAM_LOGON_RESPONSE_NT40 logon1;
994 r = talloc_zero(mem_ctx, struct netlogon_samlogon_response);
995 NT_STATUS_HAVE_NO_MEMORY(r);
997 ZERO_STRUCT(logon1);
999 nt_version = NETLOGON_NT_VERSION_1;
1001 logon1.nt_version = nt_version;
1002 logon1.pdc_name = tmp_dc_name;
1003 logon1.domain_name = talloc_strdup_upper(mem_ctx, domain_name);
1004 NT_STATUS_HAVE_NO_MEMORY(logon1.domain_name);
1006 r->data.nt4 = logon1;
1007 r->ntver = nt_version;
1009 map_netlogon_samlogon_response(r);
1011 namecache_store(tmp_dc_name,
1012 NBT_NAME_SERVER,
1014 &dclist[i].sa);
1016 goto make_reply;
1020 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
1022 make_reply:
1024 status = make_dc_info_from_cldap_reply(mem_ctx, flags, &dclist[i].sa,
1025 &r->data.nt5_ex, info);
1026 if (NT_STATUS_IS_OK(status) && store_cache) {
1027 return store_cldap_reply(mem_ctx, flags, &dclist[i].sa,
1028 nt_version, &r->data.nt5_ex);
1031 return status;
1034 /****************************************************************
1035 ****************************************************************/
1037 static NTSTATUS dsgetdcname_rediscover(TALLOC_CTX *mem_ctx,
1038 struct messaging_context *msg_ctx,
1039 const char *domain_name,
1040 const struct GUID *domain_guid,
1041 uint32_t flags,
1042 const char *site_name,
1043 struct netr_DsRGetDCNameInfo **info)
1045 NTSTATUS status;
1046 struct ip_service_name *dclist = NULL;
1047 size_t num_dcs = 0;
1049 DEBUG(10,("dsgetdcname_rediscover\n"));
1051 if (flags & DS_IS_FLAT_NAME) {
1053 if (lp_disable_netbios()) {
1054 return NT_STATUS_NOT_SUPPORTED;
1057 status = discover_dc_netbios(mem_ctx, domain_name, flags,
1058 &dclist, &num_dcs);
1059 NT_STATUS_NOT_OK_RETURN(status);
1061 return process_dc_netbios(mem_ctx, msg_ctx, domain_name, flags,
1062 dclist, num_dcs, info);
1065 if (flags & DS_IS_DNS_NAME) {
1067 status = discover_dc_dns(mem_ctx, domain_name, domain_guid,
1068 flags, site_name, &dclist, &num_dcs);
1069 NT_STATUS_NOT_OK_RETURN(status);
1071 return process_dc_dns(mem_ctx, domain_name, flags,
1072 dclist, num_dcs, info);
1075 status = discover_dc_dns(mem_ctx, domain_name, domain_guid, flags,
1076 site_name, &dclist, &num_dcs);
1078 if (NT_STATUS_IS_OK(status) && num_dcs != 0) {
1080 status = process_dc_dns(mem_ctx, domain_name, flags, dclist,
1081 num_dcs, info);
1082 if (NT_STATUS_IS_OK(status)) {
1083 return status;
1087 if (lp_disable_netbios()) {
1088 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
1091 status = discover_dc_netbios(mem_ctx, domain_name, flags, &dclist,
1092 &num_dcs);
1093 NT_STATUS_NOT_OK_RETURN(status);
1095 return process_dc_netbios(mem_ctx, msg_ctx, domain_name, flags, dclist,
1096 num_dcs, info);
1099 static bool is_closest_site(struct netr_DsRGetDCNameInfo *info)
1101 if (info->dc_flags & DS_SERVER_CLOSEST) {
1102 return true;
1105 if (!info->client_site_name) {
1106 return true;
1109 if (!info->dc_site_name) {
1110 return false;
1113 if (strcmp(info->client_site_name, info->dc_site_name) == 0) {
1114 return true;
1117 return false;
1120 /********************************************************************
1121 Internal dsgetdcname.
1122 ********************************************************************/
1124 static NTSTATUS dsgetdcname_internal(TALLOC_CTX *mem_ctx,
1125 struct messaging_context *msg_ctx,
1126 const char *domain_name,
1127 const struct GUID *domain_guid,
1128 const char *site_name,
1129 uint32_t flags,
1130 struct netr_DsRGetDCNameInfo **info)
1132 NTSTATUS status;
1133 struct netr_DsRGetDCNameInfo *myinfo = NULL;
1134 bool first = true;
1135 struct netr_DsRGetDCNameInfo *first_info = NULL;
1137 DEBUG(10,("dsgetdcname_internal: domain_name: %s, "
1138 "domain_guid: %s, site_name: %s, flags: 0x%08x\n",
1139 domain_name,
1140 domain_guid ? GUID_string(mem_ctx, domain_guid) : "(null)",
1141 site_name ? site_name : "(null)", flags));
1143 *info = NULL;
1145 if (!check_allowed_required_flags(flags, site_name)) {
1146 DEBUG(0,("invalid flags specified\n"));
1147 return NT_STATUS_INVALID_PARAMETER;
1150 if (flags & DS_FORCE_REDISCOVERY) {
1151 goto rediscover;
1154 status = dsgetdcname_cached(mem_ctx, msg_ctx, domain_name, domain_guid,
1155 flags, site_name, &myinfo);
1156 if (NT_STATUS_IS_OK(status)) {
1157 *info = myinfo;
1158 goto done;
1161 if (flags & DS_BACKGROUND_ONLY) {
1162 goto done;
1165 rediscover:
1166 status = dsgetdcname_rediscover(mem_ctx, msg_ctx, domain_name,
1167 domain_guid, flags, site_name,
1168 &myinfo);
1170 done:
1171 if (!NT_STATUS_IS_OK(status)) {
1172 if (!first) {
1173 *info = first_info;
1174 return NT_STATUS_OK;
1176 return status;
1179 if (!first) {
1180 TALLOC_FREE(first_info);
1181 } else if (!is_closest_site(myinfo)) {
1182 first = false;
1183 first_info = myinfo;
1184 /* TODO: may use the next_closest_site here */
1185 site_name = myinfo->client_site_name;
1186 goto rediscover;
1189 *info = myinfo;
1190 return NT_STATUS_OK;
1193 /********************************************************************
1194 dsgetdcname.
1196 This will be the only public function here.
1197 ********************************************************************/
1199 NTSTATUS dsgetdcname(TALLOC_CTX *mem_ctx,
1200 struct messaging_context *msg_ctx,
1201 const char *domain_name,
1202 const struct GUID *domain_guid,
1203 const char *site_name,
1204 uint32_t flags,
1205 struct netr_DsRGetDCNameInfo **info)
1207 NTSTATUS status;
1208 const char *query_site = NULL;
1209 char *ptr_to_free = NULL;
1210 bool retry_query_with_null = false;
1212 if ((site_name == NULL) || (site_name[0] == '\0')) {
1213 ptr_to_free = sitename_fetch(mem_ctx, domain_name);
1214 if (ptr_to_free != NULL) {
1215 retry_query_with_null = true;
1217 query_site = ptr_to_free;
1218 } else {
1219 query_site = site_name;
1222 status = dsgetdcname_internal(mem_ctx,
1223 msg_ctx,
1224 domain_name,
1225 domain_guid,
1226 query_site,
1227 flags,
1228 info);
1230 TALLOC_FREE(ptr_to_free);
1232 if (!NT_STATUS_EQUAL(status, NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND)) {
1233 return status;
1236 /* Should we try again with site_name == NULL ? */
1237 if (retry_query_with_null) {
1238 status = dsgetdcname_internal(mem_ctx,
1239 msg_ctx,
1240 domain_name,
1241 domain_guid,
1242 NULL,
1243 flags,
1244 info);
1247 return status;
1250 NTSTATUS dsgetonedcname(TALLOC_CTX *mem_ctx,
1251 struct messaging_context *msg_ctx,
1252 const char *domain_name,
1253 const char *dcname,
1254 uint32_t flags,
1255 struct netr_DsRGetDCNameInfo **info)
1257 NTSTATUS status;
1258 struct sockaddr_storage *addrs;
1259 unsigned int num_addrs, i;
1260 const char *hostname = strip_hostname(dcname);
1262 status = resolve_name_list(mem_ctx, hostname, 0x20,
1263 &addrs, &num_addrs);
1264 if (!NT_STATUS_IS_OK(status)) {
1265 return status;
1268 for (i = 0; i < num_addrs; i++) {
1270 bool ok;
1271 struct ip_service_name dclist;
1273 dclist.hostname = hostname;
1274 ok = sockaddr_storage_to_samba_sockaddr(&dclist.sa, &addrs[i]);
1275 if (!ok) {
1276 TALLOC_FREE(addrs);
1277 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
1280 status = process_dc_dns(mem_ctx, domain_name, flags,
1281 &dclist, 1, info);
1282 if (NT_STATUS_IS_OK(status)) {
1283 TALLOC_FREE(addrs);
1284 return NT_STATUS_OK;
1287 if (lp_disable_netbios()) {
1288 continue;
1291 status = process_dc_netbios(mem_ctx, msg_ctx, domain_name, flags,
1292 &dclist, 1, info);
1293 if (NT_STATUS_IS_OK(status)) {
1294 TALLOC_FREE(addrs);
1295 return NT_STATUS_OK;
1299 TALLOC_FREE(addrs);
1300 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;