auth: Remove static variable ths_user from password_check() code
[nivanova/samba-autobuild/.git] / source3 / auth / pass_check.c
index a57cb2ff06beede78e6bd519940e2384a27223b4..00decc680c04a07e77c302a15b8c3ab57381b1a0 100644 (file)
@@ -1,34 +1,73 @@
-/* 
-   Unix SMB/Netbios implementation.
-   Version 1.9.
+/*
+   Unix SMB/CIFS implementation.
    Password checking
    Copyright (C) Andrew Tridgell 1992-1998
-   
+
    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 2 of the License, or
+   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, write to the Free Software
-   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */
 
 /* this module is for checking a username/password against a system
    password database. The SMB encrypted password support is elsewhere */
 
 #include "includes.h"
+#include "system/passwd.h"
+#include "auth.h"
 
-/* these are kept here to keep the string_combinations function simple */
-static fstring this_user;
-#if !(defined(WITH_PAM) || defined(KRB4_AUTH) || defined(KRB5_AUTH))
-static fstring this_salt;
-static fstring this_crypted;
+#undef DBGC_CLASS
+#define DBGC_CLASS DBGC_AUTH
+
+/* what is the longest significant password available on your system?
+ Knowing this speeds up password searches a lot */
+#ifndef PASSWORD_LENGTH
+#define PASSWORD_LENGTH 8
+#endif
+
+#if !defined(WITH_PAM)
+static char *ths_salt;
+/* This must be writable. */
+static char *get_this_salt(void)
+{
+       return ths_salt;
+}
+
+/* We may be setting a modified version of the same
+ * string, so don't free before use. */
+
+static const char *set_this_salt(const char *newsalt)
+{
+       char *orig_salt = ths_salt;
+       ths_salt = SMB_STRDUP(newsalt);
+       SAFE_FREE(orig_salt);
+       return ths_salt;
+}
+
+static char *ths_crypted;
+static const char *get_this_crypted(void)
+{
+       if (!ths_crypted) {
+               return "";
+       }
+       return ths_crypted;
+}
+
+static const char *set_this_crypted(const char *newcrypted)
+{
+       char *orig_crypted = ths_crypted;
+       ths_crypted = SMB_STRDUP(newcrypted);
+       SAFE_FREE(orig_crypted);
+       return ths_crypted;
+}
 #endif
 
 #ifdef WITH_AFS
@@ -39,7 +78,7 @@ static fstring this_crypted;
 /*******************************************************************
 check on AFS authentication
 ********************************************************************/
