?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
s3:utils: Fix 'Usage:' for 'net ads enctypes'
[samba4-gss.git] / source3 / libsmb / dsgetdcname.c
blob6bbe4e0b4ad1369646f9dd5dbf7f897c0f278ae0
1 /*
2 Unix SMB/CIFS implementation.
3
4 dsgetdcname
5
6 Copyright (C) Gerald Carter 2006
7 Copyright (C) Guenther Deschner 2007-2008
8
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.
13
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.
18
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/>.
21 */
22
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 "libads/netlogon_ping.h"
30 #include "lib/addns/dnsquery_srv.h"
31 #include "libsmb/clidgram.h"
32 #include "lib/gencache.h"
33 #include "lib/util/util_net.h"
34 #include "lib/tsocket/tsocket.h"
35
36 /* 15 minutes */
37 #define DSGETDCNAME_CACHE_TTL 60*15
38
39 struct ip_service_name {
40 struct samba_sockaddr sa;
41 const char *hostname;
42 };
43
44 static NTSTATUS make_dc_info_from_cldap_reply(
45 TALLOC_CTX *mem_ctx,
46 uint32_t flags,
47 const struct samba_sockaddr *sa,
48 struct NETLOGON_SAM_LOGON_RESPONSE_EX *r,
49 struct netr_DsRGetDCNameInfo **info);
50
51 /****************************************************************
52 ****************************************************************/
53
54 static void debug_dsdcinfo_flags(int lvl, uint32_t flags)
55 {
56 DEBUG(lvl,("debug_dsdcinfo_flags: 0x%08x\n\t", flags));
57
58 if (flags & DS_FORCE_REDISCOVERY)
59 DEBUGADD(lvl,("DS_FORCE_REDISCOVERY "));
60 if (flags & 0x00000002)
61 DEBUGADD(lvl,("0x00000002 "));
62 if (flags & 0x00000004)
63 DEBUGADD(lvl,("0x00000004 "));
64 if (flags & 0x00000008)
65 DEBUGADD(lvl,("0x00000008 "));
66 if (flags & DS_DIRECTORY_SERVICE_REQUIRED)
67 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_REQUIRED "));
68 if (flags & DS_DIRECTORY_SERVICE_PREFERRED)
69 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_PREFERRED "));
70 if (flags & DS_GC_SERVER_REQUIRED)
71 DEBUGADD(lvl,("DS_GC_SERVER_REQUIRED "));
72 if (flags & DS_PDC_REQUIRED)
73 DEBUGADD(lvl,("DS_PDC_REQUIRED "));
74 if (flags & DS_BACKGROUND_ONLY)
75 DEBUGADD(lvl,("DS_BACKGROUND_ONLY "));
76 if (flags & DS_IP_REQUIRED)
77 DEBUGADD(lvl,("DS_IP_REQUIRED "));
78 if (flags & DS_KDC_REQUIRED)
79 DEBUGADD(lvl,("DS_KDC_REQUIRED "));
80 if (flags & DS_TIMESERV_REQUIRED)
81 DEBUGADD(lvl,("DS_TIMESERV_REQUIRED "));
82 if (flags & DS_WRITABLE_REQUIRED)
83 DEBUGADD(lvl,("DS_WRITABLE_REQUIRED "));
84 if (flags & DS_GOOD_TIMESERV_PREFERRED)
85 DEBUGADD(lvl,("DS_GOOD_TIMESERV_PREFERRED "));
86 if (flags & DS_AVOID_SELF)
87 DEBUGADD(lvl,("DS_AVOID_SELF "));
88 if (flags & DS_ONLY_LDAP_NEEDED)
89 DEBUGADD(lvl,("DS_ONLY_LDAP_NEEDED "));
90 if (flags & DS_IS_FLAT_NAME)
91 DEBUGADD(lvl,("DS_IS_FLAT_NAME "));
92 if (flags & DS_IS_DNS_NAME)
93 DEBUGADD(lvl,("DS_IS_DNS_NAME "));
94 if (flags & DS_TRY_NEXTCLOSEST_SITE)
95 DEBUGADD(lvl,("DS_TRY_NEXTCLOSEST_SITE "));
96 if (flags & DS_DIRECTORY_SERVICE_6_REQUIRED)
97 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_6_REQUIRED "));
98 if (flags & DS_WEB_SERVICE_REQUIRED)
99 DEBUGADD(lvl,("DS_WEB_SERVICE_REQUIRED "));
100 if (flags & DS_DIRECTORY_SERVICE_8_REQUIRED)
101 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_8_REQUIRED "));
102 if (flags & DS_DIRECTORY_SERVICE_9_REQUIRED)
103 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_9_REQUIRED "));
104 if (flags & DS_DIRECTORY_SERVICE_10_REQUIRED)
105 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_10_REQUIRED "));
106 if (flags & 0x01000000)
107 DEBUGADD(lvl,("0x01000000 "));
108 if (flags & 0x02000000)
109 DEBUGADD(lvl,("0x02000000 "));
110 if (flags & 0x04000000)
111 DEBUGADD(lvl,("0x04000000 "));
112 if (flags & 0x08000000)
113 DEBUGADD(lvl,("0x08000000 "));
114 if (flags & 0x10000000)
115 DEBUGADD(lvl,("0x10000000 "));
116 if (flags & 0x20000000)
117 DEBUGADD(lvl,("0x20000000 "));
118 if (flags & DS_RETURN_DNS_NAME)
119 DEBUGADD(lvl,("DS_RETURN_DNS_NAME "));
120 if (flags & DS_RETURN_FLAT_NAME)
121 DEBUGADD(lvl,("DS_RETURN_FLAT_NAME "));
122 if (flags)
123 DEBUGADD(lvl,("\n"));
124 }
125
126 /****************************************************************
127 ****************************************************************/
128
129 static char *dsgetdcname_cache_key(TALLOC_CTX *mem_ctx, const char *domain)
130 {
131 if (!domain) {
132 return NULL;
133 }
134
135 return talloc_asprintf_strupper_m(mem_ctx, "DSGETDCNAME/DOMAIN/%s",
136 domain);
137 }
138
139 /****************************************************************
140 ****************************************************************/
141
142 static NTSTATUS dsgetdcname_cache_delete(TALLOC_CTX *mem_ctx,
143 const char *domain_name)
144 {
145 char *key;
146
147 key = dsgetdcname_cache_key(mem_ctx, domain_name);
148 if (!key) {
149 return NT_STATUS_NO_MEMORY;
150 }
151
152 if (!gencache_del(key)) {
153 return NT_STATUS_UNSUCCESSFUL;
154 }
155
156 return NT_STATUS_OK;
157 }
158
159 /****************************************************************
160 ****************************************************************/
161
162 static NTSTATUS dsgetdcname_cache_store(TALLOC_CTX *mem_ctx,
163 const char *domain_name,
164 DATA_BLOB blob)
165 {
166 time_t expire_time;
167 char *key;
168 bool ret = false;
169
170 key = dsgetdcname_cache_key(mem_ctx, domain_name);
171 if (!key) {
172 return NT_STATUS_NO_MEMORY;
173 }
174
175 expire_time = time(NULL) + DSGETDCNAME_CACHE_TTL;
176
177 ret = gencache_set_data_blob(key, blob, expire_time);
178
179 return ret ? NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL;
180 }
181
182 /****************************************************************
183 ****************************************************************/
184
185 static NTSTATUS store_cldap_reply(TALLOC_CTX *mem_ctx,
186 uint32_t flags,
187 struct samba_sockaddr *sa,
188 uint32_t nt_version,
189 struct NETLOGON_SAM_LOGON_RESPONSE_EX *r)
190 {
191 DATA_BLOB blob;
192 enum ndr_err_code ndr_err;
193 NTSTATUS status;
194 char addr[INET6_ADDRSTRLEN];
195
196 print_sockaddr(addr, sizeof(addr), &sa->u.ss);
197
198 /* FIXME */
199 r->sockaddr_size = 0x10; /* the w32 winsock addr size */
200 r->sockaddr.sockaddr_family = 2; /* AF_INET */
201 if (is_ipaddress_v4(addr)) {
202 r->sockaddr.pdc_ip = talloc_strdup(mem_ctx, addr);
203 if (r->sockaddr.pdc_ip == NULL) {
204 return NT_STATUS_NO_MEMORY;
205 }
206 } else {
207 /*
208 * ndr_push_NETLOGON_SAM_LOGON_RESPONSE_EX will
209 * fail with an ipv6 address.
210 *
211 * This matches windows behaviour in the CLDAP
212 * response when NETLOGON_NT_VERSION_5EX_WITH_IP
213 * is used.
214 *
215 * Windows returns the ipv4 address of the ipv6
216 * server interface and falls back to 127.0.0.1
217 * if there's no ipv4 address.
218 */
219 r->sockaddr.pdc_ip = talloc_strdup(mem_ctx, "127.0.0.1");
220 if (r->sockaddr.pdc_ip == NULL) {
221 return NT_STATUS_NO_MEMORY;
222 }
223 }
224
225 ndr_err = ndr_push_struct_blob(&blob, mem_ctx, r,
226 (ndr_push_flags_fn_t)ndr_push_NETLOGON_SAM_LOGON_RESPONSE_EX);
227 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
228 return ndr_map_error2ntstatus(ndr_err);
229 }
230
231 if (r->domain_name) {
232 status = dsgetdcname_cache_store(mem_ctx, r->domain_name,
233 blob);
234 if (!NT_STATUS_IS_OK(status)) {
235 goto done;
236 }
237 if (r->client_site) {
238 sitename_store(r->domain_name, r->client_site);
239 }
240 }
241 if (r->dns_domain) {
242 status = dsgetdcname_cache_store(mem_ctx, r->dns_domain, blob);
243 if (!NT_STATUS_IS_OK(status)) {
244 goto done;
245 }
246 if (r->client_site) {
247 sitename_store(r->dns_domain, r->client_site);
248 }
249 }
250
251 status = NT_STATUS_OK;
252
253 done:
254 data_blob_free(&blob);
255
256 return status;
257 }
258
259 /****************************************************************
260 ****************************************************************/
261
262 static NTSTATUS dsgetdcname_cache_fetch(TALLOC_CTX *mem_ctx,
263 const char *domain_name,
264 const struct GUID *domain_guid,
265 uint32_t flags,
266 struct netr_DsRGetDCNameInfo **info_p)
267 {
268 char *key;
269 DATA_BLOB blob;
270 enum ndr_err_code ndr_err;
271 struct netr_DsRGetDCNameInfo *info;
272 struct NETLOGON_SAM_LOGON_RESPONSE_EX r;
273 NTSTATUS status;
274
275 key = dsgetdcname_cache_key(mem_ctx, domain_name);
276 if (!key) {
277 return NT_STATUS_NO_MEMORY;
278 }
279
280 if (!gencache_get_data_blob(key, NULL, &blob, NULL, NULL)) {
281 return NT_STATUS_NOT_FOUND;
282 }
283
284 info = talloc_zero(mem_ctx, struct netr_DsRGetDCNameInfo);
285 if (!info) {
286 data_blob_free(&blob);
287 return NT_STATUS_NO_MEMORY;
288 }
289
290 ndr_err = ndr_pull_struct_blob(&blob, mem_ctx, &r,
291 (ndr_pull_flags_fn_t)ndr_pull_NETLOGON_SAM_LOGON_RESPONSE_EX);
292
293 data_blob_free(&blob);
294 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
295 dsgetdcname_cache_delete(mem_ctx, domain_name);
296 return ndr_map_error2ntstatus(ndr_err);
297 }
298
299 status = make_dc_info_from_cldap_reply(mem_ctx, flags, NULL,
300 &r, &info);
301 if (!NT_STATUS_IS_OK(status)) {
302 return status;
303 }
304
305 if (DEBUGLEVEL >= 10) {
306 NDR_PRINT_DEBUG(netr_DsRGetDCNameInfo, info);
307 }
308
309 /* check flags */
310 if (!check_cldap_reply_required_flags(info->dc_flags, flags)) {
311 DEBUG(10,("invalid flags\n"));
312 return NT_STATUS_INVALID_PARAMETER;
313 }
314
315 if ((flags & DS_IP_REQUIRED) &&
316 (info->dc_address_type != DS_ADDRESS_TYPE_INET)) {
317 return NT_STATUS_INVALID_PARAMETER_MIX;
318 }
319
320 *info_p = info;
321
322 return NT_STATUS_OK;
323 }
324
325 /****************************************************************
326 ****************************************************************/
327
328 static NTSTATUS dsgetdcname_cached(TALLOC_CTX *mem_ctx,
329 struct messaging_context *msg_ctx,
330 const char *domain_name,
331 const struct GUID *domain_guid,
332 uint32_t flags,
333 const char *site_name,
334 struct netr_DsRGetDCNameInfo **info)
335 {
336 NTSTATUS status;
337
338 status = dsgetdcname_cache_fetch(mem_ctx, domain_name, domain_guid,
339 flags, info);
340 if (!NT_STATUS_IS_OK(status)
341 && !NT_STATUS_EQUAL(status, NT_STATUS_NOT_FOUND)) {
342 DEBUG(10,("dsgetdcname_cached: cache fetch failed with: %s\n",
343 nt_errstr(status)));
344 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
345 }
346
347 if (flags & DS_BACKGROUND_ONLY) {
348 return status;
349 }
350
351 if (NT_STATUS_EQUAL(status, NT_STATUS_NOT_FOUND)) {
352 struct netr_DsRGetDCNameInfo *dc_info;
353
354 status = dsgetdcname(mem_ctx, msg_ctx, domain_name,
355 domain_guid, site_name,
356 flags | DS_FORCE_REDISCOVERY,
357 &dc_info);
358
359 if (!NT_STATUS_IS_OK(status)) {
360 return status;
361 }
362
363 *info = dc_info;
364 }
365
366 return status;
367 }
368
369 /****************************************************************
370 ****************************************************************/
371
372 static bool check_allowed_required_flags(uint32_t flags,
373 const char *site_name)
374 {
375 uint32_t return_type = flags & (DS_RETURN_FLAT_NAME|DS_RETURN_DNS_NAME);
376 uint32_t offered_type = flags & (DS_IS_FLAT_NAME|DS_IS_DNS_NAME);
377 uint32_t query_type = flags & (DS_BACKGROUND_ONLY|DS_FORCE_REDISCOVERY);
378
379 /* FIXME: check for DSGETDC_VALID_FLAGS and check for exclusive bits
380 * (DS_PDC_REQUIRED, DS_KDC_REQUIRED, DS_GC_SERVER_REQUIRED) */
381
382 debug_dsdcinfo_flags(10, flags);
383
384 if ((flags & DS_TRY_NEXTCLOSEST_SITE) && site_name) {
385 return false;
386 }
387
388 if (return_type == (DS_RETURN_FLAT_NAME|DS_RETURN_DNS_NAME)) {
389 return false;
390 }
391
392 if (offered_type == (DS_IS_DNS_NAME|DS_IS_FLAT_NAME)) {
393 return false;
394 }
395
396 if (query_type == (DS_BACKGROUND_ONLY|DS_FORCE_REDISCOVERY)) {
397 return false;
398 }
399
400 #if 0
401 if ((flags & DS_RETURN_DNS_NAME) && (!(flags & DS_IP_REQUIRED))) {
402 printf("gd: here5 \n");
403 return false;
404 }
405 #endif
406 return true;
407 }
408
409 /****************************************************************
410 ****************************************************************/
411
412 static NTSTATUS discover_dc_netbios(TALLOC_CTX *mem_ctx,
413 const char *domain_name,
414 uint32_t flags,
415 struct ip_service_name **returned_dclist,
416 size_t *returned_count)
417 {
418 NTSTATUS status;
419 enum nbt_name_type name_type = NBT_NAME_LOGON;
420 struct samba_sockaddr *salist = NULL;
421 size_t i;
422 struct ip_service_name *dclist = NULL;
423 size_t count = 0;
424 static const char *resolve_order[] = { "lmhosts", "wins", "bcast", NULL };
425
426 if (flags & DS_PDC_REQUIRED) {
427 name_type = NBT_NAME_PDC;
428 }
429
430 status = internal_resolve_name(mem_ctx,
431 domain_name,
432 name_type,
433 NULL,
434 &salist,
435 &count,
436 resolve_order);
437 if (!NT_STATUS_IS_OK(status)) {
438 NTSTATUS raw_status = status;
439
440 if (NT_STATUS_EQUAL(status, NT_STATUS_NOT_FOUND)) {
441 status = NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
442 }
443 if (NT_STATUS_EQUAL(status, NT_STATUS_INVALID_ADDRESS)) {
444 status = NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
445 }
446
447 DBG_DEBUG("failed to find DC for %s: %s => %s\n",
448 domain_name,
449 nt_errstr(raw_status),
450 nt_errstr(status));
451 return status;
452 }
453
454 dclist = talloc_zero_array(mem_ctx, struct ip_service_name, count);
455 if (!dclist) {
456 TALLOC_FREE(salist);
457 return NT_STATUS_NO_MEMORY;
458 }
459
460 for (i=0; i<count; i++) {
461 char addr[INET6_ADDRSTRLEN];
462 struct ip_service_name *r = &dclist[i];
463
464 print_sockaddr(addr, sizeof(addr),
465 &salist[i].u.ss);
466
467 r->sa = salist[i];
468 r->hostname = talloc_strdup(mem_ctx, addr);
469 if (!r->hostname) {
470 TALLOC_FREE(salist);
471 TALLOC_FREE(dclist);
472 return NT_STATUS_NO_MEMORY;
473 }
474
475 }
476
477 TALLOC_FREE(salist);
478
479 *returned_dclist = dclist;
480 *returned_count = count;
481
482 return NT_STATUS_OK;
483 }
484
485 /****************************************************************
486 ****************************************************************/
487
488 static NTSTATUS discover_dc_dns(TALLOC_CTX *mem_ctx,
489 const char *domain_name,
490 const struct GUID *domain_guid,
491 uint32_t flags,
492 const char *site_name,
493 struct ip_service_name **returned_dclist,
494 size_t *return_count)
495 {
496 size_t i;
497 NTSTATUS status;
498 struct dns_rr_srv *dcs = NULL;
499 size_t numdcs = 0;
500 struct ip_service_name *dclist = NULL;
501 size_t ret_count = 0;
502 char *query = NULL;
503
504 if (flags & DS_PDC_REQUIRED) {
505 query = ads_dns_query_string_pdc(mem_ctx, domain_name);
506 } else if (flags & DS_GC_SERVER_REQUIRED) {
507 query = ads_dns_query_string_gcs(mem_ctx, domain_name);
508 } else if (flags & DS_KDC_REQUIRED) {
509 query = ads_dns_query_string_kdcs(mem_ctx, domain_name);
510 } else if (flags & DS_DIRECTORY_SERVICE_REQUIRED) {
511 query = ads_dns_query_string_dcs(mem_ctx, domain_name);
512 } else if (domain_guid) {
513 query = ads_dns_query_string_dcs_guid(
514 mem_ctx, domain_guid, domain_name);
515 } else {
516 query = ads_dns_query_string_dcs(mem_ctx, domain_name);
517 }
518
519 if (query == NULL) {
520 return NT_STATUS_NO_MEMORY;
521 }
522
523 status = ads_dns_query_srv(
524 mem_ctx,
525 lp_get_async_dns_timeout(),
526 site_name,
527 query,
528 &dcs,
529 &numdcs);
530 TALLOC_FREE(query);
531 if (!NT_STATUS_IS_OK(status)) {
532 return status;
533 }
534
535 if (numdcs == 0) {
536 TALLOC_FREE(dcs);
537 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
538 }
539
540 /* Check for integer wrap. */
541 if (numdcs + numdcs < numdcs) {
542 TALLOC_FREE(dcs);
543 return NT_STATUS_INVALID_PARAMETER;
544 }
545
546 /*
547 * We're only returning up to 2 addresses per
548 * DC name, so just allocate size numdcs x 2.
549 */
550
551 dclist = talloc_zero_array(mem_ctx,
552 struct ip_service_name,
553 numdcs * 2);
554 if (!dclist) {
555 TALLOC_FREE(dcs);
556 return NT_STATUS_NO_MEMORY;
557 }
558
559 /*
560 * First, copy the SRV record replies that
561 * have IP addresses returned with them.
562 */
563 ret_count = 0;
564 for (i = 0; i < numdcs; i++) {
565 size_t j;
566 bool have_v4_addr = false;
567 bool have_v6_addr = false;
568
569 if (dcs[i].num_ips == 0) {
570 continue;
571 }
572
573 /*
574 * Pick up to 1 address from each address
575 * family (IPv4, IPv6).
576 *
577 * This is different from the previous
578 * code which picked a 'next ip' address
579 * each time, incrementing an index.
580 * Too complex to maintain :-(.
581 */
582 for (j = 0; j < dcs[i].num_ips; j++) {
583 if ((dcs[i].ss_s[j].ss_family == AF_INET && !have_v4_addr) ||
584 (dcs[i].ss_s[j].ss_family == AF_INET6 && !have_v6_addr)) {
585 bool ok;
586 dclist[ret_count].hostname =
587 talloc_strdup(dclist, dcs[i].hostname);
588 ok = sockaddr_storage_to_samba_sockaddr(
589 &dclist[ret_count].sa,
590 &dcs[i].ss_s[j]);
591 if (!ok) {
592 TALLOC_FREE(dcs);
593 TALLOC_FREE(dclist);
594 return NT_STATUS_INVALID_PARAMETER;
595 }
596 ret_count++;
597 if (dcs[i].ss_s[j].ss_family == AF_INET) {
598 have_v4_addr = true;
599 } else {
600 have_v6_addr = true;
601 }
602 if (have_v4_addr && have_v6_addr) {
603 break;
604 }
605 }
606 }
607 }
608
609 TALLOC_FREE(dcs);
610
611 if (ret_count == 0) {
612 TALLOC_FREE(dclist);
613 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
614 }
615
616 *returned_dclist = dclist;
617 *return_count = ret_count;
618 return NT_STATUS_OK;
619 }
620
621 /****************************************************************
622 ****************************************************************/
623
624 static NTSTATUS make_domain_controller_info(TALLOC_CTX *mem_ctx,
625 const char *dc_unc,
626 const char *dc_address,
627 uint32_t dc_address_type,
628 const struct GUID *domain_guid,
629 const char *domain_name,
630 const char *forest_name,
631 uint32_t flags,
632 const char *dc_site_name,
633 const char *client_site_name,
634 struct netr_DsRGetDCNameInfo **info_out)
635 {
636 struct netr_DsRGetDCNameInfo *info;
637
638 info = talloc_zero(mem_ctx, struct netr_DsRGetDCNameInfo);
639 NT_STATUS_HAVE_NO_MEMORY(info);
640
641 if (dc_unc) {
642 if (!(dc_unc[0] == '\\' && dc_unc[1] == '\\')) {
643 info->dc_unc = talloc_asprintf(mem_ctx, "\\\\%s",
644 dc_unc);
645 } else {
646 info->dc_unc = talloc_strdup(mem_ctx, dc_unc);
647 }
648 NT_STATUS_HAVE_NO_MEMORY(info->dc_unc);
649 }
650
651 if (dc_address) {
652 if (!(dc_address[0] == '\\' && dc_address[1] == '\\')) {
653 info->dc_address = talloc_asprintf(mem_ctx, "\\\\%s",
654 dc_address);
655 } else {
656 info->dc_address = talloc_strdup(mem_ctx, dc_address);
657 }
658 NT_STATUS_HAVE_NO_MEMORY(info->dc_address);
659 }
660
661 info->dc_address_type = dc_address_type;
662
663 if (domain_guid) {
664 info->domain_guid = *domain_guid;
665 }
666
667 if (domain_name) {
668 info->domain_name = talloc_strdup(mem_ctx, domain_name);
669 NT_STATUS_HAVE_NO_MEMORY(info->domain_name);
670 }
671
672 if (forest_name && *forest_name) {
673 info->forest_name = talloc_strdup(mem_ctx, forest_name);
674 NT_STATUS_HAVE_NO_MEMORY(info->forest_name);
675 flags |= DS_DNS_FOREST_ROOT;
676 }
677
678 info->dc_flags = flags;
679
680 if (dc_site_name) {
681 info->dc_site_name = talloc_strdup(mem_ctx, dc_site_name);
682 NT_STATUS_HAVE_NO_MEMORY(info->dc_site_name);
683 }
684
685 if (client_site_name) {
686 info->client_site_name = talloc_strdup(mem_ctx,
687 client_site_name);
688 NT_STATUS_HAVE_NO_MEMORY(info->client_site_name);
689 }
690
691 *info_out = info;
692
693 return NT_STATUS_OK;
694 }
695
696 /****************************************************************
697 ****************************************************************/
698
699 static void map_dc_and_domain_names(uint32_t flags,
700 const char *dc_name,
701 const char *domain_name,
702 const char *dns_dc_name,
703 const char *dns_domain_name,
704 uint32_t *dc_flags,
705 const char **hostname_p,
706 const char **domain_p)
707 {
708 switch (flags & 0xf0000000) {
709 case DS_RETURN_FLAT_NAME:
710 if (dc_name && domain_name &&
711 *dc_name && *domain_name) {
712 *hostname_p = dc_name;
713 *domain_p = domain_name;
714 break;
715 }
716
717 FALL_THROUGH;
718 case DS_RETURN_DNS_NAME:
719 default:
720 if (dns_dc_name && dns_domain_name &&
721 *dns_dc_name && *dns_domain_name) {
722 *hostname_p = dns_dc_name;
723 *domain_p = dns_domain_name;
724 *dc_flags |= DS_DNS_DOMAIN | DS_DNS_CONTROLLER;
725 break;
726 }
727 if (dc_name && domain_name &&
728 *dc_name && *domain_name) {
729 *hostname_p = dc_name;
730 *domain_p = domain_name;
731 break;
732 }
733 }
734 }
735
736 /****************************************************************
737 ****************************************************************/
738
739 static NTSTATUS make_dc_info_from_cldap_reply(
740 TALLOC_CTX *mem_ctx,
741 uint32_t flags,
742 const struct samba_sockaddr *sa,
743 struct NETLOGON_SAM_LOGON_RESPONSE_EX *r,
744 struct netr_DsRGetDCNameInfo **info)
745 {
746 const char *dc_hostname = NULL;
747 const char *dc_domain_name = NULL;
748 const char *dc_address = NULL;
749 const char *dc_forest = NULL;
750 uint32_t dc_address_type = 0;
751 uint32_t dc_flags = 0;
752 struct GUID *dc_domain_guid = NULL;
753 const char *dc_server_site = NULL;
754 const char *dc_client_site = NULL;
755
756 char addr[INET6_ADDRSTRLEN];
757
758 if (sa != NULL) {
759 print_sockaddr(addr, sizeof(addr), &sa->u.ss);
760 dc_address = addr;
761 dc_address_type = DS_ADDRESS_TYPE_INET;
762 } else {
763 if (r->sockaddr.pdc_ip) {
764 dc_address = r->sockaddr.pdc_ip;
765 dc_address_type = DS_ADDRESS_TYPE_INET;
766 } else {
767 dc_address = r->pdc_name;
768 dc_address_type = DS_ADDRESS_TYPE_NETBIOS;
769 }
770 }
771
772 map_dc_and_domain_names(flags,
773 r->pdc_name,
774 r->domain_name,
775 r->pdc_dns_name,
776 r->dns_domain,
777 &dc_flags,
778 &dc_hostname,
779 &dc_domain_name);
780
781 dc_flags |= r->server_type;
782 dc_forest = r->forest;
783 dc_domain_guid = &r->domain_uuid;
784 dc_server_site = r->server_site;
785 dc_client_site = r->client_site;
786
787 return make_domain_controller_info(mem_ctx,
788 dc_hostname,
789 dc_address,
790 dc_address_type,
791 dc_domain_guid,
792 dc_domain_name,
793 dc_forest,
794 dc_flags,
795 dc_server_site,
796 dc_client_site,
797 info);
798 }
799
800 /****************************************************************
801 ****************************************************************/
802
803 static uint32_t map_ds_flags_to_nt_version(uint32_t flags)
804 {
805 uint32_t nt_version = 0;
806
807 if (flags & DS_PDC_REQUIRED) {
808 nt_version |= NETLOGON_NT_VERSION_PDC;
809 }
810
811 if (flags & DS_GC_SERVER_REQUIRED) {
812 nt_version |= NETLOGON_NT_VERSION_GC;
813 }
814
815 if (flags & DS_TRY_NEXTCLOSEST_SITE) {
816 nt_version |= NETLOGON_NT_VERSION_WITH_CLOSEST_SITE;
817 }
818
819 if (flags & DS_IP_REQUIRED) {
820 nt_version |= NETLOGON_NT_VERSION_IP;
821 }
822
823 return nt_version;
824 }
825
826 /****************************************************************
827 ****************************************************************/
828
829 static NTSTATUS process_dc_dns(TALLOC_CTX *mem_ctx,
830 const char *domain_name,
831 uint32_t flags,
832 struct ip_service_name *dclist,
833 size_t num_dcs,
834 struct netr_DsRGetDCNameInfo **info)
835 {
836 size_t i = 0;
837 struct tsocket_address **addrs = NULL;
838 struct netlogon_samlogon_response **responses = NULL;
839 const uint32_t nt_version = NETLOGON_NT_VERSION_5 |
840 NETLOGON_NT_VERSION_5EX;
841 NTSTATUS status;
842
843 addrs = talloc_array(mem_ctx, struct tsocket_address *, num_dcs);
844 if (addrs == NULL) {
845 return NT_STATUS_NO_MEMORY;
846 }
847
848 for (i=0; i<num_dcs; i++) {
849 int ret = tsocket_address_bsd_from_samba_sockaddr(
850 addrs, &dclist[i].sa, &addrs[i]);
851 if (ret != 0) {
852 status = map_nt_error_from_unix(errno);
853 goto done;
854 }
855 }
856
857 status = netlogon_pings(
858 addrs, /* mem_ctx */
859 lp_client_netlogon_ping_protocol(), /* proto */
860 addrs, /* servers */
861 num_dcs, /* num_servers */
862 (struct netlogon_ping_filter){
863 .ntversion = nt_version,
864 .acct_ctrl = -1,
865 .domain = domain_name,
866 .required_flags = flags,
867 },
868 1, /* min_servers */
869 timeval_current_ofs(MAX(3, lp_ldap_timeout() / 2), 0),
870 &responses);
871
872 if (!NT_STATUS_IS_OK(status)) {
873 status = NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
874 goto done;
875 }
876
877 for (i = 0; i < num_dcs; i++) {
878 struct netlogon_samlogon_response *r = responses[i];
879
880 if (r == NULL) {
881 continue;
882 }
883 if (r->ntver != NETLOGON_NT_VERSION_5EX) {
884 continue;
885 }
886 status = make_dc_info_from_cldap_reply(
887 mem_ctx, flags, &dclist[i].sa, &r->data.nt5_ex, info);
888 if (!NT_STATUS_IS_OK(status)) {
889 continue;
890 }
891 status = store_cldap_reply(mem_ctx,
892 flags,
893 &dclist[i].sa,
894 nt_version,
895 &r->data.nt5_ex);
896 if (!NT_STATUS_IS_OK(status)) {
897 continue;
898 }
899 goto done;
900 }
901
902 status = NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
903 done:
904 TALLOC_FREE(addrs);
905 return status;
906 }
907
908 /****************************************************************
909 ****************************************************************/
910
911 /****************************************************************
912 ****************************************************************/
913
914 static NTSTATUS process_dc_netbios(TALLOC_CTX *mem_ctx,
915 struct messaging_context *msg_ctx,
916 const char *domain_name,
917 uint32_t flags,
918 struct ip_service_name *dclist,
919 size_t num_dcs,
920 struct netr_DsRGetDCNameInfo **info)
921 {
922 enum nbt_name_type name_type = NBT_NAME_LOGON;
923 NTSTATUS status;
924 size_t i;
925 const char *dc_name = NULL;
926 fstring tmp_dc_name;
927 struct netlogon_samlogon_response *r = NULL;
928 bool store_cache = false;
929 uint32_t nt_version = NETLOGON_NT_VERSION_1 |
930 NETLOGON_NT_VERSION_5 |
931 NETLOGON_NT_VERSION_5EX_WITH_IP;
932 size_t len = strlen(lp_netbios_name());
933 char my_acct_name[len+2];
934
935 if (msg_ctx == NULL) {
936 return NT_STATUS_INVALID_PARAMETER;
937 }
938
939 if (flags & DS_PDC_REQUIRED) {
940 name_type = NBT_NAME_PDC;
941 }
942
943 /*
944 * It's 2024 we always want an AD style response!
945 */
946 nt_version |= NETLOGON_NT_VERSION_AVOID_NT4EMUL;
947
948 nt_version |= map_ds_flags_to_nt_version(flags);
949
950 snprintf(my_acct_name,
951 sizeof(my_acct_name),
952 "%s$",
953 lp_netbios_name());
954
955 DEBUG(10,("process_dc_netbios\n"));
956
957 for (i=0; i<num_dcs; i++) {
958 uint16_t val;
959
960 generate_random_buffer((uint8_t *)&val, 2);
961
962 status = nbt_getdc(msg_ctx, 10, &dclist[i].sa.u.ss, domain_name,
963 NULL, my_acct_name, ACB_WSTRUST, nt_version,
964 mem_ctx, &nt_version, &dc_name, &r);
965 if (NT_STATUS_IS_OK(status)) {
966 store_cache = true;
967 namecache_store(dc_name,
968 NBT_NAME_SERVER,
969 1,
970 &dclist[i].sa);
971 goto make_reply;
972 }
973
974 if (name_status_find(domain_name,
975 name_type,
976 NBT_NAME_SERVER,
977 &dclist[i].sa.u.ss,
978 tmp_dc_name))
979 {
980 struct NETLOGON_SAM_LOGON_RESPONSE_NT40 logon1;
981
982 r = talloc_zero(mem_ctx, struct netlogon_samlogon_response);
983 NT_STATUS_HAVE_NO_MEMORY(r);
984
985 ZERO_STRUCT(logon1);
986
987 nt_version = NETLOGON_NT_VERSION_1;
988
989 logon1.nt_version = nt_version;
990 logon1.pdc_name = tmp_dc_name;
991 logon1.domain_name = talloc_strdup_upper(mem_ctx, domain_name);
992 NT_STATUS_HAVE_NO_MEMORY(logon1.domain_name);
993
994 r->data.nt4 = logon1;
995 r->ntver = nt_version;
996
997 map_netlogon_samlogon_response(r);
998
999 namecache_store(tmp_dc_name,
1000 NBT_NAME_SERVER,
1001 1,
1002 &dclist[i].sa);
1003
1004 goto make_reply;
1005 }
1006 }
1007
1008 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
1009
1010 make_reply:
1011
1012 status = make_dc_info_from_cldap_reply(mem_ctx, flags, &dclist[i].sa,
1013 &r->data.nt5_ex, info);
1014 if (NT_STATUS_IS_OK(status) && store_cache) {
1015 return store_cldap_reply(mem_ctx, flags, &dclist[i].sa,
1016 nt_version, &r->data.nt5_ex);
1017 }
1018
1019 return status;
1020 }
1021
1022 /****************************************************************
1023 ****************************************************************/
1024
1025 static NTSTATUS dsgetdcname_rediscover(TALLOC_CTX *mem_ctx,
1026 struct messaging_context *msg_ctx,
1027 const char *domain_name,
1028 const struct GUID *domain_guid,
1029 uint32_t flags,
1030 const char *site_name,
1031 struct netr_DsRGetDCNameInfo **info)
1032 {
1033 NTSTATUS status;
1034 struct ip_service_name *dclist = NULL;
1035 size_t num_dcs = 0;
1036
1037 DEBUG(10,("dsgetdcname_rediscover\n"));
1038
1039 if (flags & DS_IS_FLAT_NAME) {
1040
1041 if (lp_disable_netbios()) {
1042 return NT_STATUS_NOT_SUPPORTED;
1043 }
1044
1045 status = discover_dc_netbios(mem_ctx, domain_name, flags,
1046 &dclist, &num_dcs);
1047 NT_STATUS_NOT_OK_RETURN(status);
1048
1049 return process_dc_netbios(mem_ctx, msg_ctx, domain_name, flags,
1050 dclist, num_dcs, info);
1051 }
1052
1053 if (flags & DS_IS_DNS_NAME) {
1054
1055 status = discover_dc_dns(mem_ctx, domain_name, domain_guid,
1056 flags, site_name, &dclist, &num_dcs);
1057 NT_STATUS_NOT_OK_RETURN(status);
1058
1059 return process_dc_dns(mem_ctx, domain_name, flags,
1060 dclist, num_dcs, info);
1061 }
1062
1063 status = discover_dc_dns(mem_ctx, domain_name, domain_guid, flags,
1064 site_name, &dclist, &num_dcs);
1065
1066 if (NT_STATUS_IS_OK(status) && num_dcs != 0) {
1067
1068 status = process_dc_dns(mem_ctx, domain_name, flags, dclist,
1069 num_dcs, info);
1070 if (NT_STATUS_IS_OK(status)) {
1071 return status;
1072 }
1073 }
1074
1075 if (lp_disable_netbios()) {
1076 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
1077 }
1078
1079 status = discover_dc_netbios(mem_ctx, domain_name, flags, &dclist,
1080 &num_dcs);
1081 NT_STATUS_NOT_OK_RETURN(status);
1082
1083 return process_dc_netbios(mem_ctx, msg_ctx, domain_name, flags, dclist,
1084 num_dcs, info);
1085 }
1086
1087 static bool is_closest_site(struct netr_DsRGetDCNameInfo *info)
1088 {
1089 if (info->dc_flags & DS_SERVER_CLOSEST) {
1090 return true;
1091 }
1092
1093 if (!info->client_site_name) {
1094 return true;
1095 }
1096
1097 if (!info->dc_site_name) {
1098 return false;
1099 }
1100
1101 if (strcmp(info->client_site_name, info->dc_site_name) == 0) {
1102 return true;
1103 }
1104
1105 return false;
1106 }
1107
1108 /********************************************************************
1109 Internal dsgetdcname.
1110 ********************************************************************/
1111
1112 static NTSTATUS dsgetdcname_internal(TALLOC_CTX *mem_ctx,
1113 struct messaging_context *msg_ctx,
1114 const char *domain_name,
1115 const struct GUID *domain_guid,
1116 const char *site_name,
1117 uint32_t flags,
1118 struct netr_DsRGetDCNameInfo **info)
1119 {
1120 NTSTATUS status;
1121 struct netr_DsRGetDCNameInfo *myinfo = NULL;
1122 bool first = true;
1123 struct netr_DsRGetDCNameInfo *first_info = NULL;
1124
1125 DEBUG(10,("dsgetdcname_internal: domain_name: %s, "
1126 "domain_guid: %s, site_name: %s, flags: 0x%08x\n",
1127 domain_name,
1128 domain_guid ? GUID_string(mem_ctx, domain_guid) : "(null)",
1129 site_name ? site_name : "(null)", flags));
1130
1131 *info = NULL;
1132
1133 if (!check_allowed_required_flags(flags, site_name)) {
1134 DEBUG(0,("invalid flags specified\n"));
1135 return NT_STATUS_INVALID_PARAMETER;
1136 }
1137
1138 if (flags & DS_FORCE_REDISCOVERY) {
1139 goto rediscover;
1140 }
1141
1142 status = dsgetdcname_cached(mem_ctx, msg_ctx, domain_name, domain_guid,
1143 flags, site_name, &myinfo);
1144 if (NT_STATUS_IS_OK(status)) {
1145 *info = myinfo;
1146 goto done;
1147 }
1148
1149 if (flags & DS_BACKGROUND_ONLY) {
1150 goto done;
1151 }
1152
1153 rediscover:
1154 status = dsgetdcname_rediscover(mem_ctx, msg_ctx, domain_name,
1155 domain_guid, flags, site_name,
1156 &myinfo);
1157
1158 done:
1159 if (!NT_STATUS_IS_OK(status)) {
1160 if (!first) {
1161 *info = first_info;
1162 return NT_STATUS_OK;
1163 }
1164 return status;
1165 }
1166
1167 if (!first) {
1168 TALLOC_FREE(first_info);
1169 } else if (!is_closest_site(myinfo)) {
1170 first = false;
1171 first_info = myinfo;
1172 /* TODO: may use the next_closest_site here */
1173 site_name = myinfo->client_site_name;
1174 goto rediscover;
1175 }
1176
1177 *info = myinfo;
1178 return NT_STATUS_OK;
1179 }
1180
1181 /********************************************************************
1182 dsgetdcname.
1183
1184 This will be the only public function here.
1185 ********************************************************************/
1186
1187 NTSTATUS dsgetdcname(TALLOC_CTX *mem_ctx,
1188 struct messaging_context *msg_ctx,
1189 const char *domain_name,
1190 const struct GUID *domain_guid,
1191 const char *site_name,
1192 uint32_t flags,
1193 struct netr_DsRGetDCNameInfo **info)
1194 {
1195 NTSTATUS status;
1196 const char *query_site = NULL;
1197 char *ptr_to_free = NULL;
1198 bool retry_query_with_null = false;
1199
1200 if ((site_name == NULL) || (site_name[0] == '\0')) {
1201 ptr_to_free = sitename_fetch(mem_ctx, domain_name);
1202 if (ptr_to_free != NULL) {
1203 retry_query_with_null = true;
1204 }
1205 query_site = ptr_to_free;
1206 } else {
1207 query_site = site_name;
1208 }
1209
1210 status = dsgetdcname_internal(mem_ctx,
1211 msg_ctx,
1212 domain_name,
1213 domain_guid,
1214 query_site,
1215 flags,
1216 info);
1217
1218 TALLOC_FREE(ptr_to_free);
1219
1220 if (!NT_STATUS_EQUAL(status, NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND)) {
1221 return status;
1222 }
1223
1224 /* Should we try again with site_name == NULL ? */
1225 if (retry_query_with_null) {
1226 status = dsgetdcname_internal(mem_ctx,
1227 msg_ctx,
1228 domain_name,
1229 domain_guid,
1230 NULL,
1231 flags,
1232 info);
1233 }
1234
1235 return status;
1236 }
1237
1238 NTSTATUS dsgetonedcname(TALLOC_CTX *mem_ctx,
1239 struct messaging_context *msg_ctx,
1240 const char *domain_name,
1241 const char *dcname,
1242 uint32_t flags,
1243 struct netr_DsRGetDCNameInfo **info)
1244 {
1245 NTSTATUS status;
1246 struct sockaddr_storage *addrs;
1247 unsigned int num_addrs, i;
1248 const char *hostname = strip_hostname(dcname);
1249
1250 status = resolve_name_list(mem_ctx, hostname, 0x20,
1251 &addrs, &num_addrs);
1252 if (!NT_STATUS_IS_OK(status)) {
1253 return status;
1254 }
1255
1256 for (i = 0; i < num_addrs; i++) {
1257
1258 bool ok;
1259 struct ip_service_name dclist;
1260
1261 dclist.hostname = hostname;
1262 ok = sockaddr_storage_to_samba_sockaddr(&dclist.sa, &addrs[i]);
1263 if (!ok) {
1264 TALLOC_FREE(addrs);
1265 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
1266 }
1267
1268 status = process_dc_dns(mem_ctx, domain_name, flags,
1269 &dclist, 1, info);
1270 if (NT_STATUS_IS_OK(status)) {
1271 TALLOC_FREE(addrs);
1272 return NT_STATUS_OK;
1273 }
1274
1275 if (lp_disable_netbios()) {
1276 continue;
1277 }
1278
1279 status = process_dc_netbios(mem_ctx, msg_ctx, domain_name, flags,
1280 &dclist, 1, info);
1281 if (NT_STATUS_IS_OK(status)) {
1282 TALLOC_FREE(addrs);
1283 return NT_STATUS_OK;
1284 }
1285 }
1286
1287 TALLOC_FREE(addrs);
1288 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
1289 }
GSS-enabled samba4