source/libsmb/dsgetdcname.c

   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
  25 #define DSGETDCNAME_FMT "DSGETDCNAME/DOMAIN/%s"
  26 /* 15 minutes */
  27 #define DSGETDCNAME_CACHE_TTL   60*15
  28
  29 struct ip_service_name {
  30         struct sockaddr_storage ss;
  31         unsigned port;
  32         const char *hostname;
  33 };
  34
  35 static NTSTATUS make_dc_info_from_cldap_reply(TALLOC_CTX *mem_ctx,
  36                                               uint32_t flags,
  37                                               struct sockaddr_storage *ss,
  38                                               uint32_t nt_version,
  39                                               union nbt_cldap_netlogon *r,
  40                                               struct netr_DsRGetDCNameInfo **info);
  41
  42 /****************************************************************
  43 ****************************************************************/
  44
  45 void debug_dsdcinfo_flags(int lvl, uint32_t flags)
  46 {
  47         DEBUG(lvl,("debug_dsdcinfo_flags: 0x%08x\n\t", flags));
  48
  49         if (flags & DS_FORCE_REDISCOVERY)
  50                 DEBUGADD(lvl,("DS_FORCE_REDISCOVERY "));
  51         if (flags & 0x000000002)
  52                 DEBUGADD(lvl,("0x00000002 "));
  53         if (flags & 0x000000004)
  54                 DEBUGADD(lvl,("0x00000004 "));
  55         if (flags & 0x000000008)
  56                 DEBUGADD(lvl,("0x00000008 "));
  57         if (flags & DS_DIRECTORY_SERVICE_REQUIRED)
  58                 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_REQUIRED "));
  59         if (flags & DS_DIRECTORY_SERVICE_PREFERRED)
  60                 DEBUGADD(lvl,("DS_DIRECTORY_SERVICE_PREFERRED "));
  61         if (flags & DS_GC_SERVER_REQUIRED)
  62                 DEBUGADD(lvl,("DS_GC_SERVER_REQUIRED "));
  63         if (flags & DS_PDC_REQUIRED)
  64                 DEBUGADD(lvl,("DS_PDC_REQUIRED "));
  65         if (flags & DS_BACKGROUND_ONLY)
  66                 DEBUGADD(lvl,("DS_BACKGROUND_ONLY "));
  67         if (flags & DS_IP_REQUIRED)
  68                 DEBUGADD(lvl,("DS_IP_REQUIRED "));
  69         if (flags & DS_KDC_REQUIRED)
  70                 DEBUGADD(lvl,("DS_KDC_REQUIRED "));
  71         if (flags & DS_TIMESERV_REQUIRED)
  72                 DEBUGADD(lvl,("DS_TIMESERV_REQUIRED "));
  73         if (flags & DS_WRITABLE_REQUIRED)
  74                 DEBUGADD(lvl,("DS_WRITABLE_REQUIRED "));
  75         if (flags & DS_GOOD_TIMESERV_PREFERRED)
  76                 DEBUGADD(lvl,("DS_GOOD_TIMESERV_PREFERRED "));
  77         if (flags & DS_AVOID_SELF)
  78                 DEBUGADD(lvl,("DS_AVOID_SELF "));
  79         if (flags & DS_ONLY_LDAP_NEEDED)
  80                 DEBUGADD(lvl,("DS_ONLY_LDAP_NEEDED "));
  81         if (flags & DS_IS_FLAT_NAME)
  82                 DEBUGADD(lvl,("DS_IS_FLAT_NAME "));
  83         if (flags & DS_IS_DNS_NAME)
  84                 DEBUGADD(lvl,("DS_IS_DNS_NAME "));
  85         if (flags & 0x00040000)
  86                 DEBUGADD(lvl,("0x00040000 "));
  87         if (flags & 0x00080000)
  88                 DEBUGADD(lvl,("0x00080000 "));
  89         if (flags & 0x00100000)
  90                 DEBUGADD(lvl,("0x00100000 "));
  91         if (flags & 0x00200000)
  92                 DEBUGADD(lvl,("0x00200000 "));
  93         if (flags & 0x00400000)
  94                 DEBUGADD(lvl,("0x00400000 "));
  95         if (flags & 0x00800000)
  96                 DEBUGADD(lvl,("0x00800000 "));
  97         if (flags & 0x01000000)
  98                 DEBUGADD(lvl,("0x01000000 "));
  99         if (flags & 0x02000000)
 100                 DEBUGADD(lvl,("0x02000000 "));
 101         if (flags & 0x04000000)
 102                 DEBUGADD(lvl,("0x04000000 "));
 103         if (flags & 0x08000000)
 104                 DEBUGADD(lvl,("0x08000000 "));
 105         if (flags & 0x10000000)
 106                 DEBUGADD(lvl,("0x10000000 "));
 107         if (flags & 0x20000000)
 108                 DEBUGADD(lvl,("0x20000000 "));
 109         if (flags & DS_RETURN_DNS_NAME)
 110                 DEBUGADD(lvl,("DS_RETURN_DNS_NAME "));
 111         if (flags & DS_RETURN_FLAT_NAME)
 112                 DEBUGADD(lvl,("DS_RETURN_FLAT_NAME "));
 113         if (flags)
 114                 DEBUGADD(lvl,("\n"));
 115 }
 116
 117 /****************************************************************
 118 ****************************************************************/
 119
 120 static char *dsgetdcname_cache_key(TALLOC_CTX *mem_ctx, const char *domain)
 121 {
 122         if (!mem_ctx || !domain) {
 123                 return NULL;
 124         }
 125
 126         return talloc_asprintf_strupper_m(mem_ctx, DSGETDCNAME_FMT, domain);
 127 }
 128
 129 /****************************************************************
 130 ****************************************************************/
 131
 132 static NTSTATUS dsgetdcname_cache_delete(TALLOC_CTX *mem_ctx,
 133                                         const char *domain_name)
 134 {
 135         char *key;
 136
 137         if (!gencache_init()) {
 138                 return NT_STATUS_INTERNAL_DB_ERROR;
 139         }
 140
 141         key = dsgetdcname_cache_key(mem_ctx, domain_name);
 142         if (!key) {
 143                 return NT_STATUS_NO_MEMORY;
 144         }
 145
 146         if (!gencache_del(key)) {
 147                 return NT_STATUS_UNSUCCESSFUL;
 148         }
 149
 150         return NT_STATUS_OK;
 151 }
 152
 153 /****************************************************************
 154 ****************************************************************/
 155
 156 static NTSTATUS dsgetdcname_cache_store(TALLOC_CTX *mem_ctx,
 157                                         const char *domain_name,
 158                                         const DATA_BLOB *blob)
 159 {
 160         time_t expire_time;
 161         char *key;
 162         bool ret = false;
 163
 164         if (!gencache_init()) {
 165                 return NT_STATUS_INTERNAL_DB_ERROR;
 166         }
 167
 168         key = dsgetdcname_cache_key(mem_ctx, domain_name);
 169         if (!key) {
 170                 return NT_STATUS_NO_MEMORY;
 171         }
 172
 173         expire_time = time(NULL) + DSGETDCNAME_CACHE_TTL;
 174
 175         if (gencache_lock_entry(key) != 0) {
 176                 return NT_STATUS_LOCK_NOT_GRANTED;
 177         }
 178
 179         ret = gencache_set_data_blob(key, blob, expire_time);
 180
 181         gencache_unlock_entry(key);
 182
 183         return ret ? NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL;
 184 }
 185
 186 /****************************************************************
 187 ****************************************************************/
 188
 189 #define SET_STRING(x) \
 190         talloc_strdup(mem_ctx, x); \
 191         NT_STATUS_HAVE_NO_MEMORY(x);
 192
 193 static NTSTATUS map_logon29_from_cldap_reply(TALLOC_CTX *mem_ctx,
 194                                              uint32_t flags,
 195                                              struct sockaddr_storage *ss,
 196                                              uint32_t nt_version,
 197                                              union nbt_cldap_netlogon *r,
 198                                              struct nbt_cldap_netlogon_29 *p)
 199 {
 200         char addr[INET6_ADDRSTRLEN];
 201
 202         ZERO_STRUCTP(p);
 203
 204         print_sockaddr(addr, sizeof(addr), ss);
 205
 206         /* FIXME */
 207         p->dc_sock_addr_size = 0x10; /* the w32 winsock addr size */
 208         p->dc_sock_addr.family = 2; /* AF_INET */
 209         p->dc_sock_addr.pdc_ip = talloc_strdup(mem_ctx, addr);
 210
 211         switch (nt_version & 0x0000001f) {
 212                 case 0:
 213                         return NT_STATUS_INVALID_PARAMETER;
 214                 case 1:
 215                 case 16:
 216                 case 17:
 217                         p->pdc_name     = SET_STRING(r->logon1.pdc_name);
 218                         p->domain       = SET_STRING(r->logon1.domain_name);
 219
 220                         if (flags & DS_PDC_REQUIRED) {
 221                                 p->server_type = NBT_SERVER_WRITABLE |
 222                                                  NBT_SERVER_PDC;
 223                         }
 224                         break;
 225                 case 2:
 226                 case 3:
 227                 case 18:
 228                 case 19:
 229                         p->pdc_name     = SET_STRING(r->logon3.pdc_name);
 230                         p->domain       = SET_STRING(r->logon3.domain_name);
 231                         p->pdc_dns_name = SET_STRING(r->logon3.pdc_dns_name);
 232                         p->dns_domain   = SET_STRING(r->logon3.dns_domain);
 233                         p->server_type  = r->logon3.server_type;
 234                         p->forest       = SET_STRING(r->logon3.forest);
 235                         p->domain_uuid  = r->logon3.domain_uuid;
 236
 237                         break;
 238                 case 4:
 239                 case 5:
 240                 case 6:
 241                 case 7:
 242                         p->pdc_name     = SET_STRING(r->logon5.pdc_name);
 243                         p->domain       = SET_STRING(r->logon5.domain);
 244                         p->pdc_dns_name = SET_STRING(r->logon5.pdc_dns_name);
 245                         p->dns_domain   = SET_STRING(r->logon5.dns_domain);
 246                         p->server_type  = r->logon5.server_type;
 247                         p->forest       = SET_STRING(r->logon5.forest);
 248                         p->domain_uuid  = r->logon5.domain_uuid;
 249                         p->server_site  = SET_STRING(r->logon5.server_site);
 250                         p->client_site  = SET_STRING(r->logon5.client_site);
 251
 252                         break;
 253                 case 8:
 254                 case 9:
 255                 case 10:
 256                 case 11:
 257                 case 12:
 258                 case 13:
 259                 case 14:
 260                 case 15:
 261                         p->pdc_name     = SET_STRING(r->logon13.pdc_name);
 262                         p->domain       = SET_STRING(r->logon13.domain);
 263                         p->pdc_dns_name = SET_STRING(r->logon13.pdc_dns_name);
 264                         p->dns_domain   = SET_STRING(r->logon13.dns_domain);
 265                         p->server_type  = r->logon13.server_type;
 266                         p->forest       = SET_STRING(r->logon13.forest);
 267                         p->domain_uuid  = r->logon13.domain_uuid;
 268                         p->server_site  = SET_STRING(r->logon13.server_site);
 269                         p->client_site  = SET_STRING(r->logon13.client_site);
 270
 271                         break;
 272                 case 20:
 273                 case 21:
 274                 case 22:
 275                 case 23:
 276                 case 24:
 277                 case 25:
 278                 case 26:
 279                 case 27:
 280                 case 28:
 281                         p->pdc_name     = SET_STRING(r->logon15.pdc_name);
 282                         p->domain       = SET_STRING(r->logon15.domain);
 283                         p->pdc_dns_name = SET_STRING(r->logon15.pdc_dns_name);
 284                         p->dns_domain   = SET_STRING(r->logon15.dns_domain);
 285                         p->server_type  = r->logon15.server_type;
 286                         p->forest       = SET_STRING(r->logon15.forest);
 287                         p->domain_uuid  = r->logon15.domain_uuid;
 288                         p->server_site  = SET_STRING(r->logon15.server_site);
 289                         p->client_site  = SET_STRING(r->logon15.client_site);
 290
 291                         break;
 292                 case 29:
 293                 case 30:
 294                 case 31:
 295                         p->pdc_name     = SET_STRING(r->logon29.pdc_name);
 296                         p->domain       = SET_STRING(r->logon29.domain);
 297                         p->pdc_dns_name = SET_STRING(r->logon29.pdc_dns_name);
 298                         p->dns_domain   = SET_STRING(r->logon29.dns_domain);
 299                         p->server_type  = r->logon29.server_type;
 300                         p->forest       = SET_STRING(r->logon29.forest);
 301                         p->domain_uuid  = r->logon29.domain_uuid;
 302                         p->server_site  = SET_STRING(r->logon29.server_site);
 303                         p->client_site  = SET_STRING(r->logon29.client_site);
 304                         p->next_closest_site = SET_STRING(r->logon29.next_closest_site);
 305
 306                         break;
 307                 default:
 308                         return NT_STATUS_INVALID_PARAMETER;
 309         }
 310
 311         return NT_STATUS_OK;
 312 }
 313
 314 /****************************************************************
 315 ****************************************************************/
 316
 317 static NTSTATUS store_cldap_reply(TALLOC_CTX *mem_ctx,
 318                                   uint32_t flags,
 319                                   struct sockaddr_storage *ss,
 320                                   uint32_t nt_version,
 321                                   union nbt_cldap_netlogon *r)
 322 {
 323         DATA_BLOB blob;
 324         enum ndr_err_code ndr_err;
 325         NTSTATUS status;
 326         struct nbt_cldap_netlogon_29 logon29;
 327
 328         status = map_logon29_from_cldap_reply(mem_ctx, flags, ss,
 329                                               nt_version, r, &logon29);
 330         if (!NT_STATUS_IS_OK(status)) {
 331                 return status;
 332         }
 333
 334         ndr_err = ndr_push_struct_blob(&blob, mem_ctx, &logon29,
 335                        (ndr_push_flags_fn_t)ndr_push_nbt_cldap_netlogon_29);
 336         if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
 337                 return ndr_map_error2ntstatus(ndr_err);
 338         }
 339
 340         if (logon29.domain) {
 341                 status = dsgetdcname_cache_store(mem_ctx, logon29.domain, &blob);
 342                 if (!NT_STATUS_IS_OK(status)) {
 343                         goto done;
 344                 }
 345                 if (logon29.client_site) {
 346                         sitename_store(logon29.domain, logon29.client_site);
 347                 }
 348         }
 349         if (logon29.dns_domain) {
 350                 status = dsgetdcname_cache_store(mem_ctx, logon29.dns_domain, &blob);
 351                 if (!NT_STATUS_IS_OK(status)) {
 352                         goto done;
 353                 }
 354                 if (logon29.client_site) {
 355                         sitename_store(logon29.dns_domain, logon29.client_site);
 356                 }
 357         }
 358
 359         status = NT_STATUS_OK;
 360
 361  done:
 362         data_blob_free(&blob);
 363
 364         return status;
 365 }
 366
 367 /****************************************************************
 368 ****************************************************************/
 369
 370 static uint32_t get_cldap_reply_server_flags(union nbt_cldap_netlogon *r,
 371                                              uint32_t nt_version)
 372 {
 373         switch (nt_version & 0x0000001f) {
 374                 case 0:
 375                 case 1:
 376                 case 16:
 377                 case 17:
 378                         return 0;
 379                 case 2:
 380                 case 3:
 381                 case 18:
 382                 case 19:
 383                         return r->logon3.server_type;
 384                 case 4:
 385                 case 5:
 386                 case 6:
 387                 case 7:
 388                         return r->logon5.server_type;
 389                 case 8:
 390                 case 9:
 391                 case 10:
 392                 case 11:
 393                 case 12:
 394                 case 13:
 395                 case 14:
 396                 case 15:
 397                         return r->logon13.server_type;
 398                 case 20:
 399                 case 21:
 400                 case 22:
 401                 case 23:
 402                 case 24:
 403                 case 25:
 404                 case 26:
 405                 case 27:
 406                 case 28:
 407                         return r->logon15.server_type;
 408                 case 29:
 409                 case 30:
 410                 case 31:
 411                         return r->logon29.server_type;
 412                 default:
 413                         return 0;
 414         }
 415 }
 416
 417 /****************************************************************
 418 ****************************************************************/
 419
 420 #define RETURN_ON_FALSE(x) if (!(x)) return false;
 421
 422 static bool check_cldap_reply_required_flags(uint32_t ret_flags,
 423                                              uint32_t req_flags)
 424 {
 425         if (ret_flags == 0) {
 426                 return true;
 427         }
 428
 429         if (req_flags & DS_PDC_REQUIRED)
 430                 RETURN_ON_FALSE(ret_flags & NBT_SERVER_PDC);
 431
 432         if (req_flags & DS_GC_SERVER_REQUIRED)
 433                 RETURN_ON_FALSE(ret_flags & NBT_SERVER_GC);
 434
 435         if (req_flags & DS_ONLY_LDAP_NEEDED)
 436                 RETURN_ON_FALSE(ret_flags & NBT_SERVER_LDAP);
 437
 438         if ((req_flags & DS_DIRECTORY_SERVICE_REQUIRED) ||
 439             (req_flags & DS_DIRECTORY_SERVICE_PREFERRED))
 440                 RETURN_ON_FALSE(ret_flags & NBT_SERVER_DS);
 441
 442         if (req_flags & DS_KDC_REQUIRED)
 443                 RETURN_ON_FALSE(ret_flags & NBT_SERVER_KDC);
 444
 445         if (req_flags & DS_TIMESERV_REQUIRED)
 446                 RETURN_ON_FALSE(ret_flags & NBT_SERVER_TIMESERV);
 447
 448         if (req_flags & DS_WRITABLE_REQUIRED)
 449                 RETURN_ON_FALSE(ret_flags & NBT_SERVER_WRITABLE);
 450
 451         return true;
 452 }
 453
 454 /****************************************************************
 455 ****************************************************************/
 456
 457 static NTSTATUS dsgetdcname_cache_fetch(TALLOC_CTX *mem_ctx,
 458                                         const char *domain_name,
 459                                         struct GUID *domain_guid,
 460                                         uint32_t flags,
 461                                         const char *site_name,
 462                                         struct netr_DsRGetDCNameInfo **info_p,
 463                                         bool *expired)
 464 {
 465         char *key;
 466         DATA_BLOB blob;
 467         enum ndr_err_code ndr_err;
 468         struct netr_DsRGetDCNameInfo *info;
 469         union nbt_cldap_netlogon p;
 470         struct nbt_cldap_netlogon_29 r;
 471         NTSTATUS status;
 472
 473         if (!gencache_init()) {
 474                 return NT_STATUS_INTERNAL_DB_ERROR;
 475         }
 476
 477         key = dsgetdcname_cache_key(mem_ctx, domain_name);
 478         if (!key) {
 479                 return NT_STATUS_NO_MEMORY;
 480         }
 481
 482         if (!gencache_get_data_blob(key, &blob, expired)) {
 483                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
 484         }
 485
 486         info = TALLOC_ZERO_P(mem_ctx, struct netr_DsRGetDCNameInfo);
 487         if (!info) {
 488                 return NT_STATUS_NO_MEMORY;
 489         }
 490
 491         ndr_err = ndr_pull_struct_blob(&blob, mem_ctx, &r,
 492                       (ndr_pull_flags_fn_t)ndr_pull_nbt_cldap_netlogon_29);
 493
 494         data_blob_free(&blob);
 495         if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
 496                 dsgetdcname_cache_delete(mem_ctx, domain_name);
 497                 return ndr_map_error2ntstatus(ndr_err);
 498         }
 499
 500         p.logon29 = r;
 501
 502         status = make_dc_info_from_cldap_reply(mem_ctx, flags, NULL,
 503                                                29,
 504                                                &p, &info);
 505         if (!NT_STATUS_IS_OK(status)) {
 506                 return status;
 507         }
 508
 509         if (DEBUGLEVEL >= 10) {
 510                 NDR_PRINT_DEBUG(netr_DsRGetDCNameInfo, info);
 511         }
 512
 513         /* check flags */
 514         if (!check_cldap_reply_required_flags(info->dc_flags, flags)) {
 515                 DEBUG(10,("invalid flags\n"));
 516                 return NT_STATUS_INVALID_PARAMETER;
 517         }
 518
 519         if ((flags & DS_IP_REQUIRED) &&
 520             (info->dc_address_type != DS_ADDRESS_TYPE_INET)) {
 521                 return NT_STATUS_INVALID_PARAMETER_MIX;
 522         }
 523
 524         *info_p = info;
 525
 526         return NT_STATUS_OK;
 527 }
 528
 529 /****************************************************************
 530 ****************************************************************/
 531
 532 static NTSTATUS dsgetdcname_cached(TALLOC_CTX *mem_ctx,
 533                                    struct messaging_context *msg_ctx,
 534                                    const char *domain_name,
 535                                    struct GUID *domain_guid,
 536                                    uint32_t flags,
 537                                    const char *site_name,
 538                                    struct netr_DsRGetDCNameInfo **info)
 539 {
 540         NTSTATUS status;
 541         bool expired = false;
 542
 543         status = dsgetdcname_cache_fetch(mem_ctx, domain_name, domain_guid,
 544                                          flags, site_name, info, &expired);
 545         if (!NT_STATUS_IS_OK(status)) {
 546                 DEBUG(10,("dsgetdcname_cached: cache fetch failed with: %s\n",
 547                         nt_errstr(status)));
 548                 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
 549         }
 550
 551         if (flags & DS_BACKGROUND_ONLY) {
 552                 return status;
 553         }
 554
 555         if (expired) {
 556                 struct netr_DsRGetDCNameInfo *dc_info;
 557
 558                 status = dsgetdcname(mem_ctx, msg_ctx, domain_name,
 559                                      domain_guid, site_name,
 560                                      flags | DS_FORCE_REDISCOVERY,
 561                                      &dc_info);
 562
 563                 if (!NT_STATUS_IS_OK(status)) {
 564                         return status;
 565                 }
 566         }
 567
 568         return status;
 569 }
 570
 571 /****************************************************************
 572 ****************************************************************/
 573
 574 static bool check_allowed_required_flags(uint32_t flags,
 575                                          const char *site_name)
 576 {
 577         uint32_t return_type = flags & (DS_RETURN_FLAT_NAME|DS_RETURN_DNS_NAME);
 578         uint32_t offered_type = flags & (DS_IS_FLAT_NAME|DS_IS_DNS_NAME);
 579         uint32_t query_type = flags & (DS_BACKGROUND_ONLY|DS_FORCE_REDISCOVERY);
 580
 581         /* FIXME: check for DSGETDC_VALID_FLAGS and check for excluse bits
 582          * (DS_PDC_REQUIRED, DS_KDC_REQUIRED, DS_GC_SERVER_REQUIRED) */
 583
 584         debug_dsdcinfo_flags(10, flags);
 585
 586         if ((flags & DS_TRY_NEXTCLOSEST_SITE) && site_name) {
 587                 return false;
 588         }
 589
 590         if (return_type == (DS_RETURN_FLAT_NAME|DS_RETURN_DNS_NAME)) {
 591                 return false;
 592         }
 593
 594         if (offered_type == (DS_IS_DNS_NAME|DS_IS_FLAT_NAME)) {
 595                 return false;
 596         }
 597
 598         if (query_type == (DS_BACKGROUND_ONLY|DS_FORCE_REDISCOVERY)) {
 599                 return false;
 600         }
 601
 602 #if 0
 603         if ((flags & DS_RETURN_DNS_NAME) && (!(flags & DS_IP_REQUIRED))) {
 604                 printf("gd: here5 \n");
 605                 return false;
 606         }
 607 #endif
 608         return true;
 609 }
 610
 611 /****************************************************************
 612 ****************************************************************/
 613
 614 static NTSTATUS discover_dc_netbios(TALLOC_CTX *mem_ctx,
 615                                     const char *domain_name,
 616                                     uint32_t flags,
 617                                     struct ip_service_name **returned_dclist,
 618                                     int *returned_count)
 619 {
 620         NTSTATUS status;
 621         enum nbt_name_type name_type = NBT_NAME_LOGON;
 622         struct ip_service *iplist;
 623         int i;
 624         struct ip_service_name *dclist = NULL;
 625         int count;
 626
 627         *returned_dclist = NULL;
 628         *returned_count = 0;
 629
 630         if (lp_disable_netbios()) {
 631                 return NT_STATUS_NOT_SUPPORTED;
 632         }
 633
 634         if (flags & DS_PDC_REQUIRED) {
 635                 name_type = NBT_NAME_PDC;
 636         }
 637
 638         status = internal_resolve_name(domain_name, name_type, NULL,
 639                                        &iplist, &count,
 640                                        "lmhosts wins bcast");
 641         if (!NT_STATUS_IS_OK(status)) {
 642                 DEBUG(10,("discover_dc_netbios: failed to find DC\n"));
 643                 return status;
 644         }
 645
 646         dclist = TALLOC_ZERO_ARRAY(mem_ctx, struct ip_service_name, count);
 647         if (!dclist) {
 648                 return NT_STATUS_NO_MEMORY;
 649         }
 650
 651         for (i=0; i<count; i++) {
 652
 653                 char addr[INET6_ADDRSTRLEN];
 654                 struct ip_service_name *r = &dclist[i];
 655
 656                 print_sockaddr(addr, sizeof(addr),
 657                                &iplist[i].ss);
 658
 659                 r->ss   = iplist[i].ss;
 660                 r->port = iplist[i].port;
 661                 r->hostname = talloc_strdup(mem_ctx, addr);
 662                 if (!r->hostname) {
 663                         return NT_STATUS_NO_MEMORY;
 664                 }
 665
 666         }
 667
 668         *returned_dclist = dclist;
 669         *returned_count = count;
 670
 671         return NT_STATUS_OK;
 672 }
 673
 674 /****************************************************************
 675 ****************************************************************/
 676
 677 static NTSTATUS discover_dc_dns(TALLOC_CTX *mem_ctx,
 678                                 const char *domain_name,
 679                                 struct GUID *domain_guid,
 680                                 uint32_t flags,
 681                                 const char *site_name,
 682                                 struct ip_service_name **returned_dclist,
 683                                 int *return_count)
 684 {
 685         int i, j;
 686         NTSTATUS status;
 687         struct dns_rr_srv *dcs = NULL;
 688         int numdcs = 0;
 689         int numaddrs = 0;
 690         struct ip_service_name *dclist = NULL;
 691         int count = 0;
 692
 693         if (flags & DS_PDC_REQUIRED) {
 694                 status = ads_dns_query_pdc(mem_ctx, domain_name,
 695                                            &dcs, &numdcs);
 696         } else if (flags & DS_GC_SERVER_REQUIRED) {
 697                 status = ads_dns_query_gcs(mem_ctx, domain_name, site_name,
 698                                            &dcs, &numdcs);
 699         } else if (flags & DS_KDC_REQUIRED) {
 700                 status = ads_dns_query_kdcs(mem_ctx, domain_name, site_name,
 701                                             &dcs, &numdcs);
 702         } else if (flags & DS_DIRECTORY_SERVICE_REQUIRED) {
 703                 status = ads_dns_query_dcs(mem_ctx, domain_name, site_name,
 704                                            &dcs, &numdcs);
 705         } else if (domain_guid) {
 706                 status = ads_dns_query_dcs_guid(mem_ctx, domain_name,
 707                                                 domain_guid, &dcs, &numdcs);
 708         } else {
 709                 status = ads_dns_query_dcs(mem_ctx, domain_name, site_name,
 710                                            &dcs, &numdcs);
 711         }
 712
 713         if (!NT_STATUS_IS_OK(status)) {
 714                 return status;
 715         }
 716
 717         if (numdcs == 0) {
 718                 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
 719         }
 720
 721         for (i=0;i<numdcs;i++) {
 722                 numaddrs += MAX(dcs[i].num_ips,1);
 723         }
 724
 725         dclist = TALLOC_ZERO_ARRAY(mem_ctx,
 726                                    struct ip_service_name,
 727                                    numaddrs);
 728         if (!dclist) {
 729                 return NT_STATUS_NO_MEMORY;
 730         }
 731
 732         /* now unroll the list of IP addresses */
 733
 734         *return_count = 0;
 735         i = 0;
 736         j = 0;
 737
 738         while ((i < numdcs) && (count < numaddrs)) {
 739
 740                 struct ip_service_name *r = &dclist[count];
 741
 742                 r->port = dcs[count].port;
 743                 r->hostname = dcs[count].hostname;
 744
 745                 /* If we don't have an IP list for a name, lookup it up */
 746
 747                 if (!dcs[i].ss_s) {
 748                         interpret_string_addr(&r->ss, dcs[i].hostname, 0);
 749                         i++;
 750                         j = 0;
 751                 } else {
 752                         /* use the IP addresses from the SRV sresponse */
 753
 754                         if (j >= dcs[i].num_ips) {
 755                                 i++;
 756                                 j = 0;
 757                                 continue;
 758                         }
 759
 760                         r->ss = dcs[i].ss_s[j];
 761                         j++;
 762                 }
 763
 764                 /* make sure it is a valid IP.  I considered checking the
 765                  * negative connection cache, but this is the wrong place for
 766                  * it.  Maybe only as a hac.  After think about it, if all of
 767                  * the IP addresses retuend from DNS are dead, what hope does a
 768                  * netbios name lookup have?  The standard reason for falling
 769                  * back to netbios lookups is that our DNS server doesn't know
 770                  * anything about the DC's   -- jerry */
 771
 772                 if (!is_zero_addr(&r->ss)) {
 773                         count++;
 774                         continue;
 775                 }
 776         }
 777
 778         *returned_dclist = dclist;
 779         *return_count = count;
 780
 781         if (count > 0) {
 782                 return NT_STATUS_OK;
 783         }
 784
 785         return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
 786 }
 787
 788 /****************************************************************
 789 ****************************************************************/
 790
 791 static NTSTATUS make_domain_controller_info(TALLOC_CTX *mem_ctx,
 792                                             const char *dc_unc,
 793                                             const char *dc_address,
 794                                             uint32_t dc_address_type,
 795                                             const struct GUID *domain_guid,
 796                                             const char *domain_name,
 797                                             const char *forest_name,
 798                                             uint32_t flags,
 799                                             const char *dc_site_name,
 800                                             const char *client_site_name,
 801                                             struct netr_DsRGetDCNameInfo **info_out)
 802 {
 803         struct netr_DsRGetDCNameInfo *info;
 804
 805         info = TALLOC_ZERO_P(mem_ctx, struct netr_DsRGetDCNameInfo);
 806         NT_STATUS_HAVE_NO_MEMORY(info);
 807
 808         if (dc_unc) {
 809                 info->dc_unc = talloc_strdup(mem_ctx, dc_unc);
 810                 NT_STATUS_HAVE_NO_MEMORY(info->dc_unc);
 811         }
 812
 813         if (dc_address) {
 814                 if (!(dc_address[0] == '\\' && dc_address[1] == '\\')) {
 815                         info->dc_address = talloc_asprintf(mem_ctx, "\\\\%s",
 816                                                            dc_address);
 817                 } else {
 818                         info->dc_address = talloc_strdup(mem_ctx, dc_address);
 819                 }
 820                 NT_STATUS_HAVE_NO_MEMORY(info->dc_address);
 821         }
 822
 823         info->dc_address_type = dc_address_type;
 824
 825         if (domain_guid) {
 826                 info->domain_guid = *domain_guid;
 827         }
 828
 829         if (domain_name) {
 830                 info->domain_name = talloc_strdup(mem_ctx, domain_name);
 831                 NT_STATUS_HAVE_NO_MEMORY(info->domain_name);
 832         }
 833
 834         if (forest_name && *forest_name) {
 835                 info->forest_name = talloc_strdup(mem_ctx, forest_name);
 836                 NT_STATUS_HAVE_NO_MEMORY(info->forest_name);
 837                 flags |= DS_DNS_FOREST;
 838         }
 839
 840         info->dc_flags = flags;
 841
 842         if (dc_site_name) {
 843                 info->dc_site_name = talloc_strdup(mem_ctx, dc_site_name);
 844                 NT_STATUS_HAVE_NO_MEMORY(info->dc_site_name);
 845         }
 846
 847         if (client_site_name) {
 848                 info->client_site_name = talloc_strdup(mem_ctx,
 849                                                        client_site_name);
 850                 NT_STATUS_HAVE_NO_MEMORY(info->client_site_name);
 851         }
 852
 853         *info_out = info;
 854
 855         return NT_STATUS_OK;
 856 }
 857
 858 /****************************************************************
 859 ****************************************************************/
 860
 861 static void map_dc_and_domain_names(uint32_t flags,
 862                                     const char *dc_name,
 863                                     const char *domain_name,
 864                                     const char *dns_dc_name,
 865                                     const char *dns_domain_name,
 866                                     uint32_t *dc_flags,
 867                                     const char **hostname_p,
 868                                     const char **domain_p)
 869 {
 870         switch (flags & 0xf0000000) {
 871                 case DS_RETURN_FLAT_NAME:
 872                         if (dc_name && domain_name &&
 873                             *dc_name && *domain_name) {
 874                                 *hostname_p = dc_name;
 875                                 *domain_p = domain_name;
 876                                 break;
 877                         }
 878                 case DS_RETURN_DNS_NAME:
 879                 default:
 880                         if (dns_dc_name && dns_domain_name &&
 881                             *dns_dc_name && *dns_domain_name) {
 882                                 *hostname_p = dns_dc_name;
 883                                 *domain_p = dns_domain_name;
 884                                 *dc_flags |= DS_DNS_DOMAIN | DS_DNS_CONTROLLER;
 885                                 break;
 886                         }
 887                         if (dc_name && domain_name &&
 888                             *dc_name && *domain_name) {
 889                                 *hostname_p = dc_name;
 890                                 *domain_p = domain_name;
 891                                 break;
 892                         }
 893         }
 894 }
 895
 896 /****************************************************************
 897 ****************************************************************/
 898
 899 static NTSTATUS make_dc_info_from_cldap_reply(TALLOC_CTX *mem_ctx,
 900                                               uint32_t flags,
 901                                               struct sockaddr_storage *ss,
 902                                               uint32_t nt_version,
 903                                               union nbt_cldap_netlogon *r,
 904                                               struct netr_DsRGetDCNameInfo **info)
 905 {
 906         const char *dc_hostname = NULL;
 907         const char *dc_domain_name = NULL;
 908         const char *dc_address = NULL;
 909         const char *dc_forest = NULL;
 910         uint32_t dc_address_type = 0;
 911         uint32_t dc_flags = 0;
 912         struct GUID *dc_domain_guid = NULL;
 913         const char *dc_server_site = NULL;
 914         const char *dc_client_site = NULL;
 915
 916         char addr[INET6_ADDRSTRLEN];
 917
 918         if (ss) {
 919                 print_sockaddr(addr, sizeof(addr), ss);
 920                 dc_address = addr;
 921                 dc_address_type = DS_ADDRESS_TYPE_INET;
 922         }
 923
 924         switch (nt_version & 0x0000001f) {
 925                 case 0:
 926                 case 1:
 927                 case 16:
 928                 case 17:
 929                         if (!ss) {
 930                                 dc_address      = r->logon1.pdc_name;
 931                                 dc_address_type = DS_ADDRESS_TYPE_NETBIOS;
 932                         }
 933
 934                         map_dc_and_domain_names(flags,
 935                                                 r->logon1.pdc_name,
 936                                                 r->logon1.domain_name,
 937                                                 NULL,
 938                                                 NULL,
 939                                                 &dc_flags,
 940                                                 &dc_hostname,
 941                                                 &dc_domain_name);
 942
 943                         if (flags & DS_PDC_REQUIRED) {
 944                                 dc_flags = NBT_SERVER_WRITABLE | NBT_SERVER_PDC;
 945                         }
 946                         break;
 947                 case 2:
 948                 case 3:
 949                 case 18:
 950                 case 19:
 951                         if (!ss) {
 952                                 dc_address      = r->logon3.pdc_ip;
 953                                 dc_address_type = DS_ADDRESS_TYPE_INET;
 954                         }
 955
 956                         map_dc_and_domain_names(flags,
 957                                                 r->logon3.pdc_name,
 958                                                 r->logon3.domain_name,
 959                                                 r->logon3.pdc_dns_name,
 960                                                 r->logon3.dns_domain,
 961                                                 &dc_flags,
 962                                                 &dc_hostname,
 963                                                 &dc_domain_name);
 964
 965                         dc_flags        |= r->logon3.server_type;
 966                         dc_forest       = r->logon3.forest;
 967                         dc_domain_guid  = &r->logon3.domain_uuid;
 968
 969                         break;
 970                 case 4:
 971                 case 5:
 972                 case 6:
 973                 case 7:
 974                         if (!ss) {
 975                                 dc_address      = r->logon5.pdc_name;
 976                                 dc_address_type = DS_ADDRESS_TYPE_NETBIOS;
 977                         }
 978
 979                         map_dc_and_domain_names(flags,
 980                                                 r->logon5.pdc_name,
 981                                                 r->logon5.domain,
 982                                                 r->logon5.pdc_dns_name,
 983                                                 r->logon5.dns_domain,
 984                                                 &dc_flags,
 985                                                 &dc_hostname,
 986                                                 &dc_domain_name);
 987
 988                         dc_flags        |= r->logon5.server_type;
 989                         dc_forest       = r->logon5.forest;
 990                         dc_domain_guid  = &r->logon5.domain_uuid;
 991                         dc_server_site  = r->logon5.server_site;
 992                         dc_client_site  = r->logon5.client_site;
 993
 994                         break;
 995                 case 8:
 996                 case 9:
 997                 case 10:
 998                 case 11:
 999                 case 12:
1000                 case 13:
1001                 case 14:
1002                 case 15:
1003                         if (!ss) {
1004                                 dc_address      = r->logon13.dc_sock_addr.pdc_ip;
1005                                 dc_address_type = DS_ADDRESS_TYPE_INET;
1006                         }
1007
1008                         map_dc_and_domain_names(flags,
1009                                                 r->logon13.pdc_name,
1010                                                 r->logon13.domain,
1011                                                 r->logon13.pdc_dns_name,
1012                                                 r->logon13.dns_domain,
1013                                                 &dc_flags,
1014                                                 &dc_hostname,
1015                                                 &dc_domain_name);
1016
1017                         dc_flags        |= r->logon13.server_type;
1018                         dc_forest       = r->logon13.forest;
1019                         dc_domain_guid  = &r->logon13.domain_uuid;
1020                         dc_server_site  = r->logon13.server_site;
1021                         dc_client_site  = r->logon13.client_site;
1022
1023                         break;
1024                 case 20:
1025                 case 21:
1026                 case 22:
1027                 case 23:
1028                 case 24:
1029                 case 25:
1030                 case 26:
1031                 case 27:
1032                 case 28:
1033                         if (!ss) {
1034                                 dc_address      = r->logon15.pdc_name;
1035                                 dc_address_type = DS_ADDRESS_TYPE_NETBIOS;
1036                         }
1037
1038                         map_dc_and_domain_names(flags,
1039                                                 r->logon15.pdc_name,
1040                                                 r->logon15.domain,
1041                                                 r->logon15.pdc_dns_name,
1042                                                 r->logon15.dns_domain,
1043                                                 &dc_flags,
1044                                                 &dc_hostname,
1045                                                 &dc_domain_name);
1046
1047                         dc_flags        |= r->logon15.server_type;
1048                         dc_forest       = r->logon15.forest;
1049                         dc_domain_guid  = &r->logon15.domain_uuid;
1050                         dc_server_site  = r->logon15.server_site;
1051                         dc_client_site  = r->logon15.client_site;
1052
1053                         break;
1054                 case 29:
1055                 case 30:
1056                 case 31:
1057                         if (!ss) {
1058                                 dc_address      = r->logon29.dc_sock_addr.pdc_ip;
1059                                 dc_address_type = DS_ADDRESS_TYPE_INET;
1060                         }
1061
1062                         map_dc_and_domain_names(flags,
1063                                                 r->logon29.pdc_name,
1064                                                 r->logon29.domain,
1065                                                 r->logon29.pdc_dns_name,
1066                                                 r->logon29.dns_domain,
1067                                                 &dc_flags,
1068                                                 &dc_hostname,
1069                                                 &dc_domain_name);
1070
1071                         dc_flags        |= r->logon29.server_type;
1072                         dc_forest       = r->logon29.forest;
1073                         dc_domain_guid  = &r->logon29.domain_uuid;
1074                         dc_server_site  = r->logon29.server_site;
1075                         dc_client_site  = r->logon29.client_site;
1076
1077                         break;
1078                 default:
1079                         return NT_STATUS_INVALID_PARAMETER;
1080         }
1081
1082         return make_domain_controller_info(mem_ctx,
1083                                            dc_hostname,
1084                                            dc_address,
1085                                            dc_address_type,
1086                                            dc_domain_guid,
1087                                            dc_domain_name,
1088                                            dc_forest,
1089                                            dc_flags,
1090                                            dc_server_site,
1091                                            dc_client_site,
1092                                            info);
1093 }
1094
1095 /****************************************************************
1096 ****************************************************************/
1097
1098 static uint32_t map_ds_flags_to_nt_version(uint32_t flags)
1099 {
1100         uint32_t nt_version = 0;
1101
1102         if (flags & DS_PDC_REQUIRED) {
1103                 nt_version |= NETLOGON_VERSION_PDC;
1104         }
1105
1106         if (flags & DS_GC_SERVER_REQUIRED) {
1107                 nt_version |= NETLOGON_VERSION_GC;
1108         }
1109
1110         if (flags & DS_TRY_NEXTCLOSEST_SITE) {
1111                 nt_version |= NETLOGON_VERSION_WITH_CLOSEST_SITE;
1112         }
1113
1114         if (flags & DS_IP_REQUIRED) {
1115                 nt_version |= NETLOGON_VERSION_IP;
1116         }
1117
1118         return nt_version;
1119 }
1120
1121 /****************************************************************
1122 ****************************************************************/
1123
1124 static NTSTATUS process_dc_dns(TALLOC_CTX *mem_ctx,
1125                                const char *domain_name,
1126                                uint32_t flags,
1127                                struct ip_service_name *dclist,
1128                                int num_dcs,
1129                                struct netr_DsRGetDCNameInfo **info)
1130 {
1131         int i = 0;
1132         bool valid_dc = false;
1133         union nbt_cldap_netlogon *r = NULL;
1134         uint32_t nt_version = NETLOGON_VERSION_5 |
1135                               NETLOGON_VERSION_5EX;
1136         uint32_t ret_flags = 0;
1137         NTSTATUS status;
1138
1139         nt_version |= map_ds_flags_to_nt_version(flags);
1140
1141         for (i=0; i<num_dcs; i++) {
1142
1143                 DEBUG(10,("LDAP ping to %s\n", dclist[i].hostname));
1144
1145                 if (ads_cldap_netlogon(mem_ctx, dclist[i].hostname,
1146                                         domain_name,
1147                                         &nt_version,
1148                                         &r))
1149                 {
1150                         ret_flags = get_cldap_reply_server_flags(r, nt_version);
1151
1152                         if (check_cldap_reply_required_flags(ret_flags, flags)) {
1153                                 valid_dc = true;
1154                                 break;
1155                         }
1156                 }
1157
1158                 continue;
1159         }
1160
1161         if (!valid_dc) {
1162                 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
1163         }
1164
1165         status = make_dc_info_from_cldap_reply(mem_ctx, flags, &dclist[i].ss,
1166                                                nt_version, r, info);
1167         if (NT_STATUS_IS_OK(status)) {
1168                 return store_cldap_reply(mem_ctx, flags, &dclist[i].ss,
1169                                          nt_version, r);
1170         }
1171
1172         return status;
1173 }
1174
1175 /****************************************************************
1176 ****************************************************************/
1177
1178 static struct event_context *ev_context(void)
1179 {
1180         static struct event_context *ctx;
1181
1182         if (!ctx && !(ctx = event_context_init(NULL))) {
1183                 smb_panic("Could not init event context");
1184         }
1185         return ctx;
1186 }
1187
1188 /****************************************************************
1189 ****************************************************************/
1190
1191 static struct messaging_context *msg_context(TALLOC_CTX *mem_ctx)
1192 {
1193         static struct messaging_context *ctx;
1194
1195         if (!ctx && !(ctx = messaging_init(mem_ctx, server_id_self(),
1196                                            ev_context()))) {
1197                 smb_panic("Could not init messaging context");
1198         }
1199         return ctx;
1200 }
1201
1202 /****************************************************************
1203 ****************************************************************/
1204
1205 static NTSTATUS process_dc_netbios(TALLOC_CTX *mem_ctx,
1206                                    struct messaging_context *msg_ctx,
1207                                    const char *domain_name,
1208                                    uint32_t flags,
1209                                    struct ip_service_name *dclist,
1210                                    int num_dcs,
1211                                    struct netr_DsRGetDCNameInfo **info)
1212 {
1213         struct sockaddr_storage ss;
1214         struct ip_service ip_list;
1215         enum nbt_name_type name_type = NBT_NAME_LOGON;
1216         NTSTATUS status;
1217         int i;
1218         const char *dc_name = NULL;
1219         fstring tmp_dc_name;
1220         union nbt_cldap_netlogon *r = NULL;
1221         bool store_cache = false;
1222         uint32_t nt_version = NETLOGON_VERSION_1 |
1223                               NETLOGON_VERSION_5 |
1224                               NETLOGON_VERSION_5EX_WITH_IP;
1225
1226         if (!msg_ctx) {
1227                 msg_ctx = msg_context(mem_ctx);
1228         }
1229
1230         if (flags & DS_PDC_REQUIRED) {
1231                 name_type = NBT_NAME_PDC;
1232         }
1233
1234         nt_version |= map_ds_flags_to_nt_version(flags);
1235
1236         DEBUG(10,("process_dc_netbios\n"));
1237
1238         for (i=0; i<num_dcs; i++) {
1239
1240                 ip_list.ss = dclist[i].ss;
1241                 ip_list.port = 0;
1242
1243                 if (!interpret_string_addr(&ss, dclist[i].hostname, AI_NUMERICHOST)) {
1244                         return NT_STATUS_UNSUCCESSFUL;
1245                 }
1246
1247                 if (send_getdc_request(mem_ctx, msg_ctx,
1248                                        &dclist[i].ss, domain_name,
1249                                        NULL, nt_version))
1250                 {
1251                         int k;
1252                         smb_msleep(300);
1253                         for (k=0; k<5; k++) {
1254                                 if (receive_getdc_response(mem_ctx,
1255                                                            &dclist[i].ss,
1256                                                            domain_name,
1257                                                            &nt_version,
1258                                                            &dc_name,
1259                                                            &r)) {
1260                                         store_cache = true;
1261                                         namecache_store(dc_name, NBT_NAME_SERVER, 1, &ip_list);
1262                                         goto make_reply;
1263                                 }
1264                                 smb_msleep(1500);
1265                         }
1266                 }
1267
1268                 if (name_status_find(domain_name,
1269                                      name_type,
1270                                      NBT_NAME_SERVER,
1271                                      &dclist[i].ss,
1272                                      tmp_dc_name))
1273                 {
1274                         struct nbt_cldap_netlogon_1 logon1;
1275
1276                         r = TALLOC_ZERO_P(mem_ctx, union nbt_cldap_netlogon);
1277                         NT_STATUS_HAVE_NO_MEMORY(r);
1278
1279                         ZERO_STRUCT(logon1);
1280
1281                         nt_version = NETLOGON_VERSION_1;
1282
1283                         logon1.nt_version = nt_version;
1284                         logon1.pdc_name = tmp_dc_name;
1285                         logon1.domain_name = talloc_strdup_upper(mem_ctx, domain_name);
1286                         NT_STATUS_HAVE_NO_MEMORY(logon1.domain_name);
1287
1288                         r->logon1 = logon1;
1289
1290                         namecache_store(tmp_dc_name, NBT_NAME_SERVER, 1, &ip_list);
1291
1292                         goto make_reply;
1293                 }
1294         }
1295
1296         return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
1297
1298  make_reply:
1299
1300         status = make_dc_info_from_cldap_reply(mem_ctx, flags, &dclist[i].ss,
1301                                                nt_version, r, info);
1302         if (NT_STATUS_IS_OK(status) && store_cache) {
1303                 return store_cldap_reply(mem_ctx, flags, &dclist[i].ss,
1304                                          nt_version, r);
1305         }
1306
1307         return status;
1308 }
1309
1310 /****************************************************************
1311 ****************************************************************/
1312
1313 static NTSTATUS dsgetdcname_rediscover(TALLOC_CTX *mem_ctx,
1314                                        struct messaging_context *msg_ctx,
1315                                        const char *domain_name,
1316                                        struct GUID *domain_guid,
1317                                        uint32_t flags,
1318                                        const char *site_name,
1319                                        struct netr_DsRGetDCNameInfo **info)
1320 {
1321         NTSTATUS status = NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
1322         struct ip_service_name *dclist = NULL;
1323         int num_dcs;
1324
1325         DEBUG(10,("dsgetdcname_rediscover\n"));
1326
1327         if (flags & DS_IS_FLAT_NAME) {
1328
1329                 status = discover_dc_netbios(mem_ctx, domain_name, flags,
1330                                              &dclist, &num_dcs);
1331                 NT_STATUS_NOT_OK_RETURN(status);
1332
1333                 return process_dc_netbios(mem_ctx, msg_ctx, domain_name, flags,
1334                                           dclist, num_dcs, info);
1335         }
1336
1337         if (flags & DS_IS_DNS_NAME) {
1338
1339                 status = discover_dc_dns(mem_ctx, domain_name, domain_guid,
1340                                          flags, site_name, &dclist, &num_dcs);
1341                 NT_STATUS_NOT_OK_RETURN(status);
1342
1343                 return process_dc_dns(mem_ctx, domain_name, flags,
1344                                       dclist, num_dcs, info);
1345         }
1346
1347         status = discover_dc_dns(mem_ctx, domain_name, domain_guid, flags,
1348                                  site_name, &dclist, &num_dcs);
1349
1350         if (NT_STATUS_IS_OK(status) && num_dcs != 0) {
1351
1352                 status = process_dc_dns(mem_ctx, domain_name, flags, dclist,
1353                                         num_dcs, info);
1354                 if (NT_STATUS_IS_OK(status)) {
1355                         return status;
1356                 }
1357         }
1358
1359         status = discover_dc_netbios(mem_ctx, domain_name, flags, &dclist,
1360                                      &num_dcs);
1361         NT_STATUS_NOT_OK_RETURN(status);
1362
1363         return process_dc_netbios(mem_ctx, msg_ctx, domain_name, flags, dclist,
1364                                   num_dcs, info);
1365 }
1366
1367 static bool is_closest_site(struct netr_DsRGetDCNameInfo *info)
1368 {
1369         if (info->dc_flags & DS_SERVER_CLOSEST) {
1370                 return true;
1371         }
1372
1373         if (!info->client_site_name) {
1374                 return true;
1375         }
1376
1377         if (!info->dc_site_name) {
1378                 return false;
1379         }
1380
1381         if (strcmp(info->client_site_name, info->dc_site_name) == 0) {
1382                 return true;
1383         }
1384
1385         return false;
1386 }
1387
1388 /********************************************************************
1389  dsgetdcname.
1390
1391  This will be the only public function here.
1392 ********************************************************************/
1393
1394 NTSTATUS dsgetdcname(TALLOC_CTX *mem_ctx,
1395                      struct messaging_context *msg_ctx,
1396                      const char *domain_name,
1397                      struct GUID *domain_guid,
1398                      const char *site_name,
1399                      uint32_t flags,
1400                      struct netr_DsRGetDCNameInfo **info)
1401 {
1402         NTSTATUS status = NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
1403         struct netr_DsRGetDCNameInfo *myinfo = NULL;
1404         char *query_site = NULL;
1405         bool first = true;
1406         struct netr_DsRGetDCNameInfo *first_info = NULL;
1407
1408         DEBUG(10,("dsgetdcname: domain_name: %s, "
1409                   "domain_guid: %s, site_name: %s, flags: 0x%08x\n",
1410                   domain_name,
1411                   domain_guid ? GUID_string(mem_ctx, domain_guid) : "(null)",
1412                   site_name, flags));
1413
1414         *info = NULL;
1415
1416         if (!check_allowed_required_flags(flags, site_name)) {
1417                 DEBUG(0,("invalid flags specified\n"));
1418                 return NT_STATUS_INVALID_PARAMETER;
1419         }
1420
1421         if (!site_name) {
1422                 query_site = sitename_fetch(domain_name);
1423         } else {
1424                 query_site = SMB_STRDUP(site_name);
1425         }
1426
1427         if (flags & DS_FORCE_REDISCOVERY) {
1428                 goto rediscover;
1429         }
1430
1431         status = dsgetdcname_cached(mem_ctx, msg_ctx, domain_name, domain_guid,
1432                                     flags, query_site, &myinfo);
1433         if (NT_STATUS_IS_OK(status)) {
1434                 goto done;
1435         }
1436
1437         if (flags & DS_BACKGROUND_ONLY) {
1438                 goto done;
1439         }
1440
1441  rediscover:
1442         status = dsgetdcname_rediscover(mem_ctx, msg_ctx, domain_name,
1443                                         domain_guid, flags, query_site,
1444                                         &myinfo);
1445
1446  done:
1447         SAFE_FREE(query_site);
1448
1449         if (!NT_STATUS_IS_OK(status)) {
1450                 if (!first) {
1451                         *info = first_info;
1452                         return NT_STATUS_OK;
1453                 }
1454                 return status;
1455         }
1456
1457         if (!first) {
1458                 TALLOC_FREE(first_info);
1459         } else if (!is_closest_site(myinfo)) {
1460                 first = false;
1461                 first_info = myinfo;
1462                 /* TODO: may use the next_closest_site here */
1463                 query_site = SMB_STRDUP(myinfo->client_site_name);
1464                 goto rediscover;
1465         }
1466
1467         *info = myinfo;
1468         return NT_STATUS_OK;
1469 }