local_passwd.c revision 1.3 1 /*-
2 * Copyright (c) 1990 The Regents of the University of California.
3 * 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 char sccsid[] = "@(#)local_passwd.c 5.5 (Berkeley) 5/6/91";
36 #endif /* not lint */
37
38 #include <sys/types.h>
39 #include <pwd.h>
40 #include <errno.h>
41 #include <stdio.h>
42
43 uid_t uid;
44
45 char *progname = "passwd";
46 char *tempname;
47
48 local_passwd(uname)
49 char *uname;
50 {
51 struct passwd *pw;
52 int pfd, tfd;
53 char *getnewpasswd();
54
55 if (!(pw = getpwnam(uname))) {
56 (void)fprintf(stderr, "passwd: unknown user %s.\n", uname);
57 exit(1);
58 }
59
60 uid = getuid();
61 if (uid && uid != pw->pw_uid) {
62 (void)fprintf(stderr, "passwd: %s\n", strerror(EACCES));
63 exit(1);
64 }
65
66 pw_init();
67 pfd = pw_lock();
68 tfd = pw_tmp();
69
70 /*
71 * Get the new password. Reset passwd change time to zero; when
72 * classes are implemented, go and get the "offset" value for this
73 * class and reset the timer.
74 */
75 pw->pw_passwd = getnewpasswd(pw);
76 pw->pw_change = 0;
77 pw_copy(pfd, tfd, pw);
78
79 if (!pw_mkdb())
80 pw_error((char *)NULL, 0, 1);
81 exit(0);
82 }
83
84 char *
85 getnewpasswd(pw)
86 register struct passwd *pw;
87 {
88 register char *p, *t;
89 int tries;
90 char buf[_PASSWORD_LEN+1], salt[9], *crypt(), *getpass();
91
92 (void)printf("Changing local password for %s.\n", pw->pw_name);
93
94 if (uid && pw->pw_passwd[0] &&
95 strcmp(crypt(getpass("Old password:"), pw->pw_passwd),
96 pw->pw_passwd)) {
97 errno = EACCES;
98 pw_error(NULL, 1, 1);
99 }
100
101 for (buf[0] = '\0', tries = 0;;) {
102 p = getpass("New password:");
103 if (!*p) {
104 (void)printf("Password unchanged.\n");
105 pw_error(NULL, 0, 0);
106 }
107 if (strlen(p) <= 5 && (uid != 0 || ++tries < 2)) {
108 (void)printf("Please enter a longer password.\n");
109 continue;
110 }
111 for (t = p; *t && islower(*t); ++t);
112 if (!*t && (uid != 0 || ++tries < 2)) {
113 (void)printf("Please don't use an all-lower case password.\nUnusual capitalization, control characters or digits are suggested.\n");
114 continue;
115 }
116 (void)strcpy(buf, p);
117 if (!strcmp(buf, getpass("Retype new password:")))
118 break;
119 (void)printf("Mismatch; try again, EOF to quit.\n");
120 }
121 /* grab a random printable character that isn't a colon */
122 (void)srandom((int)time((time_t *)NULL));
123 #ifdef NEWSALT
124 salt[0] = _PASSWORD_EFMT1;
125 to64(&salt[1], (long)(29 * 25), 4);
126 to64(&salt[5], random(), 4);
127 #else
128 to64(&salt[0], random(), 2);
129 #endif
130 return(crypt(buf, salt));
131 }
132
133 static unsigned char itoa64[] = /* 0 ... 63 => ascii - 64 */
134 "./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";
135
136 to64(s, v, n)
137 register char *s;
138 register long v;
139 register int n;
140 {
141 while (--n >= 0) {
142 *s++ = itoa64[v&0x3f];
143 v >>= 6;
144 }
145 }
146