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