]> granicus.if.org Git - shadow/blobdiff - src/usermod.c
[svn-upgrade] Integrating new upstream version, shadow (4.0.14)
[shadow] / src / usermod.c
index 447e3c649159eefc88cf16901ce7eb5674619036..9e153d30672708c80afd018d743c9e701292c6fd 100644 (file)
@@ -17,7 +17,7 @@
  * THIS SOFTWARE IS PROVIDED BY JULIE HAUGH AND CONTRIBUTORS ``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 DISCLAIMED.  IN NO EVENT SHALL JULIE HAUGH OR CONTRIBUTORS BE LIABLE
+ * ARE DISCLAIMED. IN NO EVENT SHALL JULIE HAUGH OR CONTRIBUTORS BE LIABLE
  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 
 #include <config.h>
 
-#include "rcsid.h"
-RCSID(PKG_VER "$Id: usermod.c,v 1.19 2000/09/02 18:40:44 marekm Exp $")
+#ident "$Id: usermod.c,v 1.64 2005/12/05 18:19:47 kloczek Exp $"
 
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <stdio.h>
-#include <errno.h>
-#include <pwd.h>
-#include <grp.h>
 #include <ctype.h>
+#include <errno.h>
 #include <fcntl.h>
+#include <getopt.h>
+#include <grp.h>
+#include <lastlog.h>
+#include <pwd.h>
+#ifdef USE_PAM
+#include "pam_defs.h"
+#endif                         /* USE_PAM */
+#include <stdio.h>
+#include <sys/stat.h>
+#include <sys/types.h>
 #include <time.h>
-
-#include "prototypes.h"
-#include "defines.h"
 #include "chkname.h"
+#include "defines.h"
 #include "faillog.h"
-#if HAVE_LASTLOG_H
-#include <lastlog.h>
-#else
-#include "lastlog_.h"
-#endif
-#include "pwauth.h"
 #include "getdef.h"
-
+#include "groupio.h"
+#include "nscd.h"
+#include "prototypes.h"
+#include "pwauth.h"
+#include "pwio.h"
+#ifdef SHADOWGRP
+#include "sgroupio.h"
+#endif
+#include "shadowio.h"
 /*
  * exit status values
  * for E_GRP_UPDATE and E_NOSPACE (not used yet), other update requests
@@ -63,17 +67,18 @@ RCSID(PKG_VER "$Id: usermod.c,v 1.19 2000/09/02 18:40:44 marekm Exp $")
 #define E_PW_UPDATE    1       /* can't update password file */
 #define E_USAGE                2       /* invalid command syntax */
 #define E_BAD_ARG      3       /* invalid argument to option */
-#define E_UID_IN_USE   4       /* uid already in use (and no -o) */
-/* #define E_BAD_PWFILE        5 */    /* passwd file contains errors */
+#define E_UID_IN_USE   4       /* UID already in use (and no -o) */
+/* #define E_BAD_PWFILE     5 *//* passwd file contains errors */
 #define E_NOTFOUND     6       /* specified user/group doesn't exist */
 #define E_USER_BUSY    8       /* user to modify is logged in */
 #define E_NAME_IN_USE  9       /* username already in use */
 #define E_GRP_UPDATE   10      /* can't update group file */
-/* #define E_NOSPACE   11 */   /* insufficient space to move home dir */
+/* #define E_NOSPACE        11 *//* insufficient space to move home dir */
 #define E_HOMEDIR      12      /* unable to complete home dir move */
-
 #define        VALID(s)        (strcspn (s, ":\n") == strlen (s))
-
+/*
+ * Global variables
+ */
 static char *user_name;
 static char *user_newname;
 static char *user_pass;
@@ -82,136 +87,97 @@ static uid_t user_newid;
 static gid_t user_gid;
 static gid_t user_newgid;
 static char *user_comment;
+static char *user_newcomment;  /* Audit */
 static char *user_home;
 static char *user_newhome;
 static char *user_shell;
-#ifdef SHADOWPWD
+static char *user_newshell;    /* Audit */
+
 static long user_expire;
+static long user_newexpire;    /* Audit */
 static long user_inactive;
-#endif
-static char *user_groups[NGROUPS_MAX+1];  /* NULL-terminated list */
+static long user_newinactive;  /* Audit */
+static long sys_ngroups;
+static char **user_groups;     /* NULL-terminated list */
 
 static char *Prog;
 
-#ifdef AUTH_METHODS
-static char *auth_arg;
-static char user_auth[BUFSIZ];
-static int Aflg = 0; /* specify user defined authentication method */
-#else
-#define Aflg 0
-#endif
-
 static int
-       uflg = 0, /* specify new user ID */
-       oflg = 0, /* permit non-unique user ID to be specified with -u */
-       gflg = 0, /* new primary group ID */
-       Gflg = 0, /* new secondary group set */
-       dflg = 0, /* new home directory */
-       sflg = 0, /* new shell program */
-       cflg = 0, /* new comment (GECOS) field */
-       mflg = 0, /* create user's home directory if it doesn't exist */
-#ifdef SHADOWPWD
-       fflg = 0, /* days until account with expired password is locked */
-       eflg = 0, /* days since 1970-01-01 when account becomes expired */
-#endif
-       Lflg = 0, /* lock the password */
-       Uflg = 0, /* unlock the password */
-       pflg = 0, /* new encrypted password */
-       lflg = 0; /* new user name */
-
-#ifdef NDBM
-extern int     pw_dbm_mode;
-#ifdef SHADOWPWD
-extern int     sp_dbm_mode;
-#endif
-extern int     gr_dbm_mode;
-#ifdef SHADOWGRP
-extern int     sg_dbm_mode;
-#endif
-#endif
+ aflg = 0,                     /* append to existing secondary group set */
+    cflg = 0,                  /* new comment (GECOS) field */
+    dflg = 0,                  /* new home directory */
+    eflg = 0,                  /* days since 1970-01-01 when account becomes expired */
+    fflg = 0,                  /* days until account with expired password is locked */
+    gflg = 0,                  /* new primary group ID */
+    Gflg = 0,                  /* new secondary group set */
+    Lflg = 0,                  /* lock the password */
+    lflg = 0,                  /* new user name */
+    mflg = 0,                  /* create user's home directory if it doesn't exist */
+    oflg = 0,                  /* permit non-unique user ID to be specified with -u */
+    pflg = 0,                  /* new encrypted password */
+    sflg = 0,                  /* new shell program */
+    uflg = 0,                  /* specify new user ID */
+    Uflg = 0;                  /* unlock the password */
 
-#ifdef SHADOWPWD
 static int is_shadow_pwd;
-#endif
+
 #ifdef SHADOWGRP
 static int is_shadow_grp;
 #endif
 
-#include "groupio.h"
 
-#ifdef SHADOWGRP
-#include "sgroupio.h"
-#endif
+/* local function prototypes */
+static int get_groups (char *);
+static void usage (void);
+static void new_pwent (struct passwd *);
 
-#include "pwio.h"
+static void new_spent (struct spwd *);
+static void fail_exit (int);
+static int update_group (void);
 
-#ifdef SHADOWPWD
-#include "shadowio.h"
+#ifdef SHADOWGRP
+static int update_gshadow (void);
 #endif
+static int grp_update (void);
 
-extern char *optarg;
-extern int optind;
+static long get_number (const char *);
+static uid_t get_id (const char *);
+static void process_flags (int, char **);
+static void close_files (void);
+static void open_files (void);
+static void usr_update (void);
+static void move_home (void);
+static void update_files (void);
 
-/* local function prototypes */
-static int get_groups(char *);
-static void usage(void);
-static void new_pwent(struct passwd *);
-#ifdef SHADOWPWD
-static void new_spent(struct spwd *);
-#endif
-static void fail_exit(int);
-static int update_group(void);
-#ifdef SHADOWGRP
-static int update_gshadow(void);
-#endif
-static int grp_update(void);
-#ifdef AUTH_METHODS
-static char *get_password(const char *);
-static void split_auths(char *, char **);
-static void update_auths(const char *, const char *, char *);
-static void add_auths(const char *, const char *, char *);
-static void delete_auths(const char *, const char *, char *);
-static void convert_auth(char *, const char *, const char *);
-static int valid_auth(const char *);
-#endif
-static long get_number(const char *);
-static void process_flags(int, char **);
-static void close_files(void);
-static void open_files(void);
-static void usr_update(void);
-static void move_home(void);
-static void update_files(void);
 #ifndef NO_MOVE_MAILBOX
-static void move_mailbox(void);
+static void move_mailbox (void);
 #endif
 
-/* Had to move this over from useradd.c since we have groups named
+/*
+ * Had to move this over from useradd.c since we have groups named
  * "56k-family"... ergh.
- * --Pac. */
-static struct group *
-getgr_nam_gid(const char *name)
+ * --Pac.
+ */
+static struct group *getgr_nam_gid (const char *name)
 {
        gid_t gid;
        char *ep;
 
-       gid = strtol(name, &ep, 10);
-       if (*name != '\0' && *ep == '\0')  /* valid numeric gid */
-               return getgrgid(gid);
+       gid = strtoul (name, &ep, 10);
+       if (*name != '\0' && *ep == '\0')       /* valid numeric GID */
+               return getgrgid (gid);
 
-       return getgrnam(name);
+       return getgrnam (name);
 }
 
-
 /*
  * get_groups - convert a list of group names to an array of group IDs
  *
  *     get_groups() takes a comma-separated list of group names and
- *     converts it to a NULL-terminated array.  Any unknown group
- *     names are reported as errors.
+ *     converts it to a NULL-terminated array. Any unknown group names are
+ *     reported as errors.
  */
