]> granicus.if.org Git - linux-pam/blobdiff - modules/pam_unix/unix_chkpwd.c
Relevant BUGIDs:
[linux-pam] / modules / pam_unix / unix_chkpwd.c
index ff1d1bffa000d7c4e1f65df5a2971796ab9cbdd3..1e8944e9d6d67f5335e76586f7bac45548b3185d 100644 (file)
@@ -1,6 +1,4 @@
 /*
- * $Id$
- *
  * This program is designed to run setuid(root) or with sufficient
  * privilege to read all of the unix password databases. It is designed
  * to provide a mechanism for the current user (defined by this
  *
  */
 
-#include <security/_pam_aconf.h>
-
-#ifdef MEMORY_DEBUG
-# undef exit
-# undef strdup
-# undef free
-#endif /* MEMORY_DEBUG */
+#include "config.h"
 
 #include <stdarg.h>
 #include <stdio.h>
 #include <syslog.h>
 #include <unistd.h>
 #include <sys/types.h>
+#include <sys/stat.h>
 #include <pwd.h>
 #include <shadow.h>
 #include <signal.h>
+#include <time.h>
+#ifdef WITH_SELINUX
+#include <selinux/selinux.h>
+#define SELINUX_ENABLED (selinux_enabled!=-1 ? selinux_enabled : (selinux_enabled=is_selinux_enabled()>0))
+static security_context_t prev_context=NULL;
+static int selinux_enabled=-1;
+#else
+#define SELINUX_ENABLED 0
+#endif
 
 #define MAXPASS                200     /* the maximum length of a password */
 
+#include <security/_pam_types.h>
 #include <security/_pam_macros.h>
 
-#include "md5.h"
-
-extern char *crypt(const char *key, const char *salt);
-extern char *bigcrypt(const char *key, const char *salt);
-
-#define UNIX_PASSED    0
-#define UNIX_FAILED    1
+#include "passverify.h"
 
 /* syslogging function for errors and other information */
 
@@ -51,30 +48,12 @@ static void _log_err(int err, const char *format,...)
        va_list args;
 
        va_start(args, format);
-       openlog("unix_chkpwd", LOG_CONS | LOG_PID, LOG_AUTH);
+       openlog("unix_chkpwd", LOG_CONS | LOG_PID, LOG_AUTHPRIV);
        vsyslog(err, format, args);
        va_end(args);
        closelog();
 }
 
-static int _unix_shadowed(const struct passwd *pwd)
-{
-       char hashpass[1024];
-       if (pwd != NULL) {
-               if (strcmp(pwd->pw_passwd, "x") == 0) {
-                       return 1;
-               }
-               if (strlen(pwd->pw_name) < sizeof(hashpass) - 2) {
-                       strcpy(hashpass, "##");
-                       strcpy(hashpass + 2, pwd->pw_name);
-                       if (strcmp(pwd->pw_passwd, hashpass) == 0) {
-                               return 1;
-                       }
-               }
-       }
-       return 0;
-}
-
 static void su_sighandler(int sig)
 {
 #ifndef SA_RESETHAND
@@ -112,14 +91,39 @@ static void setup_signals(void)
        (void) sigaction(SIGQUIT, &action, NULL);
 }
 
