Initial import from FreeBSD RELENG_4:
[games.git] / usr.bin / chpass / chpass.c
1 /*-
2  * Copyright (c) 1988, 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 copyright[] =
36 "@(#) Copyright (c) 1988, 1993, 1994\n\
37         The Regents of the University of California.  All rights reserved.\n";
38 #endif /* not lint */
39
40 #ifndef lint
41 static const char sccsid[] = "From: @(#)chpass.c        8.4 (Berkeley) 4/2/94";
42 static const char rcsid[] =
43   "$FreeBSD: src/usr.bin/chpass/chpass.c,v 1.16.2.4 2002/08/11 14:16:42 dwmalone Exp $";
44 #endif /* not lint */
45
46 #include <sys/param.h>
47 #include <sys/stat.h>
48 #include <sys/signal.h>
49 #include <sys/time.h>
50 #include <sys/resource.h>
51
52 #include <ctype.h>
53 #include <err.h>
54 #include <errno.h>
55 #include <fcntl.h>
56 #include <pwd.h>
57 #include <stdio.h>
58 #include <stdlib.h>
59 #include <string.h>
60 #include <unistd.h>
61
62 #include <pw_scan.h>
63 #include <pw_util.h>
64 #include "pw_copy.h"
65 #ifdef YP
66 #include <rpcsvc/yp.h>
67 int yp_errno = YP_TRUE;
68 #include "pw_yp.h"
69 #endif
70
71 #include "chpass.h"
72 #include "pathnames.h"
73
74 char *tempname;
75 uid_t uid;
76
77 void    baduser __P((void));
78 void    usage __P((void));
79
80 int
81 main(argc, argv)
82         int argc;
83         char **argv;
84 {
85         enum { NEWSH, LOADENTRY, EDITENTRY, NEWPW, NEWEXP } op;
86         struct passwd *pw = NULL, lpw, old_pw, *pold_pw;
87         char *username = NULL;
88         int ch, pfd, tfd;
89         char *arg = NULL;
90 #ifdef YP
91         int force_local = 0;
92         int force_yp = 0;
93 #endif
94
95         op = EDITENTRY;
96 #ifdef YP
97         while ((ch = getopt(argc, argv, "a:p:s:e:d:h:oly")) != -1)
98 #else
99         while ((ch = getopt(argc, argv, "a:p:s:e:")) != -1)
100 #endif
101                 switch(ch) {
102                 case 'a':
103                         op = LOADENTRY;
104                         arg = optarg;
105                         break;
106                 case 's':
107                         op = NEWSH;
108                         arg = optarg;
109                         break;
110                 case 'p':
111                         op = NEWPW;
112                         arg = optarg;
113                         break;
114                 case 'e':
115                         op = NEWEXP;
116                         arg = optarg;
117                         break;
118 #ifdef YP
119                 case 'h':
120 #ifdef PARANOID
121                         if (getuid()) {
122                                 warnx("Only the superuser can use the -h flag");
123                         } else {
124 #endif
125                                 yp_server = optarg;
126 #ifdef PARANOID
127                         }
128 #endif
129                         break;
130                 case 'd':
131 #ifdef PARANOID
132                         if (getuid()) {
133                                 warnx("Only the superuser can use the -d flag");
134                         } else {
135 #endif
136                                 yp_domain = optarg;
137                                 if (yp_server == NULL)
138                                         yp_server = "localhost";
139 #ifdef PARANOID
140                         }
141 #endif
142                         break;
143                 case 'l':
144                         _use_yp = 0;
145                         force_local = 1;
146                         break;
147                 case 'y':
148                         _use_yp = force_yp = 1;
149                         break;
150                 case 'o':
151                         force_old++;
152                         break;
153 #endif
154                 case '?':
155                 default:
156                         usage();
157                 }
158         argc -= optind;
159         argv += optind;
160
161         uid = getuid();
162
163         if (op == EDITENTRY || op == NEWSH || op == NEWPW || op == NEWEXP) {
164                 switch(argc) {
165 #ifdef YP
166                 case 0:
167                         GETPWUID(uid)
168                         get_yp_master(1); /* XXX just to set the suser flag */
169                         break;
170                 case 1:
171                         GETPWNAM(*argv)
172                         get_yp_master(1); /* XXX just to set the suser flag */
173 #else
174                 case 0:
175                         if (!(pw = getpwuid(uid)))
176                                 errx(1, "unknown user: uid %lu",
177                                     (unsigned long)uid);
178                         break;
179                 case 1:
180                         if (!(pw = getpwnam(*argv)))
181                                 errx(1, "unknown user: %s", *argv);
182 #endif
183                         if (uid && uid != pw->pw_uid)
184                                 baduser();
185                         break;
186                 default:
187                         usage();
188                 }
189
190                 /* Make a copy for later verification */
191                 old_pw = *pw;
192                 old_pw.pw_gecos = strdup(old_pw.pw_gecos);
193                 pold_pw = &old_pw;
194         }
195
196         if (op == NEWSH) {
197                 /* protect p_shell -- it thinks NULL is /bin/sh */
198                 if (!arg[0])
199                         usage();
200                 if (p_shell(arg, pw, (ENTRY *)NULL))
201                         pw_error((char *)NULL, 0, 1);
202         }
203
204         if (op == NEWEXP) {
205                 if (uid)        /* only root can change expire */
206                         baduser();
207                 if (p_expire(arg, pw, (ENTRY *)NULL))
208                         pw_error((char *)NULL, 0, 1);
209         }
210
211         if (op == LOADENTRY) {
212                 if (uid)
213                         baduser();
214                 pw = &lpw;
215                 if (!pw_scan(arg, pw))
216                         exit(1);
217                 if ((pold_pw = getpwnam(pw->pw_name)) != NULL) {
218                         old_pw = *pold_pw;
219                         old_pw.pw_gecos = strdup(old_pw.pw_gecos);
220                 }
221         }
222         username = pw->pw_name;
223
224         if (op == NEWPW) {
225                 if (uid)
226                         baduser();
227
228                 if(strchr(arg, ':')) {
229                         errx(1, "invalid format for password");
230                 }
231                 pw->pw_passwd = arg;
232         }
233
234         /*
235          * The temporary file/file descriptor usage is a little tricky here.
236          * 1:   We start off with two fd's, one for the master password
237          *      file (used to lock everything), and one for a temporary file.
238          * 2:   Display() gets an fp for the temporary file, and copies the
239          *      user's information into it.  It then gives the temporary file
240          *      to the user and closes the fp, closing the underlying fd.
241          * 3:   The user edits the temporary file some number of times.
242          * 4:   Verify() gets an fp for the temporary file, and verifies the
243          *      contents.  It can't use an fp derived from the step #2 fd,
244          *      because the user's editor may have created a new instance of
245          *      the file.  Once the file is verified, its contents are stored
246          *      in a password structure.  The verify routine closes the fp,
247          *      closing the underlying fd.
248          * 5:   Delete the temporary file.
249          * 6:   Get a new temporary file/fd.  Pw_copy() gets an fp for it
250          *      file and copies the master password file into it, replacing
251          *      the user record with a new one.  We can't use the first
252          *      temporary file for this because it was owned by the user.
253          *      Pw_copy() closes its fp, flushing the data and closing the
254          *      underlying file descriptor.  We can't close the master
255          *      password fp, or we'd lose the lock.
256          * 7:   Call pw_mkdb() (which renames the temporary file) and exit.
257          *      The exit closes the master passwd fp/fd.
258          */
259         pw_init();
260         tfd = pw_tmp();
261
262         if (op == EDITENTRY) {
263                 display(tfd, pw);
264                 edit(pw);
265                 (void)unlink(tempname);
266                 tfd = pw_tmp();
267         }
268
269 #ifdef YP
270         if (_use_yp) {
271                 yp_submit(pw);
272                 (void)unlink(tempname);
273         } else {
274 #endif /* YP */
275         pfd = pw_lock();
276         pw_copy(pfd, tfd, pw, pold_pw);
277
278         if (!pw_mkdb(username))
279                 pw_error((char *)NULL, 0, 1);
280 #ifdef YP
281         }
282 #endif /* YP */
283         exit(0);
284 }
285
286 void
287 baduser()
288 {
289         errx(1, "%s", strerror(EACCES));
290 }
291
292 void
293 usage()
294 {
295
296         (void)fprintf(stderr,
297 #ifdef YP
298                 "usage: chpass [-o] [-l] [-y] [-d domain] [-h host] [-a list] [-p encpass] [-s shell] [-e mmm dd yy] [user]\n");
299 #else
300                 "usage: chpass [-a list] [-p encpass] [-s shell] [-e mmm dd yy] [user]\n");
301 #endif
302         exit(1);
303 }