-
-static int
-get_groups(char *list)
+static int get_groups (char *list)
 {
        char *cp;
        const struct group *grp;
@@ -221,18 +187,16 @@ get_groups(char *list)
        /*
         * Initialize the list to be empty
         */
-
        user_groups[0] = (char *) 0;
 
-       if (! *list)
+       if (!*list)
                return 0;
 
        /*
-        * So long as there is some data to be converted, strip off
-        * each name and look it up.  A mix of numerical and string
-        * values for group identifiers is permitted.
+        * So long as there is some data to be converted, strip off each
+        * name and look it up. A mix of numerical and string values for
+        * group identifiers is permitted.
         */
-
        do {
                /*
                 * Strip off a single name from the list
@@ -241,54 +205,54 @@ get_groups(char *list)
                        *cp++ = '\0';
 
                /*
-                * Names starting with digits are treated as numerical
-                * GID values, otherwise the string is looked up as is.
+                * Names starting with digits are treated as numerical GID
+                * values, otherwise the string is looked up as is.
                 */
-               grp = getgr_nam_gid(list);
+               grp = getgr_nam_gid (list);
 
                /*
                 * There must be a match, either by GID value or by
                 * string name.
                 */
                if (!grp) {
-                       fprintf(stderr, _("%s: unknown group %s\n"),
-                               Prog, list);
+                       fprintf (stderr, _("%s: unknown group %s\n"),
+                                Prog, list);
                        errors++;
                }
                list = cp;
 
                /*
-                * If the group doesn't exist, don't dump core...
-                * Instead, try the next one.  --marekm
+                * If the group doesn't exist, don't dump core. Instead,
+                * try the next one.  --marekm
                 */
-               if (! grp)
+               if (!grp)
                        continue;
 
 #ifdef USE_NIS
                /*
-                * Don't add this group if they are an NIS group.  Tell
-                * the user to go to the server for this group.
+                * Don't add this group if they are an NIS group. Tell the
+                * user to go to the server for this group.
                 */
-
                if (__isgrNIS ()) {
-                       fprintf(stderr, _("%s: group `%s' is a NIS group.\n"),
-                               Prog, grp->gr_name);
+                       fprintf (stderr,
+                                _("%s: group `%s' is a NIS group.\n"),
+                                Prog, grp->gr_name);
                        continue;
                }
 #endif
 
-               if (ngroups == NGROUPS_MAX) {
-                       fprintf(stderr,
-                               _("%s: too many groups specified (max %d).\n"),
-                               Prog, ngroups);
+               if (ngroups == sys_ngroups) {
+                       fprintf (stderr,
+                                _
+                                ("%s: too many groups specified (max %d).\n"),
+                                Prog, ngroups);
                        break;
                }
 
                /*
                 * Add the group name to the user's list of groups.
                 */
-
-               user_groups[ngroups++] = xstrdup(grp->gr_name);
+               user_groups[ngroups++] = xstrdup (grp->gr_name);
        } while (list);
 
        user_groups[ngroups] = (char *) 0;
@@ -296,7 +260,6 @@ get_groups(char *list)
        /*
         * Any errors in finding group names are fatal
         */
-
        if (errors)
                return -1;
 
@@ -306,53 +269,69 @@ get_groups(char *list)
 /*
  * usage - display usage message and exit
  */
-
-static void
-usage(void)
+static void usage (void)
 {
-       fprintf(stderr,
-               _("usage: %s\t[-u uid [-o]] [-g group] [-G group,...] \n"),
-               Prog);
-       fprintf(stderr,
-               _("\t\t[-d home [-m]] [-s shell] [-c comment] [-l new_name]\n"));
-       fprintf(stderr, "\t\t");
-#ifdef SHADOWPWD
-       fprintf(stderr, _("[-f inactive] [-e expire ] "));
-#endif
-#ifdef AUTH_METHODS
-       fprintf(stderr, _("[-A {DEFAULT|program},... ] "));
-#endif
-       fprintf(stderr, _("[-p passwd] [-L|-U] name\n"));
-       exit(E_USAGE);
+       fprintf (stderr, _("Usage: usermod [options] login\n"
+                          "\n"
+                          "Options:\n"
+                          "  -a, --append GROUP                append the user to the supplemental GROUP\n"
+                          "  -c, --comment COMMENT             new value of the GECOS field\n"
+                          "  -d, --home HOME_DIR               new login directory for the new user account\n"
+                          "  -e, --expiredate EXPIRE_DATE      set account expiration date to EXPIRE_DATE\n"
+                          "  -f, --inactive INACTIVE   set password inactive after expiration\n"
+                          "                            to INACTIVE\n"
+                          "  -g, --gid GROUP           force use GROUP as new initial login group\n"
+                          "  -G, --groups GROUPS               list of supplementary GROUPS\n"
+                          "  -h, --help                        display this help message and exit\n"
+                          "  -l, --login LOGIN         new value of the login name\n"
+                          "  -L, --lock                        lock the user account\n"
+                          "  -m, --move-home           move contents of the home directory to the new\n"
+                          "                            location (use only with -d)\n"
+                          "  -o, --non-unique          allow using duplicate (non-unique) UID\n"
+                          "  -p, --password PASSWORD   use encrypted password for the new password\n"
+                          "  -s, --shell SHELL         new login shell for the user account\n"
+                          "  -u, --uid UID                     new UID for the user account\n"
+                          "  -U, --unlock                      unlock the user account\n"));
+       exit (E_USAGE);
 }
 
-/* update encrypted password string (for both shadow and non-shadow passwords) */
-
-static char *
-new_pw_passwd(char *pw_pass, const char *pw_name)
+/*
+ * update encrypted password string (for both shadow and non-shadow
+ * passwords)
+ */
+static char *new_pw_passwd (char *pw_pass, const char *pw_name)
 {
        if (Lflg && pw_pass[0] != '!') {
-               char *buf = xmalloc(strlen(pw_pass) + 2);
+               char *buf = xmalloc (strlen (pw_pass) + 2);
 
-               SYSLOG((LOG_INFO, "lock user `%s' password\n",
-                       pw_name));
-               strcpy(buf, "!");
-               strcat(buf, pw_pass);
+#ifdef WITH_AUDIT
+               audit_logger (AUDIT_USER_CHAUTHTOK, Prog, "updating passwd",
+                             user_newname, user_newid, 0);
+#endif
+               SYSLOG ((LOG_INFO, "lock user `%s' password", pw_name));
+               strcpy (buf, "!");
+               strcat (buf, pw_pass);
                pw_pass = buf;
        } else if (Uflg && pw_pass[0] == '!') {
                char *s;
 
-               SYSLOG((LOG_INFO, "unlock user `%s' password\n",
-                       pw_name));
+#ifdef WITH_AUDIT
+               audit_logger (AUDIT_USER_CHAUTHTOK, Prog, "updating password",
+                             user_newname, user_newid, 0);
+#endif
+               SYSLOG ((LOG_INFO, "unlock user `%s' password", pw_name));
                s = pw_pass;
                while (*s) {
                        *s = *(s + 1);
                        s++;
                }
        } else if (pflg) {
-               SYSLOG((LOG_INFO, "change user `%s' password\n",
-                       pw_name));
-               pw_pass = xstrdup(user_pass);
+#ifdef WITH_AUDIT
+               audit_logger (AUDIT_USER_CHAUTHTOK, Prog, "changing password",
+                             user_newname, user_newid, 1);
+#endif
+               SYSLOG ((LOG_INFO, "change user `%s' password", pw_name));
+               pw_pass = xstrdup (user_pass);
        }
        return pw_pass;
 }
@@ -360,103 +339,194 @@ new_pw_passwd(char *pw_pass, const char *pw_name)
 /*
  * new_pwent - initialize the values in a password file entry
  *
- *     new_pwent() takes all of the values that have been entered and
- *     fills in a (struct passwd) with them.
+ *     new_pwent() takes all of the values that have been entered and fills
+ *     in a (struct passwd) with them.
  */
-
-static void
-new_pwent(struct passwd *pwent)
+static void new_pwent (struct passwd *pwent)
 {
        if (lflg) {
-               SYSLOG((LOG_INFO, "change user name `%s' to `%s'\n",
-                       pwent->pw_name, user_newname));
+#ifdef WITH_AUDIT
+               audit_logger (AUDIT_USER_CHAUTHTOK, Prog, "changing name",
+                             user_newname, user_newid, 1);
+#endif
+               SYSLOG ((LOG_INFO, "change user name `%s' to `%s'",
+                        pwent->pw_name, user_newname));
                pwent->pw_name = xstrdup (user_newname);
        }
-
-#ifdef SHADOWPWD
        if (!is_shadow_pwd)
-#endif
-       pwent->pw_passwd = new_pw_passwd(pwent->pw_passwd, pwent->pw_name);
+               pwent->pw_passwd =
+                   new_pw_passwd (pwent->pw_passwd, pwent->pw_name);
 
        if (uflg) {
-               SYSLOG((LOG_INFO, "change user `%s' UID from `%d' to `%d'\n",
-                       pwent->pw_name, pwent->pw_uid, user_newid));
+#ifdef WITH_AUDIT
+               audit_logger (AUDIT_USER_CHAUTHTOK, Prog, "changing uid",
+                             user_newname, user_newid, 1);
+#endif
+               SYSLOG ((LOG_INFO,
+                        "change user `%s' UID from `%d' to `%d'",
+                        pwent->pw_name, pwent->pw_uid, user_newid));
                pwent->pw_uid = user_newid;
        }
        if (gflg) {
-               SYSLOG((LOG_INFO, "change user `%s' GID from `%d' to `%d'\n",
-                       pwent->pw_name, pwent->pw_gid, user_newgid));
+#ifdef WITH_AUDIT
+               audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                             "changing primary group", user_newname,
+                             user_newid, 1);
+#endif
+               SYSLOG ((LOG_INFO,
+                        "change user `%s' GID from `%d' to `%d'",
+                        pwent->pw_name, pwent->pw_gid, user_newgid));
                pwent->pw_gid = user_newgid;
        }
-       if (cflg)
+       if (cflg) {
+#ifdef WITH_AUDIT
+               audit_logger (AUDIT_USER_CHAUTHTOK, Prog, "changing comment",
+                             user_newname, user_newid, 1);
+               pwent->pw_gecos = user_newcomment;
+#else
                pwent->pw_gecos = user_comment;
+#endif
+       }
 
        if (dflg) {
-               SYSLOG((LOG_INFO, "change user `%s' home from `%s' to `%s'\n",
-                       pwent->pw_name, pwent->pw_dir, user_newhome));
+#ifdef WITH_AUDIT
+               audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                             "changing home directory", user_newname,
+                             user_newid, 1);
+#endif
+               SYSLOG ((LOG_INFO,
+                        "change user `%s' home from `%s' to `%s'",
+                        pwent->pw_name, pwent->pw_dir, user_newhome));
                pwent->pw_dir = user_newhome;
        }
        if (sflg) {
-               SYSLOG((LOG_INFO, "change user `%s' shell from `%s' to `%s'\n",
-                       pwent->pw_name, pwent->pw_shell, user_shell));
+#ifdef WITH_AUDIT
+               audit_logger (AUDIT_USER_CHAUTHTOK, Prog, "changing user shell",
+                             user_newname, user_newid, 1);
+               SYSLOG ((LOG_INFO, "change user `%s' shell from `%s' to `%s'",
+                        pwent->pw_name, pwent->pw_shell, user_newshell));
+               pwent->pw_shell = user_newshell;
+#else
+               SYSLOG ((LOG_INFO,
+                        "change user `%s' shell from `%s' to `%s'",
+                        pwent->pw_name, pwent->pw_shell, user_shell));
                pwent->pw_shell = user_shell;
+#endif
        }
 }
 
-#ifdef SHADOWPWD
 /*
  * new_spent - initialize the values in a shadow password file entry
  *
- *     new_spent() takes all of the values that have been entered and
- *     fills in a (struct spwd) with them.
+ *     new_spent() takes all of the values that have been entered and fills
+ *     in a (struct spwd) with them.
  */