+static int _verify_account(const char * const uname)
+{
+       struct spwd *spent;
+       struct passwd *pwent;
+
+       pwent = getpwnam(uname);
+       if (!pwent) {
+               _log_err(LOG_ALERT, "could not identify user (from getpwnam(%s))", uname);
+               return PAM_USER_UNKNOWN;
+       }
+
+       spent = getspnam( uname );
+       if (!spent) {
+               _log_err(LOG_ALERT, "could not get username from shadow (%s))", uname);
+               return PAM_AUTHINFO_UNAVAIL;    /* Couldn't get username from shadow */
+       }
+       printf("%ld:%ld:%ld:%ld:%ld:%ld",
+                spent->sp_lstchg, /* last password change */
+                 spent->sp_min, /* days until change allowed. */
+                 spent->sp_max, /* days before change required */
+                 spent->sp_warn, /* days warning for expiration */
+                 spent->sp_inact, /* days before account inactive */
+                 spent->sp_expire); /* date when account expires */
+
+       return PAM_SUCCESS;
+}
+
 static int _unix_verify_password(const char *name, const char *p, int nullok)
 {
        struct passwd *pwd = NULL;
        struct spwd *spwdent = NULL;
        char *salt = NULL;
-       char *pp = NULL;
-       int retval = UNIX_FAILED;
-       int salt_len;
+       int retval = PAM_AUTH_ERR;
 
        /* UNIX passwords area */
        setpwent();
@@ -154,58 +158,19 @@ static int _unix_verify_password(const char *name, const char *p, int nullok)
                }
        }
        if (pwd == NULL || salt == NULL) {
-               _log_err(LOG_ALERT, "check pass; user unknown");
-               p = NULL;
-               return retval;
-       }
-
-       salt_len = strlen(salt);
-       if (salt_len == 0)
-               return (nullok == 0) ? UNIX_FAILED : UNIX_PASSED;
-       else if (p == NULL || strlen(p) == 0)
-               return UNIX_FAILED;
-
-       /* the moment of truth -- do we agree with the password? */
-       retval = UNIX_FAILED;
-       if (!strncmp(salt, "$1$", 3)) {
-               pp = Goodcrypt_md5(p, salt);
-               if (strcmp(pp, salt) == 0) {
-                       retval = UNIX_PASSED;
-               } else {
-                       pp = Brokencrypt_md5(p, salt);
-                       if (strcmp(pp, salt) == 0)
-                               retval = UNIX_PASSED;
-               }
-       } else if ((*salt == '*') || (salt_len < 13)) {
-           retval = UNIX_FAILED;
+               _log_err(LOG_WARNING, "check pass; user unknown");
+               retval = PAM_USER_UNKNOWN;
        } else {
-               pp = bigcrypt(p, salt);
-               /*
-                * Note, we are comparing the bigcrypt of the password with
-                * the contents of the password field. If the latter was
-                * encrypted with regular crypt (and not bigcrypt) it will
-                * have been truncated for storage relative to the output
-                * of bigcrypt here. As such we need to compare only the
-                * stored string with the subset of bigcrypt's result.
-                * Bug 521314: the strncmp comparison is for legacy support.
-                */
-               if (strncmp(pp, salt, salt_len) == 0) {
-                       retval = UNIX_PASSED;
-               }
+               retval = verify_pwd_hash(p, salt, nullok);
        }
-       p = NULL;               /* no longer needed here */
 
-       /* clean up */
-       {
-               char *tp = pp;
-               if (pp != NULL) {
-                       while (tp && *tp)
-                               *tp++ = '\0';
-                       free(pp);
-               }
-               pp = tp = NULL;
+       if (salt) {
+               _pam_overwrite(salt);
+               _pam_drop(salt);
        }
 
+       p = NULL;               /* no longer needed here */
+
        return retval;
 }
 
@@ -220,17 +185,178 @@ static char *getuidname(uid_t uid)
 
        strncpy(username, pw->pw_name, sizeof(username));
        username[sizeof(username) - 1] = '\0';
-       
+
        return username;
 }
 
