Add nsswitch support.
[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.3 2003/10/02 17:42:26 hmp 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(char *buf, struct passwd *pw)
60 {
61         struct passwd buf_pw;
62         int len;
63
64         len = strlen (buf);
65         if (buf[len-1] == '\n')
66                 buf[len-1] = '\0';
67         if (!__pw_scan(buf, &buf_pw, _PWSCAN_MASTER))
68                 return 0;
69         return (strcmp(pw->pw_name, buf_pw.pw_name) == 0
70             && pw->pw_uid == buf_pw.pw_uid
71             && pw->pw_gid == buf_pw.pw_gid
72             && strcmp(pw->pw_class, buf_pw.pw_class) == 0
73             && (long)pw->pw_change == (long)buf_pw.pw_change
74             && (long)pw->pw_expire == (long)buf_pw.pw_expire
75             && strcmp(pw->pw_gecos, buf_pw.pw_gecos) == 0
76             && strcmp(pw->pw_dir, buf_pw.pw_dir) == 0
77             && strcmp(pw->pw_shell, buf_pw.pw_shell) == 0);
78 }
79
80
81 void
82 pw_copy(int ffd, int tfd, struct passwd *pw, struct passwd *old_pw)
83 {
84         FILE *from, *to;
85         int done;
86         char *p, buf[8192];
87         char uidstr[20];
88         char gidstr[20];
89         char chgstr[20];
90         char expstr[20];
91
92         snprintf(uidstr, sizeof(uidstr), "%lu", (unsigned long)pw->pw_uid);
93         snprintf(gidstr, sizeof(gidstr), "%lu", (unsigned long)pw->pw_gid);
94         snprintf(chgstr, sizeof(chgstr), "%ld", (long)pw->pw_change);
95         snprintf(expstr, sizeof(expstr), "%ld", (long)pw->pw_expire);
96
97         if (!(from = fdopen(ffd, "r")))
98                 pw_error(_PATH_MASTERPASSWD, 1, 1);
99         if (!(to = fdopen(tfd, "w")))
100                 pw_error(tempname, 1, 1);
101
102         for (done = 0; fgets(buf, sizeof(buf), from);) {
103                 if (!strchr(buf, '\n')) {
104                         warnx("%s: line too long", _PATH_MASTERPASSWD);
105                         pw_error(NULL, 0, 1);
106                 }
107                 if (done) {
108                         (void)fprintf(to, "%s", buf);
109                         if (ferror(to))
110                                 goto err;
111                         continue;
112                 }
113                 for (p = buf; *p != '\n'; p++)
114                         if (*p != ' ' && *p != '\t')
115                                 break;
116                 if (*p == '#' || *p == '\n') {
117                         (void)fprintf(to, "%s", buf);
118                         if (ferror(to))
119                                 goto err;
120                         continue;
121                 }
122                 if (!(p = strchr(buf, ':'))) {
123                         warnx("%s: corrupted entry", _PATH_MASTERPASSWD);
124                         pw_error(NULL, 0, 1);
125                 }
126                 *p = '\0';
127                 if (strcmp(buf, pw->pw_name)) {
128                         *p = ':';
129                         (void)fprintf(to, "%s", buf);
130                         if (ferror(to))
131                                 goto err;
132                         continue;
133                 }
134                 *p = ':';
135                 if (old_pw && !pw_equal(buf, old_pw)) {
136                         warnx("%s: entry inconsistent",
137                               _PATH_MASTERPASSWD);
138                         pw_error(NULL, 0, 1);
139                 }
140                 (void)fprintf(to, "%s:%s:%s:%s:%s:%s:%s:%s:%s:%s\n",
141                     pw->pw_name, pw->pw_passwd,
142                     pw->pw_fields & _PWF_UID ? uidstr : "",
143                     pw->pw_fields & _PWF_GID ? gidstr : "",
144                     pw->pw_class,
145                     pw->pw_fields & _PWF_CHANGE ? chgstr : "",
146                     pw->pw_fields & _PWF_EXPIRE ? expstr : "",
147                     pw->pw_gecos, pw->pw_dir, pw->pw_shell);
148                 done = 1;
149                 if (ferror(to))
150                         goto err;
151         }
152         if (!done) {
153 #ifdef YP
154         /* Ultra paranoid: shouldn't happen. */
155                 if (getuid())  {
156                         warnx("%s: not found in %s -- permission denied",
157                                         pw->pw_name, _PATH_MASTERPASSWD);
158                         pw_error(NULL, 0, 1);
159                 } else
160 #endif /* YP */
161                 (void)fprintf(to, "%s:%s:%s:%s:%s:%s:%s:%s:%s:%s\n",
162                     pw->pw_name, pw->pw_passwd,
163                     pw->pw_fields & _PWF_UID ? uidstr : "",
164                     pw->pw_fields & _PWF_GID ? gidstr : "",
165                     pw->pw_class,
166                     pw->pw_fields & _PWF_CHANGE ? chgstr : "",
167                     pw->pw_fields & _PWF_EXPIRE ? expstr : "",
168                     pw->pw_gecos, pw->pw_dir, pw->pw_shell);
169         }
170
171         if (ferror(to))
172 err:            pw_error(NULL, 1, 1);
173         (void)fclose(to);
174 }