-static BOOL afs_auth(char *user, char *password)
+static bool afs_auth(char *user, char *password)
 {
        long password_expires = 0;
        char *reason;
@@ -88,8 +127,9 @@ int dcelogin_atmost_once = 0;
 /*******************************************************************
 check on a DCE/DFS authentication
 ********************************************************************/
-static BOOL dfs_auth(char *user, char *password)
+static bool dfs_auth(char *user, char *password)
 {
+       struct tm *t;
        error_status_t err;
        int err2;
        int prterr;
@@ -111,7 +151,7 @@ static BOOL dfs_auth(char *user, char *password)
         * Assumes local passwd file is kept in sync w/ DCE RGY!
         */
 
-       if (strcmp((char *)crypt(password, this_salt), this_crypted))
+       if (strcmp((char *)crypt(password, get_this_salt()), get_this_crypted()))
        {
                return (False);
        }
@@ -233,7 +273,7 @@ static BOOL dfs_auth(char *user, char *password)
        }
 
        /*
-        * NB. I'd like to change these to call something like become_user()
+        * NB. I'd like to change these to call something like change_to_user()
         * instead but currently we don't have a connection
         * context to become the correct user. This is already
         * fairly platform specific code however, so I think
@@ -317,7 +357,7 @@ static BOOL dfs_auth(char *user, char *password)
        }
 
        DEBUG(0, ("DCE login succeeded for principal %s on pid %d\n",
-                 user, sys_getpid()));
+                 user, getpid()));
 
        DEBUG(3, ("DCE principal: %s\n"
                  "          uid: %d\n"
@@ -339,8 +379,13 @@ static BOOL dfs_auth(char *user, char *password)
        set_effective_uid(0);
        set_effective_gid(0);
 
-       DEBUG(0,
-             ("DCE context expires: %s", asctime(localtime(&expire_time))));
+       t = localtime(&expire_time);
+       if (t) {
+               const char *asct = asctime(t);
+               if (asct) {
+                       DEBUG(0,("DCE context expires: %s", asct));
+               }
+       }
 
        dcelogin_atmost_once = 1;
        return (True);
@@ -365,127 +410,11 @@ void dfs_unlogin(void)
                dce_error_inq_text(err, dce_errstr, &err2);
                DEBUG(0,
                      ("DCE purge login context failed for server instance %d: %s\n",
-                      sys_getpid(), dce_errstr));
+                      getpid(), dce_errstr));
        }
 }
 #endif
 
-#ifdef KRB5_AUTH
-
-#include <krb5.h>
-
-/*******************************************************************
-check on Kerberos authentication
-********************************************************************/
-static BOOL krb5_auth(char *user, char *password)
-{
-       krb5_data tgtname = {
-               0,
-               KRB5_TGS_NAME_SIZE,
-               KRB5_TGS_NAME
-       };
-       krb5_context kcontext;
-       krb5_principal kprinc;
-       krb5_principal server;
-       krb5_creds kcreds;
-       int options = 0;
-       krb5_address **addrs = (krb5_address **) 0;
-       krb5_preauthtype *preauth = NULL;
-       krb5_keytab keytab = NULL;
-       krb5_timestamp now;
-       krb5_ccache ccache = NULL;
-       int retval;
-       char *name;
-
-       if (retval = krb5_init_context(&kcontext))
-       {
-               return (False);
-       }
-
-       if (retval = krb5_timeofday(kcontext, &now))
-       {
-               return (False);
-       }
-
-       if (retval = krb5_cc_default(kcontext, &ccache))
-       {
-               return (False);
-       }
-
-       if (retval = krb5_parse_name(kcontext, user, &kprinc))
-       {
-               return (False);
-       }
-
-       ZERO_STRUCT(kcreds);
-
-       kcreds.client = kprinc;
-
-       if ((retval = krb5_build_principal_ext(kcontext, &server,
-                                              krb5_princ_realm(kcontext,
-                                                               kprinc)->
-                                              length,
-                                              krb5_princ_realm(kcontext,
-                                                               kprinc)->data,
-                                              tgtname.length, tgtname.data,
-                                              krb5_princ_realm(kcontext,
-                                                               kprinc)->
-                                              length,
-                                              krb5_princ_realm(kcontext,
-                                                               kprinc)->data,
-                                              0)))
-       {
-               return (False);
-       }
-
-       kcreds.server = server;
-
-       retval = krb5_get_in_tkt_with_password(kcontext,
-                                              options,
-                                              addrs,
-                                              NULL,
-                                              preauth,
-                                              password, 0, &kcreds, 0);
-
-       if (retval)
-       {
-               return (False);
-       }
-
-       return (True);
-}
-#endif /* KRB5_AUTH */
-
-#ifdef KRB4_AUTH
-#include <krb.h>
-
-/*******************************************************************
-check on Kerberos authentication
-********************************************************************/
-static BOOL krb4_auth(char *user, char *password)
-{
-       char realm[REALM_SZ];
-       char tkfile[MAXPATHLEN];
-
-       if (krb_get_lrealm(realm, 1) != KSUCCESS)
-       {
-               (void)safe_strcpy(realm, KRB_REALM, sizeof(realm) - 1);
-       }
-
-       (void)slprintf(tkfile, sizeof(tkfile) - 1, "/tmp/samba_tkt_%d",
-                      (int)sys_getpid());
-
-       krb_set_tkt_string(tkfile);
-       if (krb_verify_user(user, "", realm, password, 0, "rmcd") == KSUCCESS)
-       {
-               unlink(tkfile);
-               return 1;
-       }
-       unlink(tkfile);
-       return 0;
-}
-#endif /* KRB4_AUTH */
-
 #ifdef LINUX_BIGCRYPT
 /****************************************************************************
 an enhanced crypt for Linux to handle password longer than 8 characters
@@ -543,121 +472,66 @@ static char *osf1_bigcrypt(char *password, char *salt1)
 #endif
 
 
-/****************************************************************************
-apply a function to upper/lower case combinations
-of a string and return true if one of them returns true.
-try all combinations with N uppercase letters.
-offset is the first char to try and change (start with 0)
-it assumes the string starts lowercased
-****************************************************************************/
-static NTSTATUS string_combinations2(char *s, int offset, NTSTATUS (*fn) (char *),
-                                int N)
-{
-       int len = strlen(s);
-       int i;
-       NTSTATUS nt_status;
-
-#ifdef PASSWORD_LENGTH
-       len = MIN(len, PASSWORD_LENGTH);
-#endif
-
-       if (N <= 0 || offset >= len)
-               return (fn(s));
-
-       for (i = offset; i < (len - (N - 1)); i++) {
-               char c = s[i];
-               if (!islower(c))
-                       continue;
-               s[i] = toupper(c);
-               if (!NT_STATUS_EQUAL(nt_status = string_combinations2(s, i + 1, fn, N - 1),NT_STATUS_WRONG_PASSWORD)) {
-                       return (nt_status);
-               }
-               s[i] = c;
-       }
-       return (NT_STATUS_WRONG_PASSWORD);
-}
-
-/****************************************************************************
-apply a function to upper/lower case combinations
-of a string and return true if one of them returns true.
-try all combinations with up to N uppercase letters.
-offset is the first char to try and change (start with 0)
-it assumes the string starts lowercased
-****************************************************************************/
-static NTSTATUS string_combinations(char *s, NTSTATUS (*fn) (char *), int N)
-{
-       int n;
-       NTSTATUS nt_status;
-       for (n = 1; n <= N; n++)
-               if (!NT_STATUS_EQUAL(nt_status = string_combinations2(s, 0, fn, n), NT_STATUS_WRONG_PASSWORD))
-                       return nt_status;
-       return NT_STATUS_WRONG_PASSWORD;
-}
-
-
 /****************************************************************************
 core of password checking routine
 ****************************************************************************/
-static NTSTATUS password_check(char *password)
+static NTSTATUS password_check(const char *user, const char *password, const void *private_data)
 {
 #ifdef WITH_PAM
-       return smb_pam_passcheck(this_user, password);
-#elif defined(KRB5_AUTH)
-       return krb5_auth(this_user, password) ? NT_STATUS_WRONG_PASSWORD : NT_STATUS_OK;
-#elif defined(KRB4_AUTH)
-       return krb4_auth(this_user, password) ? NT_STATUS_WRONG_PASSWORD : NT_STATUS_OK;
+       const char *rhost = (const char *)private_data;
+       return smb_pam_passcheck(user, rhost, password);
 #else
 
-       BOOL ret;
+       bool ret;
 
 #ifdef WITH_AFS
-       if (afs_auth(this_user, password))
+       if (afs_auth(user, password))
                return NT_STATUS_OK;
 #endif /* WITH_AFS */
 
 #ifdef WITH_DFS
-       if (dfs_auth(this_user, password))
+       if (dfs_auth(user, password))
                return NT_STATUS_OK;
 #endif /* WITH_DFS */
 
 #ifdef OSF1_ENH_SEC
-       
-       ret = (strcmp(osf1_bigcrypt(password, this_salt),
-                     this_crypted) == 0);
+
+       ret = (strcmp(osf1_bigcrypt(password, get_this_salt()),
+                     get_this_crypted()) == 0);
        if (!ret) {
                DEBUG(2,
                      ("OSF1_ENH_SEC failed. Trying normal crypt.\n"));
-               ret = (strcmp((char *)crypt(password, this_salt), this_crypted) == 0);
+               ret = (strcmp((char *)crypt(password, get_this_salt()), get_this_crypted()) == 0);
        }
        if (ret) {
                return NT_STATUS_OK;
        } else {
                return NT_STATUS_WRONG_PASSWORD;
        }
-       
+
 #endif /* OSF1_ENH_SEC */
-       
+
 #ifdef ULTRIX_AUTH
-       ret = (strcmp((char *)crypt16(password, this_salt), this_crypted) == 0);
+       ret = (strcmp((char *)crypt16(password, get_this_salt()), get_this_crypted()) == 0);
        if (ret) {
                return NT_STATUS_OK;
         } else {
                return NT_STATUS_WRONG_PASSWORD;
        }
-       
+
 #endif /* ULTRIX_AUTH */
-       
+
 #ifdef LINUX_BIGCRYPT
-       ret = (linux_bigcrypt(password, this_salt, this_crypted));
+       ret = (linux_bigcrypt(password, get_this_salt(), get_this_crypted()));
         if (ret) {
                return NT_STATUS_OK;
        } else {
                return NT_STATUS_WRONG_PASSWORD;
        }
 #endif /* LINUX_BIGCRYPT */
-       
+
 #if defined(HAVE_BIGCRYPT) && defined(HAVE_CRYPT) && defined(USE_BOTH_CRYPT_CALLS)
-       
+
        /*
         * Some systems have bigcrypt in the C library but might not
         * actually use it for the password hashes (HPUX 10.20) is
@@ -665,31 +539,31 @@ static NTSTATUS password_check(char *password)
         * by crypt.
         */
 
-       if (strcmp(bigcrypt(password, this_salt), this_crypted) == 0)
+       if (strcmp(bigcrypt(password, get_this_salt()), get_this_crypted()) == 0)
                return NT_STATUS_OK;
        else
-               ret = (strcmp((char *)crypt(password, this_salt), this_crypted) == 0);
+               ret = (strcmp((char *)crypt(password, get_this_salt()), get_this_crypted()) == 0);
        if (ret) {
                return NT_STATUS_OK;
        } else {
                return NT_STATUS_WRONG_PASSWORD;
        }
 #else /* HAVE_BIGCRYPT && HAVE_CRYPT && USE_BOTH_CRYPT_CALLS */
-       
+
 #ifdef HAVE_BIGCRYPT
-       ret = (strcmp(bigcrypt(password, this_salt), this_crypted) == 0);
+       ret = (strcmp(bigcrypt(password, get_this_salt()), get_this_crypted()) == 0);
         if (ret) {
                return NT_STATUS_OK;
        } else {
                return NT_STATUS_WRONG_PASSWORD;
        }
 #endif /* HAVE_BIGCRYPT */
-       
+
 #ifndef HAVE_CRYPT
        DEBUG(1, ("Warning - no crypt available\n"));
        return NT_STATUS_LOGON_FAILURE;
 #else /* HAVE_CRYPT */
-       ret = (strcmp((char *)crypt(password, this_salt), this_crypted) == 0);
+       ret = (strcmp((char *)crypt(password, get_this_salt()), get_this_crypted()) == 0);
         if (ret) {
                return NT_STATUS_OK;
        } else {
@@ -697,7 +571,7 @@ static NTSTATUS password_check(char *password)
        }
 #endif /* HAVE_CRYPT */
 #endif /* HAVE_BIGCRYPT && HAVE_CRYPT && USE_BOTH_CRYPT_CALLS */
-#endif /* WITH_PAM || KRB4_AUTH || KRB5_AUTH */
+#endif /* WITH_PAM */
 }
 
 
@@ -709,46 +583,55 @@ match is found and is used to update the encrypted password file
 return NT_STATUS_OK on correct match, appropriate error otherwise
 ****************************************************************************/
 
-NTSTATUS pass_check(struct passwd *pass, char *user, char *password, 
-                   int pwlen, BOOL (*fn) (char *, char *), BOOL run_cracker)
+NTSTATUS pass_check(const struct passwd *pass,
+                   const char *user,
+                   const char *rhost,
+                   const char *password,
+                   bool run_cracker)
 {
-       pstring pass2;
-       int level = lp_passwordlevel();
+       char *pass2 = NULL;
 
        NTSTATUS nt_status;
-       if (password)
-               password[pwlen] = 0;
 
-#if DEBUG_PASSWORD
+#ifdef DEBUG_PASSWORD
        DEBUG(100, ("checking user=[%s] pass=[%s]\n", user, password));
 #endif
 
        if (!password)
                return NT_STATUS_LOGON_FAILURE;
 
-       if (((!*password) || (!pwlen)) && !lp_null_passwords())
+       if ((!*password) && !lp_null_passwords())
                return NT_STATUS_LOGON_FAILURE;
 
-#if defined(WITH_PAM) || defined(KRB4_AUTH) || defined(KRB5_AUTH)
+#if defined(WITH_PAM) 
 
        /*
         * If we're using PAM we want to short-circuit all the 
         * checks below and dive straight into the PAM code.
         */
 
-       fstrcpy(this_user, user);
+       DEBUG(4, ("pass_check: Checking (PAM) password for user %s\n", user));
 
-       DEBUG(4, ("pass_check: Checking (PAM) password for user %s (l=%d)\n", user, pwlen));
+#else /* Not using PAM */
 
-#else /* Not using PAM or Kerebos */
-
-       DEBUG(4, ("pass_check: Checking password for user %s (l=%d)\n", user, pwlen));
+       DEBUG(4, ("pass_check: Checking password for user %s\n", user));
 
        if (!pass) {
                DEBUG(3, ("Couldn't find user %s\n", user));
                return NT_STATUS_NO_SUCH_USER;
        }
 
+
+       /* Copy into global for the convenience of looping code */
+       /* Also the place to keep the 'password' no matter what
+          crazy struct it started in... */
+       if (set_this_crypted(pass->pw_passwd) == NULL) {
+               return NT_STATUS_NO_MEMORY;
+       }
+       if (set_this_salt(pass->pw_passwd) == NULL) {
+               return NT_STATUS_NO_MEMORY;
+       }
+
 #ifdef HAVE_GETSPNAM
        {
                struct spwd *spass;
@@ -759,8 +642,14 @@ NTSTATUS pass_check(struct passwd *pass, char *user, char *password,
                   perhaps for IPC password changing requests */
 
                spass = getspnam(pass->pw_name);
-               if (spass && spass->sp_pwdp)
-                       pstrcpy(pass->pw_passwd, spass->sp_pwdp);
+               if (spass && spass->sp_pwdp) {
+                       if (set_this_crypted(spass->sp_pwdp) == NULL) {
+                               return NT_STATUS_NO_MEMORY;
+                       }
+                       if (set_this_salt(spass->sp_pwdp) == NULL) {
+                               return NT_STATUS_NO_MEMORY;
+                       }
+               }
        }
 #elif defined(IA_UINFO)
        {
@@ -777,8 +666,23 @@ NTSTATUS pass_check(struct passwd *pass, char *user, char *password,
 #ifdef HAVE_GETPRPWNAM
        {
                struct pr_passwd *pr_pw = getprpwnam(pass->pw_name);
-               if (pr_pw && pr_pw->ufld.fd_encrypt)
-                       pstrcpy(pass->pw_passwd, pr_pw->ufld.fd_encrypt);
+               if (pr_pw && pr_pw->ufld.fd_encrypt) {
+                       if (set_this_crypted(pr_pw->ufld.fd_encrypt) == NULL) {
+                               return NT_STATUS_NO_MEMORY;
+                       }
+               }
+       }
+#endif
+
+#ifdef HAVE_GETPWANAM
+       {
+               struct passwd_adjunct *pwret;
+               pwret = getpwanam(s);
+               if (pwret && pwret->pwa_passwd) {
+                       if (set_this_crypted(pwret->pwa_passwd) == NULL) {
+                               return NT_STATUS_NO_MEMORY;
+                       }
+               }
        }
 #endif
 
@@ -789,8 +693,10 @@ NTSTATUS pass_check(struct passwd *pass, char *user, char *password,
                          user));
                mypasswd = getprpwnam(user);
                if (mypasswd) {
-                       fstrcpy(pass->pw_name, mypasswd->ufld.fd_name);
-                       fstrcpy(pass->pw_passwd, mypasswd->ufld.fd_encrypt);
+                       user = mypasswd->ufld.fd_name;
+                       if (set_this_crypted(mypasswd->ufld.fd_encrypt) == NULL) {
+                               return NT_STATUS_NO_MEMORY;
+                       }
                } else {
                        DEBUG(5,
                              ("OSF1_ENH_SEC: No entry for user %s in protected database !\n",
@@ -803,45 +709,49 @@ NTSTATUS pass_check(struct passwd *pass, char *user, char *password,
        {
                AUTHORIZATION *ap = getauthuid(pass->pw_uid);
                if (ap) {
-                       fstrcpy(pass->pw_passwd, ap->a_password);
+                       if (set_this_crypted(ap->a_password) == NULL) {
+                               endauthent();
+                               return NT_STATUS_NO_MEMORY;
+                       }
                        endauthent();
                }
        }
 #endif
 
-       /* extract relevant info */
-       fstrcpy(this_salt, pass->pw_passwd);
-
 #if defined(HAVE_TRUNCATED_SALT)
        /* crypt on some platforms (HPUX in particular)
           won't work with more than 2 salt characters. */
-       this_salt[2] = 0;
+       {
+               char *trunc_salt = get_this_salt();
+               if (!trunc_salt || strlen(trunc_salt) < 2) {
+                       return NT_STATUS_LOGON_FAILURE;
+               }
+               trunc_salt[2] = 0;
+               if (set_this_salt(trunc_salt) == NULL) {
+                       return NT_STATUS_NO_MEMORY;
+               }
+       }
 #endif
 
-       fstrcpy(this_crypted, pass->pw_passwd);
-
-       if (!*this_crypted) {
+       if (!get_this_crypted() || !*get_this_crypted()) {
                if (!lp_null_passwords()) {
                        DEBUG(2, ("Disallowing %s with null password\n",
-                                 this_user));
+                                 user));
                        return NT_STATUS_LOGON_FAILURE;
                }
                if (!*password) {
                        DEBUG(3,
                              ("Allowing access to %s with null password\n",
-                              this_user));
+                              user));
                        return NT_STATUS_OK;
                }
        }
 
-#endif /* defined(WITH_PAM) || defined(KRB4_AUTH) || defined(KRB5_AUTH) */
+#endif /* defined(WITH_PAM) */
 
        /* try it as it came to us */
-       nt_status = password_check(password);
+       nt_status = password_check(user, password, (const void *)rhost);
         if NT_STATUS_IS_OK(nt_status) {
-                if (fn) {
-                        fn(user, password);
-               }
                return (nt_status);
        } else if (!NT_STATUS_EQUAL(nt_status, NT_STATUS_WRONG_PASSWORD)) {
                 /* No point continuing if its not the password thats to blame (ie PAM disabled). */
@@ -860,37 +770,21 @@ NTSTATUS pass_check(struct passwd *pass, char *user, char *password,
        }
 
        /* make a copy of it */
-       StrnCpy(pass2, password, sizeof(pstring) - 1);
+       pass2 = talloc_strdup(talloc_tos(), password);
+       if (!pass2) {
+               return NT_STATUS_NO_MEMORY;
+       }
 
        /* try all lowercase if it's currently all uppercase */
-       if (strhasupper(password)) {
-               strlower(password);
-               if NT_STATUS_IS_OK(nt_status = password_check(password)) {
-                       if (fn)
-                               fn(user, password);
+       if (strhasupper(pass2)) {
+               if (!strlower_m(pass2)) {
+                       return NT_STATUS_INVALID_PARAMETER;
+               }
+               nt_status = password_check(user, pass2, (const void *)rhost);
+               if (NT_STATUS_IS_OK(nt_status)) {
                        return (nt_status);
                }
        }
 
-       /* give up? */
-       if (level < 1) {
-               /* restore it */
-               fstrcpy(password, pass2);
-               return NT_STATUS_WRONG_PASSWORD;
-       }
-
-       /* last chance - all combinations of up to level chars upper! */
-       strlower(password);
-
-        if NT_STATUS_IS_OK(nt_status = string_combinations(password, password_check, level)) {
-                if (fn)
-                       fn(user, password);
-               return nt_status;
-       }
-        
-       /* restore it */
-       fstrcpy(password, pass2);
-
        return NT_STATUS_WRONG_PASSWORD;
 }