-
-static void
-new_spent(struct spwd *spent)
+static void new_spent (struct spwd *spent)
 {
        if (lflg)
                spent->sp_namp = xstrdup (user_newname);
 
        if (fflg) {
-               SYSLOG((LOG_INFO,
-                       "change user `%s' inactive from `%ld' to `%ld'\n",
-                       spent->sp_namp, spent->sp_inact, user_inactive));
+#ifdef WITH_AUDIT
+               audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                             "changing inactive days", user_newname,
+                             user_newid, 1);
+               SYSLOG ((LOG_INFO,
+                        "change user `%s' inactive from `%ld' to `%ld'",
+                        spent->sp_namp, spent->sp_inact, user_newinactive));
+               spent->sp_inact = user_newinactive;
+#else
+
+               SYSLOG ((LOG_INFO,
+                        "change user `%s' inactive from `%ld' to `%ld'",
+                        spent->sp_namp, spent->sp_inact, user_inactive));
                spent->sp_inact = user_inactive;
+#endif
        }
        if (eflg) {
                /* XXX - dates might be better than numbers of days.  --marekm */
-               SYSLOG((LOG_INFO,
-                       "change user `%s' expiration from `%ld' to `%ld'\n",
-                       spent->sp_namp, spent->sp_expire, user_expire));
+#ifdef WITH_AUDIT
+               if (audit_fd >= 0) {
+                       time_t exp_t;
+                       struct tm *exp_tm;
+                       char new_exp[16], old_exp[16];
+
+                       if (user_newexpire == -1)
+                               new_exp[0] = '\0';
+                       else {
+                               exp_t = user_newexpire * DAY;
+                               exp_tm = gmtime (&exp_t);
+#ifdef HAVE_STRFTIME
+                               strftime (new_exp, sizeof (new_exp), "%Y-%m-%d",
+                                         exp_tm);
+#else
+                               memset (new_exp, 0, sizeof (new_exp));
+                               snprintf (new_exp, sizeof (new_exp) - 1,
+                                         "%04i-%02i-%02i",
+                                         exp_tm->tm_year + 1900,
+                                         exp_tm->tm_mon + 1, exp_tm->tm_mday);
+#endif
+                       }
+
+                       if (user_expire == -1)
+                               old_exp[0] = '\0';
+                       else {
+                               exp_t = user_expire * DAY;
+                               exp_tm = gmtime (&exp_t);
+#ifdef HAVE_STRFTIME
+                               strftime (old_exp, sizeof (old_exp), "%Y-%m-%d",
+                                         exp_tm);
+#else
+                               memset (old_exp, 0, sizeof (old_exp));
+                               snprintf (old_exp, sizeof (old_exp) - 1,
+                                         "%04i-%02i-%02i",
+                                         exp_tm->tm_year + 1900,
+                                         exp_tm->tm_mon + 1, exp_tm->tm_mday);
+#endif
+                       }
+                       audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                                     "changing expiration date", user_newname,
+                                     user_newid, 1);
+               }
+
+               SYSLOG ((LOG_INFO,
+                        "change user `%s' expiration from `%ld' to `%ld'",
+                        spent->sp_namp, spent->sp_expire, user_newexpire));
+               spent->sp_expire = user_newexpire;
+#else
+               SYSLOG ((LOG_INFO,
+                        "change user `%s' expiration from `%ld' to `%ld'",
+                        spent->sp_namp, spent->sp_expire, user_expire));
                spent->sp_expire = user_expire;
+#endif
        }
-       spent->sp_pwdp = new_pw_passwd(spent->sp_pwdp, spent->sp_namp);
+       spent->sp_pwdp = new_pw_passwd (spent->sp_pwdp, spent->sp_namp);
+       if (pflg)
+               spent->sp_lstchg = time ((time_t *) 0) / SCALE;
 }
-#endif /* SHADOWPWD */
 
 /*
  * fail_exit - exit with an error code after unlocking files
  */
-
-static void
-fail_exit(int code)
+static void fail_exit (int code)
 {
        (void) gr_unlock ();
 #ifdef SHADOWGRP
        if (is_shadow_grp)
                sgr_unlock ();
 #endif
-#ifdef SHADOWPWD
        if (is_shadow_pwd)
                spw_unlock ();
-#endif
        (void) pw_unlock ();
-       exit(code);
+#ifdef WITH_AUDIT
+       audit_logger (AUDIT_USER_CHAUTHTOK, Prog, "modifying account",
+                     user_name, -1, 0);
+#endif
+       exit (code);
 }
 
 
-static int
-update_group(void)
+static int update_group (void)
 {
        int is_member;
        int was_member;
@@ -465,18 +535,18 @@ update_group(void)
        struct group *ngrp;
 
        /*
-        * Lock and open the group file.  This will load all of the group
+        * Lock and open the group file. This will load all of the group
         * entries.
         */
-       if (! gr_lock ()) {
-               fprintf(stderr, _("%s: error locking group file\n"), Prog);
-               SYSLOG((LOG_ERR, "error locking group file"));
+       if (!gr_lock ()) {
+               fprintf (stderr, _("%s: error locking group file\n"), Prog);
+               SYSLOG ((LOG_ERR, "error locking group file"));
                return -1;
        }
-       if (! gr_open (O_RDWR)) {
-               fprintf(stderr, _("%s: error opening group file\n"), Prog);
-               SYSLOG((LOG_ERR, "error opening group file"));
-               gr_unlock();
+       if (!gr_open (O_RDWR)) {
+               fprintf (stderr, _("%s: error opening group file\n"), Prog);
+               SYSLOG ((LOG_ERR, "error opening group file"));
+               gr_unlock ();
                return -1;
        }
 
@@ -486,92 +556,90 @@ update_group(void)
         * Scan through the entire group file looking for the groups that
         * the user is a member of.
         */
-       while ((grp = gr_next())) {
-
+       while ((grp = gr_next ())) {
                /*
                 * See if the user specified this group as one of their
                 * concurrent groups.
                 */
-               was_member = is_on_list(grp->gr_mem, user_name);
-               is_member = Gflg && is_on_list(user_groups, grp->gr_name);
+               was_member = is_on_list (grp->gr_mem, user_name);
+               is_member = Gflg && is_on_list (user_groups, grp->gr_name);
 
                if (!was_member && !is_member)
                        continue;
 
-               ngrp = __gr_dup(grp);
+               ngrp = __gr_dup (grp);
                if (!ngrp) {
-                       fprintf(stderr,
-                               _("%s: out of memory in update_group\n"),
-                               Prog);
-                       gr_unlock();
+                       fprintf (stderr,
+                                _("%s: out of memory in update_group\n"),
+                                Prog);
+                       gr_unlock ();
                        return -1;
                }
 
                if (was_member && (!Gflg || is_member)) {
                        if (lflg) {
-                               ngrp->gr_mem = del_list(ngrp->gr_mem,
-                                                       user_name);
-                               ngrp->gr_mem = add_list(ngrp->gr_mem,
-                                                       user_newname);
+                               ngrp->gr_mem = del_list (ngrp->gr_mem,
+                                                        user_name);
+                               ngrp->gr_mem = add_list (ngrp->gr_mem,
+                                                        user_newname);
                                changed = 1;
-                               SYSLOG((LOG_INFO,
-                                       "change `%s' to `%s' in group `%s'\n",
-                                       user_name, user_newname,
-                                       ngrp->gr_name));
+#ifdef WITH_AUDIT
+                               audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                                             "changing group member",
+                                             user_newname, -1, 1);
+#endif
+                               SYSLOG ((LOG_INFO,
+                                        "change `%s' to `%s' in group `%s'",
+                                        user_name, user_newname,
+                                        ngrp->gr_name));
                        }
-               } else if (was_member && Gflg && !is_member) {
+               } else if (was_member && !aflg && Gflg && !is_member) {
                        ngrp->gr_mem = del_list (ngrp->gr_mem, user_name);
                        changed = 1;
-                       SYSLOG((LOG_INFO, "delete `%s' from group `%s'\n",
-                               user_name, ngrp->gr_name));
+#ifdef WITH_AUDIT
+                       audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                                     "removing group member", user_name, -1,
+                                     1);
+#endif
+                       SYSLOG ((LOG_INFO, "delete `%s' from group `%s'",
+                                user_name, ngrp->gr_name));
                } else if (!was_member && Gflg && is_member) {
                        ngrp->gr_mem = add_list (ngrp->gr_mem,
-                               lflg ? user_newname:user_name);
+                                                lflg ? user_newname :
+                                                user_name);
                        changed = 1;
-                       SYSLOG((LOG_INFO, "add `%s' to group `%s'\n",
-                               lflg ? user_newname:user_name, ngrp->gr_name));
+#ifdef WITH_AUDIT
+                       audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                                     "adding user to group", user_name, -1, 1);
+#endif
+                       SYSLOG ((LOG_INFO, "add `%s' to group `%s'",
+                                lflg ? user_newname : user_name,
+                                ngrp->gr_name));
                }
                if (!changed)
                        continue;
 
                changed = 0;
-               if (! gr_update (ngrp)) {
-                       fprintf(stderr, _("%s: error adding new group entry\n"),
-                               Prog);
-                       SYSLOG((LOG_ERR, "error adding group entry"));
-                       gr_unlock();
-                       return -1;
-               }
-#ifdef NDBM
-               /*
-                * Update the DBM group file with the new entry as well.
-                */
-               if (! gr_dbm_update (ngrp)) {
-                       fprintf(stderr,
-                               _("%s: cannot add new dbm group entry\n"),
-                               Prog);
-                       SYSLOG((LOG_ERR, "error adding dbm group entry"));
-                       gr_unlock();
+               if (!gr_update (ngrp)) {
+                       fprintf (stderr,
+                                _("%s: error adding new group entry\n"), Prog);
+                       SYSLOG ((LOG_ERR, "error adding group entry"));
+                       gr_unlock ();
                        return -1;
                }
-#endif /* NDBM */
        }
-#ifdef NDBM
-       endgrent ();
-#endif /* NDBM */
-       if (!gr_close()) {
-               fprintf(stderr, _("%s: cannot rewrite group file\n"),
-                       Prog);
-               gr_unlock();
+
+       if (!gr_close ()) {
+               fprintf (stderr, _("%s: cannot rewrite group file\n"), Prog);
+               gr_unlock ();
                return -1;
        }
-       gr_unlock();
+       gr_unlock ();
        return 0;
 }
 
 #ifdef SHADOWGRP
-static int
-update_gshadow(void)
+static int update_gshadow (void)
 {
        int is_member;
        int was_member;
@@ -580,17 +648,17 @@ update_gshadow(void)
        const struct sgrp *sgrp;
        struct sgrp *nsgrp;
 
-       if (!sgr_lock()) {
-               fprintf(stderr, _("%s: error locking shadow group file\n"),
-                       Prog);
-               SYSLOG((LOG_ERR, "error locking shadow group file"));
+       if (!sgr_lock ()) {
+               fprintf (stderr,
+                        _("%s: error locking shadow group file\n"), Prog);
+               SYSLOG ((LOG_ERR, "error locking shadow group file"));
                return -1;
        }
-       if (!sgr_open(O_RDWR)) {
-               fprintf(stderr, _("%s: error opening shadow group file\n"),
-                       Prog);
-               SYSLOG((LOG_ERR, "error opening shadow group file"));
-               sgr_unlock();
+       if (!sgr_open (O_RDWR)) {
+               fprintf (stderr,
+                        _("%s: error opening shadow group file\n"), Prog);
+               SYSLOG ((LOG_ERR, "error opening shadow group file"));
+               sgr_unlock ();
                return -1;
        }
 
@@ -600,33 +668,34 @@ update_gshadow(void)
         * Scan through the entire shadow group file looking for the groups
         * that the user is a member of.
         */
-       while ((sgrp = sgr_next())) {
+       while ((sgrp = sgr_next ())) {
 
                /*
                 * See if the user was a member of this group
                 */
-               was_member = is_on_list(sgrp->sg_mem, user_name);
+               was_member = is_on_list (sgrp->sg_mem, user_name);
 
                /*
                 * See if the user was an administrator of this group
                 */
-               was_admin = is_on_list(sgrp->sg_adm, user_name);
+               was_admin = is_on_list (sgrp->sg_adm, user_name);
 
                /*
                 * See if the user specified this group as one of their
                 * concurrent groups.
                 */
-               is_member = Gflg && is_on_list(user_groups, sgrp->sg_name);
+               is_member = Gflg && is_on_list (user_groups, sgrp->sg_name);
 
                if (!was_member && !was_admin && !is_member)
                        continue;
 
-               nsgrp = __sgr_dup(sgrp);
+               nsgrp = __sgr_dup (sgrp);
                if (!nsgrp) {
-                       fprintf(stderr,
-                               _("%s: out of memory in update_gshadow\n"),
-                               Prog);
-                       sgr_unlock();
+                       fprintf (stderr,
+                                _
+                                ("%s: out of memory in update_gshadow\n"),
+                                Prog);
+                       sgr_unlock ();
                        return -1;
                }
 
@@ -634,33 +703,56 @@ update_gshadow(void)
                        nsgrp->sg_adm = del_list (nsgrp->sg_adm, user_name);
                        nsgrp->sg_adm = add_list (nsgrp->sg_adm, user_newname);
                        changed = 1;
-                       SYSLOG((LOG_INFO,
-                           "change admin `%s' to `%s' in shadow group `%s'\n",
-                           user_name, user_newname, nsgrp->sg_name));
+#ifdef WITH_AUDIT
+                       audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                                     "changing admin name in shadow group",
+                                     user_name, -1, 1);
+#endif
+                       SYSLOG ((LOG_INFO,
+                                "change admin `%s' to `%s' in shadow group `%s'",
+                                user_name, user_newname, nsgrp->sg_name));
                }
                if (was_member && (!Gflg || is_member)) {
                        if (lflg) {
                                nsgrp->sg_mem = del_list (nsgrp->sg_mem,
-                                       user_name);
+                                                         user_name);
                                nsgrp->sg_mem = add_list (nsgrp->sg_mem,
-                                       user_newname);
+                                                         user_newname);
                                changed = 1;
-                               SYSLOG((LOG_INFO,
-                                 "change `%s' to `%s' in shadow group `%s'\n",
-                                 user_name, user_newname, nsgrp->sg_name));
+#ifdef WITH_AUDIT
+                               audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                                             "changing member in shadow group",
+                                             user_name, -1, 1);
+#endif
+                               SYSLOG ((LOG_INFO,
+                                        "change `%s' to `%s' in shadow group `%s'",
+                                        user_name, user_newname,
+                                        nsgrp->sg_name));
                        }
-               } else if (was_member && Gflg && !is_member) {
+               } else if (was_member && !aflg && Gflg && !is_member) {
                        nsgrp->sg_mem = del_list (nsgrp->sg_mem, user_name);
                        changed = 1;
-                       SYSLOG((LOG_INFO,
-                               "delete `%s' from shadow group `%s'\n",
-                               user_name, nsgrp->sg_name));
+#ifdef WITH_AUDIT
+                       audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                                     "removing user from shadow group",
+                                     user_name, -1, 1);
+#endif
+                       SYSLOG ((LOG_INFO,
+                                "delete `%s' from shadow group `%s'",
+                                user_name, nsgrp->sg_name));
                } else if (!was_member && Gflg && is_member) {
                        nsgrp->sg_mem = add_list (nsgrp->sg_mem,
-                               lflg ? user_newname:user_name);
+                                                 lflg ? user_newname :
+                                                 user_name);
                        changed = 1;