+#define SH_TMPFILE             "/etc/nshadow"
+static int _update_shadow(const char *forwho)
+{
+    struct spwd *spwdent = NULL, *stmpent = NULL;
+    FILE *pwfile, *opwfile;
+    int err = 1;
+    int oldmask;
+    struct stat st;
+    char pass[MAXPASS + 1];
+    char towhat[MAXPASS + 1];
+    int npass=0;
+
+    /* read the password from stdin (a pipe from the pam_unix module) */
+
+    npass = read(STDIN_FILENO, pass, MAXPASS);
+
+    if (npass < 0) {   /* is it a valid password? */
+
+      _log_err(LOG_DEBUG, "no password supplied");
+      return PAM_AUTHTOK_ERR;
+
+    } else if (npass >= MAXPASS) {
+
+      _log_err(LOG_DEBUG, "password too long");
+      return PAM_AUTHTOK_ERR;
+
+    } else {
+      /* does pass agree with the official one? */
+      int retval=0;
+      pass[npass] = '\0';      /* NUL terminate */
+      retval = _unix_verify_password(forwho, pass, 0);
+      if (retval != PAM_SUCCESS) {
+       return retval;
+      }
+    }
+
+    /* read the password from stdin (a pipe from the pam_unix module) */
+
+    npass = read(STDIN_FILENO, towhat, MAXPASS);
+
+    if (npass < 0) {   /* is it a valid password? */
+
+      _log_err(LOG_DEBUG, "no new password supplied");
+      return PAM_AUTHTOK_ERR;
+
+    } else if (npass >= MAXPASS) {
+
+      _log_err(LOG_DEBUG, "new password too long");
+      return PAM_AUTHTOK_ERR;
+
+    }
+
+    towhat[npass] = '\0';      /* NUL terminate */
+    spwdent = getspnam(forwho);
+    if (spwdent == NULL) {
+       return PAM_USER_UNKNOWN;
+    }
+    oldmask = umask(077);
+
+#ifdef WITH_SELINUX
+    if (SELINUX_ENABLED) {
+      security_context_t shadow_context=NULL;
+      if (getfilecon("/etc/shadow",&shadow_context)<0) {
+       return PAM_AUTHTOK_ERR;
+      };
+      if (getfscreatecon(&prev_context)<0) {
+       freecon(shadow_context);
+       return PAM_AUTHTOK_ERR;
+      }
+      if (setfscreatecon(shadow_context)) {
+       freecon(shadow_context);
+       freecon(prev_context);
+       return PAM_AUTHTOK_ERR;
+      }
+      freecon(shadow_context);
+    }
+#endif
+    pwfile = fopen(SH_TMPFILE, "w");
+    umask(oldmask);
+    if (pwfile == NULL) {
+       err = 1;
+       goto done;
+    }
+
+    opwfile = fopen("/etc/shadow", "r");
+    if (opwfile == NULL) {
+       fclose(pwfile);
+       err = 1;
+       goto done;
+    }
+
+    if (fstat(fileno(opwfile), &st) == -1) {
+       fclose(opwfile);
+       fclose(pwfile);
+       err = 1;
+       goto done;
+    }
+
+    if (fchown(fileno(pwfile), st.st_uid, st.st_gid) == -1) {
+       fclose(opwfile);
+       fclose(pwfile);
+       err = 1;
+       goto done;
+    }
+    if (fchmod(fileno(pwfile), st.st_mode) == -1) {
+       fclose(opwfile);
+       fclose(pwfile);
+       err = 1;
+       goto done;
+    }
+
+    stmpent = fgetspent(opwfile);
+    while (stmpent) {
+
+       if (!strcmp(stmpent->sp_namp, forwho)) {
+           stmpent->sp_pwdp = towhat;
+           stmpent->sp_lstchg = time(NULL) / (60 * 60 * 24);
+           err = 0;
+           D(("Set password %s for %s", stmpent->sp_pwdp, forwho));
+       }
+
+       if (putspent(stmpent, pwfile)) {
+           D(("error writing entry to shadow file: %m"));
+           err = 1;
+           break;
+       }
+
+       stmpent = fgetspent(opwfile);
+    }
+    fclose(opwfile);
+
+    if (fclose(pwfile)) {
+       D(("error writing entries to shadow file: %m"));
+       err = 1;
+    }
+
+ done:
+    if (!err) {
+       if (rename(SH_TMPFILE, "/etc/shadow"))
+           err = 1;
+    }
+
+#ifdef WITH_SELINUX
+    if (SELINUX_ENABLED) {
+      if (setfscreatecon(prev_context)) {
+       err = 1;
+      }
+      if (prev_context)
+       freecon(prev_context);
+      prev_context=NULL;
+    }
+#endif
+
+    if (!err) {
+       return PAM_SUCCESS;
+    } else {
+       unlink(SH_TMPFILE);
+       return PAM_AUTHTOK_ERR;
+    }
+}
+
 int main(int argc, char *argv[])
 {
        char pass[MAXPASS + 1];
-       char option[8];
+       char *option;
        int npass, nullok;
        int force_failure = 0;
-       int retval = UNIX_FAILED;
+       int retval = PAM_AUTH_ERR;
        char *user;
 
        /*
@@ -247,8 +373,7 @@ int main(int argc, char *argv[])
         * account).
         */
 
-       if (isatty(STDIN_FILENO)) {
-
+       if (isatty(STDIN_FILENO) || argc != 3 ) {
                _log_err(LOG_NOTICE
                      ,"inappropriate use of Unix helper binary [UID=%d]"
                         ,getuid());
@@ -256,36 +381,45 @@ int main(int argc, char *argv[])
                 ,"This binary is not designed for running in this way\n"
                      "-- the system administrator has been informed\n");
                sleep(10);      /* this should discourage/annoy the user */
-               return UNIX_FAILED;
+               return PAM_SYSTEM_ERR;
        }
 
        /*
-        * determine the current user's name is
+        * Determine what the current user's name is.
+        * On a SELinux enabled system with a strict policy leaving the
+        * existing check prevents shadow password authentication from working.
+        * We must thus skip the check if the real uid is 0.
         */
-       user = getuidname(getuid());
-       if (argc == 2) {
-           /* if the caller specifies the username, verify that user
-              matches it */
-           if (strcmp(user, argv[1])) {
-               force_failure = 1;
-           }
+       if (SELINUX_ENABLED && getuid() == 0) {
+         user=argv[1];
+       }
+       else {
+         user = getuidname(getuid());
+         /* if the caller specifies the username, verify that user
+            matches it */
+         if (strcmp(user, argv[1])) {
+           return PAM_AUTH_ERR;
+         }
        }
 
-       /* read the nullok/nonull option */
+       option=argv[2];
 
-       npass = read(STDIN_FILENO, option, 8);
+       if (strncmp(argv[2], "verify", 8) == 0) {
+         /* Get the account information from the shadow file */
+         return _verify_account(argv[1]);
+       }
 
-       if (npass < 0) {
-               _log_err(LOG_DEBUG, "no option supplied");
-               return UNIX_FAILED;
-       } else {
-               option[7] = '\0';
-               if (strncmp(option, "nullok", 8) == 0)
-                       nullok = 1;
-               else
-                       nullok = 0;
+       if (strncmp(option, "shadow", 8) == 0) {
+         /* Attempting to change the password */
+         return _update_shadow(argv[1]);
        }
 
+       /* read the nullok/nonull option */
+       if (strncmp(option, "nullok", 8) == 0)
+         nullok = 1;
+       else
+         nullok = 0;
+
        /* read the password from stdin (a pipe from the pam_unix module) */
 
        npass = read(STDIN_FILENO, pass, MAXPASS);
@@ -317,10 +451,11 @@ int main(int argc, char *argv[])
 
        /* return pass or fail */
 
-       if ((retval != UNIX_PASSED) || force_failure) {
-           return UNIX_FAILED;
+       if ((retval != PAM_SUCCESS) || force_failure) {
+           _log_err(LOG_NOTICE, "password check failed for user (%s)", user);
+           return PAM_AUTH_ERR;
        } else {
-           return UNIX_PASSED;
+           return PAM_SUCCESS;
        }
 }
 
@@ -339,13 +474,13 @@ int main(int argc, char *argv[])
  * 3. The name of the author may not be used to endorse or promote
  *    products derived from this software without specific prior
  *    written permission.
- * 
+ *
  * ALTERNATIVELY, this product may be distributed under the terms of
  * the GNU Public License, in which case the provisions of the GPL are
  * required INSTEAD OF the above restrictions.  (This clause is
  * necessary due to a potential bad interaction between the GPL and
  * the restrictions contained in a BSD-style copyright.)
- * 
+ *
  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE