source: vendor/current/source3/libsmb/dsgetdcname.c

Last change on this file was 988, checked in by Silvan Scherrer, 9 years ago

Samba Server: update vendor to version 4.4.3
File size: 30.3 KB
Line 
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 "libads/sitename_cache.h"
25#include "../librpc/gen_ndr/ndr_netlogon.h"
26#include "libads/cldap.h"
27#include "../lib/addns/dnsquery.h"
28#include "libsmb/clidgram.h"
29
30/* 15 minutes */
31#define DSGETDCNAME_CACHE_TTL 60*15
32
33struct ip_service_name {
34 struct sockaddr_storage ss;
35 const char *hostname;
36};
37
38static NTSTATUS make_dc_info_from_cldap_reply(TALLOC_CTX *mem_ctx,
39 uint32_t flags,
40 struct sockaddr_storage *ss,
41 struct NETLOGON_SAM_LOGON_RESPONSE_EX *r,
42 struct netr_DsRGetDCNameInfo **info);
43
44/****************************************************************
45****************************************************************/
46
47static void debug_dsdcinfo_flags(int lvl, uint32_t flags)
48{
49 DEBUG(lvl,("debug_dsdcinfo_flags: 0x%08x\n\t", flags));
50
51 if (flags & DS_FORCE_REDISCOVERY)
52 DEBUGADD(lvl,("DS_FORCE_REDISCOVERY "));
53 if (flags & 0x000000002)
54 DEBUGADD(lvl,("0x00000002 "));
55 if (flags & 0x000000004)
56 DEBUGADD(lvl,("0x00000004 "));
57 if (flags & 0x000000008)
58 DEBUGADD(lvl,("0x00000008 "));
59 if (flags & DS_DIRECTORY_SERVICE_REQUIRED)
60 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_REQUIRED "));
61 if (flags & DS_DIRECTORY_SERVICE_PREFERRED)
62 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_PREFERRED "));
63 if (flags & DS_GC_SERVER_REQUIRED)
64 DEBUGADD(lvl,("DS_GC_SERVER_REQUIRED "));
65 if (flags & DS_PDC_REQUIRED)
66 DEBUGADD(lvl,("DS_PDC_REQUIRED "));
67 if (flags & DS_BACKGROUND_ONLY)
68 DEBUGADD(lvl,("DS_BACKGROUND_ONLY "));
69 if (flags & DS_IP_REQUIRED)
70 DEBUGADD(lvl,("DS_IP_REQUIRED "));
71 if (flags & DS_KDC_REQUIRED)
72 DEBUGADD(lvl,("DS_KDC_REQUIRED "));
73 if (flags & DS_TIMESERV_REQUIRED)
74 DEBUGADD(lvl,("DS_TIMESERV_REQUIRED "));
75 if (flags & DS_WRITABLE_REQUIRED)
76 DEBUGADD(lvl,("DS_WRITABLE_REQUIRED "));
77 if (flags & DS_GOOD_TIMESERV_PREFERRED)
78 DEBUGADD(lvl,("DS_GOOD_TIMESERV_PREFERRED "));
79 if (flags & DS_AVOID_SELF)
80 DEBUGADD(lvl,("DS_AVOID_SELF "));
81 if (flags & DS_ONLY_LDAP_NEEDED)
82 DEBUGADD(lvl,("DS_ONLY_LDAP_NEEDED "));
83 if (flags & DS_IS_FLAT_NAME)
84 DEBUGADD(lvl,("DS_IS_FLAT_NAME "));
85 if (flags & DS_IS_DNS_NAME)
86 DEBUGADD(lvl,("DS_IS_DNS_NAME "));
87 if (flags & 0x00040000)
88 DEBUGADD(lvl,("0x00040000 "));
89 if (flags & 0x00080000)
90 DEBUGADD(lvl,("0x00080000 "));
91 if (flags & 0x00100000)
92 DEBUGADD(lvl,("0x00100000 "));
93 if (flags & 0x00200000)
94 DEBUGADD(lvl,("0x00200000 "));
95 if (flags & 0x00400000)
96 DEBUGADD(lvl,("0x00400000 "));
97 if (flags & 0x00800000)
98 DEBUGADD(lvl,("0x00800000 "));
99 if (flags & 0x01000000)
100 DEBUGADD(lvl,("0x01000000 "));
101 if (flags & 0x02000000)
102 DEBUGADD(lvl,("0x02000000 "));
103 if (flags & 0x04000000)
104 DEBUGADD(lvl,("0x04000000 "));
105 if (flags & 0x08000000)
106 DEBUGADD(lvl,("0x08000000 "));
107 if (flags & 0x10000000)
108 DEBUGADD(lvl,("0x10000000 "));
109 if (flags & 0x20000000)
110 DEBUGADD(lvl,("0x20000000 "));
111 if (flags & DS_RETURN_DNS_NAME)
112 DEBUGADD(lvl,("DS_RETURN_DNS_NAME "));
113 if (flags & DS_RETURN_FLAT_NAME)
114 DEBUGADD(lvl,("DS_RETURN_FLAT_NAME "));
115 if (flags)
116 DEBUGADD(lvl,("\n"));
117}
118
119/****************************************************************
120****************************************************************/
121
122static char *dsgetdcname_cache_key(TALLOC_CTX *mem_ctx, const char *domain)
123{
124 if (!domain) {
125 return NULL;
126 }
127
128 return talloc_asprintf_strupper_m(mem_ctx, "DSGETDCNAME/DOMAIN/%s",
129 domain);
130}
131
132/****************************************************************
133****************************************************************/
134
135static NTSTATUS dsgetdcname_cache_delete(TALLOC_CTX *mem_ctx,
136 const char *domain_name)
137{
138 char *key;
139
140 key = dsgetdcname_cache_key(mem_ctx, domain_name);
141 if (!key) {
142 return NT_STATUS_NO_MEMORY;
143 }
144
145 if (!gencache_del(key)) {
146 return NT_STATUS_UNSUCCESSFUL;
147 }
148
149 return NT_STATUS_OK;
150}
151
152/****************************************************************
153****************************************************************/
154
155static NTSTATUS dsgetdcname_cache_store(TALLOC_CTX *mem_ctx,
156 const char *domain_name,
157 const DATA_BLOB *blob)
158{
159 time_t expire_time;
160 char *key;
161 bool ret = false;
162
163 key = dsgetdcname_cache_key(mem_ctx, domain_name);
164 if (!key) {
165 return NT_STATUS_NO_MEMORY;
166 }
167
168 expire_time = time(NULL) + DSGETDCNAME_CACHE_TTL;
169
170 ret = gencache_set_data_blob(key, blob, expire_time);
171
172 return ret ? NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL;
173}
174
175/****************************************************************
176****************************************************************/
177
178static NTSTATUS store_cldap_reply(TALLOC_CTX *mem_ctx,
179 uint32_t flags,
180 struct sockaddr_storage *ss,
181 uint32_t nt_version,
182 struct NETLOGON_SAM_LOGON_RESPONSE_EX *r)
183{
184 DATA_BLOB blob;
185 enum ndr_err_code ndr_err;
186 NTSTATUS status;
187 char addr[INET6_ADDRSTRLEN];
188
189 print_sockaddr(addr, sizeof(addr), ss);
190
191 /* FIXME */
192 r->sockaddr_size = 0x10; /* the w32 winsock addr size */
193 r->sockaddr.sockaddr_family = 2; /* AF_INET */
194 r->sockaddr.pdc_ip = talloc_strdup(mem_ctx, addr);
195
196 ndr_err = ndr_push_struct_blob(&blob, mem_ctx, r,
197 (ndr_push_flags_fn_t)ndr_push_NETLOGON_SAM_LOGON_RESPONSE_EX);
198 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
199 return ndr_map_error2ntstatus(ndr_err);
200 }
201
202 if (r->domain_name) {
203 status = dsgetdcname_cache_store(mem_ctx, r->domain_name, &blob);
204 if (!NT_STATUS_IS_OK(status)) {
205 goto done;
206 }
207 if (r->client_site) {
208 sitename_store(r->domain_name, r->client_site);
209 }
210 }
211 if (r->dns_domain) {
212 status = dsgetdcname_cache_store(mem_ctx, r->dns_domain, &blob);
213 if (!NT_STATUS_IS_OK(status)) {
214 goto done;
215 }
216 if (r->client_site) {
217 sitename_store(r->dns_domain, r->client_site);
218 }
219 }
220
221 status = NT_STATUS_OK;
222
223 done:
224 data_blob_free(&blob);
225
226 return status;
227}
228
229/****************************************************************
230****************************************************************/
231
232static uint32_t get_cldap_reply_server_flags(struct netlogon_samlogon_response *r,
233 uint32_t nt_version)
234{
235 switch (nt_version & 0x0000001f) {
236 case 0:
237 case 1:
238 case 16:
239 case 17:
240 return 0;
241 case 2:
242 case 3:
243 case 18:
244 case 19:
245 return r->data.nt5.server_type;
246 case 4:
247 case 5:
248 case 6:
249 case 7:
250 return r->data.nt5_ex.server_type;
251 case 8:
252 case 9:
253 case 10:
254 case 11:
255 case 12:
256 case 13:
257 case 14:
258 case 15:
259 return r->data.nt5_ex.server_type;
260 case 20:
261 case 21:
262 case 22:
263 case 23:
264 case 24:
265 case 25:
266 case 26:
267 case 27:
268 case 28:
269 return r->data.nt5_ex.server_type;
270 case 29:
271 case 30:
272 case 31:
273 return r->data.nt5_ex.server_type;
274 default:
275 return 0;
276 }
277}
278
279/****************************************************************
280****************************************************************/
281
282#define RETURN_ON_FALSE(x) if (!(x)) return false;
283
284static bool check_cldap_reply_required_flags(uint32_t ret_flags,
285 uint32_t req_flags)
286{
287 if (req_flags == 0) {
288 return true;
289 }
290
291 if (req_flags & DS_PDC_REQUIRED)
292 RETURN_ON_FALSE(ret_flags & NBT_SERVER_PDC);
293
294 if (req_flags & DS_GC_SERVER_REQUIRED)
295 RETURN_ON_FALSE(ret_flags & NBT_SERVER_GC);
296
297 if (req_flags & DS_ONLY_LDAP_NEEDED)
298 RETURN_ON_FALSE(ret_flags & NBT_SERVER_LDAP);
299
300 if ((req_flags & DS_DIRECTORY_SERVICE_REQUIRED) ||
301 (req_flags & DS_DIRECTORY_SERVICE_PREFERRED))
302 RETURN_ON_FALSE(ret_flags & NBT_SERVER_DS);
303
304 if (req_flags & DS_KDC_REQUIRED)
305 RETURN_ON_FALSE(ret_flags & NBT_SERVER_KDC);
306
307 if (req_flags & DS_TIMESERV_REQUIRED)
308 RETURN_ON_FALSE(ret_flags & NBT_SERVER_TIMESERV);
309
310 if (req_flags & DS_WRITABLE_REQUIRED)
311 RETURN_ON_FALSE(ret_flags & NBT_SERVER_WRITABLE);
312
313 return true;
314}
315
316/****************************************************************
317****************************************************************/
318
319static NTSTATUS dsgetdcname_cache_fetch(TALLOC_CTX *mem_ctx,
320 const char *domain_name,
321 const struct GUID *domain_guid,
322 uint32_t flags,
323 struct netr_DsRGetDCNameInfo **info_p)
324{
325 char *key;
326 DATA_BLOB blob;
327 enum ndr_err_code ndr_err;
328 struct netr_DsRGetDCNameInfo *info;
329 struct NETLOGON_SAM_LOGON_RESPONSE_EX r;
330 NTSTATUS status;
331
332 key = dsgetdcname_cache_key(mem_ctx, domain_name);
333 if (!key) {
334 return NT_STATUS_NO_MEMORY;
335 }
336
337 if (!gencache_get_data_blob(key, NULL, &blob, NULL, NULL)) {
338 return NT_STATUS_NOT_FOUND;
339 }
340
341 info = talloc_zero(mem_ctx, struct netr_DsRGetDCNameInfo);
342 if (!info) {
343 data_blob_free(&blob);
344 return NT_STATUS_NO_MEMORY;
345 }
346
347 ndr_err = ndr_pull_struct_blob(&blob, mem_ctx, &r,
348 (ndr_pull_flags_fn_t)ndr_pull_NETLOGON_SAM_LOGON_RESPONSE_EX);
349
350 data_blob_free(&blob);
351 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
352 dsgetdcname_cache_delete(mem_ctx, domain_name);
353 return ndr_map_error2ntstatus(ndr_err);
354 }
355
356 status = make_dc_info_from_cldap_reply(mem_ctx, flags, NULL,
357 &r, &info);
358 if (!NT_STATUS_IS_OK(status)) {
359 return status;
360 }
361
362 if (DEBUGLEVEL >= 10) {
363 NDR_PRINT_DEBUG(netr_DsRGetDCNameInfo, info);
364 }
365
366 /* check flags */
367 if (!check_cldap_reply_required_flags(info->dc_flags, flags)) {
368 DEBUG(10,("invalid flags\n"));
369 return NT_STATUS_INVALID_PARAMETER;
370 }
371
372 if ((flags & DS_IP_REQUIRED) &&
373 (info->dc_address_type != DS_ADDRESS_TYPE_INET)) {
374 return NT_STATUS_INVALID_PARAMETER_MIX;
375 }
376
377 *info_p = info;
378
379 return NT_STATUS_OK;
380}
381
382/****************************************************************
383****************************************************************/
384
385static NTSTATUS dsgetdcname_cached(TALLOC_CTX *mem_ctx,
386 struct messaging_context *msg_ctx,
387 const char *domain_name,
388 const struct GUID *domain_guid,
389 uint32_t flags,
390 const char *site_name,
391 struct netr_DsRGetDCNameInfo **info)
392{
393 NTSTATUS status;
394
395 status = dsgetdcname_cache_fetch(mem_ctx, domain_name, domain_guid,
396 flags, info);
397 if (!NT_STATUS_IS_OK(status)
398 && !NT_STATUS_EQUAL(status, NT_STATUS_NOT_FOUND)) {
399 DEBUG(10,("dsgetdcname_cached: cache fetch failed with: %s\n",
400 nt_errstr(status)));
401 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
402 }
403
404 if (flags & DS_BACKGROUND_ONLY) {
405 return status;
406 }
407
408 if (NT_STATUS_EQUAL(status, NT_STATUS_NOT_FOUND)) {
409 struct netr_DsRGetDCNameInfo *dc_info;
410
411 status = dsgetdcname(mem_ctx, msg_ctx, domain_name,
412 domain_guid, site_name,
413 flags | DS_FORCE_REDISCOVERY,
414 &dc_info);
415
416 if (!NT_STATUS_IS_OK(status)) {
417 return status;
418 }
419
420 *info = dc_info;
421 }
422
423 return status;
424}
425
426/****************************************************************
427****************************************************************/
428
429static bool check_allowed_required_flags(uint32_t flags,
430 const char *site_name)
431{
432 uint32_t return_type = flags & (DS_RETURN_FLAT_NAME|DS_RETURN_DNS_NAME);
433 uint32_t offered_type = flags & (DS_IS_FLAT_NAME|DS_IS_DNS_NAME);
434 uint32_t query_type = flags & (DS_BACKGROUND_ONLY|DS_FORCE_REDISCOVERY);
435
436 /* FIXME: check for DSGETDC_VALID_FLAGS and check for excluse bits
437 * (DS_PDC_REQUIRED, DS_KDC_REQUIRED, DS_GC_SERVER_REQUIRED) */
438
439 debug_dsdcinfo_flags(10, flags);
440
441 if ((flags & DS_TRY_NEXTCLOSEST_SITE) && site_name) {
442 return false;
443 }
444
445 if (return_type == (DS_RETURN_FLAT_NAME|DS_RETURN_DNS_NAME)) {
446 return false;
447 }
448
449 if (offered_type == (DS_IS_DNS_NAME|DS_IS_FLAT_NAME)) {
450 return false;
451 }
452
453 if (query_type == (DS_BACKGROUND_ONLY|DS_FORCE_REDISCOVERY)) {
454 return false;
455 }
456
457#if 0
458 if ((flags & DS_RETURN_DNS_NAME) && (!(flags & DS_IP_REQUIRED))) {
459 printf("gd: here5 \n");
460 return false;
461 }
462#endif
463 return true;
464}
465
466/****************************************************************
467****************************************************************/
468
469static NTSTATUS discover_dc_netbios(TALLOC_CTX *mem_ctx,
470 const char *domain_name,
471 uint32_t flags,
472 struct ip_service_name **returned_dclist,
473 int *returned_count)
474{
475 NTSTATUS status;
476 enum nbt_name_type name_type = NBT_NAME_LOGON;
477 struct ip_service *iplist;
478 int i;
479 struct ip_service_name *dclist = NULL;
480 int count;
481 static const char *resolve_order[] = { "lmhosts", "wins", "bcast", NULL };
482
483 *returned_dclist = NULL;
484 *returned_count = 0;
485
486 if (flags & DS_PDC_REQUIRED) {
487 name_type = NBT_NAME_PDC;
488 }
489
490 status = internal_resolve_name(domain_name, name_type, NULL,
491 &iplist, &count,
492 resolve_order);
493 if (!NT_STATUS_IS_OK(status)) {
494 DEBUG(10,("discover_dc_netbios: failed to find DC\n"));
495 return status;
496 }
497
498 dclist = talloc_zero_array(mem_ctx, struct ip_service_name, count);
499 if (!dclist) {
500 SAFE_FREE(iplist);
501 return NT_STATUS_NO_MEMORY;
502 }
503
504 for (i=0; i<count; i++) {
505
506 char addr[INET6_ADDRSTRLEN];
507 struct ip_service_name *r = &dclist[i];
508
509 print_sockaddr(addr, sizeof(addr),
510 &iplist[i].ss);
511
512 r->ss = iplist[i].ss;
513 r->hostname = talloc_strdup(mem_ctx, addr);
514 if (!r->hostname) {
515 SAFE_FREE(iplist);
516 return NT_STATUS_NO_MEMORY;
517 }
518
519 }
520
521 *returned_dclist = dclist;
522 *returned_count = count;
523 SAFE_FREE(iplist);
524
525 return NT_STATUS_OK;
526}
527
528/****************************************************************
529****************************************************************/
530
531static NTSTATUS discover_dc_dns(TALLOC_CTX *mem_ctx,
532 const char *domain_name,
533 const struct GUID *domain_guid,
534 uint32_t flags,
535 const char *site_name,
536 struct ip_service_name **returned_dclist,
537 int *return_count)
538{
539 int i, j;
540 NTSTATUS status;
541 struct dns_rr_srv *dcs = NULL;
542 int numdcs = 0;
543 int numaddrs = 0;
544 struct ip_service_name *dclist = NULL;
545 int count = 0;
546
547 if (flags & DS_PDC_REQUIRED) {
548 status = ads_dns_query_pdc(mem_ctx,
549 domain_name,
550 &dcs,
551 &numdcs);
552 } else if (flags & DS_GC_SERVER_REQUIRED) {
553 status = ads_dns_query_gcs(mem_ctx,
554 domain_name,
555 site_name,
556 &dcs,
557 &numdcs);
558 } else if (flags & DS_KDC_REQUIRED) {
559 status = ads_dns_query_kdcs(mem_ctx,
560 domain_name,
561 site_name,
562 &dcs,
563 &numdcs);
564 } else if (flags & DS_DIRECTORY_SERVICE_REQUIRED) {
565 status = ads_dns_query_dcs(mem_ctx,
566 domain_name,
567 site_name,
568 &dcs,
569 &numdcs);
570 } else if (domain_guid) {
571 struct GUID_txt_buf buf;
572 GUID_buf_string(domain_guid, &buf);
573
574 status = ads_dns_query_dcs_guid(mem_ctx,
575 domain_name,
576 buf.buf,
577 &dcs,
578 &numdcs);
579 } else {
580 status = ads_dns_query_dcs(mem_ctx,
581 domain_name,
582 site_name,
583 &dcs,
584 &numdcs);
585 }
586
587 if (!NT_STATUS_IS_OK(status)) {
588 return status;
589 }
590
591 if (numdcs == 0) {
592 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
593 }
594
595 for (i=0;i<numdcs;i++) {
596 numaddrs += MAX(dcs[i].num_ips,1);
597 }
598
599 dclist = talloc_zero_array(mem_ctx,
600 struct ip_service_name,
601 numaddrs);
602 if (!dclist) {
603 return NT_STATUS_NO_MEMORY;
604 }
605
606 /* now unroll the list of IP addresses */
607
608 *return_count = 0;
609 i = 0;
610 j = 0;
611
612 while ((i < numdcs) && (count < numaddrs)) {
613
614 struct ip_service_name *r = &dclist[count];
615
616 r->hostname = dcs[i].hostname;
617
618 /* If we don't have an IP list for a name, lookup it up */
619
620 if (!dcs[i].ss_s) {
621 interpret_string_addr_prefer_ipv4(&r->ss,
622 dcs[i].hostname, 0);
623 i++;
624 j = 0;
625 } else {
626 /* use the IP addresses from the SRV response */
627
628 if (j >= dcs[i].num_ips) {
629 i++;
630 j = 0;
631 continue;
632 }
633
634 r->ss = dcs[i].ss_s[j];
635 j++;
636 }
637
638 /* make sure it is a valid IP. I considered checking the
639 * negative connection cache, but this is the wrong place for
640 * it. Maybe only as a hack. After think about it, if all of
641 * the IP addresses returned from DNS are dead, what hope does a
642 * netbios name lookup have? The standard reason for falling
643 * back to netbios lookups is that our DNS server doesn't know
644 * anything about the DC's -- jerry */
645
646 if (!is_zero_addr(&r->ss)) {
647 count++;
648 continue;
649 }
650 }
651
652 *returned_dclist = dclist;
653 *return_count = count;
654
655 if (count > 0) {
656 return NT_STATUS_OK;
657 }
658
659 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
660}
661
662/****************************************************************
663****************************************************************/
664
665static NTSTATUS make_domain_controller_info(TALLOC_CTX *mem_ctx,
666 const char *dc_unc,
667 const char *dc_address,
668 uint32_t dc_address_type,
669 const struct GUID *domain_guid,
670 const char *domain_name,
671 const char *forest_name,
672 uint32_t flags,
673 const char *dc_site_name,
674 const char *client_site_name,
675 struct netr_DsRGetDCNameInfo **info_out)
676{
677 struct netr_DsRGetDCNameInfo *info;
678
679 info = talloc_zero(mem_ctx, struct netr_DsRGetDCNameInfo);
680 NT_STATUS_HAVE_NO_MEMORY(info);
681
682 if (dc_unc) {
683 info->dc_unc = talloc_strdup(mem_ctx, dc_unc);
684 NT_STATUS_HAVE_NO_MEMORY(info->dc_unc);
685 }
686
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);
693 }
694 NT_STATUS_HAVE_NO_MEMORY(info->dc_address);
695 }
696
697 info->dc_address_type = dc_address_type;
698
699 if (domain_guid) {
700 info->domain_guid = *domain_guid;
701 }
702
703 if (domain_name) {
704 info->domain_name = talloc_strdup(mem_ctx, domain_name);
705 NT_STATUS_HAVE_NO_MEMORY(info->domain_name);
706 }
707
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;
712 }
713
714 info->dc_flags = flags;
715
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);
719 }
720
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);
725 }
726
727 *info_out = info;
728
729 return NT_STATUS_OK;
730}
731
732/****************************************************************
733****************************************************************/
734
735static 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)
743{
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;
751 }
752 case DS_RETURN_DNS_NAME:
753 default:
754 if (dns_dc_name && dns_domain_name &&
755 *dns_dc_name && *dns_domain_name) {
756 *hostname_p = dns_dc_name;
757 *domain_p = dns_domain_name;
758 *dc_flags |= DS_DNS_DOMAIN | DS_DNS_CONTROLLER;
759 break;
760 }
761 if (dc_name && domain_name &&
762 *dc_name && *domain_name) {
763 *hostname_p = dc_name;
764 *domain_p = domain_name;
765 break;
766 }
767 }
768}
769
770/****************************************************************
771****************************************************************/
772
773static NTSTATUS make_dc_info_from_cldap_reply(TALLOC_CTX *mem_ctx,
774 uint32_t flags,
775 struct sockaddr_storage *ss,
776 struct NETLOGON_SAM_LOGON_RESPONSE_EX *r,
777 struct netr_DsRGetDCNameInfo **info)
778{
779 const char *dc_hostname = NULL;
780 const char *dc_domain_name = NULL;
781 const char *dc_address = NULL;
782 const char *dc_forest = NULL;
783 uint32_t dc_address_type = 0;
784 uint32_t dc_flags = 0;
785 struct GUID *dc_domain_guid = NULL;
786 const char *dc_server_site = NULL;
787 const char *dc_client_site = NULL;
788
789 char addr[INET6_ADDRSTRLEN];
790
791 if (ss) {
792 print_sockaddr(addr, sizeof(addr), ss);
793 dc_address = addr;
794 dc_address_type = DS_ADDRESS_TYPE_INET;
795 } else {
796 if (r->sockaddr.pdc_ip) {
797 dc_address = r->sockaddr.pdc_ip;
798 dc_address_type = DS_ADDRESS_TYPE_INET;
799 } else {
800 dc_address = r->pdc_name;
801 dc_address_type = DS_ADDRESS_TYPE_NETBIOS;
802 }
803 }
804
805 map_dc_and_domain_names(flags,
806 r->pdc_name,
807 r->domain_name,
808 r->pdc_dns_name,
809 r->dns_domain,
810 &dc_flags,
811 &dc_hostname,
812 &dc_domain_name);
813
814 dc_flags |= r->server_type;
815 dc_forest = r->forest;
816 dc_domain_guid = &r->domain_uuid;
817 dc_server_site = r->server_site;
818 dc_client_site = r->client_site;
819
820 return make_domain_controller_info(mem_ctx,
821 dc_hostname,
822 dc_address,
823 dc_address_type,
824 dc_domain_guid,
825 dc_domain_name,
826 dc_forest,
827 dc_flags,
828 dc_server_site,
829 dc_client_site,
830 info);
831}
832
833/****************************************************************
834****************************************************************/
835
836static uint32_t map_ds_flags_to_nt_version(uint32_t flags)
837{
838 uint32_t nt_version = 0;
839
840 if (flags & DS_PDC_REQUIRED) {
841 nt_version |= NETLOGON_NT_VERSION_PDC;
842 }
843
844 if (flags & DS_GC_SERVER_REQUIRED) {
845 nt_version |= NETLOGON_NT_VERSION_GC;
846 }
847
848 if (flags & DS_TRY_NEXTCLOSEST_SITE) {
849 nt_version |= NETLOGON_NT_VERSION_WITH_CLOSEST_SITE;
850 }
851
852 if (flags & DS_IP_REQUIRED) {
853 nt_version |= NETLOGON_NT_VERSION_IP;
854 }
855
856 return nt_version;
857}
858
859/****************************************************************
860****************************************************************/
861
862static NTSTATUS process_dc_dns(TALLOC_CTX *mem_ctx,
863 const char *domain_name,
864 uint32_t flags,
865 struct ip_service_name *dclist,
866 int num_dcs,
867 struct netr_DsRGetDCNameInfo **info)
868{
869 int i = 0;
870 bool valid_dc = false;
871 struct netlogon_samlogon_response *r = NULL;
872 uint32_t nt_version = NETLOGON_NT_VERSION_5 |
873 NETLOGON_NT_VERSION_5EX;
874 uint32_t ret_flags = 0;
875 NTSTATUS status;
876
877 nt_version |= map_ds_flags_to_nt_version(flags);
878
879 for (i=0; i<num_dcs; i++) {
880
881 char addr[INET6_ADDRSTRLEN];
882 print_sockaddr(addr, sizeof(addr), &dclist[i].ss);
883
884 DEBUG(10,("LDAP ping to %s (%s)\n", dclist[i].hostname, addr));
885
886 if (ads_cldap_netlogon(mem_ctx, &dclist[i].ss,
887 domain_name,
888 nt_version,
889 &r))
890 {
891 nt_version = r->ntver;
892 ret_flags = get_cldap_reply_server_flags(r, nt_version);
893
894 if (check_cldap_reply_required_flags(ret_flags, flags)) {
895 valid_dc = true;
896 break;
897 }
898 }
899
900 continue;
901 }
902
903 if (!valid_dc) {
904 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
905 }
906
907 status = make_dc_info_from_cldap_reply(mem_ctx, flags, &dclist[i].ss,
908 &r->data.nt5_ex, info);
909 if (NT_STATUS_IS_OK(status)) {
910 return store_cldap_reply(mem_ctx, flags, &dclist[i].ss,
911 nt_version, &r->data.nt5_ex);
912 }
913
914 return status;
915}
916
917/****************************************************************
918****************************************************************/
919
920/****************************************************************
921****************************************************************/
922
923static NTSTATUS process_dc_netbios(TALLOC_CTX *mem_ctx,
924 struct messaging_context *msg_ctx,
925 const char *domain_name,
926 uint32_t flags,
927 struct ip_service_name *dclist,
928 int num_dcs,
929 struct netr_DsRGetDCNameInfo **info)
930{
931 struct sockaddr_storage ss;
932 struct ip_service ip_list;
933 enum nbt_name_type name_type = NBT_NAME_LOGON;
934 NTSTATUS status;
935 int i;
936 const char *dc_name = NULL;
937 fstring tmp_dc_name;
938 struct netlogon_samlogon_response *r = NULL;
939 bool store_cache = false;
940 uint32_t nt_version = NETLOGON_NT_VERSION_1 |
941 NETLOGON_NT_VERSION_5 |
942 NETLOGON_NT_VERSION_5EX_WITH_IP;
943
944 if (msg_ctx == NULL) {
945 return NT_STATUS_INVALID_PARAMETER;
946 }
947
948 if (flags & DS_PDC_REQUIRED) {
949 name_type = NBT_NAME_PDC;
950 }
951
952 nt_version |= map_ds_flags_to_nt_version(flags);
953
954 DEBUG(10,("process_dc_netbios\n"));
955
956 for (i=0; i<num_dcs; i++) {
957 uint16_t val;
958
959 generate_random_buffer((uint8_t *)&val, 2);
960
961 ip_list.ss = dclist[i].ss;
962 ip_list.port = 0;
963
964 if (!interpret_string_addr_prefer_ipv4(&ss, dclist[i].hostname, AI_NUMERICHOST)) {
965 return NT_STATUS_UNSUCCESSFUL;
966 }
967
968 status = nbt_getdc(msg_ctx, 10, &dclist[i].ss, domain_name,
969 NULL, nt_version,
970 mem_ctx, &nt_version, &dc_name, &r);
971 if (NT_STATUS_IS_OK(status)) {
972 store_cache = true;
973 namecache_store(dc_name, NBT_NAME_SERVER, 1, &ip_list);
974 goto make_reply;
975 }
976
977 if (name_status_find(domain_name,
978 name_type,
979 NBT_NAME_SERVER,
980 &dclist[i].ss,
981 tmp_dc_name))
982 {
983 struct NETLOGON_SAM_LOGON_RESPONSE_NT40 logon1;
984
985 r = talloc_zero(mem_ctx, struct netlogon_samlogon_response);
986 NT_STATUS_HAVE_NO_MEMORY(r);
987
988 ZERO_STRUCT(logon1);
989
990 nt_version = NETLOGON_NT_VERSION_1;
991
992 logon1.nt_version = nt_version;
993 logon1.pdc_name = tmp_dc_name;
994 logon1.domain_name = talloc_strdup_upper(mem_ctx, domain_name);
995 NT_STATUS_HAVE_NO_MEMORY(logon1.domain_name);
996
997 r->data.nt4 = logon1;
998 r->ntver = nt_version;
999
1000 map_netlogon_samlogon_response(r);
1001
1002 namecache_store(tmp_dc_name, NBT_NAME_SERVER, 1, &ip_list);
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].ss,
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].ss,
1016 nt_version, &r->data.nt5_ex);
1017 }
1018
1019 return status;
1020}
1021
1022/****************************************************************
1023****************************************************************/
1024
1025static 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 = NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
1034 struct ip_service_name *dclist = NULL;
1035 int num_dcs;
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
1087static 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
1112static 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 = NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
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 goto done;
1146 }
1147
1148 if (flags & DS_BACKGROUND_ONLY) {
1149 goto done;
1150 }
1151
1152 rediscover:
1153 status = dsgetdcname_rediscover(mem_ctx, msg_ctx, domain_name,
1154 domain_guid, flags, site_name,
1155 &myinfo);
1156
1157 done:
1158 if (!NT_STATUS_IS_OK(status)) {
1159 if (!first) {
1160 *info = first_info;
1161 return NT_STATUS_OK;
1162 }
1163 return status;
1164 }
1165
1166 if (!first) {
1167 TALLOC_FREE(first_info);
1168 } else if (!is_closest_site(myinfo)) {
1169 first = false;
1170 first_info = myinfo;
1171 /* TODO: may use the next_closest_site here */
1172 site_name = myinfo->client_site_name;
1173 goto rediscover;
1174 }
1175
1176 *info = myinfo;
1177 return NT_STATUS_OK;
1178}
1179
1180/********************************************************************
1181 dsgetdcname.
1182
1183 This will be the only public function here.
1184********************************************************************/
1185
1186NTSTATUS dsgetdcname(TALLOC_CTX *mem_ctx,
1187 struct messaging_context *msg_ctx,
1188 const char *domain_name,
1189 const struct GUID *domain_guid,
1190 const char *site_name,
1191 uint32_t flags,
1192 struct netr_DsRGetDCNameInfo **info)
1193{
1194 NTSTATUS status;
1195 const char *query_site = NULL;
1196 char *ptr_to_free = NULL;
1197 bool retry_query_with_null = false;
1198
1199 if ((site_name == NULL) || (site_name[0] == '\0')) {
1200 ptr_to_free = sitename_fetch(mem_ctx, domain_name);
1201 if (ptr_to_free != NULL) {
1202 retry_query_with_null = true;
1203 }
1204 query_site = ptr_to_free;
1205 } else {
1206 query_site = site_name;
1207 }
1208
1209 status = dsgetdcname_internal(mem_ctx,
1210 msg_ctx,
1211 domain_name,
1212 domain_guid,
1213 query_site,
1214 flags,
1215 info);
1216
1217 TALLOC_FREE(ptr_to_free);
1218
1219 if (!NT_STATUS_EQUAL(status, NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND)) {
1220 return status;
1221 }
1222
1223 /* Should we try again with site_name == NULL ? */
1224 if (retry_query_with_null) {
1225 status = dsgetdcname_internal(mem_ctx,
1226 msg_ctx,
1227 domain_name,
1228 domain_guid,
1229 NULL,
1230 flags,
1231 info);
1232 }
1233
1234 return status;
1235}
Note: See TracBrowser for help on using the repository browser.