source3/winbindd/winbindd_cm.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3
   4    Winbind daemon connection manager
   5
   6    Copyright (C) Tim Potter                2001
   7    Copyright (C) Andrew Bartlett           2002
   8    Copyright (C) Gerald (Jerry) Carter     2003-2005.
   9    Copyright (C) Volker Lendecke           2004-2005
  10    Copyright (C) Jeremy Allison            2006
  11
  12    This program is free software; you can redistribute it and/or modify
  13    it under the terms of the GNU General Public License as published by
  14    the Free Software Foundation; either version 3 of the License, or
  15    (at your option) any later version.
  16
  17    This program is distributed in the hope that it will be useful,
  18    but WITHOUT ANY WARRANTY; without even the implied warranty of
  19    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20    GNU General Public License for more details.
  21
  22    You should have received a copy of the GNU General Public License
  23    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  24 */
  25
  26 /*
  27    We need to manage connections to domain controllers without having to
  28    mess up the main winbindd code with other issues.  The aim of the
  29    connection manager is to:
  30
  31        - make connections to domain controllers and cache them
  32        - re-establish connections when networks or servers go down
  33        - centralise the policy on connection timeouts, domain controller
  34          selection etc
  35        - manage re-entrancy for when winbindd becomes able to handle
  36          multiple outstanding rpc requests
  37
  38    Why not have connection management as part of the rpc layer like tng?
  39    Good question.  This code may morph into libsmb/rpc_cache.c or something
  40    like that but at the moment it's simply staying as part of winbind.  I
  41    think the TNG architecture of forcing every user of the rpc layer to use
  42    the connection caching system is a bad idea.  It should be an optional
  43    method of using the routines.
  44
  45    The TNG design is quite good but I disagree with some aspects of the
  46    implementation. -tpot
  47
  48  */
  49
  50 /*
  51    TODO:
  52
  53      - I'm pretty annoyed by all the make_nmb_name() stuff.  It should be
  54        moved down into another function.
  55
  56      - Take care when destroying cli_structs as they can be shared between
  57        various sam handles.
  58
  59  */
  60
  61 #include "includes.h"
  62 #include "winbindd.h"
  63 #include "../libcli/auth/libcli_auth.h"
  64 #include "../librpc/gen_ndr/ndr_netlogon_c.h"
  65 #include "rpc_client/cli_pipe.h"
  66 #include "rpc_client/cli_netlogon.h"
  67 #include "../librpc/gen_ndr/ndr_samr_c.h"
  68 #include "../librpc/gen_ndr/ndr_lsa_c.h"
  69 #include "rpc_client/cli_lsarpc.h"
  70 #include "../librpc/gen_ndr/ndr_dssetup_c.h"
  71 #include "libads/sitename_cache.h"
  72 #include "libsmb/libsmb.h"
  73 #include "libsmb/clidgram.h"
  74 #include "ads.h"
  75 #include "secrets.h"
  76 #include "../libcli/security/security.h"
  77 #include "passdb.h"
  78 #include "messages.h"
  79 #include "auth/gensec/gensec.h"
  80 #include "../libcli/smb/smbXcli_base.h"
  81 #include "libcli/auth/netlogon_creds_cli.h"
  82 #include "auth.h"
  83 #include "rpc_server/rpc_ncacn_np.h"
  84 #include "auth/credentials/credentials.h"
  85 #include "lib/param/param.h"
  86
  87 #undef DBGC_CLASS
  88 #define DBGC_CLASS DBGC_WINBIND
  89
  90 struct dc_name_ip {
  91         fstring name;
  92         struct sockaddr_storage ss;
  93 };
  94
  95 extern struct winbindd_methods reconnect_methods;
  96 extern bool override_logfile;
  97
  98 static NTSTATUS init_dc_connection_network(struct winbindd_domain *domain, bool need_rw_dc);
  99 static void set_dc_type_and_flags( struct winbindd_domain *domain );
 100 static bool set_dc_type_and_flags_trustinfo( struct winbindd_domain *domain );
 101 static bool get_dcs(TALLOC_CTX *mem_ctx, struct winbindd_domain *domain,
 102                     struct dc_name_ip **dcs, int *num_dcs);
 103
 104 /****************************************************************
 105  Child failed to find DC's. Reschedule check.
 106 ****************************************************************/
 107
 108 static void msg_failed_to_go_online(struct messaging_context *msg,
 109                                     void *private_data,
 110                                     uint32_t msg_type,
 111                                     struct server_id server_id,
 112                                     DATA_BLOB *data)
 113 {
 114         struct winbindd_domain *domain;
 115         const char *domainname = (const char *)data->data;
 116
 117         if (data->data == NULL || data->length == 0) {
 118                 return;
 119         }
 120
 121         DEBUG(5,("msg_fail_to_go_online: received for domain %s.\n", domainname));
 122
 123         for (domain = domain_list(); domain; domain = domain->next) {
 124                 if (domain->internal) {
 125                         continue;
 126                 }
 127
 128                 if (strequal(domain->name, domainname)) {
 129                         if (domain->online) {
 130                                 /* We're already online, ignore. */
 131                                 DEBUG(5,("msg_fail_to_go_online: domain %s "
 132                                         "already online.\n", domainname));
 133                                 continue;
 134                         }
 135
 136                         /* Reschedule the online check. */
 137                         set_domain_offline(domain);
 138                         break;
 139                 }
 140         }
 141 }
 142
 143 /****************************************************************
 144  Actually cause a reconnect from a message.
 145 ****************************************************************/
 146
 147 static void msg_try_to_go_online(struct messaging_context *msg,
 148                                  void *private_data,
 149                                  uint32_t msg_type,
 150                                  struct server_id server_id,
 151                                  DATA_BLOB *data)
 152 {
 153         struct winbindd_domain *domain;
 154         const char *domainname = (const char *)data->data;
 155
 156         if (data->data == NULL || data->length == 0) {
 157                 return;
 158         }
 159
 160         DEBUG(5,("msg_try_to_go_online: received for domain %s.\n", domainname));
 161
 162         for (domain = domain_list(); domain; domain = domain->next) {
 163                 if (domain->internal) {
 164                         continue;
 165                 }
 166
 167                 if (strequal(domain->name, domainname)) {
 168
 169                         if (domain->online) {
 170                                 /* We're already online, ignore. */
 171                                 DEBUG(5,("msg_try_to_go_online: domain %s "
 172                                         "already online.\n", domainname));
 173                                 continue;
 174                         }
 175
 176                         /* This call takes care of setting the online
 177                            flag to true if we connected, or re-adding
 178                            the offline handler if false. Bypasses online
 179                            check so always does network calls. */
 180
 181                         init_dc_connection_network(domain, true);
 182                         break;
 183                 }
 184         }
 185 }
 186
 187 /****************************************************************
 188  Fork a child to try and contact a DC. Do this as contacting a
 189  DC requires blocking lookups and we don't want to block our
 190  parent.
 191 ****************************************************************/
 192
 193 static bool fork_child_dc_connect(struct winbindd_domain *domain)
 194 {
 195         struct dc_name_ip *dcs = NULL;
 196         int num_dcs = 0;
 197         TALLOC_CTX *mem_ctx = NULL;
 198         pid_t parent_pid = getpid();
 199         char *lfile = NULL;
 200         NTSTATUS status;
 201
 202         if (domain->dc_probe_pid != (pid_t)-1) {
 203                 /*
 204                  * We might already have a DC probe
 205                  * child working, check.
 206                  */
 207                 if (process_exists_by_pid(domain->dc_probe_pid)) {
 208                         DEBUG(10,("fork_child_dc_connect: pid %u already "
 209                                 "checking for DC's.\n",
 210                                 (unsigned int)domain->dc_probe_pid));
 211                         return true;
 212                 }
 213                 domain->dc_probe_pid = (pid_t)-1;
 214         }
 215
 216         domain->dc_probe_pid = fork();
 217
 218         if (domain->dc_probe_pid == (pid_t)-1) {
 219                 DEBUG(0, ("fork_child_dc_connect: Could not fork: %s\n", strerror(errno)));
 220                 return False;
 221         }
 222
 223         if (domain->dc_probe_pid != (pid_t)0) {
 224                 /* Parent */
 225                 messaging_register(winbind_messaging_context(), NULL,
 226                                    MSG_WINBIND_TRY_TO_GO_ONLINE,
 227                                    msg_try_to_go_online);
 228                 messaging_register(winbind_messaging_context(), NULL,
 229                                    MSG_WINBIND_FAILED_TO_GO_ONLINE,
 230                                    msg_failed_to_go_online);
 231                 return True;
 232         }
 233
 234         /* Child. */
 235
 236         /* Leave messages blocked - we will never process one. */
 237
 238         if (!override_logfile) {
 239                 if (asprintf(&lfile, "%s/log.winbindd-dc-connect", get_dyn_LOGFILEBASE()) == -1) {
 240                         DEBUG(0, ("fork_child_dc_connect: out of memory.\n"));
 241                         _exit(1);
 242                 }
 243         }
 244
 245         status = winbindd_reinit_after_fork(NULL, lfile);
 246         if (!NT_STATUS_IS_OK(status)) {
 247                 DEBUG(1, ("winbindd_reinit_after_fork failed: %s\n",
 248                           nt_errstr(status)));
 249                 messaging_send_buf(winbind_messaging_context(),
 250                                    pid_to_procid(parent_pid),
 251                                    MSG_WINBIND_FAILED_TO_GO_ONLINE,
 252                                    (const uint8_t *)domain->name,
 253                                    strlen(domain->name)+1);
 254                 _exit(1);
 255         }
 256         SAFE_FREE(lfile);
 257
 258         mem_ctx = talloc_init("fork_child_dc_connect");
 259         if (!mem_ctx) {
 260                 DEBUG(0,("talloc_init failed.\n"));
 261                 messaging_send_buf(winbind_messaging_context(),
 262                                    pid_to_procid(parent_pid),
 263                                    MSG_WINBIND_FAILED_TO_GO_ONLINE,
 264                                    (const uint8_t *)domain->name,
 265                                    strlen(domain->name)+1);
 266                 _exit(1);
 267         }
 268
 269         if ((!get_dcs(mem_ctx, domain, &dcs, &num_dcs)) || (num_dcs == 0)) {
 270                 /* Still offline ? Can't find DC's. */
 271                 messaging_send_buf(winbind_messaging_context(),
 272                                    pid_to_procid(parent_pid),
 273                                    MSG_WINBIND_FAILED_TO_GO_ONLINE,
 274                                    (const uint8_t *)domain->name,
 275                                    strlen(domain->name)+1);
 276                 _exit(0);
 277         }
 278
 279         /* We got a DC. Send a message to our parent to get it to
 280            try and do the same. */
 281
 282         messaging_send_buf(winbind_messaging_context(),
 283                            pid_to_procid(parent_pid),
 284                            MSG_WINBIND_TRY_TO_GO_ONLINE,
 285                            (const uint8_t *)domain->name,
 286                            strlen(domain->name)+1);
 287         _exit(0);
 288 }
 289
 290 /****************************************************************
 291  Handler triggered if we're offline to try and detect a DC.
 292 ****************************************************************/
 293
 294 static void check_domain_online_handler(struct tevent_context *ctx,
 295                                         struct tevent_timer *te,
 296                                         struct timeval now,
 297                                         void *private_data)
 298 {
 299         struct winbindd_domain *domain =
 300                 (struct winbindd_domain *)private_data;
 301
 302         DEBUG(10,("check_domain_online_handler: called for domain "
 303                   "%s (online = %s)\n", domain->name,
 304                   domain->online ? "True" : "False" ));
 305
 306         TALLOC_FREE(domain->check_online_event);
 307
 308         /* Are we still in "startup" mode ? */
 309
 310         if (domain->startup && (time_mono(NULL) > domain->startup_time + 30)) {
 311                 /* No longer in "startup" mode. */
 312                 DEBUG(10,("check_domain_online_handler: domain %s no longer in 'startup' mode.\n",
 313                         domain->name ));
 314                 domain->startup = False;
 315         }
 316
 317         /* We've been told to stay offline, so stay
 318            that way. */
 319
 320         if (get_global_winbindd_state_offline()) {
 321                 DEBUG(10,("check_domain_online_handler: domain %s remaining globally offline\n",
 322                         domain->name ));
 323                 return;
 324         }
 325
 326         /* Fork a child to test if it can contact a DC.
 327            If it can then send ourselves a message to
 328            cause a reconnect. */
 329
 330         fork_child_dc_connect(domain);
 331 }
 332
 333 /****************************************************************
 334  If we're still offline setup the timeout check.
 335 ****************************************************************/
 336
 337 static void calc_new_online_timeout_check(struct winbindd_domain *domain)
 338 {
 339         int wbr = lp_winbind_reconnect_delay();
 340
 341         if (domain->startup) {
 342                 domain->check_online_timeout = 10;
 343         } else if (domain->check_online_timeout < wbr) {
 344                 domain->check_online_timeout = wbr;
 345         }
 346 }
 347
 348 void winbind_msg_domain_offline(struct messaging_context *msg_ctx,
 349                                 void *private_data,
 350                                 uint32_t msg_type,
 351                                 struct server_id server_id,
 352                                 DATA_BLOB *data)
 353 {
 354         const char *domain_name = (const char *)data->data;
 355         struct winbindd_domain *domain;
 356
 357         domain = find_domain_from_name_noinit(domain_name);
 358         if (domain == NULL) {
 359                 return;
 360         }
 361
 362         domain->online = false;
 363
 364         DEBUG(10, ("Domain %s is marked as offline now.\n",
 365                    domain_name));
 366 }
 367
 368 void winbind_msg_domain_online(struct messaging_context *msg_ctx,
 369                                 void *private_data,
 370                                 uint32_t msg_type,
 371                                 struct server_id server_id,
 372                                 DATA_BLOB *data)
 373 {
 374         const char *domain_name = (const char *)data->data;
 375         struct winbindd_domain *domain;
 376
 377         domain = find_domain_from_name_noinit(domain_name);
 378         if (domain == NULL) {
 379                 return;
 380         }
 381
 382         domain->online = true;
 383
 384         DEBUG(10, ("Domain %s is marked as online now.\n",
 385                    domain_name));
 386 }
 387
 388 /****************************************************************
 389  Set domain offline and also add handler to put us back online
 390  if we detect a DC.
 391 ****************************************************************/
 392
 393 void set_domain_offline(struct winbindd_domain *domain)
 394 {
 395         pid_t parent_pid = getppid();
 396
 397         DEBUG(10,("set_domain_offline: called for domain %s\n",
 398                 domain->name ));
 399
 400         TALLOC_FREE(domain->check_online_event);
 401
 402         if (domain->internal) {
 403                 DEBUG(3,("set_domain_offline: domain %s is internal - logic error.\n",
 404                         domain->name ));
 405                 return;
 406         }
 407
 408         domain->online = False;
 409
 410         /* Offline domains are always initialized. They're
 411            re-initialized when they go back online. */
 412
 413         domain->initialized = True;
 414
 415         /* We only add the timeout handler that checks and
 416            allows us to go back online when we've not
 417            been told to remain offline. */
 418
 419         if (get_global_winbindd_state_offline()) {
 420                 DEBUG(10,("set_domain_offline: domain %s remaining globally offline\n",
 421                         domain->name ));
 422                 return;
 423         }
 424
 425         /* If we're in startup mode, check again in 10 seconds, not in
 426            lp_winbind_reconnect_delay() seconds (which is 30 seconds by default). */
 427
 428         calc_new_online_timeout_check(domain);
 429
 430         domain->check_online_event = tevent_add_timer(winbind_event_context(),
 431                                                 NULL,
 432                                                 timeval_current_ofs(domain->check_online_timeout,0),
 433                                                 check_domain_online_handler,
 434                                                 domain);
 435
 436         /* The above *has* to succeed for winbindd to work. */
 437         if (!domain->check_online_event) {
 438                 smb_panic("set_domain_offline: failed to add online handler");
 439         }
 440
 441         DEBUG(10,("set_domain_offline: added event handler for domain %s\n",
 442                 domain->name ));
 443
 444         /* Send a message to the parent that the domain is offline. */
 445         if (parent_pid > 1 && !domain->internal) {
 446                 messaging_send_buf(winbind_messaging_context(),
 447                                    pid_to_procid(parent_pid),
 448                                    MSG_WINBIND_DOMAIN_OFFLINE,
 449                                    (uint8 *)domain->name,
 450                                    strlen(domain->name) + 1);
 451         }
 452
 453         /* Send an offline message to the idmap child when our
 454            primary domain goes offline */
 455
 456         if ( domain->primary ) {
 457                 struct winbindd_child *idmap = idmap_child();
 458
 459                 if ( idmap->pid != 0 ) {
 460                         messaging_send_buf(winbind_messaging_context(),
 461                                            pid_to_procid(idmap->pid),
 462                                            MSG_WINBIND_OFFLINE,
 463                                            (const uint8_t *)domain->name,
 464                                            strlen(domain->name)+1);
 465                 }
 466         }
 467
 468         return;
 469 }
 470
 471 /****************************************************************
 472  Set domain online - if allowed.
 473 ****************************************************************/
 474
 475 static void set_domain_online(struct winbindd_domain *domain)
 476 {
 477         pid_t parent_pid = getppid();
 478
 479         DEBUG(10,("set_domain_online: called for domain %s\n",
 480                 domain->name ));
 481
 482         if (domain->internal) {
 483                 DEBUG(3,("set_domain_online: domain %s is internal - logic error.\n",
 484                         domain->name ));
 485                 return;
 486         }
 487
 488         if (get_global_winbindd_state_offline()) {
 489                 DEBUG(10,("set_domain_online: domain %s remaining globally offline\n",
 490                         domain->name ));
 491                 return;
 492         }
 493
 494         winbindd_set_locator_kdc_envs(domain);
 495
 496         /* If we are waiting to get a krb5 ticket, trigger immediately. */
 497         ccache_regain_all_now();
 498
 499         /* Ok, we're out of any startup mode now... */
 500         domain->startup = False;
 501
 502         if (domain->online == False) {
 503                 /* We were offline - now we're online. We default to
 504                    using the MS-RPC backend if we started offline,
 505                    and if we're going online for the first time we
 506                    should really re-initialize the backends and the
 507                    checks to see if we're talking to an AD or NT domain.
 508                 */
 509
 510                 domain->initialized = False;
 511
 512                 /* 'reconnect_methods' is the MS-RPC backend. */
 513                 if (domain->backend == &reconnect_methods) {
 514                         domain->backend = NULL;
 515                 }
 516         }
 517
 518         /* Ensure we have no online timeout checks. */
 519         domain->check_online_timeout = 0;
 520         TALLOC_FREE(domain->check_online_event);
 521
 522         /* Ensure we ignore any pending child messages. */
 523         messaging_deregister(winbind_messaging_context(),
 524                              MSG_WINBIND_TRY_TO_GO_ONLINE, NULL);
 525         messaging_deregister(winbind_messaging_context(),
 526                              MSG_WINBIND_FAILED_TO_GO_ONLINE, NULL);
 527
 528         domain->online = True;
 529
 530         /* Send a message to the parent that the domain is online. */
 531         if (parent_pid > 1 && !domain->internal) {
 532                 messaging_send_buf(winbind_messaging_context(),
 533                                    pid_to_procid(parent_pid),
 534                                    MSG_WINBIND_DOMAIN_ONLINE,
 535                                    (uint8 *)domain->name,
 536                                    strlen(domain->name) + 1);
 537         }
 538
 539         /* Send an online message to the idmap child when our
 540            primary domain comes online */
 541
 542         if ( domain->primary ) {
 543                 struct winbindd_child *idmap = idmap_child();
 544
 545                 if ( idmap->pid != 0 ) {
 546                         messaging_send_buf(winbind_messaging_context(),
 547                                            pid_to_procid(idmap->pid),
 548                                            MSG_WINBIND_ONLINE,
 549                                            (const uint8_t *)domain->name,
 550                                            strlen(domain->name)+1);
 551                 }
 552         }
 553
 554         return;
 555 }
 556
 557 /****************************************************************
 558  Requested to set a domain online.
 559 ****************************************************************/
 560
 561 void set_domain_online_request(struct winbindd_domain *domain)
 562 {
 563         struct timeval tev;
 564
 565         DEBUG(10,("set_domain_online_request: called for domain %s\n",
 566                 domain->name ));
 567
 568         if (get_global_winbindd_state_offline()) {
 569                 DEBUG(10,("set_domain_online_request: domain %s remaining globally offline\n",
 570                         domain->name ));
 571                 return;
 572         }
 573
 574         if (domain->internal) {
 575                 DEBUG(10, ("set_domain_online_request: Internal domains are "
 576                            "always online\n"));
 577                 return;
 578         }
 579
 580         /* We've been told it's safe to go online and
 581            try and connect to a DC. But I don't believe it
 582            because network manager seems to lie.
 583            Wait at least 5 seconds. Heuristics suck... */
 584
 585
 586         GetTimeOfDay(&tev);
 587
 588         /* Go into "startup" mode again. */
 589         domain->startup_time = time_mono(NULL);
 590         domain->startup = True;
 591
 592         tev.tv_sec += 5;
 593
 594         if (!domain->check_online_event) {
 595                 /* If we've come from being globally offline we
 596                    don't have a check online event handler set.
 597                    We need to add one now we're trying to go
 598                    back online. */
 599
 600                 DEBUG(10,("set_domain_online_request: domain %s was globally offline.\n",
 601                         domain->name ));
 602         }
 603
 604         TALLOC_FREE(domain->check_online_event);
 605
 606         domain->check_online_event = tevent_add_timer(winbind_event_context(),
 607                                                      NULL,
 608                                                      tev,
 609                                                      check_domain_online_handler,
 610                                                      domain);
 611
 612         /* The above *has* to succeed for winbindd to work. */
 613         if (!domain->check_online_event) {
 614                 smb_panic("set_domain_online_request: failed to add online handler");
 615         }
 616 }
 617
 618 /****************************************************************
 619  Add -ve connection cache entries for domain and realm.
 620 ****************************************************************/
 621
 622 static void winbind_add_failed_connection_entry(
 623         const struct winbindd_domain *domain,
 624         const char *server,
 625         NTSTATUS result)
 626 {
 627         add_failed_connection_entry(domain->name, server, result);
 628         /* If this was the saf name for the last thing we talked to,
 629            remove it. */
 630         saf_delete(domain->name);
 631         if (domain->alt_name != NULL) {
 632                 add_failed_connection_entry(domain->alt_name, server, result);
 633                 saf_delete(domain->alt_name);
 634         }
 635         winbindd_unset_locator_kdc_env(domain);
 636 }
 637
 638 /* Choose between anonymous or authenticated connections.  We need to use
 639    an authenticated connection if DCs have the RestrictAnonymous registry
 640    entry set > 0, or the "Additional restrictions for anonymous
 641    connections" set in the win2k Local Security Policy.
 642
 643    Caller to free() result in domain, username, password
 644 */
 645
 646 static void cm_get_ipc_userpass(char **username, char **domain, char **password)
 647 {
 648         *username = (char *)secrets_fetch(SECRETS_AUTH_USER, NULL);
 649         *domain = (char *)secrets_fetch(SECRETS_AUTH_DOMAIN, NULL);
 650         *password = (char *)secrets_fetch(SECRETS_AUTH_PASSWORD, NULL);
 651
 652         if (*username && **username) {
 653
 654                 if (!*domain || !**domain)
 655                         *domain = smb_xstrdup(lp_workgroup());
 656
 657                 if (!*password || !**password)
 658                         *password = smb_xstrdup("");
 659
 660                 DEBUG(3, ("cm_get_ipc_userpass: Retrieved auth-user from secrets.tdb [%s\\%s]\n",
 661                           *domain, *username));
 662
 663         } else {
 664                 DEBUG(3, ("cm_get_ipc_userpass: No auth-user defined\n"));
 665                 *username = smb_xstrdup("");
 666                 *domain = smb_xstrdup("");
 667                 *password = smb_xstrdup("");
 668         }
 669 }
 670
 671 static NTSTATUS cm_get_ipc_credentials(TALLOC_CTX *mem_ctx,
 672                                        struct cli_credentials **_creds)
 673 {
 674
 675         TALLOC_CTX *frame = talloc_stackframe();
 676         NTSTATUS status = NT_STATUS_INTERNAL_ERROR;
 677         struct loadparm_context *lp_ctx;
 678         char *username = NULL;
 679         char *netbios_domain = NULL;
 680         char *password = NULL;
 681         struct cli_credentials *creds = NULL;
 682         bool ok;
 683
 684         cm_get_ipc_userpass(&username, &netbios_domain, &password);
 685
 686         lp_ctx = loadparm_init_s3(frame, loadparm_s3_helpers());
 687         if (lp_ctx == NULL) {
 688                 DEBUG(1, ("loadparm_init_s3 failed\n"));
 689                 status = NT_STATUS_INTERNAL_ERROR;
 690                 goto fail;
 691         }
 692
 693         creds = cli_credentials_init(mem_ctx);
 694         if (creds == NULL) {
 695                 status = NT_STATUS_NO_MEMORY;
 696                 goto fail;
 697         }
 698
 699         cli_credentials_set_conf(creds, lp_ctx);
 700         cli_credentials_set_kerberos_state(creds, CRED_DONT_USE_KERBEROS);
 701
 702         ok = cli_credentials_set_domain(creds, netbios_domain, CRED_SPECIFIED);
 703         if (!ok) {
 704                 status = NT_STATUS_NO_MEMORY;
 705                 goto fail;
 706         }
 707
 708         ok = cli_credentials_set_username(creds, username, CRED_SPECIFIED);
 709         if (!ok) {
 710                 status = NT_STATUS_NO_MEMORY;
 711                 goto fail;
 712         }
 713
 714         ok = cli_credentials_set_password(creds, password, CRED_SPECIFIED);
 715         if (!ok) {
 716                 status = NT_STATUS_NO_MEMORY;
 717                 goto fail;
 718         }
 719
 720         *_creds = creds;
 721         creds = NULL;
 722         status = NT_STATUS_OK;
 723  fail:
 724         TALLOC_FREE(creds);
 725         SAFE_FREE(username);
 726         SAFE_FREE(netbios_domain);
 727         SAFE_FREE(password);
 728         TALLOC_FREE(frame);
 729         return status;
 730 }
 731
 732 static bool cm_is_ipc_credentials(struct cli_credentials *creds)
 733 {
 734         TALLOC_CTX *frame = talloc_stackframe();
 735         char *ipc_account = NULL;
 736         char *ipc_domain = NULL;
 737         char *ipc_password = NULL;
 738         const char *creds_account = NULL;
 739         const char *creds_domain = NULL;
 740         const char *creds_password = NULL;
 741         bool ret = false;
 742
 743         cm_get_ipc_userpass(&ipc_account, &ipc_domain, &ipc_password);
 744
 745         creds_account = cli_credentials_get_username(creds);
 746         creds_domain = cli_credentials_get_domain(creds);
 747         creds_password = cli_credentials_get_password(creds);
 748
 749         if (!strequal(ipc_domain, creds_domain)) {
 750                 goto done;
 751         }
 752
 753         if (!strequal(ipc_account, creds_account)) {
 754                 goto done;
 755         }
 756
 757         if (!strcsequal(ipc_password, creds_password)) {
 758                 goto done;
 759         }
 760
 761         ret = true;
 762  done:
 763         SAFE_FREE(ipc_account);
 764         SAFE_FREE(ipc_domain);
 765         SAFE_FREE(ipc_password);
 766         TALLOC_FREE(frame);
 767         return ret;
 768 }
 769
 770 static bool get_dc_name_via_netlogon(struct winbindd_domain *domain,
 771                                      fstring dcname,
 772                                      struct sockaddr_storage *dc_ss)
 773 {
 774         struct winbindd_domain *our_domain = NULL;
 775         struct rpc_pipe_client *netlogon_pipe = NULL;
 776         NTSTATUS result;
 777         WERROR werr;
 778         TALLOC_CTX *mem_ctx;
 779         unsigned int orig_timeout;
 780         const char *tmp = NULL;
 781         const char *p;
 782         struct dcerpc_binding_handle *b;
 783
 784         /* Hmmmm. We can only open one connection to the NETLOGON pipe at the
 785          * moment.... */
 786
 787         if (IS_DC) {
 788                 return False;
 789         }
 790
 791         if (domain->primary) {
 792                 return False;
 793         }
 794
 795         our_domain = find_our_domain();
 796
 797         if ((mem_ctx = talloc_init("get_dc_name_via_netlogon")) == NULL) {
 798                 return False;
 799         }
 800
 801         result = cm_connect_netlogon(our_domain, &netlogon_pipe);
 802         if (!NT_STATUS_IS_OK(result)) {
 803                 talloc_destroy(mem_ctx);
 804                 return False;
 805         }
 806
 807         b = netlogon_pipe->binding_handle;
 808
 809         /* This call can take a long time - allow the server to time out.
 810            35 seconds should do it. */
 811
 812         orig_timeout = rpccli_set_timeout(netlogon_pipe, 35000);
 813
 814         if (our_domain->active_directory) {
 815                 struct netr_DsRGetDCNameInfo *domain_info = NULL;
 816
 817                 result = dcerpc_netr_DsRGetDCName(b,
 818                                                   mem_ctx,
 819                                                   our_domain->dcname,
 820                                                   domain->name,
 821                                                   NULL,
 822                                                   NULL,
 823                                                   DS_RETURN_DNS_NAME,
 824                                                   &domain_info,
 825                                                   &werr);
 826                 if (NT_STATUS_IS_OK(result) && W_ERROR_IS_OK(werr)) {
 827                         tmp = talloc_strdup(
 828                                 mem_ctx, domain_info->dc_unc);
 829                         if (tmp == NULL) {
 830                                 DEBUG(0, ("talloc_strdup failed\n"));
 831                                 talloc_destroy(mem_ctx);
 832                                 return false;
 833                         }
 834                         if (domain->alt_name == NULL) {
 835                                 domain->alt_name = talloc_strdup(domain,
 836                                                                  domain_info->domain_name);
 837                                 if (domain->alt_name == NULL) {
 838                                         DEBUG(0, ("talloc_strdup failed\n"));
 839                                         talloc_destroy(mem_ctx);
 840                                         return false;
 841                                 }
 842                         }
 843                         if (domain->forest_name == NULL) {
 844                                 domain->forest_name = talloc_strdup(domain,
 845                                                                     domain_info->forest_name);
 846                                 if (domain->forest_name == NULL) {
 847                                         DEBUG(0, ("talloc_strdup failed\n"));
 848                                         talloc_destroy(mem_ctx);
 849                                         return false;
 850                                 }
 851                         }
 852                 }
 853         } else {
 854                 result = dcerpc_netr_GetAnyDCName(b, mem_ctx,
 855                                                   our_domain->dcname,
 856                                                   domain->name,
 857                                                   &tmp,
 858                                                   &werr);
 859         }
 860
 861         /* And restore our original timeout. */
 862         rpccli_set_timeout(netlogon_pipe, orig_timeout);
 863
 864         if (!NT_STATUS_IS_OK(result)) {
 865                 DEBUG(10,("dcerpc_netr_GetAnyDCName failed: %s\n",
 866                         nt_errstr(result)));
 867                 talloc_destroy(mem_ctx);
 868                 return false;
 869         }
 870
 871         if (!W_ERROR_IS_OK(werr)) {
 872                 DEBUG(10,("dcerpc_netr_GetAnyDCName failed: %s\n",
 873                            win_errstr(werr)));
 874                 talloc_destroy(mem_ctx);
 875                 return false;
 876         }
 877
 878         /* dcerpc_netr_GetAnyDCName gives us a name with \\ */
 879         p = strip_hostname(tmp);
 880
 881         fstrcpy(dcname, p);
 882
 883         talloc_destroy(mem_ctx);
 884
 885         DEBUG(10,("dcerpc_netr_GetAnyDCName returned %s\n", dcname));
 886
 887         if (!resolve_name(dcname, dc_ss, 0x20, true)) {
 888                 return False;
 889         }
 890
 891         return True;
 892 }
 893
 894 /**
 895  * Helper function to assemble trust password and account name
 896  */
 897 static NTSTATUS get_trust_credentials(struct winbindd_domain *domain,
 898                                       TALLOC_CTX *mem_ctx,
 899                                       bool netlogon,
 900                                       struct cli_credentials **_creds)
 901 {
 902         const struct winbindd_domain *creds_domain = NULL;
 903         struct cli_credentials *creds;
 904         NTSTATUS status;
 905         bool force_machine_account = false;
 906
 907         /* If we are a DC and this is not our own domain */
 908
 909         if (!domain->active_directory) {
 910                 if (!netlogon) {
 911                         /*
 912                          * For non active directory domains
 913                          * we can only use NTLMSSP for SMB.
 914                          *
 915                          * But the trust account is not allowed
 916                          * to use SMB with NTLMSSP.
 917                          */
 918                         force_machine_account = true;
 919                 }
 920         }
 921
 922         if (IS_DC && !force_machine_account) {
 923                 creds_domain = domain;
 924         } else {
 925                 creds_domain = find_our_domain();
 926                 if (creds_domain == NULL) {
 927                         return NT_STATUS_INVALID_SERVER_STATE;
 928                 }
 929         }
 930
 931         status = pdb_get_trust_credentials(creds_domain->name,
 932                                            creds_domain->alt_name,
 933                                            mem_ctx,
 934                                            &creds);
 935         if (!NT_STATUS_IS_OK(status)) {
 936                 goto ipc_fallback;
 937         }
 938
 939         if (domain->primary && lp_security() == SEC_ADS) {
 940                 cli_credentials_set_kerberos_state(creds,
 941                                                    CRED_AUTO_USE_KERBEROS);
 942         } else if (domain->active_directory) {
 943                 cli_credentials_set_kerberos_state(creds,
 944                                                    CRED_MUST_USE_KERBEROS);
 945         } else {
 946                 cli_credentials_set_kerberos_state(creds,
 947                                                    CRED_DONT_USE_KERBEROS);
 948         }
 949
 950         if (creds_domain != domain) {
 951                 /*
 952                  * We can only use schannel against a direct trust
 953                  */
 954                 cli_credentials_set_secure_channel_type(creds,
 955                                                         SEC_CHAN_NULL);
 956         }
 957
 958         *_creds = creds;
 959         return NT_STATUS_OK;
 960
 961  ipc_fallback:
 962         if (netlogon) {
 963                 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
 964         }
 965
 966         status = cm_get_ipc_credentials(mem_ctx, &creds);
 967         if (!NT_STATUS_IS_OK(status)) {
 968                 return status;
 969         }
 970
 971         *_creds = creds;
 972         return NT_STATUS_OK;
 973 }
 974
 975 /************************************************************************
 976  Given a fd with a just-connected TCP connection to a DC, open a connection
 977  to the pipe.
 978 ************************************************************************/
 979
 980 static NTSTATUS cm_prepare_connection(struct winbindd_domain *domain,
 981                                       const int sockfd,
 982                                       const char *controller,
 983                                       struct cli_state **cli,
 984                                       bool *retry)
 985 {
 986         bool try_ipc_auth = false;
 987         const char *machine_password = NULL;
 988         const char *machine_krb5_principal = NULL;
 989         const char *machine_account = NULL;
 990         const char *machine_domain = NULL;
 991         int flags = 0;
 992         struct cli_credentials *creds = NULL;
 993         enum credentials_use_kerberos krb5_state;
 994
 995         struct named_mutex *mutex;
 996
 997         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 998
 999         enum smb_signing_setting smb_sign_client_connections = lp_client_signing();
1000
1001         if (smb_sign_client_connections == SMB_SIGNING_DEFAULT) {
1002                 /*
1003                  * If we are connecting to our own AD domain, require
1004                  * smb signing to disrupt MITM attacks
1005                  */
1006                 if (domain->primary && lp_security() == SEC_ADS) {
1007                         smb_sign_client_connections = SMB_SIGNING_REQUIRED;
1008                 /*
1009                  * If we are in or are an AD domain and connecting to another
1010                  * AD domain in our forest
1011                  * then require smb signing to disrupt MITM attacks
1012                  */
1013                 } else if ((lp_security() == SEC_ADS ||
1014                             lp_server_role() == ROLE_ACTIVE_DIRECTORY_DC)
1015                            && domain->active_directory
1016                            && (domain->domain_trust_attribs
1017                                & LSA_TRUST_ATTRIBUTE_WITHIN_FOREST)) {
1018                         smb_sign_client_connections = SMB_SIGNING_REQUIRED;
1019                 }
1020         }
1021
1022         DEBUG(10,("cm_prepare_connection: connecting to DC %s for domain %s\n",
1023                 controller, domain->name ));
1024
1025         *retry = True;
1026
1027         mutex = grab_named_mutex(talloc_tos(), controller,
1028                                  WINBIND_SERVER_MUTEX_WAIT_TIME);
1029         if (mutex == NULL) {
1030                 close(sockfd);
1031                 DEBUG(0,("cm_prepare_connection: mutex grab failed for %s\n",
1032                          controller));
1033                 result = NT_STATUS_POSSIBLE_DEADLOCK;
1034                 goto done;
1035         }
1036
1037         flags |= CLI_FULL_CONNECTION_USE_KERBEROS;
1038
1039         *cli = cli_state_create(NULL, sockfd,
1040                                 controller, domain->alt_name,
1041                                 smb_sign_client_connections, flags);
1042         if (*cli == NULL) {
1043                 close(sockfd);
1044                 DEBUG(1, ("Could not cli_initialize\n"));
1045                 result = NT_STATUS_NO_MEMORY;
1046                 goto done;
1047         }
1048
1049         cli_set_timeout(*cli, 10000); /* 10 seconds */
1050
1051         result = smbXcli_negprot((*cli)->conn, (*cli)->timeout,
1052                                  lp_client_min_protocol(),
1053                                  lp_winbindd_max_protocol());
1054
1055         if (!NT_STATUS_IS_OK(result)) {
1056                 DEBUG(1, ("cli_negprot failed: %s\n", nt_errstr(result)));
1057                 goto done;
1058         }
1059
1060         if (smbXcli_conn_protocol((*cli)->conn) >= PROTOCOL_NT1 &&
1061             smb1cli_conn_capabilities((*cli)->conn) & CAP_EXTENDED_SECURITY) {
1062                 try_ipc_auth = true;
1063         } else if (smbXcli_conn_protocol((*cli)->conn) >= PROTOCOL_SMB2_02) {
1064                 try_ipc_auth = true;
1065         } else if (smb_sign_client_connections == SMB_SIGNING_REQUIRED) {
1066                 /*
1067                  * If we are forcing on SMB signing, then we must
1068                  * require authentication unless this is a one-way
1069                  * trust, and we have no stored user/password
1070                  */
1071                 try_ipc_auth = true;
1072         }
1073
1074         if (try_ipc_auth) {
1075                 result = get_trust_credentials(domain, talloc_tos(), false, &creds);
1076                 if (!NT_STATUS_IS_OK(result)) {
1077                         DEBUG(1, ("get_trust_credentials(%s) failed: %s\n",
1078                                   domain->name, nt_errstr(result)));
1079                         goto done;
1080                 }
1081         } else {
1082                 /*
1083                  * Without SPNEGO or NTLMSSP (perhaps via SMB2) we
1084                  * would try and authentication with our machine
1085                  * account password and fail.  This is very rare in
1086                  * the modern world however
1087                  */
1088                 creds = cli_credentials_init_anon(talloc_tos());
1089                 if (creds == NULL) {
1090                         result = NT_STATUS_NO_MEMORY;
1091                         DEBUG(1, ("cli_credentials_init_anon(%s) failed: %s\n",
1092                                   domain->name, nt_errstr(result)));
1093                         goto done;
1094                 }
1095         }
1096
1097         krb5_state = cli_credentials_get_kerberos_state(creds);
1098
1099         machine_krb5_principal = cli_credentials_get_principal(creds,
1100                                                         talloc_tos());
1101         if (machine_krb5_principal == NULL) {
1102                 krb5_state = CRED_DONT_USE_KERBEROS;
1103         }
1104
1105         machine_account = cli_credentials_get_username(creds);
1106         machine_password = cli_credentials_get_password(creds);
1107         machine_domain = cli_credentials_get_domain(creds);
1108
1109         if (krb5_state != CRED_DONT_USE_KERBEROS) {
1110
1111                 /* Try a krb5 session */
1112
1113                 (*cli)->use_kerberos = True;
1114                 DEBUG(5, ("connecting to %s from %s with kerberos principal "
1115                           "[%s] and realm [%s]\n", controller, lp_netbios_name(),
1116                           machine_krb5_principal, domain->alt_name));
1117
1118                 winbindd_set_locator_kdc_envs(domain);
1119
1120                 result = cli_session_setup(*cli,
1121                                            machine_krb5_principal,
1122                                            machine_password,
1123                                            strlen(machine_password)+1,
1124                                            machine_password,
1125                                            strlen(machine_password)+1,
1126                                            machine_domain);
1127
1128                 if (NT_STATUS_IS_OK(result)) {
1129                         goto session_setup_done;
1130                 }
1131
1132                 DEBUG(4,("failed kerberos session setup with %s\n",
1133                          nt_errstr(result)));
1134         }
1135
1136         if (krb5_state != CRED_MUST_USE_KERBEROS) {
1137                 /* Fall back to non-kerberos session setup using NTLMSSP SPNEGO with the machine account. */
1138                 (*cli)->use_kerberos = False;
1139
1140                 DEBUG(5, ("connecting to %s from %s using NTLMSSP with username "
1141                           "[%s]\\[%s]\n",  controller, lp_netbios_name(),
1142                           machine_domain, machine_account));
1143
1144                 result = cli_session_setup(*cli,
1145                                            machine_account,
1146                                            machine_password,
1147                                            strlen(machine_password)+1,
1148                                            machine_password,
1149                                            strlen(machine_password)+1,
1150                                            machine_domain);
1151         }
1152
1153         if (NT_STATUS_IS_OK(result)) {
1154                 goto session_setup_done;
1155         }
1156
1157         /*
1158          * If we are not going to validiate the conneciton
1159          * with SMB signing, then allow us to fall back to
1160          * anonymous
1161          */
1162         if (NT_STATUS_EQUAL(result, NT_STATUS_NOLOGON_WORKSTATION_TRUST_ACCOUNT)
1163             || NT_STATUS_EQUAL(result, NT_STATUS_TRUSTED_DOMAIN_FAILURE)
1164             || NT_STATUS_EQUAL(result, NT_STATUS_INVALID_ACCOUNT_NAME)
1165             || NT_STATUS_EQUAL(result, NT_STATUS_LOGON_FAILURE))
1166         {
1167                 if (cli_credentials_is_anonymous(creds)) {
1168                         goto done;
1169                 }
1170
1171                 if (!cm_is_ipc_credentials(creds)) {
1172                         goto ipc_fallback;
1173                 }
1174
1175                 if (smb_sign_client_connections == SMB_SIGNING_REQUIRED) {
1176                         goto done;
1177                 }
1178
1179                 goto anon_fallback;
1180         }
1181
1182         DEBUG(4, ("authenticated session setup failed with %s\n",
1183                 nt_errstr(result)));
1184
1185         goto done;
1186
1187  ipc_fallback:
1188         result = cm_get_ipc_credentials(talloc_tos(), &creds);
1189         if (!NT_STATUS_IS_OK(result)) {
1190                 goto done;
1191         }
1192
1193         if (cli_credentials_is_anonymous(creds)) {
1194                 TALLOC_FREE(creds);
1195                 goto anon_fallback;
1196         }
1197
1198         machine_account = cli_credentials_get_username(creds);
1199         machine_password = cli_credentials_get_password(creds);
1200         machine_domain = cli_credentials_get_domain(creds);
1201
1202         /* Fall back to non-kerberos session setup using NTLMSSP SPNEGO with the ipc creds. */
1203         (*cli)->use_kerberos = False;
1204
1205         DEBUG(5, ("connecting to %s from %s using NTLMSSP with username "
1206                   "[%s]\\[%s]\n",  controller, lp_netbios_name(),
1207                   machine_domain, machine_account));
1208
1209         result = cli_session_setup(*cli,
1210                                    machine_account,
1211                                    machine_password,
1212                                    strlen(machine_password)+1,
1213                                    machine_password,
1214                                    strlen(machine_password)+1,
1215                                    machine_domain);
1216
1217         if (NT_STATUS_IS_OK(result)) {
1218                 goto session_setup_done;
1219         }
1220
1221         /*
1222          * If we are not going to validiate the conneciton
1223          * with SMB signing, then allow us to fall back to
1224          * anonymous
1225          */
1226         if (NT_STATUS_EQUAL(result, NT_STATUS_NOLOGON_WORKSTATION_TRUST_ACCOUNT)
1227             || NT_STATUS_EQUAL(result, NT_STATUS_TRUSTED_DOMAIN_FAILURE)
1228             || NT_STATUS_EQUAL(result, NT_STATUS_LOGON_FAILURE))
1229         {
1230                 goto anon_fallback;
1231         }
1232
1233         DEBUG(4, ("authenticated session setup failed with %s\n",
1234                 nt_errstr(result)));
1235
1236         goto done;
1237
1238  anon_fallback:
1239
1240         if (smb_sign_client_connections == SMB_SIGNING_REQUIRED) {
1241                 goto done;
1242         }
1243
1244         /* Fall back to anonymous connection, this might fail later */
1245         DEBUG(10,("cm_prepare_connection: falling back to anonymous "
1246                 "connection for DC %s\n",
1247                 controller ));
1248
1249         (*cli)->use_kerberos = False;
1250
1251         result = cli_session_setup(*cli, "", "", 0, "", 0, "");
1252         if (NT_STATUS_IS_OK(result)) {
1253                 DEBUG(5, ("Connected anonymously\n"));
1254                 goto session_setup_done;
1255         }
1256
1257         /* We can't session setup */
1258         goto done;
1259
1260  session_setup_done:
1261
1262         /*
1263          * This should be a short term hack until
1264          * dynamic re-authentication is implemented.
1265          *
1266          * See Bug 9175 - winbindd doesn't recover from
1267          * NT_STATUS_NETWORK_SESSION_EXPIRED
1268          */
1269         if (smbXcli_conn_protocol((*cli)->conn) >= PROTOCOL_SMB2_02) {
1270                 smbXcli_session_set_disconnect_expired((*cli)->smb2.session);
1271         }
1272
1273         result = cli_tree_connect(*cli, "IPC$", "IPC", "", 0);
1274
1275         if (!NT_STATUS_IS_OK(result)) {
1276                 DEBUG(1,("failed tcon_X with %s\n", nt_errstr(result)));
1277                 goto done;
1278         }
1279
1280         /* cache the server name for later connections */
1281
1282         saf_store(domain->name, controller);
1283         if (domain->alt_name && (*cli)->use_kerberos) {
1284                 saf_store(domain->alt_name, controller);
1285         }
1286
1287         winbindd_set_locator_kdc_envs(domain);
1288
1289         TALLOC_FREE(mutex);
1290         *retry = False;
1291
1292         result = NT_STATUS_OK;
1293
1294  done:
1295         TALLOC_FREE(mutex);
1296
1297         if (!NT_STATUS_IS_OK(result)) {
1298                 winbind_add_failed_connection_entry(domain, controller, result);
1299                 if ((*cli) != NULL) {
1300                         cli_shutdown(*cli);
1301                         *cli = NULL;
1302                 }
1303         }
1304
1305         return result;
1306 }
1307
1308 /*******************************************************************
1309  Add a dcname and sockaddr_storage pair to the end of a dc_name_ip
1310  array.
1311
1312  Keeps the list unique by not adding duplicate entries.
1313
1314  @param[in] mem_ctx talloc memory context to allocate from
1315  @param[in] domain_name domain of the DC
1316  @param[in] dcname name of the DC to add to the list
1317  @param[in] pss Internet address and port pair to add to the list
1318  @param[in,out] dcs array of dc_name_ip structures to add to
1319  @param[in,out] num_dcs number of dcs returned in the dcs array
1320  @return true if the list was added to, false otherwise
1321 *******************************************************************/
1322
1323 static bool add_one_dc_unique(TALLOC_CTX *mem_ctx, const char *domain_name,
1324                               const char *dcname, struct sockaddr_storage *pss,
1325                               struct dc_name_ip **dcs, int *num)
1326 {
1327         int i = 0;
1328
1329         if (!NT_STATUS_IS_OK(check_negative_conn_cache(domain_name, dcname))) {
1330                 DEBUG(10, ("DC %s was in the negative conn cache\n", dcname));
1331                 return False;
1332         }
1333
1334         /* Make sure there's no duplicates in the list */
1335         for (i=0; i<*num; i++)
1336                 if (sockaddr_equal(
1337                             (struct sockaddr *)(void *)&(*dcs)[i].ss,
1338                             (struct sockaddr *)(void *)pss))
1339                         return False;
1340
1341         *dcs = talloc_realloc(mem_ctx, *dcs, struct dc_name_ip, (*num)+1);
1342
1343         if (*dcs == NULL)
1344                 return False;
1345
1346         fstrcpy((*dcs)[*num].name, dcname);
1347         (*dcs)[*num].ss = *pss;
1348         *num += 1;
1349         return True;
1350 }
1351
1352 static bool add_sockaddr_to_array(TALLOC_CTX *mem_ctx,
1353                                   struct sockaddr_storage *pss, uint16 port,
1354                                   struct sockaddr_storage **addrs, int *num)
1355 {
1356         *addrs = talloc_realloc(mem_ctx, *addrs, struct sockaddr_storage, (*num)+1);
1357
1358         if (*addrs == NULL) {
1359                 *num = 0;
1360                 return False;
1361         }
1362
1363         (*addrs)[*num] = *pss;
1364         set_sockaddr_port((struct sockaddr *)&(*addrs)[*num], port);
1365
1366         *num += 1;
1367         return True;
1368 }
1369
1370 /*******************************************************************
1371  convert an ip to a name
1372 *******************************************************************/
1373
1374 static bool dcip_to_name(TALLOC_CTX *mem_ctx,
1375                 const struct winbindd_domain *domain,
1376                 struct sockaddr_storage *pss,
1377                 char **name)
1378 {
1379         struct ip_service ip_list;
1380         uint32_t nt_version = NETLOGON_NT_VERSION_1;
1381         NTSTATUS status;
1382         const char *dc_name;
1383         fstring nbtname;
1384
1385         ip_list.ss = *pss;
1386         ip_list.port = 0;
1387
1388 #ifdef HAVE_ADS
1389         /* For active directory servers, try to get the ldap server name.
1390            None of these failures should be considered critical for now */
1391
1392         if ((lp_security() == SEC_ADS) && (domain->alt_name != NULL)) {
1393                 ADS_STRUCT *ads;
1394                 ADS_STATUS ads_status;
1395                 char addr[INET6_ADDRSTRLEN];
1396
1397                 print_sockaddr(addr, sizeof(addr), pss);
1398
1399                 ads = ads_init(domain->alt_name, domain->name, addr);
1400                 ads->auth.flags |= ADS_AUTH_NO_BIND;
1401
1402                 ads_status = ads_connect(ads);
1403                 if (ADS_ERR_OK(ads_status)) {
1404                         /* We got a cldap packet. */
1405                         *name = talloc_strdup(mem_ctx,
1406                                              ads->config.ldap_server_name);
1407                         if (*name == NULL) {
1408                                 return false;
1409                         }
1410                         namecache_store(*name, 0x20, 1, &ip_list);
1411
1412                         DEBUG(10,("dcip_to_name: flags = 0x%x\n", (unsigned int)ads->config.flags));
1413
1414                         if (domain->primary && (ads->config.flags & NBT_SERVER_KDC)) {
1415                                 if (ads_closest_dc(ads)) {
1416                                         char *sitename = sitename_fetch(mem_ctx, ads->config.realm);
1417
1418                                         /* We're going to use this KDC for this realm/domain.
1419                                            If we are using sites, then force the krb5 libs
1420                                            to use this KDC. */
1421
1422                                         create_local_private_krb5_conf_for_domain(domain->alt_name,
1423                                                                         domain->name,
1424                                                                         sitename,
1425                                                                         pss);
1426
1427                                         TALLOC_FREE(sitename);
1428                                 } else {
1429                                         /* use an off site KDC */
1430                                         create_local_private_krb5_conf_for_domain(domain->alt_name,
1431                                                                         domain->name,
1432                                                                         NULL,
1433                                                                         pss);
1434                                 }
1435                                 winbindd_set_locator_kdc_envs(domain);
1436
1437                                 /* Ensure we contact this DC also. */
1438                                 saf_store(domain->name, *name);
1439                                 saf_store(domain->alt_name, *name);
1440                         }
1441
1442                         ads_destroy( &ads );
1443                         return True;
1444                 }
1445
1446                 ads_destroy( &ads );
1447                 return false;
1448         }
1449 #endif
1450
1451         status = nbt_getdc(winbind_messaging_context(), 10, pss, domain->name,
1452                            &domain->sid, nt_version, mem_ctx, &nt_version,
1453                            &dc_name, NULL);
1454         if (NT_STATUS_IS_OK(status)) {
1455                 *name = talloc_strdup(mem_ctx, dc_name);
1456                 if (*name == NULL) {
1457                         return false;
1458                 }
1459                 namecache_store(*name, 0x20, 1, &ip_list);
1460                 return True;
1461         }
1462
1463         /* try node status request */
1464
1465         if (name_status_find(domain->name, 0x1c, 0x20, pss, nbtname) ) {
1466                 namecache_store(nbtname, 0x20, 1, &ip_list);
1467
1468                 if (name != NULL) {
1469                         *name = talloc_strdup(mem_ctx, nbtname);
1470                         if (*name == NULL) {
1471                                 return false;
1472                         }
1473                 }
1474
1475                 return true;
1476         }
1477         return False;
1478 }
1479
1480 /*******************************************************************
1481  Retrieve a list of IP addresses for domain controllers.
1482
1483  The array is sorted in the preferred connection order.
1484
1485  @param[in] mem_ctx talloc memory context to allocate from
1486  @param[in] domain domain to retrieve DCs for
1487  @param[out] dcs array of dcs that will be returned
1488  @param[out] num_dcs number of dcs returned in the dcs array
1489  @return always true
1490 *******************************************************************/
1491
1492 static bool get_dcs(TALLOC_CTX *mem_ctx, struct winbindd_domain *domain,
1493                     struct dc_name_ip **dcs, int *num_dcs)
1494 {
1495         fstring dcname;
1496         struct  sockaddr_storage ss;
1497         struct  ip_service *ip_list = NULL;
1498         int     iplist_size = 0;
1499         int     i;
1500         bool    is_our_domain;
1501         enum security_types sec = (enum security_types)lp_security();
1502
1503         is_our_domain = strequal(domain->name, lp_workgroup());
1504
1505         /* If not our domain, get the preferred DC, by asking our primary DC */
1506         if ( !is_our_domain
1507                 && get_dc_name_via_netlogon(domain, dcname, &ss)
1508                 && add_one_dc_unique(mem_ctx, domain->name, dcname, &ss, dcs,
1509                        num_dcs) )
1510         {
1511                 char addr[INET6_ADDRSTRLEN];
1512                 print_sockaddr(addr, sizeof(addr), &ss);
1513                 DEBUG(10, ("Retrieved DC %s at %s via netlogon\n",
1514                            dcname, addr));
1515                 return True;
1516         }
1517
1518         if ((sec == SEC_ADS) && (domain->alt_name != NULL)) {
1519                 char *sitename = NULL;
1520
1521                 /* We need to make sure we know the local site before
1522                    doing any DNS queries, as this will restrict the
1523                    get_sorted_dc_list() call below to only fetching
1524                    DNS records for the correct site. */
1525
1526                 /* Find any DC to get the site record.
1527                    We deliberately don't care about the
1528                    return here. */
1529
1530                 get_dc_name(domain->name, domain->alt_name, dcname, &ss);
1531
1532                 sitename = sitename_fetch(mem_ctx, domain->alt_name);
1533                 if (sitename) {
1534
1535                         /* Do the site-specific AD dns lookup first. */
1536                         get_sorted_dc_list(domain->alt_name, sitename, &ip_list,
1537                                &iplist_size, True);
1538
1539                         /* Add ips to the DC array.  We don't look up the name
1540                            of the DC in this function, but we fill in the char*
1541                            of the ip now to make the failed connection cache
1542                            work */
1543                         for ( i=0; i<iplist_size; i++ ) {
1544                                 char addr[INET6_ADDRSTRLEN];
1545                                 print_sockaddr(addr, sizeof(addr),
1546                                                 &ip_list[i].ss);
1547                                 add_one_dc_unique(mem_ctx,
1548                                                 domain->name,
1549                                                 addr,
1550                                                 &ip_list[i].ss,
1551                                                 dcs,
1552                                                 num_dcs);
1553                         }
1554
1555                         SAFE_FREE(ip_list);
1556                         TALLOC_FREE(sitename);
1557                         iplist_size = 0;
1558                 }
1559
1560                 /* Now we add DCs from the main AD DNS lookup. */
1561                 get_sorted_dc_list(domain->alt_name, NULL, &ip_list,
1562                         &iplist_size, True);
1563
1564                 for ( i=0; i<iplist_size; i++ ) {
1565                         char addr[INET6_ADDRSTRLEN];
1566                         print_sockaddr(addr, sizeof(addr),
1567                                         &ip_list[i].ss);
1568                         add_one_dc_unique(mem_ctx,
1569                                         domain->name,
1570                                         addr,
1571                                         &ip_list[i].ss,
1572                                         dcs,
1573                                         num_dcs);
1574                 }
1575
1576                 SAFE_FREE(ip_list);
1577                 iplist_size = 0;
1578         }
1579
1580         /* Try standard netbios queries if no ADS and fall back to DNS queries
1581          * if alt_name is available */
1582         if (*num_dcs == 0) {
1583                 get_sorted_dc_list(domain->name, NULL, &ip_list, &iplist_size,
1584                        false);
1585                 if (iplist_size == 0) {
1586                         if (domain->alt_name != NULL) {
1587                                 get_sorted_dc_list(domain->alt_name, NULL, &ip_list,
1588                                        &iplist_size, true);
1589                         }
1590                 }
1591
1592                 for ( i=0; i<iplist_size; i++ ) {
1593                         char addr[INET6_ADDRSTRLEN];
1594                         print_sockaddr(addr, sizeof(addr),
1595                                         &ip_list[i].ss);
1596                         add_one_dc_unique(mem_ctx,
1597                                         domain->name,
1598                                         addr,
1599                                         &ip_list[i].ss,
1600                                         dcs,
1601                                         num_dcs);
1602                 }
1603
1604                 SAFE_FREE(ip_list);
1605                 iplist_size = 0;
1606         }
1607
1608         return True;
1609 }
1610
1611 /*******************************************************************
1612  Find and make a connection to a DC in the given domain.
1613
1614  @param[in] mem_ctx talloc memory context to allocate from
1615  @param[in] domain domain to find a dc in
1616  @param[out] dcname NetBIOS or FQDN of DC that's connected to
1617  @param[out] pss DC Internet address and port
1618  @param[out] fd fd of the open socket connected to the newly found dc
1619  @return true when a DC connection is made, false otherwise
1620 *******************************************************************/
1621
1622 static bool find_new_dc(TALLOC_CTX *mem_ctx,
1623                         struct winbindd_domain *domain,
1624                         char **dcname, struct sockaddr_storage *pss, int *fd)
1625 {
1626         struct dc_name_ip *dcs = NULL;
1627         int num_dcs = 0;
1628
1629         const char **dcnames = NULL;
1630         size_t num_dcnames = 0;
1631
1632         struct sockaddr_storage *addrs = NULL;
1633         int num_addrs = 0;
1634
1635         int i;
1636         size_t fd_index;
1637
1638         NTSTATUS status;
1639
1640         *fd = -1;
1641
1642  again:
1643         if (!get_dcs(mem_ctx, domain, &dcs, &num_dcs) || (num_dcs == 0))
1644                 return False;
1645
1646         for (i=0; i<num_dcs; i++) {
1647
1648                 if (!add_string_to_array(mem_ctx, dcs[i].name,
1649                                     &dcnames, &num_dcnames)) {
1650                         return False;
1651                 }
1652                 if (!add_sockaddr_to_array(mem_ctx, &dcs[i].ss, TCP_SMB_PORT,
1653                                       &addrs, &num_addrs)) {
1654                         return False;
1655                 }
1656         }
1657
1658         if ((num_dcnames == 0) || (num_dcnames != num_addrs))
1659                 return False;
1660
1661         if ((addrs == NULL) || (dcnames == NULL))
1662                 return False;
1663
1664         status = smbsock_any_connect(addrs, dcnames, NULL, NULL, NULL,
1665                                      num_addrs, 0, 10, fd, &fd_index, NULL);
1666         if (!NT_STATUS_IS_OK(status)) {
1667                 for (i=0; i<num_dcs; i++) {
1668                         char ab[INET6_ADDRSTRLEN];
1669                         print_sockaddr(ab, sizeof(ab), &dcs[i].ss);
1670                         DEBUG(10, ("find_new_dc: smbsock_any_connect failed for "
1671                                 "domain %s address %s. Error was %s\n",
1672                                    domain->name, ab, nt_errstr(status) ));
1673                         winbind_add_failed_connection_entry(domain,
1674                                 dcs[i].name, NT_STATUS_UNSUCCESSFUL);
1675                 }
1676                 return False;
1677         }
1678
1679         *pss = addrs[fd_index];
1680
1681         if (*dcnames[fd_index] != '\0' && !is_ipaddress(dcnames[fd_index])) {
1682                 /* Ok, we've got a name for the DC */
1683                 *dcname = talloc_strdup(mem_ctx, dcnames[fd_index]);
1684                 if (*dcname == NULL) {
1685                         return false;
1686                 }
1687                 return true;
1688         }
1689
1690         /* Try to figure out the name */
1691         if (dcip_to_name(mem_ctx, domain, pss, dcname)) {
1692                 return True;
1693         }
1694
1695         /* We can not continue without the DC's name */
1696         winbind_add_failed_connection_entry(domain, dcs[fd_index].name,
1697                                     NT_STATUS_UNSUCCESSFUL);
1698
1699         /* Throw away all arrays as we're doing this again. */
1700         TALLOC_FREE(dcs);
1701         num_dcs = 0;
1702
1703         TALLOC_FREE(dcnames);
1704         num_dcnames = 0;
1705
1706         TALLOC_FREE(addrs);
1707         num_addrs = 0;
1708
1709         close(*fd);
1710         *fd = -1;
1711
1712         goto again;
1713 }
1714
1715 static char *current_dc_key(TALLOC_CTX *mem_ctx, const char *domain_name)
1716 {
1717         return talloc_asprintf_strupper_m(mem_ctx, "CURRENT_DCNAME/%s",
1718                                           domain_name);
1719 }
1720
1721 static void store_current_dc_in_gencache(const char *domain_name,
1722                                          const char *dc_name,
1723                                          struct cli_state *cli)
1724 {
1725         char addr[INET6_ADDRSTRLEN];
1726         char *key = NULL;
1727         char *value = NULL;
1728
1729         if (!cli_state_is_connected(cli)) {
1730                 return;
1731         }
1732
1733         print_sockaddr(addr, sizeof(addr),
1734                        smbXcli_conn_remote_sockaddr(cli->conn));
1735
1736         key = current_dc_key(talloc_tos(), domain_name);
1737         if (key == NULL) {
1738                 goto done;
1739         }
1740
1741         value = talloc_asprintf(talloc_tos(), "%s %s", addr, dc_name);
1742         if (value == NULL) {
1743                 goto done;
1744         }
1745
1746         gencache_set(key, value, 0x7fffffff);
1747 done:
1748         TALLOC_FREE(value);
1749         TALLOC_FREE(key);
1750 }
1751
1752 bool fetch_current_dc_from_gencache(TALLOC_CTX *mem_ctx,
1753                                     const char *domain_name,
1754                                     char **p_dc_name, char **p_dc_ip)
1755 {
1756         char *key, *p;
1757         char *value = NULL;
1758         bool ret = false;
1759         char *dc_name = NULL;
1760         char *dc_ip = NULL;
1761
1762         key = current_dc_key(talloc_tos(), domain_name);
1763         if (key == NULL) {
1764                 goto done;
1765         }
1766         if (!gencache_get(key, mem_ctx, &value, NULL)) {
1767                 goto done;
1768         }
1769         p = strchr(value, ' ');
1770         if (p == NULL) {
1771                 goto done;
1772         }
1773         dc_ip = talloc_strndup(mem_ctx, value, p - value);
1774         if (dc_ip == NULL) {
1775                 goto done;
1776         }
1777         dc_name = talloc_strdup(mem_ctx, p+1);
1778         if (dc_name == NULL) {
1779                 goto done;
1780         }
1781
1782         if (p_dc_ip != NULL) {
1783                 *p_dc_ip = dc_ip;
1784                 dc_ip = NULL;
1785         }
1786         if (p_dc_name != NULL) {
1787                 *p_dc_name = dc_name;
1788                 dc_name = NULL;
1789         }
1790         ret = true;
1791 done:
1792         TALLOC_FREE(dc_name);
1793         TALLOC_FREE(dc_ip);
1794         TALLOC_FREE(key);
1795         TALLOC_FREE(value);
1796         return ret;
1797 }
1798
1799 NTSTATUS wb_open_internal_pipe(TALLOC_CTX *mem_ctx,
1800                                const struct ndr_interface_table *table,
1801                                struct rpc_pipe_client **ret_pipe)
1802 {
1803         struct rpc_pipe_client *cli = NULL;
1804         const struct auth_session_info *session_info;
1805         NTSTATUS status = NT_STATUS_UNSUCCESSFUL;
1806
1807
1808         session_info = get_session_info_system();
1809         SMB_ASSERT(session_info != NULL);
1810
1811         /* create a connection to the specified pipe */
1812         if (lp_parm_bool(-1, "winbindd", "use external pipes", false)) {
1813                 status = rpc_pipe_open_interface(mem_ctx,
1814                                                  table,
1815                                                  session_info,
1816                                                  NULL,
1817                                                  winbind_messaging_context(),
1818                                                  &cli);
1819         } else {
1820                 status = rpc_pipe_open_internal(mem_ctx,
1821                                                 &table->syntax_id,
1822                                                 session_info,
1823                                                 NULL,
1824                                                 winbind_messaging_context(),
1825                                                 &cli);
1826         }
1827         if (!NT_STATUS_IS_OK(status)) {
1828                 DEBUG(0, ("open_internal_pipe: Could not connect to %s pipe: %s\n",
1829                           table->name, nt_errstr(status)));
1830                 return status;
1831         }
1832
1833         if (ret_pipe) {
1834                 *ret_pipe = cli;
1835         }
1836
1837         return NT_STATUS_OK;
1838 }
1839
1840 static NTSTATUS cm_open_connection(struct winbindd_domain *domain,
1841                                    struct winbindd_cm_conn *new_conn)
1842 {
1843         TALLOC_CTX *mem_ctx;
1844         NTSTATUS result;
1845         char *saf_servername;
1846         int retries;
1847
1848         if ((mem_ctx = talloc_init("cm_open_connection")) == NULL) {
1849                 set_domain_offline(domain);
1850                 return NT_STATUS_NO_MEMORY;
1851         }
1852
1853         saf_servername = saf_fetch(mem_ctx, domain->name );
1854
1855         /* we have to check the server affinity cache here since
1856            later we select a DC based on response time and not preference */
1857
1858         /* Check the negative connection cache
1859            before talking to it. It going down may have
1860            triggered the reconnection. */
1861
1862         if ( saf_servername && NT_STATUS_IS_OK(check_negative_conn_cache( domain->name, saf_servername))) {
1863
1864                 DEBUG(10,("cm_open_connection: saf_servername is '%s' for domain %s\n",
1865                         saf_servername, domain->name ));
1866
1867                 /* convert an ip address to a name */
1868                 if (is_ipaddress( saf_servername ) ) {
1869                         char *dcname = NULL;
1870                         struct sockaddr_storage ss;
1871
1872                         if (!interpret_string_addr(&ss, saf_servername,
1873                                                 AI_NUMERICHOST)) {
1874                                 TALLOC_FREE(mem_ctx);
1875                                 return NT_STATUS_UNSUCCESSFUL;
1876                         }
1877                         if (dcip_to_name(mem_ctx, domain, &ss, &dcname)) {
1878                                 domain->dcname = talloc_strdup(domain,
1879                                                                dcname);
1880                                 if (domain->dcname == NULL) {
1881                                         TALLOC_FREE(mem_ctx);
1882                                         return NT_STATUS_NO_MEMORY;
1883                                 }
1884                         } else {
1885                                 winbind_add_failed_connection_entry(
1886                                         domain, saf_servername,
1887                                         NT_STATUS_UNSUCCESSFUL);
1888                         }
1889                 } else {
1890                         domain->dcname = talloc_strdup(domain, saf_servername);
1891                         if (domain->dcname == NULL) {
1892                                 TALLOC_FREE(mem_ctx);
1893                                 return NT_STATUS_NO_MEMORY;
1894                         }
1895                 }
1896         }
1897
1898         for (retries = 0; retries < 3; retries++) {
1899                 int fd = -1;
1900                 bool retry = False;
1901                 char *dcname = NULL;
1902
1903                 result = NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
1904
1905                 DEBUG(10,("cm_open_connection: dcname is '%s' for domain %s\n",
1906                         domain->dcname ? domain->dcname : "", domain->name ));
1907
1908                 if (domain->dcname != NULL
1909                         && NT_STATUS_IS_OK(check_negative_conn_cache( domain->name, domain->dcname))
1910                         && (resolve_name(domain->dcname, &domain->dcaddr, 0x20, true)))
1911                 {
1912                         NTSTATUS status;
1913
1914                         status = smbsock_connect(&domain->dcaddr, 0,
1915                                                  NULL, -1, NULL, -1,
1916                                                  &fd, NULL, 10);
1917                         if (!NT_STATUS_IS_OK(status)) {
1918                                 fd = -1;
1919                         }
1920                 }
1921
1922                 if ((fd == -1) &&
1923                     !find_new_dc(mem_ctx, domain, &dcname, &domain->dcaddr, &fd))
1924                 {
1925                         /* This is the one place where we will
1926                            set the global winbindd offline state
1927                            to true, if a "WINBINDD_OFFLINE" entry
1928                            is found in the winbindd cache. */
1929                         set_global_winbindd_state_offline();
1930                         break;
1931                 }
1932                 if (dcname != NULL) {
1933                         talloc_free(domain->dcname);
1934
1935                         domain->dcname = talloc_move(domain, &dcname);
1936                         if (domain->dcname == NULL) {
1937                                 result = NT_STATUS_NO_MEMORY;
1938                                 break;
1939                         }
1940                 }
1941
1942                 new_conn->cli = NULL;
1943
1944                 result = cm_prepare_connection(domain, fd, domain->dcname,
1945                         &new_conn->cli, &retry);
1946                 if (!NT_STATUS_IS_OK(result)) {
1947                         /* Don't leak the smb connection socket */
1948                         close(fd);
1949                 }
1950
1951                 if (!retry)
1952                         break;
1953         }
1954
1955         if (NT_STATUS_IS_OK(result)) {
1956                 bool seal_pipes = true;
1957
1958                 winbindd_set_locator_kdc_envs(domain);
1959
1960                 if (domain->online == False) {
1961                         /* We're changing state from offline to online. */
1962                         set_global_winbindd_state_online();
1963                 }
1964                 set_domain_online(domain);
1965
1966                 /*
1967                  * Much as I hate global state, this seems to be the point
1968                  * where we can be certain that we have a proper connection to
1969                  * a DC. wbinfo --dc-info needs that information, store it in
1970                  * gencache with a looong timeout. This will need revisiting
1971                  * once we start to connect to multiple DCs, wbcDcInfo is
1972                  * already prepared for that.
1973                  */
1974                 store_current_dc_in_gencache(domain->name, domain->dcname,
1975                                              new_conn->cli);
1976
1977                 seal_pipes = lp_winbind_sealed_pipes();
1978                 seal_pipes = lp_parm_bool(-1, "winbind sealed pipes",
1979                                           domain->name,
1980                                           seal_pipes);
1981
1982                 if (seal_pipes) {
1983                         new_conn->auth_level = DCERPC_AUTH_LEVEL_PRIVACY;
1984                 } else {
1985                         new_conn->auth_level = DCERPC_AUTH_LEVEL_INTEGRITY;
1986                 }
1987         } else {
1988                 /* Ensure we setup the retry handler. */
1989                 set_domain_offline(domain);
1990         }
1991
1992         talloc_destroy(mem_ctx);
1993         return result;
1994 }
1995
1996 /* Close down all open pipes on a connection. */
1997
1998 void invalidate_cm_connection(struct winbindd_domain *domain)
1999 {
2000         NTSTATUS result;
2001         struct winbindd_cm_conn *conn = &domain->conn;
2002
2003         /* We're closing down a possibly dead
2004            connection. Don't have impossibly long (10s) timeouts. */
2005
2006         if (conn->cli) {
2007                 cli_set_timeout(conn->cli, 1000); /* 1 second. */
2008         }
2009
2010         if (conn->samr_pipe != NULL) {
2011                 if (is_valid_policy_hnd(&conn->sam_connect_handle)) {
2012                         dcerpc_samr_Close(conn->samr_pipe->binding_handle,
2013                                           talloc_tos(),
2014                                           &conn->sam_connect_handle,
2015                                           &result);
2016                 }
2017                 TALLOC_FREE(conn->samr_pipe);
2018                 /* Ok, it must be dead. Drop timeout to 0.5 sec. */
2019                 if (conn->cli) {
2020                         cli_set_timeout(conn->cli, 500);
2021                 }
2022         }
2023
2024         if (conn->lsa_pipe != NULL) {
2025                 if (is_valid_policy_hnd(&conn->lsa_policy)) {
2026                         dcerpc_lsa_Close(conn->lsa_pipe->binding_handle,
2027                                          talloc_tos(),
2028                                          &conn->lsa_policy,
2029                                          &result);
2030                 }
2031                 TALLOC_FREE(conn->lsa_pipe);
2032                 /* Ok, it must be dead. Drop timeout to 0.5 sec. */
2033                 if (conn->cli) {
2034                         cli_set_timeout(conn->cli, 500);
2035                 }
2036         }
2037
2038         if (conn->lsa_pipe_tcp != NULL) {
2039                 if (is_valid_policy_hnd(&conn->lsa_policy)) {
2040                         dcerpc_lsa_Close(conn->lsa_pipe_tcp->binding_handle,
2041                                          talloc_tos(),
2042                                          &conn->lsa_policy,
2043                                          &result);
2044                 }
2045                 TALLOC_FREE(conn->lsa_pipe_tcp);
2046                 /* Ok, it must be dead. Drop timeout to 0.5 sec. */
2047                 if (conn->cli) {
2048                         cli_set_timeout(conn->cli, 500);
2049                 }
2050         }
2051
2052         if (conn->netlogon_pipe != NULL) {
2053                 TALLOC_FREE(conn->netlogon_pipe);
2054                 /* Ok, it must be dead. Drop timeout to 0.5 sec. */
2055                 if (conn->cli) {
2056                         cli_set_timeout(conn->cli, 500);
2057                 }
2058         }
2059
2060         conn->auth_level = DCERPC_AUTH_LEVEL_PRIVACY;
2061         conn->netlogon_force_reauth = false;
2062         conn->netlogon_flags = 0;
2063         TALLOC_FREE(conn->netlogon_creds);
2064
2065         if (conn->cli) {
2066                 cli_shutdown(conn->cli);
2067         }
2068
2069         conn->cli = NULL;
2070 }
2071
2072 void close_conns_after_fork(void)
2073 {
2074         struct winbindd_domain *domain;
2075         struct winbindd_cli_state *cli_state;
2076
2077         for (domain = domain_list(); domain; domain = domain->next) {
2078                 /*
2079                  * first close the low level SMB TCP connection
2080                  * so that we don't generate any SMBclose
2081                  * requests in invalidate_cm_connection()
2082                  */
2083                 if (cli_state_is_connected(domain->conn.cli)) {
2084                         smbXcli_conn_disconnect(domain->conn.cli->conn, NT_STATUS_OK);
2085                 }
2086
2087                 invalidate_cm_connection(domain);
2088         }
2089
2090         for (cli_state = winbindd_client_list();
2091              cli_state != NULL;
2092              cli_state = cli_state->next) {
2093                 if (cli_state->sock >= 0) {
2094                         close(cli_state->sock);
2095                         cli_state->sock = -1;
2096                 }
2097         }
2098 }
2099
2100 static bool connection_ok(struct winbindd_domain *domain)
2101 {
2102         bool ok;
2103
2104         ok = cli_state_is_connected(domain->conn.cli);
2105         if (!ok) {
2106                 DEBUG(3, ("connection_ok: Connection to %s for domain %s is not connected\n",
2107                           domain->dcname, domain->name));
2108                 return False;
2109         }
2110
2111         if (domain->online == False) {
2112                 DEBUG(3, ("connection_ok: Domain %s is offline\n", domain->name));
2113                 return False;
2114         }
2115
2116         return True;
2117 }
2118
2119 /* Initialize a new connection up to the RPC BIND.
2120    Bypass online status check so always does network calls. */
2121
2122 static NTSTATUS init_dc_connection_network(struct winbindd_domain *domain, bool need_rw_dc)
2123 {
2124         NTSTATUS result;
2125         bool skip_connection = domain->internal;
2126         if (need_rw_dc && domain->rodc) {
2127                 skip_connection = false;
2128         }
2129
2130         /* Internal connections never use the network. */
2131         if (dom_sid_equal(&domain->sid, &global_sid_Builtin)) {
2132                 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
2133         }
2134
2135         /* Still ask the internal LSA and SAMR server about the local domain */
2136         if (skip_connection || connection_ok(domain)) {
2137                 if (!domain->initialized) {
2138                         set_dc_type_and_flags(domain);
2139                 }
2140                 return NT_STATUS_OK;
2141         }
2142
2143         invalidate_cm_connection(domain);
2144
2145         if (!domain->primary && !domain->initialized) {
2146                 /*
2147                  * Before we connect to a trust, work out if it is an
2148                  * AD domain by asking our own domain.
2149                  */
2150                 set_dc_type_and_flags_trustinfo(domain);
2151         }
2152
2153         result = cm_open_connection(domain, &domain->conn);
2154
2155         if (NT_STATUS_IS_OK(result) && !domain->initialized) {
2156                 set_dc_type_and_flags(domain);
2157         }
2158
2159         return result;
2160 }
2161
2162 NTSTATUS init_dc_connection(struct winbindd_domain *domain, bool need_rw_dc)
2163 {
2164         if (dom_sid_equal(&domain->sid, &global_sid_Builtin)) {
2165                 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
2166         }
2167
2168         if (domain->initialized && !domain->online) {
2169                 /* We check for online status elsewhere. */
2170                 return NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
2171         }
2172
2173         return init_dc_connection_network(domain, need_rw_dc);
2174 }
2175
2176 static NTSTATUS init_dc_connection_rpc(struct winbindd_domain *domain, bool need_rw_dc)
2177 {
2178         NTSTATUS status;
2179
2180         status = init_dc_connection(domain, need_rw_dc);
2181         if (!NT_STATUS_IS_OK(status)) {
2182                 return status;
2183         }
2184
2185         if (!domain->internal && domain->conn.cli == NULL) {
2186                 /* happens for trusted domains without inbound trust */
2187                 return NT_STATUS_TRUSTED_DOMAIN_FAILURE;
2188         }
2189
2190         return NT_STATUS_OK;
2191 }
2192
2193 /******************************************************************************
2194  Set the trust flags (direction and forest location) for a domain
2195 ******************************************************************************/
2196
2197 static bool set_dc_type_and_flags_trustinfo( struct winbindd_domain *domain )
2198 {
2199         struct winbindd_domain *our_domain;
2200         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
2201         WERROR werr;
2202         struct netr_DomainTrustList trusts;
2203         int i;
2204         uint32 flags = (NETR_TRUST_FLAG_IN_FOREST |
2205                         NETR_TRUST_FLAG_OUTBOUND |
2206                         NETR_TRUST_FLAG_INBOUND);
2207         struct rpc_pipe_client *cli;
2208         TALLOC_CTX *mem_ctx = NULL;
2209         struct dcerpc_binding_handle *b;
2210
2211         DEBUG(5, ("set_dc_type_and_flags_trustinfo: domain %s\n", domain->name ));
2212
2213         /* Our primary domain doesn't need to worry about trust flags.
2214            Force it to go through the network setup */
2215         if ( domain->primary ) {
2216                 return False;
2217         }
2218
2219         mem_ctx = talloc_stackframe();
2220         our_domain = find_our_domain();
2221         if (our_domain->internal) {
2222                 result = init_dc_connection(our_domain, false);
2223                 if (!NT_STATUS_IS_OK(result)) {
2224                         DEBUG(3,("set_dc_type_and_flags_trustinfo: "
2225                                  "Not able to make a connection to our domain: %s\n",
2226                                   nt_errstr(result)));
2227                         TALLOC_FREE(mem_ctx);
2228                         return false;
2229                 }
2230         }
2231
2232         /* This won't work unless our domain is AD */
2233         if ( !our_domain->active_directory ) {
2234                 TALLOC_FREE(mem_ctx);
2235                 return False;
2236         }
2237
2238         if (our_domain->internal) {
2239                 result = wb_open_internal_pipe(mem_ctx, &ndr_table_netlogon, &cli);
2240         } else if (!connection_ok(our_domain)) {
2241                 DEBUG(3,("set_dc_type_and_flags_trustinfo: "
2242                          "No connection to our domain!\n"));
2243                 TALLOC_FREE(mem_ctx);
2244                 return False;
2245         } else {
2246                 result = cm_connect_netlogon(our_domain, &cli);
2247         }
2248
2249         if (!NT_STATUS_IS_OK(result)) {
2250                 DEBUG(5, ("set_dc_type_and_flags_trustinfo: Could not open "
2251                           "a connection to %s for PIPE_NETLOGON (%s)\n",
2252                           domain->name, nt_errstr(result)));
2253                 TALLOC_FREE(mem_ctx);
2254                 return False;
2255         }
2256         b = cli->binding_handle;
2257
2258         /* Use DsEnumerateDomainTrusts to get us the trust direction and type. */
2259         result = dcerpc_netr_DsrEnumerateDomainTrusts(b, mem_ctx,
2260                                                       cli->desthost,
2261                                                       flags,
2262                                                       &trusts,
2263                                                       &werr);
2264         if (!NT_STATUS_IS_OK(result)) {
2265                 DEBUG(0,("set_dc_type_and_flags_trustinfo: "
2266                         "failed to query trusted domain list: %s\n",
2267                         nt_errstr(result)));
2268                 TALLOC_FREE(mem_ctx);
2269                 return false;
2270         }
2271         if (!W_ERROR_IS_OK(werr)) {
2272                 DEBUG(0,("set_dc_type_and_flags_trustinfo: "
2273                         "failed to query trusted domain list: %s\n",
2274                         win_errstr(werr)));
2275                 TALLOC_FREE(mem_ctx);
2276                 return false;
2277         }
2278
2279         /* Now find the domain name and get the flags */
2280
2281         for ( i=0; i<trusts.count; i++ ) {
2282                 if ( strequal( domain->name, trusts.array[i].netbios_name) ) {
2283                         domain->domain_flags          = trusts.array[i].trust_flags;
2284                         domain->domain_type           = trusts.array[i].trust_type;
2285                         domain->domain_trust_attribs  = trusts.array[i].trust_attributes;
2286
2287                         if ( domain->domain_type == LSA_TRUST_TYPE_UPLEVEL )
2288                                 domain->active_directory = True;
2289
2290                         /* This flag is only set if the domain is *our*
2291                            primary domain and the primary domain is in
2292                            native mode */
2293
2294                         domain->native_mode = (domain->domain_flags & NETR_TRUST_FLAG_NATIVE);
2295
2296                         DEBUG(5, ("set_dc_type_and_flags_trustinfo: domain %s is %sin "
2297                                   "native mode.\n", domain->name,
2298                                   domain->native_mode ? "" : "NOT "));
2299
2300                         DEBUG(5,("set_dc_type_and_flags_trustinfo: domain %s is %s"
2301                                  "running active directory.\n", domain->name,
2302                                  domain->active_directory ? "" : "NOT "));
2303
2304                         domain->can_do_ncacn_ip_tcp = domain->active_directory;
2305
2306                         domain->initialized = True;
2307
2308                         break;
2309                 }
2310         }
2311
2312         TALLOC_FREE(mem_ctx);
2313
2314         return domain->initialized;
2315 }
2316
2317 /******************************************************************************
2318  We can 'sense' certain things about the DC by it's replies to certain
2319  questions.
2320
2321  This tells us if this particular remote server is Active Directory, and if it
2322  is native mode.
2323 ******************************************************************************/
2324
2325 static void set_dc_type_and_flags_connect( struct winbindd_domain *domain )
2326 {
2327         NTSTATUS status, result;
2328         WERROR werr;
2329         TALLOC_CTX              *mem_ctx = NULL;
2330         struct rpc_pipe_client  *cli = NULL;
2331         struct policy_handle pol;
2332         union dssetup_DsRoleInfo info;
2333         union lsa_PolicyInformation *lsa_info = NULL;
2334
2335         if (!domain->internal && !connection_ok(domain)) {
2336                 return;
2337         }
2338
2339         mem_ctx = talloc_init("set_dc_type_and_flags on domain %s\n",
2340                               domain->name);
2341         if (!mem_ctx) {
2342                 DEBUG(1, ("set_dc_type_and_flags_connect: talloc_init() failed\n"));
2343                 return;
2344         }
2345
2346         DEBUG(5, ("set_dc_type_and_flags_connect: domain %s\n", domain->name ));
2347
2348         if (domain->internal) {
2349                 status = wb_open_internal_pipe(mem_ctx,
2350                                                &ndr_table_dssetup,
2351                                                &cli);
2352         } else {
2353                 status = cli_rpc_pipe_open_noauth(domain->conn.cli,
2354                                                   &ndr_table_dssetup,
2355                                                   &cli);
2356         }
2357
2358         if (!NT_STATUS_IS_OK(status)) {
2359                 DEBUG(5, ("set_dc_type_and_flags_connect: Could not bind to "
2360                           "PI_DSSETUP on domain %s: (%s)\n",
2361                           domain->name, nt_errstr(status)));
2362
2363                 /* if this is just a non-AD domain we need to continue
2364                  * identifying so that we can in the end return with
2365                  * domain->initialized = True - gd */
2366
2367                 goto no_dssetup;
2368         }
2369
2370         status = dcerpc_dssetup_DsRoleGetPrimaryDomainInformation(cli->binding_handle, mem_ctx,
2371                                                                   DS_ROLE_BASIC_INFORMATION,
2372                                                                   &info,
2373                                                                   &werr);
2374         TALLOC_FREE(cli);
2375
2376         if (NT_STATUS_IS_OK(status)) {
2377                 result = werror_to_ntstatus(werr);
2378         }
2379         if (!NT_STATUS_IS_OK(status)) {
2380                 DEBUG(5, ("set_dc_type_and_flags_connect: rpccli_ds_getprimarydominfo "
2381                           "on domain %s failed: (%s)\n",
2382                           domain->name, nt_errstr(status)));
2383
2384                 /* older samba3 DCs will return DCERPC_FAULT_OP_RNG_ERROR for
2385                  * every opcode on the DSSETUP pipe, continue with
2386                  * no_dssetup mode here as well to get domain->initialized
2387                  * set - gd */
2388
2389                 if (NT_STATUS_EQUAL(status, NT_STATUS_RPC_PROCNUM_OUT_OF_RANGE)) {
2390                         goto no_dssetup;
2391                 }
2392
2393                 TALLOC_FREE(mem_ctx);
2394                 return;
2395         }
2396
2397         if ((info.basic.flags & DS_ROLE_PRIMARY_DS_RUNNING) &&
2398             !(info.basic.flags & DS_ROLE_PRIMARY_DS_MIXED_MODE)) {
2399                 domain->native_mode = True;
2400         } else {
2401                 domain->native_mode = False;
2402         }
2403
2404 no_dssetup:
2405         if (domain->internal) {
2406                 status = wb_open_internal_pipe(mem_ctx,
2407                                                &ndr_table_lsarpc,
2408                                                &cli);
2409         } else {
2410                 status = cli_rpc_pipe_open_noauth(domain->conn.cli,
2411                                                   &ndr_table_lsarpc, &cli);
2412         }
2413         if (!NT_STATUS_IS_OK(status)) {
2414                 DEBUG(5, ("set_dc_type_and_flags_connect: Could not bind to "
2415                           "PI_LSARPC on domain %s: (%s)\n",
2416                           domain->name, nt_errstr(status)));
2417                 TALLOC_FREE(cli);
2418                 TALLOC_FREE(mem_ctx);
2419                 return;
2420         }
2421
2422         status = rpccli_lsa_open_policy2(cli, mem_ctx, True,
2423                                          SEC_FLAG_MAXIMUM_ALLOWED, &pol);
2424
2425         if (NT_STATUS_IS_OK(status)) {
2426                 /* This particular query is exactly what Win2k clients use
2427                    to determine that the DC is active directory */
2428                 status = dcerpc_lsa_QueryInfoPolicy2(cli->binding_handle, mem_ctx,
2429                                                      &pol,
2430                                                      LSA_POLICY_INFO_DNS,
2431                                                      &lsa_info,
2432                                                      &result);
2433         }
2434
2435         if (NT_STATUS_IS_OK(status) && NT_STATUS_IS_OK(result)) {
2436                 domain->active_directory = True;
2437
2438                 if (lsa_info->dns.name.string) {
2439                         if (!strequal(domain->name, lsa_info->dns.name.string))
2440                         {
2441                                 DEBUG(1, ("set_dc_type_and_flags_connect: DC "
2442                                           "for domain %s claimed it was a DC "
2443                                           "for domain %s, refusing to "
2444                                           "initialize\n",
2445                                           domain->name,
2446                                           lsa_info->dns.name.string));
2447                                 TALLOC_FREE(cli);
2448                                 TALLOC_FREE(mem_ctx);
2449                                 return;
2450                         }
2451                         talloc_free(domain->name);
2452                         domain->name = talloc_strdup(domain,
2453                                                      lsa_info->dns.name.string);
2454                         if (domain->name == NULL) {
2455                                 goto done;
2456                         }
2457                 }
2458
2459                 if (lsa_info->dns.dns_domain.string) {
2460                         if (domain->alt_name != NULL &&
2461                             !strequal(domain->alt_name,
2462                                       lsa_info->dns.dns_domain.string))
2463                         {
2464                                 DEBUG(1, ("set_dc_type_and_flags_connect: DC "
2465                                           "for domain %s (%s) claimed it was "
2466                                           "a DC for domain %s, refusing to "
2467                                           "initialize\n",
2468                                           domain->alt_name, domain->name,
2469                                           lsa_info->dns.dns_domain.string));
2470                                 TALLOC_FREE(cli);
2471                                 TALLOC_FREE(mem_ctx);
2472                                 return;
2473                         }
2474                         talloc_free(domain->alt_name);
2475                         domain->alt_name =
2476                                 talloc_strdup(domain,
2477                                               lsa_info->dns.dns_domain.string);
2478                         if (domain->alt_name == NULL) {
2479                                 goto done;
2480                         }
2481                 }
2482
2483                 /* See if we can set some domain trust flags about
2484                    ourself */
2485
2486                 if (lsa_info->dns.dns_forest.string) {
2487                         talloc_free(domain->forest_name);
2488                         domain->forest_name =
2489                                 talloc_strdup(domain,
2490                                               lsa_info->dns.dns_forest.string);
2491                         if (domain->forest_name == NULL) {
2492                                 goto done;
2493                         }
2494
2495                         if (strequal(domain->forest_name, domain->alt_name)) {
2496                                 domain->domain_flags |= NETR_TRUST_FLAG_TREEROOT;
2497                         }
2498                 }
2499
2500                 if (lsa_info->dns.sid) {
2501                         if (!is_null_sid(&domain->sid) &&
2502                             !dom_sid_equal(&domain->sid,
2503                                            lsa_info->dns.sid))
2504                         {
2505                                 DEBUG(1, ("set_dc_type_and_flags_connect: DC "
2506                                           "for domain %s (%s) claimed it was "
2507                                           "a DC for domain %s, refusing to "
2508                                           "initialize\n",
2509                                           dom_sid_string(talloc_tos(),
2510                                                          &domain->sid),
2511                                           domain->name,
2512                                           dom_sid_string(talloc_tos(),
2513                                                          lsa_info->dns.sid)));
2514                                 TALLOC_FREE(cli);
2515                                 TALLOC_FREE(mem_ctx);
2516                                 return;
2517                         }
2518                         sid_copy(&domain->sid, lsa_info->dns.sid);
2519                 }
2520         } else {
2521                 domain->active_directory = False;
2522
2523                 status = rpccli_lsa_open_policy(cli, mem_ctx, True,
2524                                                 SEC_FLAG_MAXIMUM_ALLOWED,
2525                                                 &pol);
2526
2527                 if (!NT_STATUS_IS_OK(status)) {
2528                         goto done;
2529                 }
2530
2531                 status = dcerpc_lsa_QueryInfoPolicy(cli->binding_handle, mem_ctx,
2532                                                     &pol,
2533                                                     LSA_POLICY_INFO_ACCOUNT_DOMAIN,
2534                                                     &lsa_info,
2535                                                     &result);
2536                 if (NT_STATUS_IS_OK(status) && NT_STATUS_IS_OK(result)) {
2537
2538                         if (lsa_info->account_domain.name.string) {
2539                                 if (!strequal(domain->name,
2540                                         lsa_info->account_domain.name.string))
2541                                 {
2542                                         DEBUG(1,
2543                                               ("set_dc_type_and_flags_connect: "
2544                                                "DC for domain %s claimed it was"
2545                                                " a DC for domain %s, refusing "
2546                                                "to initialize\n", domain->name,
2547                                                lsa_info->
2548                                                 account_domain.name.string));
2549                                         TALLOC_FREE(cli);
2550                                         TALLOC_FREE(mem_ctx);
2551                                         return;
2552                                 }
2553                                 talloc_free(domain->name);
2554                                 domain->name =
2555                                         talloc_strdup(domain,
2556                                                       lsa_info->account_domain.name.string);
2557                         }
2558
2559                         if (lsa_info->account_domain.sid) {
2560                                 if (!is_null_sid(&domain->sid) &&
2561                                     !dom_sid_equal(&domain->sid,
2562                                                 lsa_info->account_domain.sid))
2563                                 {
2564                                         DEBUG(1,
2565                                               ("set_dc_type_and_flags_connect: "
2566                                                "DC for domain %s (%s) claimed "
2567                                                "it was a DC for domain %s, "
2568                                                "refusing to initialize\n",
2569                                                dom_sid_string(talloc_tos(),
2570                                                               &domain->sid),
2571                                                domain->name,
2572                                                dom_sid_string(talloc_tos(),
2573                                                 lsa_info->account_domain.sid)));
2574                                         TALLOC_FREE(cli);
2575                                         TALLOC_FREE(mem_ctx);
2576                                         return;
2577                                 }
2578                                 sid_copy(&domain->sid, lsa_info->account_domain.sid);
2579                         }
2580                 }
2581         }
2582 done:
2583
2584         DEBUG(5, ("set_dc_type_and_flags_connect: domain %s is %sin native mode.\n",
2585                   domain->name, domain->native_mode ? "" : "NOT "));
2586
2587         DEBUG(5,("set_dc_type_and_flags_connect: domain %s is %srunning active directory.\n",
2588                   domain->name, domain->active_directory ? "" : "NOT "));
2589
2590         domain->can_do_ncacn_ip_tcp = domain->active_directory;
2591
2592         TALLOC_FREE(cli);
2593
2594         TALLOC_FREE(mem_ctx);
2595
2596         domain->initialized = True;
2597 }
2598
2599 /**********************************************************************
2600  Set the domain_flags (trust attributes, domain operating modes, etc...
2601 ***********************************************************************/
2602
2603 static void set_dc_type_and_flags( struct winbindd_domain *domain )
2604 {
2605         /* we always have to contact our primary domain */
2606
2607         if ( domain->primary || domain->internal) {
2608                 DEBUG(10,("set_dc_type_and_flags: setting up flags for "
2609                           "primary or internal domain\n"));
2610                 set_dc_type_and_flags_connect( domain );
2611                 return;
2612         }
2613
2614         /* Use our DC to get the information if possible */
2615
2616         if ( !set_dc_type_and_flags_trustinfo( domain ) ) {
2617                 /* Otherwise, fallback to contacting the
2618                    domain directly */
2619                 set_dc_type_and_flags_connect( domain );
2620         }
2621
2622         return;
2623 }
2624
2625
2626
2627 /**********************************************************************
2628 ***********************************************************************/
2629
2630 static NTSTATUS cm_get_schannel_creds(struct winbindd_domain *domain,
2631                                    struct netlogon_creds_cli_context **ppdc)
2632 {
2633         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
2634         struct rpc_pipe_client *netlogon_pipe;
2635
2636         *ppdc = NULL;
2637
2638         if ((!IS_DC) && (!domain->primary)) {
2639                 return NT_STATUS_TRUSTED_DOMAIN_FAILURE;
2640         }
2641
2642         if (domain->conn.netlogon_creds != NULL) {
2643                 if (!(domain->conn.netlogon_flags & NETLOGON_NEG_AUTHENTICATED_RPC)) {
2644                         return NT_STATUS_TRUSTED_DOMAIN_FAILURE;
2645                 }
2646                 *ppdc = domain->conn.netlogon_creds;
2647                 return NT_STATUS_OK;
2648         }
2649
2650         result = cm_connect_netlogon(domain, &netlogon_pipe);
2651         if (!NT_STATUS_IS_OK(result)) {
2652                 return result;
2653         }
2654
2655         if (domain->conn.netlogon_creds == NULL) {
2656                 return NT_STATUS_TRUSTED_DOMAIN_FAILURE;
2657         }
2658
2659         if (!(domain->conn.netlogon_flags & NETLOGON_NEG_AUTHENTICATED_RPC)) {
2660                 return NT_STATUS_TRUSTED_DOMAIN_FAILURE;
2661         }
2662
2663         *ppdc = domain->conn.netlogon_creds;
2664         return NT_STATUS_OK;
2665 }
2666
2667 NTSTATUS cm_connect_sam(struct winbindd_domain *domain, TALLOC_CTX *mem_ctx,
2668                         bool need_rw_dc,
2669                         struct rpc_pipe_client **cli, struct policy_handle *sam_handle)
2670 {
2671         struct winbindd_cm_conn *conn;
2672         NTSTATUS status, result;
2673         struct netlogon_creds_cli_context *p_creds;
2674         struct cli_credentials *creds = NULL;
2675
2676         if (sid_check_is_our_sam(&domain->sid)) {
2677                 if (domain->rodc == false || need_rw_dc == false) {
2678                         return open_internal_samr_conn(mem_ctx, domain, cli, sam_handle);
2679                 }
2680         }
2681
2682         status = init_dc_connection_rpc(domain, need_rw_dc);
2683         if (!NT_STATUS_IS_OK(status)) {
2684                 return status;
2685         }
2686
2687         conn = &domain->conn;
2688
2689         if (rpccli_is_connected(conn->samr_pipe)) {
2690                 goto done;
2691         }
2692
2693         TALLOC_FREE(conn->samr_pipe);
2694
2695         /*
2696          * No SAMR pipe yet. Attempt to get an NTLMSSP SPNEGO authenticated
2697          * sign and sealed pipe using the machine account password by
2698          * preference. If we can't - try schannel, if that fails, try
2699          * anonymous.
2700          */
2701
2702         result = get_trust_credentials(domain, talloc_tos(), false, &creds);
2703         if (!NT_STATUS_IS_OK(result)) {
2704                 DEBUG(10, ("cm_connect_sam: No user available for "
2705                            "domain %s, trying schannel\n", domain->name));
2706                 goto schannel;
2707         }
2708
2709         if (cli_credentials_is_anonymous(creds)) {
2710                 goto anonymous;
2711         }
2712
2713         /*
2714          * We have an authenticated connection. Use a SPNEGO
2715          * authenticated SAMR pipe with sign & seal.
2716          */
2717         status = cli_rpc_pipe_open_with_creds(conn->cli,
2718                                               &ndr_table_samr,
2719                                               NCACN_NP,
2720                                               DCERPC_AUTH_TYPE_SPNEGO,
2721                                               conn->auth_level,
2722                                               smbXcli_conn_remote_name(conn->cli->conn),
2723                                               creds,
2724                                               &conn->samr_pipe);
2725         if (!NT_STATUS_IS_OK(status)) {
2726                 DEBUG(10,("cm_connect_sam: failed to connect to SAMR "
2727                           "pipe for domain %s using NTLMSSP "
2728                           "authenticated pipe: user %s. Error was "
2729                           "%s\n", domain->name,
2730                           cli_credentials_get_unparsed_name(creds, talloc_tos()),
2731                           nt_errstr(status)));
2732                 goto schannel;
2733         }
2734
2735         DEBUG(10,("cm_connect_sam: connected to SAMR pipe for "
2736                   "domain %s using NTLMSSP authenticated "
2737                   "pipe: user %s\n", domain->name,
2738                   cli_credentials_get_unparsed_name(creds, talloc_tos())));
2739
2740         status = dcerpc_samr_Connect2(conn->samr_pipe->binding_handle, mem_ctx,
2741                                       conn->samr_pipe->desthost,
2742                                       SEC_FLAG_MAXIMUM_ALLOWED,
2743                                       &conn->sam_connect_handle,
2744                                       &result);
2745         if (NT_STATUS_IS_OK(status) && NT_STATUS_IS_OK(result)) {
2746                 goto open_domain;
2747         }
2748         if (NT_STATUS_IS_OK(status)) {
2749                 status = result;
2750         }
2751
2752         DEBUG(10,("cm_connect_sam: ntlmssp-sealed dcerpc_samr_Connect2 "
2753                   "failed for domain %s, error was %s. Trying schannel\n",
2754                   domain->name, nt_errstr(status) ));
2755         TALLOC_FREE(conn->samr_pipe);
2756
2757  schannel:
2758
2759         /* Fall back to schannel if it's a W2K pre-SP1 box. */
2760
2761         status = cm_get_schannel_creds(domain, &p_creds);
2762         if (!NT_STATUS_IS_OK(status)) {
2763                 /* If this call fails - conn->cli can now be NULL ! */
2764                 DEBUG(10, ("cm_connect_sam: Could not get schannel auth info "
2765                            "for domain %s (error %s), trying anon\n",
2766                         domain->name,
2767                         nt_errstr(status) ));
2768                 goto anonymous;
2769         }
2770         TALLOC_FREE(creds);
2771         result = get_trust_credentials(domain, talloc_tos(), true, &creds);
2772         if (!NT_STATUS_IS_OK(result)) {
2773                 DEBUG(10, ("cm_connect_sam: No user available for "
2774                            "domain %s (error %s), trying anon\n", domain->name,
2775                            nt_errstr(result)));
2776                 goto anonymous;
2777         }
2778         status = cli_rpc_pipe_open_schannel_with_creds
2779                 (conn->cli, &ndr_table_samr, NCACN_NP,
2780                  creds, p_creds, &conn->samr_pipe);
2781
2782         if (!NT_STATUS_IS_OK(status)) {
2783                 DEBUG(10,("cm_connect_sam: failed to connect to SAMR pipe for "
2784                           "domain %s using schannel. Error was %s\n",
2785                           domain->name, nt_errstr(status) ));
2786                 goto anonymous;
2787         }
2788         DEBUG(10,("cm_connect_sam: connected to SAMR pipe for domain %s using "
2789                   "schannel.\n", domain->name ));
2790
2791         status = dcerpc_samr_Connect2(conn->samr_pipe->binding_handle, mem_ctx,
2792                                       conn->samr_pipe->desthost,
2793                                       SEC_FLAG_MAXIMUM_ALLOWED,
2794                                       &conn->sam_connect_handle,
2795                                       &result);
2796         if (NT_STATUS_IS_OK(status) && NT_STATUS_IS_OK(result)) {
2797                 goto open_domain;
2798         }
2799         if (NT_STATUS_IS_OK(status)) {
2800                 status = result;
2801         }
2802         DEBUG(10,("cm_connect_sam: schannel-sealed dcerpc_samr_Connect2 failed "
2803                   "for domain %s, error was %s. Trying anonymous\n",
2804                   domain->name, nt_errstr(status) ));
2805         TALLOC_FREE(conn->samr_pipe);
2806
2807  anonymous:
2808
2809         /* Finally fall back to anonymous. */
2810         if (lp_winbind_sealed_pipes() || lp_require_strong_key()) {
2811                 status = NT_STATUS_DOWNGRADE_DETECTED;
2812                 DEBUG(1, ("Unwilling to make SAMR connection to domain %s"
2813                           "without connection level security, "
2814                           "must set 'winbind sealed pipes = false' and "
2815                           "'require strong key = false' to proceed: %s\n",
2816                           domain->name, nt_errstr(status)));
2817                 goto done;
2818         }
2819         status = cli_rpc_pipe_open_noauth(conn->cli, &ndr_table_samr,
2820                                           &conn->samr_pipe);
2821
2822         if (!NT_STATUS_IS_OK(status)) {
2823                 goto done;
2824         }
2825
2826         status = dcerpc_samr_Connect2(conn->samr_pipe->binding_handle, mem_ctx,
2827                                       conn->samr_pipe->desthost,
2828                                       SEC_FLAG_MAXIMUM_ALLOWED,
2829                                       &conn->sam_connect_handle,
2830                                       &result);
2831         if (!NT_STATUS_IS_OK(status)) {
2832                 DEBUG(10,("cm_connect_sam: rpccli_samr_Connect2 failed "
2833                           "for domain %s Error was %s\n",
2834                           domain->name, nt_errstr(status) ));
2835                 goto done;
2836         }
2837         if (!NT_STATUS_IS_OK(result)) {
2838                 status = result;
2839                 DEBUG(10,("cm_connect_sam: dcerpc_samr_Connect2 failed "
2840                           "for domain %s Error was %s\n",
2841                           domain->name, nt_errstr(result)));
2842                 goto done;
2843         }
2844
2845  open_domain:
2846         status = dcerpc_samr_OpenDomain(conn->samr_pipe->binding_handle,
2847                                         mem_ctx,
2848                                         &conn->sam_connect_handle,
2849                                         SEC_FLAG_MAXIMUM_ALLOWED,
2850                                         &domain->sid,
2851                                         &conn->sam_domain_handle,
2852                                         &result);
2853         if (!NT_STATUS_IS_OK(status)) {
2854                 goto done;
2855         }
2856
2857         status = result;
2858  done:
2859
2860         if (NT_STATUS_EQUAL(status, NT_STATUS_ACCESS_DENIED)) {
2861                 /*
2862                  * if we got access denied, we might just have no access rights
2863                  * to talk to the remote samr server server (e.g. when we are a
2864                  * PDC and we are connecting a w2k8 pdc via an interdomain
2865                  * trust). In that case do not invalidate the whole connection
2866                  * stack
2867                  */
2868                 TALLOC_FREE(conn->samr_pipe);
2869                 ZERO_STRUCT(conn->sam_domain_handle);
2870                 return status;
2871         } else if (!NT_STATUS_IS_OK(status)) {
2872                 invalidate_cm_connection(domain);
2873                 return status;
2874         }
2875
2876         *cli = conn->samr_pipe;
2877         *sam_handle = conn->sam_domain_handle;
2878         return status;
2879 }
2880
2881 /**********************************************************************
2882  open an schanneld ncacn_ip_tcp connection to LSA
2883 ***********************************************************************/
2884
2885 static NTSTATUS cm_connect_lsa_tcp(struct winbindd_domain *domain,
2886                                    TALLOC_CTX *mem_ctx,
2887                                    struct rpc_pipe_client **cli)
2888 {
2889         struct winbindd_cm_conn *conn;
2890         struct netlogon_creds_cli_context *p_creds = NULL;
2891         struct cli_credentials *creds = NULL;
2892         NTSTATUS status;
2893
2894         DEBUG(10,("cm_connect_lsa_tcp\n"));
2895
2896         status = init_dc_connection_rpc(domain, false);
2897         if (!NT_STATUS_IS_OK(status)) {
2898                 return status;
2899         }
2900
2901         conn = &domain->conn;
2902
2903         if (conn->lsa_pipe_tcp &&
2904             conn->lsa_pipe_tcp->transport->transport == NCACN_IP_TCP &&
2905             conn->lsa_pipe_tcp->auth->auth_level >= DCERPC_AUTH_LEVEL_INTEGRITY &&
2906             rpccli_is_connected(conn->lsa_pipe_tcp)) {
2907                 goto done;
2908         }
2909
2910         TALLOC_FREE(conn->lsa_pipe_tcp);
2911
2912         status = cm_get_schannel_creds(domain, &p_creds);
2913         if (!NT_STATUS_IS_OK(status)) {
2914                 goto done;
2915         }
2916
2917         status = get_trust_credentials(domain, talloc_tos(), true, &creds);
2918         if (!NT_STATUS_IS_OK(status)) {
2919                 goto done;
2920         }
2921
2922         status = cli_rpc_pipe_open_schannel_with_creds(conn->cli,
2923                                                        &ndr_table_lsarpc,
2924                                                        NCACN_IP_TCP,
2925                                                        creds,
2926                                                        p_creds,
2927                                                        &conn->lsa_pipe_tcp);
2928         if (!NT_STATUS_IS_OK(status)) {
2929                 DEBUG(10,("cli_rpc_pipe_open_schannel_with_key failed: %s\n",
2930                         nt_errstr(status)));
2931                 goto done;
2932         }
2933
2934  done:
2935         if (!NT_STATUS_IS_OK(status)) {
2936                 TALLOC_FREE(conn->lsa_pipe_tcp);
2937                 return status;
2938         }
2939
2940         *cli = conn->lsa_pipe_tcp;
2941
2942         return status;
2943 }
2944
2945 NTSTATUS cm_connect_lsa(struct winbindd_domain *domain, TALLOC_CTX *mem_ctx,
2946                         struct rpc_pipe_client **cli, struct policy_handle *lsa_policy)
2947 {
2948         struct winbindd_cm_conn *conn;
2949         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
2950         struct netlogon_creds_cli_context *p_creds;
2951         struct cli_credentials *creds = NULL;
2952
2953         result = init_dc_connection_rpc(domain, false);
2954         if (!NT_STATUS_IS_OK(result))
2955                 return result;
2956
2957         conn = &domain->conn;
2958
2959         if (rpccli_is_connected(conn->lsa_pipe)) {
2960                 goto done;
2961         }
2962
2963         TALLOC_FREE(conn->lsa_pipe);
2964
2965         result = get_trust_credentials(domain, talloc_tos(), false, &creds);
2966         if (!NT_STATUS_IS_OK(result)) {
2967                 DEBUG(10, ("cm_connect_lsa: No user available for "
2968                            "domain %s, trying schannel\n", domain->name));
2969                 goto schannel;
2970         }
2971
2972         if (cli_credentials_is_anonymous(creds)) {
2973                 goto anonymous;
2974         }
2975
2976         /*
2977          * We have an authenticated connection. Use a SPNEGO
2978          * authenticated LSA pipe with sign & seal.
2979          */
2980         result = cli_rpc_pipe_open_with_creds
2981                 (conn->cli, &ndr_table_lsarpc, NCACN_NP,
2982                  DCERPC_AUTH_TYPE_SPNEGO,
2983                  conn->auth_level,
2984                  smbXcli_conn_remote_name(conn->cli->conn),
2985                  creds,
2986                  &conn->lsa_pipe);
2987         if (!NT_STATUS_IS_OK(result)) {
2988                 DEBUG(10,("cm_connect_lsa: failed to connect to LSA pipe for "
2989                           "domain %s using NTLMSSP authenticated pipe: user "
2990                           "%s. Error was %s. Trying schannel.\n",
2991                           domain->name,
2992                           cli_credentials_get_unparsed_name(creds, talloc_tos()),
2993                           nt_errstr(result)));
2994                 goto schannel;
2995         }
2996
2997         DEBUG(10,("cm_connect_lsa: connected to LSA pipe for domain %s using "
2998                   "NTLMSSP authenticated pipe: user %s\n",
2999                   domain->name, cli_credentials_get_unparsed_name(creds, talloc_tos())));
3000
3001         result = rpccli_lsa_open_policy(conn->lsa_pipe, mem_ctx, True,
3002                                         SEC_FLAG_MAXIMUM_ALLOWED,
3003                                         &conn->lsa_policy);
3004         if (NT_STATUS_IS_OK(result)) {
3005                 goto done;
3006         }
3007
3008         DEBUG(10,("cm_connect_lsa: rpccli_lsa_open_policy failed, trying "
3009                   "schannel\n"));
3010
3011         TALLOC_FREE(conn->lsa_pipe);
3012
3013  schannel:
3014
3015         /* Fall back to schannel if it's a W2K pre-SP1 box. */
3016
3017         result = cm_get_schannel_creds(domain, &p_creds);
3018         if (!NT_STATUS_IS_OK(result)) {
3019                 /* If this call fails - conn->cli can now be NULL ! */
3020                 DEBUG(10, ("cm_connect_lsa: Could not get schannel auth info "
3021                            "for domain %s (error %s), trying anon\n",
3022                         domain->name,
3023                         nt_errstr(result) ));
3024                 goto anonymous;
3025         }
3026
3027         TALLOC_FREE(creds);
3028         result = get_trust_credentials(domain, talloc_tos(), true, &creds);
3029         if (!NT_STATUS_IS_OK(result)) {
3030                 DEBUG(10, ("cm_connect_lsa: No user available for "
3031                            "domain %s (error %s), trying anon\n", domain->name,
3032                            nt_errstr(result)));
3033                 goto anonymous;
3034         }
3035         result = cli_rpc_pipe_open_schannel_with_creds
3036                 (conn->cli, &ndr_table_lsarpc, NCACN_NP,
3037                  creds, p_creds, &conn->lsa_pipe);
3038
3039         if (!NT_STATUS_IS_OK(result)) {
3040                 DEBUG(10,("cm_connect_lsa: failed to connect to LSA pipe for "
3041                           "domain %s using schannel. Error was %s\n",
3042                           domain->name, nt_errstr(result) ));
3043                 goto anonymous;
3044         }
3045         DEBUG(10,("cm_connect_lsa: connected to LSA pipe for domain %s using "
3046                   "schannel.\n", domain->name ));
3047
3048         result = rpccli_lsa_open_policy(conn->lsa_pipe, mem_ctx, True,
3049                                         SEC_FLAG_MAXIMUM_ALLOWED,
3050                                         &conn->lsa_policy);
3051         if (NT_STATUS_IS_OK(result)) {
3052                 goto done;
3053         }
3054
3055         DEBUG(10,("cm_connect_lsa: rpccli_lsa_open_policy failed, trying "
3056                   "anonymous\n"));
3057
3058         TALLOC_FREE(conn->lsa_pipe);
3059
3060  anonymous:
3061
3062         if (lp_winbind_sealed_pipes() || lp_require_strong_key()) {
3063                 result = NT_STATUS_DOWNGRADE_DETECTED;
3064                 DEBUG(1, ("Unwilling to make LSA connection to domain %s"
3065                           "without connection level security, "
3066                           "must set 'winbind sealed pipes = false' and "
3067                           "'require strong key = false' to proceed: %s\n",
3068                           domain->name, nt_errstr(result)));
3069                 goto done;
3070         }
3071
3072         result = cli_rpc_pipe_open_noauth(conn->cli,
3073                                           &ndr_table_lsarpc,
3074                                           &conn->lsa_pipe);
3075         if (!NT_STATUS_IS_OK(result)) {
3076                 goto done;
3077         }
3078
3079         result = rpccli_lsa_open_policy(conn->lsa_pipe, mem_ctx, True,
3080                                         SEC_FLAG_MAXIMUM_ALLOWED,
3081                                         &conn->lsa_policy);
3082  done:
3083         if (!NT_STATUS_IS_OK(result)) {
3084                 invalidate_cm_connection(domain);
3085                 return result;
3086         }
3087
3088         *cli = conn->lsa_pipe;
3089         *lsa_policy = conn->lsa_policy;
3090         return result;
3091 }
3092
3093 /****************************************************************************
3094 Open a LSA connection to a DC, suiteable for LSA lookup calls.
3095 ****************************************************************************/
3096
3097 NTSTATUS cm_connect_lsat(struct winbindd_domain *domain,
3098                          TALLOC_CTX *mem_ctx,
3099                          struct rpc_pipe_client **cli,
3100                          struct policy_handle *lsa_policy)
3101 {
3102         NTSTATUS status;
3103
3104         if (domain->can_do_ncacn_ip_tcp) {
3105                 status = cm_connect_lsa_tcp(domain, mem_ctx, cli);
3106                 if (NT_STATUS_EQUAL(status, NT_STATUS_ACCESS_DENIED) ||
3107                     NT_STATUS_EQUAL(status, NT_STATUS_RPC_SEC_PKG_ERROR) ||
3108                     NT_STATUS_EQUAL(status, NT_STATUS_NETWORK_ACCESS_DENIED)) {
3109                         invalidate_cm_connection(domain);
3110                         status = cm_connect_lsa_tcp(domain, mem_ctx, cli);
3111                 }
3112                 if (NT_STATUS_IS_OK(status)) {
3113                         return status;
3114                 }
3115
3116                 /*
3117                  * we tried twice to connect via ncan_ip_tcp and schannel and
3118                  * failed - maybe it is a trusted domain we can't connect to ?
3119                  * do not try tcp next time - gd
3120                  *
3121                  * This also prevents NETLOGON over TCP
3122                  */
3123                 domain->can_do_ncacn_ip_tcp = false;
3124         }
3125
3126         status = cm_connect_lsa(domain, mem_ctx, cli, lsa_policy);
3127
3128         return status;
3129 }
3130
3131 /****************************************************************************
3132  Open the netlogon pipe to this DC. Use schannel if specified in client conf.
3133  session key stored in conn->netlogon_pipe->dc->sess_key.
3134 ****************************************************************************/
3135
3136 static NTSTATUS cm_connect_netlogon_transport(struct winbindd_domain *domain,
3137                                               enum dcerpc_transport_t transport,
3138                                               struct rpc_pipe_client **cli)
3139 {
3140         struct messaging_context *msg_ctx = winbind_messaging_context();
3141         struct winbindd_cm_conn *conn;
3142         NTSTATUS result;
3143         enum netr_SchannelType sec_chan_type;
3144         struct netlogon_creds_CredentialState *netlogon_creds = NULL;
3145         struct cli_credentials *creds = NULL;
3146
3147         *cli = NULL;
3148
3149         result = init_dc_connection_rpc(domain, domain->rodc);
3150         if (!NT_STATUS_IS_OK(result)) {
3151                 return result;
3152         }
3153
3154         conn = &domain->conn;
3155
3156         if (rpccli_is_connected(conn->netlogon_pipe)) {
3157                 *cli = conn->netlogon_pipe;
3158                 return NT_STATUS_OK;
3159         }
3160
3161         TALLOC_FREE(conn->netlogon_pipe);
3162         conn->netlogon_flags = 0;
3163         TALLOC_FREE(conn->netlogon_creds);
3164
3165         result = get_trust_credentials(domain, talloc_tos(), true, &creds);
3166         if (!NT_STATUS_IS_OK(result)) {
3167                 DEBUG(10, ("cm_connect_sam: No user available for "
3168                            "domain %s when trying schannel\n", domain->name));
3169                 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
3170         }
3171
3172         if (cli_credentials_is_anonymous(creds)) {
3173                 DEBUG(1, ("get_trust_credential only gave anonymous for %s, unable to make get NETLOGON credentials\n",
3174                           domain->name));
3175                 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
3176         }
3177
3178         sec_chan_type = cli_credentials_get_secure_channel_type(creds);
3179         if (sec_chan_type == SEC_CHAN_NULL) {
3180                 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
3181                 goto no_schannel;
3182         }
3183
3184         result = rpccli_create_netlogon_creds_with_creds(creds,
3185                                                          domain->dcname,
3186                                                          msg_ctx,
3187                                                          domain,
3188                                                          &conn->netlogon_creds);
3189         if (!NT_STATUS_IS_OK(result)) {
3190                 DEBUG(1, ("rpccli_create_netlogon_creds failed for %s, "
3191                           "unable to create NETLOGON credentials: %s\n",
3192                           domain->name, nt_errstr(result)));
3193                 return result;
3194         }
3195
3196         result = rpccli_setup_netlogon_creds_with_creds(conn->cli, transport,
3197                                                 conn->netlogon_creds,
3198                                                 conn->netlogon_force_reauth,
3199                                                 creds);
3200         conn->netlogon_force_reauth = false;
3201         if (!NT_STATUS_IS_OK(result)) {
3202                 DEBUG(1, ("rpccli_setup_netlogon_creds failed for %s, "
3203                           "unable to setup NETLOGON credentials: %s\n",
3204                           domain->name, nt_errstr(result)));
3205                 return result;
3206         }
3207
3208         result = netlogon_creds_cli_get(conn->netlogon_creds,
3209                                         talloc_tos(),
3210                                         &netlogon_creds);
3211         if (!NT_STATUS_IS_OK(result)) {
3212                 DEBUG(1, ("netlogon_creds_cli_get failed for %s, "
3213                           "unable to get NETLOGON credentials: %s\n",
3214                           domain->name, nt_errstr(result)));
3215                 return result;
3216         }
3217         conn->netlogon_flags = netlogon_creds->negotiate_flags;
3218         TALLOC_FREE(netlogon_creds);
3219
3220  no_schannel:
3221         if (!(conn->netlogon_flags & NETLOGON_NEG_AUTHENTICATED_RPC)) {
3222                 if (lp_winbind_sealed_pipes() || lp_require_strong_key()) {
3223                         result = NT_STATUS_DOWNGRADE_DETECTED;
3224                         DEBUG(1, ("Unwilling to make connection to domain %s"
3225                                   "without connection level security, "
3226                                   "must set 'winbind sealed pipes = false' and "
3227                                   "'require strong key = false' to proceed: %s\n",
3228                                   domain->name, nt_errstr(result)));
3229                         invalidate_cm_connection(domain);
3230                         return result;
3231                 }
3232                 result = cli_rpc_pipe_open_noauth_transport(conn->cli,
3233                                                             transport,
3234                                                             &ndr_table_netlogon,
3235                                                             &conn->netlogon_pipe);
3236                 if (!NT_STATUS_IS_OK(result)) {
3237                         invalidate_cm_connection(domain);
3238                         return result;
3239                 }
3240
3241                 *cli = conn->netlogon_pipe;
3242                 return NT_STATUS_OK;
3243         }
3244
3245         /* Using the credentials from the first pipe, open a signed and sealed
3246            second netlogon pipe. The session key is stored in the schannel
3247            part of the new pipe auth struct.
3248         */
3249
3250         result = cli_rpc_pipe_open_schannel_with_creds(
3251                 conn->cli, &ndr_table_netlogon, transport,
3252                 creds,
3253                 conn->netlogon_creds,
3254                 &conn->netlogon_pipe);
3255         if (!NT_STATUS_IS_OK(result)) {
3256                 DEBUG(3, ("Could not open schannel'ed NETLOGON pipe. Error "
3257                           "was %s\n", nt_errstr(result)));
3258
3259                 invalidate_cm_connection(domain);
3260                 return result;
3261         }
3262
3263         *cli = conn->netlogon_pipe;
3264         return NT_STATUS_OK;
3265 }
3266
3267 /****************************************************************************
3268 Open a LSA connection to a DC, suiteable for LSA lookup calls.
3269 ****************************************************************************/
3270
3271 NTSTATUS cm_connect_netlogon(struct winbindd_domain *domain,
3272                              struct rpc_pipe_client **cli)
3273 {
3274         NTSTATUS status;
3275
3276         status = init_dc_connection_rpc(domain, domain->rodc);
3277         if (!NT_STATUS_IS_OK(status)) {
3278                 return status;
3279         }
3280
3281         if (domain->active_directory && domain->can_do_ncacn_ip_tcp) {
3282                 status = cm_connect_netlogon_transport(domain, NCACN_IP_TCP, cli);
3283                 if (NT_STATUS_EQUAL(status, NT_STATUS_ACCESS_DENIED) ||
3284                     NT_STATUS_EQUAL(status, NT_STATUS_RPC_SEC_PKG_ERROR) ||
3285                     NT_STATUS_EQUAL(status, NT_STATUS_NETWORK_ACCESS_DENIED)) {
3286                         invalidate_cm_connection(domain);
3287                         status = cm_connect_netlogon_transport(domain, NCACN_IP_TCP, cli);
3288                 }
3289                 if (NT_STATUS_IS_OK(status)) {
3290                         return status;
3291                 }
3292
3293                 /*
3294                  * we tried twice to connect via ncan_ip_tcp and schannel and
3295                  * failed - maybe it is a trusted domain we can't connect to ?
3296                  * do not try tcp next time - gd
3297                  *
3298                  * This also prevents LSA over TCP
3299                  */
3300                 domain->can_do_ncacn_ip_tcp = false;
3301         }
3302
3303         status = cm_connect_netlogon_transport(domain, NCACN_NP, cli);
3304
3305         return status;
3306 }
3307
3308 void winbind_msg_ip_dropped(struct messaging_context *msg_ctx,
3309                             void *private_data,
3310                             uint32_t msg_type,
3311                             struct server_id server_id,
3312                             DATA_BLOB *data)
3313 {
3314         struct winbindd_domain *domain;
3315         char *freeit = NULL;
3316         char *addr;
3317
3318         if ((data == NULL)
3319             || (data->data == NULL)
3320             || (data->length == 0)
3321             || (data->data[data->length-1] != '\0')) {
3322                 DEBUG(1, ("invalid msg_ip_dropped message: not a valid "
3323                           "string\n"));
3324                 return;
3325         }
3326
3327         addr = (char *)data->data;
3328         DEBUG(10, ("IP %s dropped\n", addr));
3329
3330         if (!is_ipaddress(addr)) {
3331                 char *slash;
3332                 /*
3333                  * Some code sends us ip addresses with the /netmask
3334                  * suffix
3335                  */
3336                 slash = strchr(addr, '/');
3337                 if (slash == NULL) {
3338                         DEBUG(1, ("invalid msg_ip_dropped message: %s",
3339                                   addr));
3340                         return;
3341                 }
3342                 freeit = talloc_strndup(talloc_tos(), addr, slash-addr);
3343                 if (freeit == NULL) {
3344                         DEBUG(1, ("talloc failed\n"));
3345                         return;
3346                 }
3347                 addr = freeit;
3348                 DEBUG(10, ("Stripped /netmask to IP %s\n", addr));
3349         }
3350
3351         for (domain = domain_list(); domain != NULL; domain = domain->next) {
3352                 char sockaddr[INET6_ADDRSTRLEN];
3353
3354                 if (!cli_state_is_connected(domain->conn.cli)) {
3355                         continue;
3356                 }
3357
3358                 print_sockaddr(sockaddr, sizeof(sockaddr),
3359                                smbXcli_conn_local_sockaddr(domain->conn.cli->conn));
3360
3361                 if (strequal(sockaddr, addr)) {
3362                         smbXcli_conn_disconnect(domain->conn.cli->conn, NT_STATUS_OK);
3363                 }
3364         }
3365         TALLOC_FREE(freeit);
3366 }