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