s3-talloc Change TALLOC_ZERO_P() to talloc_zero()
[nivanova/samba-autobuild/.git] / source3 / auth / auth_domain.c
index 72bdbab182b50f9d206689ace8c429a45fff4bfb..2afff6fc7b66aff243bcf19d7aef85cd9333eb91 100644 (file)
    Authenticate against a remote domain
    Copyright (C) Andrew Tridgell 1992-1998
    Copyright (C) Andrew Bartlett 2001
-   
+
    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
    the Free Software Foundation; either version 3 of the License, or
    (at your option) any later version.
-   
+
    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.
-   
+
    You should have received a copy of the GNU General Public License
    along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */
 
 #include "includes.h"
+#include "auth.h"
+#include "../libcli/auth/libcli_auth.h"
+#include "../librpc/gen_ndr/ndr_netlogon.h"
+#include "rpc_client/cli_pipe.h"
+#include "rpc_client/cli_netlogon.h"
+#include "secrets.h"
+#include "passdb.h"
+#include "libsmb/libsmb.h"
 
 #undef DBGC_CLASS
 #define DBGC_CLASS DBGC_AUTH
 
 extern bool global_machine_password_needs_changing;
+static struct named_mutex *mutex;
+
+/*
+ * Change machine password (called from main loop
+ * idle timeout. Must be done as root.
+ */
+
+void attempt_machine_password_change(void)
+{
+       unsigned char trust_passwd_hash[16];
+       time_t lct;
+       void *lock;
+
+       if (!global_machine_password_needs_changing) {
+               return;
+       }
+
+       if (lp_security() != SEC_DOMAIN) {
+               return;
+       }
+
+       /*
+        * We're in domain level security, and the code that
+        * read the machine password flagged that the machine
+        * password needs changing.
+        */
+
+       /*
+        * First, open the machine password file with an exclusive lock.
+        */
+
+       lock = secrets_get_trust_account_lock(NULL, lp_workgroup());
+
+       if (lock == NULL) {
+               DEBUG(0,("attempt_machine_password_change: unable to lock "
+                       "the machine account password for machine %s in "
+                       "domain %s.\n",
+                       global_myname(), lp_workgroup() ));
+               return;
+       }
+
+       if(!secrets_fetch_trust_account_password(lp_workgroup(),
+                       trust_passwd_hash, &lct, NULL)) {
+               DEBUG(0,("attempt_machine_password_change: unable to read the "
+                       "machine account password for %s in domain %s.\n",
+                       global_myname(), lp_workgroup()));
+               TALLOC_FREE(lock);
+               return;
+       }
+
+       /*
+        * Make sure someone else hasn't already done this.
+        */
+
+       if(time(NULL) < lct + lp_machine_password_timeout()) {
+               global_machine_password_needs_changing = false;
+               TALLOC_FREE(lock);
+               return;
+       }
+
+       /* always just contact the PDC here */
+
+       change_trust_account_password( lp_workgroup(), NULL);
+       global_machine_password_needs_changing = false;
+       TALLOC_FREE(lock);
+}
 
 /**
  * Connect to a remote server for (inter)domain security authenticaion.
@@ -42,9 +116,8 @@ extern bool global_machine_password_needs_changing;
 static NTSTATUS connect_to_domain_password_server(struct cli_state **cli,
                                                const char *domain,
                                                const char *dc_name,
-                                               struct in_addr dc_ip, 
-                                               struct rpc_pipe_client **pipe_ret,
-                                               bool *retry)
+                                               struct sockaddr_storage *dc_ss, 
+                                               struct rpc_pipe_client **pipe_ret)
 {
         NTSTATUS result;
        struct rpc_pipe_client *netlogon_pipe = NULL;
@@ -67,14 +140,14 @@ static NTSTATUS connect_to_domain_password_server(struct cli_state **cli,
         * ACCESS_DENIED errors if 2 auths are done from the same machine. JRA.
         */
 
