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  * $DragonFly: src/usr.bin/passwd/local_passwd.c,v 1.2 2003/06/17 04:29:30 dillon Exp $
  35  *
  36  * @(#)local_passwd.c   8.3 (Berkeley) 4/2/94
  37  */
  38
  39 #include <sys/types.h>
  40 #include <sys/time.h>
  41
  42 #include <ctype.h>
  43 #include <err.h>
  44 #include <errno.h>
  45 #include <pwd.h>
  46 #include <stdio.h>
  47 #include <stdlib.h>
  48 #include <string.h>
  49 #include <time.h>
  50 #include <unistd.h>
  51
  52 #include <pw_copy.h>
  53 #include <pw_util.h>
  54 #ifdef YP
  55 #include <pw_yp.h>
  56 #endif
  57
  58 #ifdef LOGGING
  59 #include <syslog.h>
  60 #endif
  61
  62 #ifdef LOGIN_CAP
  63 #ifdef AUTH_NONE /* multiple defs :-( */
  64 #undef AUTH_NONE
  65 #endif
  66 #include <login_cap.h>
  67 #endif
  68
  69 #include "extern.h"
  70
  71 static uid_t uid;
  72 int randinit;
  73
  74 char   *tempname;
  75
  76 static unsigned char itoa64[] =         /* 0 ... 63 => ascii - 64 */
  77         "./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";
  78
  79 void
  80 to64(s, v, n)
  81         char *s;
  82         long v;
  83         int n;
  84 {
  85         while (--n >= 0) {
  86                 *s++ = itoa64[v&0x3f];
  87                 v >>= 6;
  88         }
  89 }
  90
  91 char *
  92 getnewpasswd(pw, nis)
  93         struct passwd *pw;
  94         int nis;
  95 {
  96         int tries, min_length = 6;
  97         int force_mix_case = 1;
  98         char *p, *t;
  99 #ifdef LOGIN_CAP
 100         login_cap_t * lc;
 101 #endif
 102         char buf[_PASSWORD_LEN+1], salt[32];
 103         struct timeval tv;
 104
 105         if (!nis)
 106                 (void)printf("Changing local password for %s.\n", pw->pw_name);
 107
 108         if (uid && pw->pw_passwd[0] &&
 109             strcmp(crypt(getpass("Old password:"), pw->pw_passwd),
 110             pw->pw_passwd)) {
 111                 errno = EACCES;
 112                 pw_error(NULL, 1, 1);
 113         }
 114
 115 #ifdef LOGIN_CAP
 116         /*
 117          * Determine minimum password length, next password change date,
 118          * and whether or not to force mixed case passwords.
 119          * Note that even for NIS passwords, login_cap is still used.
 120          */
 121         if ((lc = login_getpwclass(pw)) != NULL) {
 122                 time_t  period;
 123
 124                 /* minpasswordlen capablity */
 125                 min_length = (int)login_getcapnum(lc, "minpasswordlen",
 126                                 min_length, min_length);
 127                 /* passwordtime capability */
 128                 period = login_getcaptime(lc, "passwordtime", 0, 0);
 129                 if (period > (time_t)0) {
 130                         pw->pw_change = time(NULL) + period;
 131                 }
 132                 /* mixpasswordcase capability */
 133                 force_mix_case = login_getcapbool(lc, "mixpasswordcase", 1);
 134         }
 135 #endif
 136
 137         for (buf[0] = '\0', tries = 0;;) {
 138                 p = getpass("New password:");
 139                 if (!*p) {
 140                         (void)printf("Password unchanged.\n");
 141                         pw_error(NULL, 0, 0);
 142                 }
 143                 if (strlen(p) < min_length && (uid != 0 || ++tries < 2)) {
 144                         (void)printf("Please enter a password at least %d characters in length.\n", min_length);
 145                         continue;
 146                 }
 147
 148                 if (force_mix_case) {
 149                     for (t = p; *t && islower(*t); ++t);
 150                     if (!*t && (uid != 0 || ++tries < 2)) {
 151                             (void)printf("Please don't use an all-lower case password.\nUnusual capitalization, control characters or digits are suggested.\n");
 152                             continue;
 153                     }
 154                 }
 155                 (void)strcpy(buf, p);
 156                 if (!strcmp(buf, getpass("Retype new password:")))
 157                         break;
 158                 (void)printf("Mismatch; try again, EOF to quit.\n");
 159         }
 160         /* grab a random printable character that isn't a colon */
 161         if (!randinit) {
 162                 randinit = 1;
 163                 srandomdev();
 164         }
 165 #ifdef NEWSALT
 166         salt[0] = _PASSWORD_EFMT1;
 167         to64(&salt[1], (long)(29 * 25), 4);
 168         to64(&salt[5], random(), 4);
 169         salt[9] = '\0';
 170 #else
 171         /* Make a good size salt for algoritms that can use it. */
 172         gettimeofday(&tv,0);
 173 #ifdef LOGIN_CAP
 174         if (login_setcryptfmt(lc, "md5", NULL) == NULL)
 175                 pw_error("cannot set password cipher", 1, 1);
 176         login_close(lc);
 177 #else
 178         (void)crypt_set_format("md5");
 179 #endif
 180         /* Salt suitable for anything */
 181         to64(&salt[0], random(), 3);
 182         to64(&salt[3], tv.tv_usec, 3);
 183         to64(&salt[6], tv.tv_sec, 2);
 184         to64(&salt[8], random(), 5);
 185         to64(&salt[13], random(), 5);
 186         to64(&salt[17], random(), 5);
 187         to64(&salt[22], random(), 5);
 188         salt[27] = '\0';
 189 #endif
 190         return (crypt(buf, salt));
 191 }
 192
 193 int
 194 local_passwd(uname)
 195         char *uname;
 196 {
 197         struct passwd *pw;
 198         int pfd, tfd;
 199
 200         if (!(pw = getpwnam(uname)))
 201                 errx(1, "unknown user %s", uname);
 202
 203 #ifdef YP
 204         /* Use the right password information. */
 205         pw = (struct passwd *)&local_password;
 206 #endif
 207         uid = getuid();
 208         if (uid && uid != pw->pw_uid)
 209                 errx(1, "%s", strerror(EACCES));
 210
 211         pw_init();
 212
 213         /*
 214          * Get the new password.  Reset passwd change time to zero by
 215          * default. If the user has a valid login class (or the default
 216          * fallback exists), then the next password change date is set
 217          * by getnewpasswd() according to the "passwordtime" capability
 218          * if one has been specified.
 219          */
 220         pw->pw_change = 0;
 221         pw->pw_passwd = getnewpasswd(pw, 0);
 222
 223         pfd = pw_lock();
 224         tfd = pw_tmp();
 225         pw_copy(pfd, tfd, pw, NULL);
 226
 227         if (!pw_mkdb(uname))
 228                 pw_error((char *)NULL, 0, 1);
 229 #ifdef LOGGING
 230         syslog(LOG_DEBUG, "user %s changed their local password\n", uname);
 231 #endif
 232         return (0);
 233 }