-                       SYSLOG((LOG_INFO, "add `%s' to shadow group `%s'\n",
-                               lflg ? user_newname:user_name,nsgrp->sg_name));
+#ifdef WITH_AUDIT
+                       audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                                     "adding user to shadow group",
+                                     user_newname, -1, 1);
+#endif
+                       SYSLOG ((LOG_INFO, "add `%s' to shadow group `%s'",
+                                lflg ? user_newname : user_name,
+                                nsgrp->sg_name));
                }
                if (!changed)
                        continue;
@@ -670,529 +762,343 @@ update_gshadow(void)
                /* 
                 * Update the group entry to reflect the changes.
                 */
-               if (! sgr_update (nsgrp)) {
-                       fprintf(stderr,
-                               _("%s: error adding new group entry\n"),
-                               Prog);
-                       SYSLOG((LOG_ERR, "error adding shadow group entry\n"));
-                       sgr_unlock();
-                       return -1;
-               }
-#ifdef NDBM
-               /*
-                * Update the DBM group file with the new entry as well.
-                */
-               if (! sg_dbm_update (nsgrp)) {
-                       fprintf(stderr,
-                               _("%s: cannot add new dbm group entry\n"),
-                               Prog);
-                       SYSLOG((LOG_ERR,
-                               "error adding dbm shadow group entry\n"));
-                       sgr_unlock();
+               if (!sgr_update (nsgrp)) {
+                       fprintf (stderr,
+                                _("%s: error adding new group entry\n"), Prog);
+                       SYSLOG ((LOG_ERR, "error adding shadow group entry"));
+                       sgr_unlock ();
                        return -1;
                }
-#endif /* NDBM */
        }
-#ifdef NDBM
-       endsgent ();
-#endif /* NDBM */
-       if (!sgr_close()) {
-               fprintf(stderr, _("%s: cannot rewrite shadow group file\n"),
-                       Prog);
-               sgr_unlock();
+
+       if (!sgr_close ()) {
+               fprintf (stderr,
+                        _("%s: cannot rewrite shadow group file\n"), Prog);
+               sgr_unlock ();
                return -1;
        }
-       sgr_unlock();
+       sgr_unlock ();
        return 0;
 }
-#endif /* SHADOWGRP */
+#endif                         /* SHADOWGRP */
 
 /*
  * grp_update - add user to secondary group set
  *
- *     grp_update() takes the secondary group set given in user_groups
- *     and adds the user to each group given by that set.
+ *     grp_update() takes the secondary group set given in user_groups and
+ *     adds the user to each group given by that set.
  */
-
-static int
-grp_update(void)
+static int grp_update (void)
 {
        int ret;
 
-       ret = update_group();
+       ret = update_group ();
 #ifdef SHADOWGRP
        if (!ret && is_shadow_grp)
-               ret = update_gshadow();
+               ret = update_gshadow ();
 #endif
        return ret;
 }
 
-#ifdef AUTH_METHODS
-/*
- * get_password - locate encrypted password in authentication list
- */
-
-static char *
-get_password(const char *list)
-{
-       char    *cp, *end;
-       static  char    buf[257];
-
-       strcpy (buf, list);
-       for (cp = buf;cp;cp = end) {
-               if ((end = strchr (cp, ';')))
-                       *end++ = 0;
-
-               if (cp[0] == '@')
-                       continue;
-
-               return cp;
-       }
-       return (char *) 0;
-}
-
-/*
- * split_auths - break up comma list into (char *) array
- */
-
-static void
-split_auths(char *list, char **array)
-{
-       char    *cp, *end;
-       int     i = 0;
-
-       for (cp = list;cp;cp = end) {
-               if ((end = strchr (cp, ';')))
-                       *end++ = '\0';
-
-               array[i++] = cp;
-       }
-       array[i] = 0;
-}
-
-/*
- * update_auths - find list of methods to update
- */
-
-static void
-update_auths(const char *old, const char *new, char *update)
-{
-       char    oldbuf[257], newbuf[257];
-       char    *oldv[32], *newv[32], *updatev[32];
-       int     i, j, k;
-
-       strcpy (oldbuf, old);
-       split_auths (oldbuf, oldv);
-
-       strcpy (newbuf, new);
-       split_auths (newbuf, newv);
-
-       for (i = j = k = 0;oldv[i];i++) {
-               for (j = 0;newv[j];j++)
-                       if (strcmp (oldv[i], newv[j]) != 0)
-                               break;
-
-               if (newv[j] != (char *) 0)
-                       updatev[k++] = oldv[i];
-       }
-       updatev[k] = 0;
-
-       update[0] = '\0';
-       for (i = 0;updatev[i];i++) {
-               if (i)
-                       strcat (update, ";");
-
-               strcat (update, updatev[i]);
-       }
-}
-
-/*
- * add_auths - find list of methods to add
- */
-
-static void
-add_auths(const char *old, const char *new, char *add)
-{
-       char    oldbuf[257], newbuf[257];
-       char    *oldv[32], *newv[32], *addv[32];
-       int     i, j, k;
-
-       strcpy (oldbuf, old);
-       split_auths (oldbuf, oldv);
-
-       strcpy (newbuf, new);
-       split_auths (newbuf, newv);
-
-       for (i = j = k = 0;newv[i];i++) {
-               for (j = 0;oldv[j];j++)
-                       if (strcmp (oldv[i], newv[j]) == 0)
-                               break;
-
-               if (oldv[j] == (char *) 0)
-                       addv[k++] = newv[i];
-       }
-       addv[k] = 0;
-
-       add[0] = '\0';
-       for (i = 0;addv[i];i++) {
-               if (i)
-                       strcat (add, ";");
-
-               strcat (add, addv[i]);
-       }
-}
-
-/*
- * delete_auths - find list of methods to delete
- */
-
-static void
-delete_auths(const char *old, const char *new, char *remove)
-{
-       char    oldbuf[257], newbuf[257];
-       char    *oldv[32], *newv[32], *removev[32];
-       int     i, j, k;
-
-       strcpy (oldbuf, old);
-       split_auths (oldbuf, oldv);
-
-       strcpy (newbuf, new);
-       split_auths (newbuf, newv);
-
-       for (i = j = k = 0;oldv[i];i++) {
-               for (j = 0;newv[j];j++)
-                       if (strcmp (oldv[i], newv[j]) == 0)
-                               break;
-
-               if (newv[j] == (char *) 0)
-                       removev[k++] = oldv[i];
-       }
-       removev[k] = 0;
-
-       remove[0] = '\0';
-       for (i = 0;removev[i];i++) {
-               if (i)
-                       strcat (remove, ";");
-
-               strcat (remove, removev[i]);
-       }
-}
-
-/*
- * convert_auth - convert the argument list to a authentication list
- */
-
-static void
-convert_auth(char *auths, const char *oldauths, const char *list)
+static long get_number (const char *cp)
 {
-       char    *cp, *end;
-       char    *old;
-       char    buf[257];
-
-       /*
-        * Copy each method.  DEFAULT is replaced by an encrypted string
-        * if one can be found in the current authentication list.
-        */
-
-       strcpy (buf, list);
-       auths[0] = '\0';
-       for (cp = buf;cp;cp = end) {
-               if (auths[0])
-                       strcat (auths, ";");
-
-               if ((end = strchr (cp, ',')))
-                       *end++ = '\0';
-
-               if (strcmp (cp, "DEFAULT") == 0) {
-                       if ((old = get_password (oldauths)))
-                               strcat (auths, old);
-                       else
-                               strcat (auths, "!");
-               } else {
-                       strcat (auths, "@");
-                       strcat (auths, cp);
-               }
-       }
-}
-
-/*
- * valid_auth - check authentication list for validity
- */
-
-static int
-valid_auth(const char *methods)
-{
-       char    *cp, *end;
-       char    buf[257];
-       int     default_cnt = 0;
-
-       /*
-        * Cursory checks, length and illegal characters
-        */
-
-       if ((int) strlen (methods) > 256)
-               return 0;
-
-       if (! VALID (methods))
-               return 0;
-
-       /*
-        * Pick each method apart and check it.
-        */
+       long val;
+       char *ep;
 
-       strcpy (buf, methods);
-       for (cp = buf;cp;cp = end) {
-               if ((end = strchr (cp, ',')))
-                       *end++ = '\0';
+       val = strtol (cp, &ep, 10);
+       if (*cp != '\0' && *ep == '\0') /* valid number */
+               return val;
 
-               if (strcmp (cp, "DEFAULT") == 0) {
-                       if (default_cnt++ > 0)
-                               return 0;
-               }
-       }
-       return 1;
+       fprintf (stderr, _("%s: invalid numeric argument `%s'\n"), Prog, cp);
+       exit (E_BAD_ARG);
 }