-       if (!grab_server_mutex(dc_name)) {
+       mutex = grab_named_mutex(NULL, dc_name, 10);
+       if (mutex == NULL) {
                return NT_STATUS_NO_LOGON_SERVERS;
        }
-       
+
        /* Attempt connection */
-       *retry = True;
-       result = cli_full_connection(cli, global_myname(), dc_name, &dc_ip, 0, 
-               "IPC$", "IPC", "", "", "", 0, Undefined, retry);
+       result = cli_full_connection(cli, global_myname(), dc_name, dc_ss, 0, 
+               "IPC$", "IPC", "", "", "", 0, Undefined);
 
        if (!NT_STATUS_IS_OK(result)) {
                /* map to something more useful */
@@ -87,7 +160,7 @@ static NTSTATUS connect_to_domain_password_server(struct cli_state **cli,
                        *cli = NULL;
                }
 
-               release_server_mutex();
+               TALLOC_FREE(mutex);
                return result;
        }
 
@@ -107,34 +180,39 @@ static NTSTATUS connect_to_domain_password_server(struct cli_state **cli,
        /* open the netlogon pipe. */
        if (lp_client_schannel()) {
                /* We also setup the creds chain in the open_schannel call. */
-               netlogon_pipe = cli_rpc_pipe_open_schannel(*cli, PI_NETLOGON,
-                                       PIPE_AUTH_LEVEL_PRIVACY, domain, &result);
+               result = cli_rpc_pipe_open_schannel(
+                       *cli, &ndr_table_netlogon.syntax_id, NCACN_NP,
+                       DCERPC_AUTH_LEVEL_PRIVACY, domain, &netlogon_pipe);
        } else {
-               netlogon_pipe = cli_rpc_pipe_open_noauth(*cli, PI_NETLOGON, &result);
+               result = cli_rpc_pipe_open_noauth(
+                       *cli, &ndr_table_netlogon.syntax_id, &netlogon_pipe);
        }
 
-       if(!netlogon_pipe) {
+       if (!NT_STATUS_IS_OK(result)) {
                DEBUG(0,("connect_to_domain_password_server: unable to open the domain client session to \
 machine %s. Error was : %s.\n", dc_name, nt_errstr(result)));
                cli_shutdown(*cli);
                *cli = NULL;
-               release_server_mutex();
+               TALLOC_FREE(mutex);
                return result;
        }
 
        if (!lp_client_schannel()) {
                /* We need to set up a creds chain on an unauthenticated netlogon pipe. */
-               uint32 neg_flags = NETLOGON_NEG_AUTH2_FLAGS;
-               uint32 sec_chan_type = 0;
+               uint32_t neg_flags = NETLOGON_NEG_AUTH2_ADS_FLAGS;
+               enum netr_SchannelType sec_chan_type = 0;
                unsigned char machine_pwd[16];
+               const char *account_name;
 
-               if (!get_trust_pw(domain, machine_pwd, &sec_chan_type)) {
+               if (!get_trust_pw_hash(domain, machine_pwd, &account_name,
+                                      &sec_chan_type))
+               {
                        DEBUG(0, ("connect_to_domain_password_server: could not fetch "
                        "trust account password for domain '%s'\n",
                                domain));
                        cli_shutdown(*cli);
                        *cli = NULL;
-                       release_server_mutex();
+                       TALLOC_FREE(mutex);
                        return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
                }
 
@@ -142,7 +220,7 @@ machine %s. Error was : %s.\n", dc_name, nt_errstr(result)));
                                        dc_name, /* server name */
                                        domain, /* domain */
                                        global_myname(), /* client name */
-                                       global_myname(), /* machine account name */
+                                       account_name, /* machine account name */
                                        machine_pwd,
                                        sec_chan_type,
                                        &neg_flags);
@@ -150,7 +228,7 @@ machine %s. Error was : %s.\n", dc_name, nt_errstr(result)));
                if (!NT_STATUS_IS_OK(result)) {
                        cli_shutdown(*cli);
                        *cli = NULL;
-                       release_server_mutex();
+                       TALLOC_FREE(mutex);
                        return result;
                }
        }
@@ -160,7 +238,7 @@ machine %s. Error was : %s.\n", dc_name, nt_errstr(result)));
 machine %s. Error was : %s.\n", dc_name, cli_errstr(*cli)));
                cli_shutdown(*cli);
                *cli = NULL;
-               release_server_mutex();
+               TALLOC_FREE(mutex);
                return NT_STATUS_NO_LOGON_SERVERS;
        }
 
@@ -178,20 +256,19 @@ machine %s. Error was : %s.\n", dc_name, cli_errstr(*cli)));
 ************************************************************************/
 
 static NTSTATUS domain_client_validate(TALLOC_CTX *mem_ctx,
-                                       const auth_usersupplied_info *user_info, 
+                                       const struct auth_usersupplied_info *user_info,
                                        const char *domain,
                                        uchar chal[8],
-                                       auth_serversupplied_info **server_info, 
+                                       struct auth_serversupplied_info **server_info,
                                        const char *dc_name,
-                                       struct in_addr dc_ip)
+                                       struct sockaddr_storage *dc_ss)
 
 {
-       NET_USER_INFO_3 info3;
+       struct netr_SamInfo3 *info3 = NULL;
        struct cli_state *cli = NULL;
        struct rpc_pipe_client *netlogon_pipe = NULL;
        NTSTATUS nt_status = NT_STATUS_NO_LOGON_SERVERS;
        int i;
-       bool retry = True;
 
        /*
         * At this point, smb_apasswd points to the lanman response to
@@ -202,14 +279,13 @@ static NTSTATUS domain_client_validate(TALLOC_CTX *mem_ctx,
         */
 
        /* rety loop for robustness */
-       
-       for (i = 0; !NT_STATUS_IS_OK(nt_status) && retry && (i < 3); i++) {
+
+       for (i = 0; !NT_STATUS_IS_OK(nt_status) && (i < 3); i++) {
                nt_status = connect_to_domain_password_server(&cli,
                                                        domain,
                                                        dc_name,
-                                                       dc_ip,
-                                                       &netlogon_pipe,
-                                                       &retry);
+                                                       dc_ss,
+                                                       &netlogon_pipe);
        }
 
        if ( !NT_STATUS_IS_OK(nt_status) ) {
@@ -224,8 +300,6 @@ static NTSTATUS domain_client_validate(TALLOC_CTX *mem_ctx,
 
        saf_store( domain, cli->desthost );
 
-       ZERO_STRUCT(info3);
-
         /*
          * If this call succeeds, we now have lots of info about the user
          * in the info3 structure.  
@@ -233,26 +307,27 @@ static NTSTATUS domain_client_validate(TALLOC_CTX *mem_ctx,
 
        nt_status = rpccli_netlogon_sam_network_logon(netlogon_pipe,
                                                      mem_ctx,
-                                                     user_info->logon_parameters,/* flags such as 'allow workstation logon' */ 
-                                                     dc_name,                    /* server name */
-                                                     user_info->smb_name,        /* user name logging on. */
-                                                     user_info->client_domain,   /* domain name */
-                                                     user_info->wksta_name,      /* workstation name */
-                                                     chal,                       /* 8 byte challenge. */
-                                                     user_info->lm_resp,         /* lanman 24 byte response */
-                                                     user_info->nt_resp,         /* nt 24 byte response */
-                                                     &info3);                    /* info3 out */
+                                                     user_info->logon_parameters,         /* flags such as 'allow workstation logon' */
+                                                     dc_name,                             /* server name */
+                                                     user_info->client.account_name,      /* user name logging on. */
+                                                     user_info->client.domain_name,       /* domain name */
+                                                     user_info->workstation_name,         /* workstation name */
+                                                     chal,                                /* 8 byte challenge. */
+                                                     3,                                   /* validation level */
+                                                     user_info->password.response.lanman, /* lanman 24 byte response */
+                                                     user_info->password.response.nt,     /* nt 24 byte response */
+                                                     &info3);                             /* info3 out */
 
        /* Let go as soon as possible so we avoid any potential deadlocks
           with winbind lookup up users or groups. */
-          
-       release_server_mutex();
+
+       TALLOC_FREE(mutex);
 
        if (!NT_STATUS_IS_OK(nt_status)) {
                DEBUG(0,("domain_client_validate: unable to validate password "
                          "for user %s in domain %s to Domain controller %s. "
-                         "Error was %s.\n", user_info->smb_name,
-                         user_info->domain, dc_name, 
+                         "Error was %s.\n", user_info->client.account_name,
+                         user_info->client.domain_name, dc_name,
                          nt_errstr(nt_status)));
 
                /* map to something more useful */
@@ -261,27 +336,16 @@ static NTSTATUS domain_client_validate(TALLOC_CTX *mem_ctx,
                }
        } else {
                nt_status = make_server_info_info3(mem_ctx,
-                                               user_info->smb_name,
-                                               domain,
-                                               server_info,
-                                               &info3);
+                                                  user_info->client.account_name,
+                                                  domain,
+                                                  server_info,
+                                                  info3);
 
                if (NT_STATUS_IS_OK(nt_status)) {
-                       (*server_info)->was_mapped |= user_info->was_mapped;
-
-                       if ( ! (*server_info)->guest) {
-                               /* if a real user check pam account restrictions */
-                               /* only really perfomed if "obey pam restriction" is true */
-                               nt_status = smb_pam_accountcheck((*server_info)->unix_name);
-                               if (  !NT_STATUS_IS_OK(nt_status)) {
-                                       DEBUG(1, ("PAM account restriction prevents user login\n"));
-                                       cli_shutdown(cli);
-                                       return nt_status;
-                               }
-                       }
+                       (*server_info)->nss_token |= user_info->was_mapped;
+                       netsamlogon_cache_store(user_info->client.account_name, info3);
+                       TALLOC_FREE(info3);
                }
-
-               netsamlogon_cache_store( user_info->smb_name, &info3 );
        }
 
        /* Note - once the cli stream is shutdown the mem_ctx used
@@ -299,13 +363,13 @@ static NTSTATUS domain_client_validate(TALLOC_CTX *mem_ctx,
 static NTSTATUS check_ntdomain_security(const struct auth_context *auth_context,
                                        void *my_private_data, 
                                        TALLOC_CTX *mem_ctx,
-                                       const auth_usersupplied_info *user_info, 
-                                       auth_serversupplied_info **server_info)
+                                       const struct auth_usersupplied_info *user_info,
+                                       struct auth_serversupplied_info **server_info)
 {
        NTSTATUS nt_status = NT_STATUS_LOGON_FAILURE;
        const char *domain = lp_workgroup();
        fstring dc_name;
-       struct in_addr dc_ip;
+       struct sockaddr_storage dc_ss;
 
        if ( lp_server_role() != ROLE_DOMAIN_MEMBER ) {
                DEBUG(0,("check_ntdomain_security: Configuration error!  Cannot use "
@@ -318,45 +382,51 @@ static NTSTATUS check_ntdomain_security(const struct auth_context *auth_context,
                return NT_STATUS_INVALID_PARAMETER;
        }
 
+       DEBUG(10, ("Check auth for: [%s]\n", user_info->mapped.account_name));
+
        /* 
         * Check that the requested domain is not our own machine name.
         * If it is, we should never check the PDC here, we use our own local
         * password file.
         */
 
-       if(strequal(get_global_sam_name(), user_info->domain)) {
+       if(strequal(get_global_sam_name(), user_info->mapped.domain_name)) {
                DEBUG(3,("check_ntdomain_security: Requested domain was for this machine.\n"));
                return NT_STATUS_NOT_IMPLEMENTED;
        }
 
        /* we need our DC to send the net_sam_logon() request to */
 
-       if ( !get_dc_name(domain, NULL, dc_name, &dc_ip) ) {
+       if ( !get_dc_name(domain, NULL, dc_name, &dc_ss) ) {
                DEBUG(5,("check_ntdomain_security: unable to locate a DC for domain %s\n",
-                       user_info->domain));
+                       user_info->mapped.domain_name));
                return NT_STATUS_NO_LOGON_SERVERS;
        }
-       
+
        nt_status = domain_client_validate(mem_ctx,
                                        user_info,
                                        domain,
                                        (uchar *)auth_context->challenge.data,
                                        server_info,
                                        dc_name,
-                                       dc_ip);
-               
+                                       &dc_ss);
+
        return nt_status;
 }
 
 /* module initialisation */
 static NTSTATUS auth_init_ntdomain(struct auth_context *auth_context, const char* param, auth_methods **auth_method) 
 {
-       if (!make_auth_methods(auth_context, auth_method)) {
+       struct auth_methods *result;
+
+       result = talloc_zero(auth_context, struct auth_methods);
+       if (result == NULL) {
                return NT_STATUS_NO_MEMORY;
        }
+       result->name = "ntdomain";
+       result->auth = check_ntdomain_security;
 
-       (*auth_method)->name = "ntdomain";
-       (*auth_method)->auth = check_ntdomain_security;
+        *auth_method = result;
        return NT_STATUS_OK;
 }
 
@@ -368,29 +438,29 @@ static NTSTATUS auth_init_ntdomain(struct auth_context *auth_context, const char
 static NTSTATUS check_trustdomain_security(const struct auth_context *auth_context,
                                           void *my_private_data, 
                                           TALLOC_CTX *mem_ctx,
-                                          const auth_usersupplied_info *user_info, 
-                                          auth_serversupplied_info **server_info)
+                                          const struct auth_usersupplied_info *user_info,
+                                          struct auth_serversupplied_info **server_info)
 {
        NTSTATUS nt_status = NT_STATUS_LOGON_FAILURE;
        unsigned char trust_md4_password[16];
        char *trust_password;
-       time_t last_change_time;
-       DOM_SID sid;
        fstring dc_name;
-       struct in_addr dc_ip;
+       struct sockaddr_storage dc_ss;
 
        if (!user_info || !server_info || !auth_context) {
                DEBUG(1,("check_trustdomain_security: Critical variables not present.  Failing.\n"));
                return NT_STATUS_INVALID_PARAMETER;
        }
 
+       DEBUG(10, ("Check auth for: [%s]\n", user_info->mapped.account_name));
+
        /* 
         * Check that the requested domain is not our own machine name or domain name.
         */
 
-       if( strequal(get_global_sam_name(), user_info->domain)) {
+       if( strequal(get_global_sam_name(), user_info->mapped.domain_name)) {
                DEBUG(3,("check_trustdomain_security: Requested domain [%s] was for this machine.\n",
-                       user_info->domain));
+                       user_info->mapped.domain_name));
                return NT_STATUS_NOT_IMPLEMENTED;
        }
 
@@ -398,8 +468,8 @@ static NTSTATUS check_trustdomain_security(const struct auth_context *auth_conte
           This return makes "map to guest = bad user" work again.
           The logic is that if we know nothing about the domain, that
           user is not known to us and does not exist */
-       
-       if ( !is_trusted_domain( user_info->domain ) )
+
+       if ( !is_trusted_domain( user_info->mapped.domain_name ) )
                return NT_STATUS_NOT_IMPLEMENTED;
 
        /*
@@ -407,16 +477,16 @@ static NTSTATUS check_trustdomain_security(const struct auth_context *auth_conte
         * No need to become_root() as secrets_init() is done at startup.
         */
 
-       if (!pdb_get_trusteddom_pw(user_info->domain, &trust_password,
-                                  &sid, &last_change_time)) {
+       if (!pdb_get_trusteddom_pw(user_info->mapped.domain_name, &trust_password,
+                                  NULL, NULL)) {
                DEBUG(0, ("check_trustdomain_security: could not fetch trust "
                          "account password for domain %s\n",
-                         user_info->domain));
+                         user_info->mapped.domain_name));
                return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
        }
 
 #ifdef DEBUG_PASSWORD
-       DEBUG(100, ("Trust password for domain %s is %s\n", user_info->domain,
+       DEBUG(100, ("Trust password for domain %s is %s\n", user_info->mapped.domain_name,
                    trust_password));
 #endif
        E_md4hash(trust_password, trust_md4_password);
@@ -432,20 +502,20 @@ static NTSTATUS check_trustdomain_security(const struct auth_context *auth_conte
 
        /* use get_dc_name() for consistency even through we know that it will be 
           a netbios name */
-          
-       if ( !get_dc_name(user_info->domain, NULL, dc_name, &dc_ip) ) {
+
+       if ( !get_dc_name(user_info->mapped.domain_name, NULL, dc_name, &dc_ss) ) {
                DEBUG(5,("check_trustdomain_security: unable to locate a DC for domain %s\n",
-                       user_info->domain));
+                       user_info->mapped.domain_name));
                return NT_STATUS_NO_LOGON_SERVERS;
        }
-       
+
        nt_status = domain_client_validate(mem_ctx,
-                                       user_info,
-                                       user_info->domain,
-                                       (uchar *)auth_context->challenge.data,
-                                       server_info,
-                                       dc_name,
-                                       dc_ip);
+                                          user_info,
+                                          user_info->mapped.domain_name,
+                                          (uchar *)auth_context->challenge.data,
+                                          server_info,
+                                          dc_name,
+                                          &dc_ss);
 
        return nt_status;
 }
@@ -453,12 +523,16 @@ static NTSTATUS check_trustdomain_security(const struct auth_context *auth_conte
 /* module initialisation */
 static NTSTATUS auth_init_trustdomain(struct auth_context *auth_context, const char* param, auth_methods **auth_method) 
 {
-       if (!make_auth_methods(auth_context, auth_method)) {
+       struct auth_methods *result;
+
+       result = talloc_zero(auth_context, struct auth_methods);
+       if (result == NULL) {
                return NT_STATUS_NO_MEMORY;
        }
+       result->name = "trustdomain";
+       result->auth = check_trustdomain_security;
 
-       (*auth_method)->name = "trustdomain";
-       (*auth_method)->auth = check_trustdomain_security;
+        *auth_method = result;
        return NT_STATUS_OK;
 }