1/*-
2 * Copyright (C) 1996
3 * David L. Nugent. 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 *
14 * THIS SOFTWARE IS PROVIDED BY DAVID L. NUGENT AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL DAVID L. NUGENT OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26
27#ifndef lint
28static const char rcsid[] =
| 1/*-
2 * Copyright (C) 1996
3 * David L. Nugent. 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 *
14 * THIS SOFTWARE IS PROVIDED BY DAVID L. NUGENT AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL DAVID L. NUGENT OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26
27#ifndef lint
28static const char rcsid[] =
|
29 "$FreeBSD: head/usr.sbin/pw/pwupd.c 50653 1999-08-30 10:35:38Z sheldonh $";
| 29 "$FreeBSD: head/usr.sbin/pw/pwupd.c 52502 1999-10-26 04:27:14Z davidn $";
|
30#endif /* not lint */
31
32#include <stdio.h>
33#include <stdlib.h>
34#include <string.h>
35#include <unistd.h>
36#include <stdarg.h>
37#include <errno.h>
38#include <sys/types.h>
39#include <sys/stat.h>
40#include <sys/param.h>
41#include <sys/wait.h>
42
43#include "pwupd.h"
44
45#define HAVE_PWDB_C 1
46
47static char pathpwd[] = _PATH_PWD;
48static char * pwpath = pathpwd;
49
50int
51setpwdir(const char * dir)
52{
53 if (dir == NULL)
54 return -1;
55 else {
56 char * d = malloc(strlen(dir)+1);
57 if (d == NULL)
58 return -1;
59 pwpath = strcpy(d, dir);
60 }
61 return 0;
62}
63
64char *
65getpwpath(char const * file)
66{
67 static char pathbuf[MAXPATHLEN];
68
69 snprintf(pathbuf, sizeof pathbuf, "%s/%s", pwpath, file);
70 return pathbuf;
71}
72
73int
74pwdb(char *arg,...)
75{
76 int i = 0;
77 pid_t pid;
78 va_list ap;
79 char *args[10];
80
81 args[i++] = _PATH_PWD_MKDB;
82 va_start(ap, arg);
83 while (i < 6 && arg != NULL) {
84 args[i++] = arg;
85 arg = va_arg(ap, char *);
86 }
87 if (pwpath != pathpwd) {
88 args[i++] = "-d";
89 args[i++] = pwpath;
90 }
91 args[i++] = getpwpath(_MASTERPASSWD);
92 args[i] = NULL;
93
94 if ((pid = fork()) == -1) /* Error (errno set) */
| 30#endif /* not lint */
31
32#include <stdio.h>
33#include <stdlib.h>
34#include <string.h>
35#include <unistd.h>
36#include <stdarg.h>
37#include <errno.h>
38#include <sys/types.h>
39#include <sys/stat.h>
40#include <sys/param.h>
41#include <sys/wait.h>
42
43#include "pwupd.h"
44
45#define HAVE_PWDB_C 1
46
47static char pathpwd[] = _PATH_PWD;
48static char * pwpath = pathpwd;
49
50int
51setpwdir(const char * dir)
52{
53 if (dir == NULL)
54 return -1;
55 else {
56 char * d = malloc(strlen(dir)+1);
57 if (d == NULL)
58 return -1;
59 pwpath = strcpy(d, dir);
60 }
61 return 0;
62}
63
64char *
65getpwpath(char const * file)
66{
67 static char pathbuf[MAXPATHLEN];
68
69 snprintf(pathbuf, sizeof pathbuf, "%s/%s", pwpath, file);
70 return pathbuf;
71}
72
73int
74pwdb(char *arg,...)
75{
76 int i = 0;
77 pid_t pid;
78 va_list ap;
79 char *args[10];
80
81 args[i++] = _PATH_PWD_MKDB;
82 va_start(ap, arg);
83 while (i < 6 && arg != NULL) {
84 args[i++] = arg;
85 arg = va_arg(ap, char *);
86 }
87 if (pwpath != pathpwd) {
88 args[i++] = "-d";
89 args[i++] = pwpath;
90 }
91 args[i++] = getpwpath(_MASTERPASSWD);
92 args[i] = NULL;
93
94 if ((pid = fork()) == -1) /* Error (errno set) */
|
95 i = -1;
| 95 i = errno;
|
96 else if (pid == 0) { /* Child */
97 execv(args[0], args);
98 _exit(1);
99 } else { /* Parent */
100 waitpid(pid, &i, 0);
| 96 else if (pid == 0) { /* Child */
97 execv(args[0], args);
98 _exit(1);
99 } else { /* Parent */
100 waitpid(pid, &i, 0);
|
101 if ((i = WEXITSTATUS(i)) != 0)
102 errno = EIO; /* set SOMETHING */
| 101 if (WEXITSTATUS(i))
102 i = EIO;
|
103 }
104 return i;
105}
106
107int
108fmtpwentry(char *buf, struct passwd * pwd, int type)
109{
110 int l;
111 char *pw;
112
113 pw = (pwd->pw_passwd == NULL || !*pwd->pw_passwd) ? "" : (type == PWF_MASTER) ? pwd->pw_passwd : "*";
114
115 if (type == PWF_PASSWD)
116 l = sprintf(buf, "%s:*:%ld:%ld:%s:%s:%s\n",
117 pwd->pw_name, (long) pwd->pw_uid, (long) pwd->pw_gid,
118 pwd->pw_gecos ? pwd->pw_gecos : "User &",
119 pwd->pw_dir, pwd->pw_shell);
120 else
121 l = sprintf(buf, "%s:%s:%ld:%ld:%s:%lu:%lu:%s:%s:%s\n",
122 pwd->pw_name, pw, (long) pwd->pw_uid, (long) pwd->pw_gid,
123 pwd->pw_class ? pwd->pw_class : "",
124 (unsigned long) pwd->pw_change,
125 (unsigned long) pwd->pw_expire,
126 pwd->pw_gecos, pwd->pw_dir, pwd->pw_shell);
127 return l;
128}
129
130
131int
132fmtpwent(char *buf, struct passwd * pwd)
133{
134 return fmtpwentry(buf, pwd, PWF_STANDARD);
135}
136
137static int
138pw_update(struct passwd * pwd, char const * user, int mode)
139{
140 int rc = 0;
141
142 ENDPWENT();
143
144 /*
145 * First, let's check the see if the database is alright
146 * Note: -C is only available in FreeBSD 2.2 and above
147 */
148#ifdef HAVE_PWDB_C
149 if (pwdb("-C", NULL) == 0) { /* Check only */
150#else
151 { /* No -C */
152#endif
153 char pfx[32];
154 char pwbuf[PWBUFSZ];
155 int l = sprintf(pfx, "%s:", user);
156
157 /*
158 * Update the passwd file first
159 */
160 if (pwd == NULL)
161 *pwbuf = '\0';
162 else
163 fmtpwentry(pwbuf, pwd, PWF_PASSWD);
| 103 }
104 return i;
105}
106
107int
108fmtpwentry(char *buf, struct passwd * pwd, int type)
109{
110 int l;
111 char *pw;
112
113 pw = (pwd->pw_passwd == NULL || !*pwd->pw_passwd) ? "" : (type == PWF_MASTER) ? pwd->pw_passwd : "*";
114
115 if (type == PWF_PASSWD)
116 l = sprintf(buf, "%s:*:%ld:%ld:%s:%s:%s\n",
117 pwd->pw_name, (long) pwd->pw_uid, (long) pwd->pw_gid,
118 pwd->pw_gecos ? pwd->pw_gecos : "User &",
119 pwd->pw_dir, pwd->pw_shell);
120 else
121 l = sprintf(buf, "%s:%s:%ld:%ld:%s:%lu:%lu:%s:%s:%s\n",
122 pwd->pw_name, pw, (long) pwd->pw_uid, (long) pwd->pw_gid,
123 pwd->pw_class ? pwd->pw_class : "",
124 (unsigned long) pwd->pw_change,
125 (unsigned long) pwd->pw_expire,
126 pwd->pw_gecos, pwd->pw_dir, pwd->pw_shell);
127 return l;
128}
129
130
131int
132fmtpwent(char *buf, struct passwd * pwd)
133{
134 return fmtpwentry(buf, pwd, PWF_STANDARD);
135}
136
137static int
138pw_update(struct passwd * pwd, char const * user, int mode)
139{
140 int rc = 0;
141
142 ENDPWENT();
143
144 /*
145 * First, let's check the see if the database is alright
146 * Note: -C is only available in FreeBSD 2.2 and above
147 */
148#ifdef HAVE_PWDB_C
149 if (pwdb("-C", NULL) == 0) { /* Check only */
150#else
151 { /* No -C */
152#endif
153 char pfx[32];
154 char pwbuf[PWBUFSZ];
155 int l = sprintf(pfx, "%s:", user);
156
157 /*
158 * Update the passwd file first
159 */
160 if (pwd == NULL)
161 *pwbuf = '\0';
162 else
163 fmtpwentry(pwbuf, pwd, PWF_PASSWD);
|
164 if ((rc = fileupdate(getpwpath(_PASSWD), 0644, pwbuf, pfx, l, mode)) != 0) {
| |
165
| 164
|
| 165 rc = fileupdate(getpwpath(_PASSWD), 0644, pwbuf, pfx, l, mode);
166 if (rc == 0) {
167
|
166 /*
167 * Then the master.passwd file
168 */
169 if (pwd != NULL)
170 fmtpwentry(pwbuf, pwd, PWF_MASTER);
| 168 /*
169 * Then the master.passwd file
170 */
171 if (pwd != NULL)
172 fmtpwentry(pwbuf, pwd, PWF_MASTER);
|
171 if ((rc = fileupdate(getpwpath(_MASTERPASSWD), 0644, pwbuf, pfx, l, mode)) != 0) {
| 173 rc = fileupdate(getpwpath(_MASTERPASSWD), 0644, pwbuf, pfx, l, mode);
174 if (rc != 0) {
|
172 if (mode == UPD_DELETE)
| 175 if (mode == UPD_DELETE)
|
173 rc = pwdb(NULL) == 0;
| 176 rc = pwdb(NULL);
|
174 else
| 177 else
|
175 rc = pwdb("-u", user, NULL) == 0;
| 178 rc = pwdb("-u", user, NULL);
|
176 }
177 }
178 }
179 return rc;
180}
181
182int
183addpwent(struct passwd * pwd)
184{
185 return pw_update(pwd, pwd->pw_name, UPD_CREATE);
186}
187
188int
189chgpwent(char const * login, struct passwd * pwd)
190{
191 return pw_update(pwd, login, UPD_REPLACE);
192}
193
194int
195delpwent(struct passwd * pwd)
196{
197 return pw_update(NULL, pwd->pw_name, UPD_DELETE);
198}
| 179 }
180 }
181 }
182 return rc;
183}
184
185int
186addpwent(struct passwd * pwd)
187{
188 return pw_update(pwd, pwd->pw_name, UPD_CREATE);
189}
190
191int
192chgpwent(char const * login, struct passwd * pwd)
193{
194 return pw_update(pwd, login, UPD_REPLACE);
195}
196
197int
198delpwent(struct passwd * pwd)
199{
200 return pw_update(NULL, pwd->pw_name, UPD_DELETE);
201}
|