-#endif
 
-static long
-get_number(const char *cp)
+static uid_t get_id (const char *cp)
 {
-       long val;
+       uid_t val;
        char *ep;
 
-       val = strtol(cp, &ep, 10);
-       if (*cp != '\0' && *ep == '\0')  /* valid number */
+       val = strtoul (cp, &ep, 10);
+       if (*cp != '\0' && *ep == '\0') /* valid number */
                return val;
 
-       fprintf(stderr, _("%s: invalid numeric argument `%s'\n"), Prog, cp);
-       exit(E_BAD_ARG);
+       fprintf (stderr, _("%s: invalid numeric argument `%s'\n"), Prog, cp);
+       exit (E_BAD_ARG);
 }
 
 /*
  * process_flags - perform command line argument setting
  *
- *     process_flags() interprets the command line arguments and sets
- *     the values that the user will be created with accordingly.  The
- *     values are checked for sanity.
+ *     process_flags() interprets the command line arguments and sets the
+ *     values that the user will be created with accordingly. The values
+ *     are checked for sanity.
  */
-
-static void
-process_flags(int argc, char **argv)
+static void process_flags (int argc, char **argv)
 {
        const struct group *grp;
        const struct passwd *pwd;
-#ifdef SHADOWPWD
+
        const struct spwd *spwd = NULL;
-#endif
-       int     anyflag = 0;
-       int     arg;
+       int anyflag = 0;
+       int arg;
 
        if (argc == 1 || argv[argc - 1][0] == '-')
                usage ();
 
-       if (! (pwd = getpwnam (argv[argc - 1]))) {
-               fprintf(stderr, _("%s: user %s does not exist\n"),
-                       Prog, argv[argc - 1]);
-               exit(E_NOTFOUND);
+       if (!(pwd = getpwnam (argv[argc - 1]))) {
+               fprintf (stderr, _("%s: user %s does not exist\n"),
+                        Prog, argv[argc - 1]);
+               exit (E_NOTFOUND);
        }
+
        user_name = argv[argc - 1];
+       user_id = pwd->pw_uid;
+       user_gid = pwd->pw_gid;
+       user_comment = xstrdup (pwd->pw_gecos);
+       user_home = xstrdup (pwd->pw_dir);
+       user_shell = xstrdup (pwd->pw_shell);
+#ifdef WITH_AUDIT
+       user_newname = user_name;
+       user_newid = user_id;
+       user_newgid = user_gid;
+       user_newcomment = user_comment;
+       user_newhome = user_home;
+       user_newshell = user_shell;
+#endif
 
 #ifdef USE_NIS
-
        /*
         * Now make sure it isn't an NIS user.
         */
-
        if (__ispwNIS ()) {
-               char    *nis_domain;
-               char    *nis_master;
+               char *nis_domain;
+               char *nis_master;
 
-               fprintf(stderr, _("%s: user %s is a NIS user\n"),
-                       Prog, user_name);
+               fprintf (stderr, _("%s: user %s is a NIS user\n"),
+                        Prog, user_name);
 
-               if (! yp_get_default_domain (&nis_domain) &&
-                               ! yp_master (nis_domain, "passwd.byname",
-                               &nis_master)) {
-                       fprintf(stderr, _("%s: %s is the NIS master\n"),
-                               Prog, nis_master);
+               if (!yp_get_default_domain (&nis_domain) &&
+                   !yp_master (nis_domain, "passwd.byname", &nis_master)) {
+                       fprintf (stderr, _("%s: %s is the NIS master\n"),
+                                Prog, nis_master);
                }
-               exit(E_NOTFOUND);
+               exit (E_NOTFOUND);
        }
 #endif
-       user_id = pwd->pw_uid;
-       user_gid = pwd->pw_gid;
-       user_comment = xstrdup(pwd->pw_gecos);
-       user_home = xstrdup(pwd->pw_dir);
-       user_shell = xstrdup(pwd->pw_shell);
 
-#ifdef SHADOWPWD
        if (is_shadow_pwd && (spwd = getspnam (user_name))) {
                user_expire = spwd->sp_expire;
                user_inactive = spwd->sp_inact;
+#ifdef WITH_AUDIT
+               user_newexpire = user_expire;
+               user_newinactive = user_inactive;
+#endif
        }
+
+       {
+               /*
+                * Parse the command line options.
+                */
+               int c;
+               static struct option long_options[] = {
+                       {"append", required_argument, NULL, 'a'},
+                       {"comment", required_argument, NULL, 'c'},
+                       {"home", required_argument, NULL, 'd'},
+                       {"expiredate", required_argument, NULL, 'e'},
+                       {"inactive", required_argument, NULL, 'f'},
+                       {"gid", required_argument, NULL, 'g'},
+                       {"groups", required_argument, NULL, 'G'},
+                       {"help", no_argument, NULL, 'h'},
+                       {"login", required_argument, NULL, 'l'},
+                       {"lock", no_argument, NULL, 'L'},
+                       {"move-home", no_argument, NULL, 'm'},
+                       {"non-unique", no_argument, NULL, 'o'},
+                       {"password", required_argument, NULL, 'p'},
+                       {"shell", required_argument, NULL, 's'},
+                       {"uid", required_argument, NULL, 'u'},
+                       {"unlock", no_argument, NULL, 'U'},
+                       {NULL, 0, NULL, '\0'}
+               };
+               while ((c =
+                       getopt_long (argc, argv, "ac:d:e:f:g:G:l:Lmop:s:u:U",
+                                    long_options, NULL)) != -1) {
+                       switch (c) {
+                       case 'a':
+                               aflg++;
+                               break;
+                       case 'c':
+                               if (!VALID (optarg)) {
+                                       fprintf (stderr,
+                                                _("%s: invalid field `%s'\n"),
+                                                Prog, optarg);
+                                       exit (E_BAD_ARG);
+                               }
+#ifdef WITH_AUDIT
+                               user_newcomment = optarg;
+#else
+                               user_comment = optarg;
 #endif
-#ifdef SHADOWPWD
-#define FLAGS "A:u:og:G:d:s:c:mf:e:l:p:LU"
+                               cflg++;
+                               break;
+                       case 'd':
+                               if (!VALID (optarg)) {
+                                       fprintf (stderr,
+                                                _("%s: invalid field `%s'\n"),
+                                                Prog, optarg);
+                                       exit (E_BAD_ARG);
+                               }
+                               dflg++;
+                               user_newhome = optarg;
+                               break;
+                       case 'e':
+                               if (*optarg) {
+#ifdef WITH_AUDIT
+                                       user_newexpire = strtoday (optarg);
+                                       if (user_newexpire == -1) {
 #else
-#define FLAGS "A:u:og:G:d:s:c:ml:p:LU"
+                                       user_expire = strtoday (optarg);
+                                       if (user_expire == -1) {
 #endif
-       while ((arg = getopt(argc, argv, FLAGS)) != EOF) {
-#undef FLAGS
-               switch (arg) {
-#ifdef AUTH_METHODS
-               case 'A':
-                       if (! valid_auth (optarg)) {
-                               fprintf(stderr,
-                                       _("%s: invalid field `%s'\n"),
-                                       Prog, optarg);
-                               exit(E_BAD_ARG);
-                       }
-                       auth_arg = optarg;
-                       Aflg++;
-                       break;
+                                               fprintf (stderr,
+                                                        _
+                                                        ("%s: invalid date `%s'\n"),
+                                                        Prog, optarg);
+                                               exit (E_BAD_ARG);
+                                       }
+#ifdef WITH_AUDIT
+                                       user_newexpire *= DAY / SCALE;
+#else
+                                       user_expire *= DAY / SCALE;
 #endif
-               case 'c':
-                       if (! VALID (optarg)) {
-                               fprintf(stderr,
-                                       _("%s: invalid field `%s'\n"),
-                                       Prog, optarg);
-                               exit(E_BAD_ARG);
-                       }
-                       user_comment = optarg;
-                       cflg++;
-                       break;
-               case 'd':
-                       if (! VALID (optarg)) {
-                               fprintf(stderr,
-                                       _("%s: invalid field `%s'\n"),
-                                       Prog, optarg);
-                               exit(E_BAD_ARG);
-                       }
-                       dflg++;
-                       user_newhome = optarg;
-                       break;
-#ifdef SHADOWPWD
-               case 'e':
-                       if (*optarg) {
-                               user_expire = strtoday(optarg);
-                               if (user_expire == -1) {
-                                       fprintf(stderr,
-                                               _("%s: invalid date `%s'\n"),
-                                               Prog, optarg);
-                                       exit(E_BAD_ARG);
-                               }
-                               user_expire *= DAY/SCALE;
-                       } else
-                               user_expire = -1;
-                       eflg++;
-                       break;
-               case 'f':
-                       user_inactive = get_number(optarg);
-                       fflg++;
-                       break;
+                               } else
+#ifdef WITH_AUDIT
+                                       user_newexpire = -1;
+#else
+                                       user_expire = -1;
 #endif
-               case 'g':
-                       grp = getgr_nam_gid(optarg);
-                       if (!grp) {
-                               fprintf(stderr,
-                                       _("%s: unknown group %s\n"),
-                                       Prog, optarg);
-                               exit(E_NOTFOUND);
-                       }
-                       user_newgid = grp->gr_gid;
-                       gflg++;
-                       break;
-               case 'G':
-                       if (get_groups(optarg))
-                               exit(E_NOTFOUND);
-                       Gflg++;
-                       break;
-               case 'l':
-                       if (!check_user_name(optarg)) {
-                               fprintf(stderr,
-                                       _("%s: invalid field `%s'\n"),
-                                       Prog, optarg);
-                               exit(E_BAD_ARG);
-                       }
+                               eflg++;
+                               break;
+                       case 'f':
+#ifdef WITH_AUDIT
+                               user_newinactive = get_number (optarg);
+#else
+                               user_inactive = get_number (optarg);
+#endif
+                               fflg++;
+                               break;
+                       case 'g':
+                               grp = getgr_nam_gid (optarg);
+                               if (!grp) {
+                                       fprintf (stderr,
+                                                _("%s: unknown group %s\n"),
+                                                Prog, optarg);
+                                       exit (E_NOTFOUND);
+                               }
+                               user_newgid = grp->gr_gid;
+                               gflg++;
+                               break;
+                       case 'G':
+                               if (get_groups (optarg))
+                                       exit (E_NOTFOUND);
+                               Gflg++;
+                               break;
+                       case 'l':
+                               if (!check_user_name (optarg)) {
+                                       fprintf (stderr,
+                                                _("%s: invalid field `%s'\n"),
+                                                Prog, optarg);
+                                       exit (E_BAD_ARG);
+                               }
 
-                       /*
-                        * If the name does not really change, we
-                        * mustn't set the flag as this will cause
-                        * rather serious problems later!
-                        */
+                               /*
+                                * If the name does not really change, we mustn't
+                                * set the flag as this will cause rather serious
+                                * problems later!
+                                */
+                               if (strcmp (user_name, optarg))
+                                       lflg++;
 
-                       if (strcmp (user_name, optarg))
-                               lflg++;
+                               user_newname = optarg;
+                               break;
+                       case 'L':
+                               if (Uflg || pflg)
+                                       usage ();
 
-                       user_newname = optarg;
-                       break;
-               case 'L':
-                       if (Uflg || pflg)
-                               usage ();
+                               Lflg++;
+                               break;
+                       case 'm':
+                               if (!dflg)
+                                       usage ();
 
-                       Lflg++;
-                       break;
-               case 'm':
-                       if (! dflg)
-                               usage ();
+                               mflg++;
+                               break;
+                       case 'o':
+                               if (!uflg)
+                                       usage ();
 
-                       mflg++;
-                       break;
-               case 'o':
-                       if (! uflg)
-                               usage ();
+                               oflg++;
+                               break;
+                       case 'p':
+                               if (Lflg || Uflg)
+                                       usage ();
 
-                       oflg++;
-                       break;
-               case 'p':
-                       if (Lflg || Uflg)
-                               usage ();
+                               user_pass = optarg;
+                               pflg++;
+                               break;
+                       case 's':
+                               if (!VALID (optarg)) {
+                                       fprintf (stderr,
+                                                _("%s: invalid field `%s'\n"),
+                                                Prog, optarg);
+                                       exit (E_BAD_ARG);
+                               }
+#ifdef WITH_AUDIT
+                               user_newshell = optarg;
+#else
+                               user_shell = optarg;
+#endif
+                               sflg++;
+                               break;
+                       case 'u':
+                               user_newid = get_id (optarg);
+                               uflg++;
+                               break;
+                       case 'U':
+                               if (Lflg && pflg)
+                                       usage ();
 
-                       user_pass = optarg;
-                       pflg++;
-                       break;
-               case 's':
-                       if (! VALID (optarg)) {
-                               fprintf(stderr,
-                                       _("%s: invalid field `%s'\n"),
-                                       Prog, optarg);
-                               exit(E_BAD_ARG);
-                       }
-                       user_shell = optarg;
-                       sflg++;
-                       break;
-               case 'u':
-                       user_newid = get_number(optarg);
-                       uflg++;
-                       break;
-               case 'U':
-                       if (Lflg && pflg)
+                               Uflg++;
+                               break;
+                       default:
                                usage ();
-
-                       Uflg++;
-                       break;
-               default:
-                       usage ();
+                       }
+                       anyflag++;
                }
-               anyflag++;
        }
+
        if (anyflag == 0) {
-               fprintf(stderr, _("%s: no flags given\n"), Prog);
-               exit(E_USAGE);
+               fprintf (stderr, _("%s: no flags given\n"), Prog);
+               exit (E_USAGE);
        }
-
-#ifdef SHADOWPWD
        if (!is_shadow_pwd && (eflg || fflg)) {
-               fprintf(stderr,
-                       _("%s: shadow passwords required for -e and -f\n"),
-                       Prog);
-               exit(E_USAGE);
+               fprintf (stderr,
+                        _
+                        ("%s: shadow passwords required for -e and -f\n"),
+                        Prog);
+               exit (E_USAGE);
        }
-#endif
 
        if (optind != argc - 1)
                usage ();
 
+       if (aflg && (!Gflg)) {
+               fprintf (stderr,
+                        _("%s: -a flag is ONLY allowed with the -G flag\n"),
+                        Prog);
+               usage ();
+               exit (E_USAGE);
+       }
+
        if (dflg && strcmp (user_home, user_newhome) == 0)
                dflg = mflg = 0;
 
@@ -1200,52 +1106,43 @@ process_flags(int argc, char **argv)
                uflg = oflg = 0;
 
        if (lflg && getpwnam (user_newname)) {
-               fprintf(stderr, _("%s: user %s exists\n"), Prog, user_newname);
-               exit(E_NAME_IN_USE);
+               fprintf (stderr, _("%s: user %s exists\n"), Prog, user_newname);
+               exit (E_NAME_IN_USE);
        }
 
-       if (uflg && !oflg && getpwuid(user_newid)) {
-               fprintf(stderr, _("%s: uid %ld is not unique\n"),
-                       Prog, (long) user_newid);
-               exit(E_UID_IN_USE);
+       if (uflg && !oflg && getpwuid (user_newid)) {
+               fprintf (stderr, _("%s: uid %lu is not unique\n"),
+                        Prog, (unsigned long) user_newid);
+               exit (E_UID_IN_USE);
        }
 }
 
 /*
  * close_files - close all of the files that were opened
  *
- *     close_files() closes all of the files that were opened for this
- *     new user.  This causes any modified entries to be written out.
+ *     close_files() closes all of the files that were opened for this new
+ *     user. This causes any modified entries to be written out.
  */
-
-static void
-close_files(void)
+static void close_files (void)
 {
-       if (! pw_close ()) {
-               fprintf(stderr, _("%s: cannot rewrite password file\n"), Prog);
-               fail_exit(E_PW_UPDATE);
+       if (!pw_close ()) {
+               fprintf (stderr, _("%s: cannot rewrite password file\n"), Prog);
+               fail_exit (E_PW_UPDATE);
        }
-#ifdef SHADOWPWD
-       if (is_shadow_pwd && ! spw_close ()) {
-               fprintf(stderr, _("%s: cannot rewrite shadow password file\n"), 
-                       Prog);
-               fail_exit(E_PW_UPDATE);
+       if (is_shadow_pwd && !spw_close ()) {
+               fprintf (stderr,
+                        _("%s: cannot rewrite shadow password file\n"), Prog);
+               fail_exit (E_PW_UPDATE);
        }
-#endif
-#ifdef SHADOWPWD
        if (is_shadow_pwd)
                spw_unlock ();
-#endif
        (void) pw_unlock ();
 
        /*
         * Close the DBM and/or flat files
         */
-
        endpwent ();
-#ifdef SHADOWPWD
        endspent ();
-#endif
        endgrent ();
 #ifdef SHADOWGRP
        endsgent ();
@@ -1257,322 +1154,234 @@ close_files(void)
  *
  *     open_files() opens the two password files.
  */
-
-static void
-open_files(void)
+static void open_files (void)
 {
-       if (!pw_lock()) {
-               fprintf(stderr, _("%s: unable to lock password file\n"), Prog);
-               exit(E_PW_UPDATE);
+       if (!pw_lock ()) {
+               fprintf (stderr, _("%s: unable to lock password file\n"), Prog);
+               exit (E_PW_UPDATE);
        }
-       if (! pw_open (O_RDWR)) {
-               fprintf(stderr, _("%s: unable to open password file\n"), Prog);
-               fail_exit(E_PW_UPDATE);
+       if (!pw_open (O_RDWR)) {
+               fprintf (stderr, _("%s: unable to open password file\n"), Prog);
+               fail_exit (E_PW_UPDATE);
        }
-#ifdef SHADOWPWD
-       if (is_shadow_pwd && ! spw_lock ()) {
-               fprintf(stderr, _("%s: cannot lock shadow password file\n"),
-                       Prog);
-               fail_exit(E_PW_UPDATE);
+       if (is_shadow_pwd && !spw_lock ()) {
+               fprintf (stderr,
+                        _("%s: cannot lock shadow password file\n"), Prog);
+               fail_exit (E_PW_UPDATE);
        }
-       if (is_shadow_pwd && ! spw_open (O_RDWR)) {
-               fprintf(stderr, _("%s: cannot open shadow password file\n"),
-                       Prog);
-               fail_exit(E_PW_UPDATE);
+       if (is_shadow_pwd && !spw_open (O_RDWR)) {
+               fprintf (stderr,
+                        _("%s: cannot open shadow password file\n"), Prog);
+               fail_exit (E_PW_UPDATE);
        }
-#endif
 }
 
 /*
  * usr_update - create the user entries
  *
- *     usr_update() creates the password file entries for this user
- *     and will update the group entries if required.
+ *     usr_update() creates the password file entries for this user and
+ *     will update the group entries if required.
  */
-
-static void
-usr_update(void)
+static void usr_update (void)
 {
        struct passwd pwent;
        const struct passwd *pwd;
-#ifdef SHADOWPWD
+
        struct spwd spent;
        const struct spwd *spwd = NULL;
-#endif
-#ifdef AUTH_METHODS
-       char    old_auth[BUFSIZ];
-       char    auth_buf[BUFSIZ];
-#endif
 
        /*
         * Locate the entry in /etc/passwd, which MUST exist.
         */
-
-       pwd = pw_locate(user_name);
+       pwd = pw_locate (user_name);
        if (!pwd) {
-               fprintf(stderr, _("%s: %s not found in /etc/passwd\n"),
-                       Prog, user_name);
-               fail_exit(E_NOTFOUND);
+               fprintf (stderr, _("%s: %s not found in /etc/passwd\n"),
+                        Prog, user_name);
+               fail_exit (E_NOTFOUND);
        }
        pwent = *pwd;
        new_pwent (&pwent);
 
-#ifdef SHADOWPWD
 
        /* 
-        * Locate the entry in /etc/shadow.  It doesn't have to
-        * exist, and won't be created if it doesn't.
+        * Locate the entry in /etc/shadow. It doesn't have to exist, and
+        * won't be created if it doesn't.
         */
-
-       if (is_shadow_pwd && (spwd = spw_locate(user_name))) {
+       if (is_shadow_pwd && (spwd = spw_locate (user_name))) {
                spent = *spwd;
                new_spent (&spent);
        }
-#endif
-
-#ifdef AUTH_METHODS
-
-#ifdef SHADOWPWD
-       strcpy (old_auth, spwd ? spent.sp_pwdp : pwent.pw_passwd);
-#else
-       strcpy (old_auth, pwent.pw_passwd);
-#endif
-
-       if (Aflg)
-               convert_auth (user_auth, old_auth, auth_arg);
 
-       /*
-        * XXX - this code needs some checking, changing the user name with
-        * "usermod -l new old" clears the password for this user :-(.
-        * For now, just don't define AUTH_METHODS and all will be well.
-        * Most programs don't support "administrator defined authentication
-        * methods" and PAM (when done) will be better anyway :-).  --marekm
-        */
-       if (lflg || (Aflg && strcmp (old_auth, user_auth) != 0)) {
-               delete_auths (old_auth, user_auth, auth_buf);
-               if (auth_buf[0] && pw_auth (auth_buf, user_name,
-                               PW_DELETE, (char *) 0)) {
-                       fprintf(stderr,
-                               _("%s: error deleting authentication method\n"),
-                               Prog);
-                       SYSLOG((LOG_ERR, "error deleting auth for `%s'\n",
-                               user_name));
-                       fail_exit(E_PW_UPDATE);
-               }
-               add_auths (old_auth, user_auth, auth_buf);
-               if (auth_buf[0] == '@' && pw_auth (auth_buf,
-                       lflg ? user_newname:user_name, PW_ADD, (char *) 0)) {
-                       fprintf(stderr,
-                               _("%s: error adding authentication method\n"),
-                               Prog);
-                       SYSLOG((LOG_ERR, "error adding auth for `%s'\n",
-                               lflg ? user_newname:user_name));
-                       fail_exit(E_PW_UPDATE);
+       if (lflg || uflg || gflg || cflg || dflg || sflg || pflg
+           || Lflg || Uflg) {
+               if (!pw_update (&pwent)) {
+                       fprintf (stderr,
+                                _("%s: error changing password entry\n"),
+                                Prog);
+                       fail_exit (E_PW_UPDATE);
                }
-               update_auths (old_auth, user_auth, auth_buf);
-               if (lflg && auth_buf[0] == '@' && pw_auth (auth_buf,
-                               user_newname, PW_CHANGE, user_name)) {
-                       fprintf(stderr,
-                               _("%s: error changing authentication method\n"),
-                               Prog);
-                       SYSLOG((LOG_ERR, "error changing auth for `%s'\n",
-                               lflg ? user_newname:user_name));
-                       fail_exit(E_PW_UPDATE);
-               }
-#ifdef SHADOWPWD
-               if (spwd)
-                       spent.sp_pwdp = user_auth;
-               else
-#endif
-                       pwent.pw_passwd = user_auth;
-       }
-#endif  /* AUTH_METHODS */
-       if (lflg || uflg || gflg || cflg || dflg || sflg || Aflg || pflg || Lflg || Uflg) {
-               if (! pw_update (&pwent)) {
-                       fprintf(stderr,
-                               _("%s: error changing password entry\n"),
-                               Prog);
-                       fail_exit(E_PW_UPDATE);
-               }
-               if (lflg && ! pw_remove (user_name)) {
-                       fprintf(stderr,
-                               _("%s: error removing password entry\n"),
-                               Prog);
-                       fail_exit(E_PW_UPDATE);
-               }
-#ifdef NDBM
-               if (pw_dbm_present()) {
-                       if (! pw_dbm_update (&pwent)) {
-                               fprintf(stderr,
-                                       _("%s: error adding password dbm entry\n"),
-                                       Prog);
-                               fail_exit(E_PW_UPDATE);
-                       }
-                       if (lflg && (pwd = getpwnam (user_name)) &&
-                                       ! pw_dbm_remove (pwd)) {
-                               fprintf(stderr,
-                                       _("%s: error removing passwd dbm entry\n"),
-                                       Prog);
-                               fail_exit(E_PW_UPDATE);
-                       }
-               }
-#endif
-       }
-#ifdef SHADOWPWD
-       if (spwd && (lflg || eflg || fflg || Aflg || pflg || Lflg || Uflg)) {
-               if (! spw_update (&spent)) {
-                       fprintf(stderr,
-                               _("%s: error adding new shadow password entry\n"),
-                               Prog);
-                       fail_exit(E_PW_UPDATE);
-               }
-               if (lflg && ! spw_remove (user_name)) {
-                       fprintf(stderr,
-                               _("%s: error removing shadow password entry\n"),
-                               Prog);
-                       fail_exit(E_PW_UPDATE);
+               if (lflg && !pw_remove (user_name)) {
+                       fprintf (stderr,
+                                _("%s: error removing password entry\n"),
+                                Prog);
+                       fail_exit (E_PW_UPDATE);
                }
        }
-#ifdef NDBM
-       if (spwd && sp_dbm_present()) {
-               if (! sp_dbm_update (&spent)) {
-                       fprintf(stderr,
-                               _("%s: error updating shadow passwd dbm entry\n"),
-                               Prog);
-                       fail_exit(E_PW_UPDATE);
+       if (spwd && (lflg || eflg || fflg || pflg || Lflg || Uflg)) {
+               if (!spw_update (&spent)) {
+                       fprintf (stderr,
+                                _
+                                ("%s: error adding new shadow password entry\n"),
+                                Prog);
+                       fail_exit (E_PW_UPDATE);
                }
-               if (lflg && ! sp_dbm_remove (user_name)) {
-                       fprintf(stderr,
-                               _("%s: error removing shadow passwd dbm entry\n"),
-                               Prog);
-                       fail_exit(E_PW_UPDATE);
+               if (lflg && !spw_remove (user_name)) {
+                       fprintf (stderr,
+                                _
+                                ("%s: error removing shadow password entry\n"),
+                                Prog);
+                       fail_exit (E_PW_UPDATE);
                }
        }
-#endif /* NDBM */
-#endif /* SHADOWPWD */
 }
 
 /*
  * move_home - move the user's home directory
  *
- *     move_home() moves the user's home directory to a new location.
- *     The files will be copied if the directory cannot simply be
- *     renamed.
+ *     move_home() moves the user's home directory to a new location. The
+ *     files will be copied if the directory cannot simply be renamed.
  */
-
-static void
-move_home(void)
+static void move_home (void)
 {
-       struct  stat    sb;
+       struct stat sb;
 
        if (mflg && stat (user_home, &sb) == 0) {
                /*
                 * Don't try to move it if it is not a directory
                 * (but /dev/null for example).  --marekm
                 */
-               if (!S_ISDIR(sb.st_mode))
+               if (!S_ISDIR (sb.st_mode))
                        return;
 
-               if (access(user_newhome, F_OK) == 0) {
-                       fprintf(stderr, _("%s: directory %s exists\n"),
-                               Prog, user_newhome);
-                       fail_exit(E_HOMEDIR);
+               if (access (user_newhome, F_OK) == 0) {
+                       fprintf (stderr, _("%s: directory %s exists\n"),
+                                Prog, user_newhome);
+                       fail_exit (E_HOMEDIR);
                } else if (rename (user_home, user_newhome)) {
                        if (errno == EXDEV) {
                                if (mkdir (user_newhome, sb.st_mode & 0777)) {
-                                       fprintf(stderr,
-                                               _("%s: can't create %s\n"),
-                                               Prog, user_newhome);
+                                       fprintf (stderr,
+                                                _
+                                                ("%s: can't create %s\n"),
+                                                Prog, user_newhome);
                                }
-                               if (chown (user_newhome,
-                                               sb.st_uid, sb.st_gid)) {
-                                       fprintf(stderr,
-                                               _("%s: can't chown %s\n"),
-                                               Prog, user_newhome);
+                               if (chown (user_newhome, sb.st_uid, sb.st_gid)) {
+                                       fprintf (stderr,
+                                                _("%s: can't chown %s\n"),
+                                                Prog, user_newhome);
                                        rmdir (user_newhome);
-                                       fail_exit(E_HOMEDIR);
+                                       fail_exit (E_HOMEDIR);
                                }
                                if (copy_tree (user_home, user_newhome,
-                                               uflg ? user_newid:-1,
-                                               gflg ? user_newgid:-1) == 0 &&
-                                       remove_tree (user_home) == 0 &&
-                                               rmdir (user_home) == 0)
+                                              uflg ? user_newid : -1,
+                                              gflg ? user_newgid : -1) == 0) {
+                                       if (remove_tree (user_home) != 0 ||
+                                           rmdir (user_home) != 0)
+                                               fprintf (stderr,
+                                                        _
+                                                        ("%s: warning: failed to completely remove old home directory %s"),
+                                                        Prog, user_home);
+#ifdef WITH_AUDIT
+                                       audit_logger (AUDIT_USER_CHAUTHTOK,
+                                                     Prog,
+                                                     "moving home directory",
+                                                     user_newname, user_newid,
+                                                     1);
+#endif
                                        return;
+                               }
 
                                (void) remove_tree (user_newhome);
                                (void) rmdir (user_newhome);
                        }
-                       fprintf(stderr,
-                               _("%s: cannot rename directory %s to %s\n"),
-                               Prog, user_home, user_newhome);
-                       fail_exit(E_HOMEDIR);
+                       fprintf (stderr,
+                                _
+                                ("%s: cannot rename directory %s to %s\n"),
+                                Prog, user_home, user_newhome);
+                       fail_exit (E_HOMEDIR);
                }
+#ifdef WITH_AUDIT
+               audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                             "moving home directory", user_newname, user_newid,
+                             1);
+#endif
+       }
+       if (uflg || gflg) {
+#ifdef WITH_AUDIT
+               audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                             "changing home directory owner", user_newname,
+                             user_newid, 1);
+#endif
+               chown (dflg ? user_newhome : user_home,
+                      uflg ? user_newid : user_id,
+                      gflg ? user_newgid : user_gid);
        }
-       if (uflg || gflg)
-               chown (dflg ? user_newhome:user_home,
-                       uflg ? user_newid:user_id,
-                       gflg ? user_newgid:user_gid);
 }
 
 /*
  * update_files - update the lastlog and faillog files
  */
-
-static void
-update_files(void)
+static void update_files (void)
 {
-       struct  lastlog ll;
-       struct  faillog fl;
-       int     fd;
+       struct lastlog ll;
+       struct faillog fl;
+       int fd;
 
        /*
-        * Relocate the "lastlog" entries for the user.  The old entry
-        * is left alone in case the UID was shared.  It doesn't hurt
-        * anything to just leave it be.
+        * Relocate the "lastlog" entries for the user. The old entry is
+        * left alone in case the UID was shared. It doesn't hurt anything
+        * to just leave it be.
         */
-
-       if ((fd = open(LASTLOG_FILE, O_RDWR)) != -1) {
-               lseek(fd, (off_t) user_id * sizeof ll, SEEK_SET);
-               if (read(fd, (char *) &ll, sizeof ll) == sizeof ll) {
-                       lseek(fd, (off_t) user_newid * sizeof ll, SEEK_SET);
-                       write(fd, (char *) &ll, sizeof ll);
+       if ((fd = open (LASTLOG_FILE, O_RDWR)) != -1) {
+               lseek (fd, (off_t) user_id * sizeof ll, SEEK_SET);
+               if (read (fd, (char *) &ll, sizeof ll) == sizeof ll) {
+                       lseek (fd, (off_t) user_newid * sizeof ll, SEEK_SET);
+                       write (fd, (char *) &ll, sizeof ll);
                }
-               close(fd);
+               close (fd);
        }
 
        /*
         * Relocate the "faillog" entries in the same manner.
         */
-
-       if ((fd = open(FAILLOG_FILE, O_RDWR)) != -1) {
-               lseek(fd, (off_t) user_id * sizeof fl, SEEK_SET);
-               if (read(fd, (char *) &fl, sizeof fl) == sizeof fl) {
-                       lseek(fd, (off_t) user_newid * sizeof fl, SEEK_SET);
-                       write(fd, (char *) &fl, sizeof fl);
+       if ((fd = open (FAILLOG_FILE, O_RDWR)) != -1) {
+               lseek (fd, (off_t) user_id * sizeof fl, SEEK_SET);
+               if (read (fd, (char *) &fl, sizeof fl) == sizeof fl) {
+                       lseek (fd, (off_t) user_newid * sizeof fl, SEEK_SET);
+                       write (fd, (char *) &fl, sizeof fl);
                }
-               close(fd);
+               close (fd);
        }
 }
 
 #ifndef NO_MOVE_MAILBOX
 /*
  * This is the new and improved code to carefully chown/rename the user's
- * mailbox.  Maybe I am too paranoid but the mail spool dir sometimes
+ * mailbox. Maybe I am too paranoid but the mail spool dir sometimes
  * happens to be mode 1777 (this makes mail user agents work without
  * being setgid mail, but is NOT recommended; they all should be fixed
  * to use movemail).  --marekm
  */
-static void
-move_mailbox(void)
+static void move_mailbox (void)
 {
        const char *maildir;
        char mailfile[1024], newmailfile[1024];
        int fd;
        struct stat st;
 
-       maildir = getdef_str("MAIL_DIR");
+       maildir = getdef_str ("MAIL_DIR");
 #ifdef MAIL_SPOOL_DIR
-       if (!maildir && !getdef_str("MAIL_FILE"))
+       if (!maildir && !getdef_str ("MAIL_FILE"))
                maildir = MAIL_SPOOL_DIR;
 #endif
        if (!maildir)
@@ -1584,36 +1393,54 @@ move_mailbox(void)
         * replacing /var/spool/mail/luser with a hard link to /etc/passwd
         * between stat and chown).  --marekm
         */
-
-       snprintf(mailfile, sizeof mailfile, "%s/%s", maildir, user_name);
-       fd = open(mailfile, O_RDONLY | O_NONBLOCK, 0);
+       snprintf (mailfile, sizeof mailfile, "%s/%s", maildir, user_name);
+       fd = open (mailfile, O_RDONLY | O_NONBLOCK, 0);
        if (fd < 0) {
                /* no need for warnings if the mailbox doesn't exist */
                if (errno != ENOENT)
-                       perror(mailfile);
+                       perror (mailfile);
                return;
        }
-       if (fstat(fd, &st) < 0) {
-               perror("fstat");
-               close(fd);
+       if (fstat (fd, &st) < 0) {
+               perror ("fstat");
+               close (fd);
                return;
        }
        if (st.st_uid != user_id) {
                /* better leave it alone */
-               fprintf(stderr, _("%s: warning: %s not owned by %s\n"),
-                       Prog, mailfile, user_name);
-               close(fd);
+               fprintf (stderr, _("%s: warning: %s not owned by %s\n"),
+                        Prog, mailfile, user_name);
+               close (fd);
                return;
        }
-       if (uflg && fchown(fd, user_newid, (gid_t) -1) < 0)
-               perror(_("failed to change mailbox owner"));
+       if (uflg) {
+               if (fchown (fd, user_newid, (gid_t) - 1) < 0) {
+                       perror (_("failed to change mailbox owner"));
+               }
+#ifdef WITH_AUDIT
+               else {
+                       audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                                     "changing mail file owner", user_newname,
+                                     user_newid, 1);
+               }
+#endif
+       }
 
-       close(fd);
+       close (fd);
 
        if (lflg) {
-               snprintf(newmailfile, sizeof newmailfile, "%s/%s", maildir, user_newname);
-               if (link(mailfile, newmailfile) || unlink(mailfile))
-                       perror(_("failed to rename mailbox"));
+               snprintf (newmailfile, sizeof newmailfile, "%s/%s",
+                         maildir, user_newname);
+               if (link (mailfile, newmailfile) || unlink (mailfile)) {
+                       perror (_("failed to rename mailbox"));
+               }
+#ifdef WITH_AUDIT
+               else {
+                       audit_logger (AUDIT_USER_CHAUTHTOK, Prog,
+                                     "changing mail file name", user_newname,
+                                     user_newid, 1);
+               }
+#endif
        }
 }
 #endif
@@ -1621,85 +1448,117 @@ move_mailbox(void)
 /*
  * main - usermod command
  */
-
-int
-main(int argc, char **argv)
+int main (int argc, char **argv)
 {
        int grp_err = 0;
 
+#ifdef USE_PAM
+       pam_handle_t *pamh = NULL;
+       struct passwd *pampw;
+       int retval;
+#endif
+
+#ifdef WITH_AUDIT
+       audit_help_open ();
+#endif
+
        /*
         * Get my name so that I can use it to report errors.
         */
-       Prog = Basename(argv[0]);
+       Prog = Basename (argv[0]);
+
+       setlocale (LC_ALL, "");
+       bindtextdomain (PACKAGE, LOCALEDIR);
+       textdomain (PACKAGE);
 
-       setlocale(LC_ALL, "");
-       bindtextdomain(PACKAGE, LOCALEDIR);
-       textdomain(PACKAGE);
+       sys_ngroups = sysconf (_SC_NGROUPS_MAX);
+       user_groups = malloc ((1 + sys_ngroups) * sizeof (char *));
+       user_groups[0] = (char *) 0;
 
-       OPENLOG(Prog);
+       OPENLOG ("usermod");
 
-#ifdef SHADOWPWD
-       is_shadow_pwd = spw_file_present();
-#endif
+       is_shadow_pwd = spw_file_present ();
 #ifdef SHADOWGRP
-       is_shadow_grp = sgr_file_present();
+       is_shadow_grp = sgr_file_present ();
 #endif
 
-       /*
-        * The open routines for the NDBM files don't use read-write
-        * as the mode, so we have to clue them in.
-        */
-
-#ifdef NDBM
-       pw_dbm_mode = O_RDWR;
-#ifdef SHADOWPWD
-       sp_dbm_mode = O_RDWR;
-#endif
-       gr_dbm_mode = O_RDWR;
-#ifdef SHADOWGRP
-       sg_dbm_mode = O_RDWR;
-#endif
-#endif /* NDBM */
        process_flags (argc, argv);
 
+#ifdef USE_PAM
+       retval = PAM_SUCCESS;
+
+       pampw = getpwuid (getuid ());
+       if (pampw == NULL) {
+               retval = PAM_USER_UNKNOWN;
+       }
+
+       if (retval == PAM_SUCCESS) {
+               retval = pam_start ("usermod", pampw->pw_name, &conv, &pamh);
+       }
+
+       if (retval == PAM_SUCCESS) {
+               retval = pam_authenticate (pamh, 0);
+               if (retval != PAM_SUCCESS) {
+                       pam_end (pamh, retval);
+               }
+       }
+
+       if (retval == PAM_SUCCESS) {
+               retval = pam_acct_mgmt (pamh, 0);
+               if (retval != PAM_SUCCESS) {
+                       pam_end (pamh, retval);
+               }
+       }
+
+       if (retval != PAM_SUCCESS) {
+               fprintf (stderr, _("%s: PAM authentication failed\n"), Prog);
+               exit (1);
+       }
+#endif                         /* USE_PAM */
+
        /*
         * Do the hard stuff - open the files, change the user entries,
         * change the home directory, then close and update the files.
         */
+       open_files ();
 
-       open_files();
+       usr_update ();
+       nscd_flush_cache ("passwd");
+       nscd_flush_cache ("group");
 
-       usr_update();
-
-       close_files();
+       close_files ();
 
        if (Gflg || lflg)
-               grp_err = grp_update();
+               grp_err = grp_update ();
 
        if (mflg)
-               move_home();
+               move_home ();
 
 #ifndef NO_MOVE_MAILBOX
        if (lflg || uflg)
-               move_mailbox();
+               move_mailbox ();
 #endif
 
        if (uflg) {
-               update_files();
+               update_files ();
 
                /*
-                * Change the UID on all of the files owned by `user_id'
-                * to `user_newid' in the user's home directory.
+                * Change the UID on all of the files owned by `user_id' to
+                * `user_newid' in the user's home directory.
                 */
-
-               chown_tree(dflg ? user_newhome:user_home,
-                       user_id, user_newid,
-                       user_gid, gflg ? user_newgid:user_gid);
+               chown_tree (dflg ? user_newhome : user_home,
+                           user_id, user_newid,
+                           user_gid, gflg ? user_newgid : user_gid);
        }
 
        if (grp_err)
-               exit(E_GRP_UPDATE);
+               exit (E_GRP_UPDATE);
+
+#ifdef USE_PAM
+       if (retval == PAM_SUCCESS)
+               pam_end (pamh, PAM_SUCCESS);
+#endif                         /* USE_PAM */
 
-       exit(E_SUCCESS);
-       /*NOTREACHED*/
+       exit (E_SUCCESS);
+       /* NOT REACHED */
 }