r17943: The horror, the horror. Add KDC site support by
[tprouty/samba.git] / source / nsswitch / winbindd_cm.c
index dc2d6cfc6f63638d1da84c3a5d916b771e7c167a..a09faaed949bc588cd1c2bb162b4059b0b2943d4 100644 (file)
@@ -3,8 +3,10 @@
 
    Winbind daemon connection manager
 
-   Copyright (C) Tim Potter 2001
-   Copyright (C) Andrew Bartlett 2002
+   Copyright (C) Tim Potter                2001
+   Copyright (C) Andrew Bartlett           2002
+   Copyright (C) Gerald (Jerry) Carter     2003-2005.
+   Copyright (C) Volker Lendecke           2004-2005
    
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
 #undef DBGC_CLASS
 #define DBGC_CLASS DBGC_WINBIND
 
-/* Global list of connections. Initially a DLIST but can become a hash
-   table or whatever later. */
-
-struct winbindd_cm_conn {
-       struct winbindd_cm_conn *prev, *next;
-       fstring domain;
-       fstring controller;
-       fstring pipe_name;
-       struct cli_state *cli;
-       POLICY_HND pol;
-};
-
-static struct winbindd_cm_conn *cm_conns = NULL;
-
-static NTSTATUS get_connection_from_cache(struct winbindd_domain *domain,
-                                         const char *pipe_name,
-                                         struct winbindd_cm_conn **conn_out);
 
 /* Choose between anonymous or authenticated connections.  We need to use
    an authenticated connection if DCs have the RestrictAnonymous registry
@@ -90,9 +75,9 @@ static NTSTATUS get_connection_from_cache(struct winbindd_domain *domain,
 
 static void cm_get_ipc_userpass(char **username, char **domain, char **password)
 {
-       *username = secrets_fetch(SECRETS_AUTH_USER, NULL);
-       *domain = secrets_fetch(SECRETS_AUTH_DOMAIN, NULL);
-       *password = secrets_fetch(SECRETS_AUTH_PASSWORD, NULL);
+       *username = (char *)secrets_fetch(SECRETS_AUTH_USER, NULL);
+       *domain = (char *)secrets_fetch(SECRETS_AUTH_DOMAIN, NULL);
+       *password = (char *)secrets_fetch(SECRETS_AUTH_PASSWORD, NULL);
        
        if (*username && **username) {
 
@@ -102,101 +87,77 @@ static void cm_get_ipc_userpass(char **username, char **domain, char **password)
                if (!*password || !**password)
                        *password = smb_xstrdup("");
 
-               DEBUG(3, ("IPC$ connections done by user %s\\%s\n", 
+               DEBUG(3, ("cm_get_ipc_userpass: Retrieved auth-user from secrets.tdb [%s\\%s]\n", 
                          *domain, *username));
 
        } else {
-               DEBUG(3, ("IPC$ connections done anonymously\n"));
+               DEBUG(3, ("cm_get_ipc_userpass: No auth-user defined\n"));
                *username = smb_xstrdup("");
                *domain = smb_xstrdup("");
                *password = smb_xstrdup("");
        }
 }
 
-/*
-  setup for schannel on any pipes opened on this connection
-*/
-static NTSTATUS setup_schannel( struct cli_state *cli, const char *domain )
-{
-       NTSTATUS ret;
-       uchar trust_password[16];
-       uint32 sec_channel_type;
-       DOM_SID sid;
-       time_t lct;
-
-       /* use the domain trust password if we're on a DC 
-          and this is not our domain */
-       
-       if ( IS_DC && !strequal(domain, lp_workgroup()) ) {
-               char *pass = NULL;
-               
-               if ( !secrets_fetch_trusted_domain_password( domain, 
-                       &pass, &sid, &lct) )
-               {
-                       return NT_STATUS_UNSUCCESSFUL;
-               }       
-
-               sec_channel_type = SEC_CHAN_DOMAIN;
-               E_md4hash(pass, trust_password);
-               SAFE_FREE( pass );
-               
-       } else {
-               if (!secrets_fetch_trust_account_password(lp_workgroup(),
-                       trust_password, NULL, &sec_channel_type)) 
-               {
-                       return NT_STATUS_UNSUCCESSFUL;
-               }
-       }
-
-       ret = cli_nt_setup_netsec(cli, sec_channel_type, 
-               AUTH_PIPE_NETSEC | AUTH_PIPE_SIGN, trust_password);
-
-       return ret;
-}
-
 static BOOL get_dc_name_via_netlogon(const struct winbindd_domain *domain,
                                     fstring dcname, struct in_addr *dc_ip)
 {
-       struct winbindd_domain *our_domain;
+       struct winbindd_domain *our_domain = NULL;
+       struct rpc_pipe_client *netlogon_pipe = NULL;
        NTSTATUS result;
-       struct winbindd_cm_conn *conn;
        TALLOC_CTX *mem_ctx;
 
        fstring tmp;
        char *p;
 
-       if (IS_DC)
-               return False;
+       /* Hmmmm. We can only open one connection to the NETLOGON pipe at the
+        * moment.... */
 
-       if (domain->primary)
+       if (IS_DC) {
                return False;
+       }
 
-       if ((our_domain = find_our_domain()) == NULL)
+       if (domain->primary) {
                return False;
+       }
 
-       result = get_connection_from_cache(our_domain, PIPE_NETLOGON, &conn);
-       if (!NT_STATUS_IS_OK(result))
+       our_domain = find_our_domain();
+
+       if ((mem_ctx = talloc_init("get_dc_name_via_netlogon")) == NULL) {
                return False;
+       }
 
-       if ((mem_ctx = talloc_init("get_dc_name_via_netlogon")) == NULL)
+       result = cm_connect_netlogon(our_domain, &netlogon_pipe);
+       if (!NT_STATUS_IS_OK(result)) {
                return False;
+       }
 
-       result = cli_netlogon_getdcname(conn->cli, mem_ctx, domain->name, tmp);
+       result = rpccli_netlogon_getdcname(netlogon_pipe, mem_ctx, our_domain->dcname,
+                                          domain->name, tmp);
 
        talloc_destroy(mem_ctx);
 
-       if (!NT_STATUS_IS_OK(result))
+       if (!NT_STATUS_IS_OK(result)) {
+               DEBUG(10, ("rpccli_netlogon_getdcname failed: %s\n",
+                          nt_errstr(result)));
                return False;
+       }
 
        /* cli_netlogon_getdcname gives us a name with \\ */
        p = tmp;
-       if (*p == '\\') p+=1;
-       if (*p == '\\') p+=1;
+       if (*p == '\\') {
+               p+=1;
+       }
+       if (*p == '\\') {
+               p+=1;
+       }
 
        fstrcpy(dcname, p);
 
-       if (!resolve_name(dcname, dc_ip, 0x20))
+       DEBUG(10, ("rpccli_netlogon_getdcname returned %s\n", dcname));
+
+       if (!resolve_name(dcname, dc_ip, 0x20)) {
                return False;
+       }
 
        return True;
 }
