Add the DragonFly cvs id and perform general cleanups on cvs/rcs/sccs ids. Most
[dragonfly.git] / usr.bin / chpass / pw_copy.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/chpass/pw_copy.c,v 1.9.2.2 2002/03/24 09:00:03 cjc Exp $
34  * $DragonFly: src/usr.bin/chpass/pw_copy.c,v 1.2 2003/06/17 04:29:25 dillon Exp $
35  *
36  * @(#)pw_copy.c        8.4 (Berkeley) 4/2/94
37  */
38
39 /*
40  * This module is used to copy the master password file, replacing a single
41  * record, by chpass(1) and passwd(1).
42  */
43
44 #include <err.h>
45 #include <pwd.h>
46 #include <stdio.h>
47 #include <string.h>
48 #include <unistd.h>
49
50 #include <pw_scan.h>
51 #include <pw_util.h>
52
53 #include "pw_copy.h"
54
55 extern char *tempname;
56
57 /* for use in pw_copy(). Compare a pw entry to a pw struct. */
58 static int
59 pw_equal(buf, pw)
60         char *buf;
61         struct passwd *pw;
62 {
63         struct passwd buf_pw;
64         int len;
65
66         len = strlen (buf);
67         if (buf[len-1] == '\n')
68                 buf[len-1] = '\0';
69         if (!pw_scan(buf, &buf_pw))
70                 return 0;
71         return (strcmp(pw->pw_name, buf_pw.pw_name) == 0
72             && pw->pw_uid == buf_pw.pw_uid
73             && pw->pw_gid == buf_pw.pw_gid
74             && strcmp(pw->pw_class, buf_pw.pw_class) == 0
75             && (long)pw->pw_change == (long)buf_pw.pw_change
76             && (long)pw->pw_expire == (long)buf_pw.pw_expire
77             && strcmp(pw->pw_gecos, buf_pw.pw_gecos) == 0
78             && strcmp(pw->pw_dir, buf_pw.pw_dir) == 0
79             && strcmp(pw->pw_shell, buf_pw.pw_shell) == 0);
80 }
81
82
83 void
84 pw_copy(ffd, tfd, pw, old_pw)
85         int ffd, tfd;
86         struct passwd *pw, *old_pw;
87 {
88         FILE *from, *to;
89         int done;
90         char *p, buf[8192];
91         char uidstr[20];
92         char gidstr[20];
93         char chgstr[20];
94         char expstr[20];
95
96         snprintf(uidstr, sizeof(uidstr), "%lu", (unsigned long)pw->pw_uid);
97         snprintf(gidstr, sizeof(gidstr), "%lu", (unsigned long)pw->pw_gid);
98         snprintf(chgstr, sizeof(chgstr), "%ld", (long)pw->pw_change);
99         snprintf(expstr, sizeof(expstr), "%ld", (long)pw->pw_expire);
100
101         if (!(from = fdopen(ffd, "r")))
102                 pw_error(_PATH_MASTERPASSWD, 1, 1);
103         if (!(to = fdopen(tfd, "w")))
104                 pw_error(tempname, 1, 1);
105
106         for (done = 0; fgets(buf, sizeof(buf), from);) {
107                 if (!strchr(buf, '\n')) {
108                         warnx("%s: line too long", _PATH_MASTERPASSWD);
109                         pw_error(NULL, 0, 1);
110                 }
111                 if (done) {
112                         (void)fprintf(to, "%s", buf);
113                         if (ferror(to))
114                                 goto err;
115                         continue;
116                 }
117                 for (p = buf; *p != '\n'; p++)
118                         if (*p != ' ' && *p != '\t')
119                                 break;
120                 if (*p == '#' || *p == '\n') {
121                         (void)fprintf(to, "%s", buf);
122                         if (ferror(to))
123                                 goto err;
124                         continue;
125                 }
126                 if (!(p = strchr(buf, ':'))) {
127                         warnx("%s: corrupted entry", _PATH_MASTERPASSWD);
128                         pw_error(NULL, 0, 1);
129                 }
130                 *p = '\0';
131                 if (strcmp(buf, pw->pw_name)) {
132                         *p = ':';
133                         (void)fprintf(to, "%s", buf);
134                         if (ferror(to))
135                                 goto err;
136                         continue;
137                 }
138                 *p = ':';
139                 if (old_pw && !pw_equal(buf, old_pw)) {
140                         warnx("%s: entry inconsistent",
141                               _PATH_MASTERPASSWD);
142                         pw_error(NULL, 0, 1);
143                 }
144                 (void)fprintf(to, "%s:%s:%s:%s:%s:%s:%s:%s:%s:%s\n",
145                     pw->pw_name, pw->pw_passwd,
146                     pw->pw_fields & _PWF_UID ? uidstr : "",
147                     pw->pw_fields & _PWF_GID ? gidstr : "",
148                     pw->pw_class,
149                     pw->pw_fields & _PWF_CHANGE ? chgstr : "",
150                     pw->pw_fields & _PWF_EXPIRE ? expstr : "",
151                     pw->pw_gecos, pw->pw_dir, pw->pw_shell);
152                 done = 1;
153                 if (ferror(to))
154                         goto err;
155         }
156         if (!done) {
157 #ifdef YP
158         /* Ultra paranoid: shouldn't happen. */
159                 if (getuid())  {
160                         warnx("%s: not found in %s -- permission denied",
161                                         pw->pw_name, _PATH_MASTERPASSWD);
162                         pw_error(NULL, 0, 1);
163                 } else
164 #endif /* YP */
165                 (void)fprintf(to, "%s:%s:%s:%s:%s:%s:%s:%s:%s:%s\n",
166                     pw->pw_name, pw->pw_passwd,
167                     pw->pw_fields & _PWF_UID ? uidstr : "",
168                     pw->pw_fields & _PWF_GID ? gidstr : "",
169                     pw->pw_class,
170                     pw->pw_fields & _PWF_CHANGE ? chgstr : "",
171                     pw->pw_fields & _PWF_EXPIRE ? expstr : "",
172                     pw->pw_gecos, pw->pw_dir, pw->pw_shell);
173         }
174
175         if (ferror(to))
176 err:            pw_error(NULL, 1, 1);
177         (void)fclose(to);
178 }