usr.bin/passwd/local_passwd.c

   1 /*-
   2  * Copyright (c) 1990, 1993, 1994
   3  *      The Regents of the University of California.  All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. All advertising materials mentioning features or use of this software
  14  *    must display the following acknowledgement:
  15  *      This product includes software developed by the University of
  16  *      California, Berkeley and its contributors.
  17  * 4. Neither the name of the University nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  *
  33  * $FreeBSD: src/usr.bin/passwd/local_passwd.c,v 1.24.2.3 2002/03/24 09:00:11 cjc Exp $
  34  */
  35
  36 #ifndef lint
  37 static const char sccsid[] = "@(#)local_passwd.c        8.3 (Berkeley) 4/2/94";
  38 #endif /* not lint */
  39
  40 #include <sys/types.h>
  41 #include <sys/time.h>
  42
  43 #include <ctype.h>
  44 #include <err.h>
  45 #include <errno.h>
  46 #include <pwd.h>
  47 #include <stdio.h>
  48 #include <stdlib.h>
  49 #include <string.h>
  50 #include <time.h>
  51 #include <unistd.h>
  52
  53 #include <pw_copy.h>
  54 #include <pw_util.h>
  55 #ifdef YP
  56 #include <pw_yp.h>
  57 #endif
  58
  59 #ifdef LOGGING
  60 #include <syslog.h>
  61 #endif
  62
  63 #ifdef LOGIN_CAP
  64 #ifdef AUTH_NONE /* multiple defs :-( */
  65 #undef AUTH_NONE
  66 #endif
  67 #include <login_cap.h>
  68 #endif
  69
  70 #include "extern.h"
  71
  72 static uid_t uid;
  73 int randinit;
  74
  75 char   *tempname;
  76
  77 static unsigned char itoa64[] =         /* 0 ... 63 => ascii - 64 */
  78         "./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";
  79
  80 void
  81 to64(s, v, n)
  82         char *s;
  83         long v;
  84         int n;
  85 {
  86         while (--n >= 0) {
  87                 *s++ = itoa64[v&0x3f];
  88                 v >>= 6;
  89         }
  90 }
  91
  92 char *
  93 getnewpasswd(pw, nis)
  94         struct passwd *pw;
  95         int nis;
  96 {
  97         int tries, min_length = 6;
  98         int force_mix_case = 1;
  99         char *p, *t;
 100 #ifdef LOGIN_CAP
 101         login_cap_t * lc;
 102 #endif
 103         char buf[_PASSWORD_LEN+1], salt[32];
 104         struct timeval tv;
 105
 106         if (!nis)
 107                 (void)printf("Changing local password for %s.\n", pw->pw_name);
 108
 109         if (uid && pw->pw_passwd[0] &&
 110             strcmp(crypt(getpass("Old password:"), pw->pw_passwd),
 111             pw->pw_passwd)) {
 112                 errno = EACCES;
 113                 pw_error(NULL, 1, 1);
 114         }
 115
 116 #ifdef LOGIN_CAP
 117         /*
 118          * Determine minimum password length, next password change date,
 119          * and whether or not to force mixed case passwords.
 120          * Note that even for NIS passwords, login_cap is still used.
 121          */
 122         if ((lc = login_getpwclass(pw)) != NULL) {
 123                 time_t  period;
 124
 125                 /* minpasswordlen capablity */
 126                 min_length = (int)login_getcapnum(lc, "minpasswordlen",
 127                                 min_length, min_length);
 128                 /* passwordtime capability */
 129                 period = login_getcaptime(lc, "passwordtime", 0, 0);
 130                 if (period > (time_t)0) {
 131                         pw->pw_change = time(NULL) + period;
 132                 }
 133                 /* mixpasswordcase capability */
 134                 force_mix_case = login_getcapbool(lc, "mixpasswordcase", 1);
 135         }
 136 #endif
 137
 138         for (buf[0] = '\0', tries = 0;;) {
 139                 p = getpass("New password:");
 140                 if (!*p) {
 141                         (void)printf("Password unchanged.\n");
 142                         pw_error(NULL, 0, 0);
 143                 }
 144                 if (strlen(p) < min_length && (uid != 0 || ++tries < 2)) {
 145                         (void)printf("Please enter a password at least %d characters in length.\n", min_length);
 146                         continue;
 147                 }
 148
 149                 if (force_mix_case) {
 150                     for (t = p; *t && islower(*t); ++t);
 151                     if (!*t && (uid != 0 || ++tries < 2)) {
 152                             (void)printf("Please don't use an all-lower case password.\nUnusual capitalization, control characters or digits are suggested.\n");
 153                             continue;
 154                     }
 155                 }
 156                 (void)strcpy(buf, p);
 157                 if (!strcmp(buf, getpass("Retype new password:")))
 158                         break;
 159                 (void)printf("Mismatch; try again, EOF to quit.\n");
 160         }
 161         /* grab a random printable character that isn't a colon */
 162         if (!randinit) {
 163                 randinit = 1;
 164                 srandomdev();
 165         }
 166 #ifdef NEWSALT
 167         salt[0] = _PASSWORD_EFMT1;
 168         to64(&salt[1], (long)(29 * 25), 4);
 169         to64(&salt[5], random(), 4);
 170         salt[9] = '\0';
 171 #else
 172         /* Make a good size salt for algoritms that can use it. */
 173         gettimeofday(&tv,0);
 174 #ifdef LOGIN_CAP
 175         if (login_setcryptfmt(lc, "md5", NULL) == NULL)
 176                 pw_error("cannot set password cipher", 1, 1);
 177         login_close(lc);
 178 #else
 179         (void)crypt_set_format("md5");
 180 #endif
 181         /* Salt suitable for anything */
 182         to64(&salt[0], random(), 3);
 183         to64(&salt[3], tv.tv_usec, 3);
 184         to64(&salt[6], tv.tv_sec, 2);
 185         to64(&salt[8], random(), 5);
 186         to64(&salt[13], random(), 5);
 187         to64(&salt[17], random(), 5);
 188         to64(&salt[22], random(), 5);
 189         salt[27] = '\0';
 190 #endif
 191         return (crypt(buf, salt));
 192 }
 193
 194 int
 195 local_passwd(uname)
 196         char *uname;
 197 {
 198         struct passwd *pw;
 199         int pfd, tfd;
 200
 201         if (!(pw = getpwnam(uname)))
 202                 errx(1, "unknown user %s", uname);
 203
 204 #ifdef YP
 205         /* Use the right password information. */
 206         pw = (struct passwd *)&local_password;
 207 #endif
 208         uid = getuid();
 209         if (uid && uid != pw->pw_uid)
 210                 errx(1, "%s", strerror(EACCES));
 211
 212         pw_init();
 213
 214         /*
 215          * Get the new password.  Reset passwd change time to zero by
 216          * default. If the user has a valid login class (or the default
 217          * fallback exists), then the next password change date is set
 218          * by getnewpasswd() according to the "passwordtime" capability
 219          * if one has been specified.
 220          */
 221         pw->pw_change = 0;
 222         pw->pw_passwd = getnewpasswd(pw, 0);
 223
 224         pfd = pw_lock();
 225         tfd = pw_tmp();
 226         pw_copy(pfd, tfd, pw, NULL);
 227
 228         if (!pw_mkdb(uname))
 229                 pw_error((char *)NULL, 0, 1);
 230 #ifdef LOGGING
 231         syslog(LOG_DEBUG, "user %s changed their local password\n", uname);
 232 #endif
 233         return (0);
 234 }