@@ -208,16 +169,14 @@ static BOOL get_dc_name_via_netlogon(const struct winbindd_domain *domain,
 
 static NTSTATUS cm_prepare_connection(const struct winbindd_domain *domain,
                                      const int sockfd,
-                                     const int pipe_index,
                                      const char *controller,
                                      struct cli_state **cli,
                                      BOOL *retry)
 {
-       char *machine_password, *machine_krb5_principal;
+       char *machine_password, *machine_krb5_principal, *machine_account;
        char *ipc_username, *ipc_domain, *ipc_password;
 
        BOOL got_mutex;
-       BOOL add_failed_connection = True;
 
        NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 
@@ -229,8 +188,14 @@ static NTSTATUS cm_prepare_connection(const struct winbindd_domain *domain,
        machine_password = secrets_fetch_machine_password(lp_workgroup(), NULL,
                                                          NULL);
        
+       if (asprintf(&machine_account, "%s$", global_myname()) == -1) {
+               SAFE_FREE(machine_password);
+               return NT_STATUS_NO_MEMORY;
+       }
+
        if (asprintf(&machine_krb5_principal, "%s$@%s", global_myname(),
                     lp_realm()) == -1) {
+               SAFE_FREE(machine_account);
                SAFE_FREE(machine_password);
                return NT_STATUS_NO_MEMORY;
        }
@@ -243,13 +208,13 @@ static NTSTATUS cm_prepare_connection(const struct winbindd_domain *domain,
                                        WINBIND_SERVER_MUTEX_WAIT_TIME);
 
        if (!got_mutex) {
-               DEBUG(0,("cm_open_connection: mutex grab failed for %s\n",
+               DEBUG(0,("cm_prepare_connection: mutex grab failed for %s\n",
                         controller));
                result = NT_STATUS_POSSIBLE_DEADLOCK;
                goto done;
        }
 
-       if ((*cli = cli_initialise(NULL)) == NULL) {
+       if ((*cli = cli_initialise()) == NULL) {
                DEBUG(1, ("Could not cli_initialize\n"));
                result = NT_STATUS_NO_MEMORY;
                goto done;
@@ -267,6 +232,7 @@ static NTSTATUS cm_prepare_connection(const struct winbindd_domain *domain,
            (peeraddr_in->sin_family != PF_INET))
        {
                DEBUG(0,("cm_prepare_connection: %s\n", strerror(errno)));
+               result = NT_STATUS_UNSUCCESSFUL;
                goto done;
        }
 
@@ -280,6 +246,7 @@ static NTSTATUS cm_prepare_connection(const struct winbindd_domain *domain,
                if (!cli_session_request(*cli, &calling, &called)) {
                        DEBUG(8, ("cli_session_request failed for %s\n",
                                  controller));
+                       result = NT_STATUS_UNSUCCESSFUL;
                        goto done;
                }
        }
@@ -288,37 +255,64 @@ static NTSTATUS cm_prepare_connection(const struct winbindd_domain *domain,
 
        if (!cli_negprot(*cli)) {
                DEBUG(1, ("cli_negprot failed\n"));
-               cli_shutdown(*cli);
+               result = NT_STATUS_UNSUCCESSFUL;
                goto done;
        }
-
-       /* Krb5 session */
                        
-       if ((lp_security() == SEC_ADS) 
-           && ((*cli)->protocol >= PROTOCOL_NT1 &&
-               (*cli)->capabilities & CAP_EXTENDED_SECURITY)) {
-
+       if ((*cli)->protocol >= PROTOCOL_NT1 && (*cli)->capabilities & CAP_EXTENDED_SECURITY) {
                ADS_STATUS ads_status;
-               (*cli)->use_kerberos = True;
-               DEBUG(5, ("connecting to %s from %s with kerberos principal "
-                         "[%s]\n", controller, global_myname(),
-                         machine_krb5_principal));
+
+               if (lp_security() == SEC_ADS) {
+
+                       /* Try a krb5 session */
+
+                       (*cli)->use_kerberos = True;
+                       DEBUG(5, ("connecting to %s from %s with kerberos principal "
+                                 "[%s]\n", controller, global_myname(),
+                                 machine_krb5_principal));
+
+                       ads_status = cli_session_setup_spnego(*cli,
+                                                             machine_krb5_principal, 
+                                                             machine_password, 
+                                                             lp_workgroup());
+
+                       if (!ADS_ERR_OK(ads_status)) {
+                               DEBUG(4,("failed kerberos session setup with %s\n",
+                                        ads_errstr(ads_status)));
+                       }
+
+                       result = ads_ntstatus(ads_status);
+                       if (NT_STATUS_IS_OK(result)) {
+                               /* Ensure creds are stored for NTLMSSP authenticated pipe access. */
+                               cli_init_creds(*cli, machine_account, lp_workgroup(), machine_password);
+                               goto session_setup_done;
+                       }
+               }
+
+               /* Fall back to non-kerberos session setup using NTLMSSP SPNEGO with the machine account. */
+               (*cli)->use_kerberos = False;
+
+               DEBUG(5, ("connecting to %s from %s with username "
+                         "[%s]\\[%s]\n",  controller, global_myname(),
+                         lp_workgroup(), machine_account));
 
                ads_status = cli_session_setup_spnego(*cli,
-                                                     machine_krb5_principal
+                                                     machine_account
                                                      machine_password, 
                                                      lp_workgroup());
-
-               if (!ADS_ERR_OK(ads_status))
-                       DEBUG(4,("failed kerberos session setup with %s\n",
-                                ads_errstr(ads_status)));
+               if (!ADS_ERR_OK(ads_status)) {
+                       DEBUG(4, ("authenticated session setup failed with %s\n",
+                               ads_errstr(ads_status)));
+               }
 
                result = ads_ntstatus(ads_status);
+               if (NT_STATUS_IS_OK(result)) {
+                       /* Ensure creds are stored for NTLMSSP authenticated pipe access. */
+                       cli_init_creds(*cli, machine_account, lp_workgroup(), machine_password);
+                       goto session_setup_done;
+               }
        }
 
-       if (NT_STATUS_IS_OK(result))
-               goto session_setup_done;
-
        /* Fall back to non-kerberos session setup */
 
        (*cli)->use_kerberos = False;
@@ -332,19 +326,26 @@ static NTSTATUS cm_prepare_connection(const struct winbindd_domain *domain,
                          "[%s]\\[%s]\n",  controller, global_myname(),
                          ipc_domain, ipc_username));
 
-               if (cli_session_setup(*cli, ipc_username,
-                                     ipc_password, strlen(ipc_password)+1,
-                                     ipc_password, strlen(ipc_password)+1,
-                                     ipc_domain)) {
-                       DEBUG(5, ("authenticated session setup failed\n"));
+               if (NT_STATUS_IS_OK(cli_session_setup(
+                                           *cli, ipc_username,
+                                           ipc_password, strlen(ipc_password)+1,
+                                           ipc_password, strlen(ipc_password)+1,
+                                           ipc_domain))) {
+                       /* Successful logon with given username. */
+                       cli_init_creds(*cli, ipc_username, ipc_domain, ipc_password);
                        goto session_setup_done;
+               } else {
+                       DEBUG(4, ("authenticated session setup with user %s\\%s failed.\n",
+                               ipc_domain, ipc_username ));
                }
        }
 
        /* Fall back to anonymous connection, this might fail later */
 
-       if (cli_session_setup(*cli, "", NULL, 0, NULL, 0, "")) {
+       if (NT_STATUS_IS_OK(cli_session_setup(*cli, "", NULL, 0,
+                                             NULL, 0, ""))) {
                DEBUG(5, ("Connected anonymously\n"));
+               cli_init_creds(*cli, "", "", "");
                goto session_setup_done;
        }
 
@@ -359,6 +360,10 @@ static NTSTATUS cm_prepare_connection(const struct winbindd_domain *domain,
 
  session_setup_done:
 
+       /* cache the server name for later connections */
+
+       saf_store( domain->name, (*cli)->desthost );
+
        if (!cli_send_tconX(*cli, "IPC$", "IPC", "", 0)) {
 
                result = cli_nt_error(*cli);
@@ -368,7 +373,6 @@ static NTSTATUS cm_prepare_connection(const struct winbindd_domain *domain,
                if (NT_STATUS_IS_OK(result))
                        result = NT_STATUS_UNSUCCESSFUL;
 
-               cli_shutdown(*cli);
                goto done;
        }
 
@@ -376,45 +380,32 @@ static NTSTATUS cm_prepare_connection(const struct winbindd_domain *domain,
        got_mutex = False;
        *retry = False;
 
-       if (domain->primary || IS_DC) {
-               NTSTATUS status = setup_schannel( *cli, domain->name );
-               if (!NT_STATUS_IS_OK(status)) {
-                       DEBUG(3,("schannel refused - continuing without "
-                                "schannel (%s)\n", nt_errstr(status)));
-               }
-       }
-
        /* set the domain if empty; needed for schannel connections */
-       if ( !*(*cli)->domain )
+       if ( !*(*cli)->domain ) {
                fstrcpy( (*cli)->domain, domain->name );
-
-       if ( !cli_nt_session_open (*cli, pipe_index) ) {
-
-               result = NT_STATUS_PIPE_NOT_AVAILABLE;
-
-               /* This might be a NT4 DC */
-               if ( is_win2k_pipe(pipe_index) )
-                       add_failed_connection = False;
-
-               cli_shutdown(*cli);
-               goto done;
        }
 
        result = NT_STATUS_OK;
-       add_failed_connection = False;
 
  done:
-       if (got_mutex)
+       if (got_mutex) {
                secrets_named_mutex_release(controller);
+       }
 
+       SAFE_FREE(machine_account);
        SAFE_FREE(machine_password);
        SAFE_FREE(machine_krb5_principal);
        SAFE_FREE(ipc_username);
        SAFE_FREE(ipc_domain);
        SAFE_FREE(ipc_password);
 
-       if (add_failed_connection)
+       if (!NT_STATUS_IS_OK(result)) {
                add_failed_connection_entry(domain->name, controller, result);
+               if ((*cli) != NULL) {
+                       cli_shutdown(*cli);
+                       *cli = NULL;
+               }
+       }
 
        return result;
 }
@@ -428,8 +419,10 @@ static BOOL add_one_dc_unique(TALLOC_CTX *mem_ctx, const char *domain_name,
                              const char *dcname, struct in_addr ip,
                              struct dc_name_ip **dcs, int *num)
 {
-       if (!NT_STATUS_IS_OK(check_negative_conn_cache(domain_name, dcname)))
+       if (!NT_STATUS_IS_OK(check_negative_conn_cache(domain_name, dcname))) {
+               DEBUG(10, ("DC %s was in the negative conn cache\n", dcname));
                return False;
+       }
 
        *dcs = TALLOC_REALLOC_ARRAY(mem_ctx, *dcs, struct dc_name_ip, (*num)+1);
 
@@ -459,53 +452,202 @@ static BOOL add_sockaddr_to_array(TALLOC_CTX *mem_ctx,
        return True;
 }
 
+static void mailslot_name(struct in_addr dc_ip, fstring name)
+{
+       fstr_sprintf(name, "\\MAILSLOT\\NET\\GETDC%X", dc_ip.s_addr);
+}
+
+static BOOL send_getdc_request(struct in_addr dc_ip,
+                              const char *domain_name,
+                              const DOM_SID *sid)
+{
+       pstring outbuf;
+       char *p;
+       fstring my_acct_name;
+       fstring my_mailslot;
+
+       mailslot_name(dc_ip, my_mailslot);
+
+       memset(outbuf, '\0', sizeof(outbuf));
+
+       p = outbuf;
+
+       SCVAL(p, 0, SAMLOGON);
+       p++;
+
+       SCVAL(p, 0, 0); /* Count pointer ... */
+       p++;
+
+       SIVAL(p, 0, 0); /* The sender's token ... */
+       p += 2;
+
+       p += dos_PutUniCode(p, global_myname(), sizeof(pstring), True);
+       fstr_sprintf(my_acct_name, "%s$", global_myname());
+       p += dos_PutUniCode(p, my_acct_name, sizeof(pstring), True);
+
+       memcpy(p, my_mailslot, strlen(my_mailslot)+1);
+       p += strlen(my_mailslot)+1;
+
+       SIVAL(p, 0, 0x80);
+       p+=4;
+
+       SIVAL(p, 0, sid_size(sid));
+       p+=4;
+
+       p = ALIGN4(p, outbuf);
+
+       sid_linearize(p, sid_size(sid), sid);
+       p += sid_size(sid);
+
+       SIVAL(p, 0, 1);
+       SSVAL(p, 4, 0xffff);
+       SSVAL(p, 6, 0xffff);
+       p+=8;
+
+       return cli_send_mailslot(False, "\\MAILSLOT\\NET\\NTLOGON", 0,
+                                outbuf, PTR_DIFF(p, outbuf),
+                                global_myname(), 0, domain_name, 0x1c,
+                                dc_ip);
+}
+
+static BOOL receive_getdc_response(struct in_addr dc_ip,
+                                  const char *domain_name,
+                                  fstring dc_name)
+{
+       struct packet_struct *packet;
+       fstring my_mailslot;
+       char *buf, *p;
+       fstring dcname, user, domain;
+       int len;
+
+       mailslot_name(dc_ip, my_mailslot);
+
+       packet = receive_unexpected(DGRAM_PACKET, 0, my_mailslot);
+
+       if (packet == NULL) {
+               DEBUG(5, ("Did not receive packet for %s\n", my_mailslot));
+               return False;
+       }
+
+       DEBUG(5, ("Received packet for %s\n", my_mailslot));
+
+       buf = packet->packet.dgram.data;
+       len = packet->packet.dgram.datasize;
+
+       if (len < 70) {
+               /* 70 is a completely arbitrary value to make sure
+                  the SVAL below does not read uninitialized memory */
+               DEBUG(3, ("GetDC got short response\n"));
+               return False;
+       }
+
+       /* This should be (buf-4)+SVAL(buf-4, smb_vwv12)... */
+       p = buf+SVAL(buf, smb_vwv10);
+
+       if (CVAL(p,0) != SAMLOGON_R) {
+               DEBUG(8, ("GetDC got invalid response type %d\n", CVAL(p, 0)));
+               return False;
+       }
+
+       p+=2;
+       pull_ucs2(buf, dcname, p, sizeof(dcname), PTR_DIFF(buf+len, p),
+                 STR_TERMINATE|STR_NOALIGN);
+       p = skip_unibuf(p, PTR_DIFF(buf+len, p));
+       pull_ucs2(buf, user, p, sizeof(dcname), PTR_DIFF(buf+len, p),
+                 STR_TERMINATE|STR_NOALIGN);
+       p = skip_unibuf(p, PTR_DIFF(buf+len, p));
+       pull_ucs2(buf, domain, p, sizeof(dcname), PTR_DIFF(buf+len, p),
+                 STR_TERMINATE|STR_NOALIGN);
+       p = skip_unibuf(p, PTR_DIFF(buf+len, p));
+
+       if (!strequal(domain, domain_name)) {
+               DEBUG(3, ("GetDC: Expected domain %s, got %s\n",
+                         domain_name, domain));
+               return False;
+       }
+
+       p = dcname;
+       if (*p == '\\') p += 1;
+       if (*p == '\\') p += 1;
+
+       fstrcpy(dc_name, p);
+
+       DEBUG(10, ("GetDC gave name %s for domain %s\n",
+                  dc_name, domain));
+
+       return True;
+}
+
 /*******************************************************************
  convert an ip to a name
 *******************************************************************/
 
-static void dcip_to_name( const char *domainname, const char *realm, struct in_addr ip, fstring name )
+static BOOL dcip_to_name( const char *domainname, const char *realm, 
+                          const DOM_SID *sid, struct in_addr ip, fstring name )
 {
-       /* try node status request first */
-
-       if ( name_status_find(domainname, 0x1c, 0x20, ip, name) )
-               return;
+       struct ip_service ip_list;
 
-       /* backup in case the ads stuff fails */
-
-       fstrcpy( name, inet_ntoa(ip) );
+       ip_list.ip = ip;
+       ip_list.port = 0;
 
 #ifdef WITH_ADS
-       /* for active directory servers, try to get the ldap server name.
-          None of these failure should be considered critical for now */
+       /* For active directory servers, try to get the ldap server name.
+          None of these failures should be considered critical for now */
 
-       if ( lp_security() == SEC_ADS ) 
-       {
+       if ( lp_security() == SEC_ADS ) {
                ADS_STRUCT *ads;
-               ADS_STATUS status;
 
-               ads = ads_init( realm, domainname, NULL );
+               ads = ads_init(realm, domainname, NULL);
                ads->auth.flags |= ADS_AUTH_NO_BIND;
 
-               if ( !ads_try_connect( ads, inet_ntoa(ip), LDAP_PORT ) )  {
-                       ads_destroy( &ads );
-                       return;
-               }
-
-               status = ads_server_info(ads);
-               if ( !ADS_ERR_OK(status) ) {
+               if (ads_try_connect( ads, inet_ntoa(ip) ) )  {
+                       const char *sitename = sitename_fetch();
+                       /* We got a cldap packet. */
+                       fstrcpy(name, ads->config.ldap_server_name);
+                       namecache_store(name, 0x20, 1, &ip_list);
+
+#ifdef HAVE_KRB5
+                       if ((ads->config.flags & ADS_KDC) && sitename) {
+                               /* We're going to use this KDC for this realm/domain.
+                                  If we are using sites, then force the krb5 libs
+                                  to use this KDC. */
+
+                               create_local_private_krb5_conf_for_domain(realm,
+                                                               domainname,
+                                                               ip);
+                       }
+#endif
+                       SAFE_FREE(sitename);
                        ads_destroy( &ads );
-                       return;
+                       return True;
                }
 
-               fstrcpy(name, ads->config.ldap_server_name);
-
                ads_destroy( &ads );
        }
 #endif
 
-       return;
-}
+       /* try GETDC requests next */
+       
+       if (send_getdc_request(ip, domainname, sid)) {
+               int i;
+               smb_msleep(100);
+               for (i=0; i<5; i++) {
+                       if (receive_getdc_response(ip, domainname, name)) {
+                               namecache_store(name, 0x20, 1, &ip_list);
+                               return True;
+                       }
+                       smb_msleep(500);
+               }
+       }
 
+       /* try node status request */
+
+       if ( name_status_find(domainname, 0x1c, 0x20, ip, name) ) {
+               namecache_store(name, 0x20, 1, &ip_list);
+               return True;
+       }
+       return False;
+}
 
 /*******************************************************************
  Retreive a list of IP address for domain controllers.  Fill in 
@@ -521,7 +663,7 @@ static BOOL get_dcs(TALLOC_CTX *mem_ctx, const struct winbindd_domain *domain,
        int     iplist_size = 0;
        int     i;
        BOOL    is_our_domain;
-
+       enum security_types sec = (enum security_types)lp_security();
 
        is_our_domain = strequal(domain->name, lp_workgroup());
 
@@ -529,16 +671,24 @@ static BOOL get_dcs(TALLOC_CTX *mem_ctx, const struct winbindd_domain *domain,
                && get_dc_name_via_netlogon(domain, dcname, &ip) 
                && add_one_dc_unique(mem_ctx, domain->name, dcname, ip, dcs, num_dcs) )
        {
+               DEBUG(10, ("Retrieved DC %s at %s via netlogon\n",
+                          dcname, inet_ntoa(ip)));
                return True;
        }
 
-       if ( is_our_domain 
-               && must_use_pdc(domain->name) 
-               && get_pdc_ip(domain->name, &ip)) 
-       {
-               if (add_one_dc_unique(mem_ctx, domain->name, inet_ntoa(ip), ip, dcs, num_dcs)) 
-                       return True;
-       }
+#ifdef WITH_ADS
+       if (sec == SEC_ADS) {
+               /* We need to make sure we know the local site before
+                  doing any DNS queries, as this will restrict the
+                  get_sorted_dc_list() call below to only fetching
+                  DNS records for the correct site. */
+
+               /* Find any DC to get the site record.
+                  We deliberately don't care about the
+                  return here. */
+               get_dc_name(domain->name, lp_realm(), dcname, &ip);
+        }
+#endif
 
        /* try standard netbios queries first */
 
@@ -546,9 +696,11 @@ static BOOL get_dcs(TALLOC_CTX *mem_ctx, const struct winbindd_domain *domain,
 
        /* check for security = ads and use DNS if we can */
 
-       if ( iplist_size==0 && lp_security() == SEC_ADS ) 
+       if ( iplist_size==0 && sec == SEC_ADS ) 
                get_sorted_dc_list(domain->alt_name, &ip_list, &iplist_size, True);
 
+       /* FIXME!! this is where we should re-insert the GETDC requests --jerry */
+
        /* now add to the dc array.  We'll wait until the last minute 
           to look up the name of the DC.  But we fill in the char* for 
           the ip now in to make the failed connection cache work */
@@ -578,6 +730,7 @@ static BOOL find_new_dc(TALLOC_CTX *mem_ctx,
 
        int i, fd_index;
 
+ again:
        if (!get_dcs(mem_ctx, domain, &dcs, &num_dcs) || (num_dcs == 0))
                return False;
 
@@ -597,6 +750,9 @@ static BOOL find_new_dc(TALLOC_CTX *mem_ctx,
        if ((num_dcnames == 0) || (num_dcnames != num_addrs))
                return False;
 
+       if ((addrs == NULL) || (dcnames == NULL))
+               return False;
+
        if ( !open_any_socket_out(addrs, num_addrs, 10000, &fd_index, fd) ) 
        {
                for (i=0; i<num_dcs; i++) {
@@ -608,205 +764,219 @@ static BOOL find_new_dc(TALLOC_CTX *mem_ctx,
 
        *addr = addrs[fd_index];
 
-       /* if we have no name on the server or just an IP address for 
-          the name, now try to get the name */
-
-       if ( is_ipaddress(dcnames[fd_index]) || *dcnames[fd_index] == '\0' )
-               dcip_to_name( domain->name, domain->alt_name, addr->sin_addr, dcname );
-       else
+       if (*dcnames[fd_index] != '\0' && !is_ipaddress(dcnames[fd_index])) {
+               /* Ok, we've got a name for the DC */
                fstrcpy(dcname, dcnames[fd_index]);
+               return True;
+       }
 
-       return True;
+       /* Try to figure out the name */
+       if (dcip_to_name( domain->name, domain->alt_name, &domain->sid,
+                         addr->sin_addr, dcname )) {
+               return True;
+       }
+
+       /* We can not continue without the DC's name */
+       add_failed_connection_entry(domain->name, dcs[fd_index].name,
+                                   NT_STATUS_UNSUCCESSFUL);
+       goto again;
 }
 
 static NTSTATUS cm_open_connection(struct winbindd_domain *domain,
-                                  const int pipe_index,
                                   struct winbindd_cm_conn *new_conn)
 {
        TALLOC_CTX *mem_ctx;
        NTSTATUS result;
-
+       char *saf_servername = saf_fetch( domain->name );
        int retries;
 
        if ((mem_ctx = talloc_init("cm_open_connection")) == NULL)
                return NT_STATUS_NO_MEMORY;
 
+       /* we have to check the server affinity cache here since 
+          later we selecte a DC based on response time and not preference */
+          
+       if ( saf_servername ) 
+       {
+               /* convert an ip address to a name */
+               if ( is_ipaddress( saf_servername ) )
+               {
+                       fstring saf_name;
+                       struct in_addr ip;
+
+                       ip = *interpret_addr2( saf_servername );
+                       if (dcip_to_name( domain->name, domain->alt_name,
+                                         &domain->sid, ip, saf_name )) {
+                               fstrcpy( domain->dcname, saf_name );
+                       } else {
+                               add_failed_connection_entry(
+                                       domain->name, saf_servername,
+                                       NT_STATUS_UNSUCCESSFUL);
+                       }
+               } 
+               else 
+               {
+                       fstrcpy( domain->dcname, saf_servername );
+               }
+
+               SAFE_FREE( saf_servername );
+       }
+
        for (retries = 0; retries < 3; retries++) {
 
                int fd = -1;
-               BOOL retry;
+               BOOL retry = False;
 
                result = NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
 
-               if ((strlen(domain->dcname) > 0) &&
-                   NT_STATUS_IS_OK(check_negative_conn_cache(domain->name,
-                                                             domain->dcname))) {
-                       int dummy;
-                       if (!open_any_socket_out(&domain->dcaddr, 1, 10000,
-                                                &dummy, &fd)) {
+               if ((strlen(domain->dcname) > 0)
+                       && NT_STATUS_IS_OK(check_negative_conn_cache( domain->name, domain->dcname))
+                       && (resolve_name(domain->dcname, &domain->dcaddr.sin_addr, 0x20)))
+               {
+                       struct sockaddr_in *addrs = NULL;
+                       int num_addrs = 0;
+                       int dummy = 0;
+
+                       add_sockaddr_to_array(mem_ctx, domain->dcaddr.sin_addr, 445, &addrs, &num_addrs);
+                       add_sockaddr_to_array(mem_ctx, domain->dcaddr.sin_addr, 139, &addrs, &num_addrs);
+
+                       if (!open_any_socket_out(addrs, num_addrs, 10000, &dummy, &fd)) {
+                               domain->online = False;
                                fd = -1;
                        }
                }
 
-               if ((fd == -1) &&
-                   !find_new_dc(mem_ctx, domain, domain->dcname,
-                                &domain->dcaddr, &fd))
+               if ((fd == -1) 
+                       && !find_new_dc(mem_ctx, domain, domain->dcname, &domain->dcaddr, &fd))
+               {
+                       /* This is the one place where we will
+                          set the global winbindd offline state
+                          to true, if a "WINBINDD_OFFLINE" entry
+                          is found in the winbindd cache. */
+                       set_global_winbindd_state_offline();
+                       domain->online = False;
                        break;
+               }
 
                new_conn->cli = NULL;
 
-               result = cm_prepare_connection(domain, fd, pipe_index,
-                                              domain->dcname,
-                                              &new_conn->cli, &retry);
-
-               if (NT_STATUS_IS_OK(result)) {
-                       fstrcpy(new_conn->domain, domain->name);
-                       /* Initialise SMB connection */
-                       fstrcpy(new_conn->pipe_name,
-                               get_pipe_name_from_index(pipe_index));
-                       break;
-               }
+               result = cm_prepare_connection(domain, fd, domain->dcname,
+                       &new_conn->cli, &retry);
 
                if (!retry)
                        break;
        }
 
-       talloc_destroy(mem_ctx);
-       return result;
-}
-
-/************************************************************************
- Wrapper around statuc cm_open_connection to retreive a freshly
- setup cli_state struct
-************************************************************************/
-
-NTSTATUS cm_fresh_connection(struct winbindd_domain *domain, const int pipe_index,
-                              struct cli_state **cli)
-{
-       NTSTATUS result;
-       struct winbindd_cm_conn conn;
-       
-       result = cm_open_connection( domain, pipe_index, &conn );
-       
-       if ( NT_STATUS_IS_OK(result) ) 
-               *cli = conn.cli;
+       if (NT_STATUS_IS_OK(result)) {
+               if (domain->online == False) {
+                       /* We're changing state from offline to online. */
+                       set_global_winbindd_state_online();
+               }
+               domain->online = True;
+       }
 
+       talloc_destroy(mem_ctx);
        return result;
 }
 
-/* Return true if a connection is still alive */
+/* Close down all open pipes on a connection. */
 
-static BOOL connection_ok(struct winbindd_cm_conn *conn)
+void invalidate_cm_connection(struct winbindd_cm_conn *conn)
 {
-       if (!conn) {
-               smb_panic("Invalid parameter passed to connection_ok():  conn was NULL!\n");
-               return False;
+       if (conn->samr_pipe != NULL) {
+               cli_rpc_pipe_close(conn->samr_pipe);
+               conn->samr_pipe = NULL;
        }
 
-       if (!conn->cli) {
-               DEBUG(3, ("Connection to %s for domain %s (pipe %s) has NULL conn->cli!\n", 
-                         conn->controller, conn->domain, conn->pipe_name));
-               return False;
+       if (conn->lsa_pipe != NULL) {
+               cli_rpc_pipe_close(conn->lsa_pipe);
+               conn->lsa_pipe = NULL;
        }
 
-       if (!conn->cli->initialised) {
-               DEBUG(3, ("Connection to %s for domain %s (pipe %s) was never initialised!\n", 
-                         conn->controller, conn->domain, conn->pipe_name));
-               return False;
+       if (conn->netlogon_pipe != NULL) {
+               cli_rpc_pipe_close(conn->netlogon_pipe);
+               conn->netlogon_pipe = NULL;
        }
 
-       if (conn->cli->fd == -1) {
-               DEBUG(3, ("Connection to %s for domain %s (pipe %s) has died or was never started (fd == -1)\n", 
-                         conn->controller, conn->domain, conn->pipe_name));
-               return False;
+       if (conn->cli) {
+               cli_shutdown(conn->cli);
        }
-       
-       return True;
-}
 
-/* Search the cache for a connection. If there is a broken one,
-   shut it down properly and return NULL. */
+       conn->cli = NULL;
+}
 
-static void find_cm_connection(struct winbindd_domain *domain, const char *pipe_name,
-                              struct winbindd_cm_conn **conn_out) 
+void close_conns_after_fork(void)
 {
-       struct winbindd_cm_conn *conn;
+       struct winbindd_domain *domain;
 
-       for (conn = cm_conns; conn; ) {
-               if (strequal(conn->domain, domain->name) && 
-                   strequal(conn->pipe_name, pipe_name)) {
-                       if (!connection_ok(conn)) {
-                               /* Dead connection - remove it. */
-                               struct winbindd_cm_conn *conn_temp = conn->next;
-                               if (conn->cli)
-                                       cli_shutdown(conn->cli);
-                               DLIST_REMOVE(cm_conns, conn);
-                               SAFE_FREE(conn);
-                               conn = conn_temp;  /* Keep the loop moving */
-                               continue;
-                       } else {
-                               break;
-                       }
-               }
-               conn = conn->next;
-       }
+       for (domain = domain_list(); domain; domain = domain->next) {
+               if (domain->conn.cli == NULL)
+                       continue;
 
-       *conn_out = conn;
-}
+               if (domain->conn.cli->fd == -1)
+                       continue;
 
-/* Initialize a new connection up to the RPC BIND. */
+               close(domain->conn.cli->fd);
+               domain->conn.cli->fd = -1;
+       }
+}
 
-static NTSTATUS new_cm_connection(struct winbindd_domain *domain, const char *pipe_name,
-                                 struct winbindd_cm_conn **conn_out)
+static BOOL connection_ok(struct winbindd_domain *domain)
 {
-       struct winbindd_cm_conn *conn;
-       NTSTATUS result;
+       if (domain->conn.cli == NULL) {
+               DEBUG(8, ("Connection to %s for domain %s has NULL "
+                         "cli!\n", domain->dcname, domain->name));
+               return False;
+       }
 
-       if (!(conn = SMB_MALLOC_P(struct winbindd_cm_conn)))
-               return NT_STATUS_NO_MEMORY;
-               
-       ZERO_STRUCTP(conn);
-               
-       if (!NT_STATUS_IS_OK(result = cm_open_connection(domain, get_pipe_index(pipe_name), conn))) {
-               DEBUG(3, ("Could not open a connection to %s for %s (%s)\n", 
-                         domain->name, pipe_name, nt_errstr(result)));
-               SAFE_FREE(conn);
-               return result;
+       if (!domain->conn.cli->initialised) {
+               DEBUG(3, ("Connection to %s for domain %s was never "
+                         "initialised!\n", domain->dcname, domain->name));
+               return False;
        }
-       DLIST_ADD(cm_conns, conn);
 
-       *conn_out = conn;
-       return NT_STATUS_OK;
-}
+       if (domain->conn.cli->fd == -1) {
+               DEBUG(3, ("Connection to %s for domain %s has died or was "
+                         "never started (fd == -1)\n", 
+                         domain->dcname, domain->name));
+               return False;
+       }
 
-/* Get a connection to the remote DC and open the pipe.  If there is already a connection, use that */
+       return True;
+}
+       
+/* Initialize a new connection up to the RPC BIND. */
 
-static NTSTATUS get_connection_from_cache(struct winbindd_domain *domain, const char *pipe_name,
-                                         struct winbindd_cm_conn **conn_out)
+static NTSTATUS init_dc_connection(struct winbindd_domain *domain)
 {
-       find_cm_connection(domain, pipe_name, conn_out);
-
-       if (*conn_out != NULL)
+       if (connection_ok(domain))
                return NT_STATUS_OK;
 
-       return new_cm_connection(domain, pipe_name, conn_out);
+       invalidate_cm_connection(&domain->conn);
+
+       return cm_open_connection(domain, &domain->conn);
 }
 
-/**********************************************************************************
- We can 'sense' certain things about the DC by it's replies to certain questions.
+/******************************************************************************
+ We can 'sense' certain things about the DC by it's replies to certain
+ questions.
 
- This tells us if this particular remote server is Active Directory, and if it is
- native mode.
-**********************************************************************************/
+ This tells us if this particular remote server is Active Directory, and if it
is native mode.
+******************************************************************************/
 
 void set_dc_type_and_flags( struct winbindd_domain *domain )
 {
        NTSTATUS                result;
-       struct winbindd_cm_conn conn;
        DS_DOMINFO_CTR          ctr;
        TALLOC_CTX              *mem_ctx = NULL;
+       struct rpc_pipe_client  *cli;
+       POLICY_HND pol;
        
-       ZERO_STRUCT( conn );
+       char *domain_name = NULL;
+       char *dns_name = NULL;
+       DOM_SID *dom_sid = NULL;
+
        ZERO_STRUCT( ctr );
        
        domain->native_mode = False;
@@ -816,100 +986,102 @@ void set_dc_type_and_flags( struct winbindd_domain *domain )
                domain->initialized = True;
                return;
        }
-       
-       if ( !NT_STATUS_IS_OK(result = cm_open_connection(domain, PI_LSARPC_DS, &conn)) ) {
-               DEBUG(5, ("set_dc_type_and_flags: Could not open a connection to %s for PIPE_LSARPC (%s)\n", 
+
+       result = init_dc_connection(domain);
+       if (!NT_STATUS_IS_OK(result)) {
+               DEBUG(5, ("set_dc_type_and_flags: Could not open a connection "
+                         "to %s: (%s)\n", domain->name, nt_errstr(result)));
+               domain->initialized = True;
+               return;
+       }
+
+       cli = cli_rpc_pipe_open_noauth(domain->conn.cli, PI_LSARPC_DS,
+                                      &result);
+
+       if (cli == NULL) {
+               DEBUG(5, ("set_dc_type_and_flags: Could not bind to "
+                         "PI_LSARPC_DS on domain %s: (%s)\n",
                          domain->name, nt_errstr(result)));
                domain->initialized = True;
                return;
        }
-       
-       if ( conn.cli ) {
-               if ( !NT_STATUS_IS_OK(cli_ds_getprimarydominfo( conn.cli, 
-                               conn.cli->mem_ctx, DsRolePrimaryDomainInfoBasic, &ctr)) ) {
-                       goto done;
-               }
+
+       result = rpccli_ds_getprimarydominfo(cli, cli->cli->mem_ctx,
+                                            DsRolePrimaryDomainInfoBasic,
+                                            &ctr);
+       cli_rpc_pipe_close(cli);
+
+       if (!NT_STATUS_IS_OK(result)) {
+               domain->initialized = True;
+               return;
        }
-                               
-       if ( (ctr.basic->flags & DSROLE_PRIMARY_DS_RUNNING) 
-                       && !(ctr.basic->flags & DSROLE_PRIMARY_DS_MIXED_MODE) )
+       
+       if ((ctr.basic->flags & DSROLE_PRIMARY_DS_RUNNING) &&
+           !(ctr.basic->flags & DSROLE_PRIMARY_DS_MIXED_MODE) )
                domain->native_mode = True;
 
-       /* Cheat - shut down the DS pipe, and open LSA */
+       cli = cli_rpc_pipe_open_noauth(domain->conn.cli, PI_LSARPC, &result);
 
-       cli_nt_session_close(conn.cli);
-
-       if ( cli_nt_session_open (conn.cli, PI_LSARPC) ) {
-               char *domain_name = NULL;
-               char *dns_name = NULL;
-               DOM_SID *dom_sid = NULL;
+       if (cli == NULL) {
+               domain->initialized = True;
+               return;
+       }
 
-               mem_ctx = talloc_init("set_dc_type_and_flags on domain %s\n", domain->name);
-               if (!mem_ctx) {
-                       DEBUG(1, ("set_dc_type_and_flags: talloc_init() failed\n"));
-                       return;
-               }
+       mem_ctx = talloc_init("set_dc_type_and_flags on domain %s\n",
+                             domain->name);
+       if (!mem_ctx) {
+               DEBUG(1, ("set_dc_type_and_flags: talloc_init() failed\n"));
+               cli_rpc_pipe_close(cli);
+               return;
+       }
 
-               result = cli_lsa_open_policy2(conn.cli, mem_ctx, True, 
-                                             SEC_RIGHTS_MAXIMUM_ALLOWED,
-                                             &conn.pol);
+       result = rpccli_lsa_open_policy2(cli, mem_ctx, True, 
+                                        SEC_RIGHTS_MAXIMUM_ALLOWED, &pol);
                
-               if (NT_STATUS_IS_OK(result)) {
-                       /* This particular query is exactly what Win2k clients use 
-                          to determine that the DC is active directory */
-                       result = cli_lsa_query_info_policy2(conn.cli, mem_ctx, 
-                                                           &conn.pol,
-                                                           12, &domain_name,
-                                                           &dns_name, NULL,
-                                                           NULL, &dom_sid);
-               }
+       if (NT_STATUS_IS_OK(result)) {
+               /* This particular query is exactly what Win2k clients use 
+                  to determine that the DC is active directory */
+               result = rpccli_lsa_query_info_policy2(cli, mem_ctx, &pol,
+                                                      12, &domain_name,
+                                                      &dns_name, NULL,
+                                                      NULL, &dom_sid);
+       }
+
+       if (NT_STATUS_IS_OK(result)) {
+               if (domain_name)
+                       fstrcpy(domain->name, domain_name);
 
+               if (dns_name)
+                       fstrcpy(domain->alt_name, dns_name);
+
+               if (dom_sid) 
+                       sid_copy(&domain->sid, dom_sid);
+
+               domain->active_directory = True;
+       } else {
+               
+               result = rpccli_lsa_open_policy(cli, mem_ctx, True, 
+                                               SEC_RIGHTS_MAXIMUM_ALLOWED,
+                                               &pol);
+                       
+               if (!NT_STATUS_IS_OK(result))
+                       goto done;
+                       
+               result = rpccli_lsa_query_info_policy(cli, mem_ctx, 
+                                                     &pol, 5, &domain_name, 
+                                                     &dom_sid);
+                       
                if (NT_STATUS_IS_OK(result)) {
                        if (domain_name)
                                fstrcpy(domain->name, domain_name);
-                       
-                       if (dns_name)
-                               fstrcpy(domain->alt_name, dns_name);
 
                        if (dom_sid) 
                                sid_copy(&domain->sid, dom_sid);
-
-                       domain->active_directory = True;
-               } else {
-                       
-                       result = cli_lsa_open_policy(conn.cli, mem_ctx, True, 
-                                                    SEC_RIGHTS_MAXIMUM_ALLOWED,
-                                                    &conn.pol);
-                       
-                       if (!NT_STATUS_IS_OK(result))
-                               goto done;
-                       
-                       result = cli_lsa_query_info_policy(conn.cli, mem_ctx, 
-                                                          &conn.pol, 5, &domain_name, 
-                                                          &dom_sid);
-                       
-                       if (NT_STATUS_IS_OK(result)) {
-                               if (domain_name)
-                                       fstrcpy(domain->name, domain_name);
-                               
-                               if (dom_sid) 
-                                       sid_copy(&domain->sid, dom_sid);
-                       }
                }
        }
-       
 done:
-       
-       DEBUG(3,("add_trusted_domain: %s is an %s %s domain\n", domain->name,
-               domain->active_directory ? "ADS" : "NT4",
-               domain->native_mode ? "native mode" :
-               ((domain->active_directory && !domain->native_mode) ? "mixed mode" : "")));
 
-       /* close the connection;  no other calls use this pipe and it is called only
-          on reestablishing the domain list   --jerry */
-       
-       if ( conn.cli )
-               cli_shutdown( conn.cli );
+       cli_rpc_pipe_close(cli);
        
        talloc_destroy(mem_ctx);
 
@@ -918,254 +1090,404 @@ done:
        return;
 }
 
+static BOOL cm_get_schannel_dcinfo(struct winbindd_domain *domain,
+                                  struct dcinfo **ppdc)
+{
+       NTSTATUS result;
+       struct rpc_pipe_client *netlogon_pipe;
 
+       if (lp_client_schannel() == False) {
+               return False;
+       }
 
-/* Return a LSA policy handle on a domain */
+       result = cm_connect_netlogon(domain, &netlogon_pipe);
+       if (!NT_STATUS_IS_OK(result)) {
+               return False;
+       }
+
+       /* Return a pointer to the struct dcinfo from the
+          netlogon pipe. */
+
+       *ppdc = domain->conn.netlogon_pipe->dc;
+       return True;
+}
 
-NTSTATUS cm_get_lsa_handle(struct winbindd_domain *domain, CLI_POLICY_HND **return_hnd)
+NTSTATUS cm_connect_sam(struct winbindd_domain *domain, TALLOC_CTX *mem_ctx,
+                       struct rpc_pipe_client **cli, POLICY_HND *sam_handle)
 {
        struct winbindd_cm_conn *conn;
-       uint32 des_access = SEC_RIGHTS_MAXIMUM_ALLOWED;
        NTSTATUS result;
-       static CLI_POLICY_HND hnd;
-
-       /* Look for existing connections */
+       fstring conn_pwd;
+       struct dcinfo *p_dcinfo;
 
-       if (!NT_STATUS_IS_OK(result = get_connection_from_cache(domain, PIPE_LSARPC, &conn)))
+       result = init_dc_connection(domain);
+       if (!NT_STATUS_IS_OK(result)) {
                return result;
+       }
 
-       /* This *shitty* code needs scrapping ! JRA */
-       
-       if (policy_handle_is_valid(&conn->pol)) {
-               hnd.pol = conn->pol;
-               hnd.cli = conn->cli;
-               *return_hnd = &hnd;
+       conn = &domain->conn;
 
-               return NT_STATUS_OK;
+       if (conn->samr_pipe != NULL) {
+               goto done;
        }
-       
-       result = cli_lsa_open_policy(conn->cli, conn->cli->mem_ctx, False, 
-                                    des_access, &conn->pol);
 
-       if (!NT_STATUS_IS_OK(result)) {
-               /* Hit the cache code again.  This cleans out the old connection and gets a new one */
-               if (conn->cli->fd == -1) { /* Try again, if the remote host disapeared */
-                       if (!NT_STATUS_IS_OK(result = get_connection_from_cache(domain, PIPE_LSARPC, &conn)))
-                               return result;
+       /*
+        * No SAMR pipe yet. Attempt to get an NTLMSSP SPNEGO authenticated
+        * sign and sealed pipe using the machine account password by
+        * preference. If we can't - try schannel, if that fails, try
+        * anonymous.
+        */
+
+       pwd_get_cleartext(&conn->cli->pwd, conn_pwd);
+       if ((conn->cli->user_name[0] == '\0') ||
+           (conn->cli->domain[0] == '\0') || 
+           (conn_pwd[0] == '\0')) {
+               DEBUG(10, ("cm_connect_sam: No no user available for "
+                          "domain %s, trying schannel\n", conn->cli->domain));
+               goto schannel;
+       }
 
-                       result = cli_lsa_open_policy(conn->cli, conn->cli->mem_ctx, False, 
-                                                    des_access, &conn->pol);
-               }
+       /* We have an authenticated connection. Use a NTLMSSP SPNEGO
+          authenticated SAMR pipe with sign & seal. */
+       conn->samr_pipe =
+               cli_rpc_pipe_open_spnego_ntlmssp(conn->cli, PI_SAMR,
+                                                PIPE_AUTH_LEVEL_PRIVACY,
+                                                conn->cli->domain,
+                                                conn->cli->user_name,
+                                                conn_pwd, &result);
+
+       if (conn->samr_pipe == NULL) {
+               DEBUG(10,("cm_connect_sam: failed to connect to SAMR "
+                         "pipe for domain %s using NTLMSSP "
+                         "authenticated pipe: user %s\\%s. Error was "
+                         "%s\n", domain->name, conn->cli->domain,
+                         conn->cli->user_name, nt_errstr(result)));
+               goto schannel;
+       }
 
-               if (!NT_STATUS_IS_OK(result)) {
-                       cli_shutdown(conn->cli);
-                       DLIST_REMOVE(cm_conns, conn);
-                       SAFE_FREE(conn);
-                       return result;
-               }
-       }       
+       DEBUG(10,("cm_connect_sam: connected to SAMR pipe for "
+                 "domain %s using NTLMSSP authenticated "
+                 "pipe: user %s\\%s\n", domain->name,
+                 conn->cli->domain, conn->cli->user_name ));
 
-       hnd.pol = conn->pol;
-       hnd.cli = conn->cli;
+       result = rpccli_samr_connect(conn->samr_pipe, mem_ctx,
+                                    SEC_RIGHTS_MAXIMUM_ALLOWED,
+                                    &conn->sam_connect_handle);
+       if (NT_STATUS_IS_OK(result)) {
+               goto open_domain;
+       }
+       DEBUG(10,("cm_connect_sam: ntlmssp-sealed rpccli_samr_connect "
+                 "failed for domain %s, error was %s. Trying schannel\n",
+                 domain->name, nt_errstr(result) ));
+       cli_rpc_pipe_close(conn->samr_pipe);
 
-       *return_hnd = &hnd;
+ schannel:
 
-       return NT_STATUS_OK;
-}
-
-/* Return a SAM policy handle on a domain */
+       /* Fall back to schannel if it's a W2K pre-SP1 box. */
 
-NTSTATUS cm_get_sam_handle(struct winbindd_domain *domain, CLI_POLICY_HND **return_hnd)
-{ 
-       struct winbindd_cm_conn *conn;
-       uint32 des_access = SEC_RIGHTS_MAXIMUM_ALLOWED;
-       NTSTATUS result;
-       static CLI_POLICY_HND hnd;
+       if (!cm_get_schannel_dcinfo(domain, &p_dcinfo)) {
+               DEBUG(10, ("cm_connect_sam: Could not get schannel auth info "
+                          "for domain %s, trying anon\n", conn->cli->domain));
+               goto anonymous;
+       }
+       conn->samr_pipe = cli_rpc_pipe_open_schannel_with_key
+               (conn->cli, PI_SAMR, PIPE_AUTH_LEVEL_PRIVACY,
+                domain->name, p_dcinfo, &result);
+
+       if (conn->samr_pipe == NULL) {
+               DEBUG(10,("cm_connect_sam: failed to connect to SAMR pipe for "
+                         "domain %s using schannel. Error was %s\n",
+                         domain->name, nt_errstr(result) ));
+               goto anonymous;
+       }
+       DEBUG(10,("cm_connect_sam: connected to SAMR pipe for domain %s using "
+                 "schannel.\n", domain->name ));
+
+       result = rpccli_samr_connect(conn->samr_pipe, mem_ctx,
+                                    SEC_RIGHTS_MAXIMUM_ALLOWED,
+                                    &conn->sam_connect_handle);
+       if (NT_STATUS_IS_OK(result)) {
+               goto open_domain;
+       }
+       DEBUG(10,("cm_connect_sam: schannel-sealed rpccli_samr_connect failed "
+                 "for domain %s, error was %s. Trying anonymous\n",
+                 domain->name, nt_errstr(result) ));
+       cli_rpc_pipe_close(conn->samr_pipe);
 
-       /* Look for existing connections */
+ anonymous:
 
-       if (!NT_STATUS_IS_OK(result = get_connection_from_cache(domain, PIPE_SAMR, &conn)))
-               return result;
-       
-       /* This *shitty* code needs scrapping ! JRA */
-       
-       if (policy_handle_is_valid(&conn->pol)) {
-               hnd.pol = conn->pol;
-               hnd.cli = conn->cli;
-               
-               *return_hnd = &hnd;
+       /* Finally fall back to anonymous. */
+       conn->samr_pipe = cli_rpc_pipe_open_noauth(conn->cli, PI_SAMR,
+                                                  &result);
 
-               return NT_STATUS_OK;
+       if (conn->samr_pipe == NULL) {
+               result = NT_STATUS_PIPE_NOT_AVAILABLE;
+               goto done;
        }
-       
-       result = cli_samr_connect(conn->cli, conn->cli->mem_ctx,
-                                 des_access, &conn->pol);
 
+       result = rpccli_samr_connect(conn->samr_pipe, mem_ctx,
+                                    SEC_RIGHTS_MAXIMUM_ALLOWED,
+                                    &conn->sam_connect_handle);
        if (!NT_STATUS_IS_OK(result)) {
-               /* Hit the cache code again.  This cleans out the old connection and gets a new one */
-               if (conn->cli->fd == -1) { /* Try again, if the remote host disapeared */
-               
-                       if (!NT_STATUS_IS_OK(result = get_connection_from_cache(domain, PIPE_SAMR, &conn)))
-                               return result;
-
-                       result = cli_samr_connect(conn->cli, conn->cli->mem_ctx,
-                                                 des_access, &conn->pol);
-               }
+               DEBUG(10,("cm_connect_sam: rpccli_samr_connect failed "
+                         "for domain %s Error was %s\n",
+                         domain->name, nt_errstr(result) ));
+               goto done;
+       }
 
-               if (!NT_STATUS_IS_OK(result)) {
-               
-                       cli_shutdown(conn->cli);
-                       DLIST_REMOVE(cm_conns, conn);
-                       SAFE_FREE(conn);
-                       
-                       return result;
-               }
-       }       
+ open_domain:
+       result = rpccli_samr_open_domain(conn->samr_pipe,
+                                        mem_ctx,
+                                        &conn->sam_connect_handle,
+                                        SEC_RIGHTS_MAXIMUM_ALLOWED,
+                                        &domain->sid,
+                                        &conn->sam_domain_handle);
 
-       hnd.pol = conn->pol;
-       hnd.cli = conn->cli;
+ done:
 
-       *return_hnd = &hnd;
+       if (!NT_STATUS_IS_OK(result)) {
+               invalidate_cm_connection(conn);
+               return result;
+       }
 
-       return NT_STATUS_OK;
+       *cli = conn->samr_pipe;
+       *sam_handle = conn->sam_domain_handle;
+       return result;
 }
 
-/* Get a handle on a netlogon pipe.  This is a bit of a hack to re-use the
-   netlogon pipe as no handle is returned. */
-
-NTSTATUS cm_get_netlogon_cli(struct winbindd_domain *domain, 
-                            const unsigned char *trust_passwd, 
-                            uint32 sec_channel_type,
-                            BOOL fresh,
-                            struct cli_state **cli)
+NTSTATUS cm_connect_lsa(struct winbindd_domain *domain, TALLOC_CTX *mem_ctx,
+                       struct rpc_pipe_client **cli, POLICY_HND *lsa_policy)
 {
-       NTSTATUS result = NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
        struct winbindd_cm_conn *conn;
-       fstring lock_name;
-       BOOL got_mutex;
+       NTSTATUS result;
+       fstring conn_pwd;
+       struct dcinfo *p_dcinfo;
 
-       if (!cli)
-               return NT_STATUS_INVALID_PARAMETER;
+       result = init_dc_connection(domain);
+       if (!NT_STATUS_IS_OK(result))
+               return result;
 
-       /* Open an initial conection - keep the mutex. */
+       conn = &domain->conn;
 
-       find_cm_connection(domain, PIPE_NETLOGON, &conn);
+       if (conn->lsa_pipe != NULL) {
+               goto done;
+       }
 
-       if ( fresh && (conn != NULL) ) {
-               cli_shutdown(conn->cli);
-               conn->cli = NULL;
+       pwd_get_cleartext(&conn->cli->pwd, conn_pwd);
+       if ((conn->cli->user_name[0] == '\0') ||
+           (conn->cli->domain[0] == '\0') || 
+           (conn_pwd[0] == '\0')) {
+               DEBUG(10, ("cm_connect_lsa: No no user available for "
+                          "domain %s, trying schannel\n", conn->cli->domain));
+               goto schannel;
+       }
 
-               conn = NULL;
+       /* We have an authenticated connection. Use a NTLMSSP SPNEGO
+        * authenticated LSA pipe with sign & seal. */
+       conn->lsa_pipe = cli_rpc_pipe_open_spnego_ntlmssp
+               (conn->cli, PI_LSARPC, PIPE_AUTH_LEVEL_PRIVACY,
+                conn->cli->domain, conn->cli->user_name, conn_pwd, &result);
+
+       if (conn->lsa_pipe == NULL) {
+               DEBUG(10,("cm_connect_lsa: failed to connect to LSA pipe for "
+                         "domain %s using NTLMSSP authenticated pipe: user "
+                         "%s\\%s. Error was %s. Trying schannel.\n",
+                         domain->name, conn->cli->domain,
+                         conn->cli->user_name, nt_errstr(result)));
+               goto schannel;
+       }
 
-               /* purge connection from cache */
-               find_cm_connection(domain, PIPE_NETLOGON, &conn);
-               if (conn != NULL) {
-                       DEBUG(0,("Could not purge connection\n"));
-                       return NT_STATUS_UNSUCCESSFUL;
-               }
+       DEBUG(10,("cm_connect_lsa: connected to LSA pipe for domain %s using "
+                 "NTLMSSP authenticated pipe: user %s\\%s\n",
+                 domain->name, conn->cli->domain, conn->cli->user_name ));
+
+       result = rpccli_lsa_open_policy(conn->lsa_pipe, mem_ctx, True,
+                                       SEC_RIGHTS_MAXIMUM_ALLOWED,
+                                       &conn->lsa_policy);
+       if (NT_STATUS_IS_OK(result)) {
+               goto done;
        }
 
-       if (conn != NULL) {
-               *cli = conn->cli;
-               return NT_STATUS_OK;
+       DEBUG(10,("cm_connect_lsa: rpccli_lsa_open_policy failed, trying "
+                 "schannel\n"));
+
+       cli_rpc_pipe_close(conn->lsa_pipe);
+
+ schannel:
+
+       /* Fall back to schannel if it's a W2K pre-SP1 box. */
+
+       if (!cm_get_schannel_dcinfo(domain, &p_dcinfo)) {
+               DEBUG(10, ("cm_connect_lsa: Could not get schannel auth info "
+                          "for domain %s, trying anon\n", conn->cli->domain));
+               goto anonymous;
+       }
+       conn->lsa_pipe = cli_rpc_pipe_open_schannel_with_key
+               (conn->cli, PI_LSARPC, PIPE_AUTH_LEVEL_PRIVACY,
+                domain->name, p_dcinfo, &result);
+
+       if (conn->lsa_pipe == NULL) {
+               DEBUG(10,("cm_connect_lsa: failed to connect to LSA pipe for "
+                         "domain %s using schannel. Error was %s\n",
+                         domain->name, nt_errstr(result) ));
+               goto anonymous;
        }
+       DEBUG(10,("cm_connect_lsa: connected to LSA pipe for domain %s using "
+                 "schannel.\n", domain->name ));
 
-       result = new_cm_connection(domain, PIPE_NETLOGON, &conn);
+       result = rpccli_lsa_open_policy(conn->lsa_pipe, mem_ctx, True,
+                                       SEC_RIGHTS_MAXIMUM_ALLOWED,
+                                       &conn->lsa_policy);
+       if (NT_STATUS_IS_OK(result)) {
+               goto done;
+       }
 
-       if (!NT_STATUS_IS_OK(result))
-               return result;
-       
-       fstr_sprintf(lock_name, "NETLOGON\\%s", conn->controller);
+       DEBUG(10,("cm_connect_lsa: rpccli_lsa_open_policy failed, trying "
+                 "anonymous\n"));
+
+       cli_rpc_pipe_close(conn->lsa_pipe);
 
-       if (!(got_mutex = secrets_named_mutex(lock_name, WINBIND_SERVER_MUTEX_WAIT_TIME))) {
-               DEBUG(0,("cm_get_netlogon_cli: mutex grab failed for %s\n", conn->controller));
+ anonymous:
+
+       conn->lsa_pipe = cli_rpc_pipe_open_noauth(conn->cli, PI_LSARPC,
+                                                 &result);
+       if (conn->lsa_pipe == NULL) {
+               result = NT_STATUS_PIPE_NOT_AVAILABLE;
+               goto done;
        }
-       
-       if ( sec_channel_type == SEC_CHAN_DOMAIN )
-               fstr_sprintf(conn->cli->mach_acct, "%s$", lp_workgroup());
-                       
-       /* This must be the remote domain (not ours) for schannel */
 
-       fstrcpy( conn->cli->domain, domain->name);
-       
-       result = cli_nt_establish_netlogon(conn->cli, sec_channel_type, trust_passwd);
-       
-       if (got_mutex)
-               secrets_named_mutex_release(lock_name);
-                               
+       result = rpccli_lsa_open_policy(conn->lsa_pipe, mem_ctx, True,
+                                       SEC_RIGHTS_MAXIMUM_ALLOWED,
+                                       &conn->lsa_policy);
+ done:
        if (!NT_STATUS_IS_OK(result)) {
-               cli_shutdown(conn->cli);
-               DLIST_REMOVE(cm_conns, conn);
-               SAFE_FREE(conn);
-               return result;
+               invalidate_cm_connection(conn);
+               return NT_STATUS_UNSUCCESSFUL;
        }
 
-       *cli = conn->cli;
-
+       *cli = conn->lsa_pipe;
+       *lsa_policy = conn->lsa_policy;
        return result;
 }
 
-/* Dump the current connection status */
+/****************************************************************************
+ Open the netlogon pipe to this DC. Use schannel if specified in client conf.
+ session key stored in conn->netlogon_pipe->dc->sess_key.
+****************************************************************************/
 
-static void dump_conn_list(void)
+NTSTATUS cm_connect_netlogon(struct winbindd_domain *domain,
+                            struct rpc_pipe_client **cli)
 {
-       struct winbindd_cm_conn *con;
+       struct winbindd_cm_conn *conn;
+       NTSTATUS result;
 
-       DEBUG(0, ("\tDomain          Controller      Pipe\n"));
+       uint32 neg_flags = NETLOGON_NEG_AUTH2_FLAGS;
+       uint8  mach_pwd[16];
+       uint32  sec_chan_type;
+       const char *account_name;
+       struct rpc_pipe_client *netlogon_pipe = NULL;
 
-       for(con = cm_conns; con; con = con->next) {
-               char *msg;
+       *cli = NULL;
 
-               /* Display pipe info */
-               
-               if (asprintf(&msg, "\t%-15s %-15s %-16s", con->domain, con->controller, con->pipe_name) < 0) {
-                       DEBUG(0, ("Error: not enough memory!\n"));
-               } else {
-                       DEBUG(0, ("%s\n", msg));
-                       SAFE_FREE(msg);
-               }
+       result = init_dc_connection(domain);
+       if (!NT_STATUS_IS_OK(result)) {
+               return result;
        }
-}
 
-void winbindd_cm_status(void)
-{
-       /* List open connections */
+       conn = &domain->conn;
 
-       DEBUG(0, ("winbindd connection manager status:\n"));
+       if (conn->netlogon_pipe != NULL) {
+               *cli = conn->netlogon_pipe;
+               return NT_STATUS_OK;
+       }
 
-       if (cm_conns)
-               dump_conn_list();
-       else
-               DEBUG(0, ("\tNo active connections\n"));
-}
+       if (!get_trust_pw(domain->name, mach_pwd, &sec_chan_type)) {
+               return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
+       }
 
-/* Close all cached connections */
+       netlogon_pipe = cli_rpc_pipe_open_noauth(conn->cli, PI_NETLOGON,
+                                                &result);
+       if (netlogon_pipe == NULL) {
+               return result;
+       }
 
-void winbindd_cm_flush(void)
-{
-       struct winbindd_cm_conn *conn, tmp;
+       if (lp_client_schannel() != False) {
+               neg_flags |= NETLOGON_NEG_SCHANNEL;
+       }
 
-       /* Flush connection cache */
+       /* if we are a DC and this is a trusted domain, then we need to use our
+          domain name in the net_req_auth2() request */
 
-       for (conn = cm_conns; conn; conn = conn->next) {
+       if ( IS_DC
+               && !strequal(domain->name, lp_workgroup())
+               && lp_allow_trusted_domains() ) 
+       {
+               account_name = lp_workgroup();
+       } else {
+               account_name = domain->primary ?
+                       global_myname() : domain->name;
+       }
 
-               if (!connection_ok(conn))
-                       continue;
+       if (account_name == NULL) {
+               cli_rpc_pipe_close(netlogon_pipe);
+               return NT_STATUS_NO_MEMORY;
+       }
 
-               DEBUG(10, ("Closing connection to %s on %s\n",
-                       conn->pipe_name, conn->controller));
+       result = rpccli_netlogon_setup_creds(
+                netlogon_pipe,
+                domain->dcname, /* server name. */
+                domain->name,   /* domain name */
+                global_myname(), /* client name */
+                account_name,   /* machine account */
+                mach_pwd,       /* machine password */
+                sec_chan_type,  /* from get_trust_pw */
+                &neg_flags);
 
-               if (conn->cli)
-                       cli_shutdown(conn->cli);
+       if (!NT_STATUS_IS_OK(result)) {
+               cli_rpc_pipe_close(netlogon_pipe);
+               return result;
+       }
 
-               tmp.next = conn->next;
+       if ((lp_client_schannel() == True) &&
+                       ((neg_flags & NETLOGON_NEG_SCHANNEL) == 0)) {
+               DEBUG(3, ("Server did not offer schannel\n"));
+               cli_rpc_pipe_close(netlogon_pipe);
+               return NT_STATUS_ACCESS_DENIED;
+       }
 
-               DLIST_REMOVE(cm_conns, conn);
-               SAFE_FREE(conn);
-               conn = &tmp;
+       if ((lp_client_schannel() == False) ||
+                       ((neg_flags & NETLOGON_NEG_SCHANNEL) == 0)) {
+               /* We're done - just keep the existing connection to NETLOGON
+                * open */
+               conn->netlogon_pipe = netlogon_pipe;
+               *cli = conn->netlogon_pipe;
+               return NT_STATUS_OK;
        }
 
-       /* Flush failed connection cache */
+       /* Using the credentials from the first pipe, open a signed and sealed
+          second netlogon pipe. The session key is stored in the schannel
+          part of the new pipe auth struct.
+       */
+
+       conn->netlogon_pipe =
+               cli_rpc_pipe_open_schannel_with_key(conn->cli,
+                                                   PI_NETLOGON,
+                                                   PIPE_AUTH_LEVEL_PRIVACY,
+                                                   domain->name,
+                                                   netlogon_pipe->dc,
+                                                   &result);
+
+       /* We can now close the initial netlogon pipe. */
+       cli_rpc_pipe_close(netlogon_pipe);
+
+       if (conn->netlogon_pipe == NULL) {
+               DEBUG(3, ("Could not open schannel'ed NETLOGON pipe. Error "
+                         "was %s\n", nt_errstr(result)));
+                         
+               /* make sure we return something besides OK */
+               return !NT_STATUS_IS_OK(result) ? result : NT_STATUS_PIPE_NOT_AVAILABLE;
+       }
 
-       flush_negative_conn_cache();
+       *cli = conn->netlogon_pipe;
+       return NT_STATUS_OK;
 }