]> git.cameronkatri.com Git - pw-darwin.git/blob - pw/pw_user.c
git.ckatri.com / pw-darwin.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
pw: fail if an invalid entry is found while parsing master.passwd and group
[pw-darwin.git] / pw / pw_user.c
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
28 #ifndef lint
29 static const char rcsid[] =
30 "$FreeBSD$";
31 #endif /* not lint */
32
33 #include <ctype.h>
34 #include <err.h>
35 #include <fcntl.h>
36 #include <sys/param.h>
37 #include <dirent.h>
38 #include <paths.h>
39 #include <termios.h>
40 #include <sys/types.h>
41 #include <sys/time.h>
42 #include <sys/resource.h>
43 #include <login_cap.h>
44 #include <pwd.h>
45 #include <grp.h>
46 #include <libutil.h>
47 #include "pw.h"
48 #include "bitmap.h"
49
50 #define LOGNAMESIZE (MAXLOGNAME-1)
51
52 static char locked_str[] = "*LOCKED*";
53
54 static int delete_user(struct userconf *cnf, struct passwd *pwd,
55 char *name, int delete, int mode);
56 static int print_user(struct passwd * pwd);
57 static uid_t pw_uidpolicy(struct userconf * cnf, long id);
58 static uid_t pw_gidpolicy(struct cargs * args, char *nam, gid_t prefer);
59 static time_t pw_pwdpolicy(struct userconf * cnf, struct cargs * args);
60 static time_t pw_exppolicy(struct userconf * cnf, struct cargs * args);
61 static char *pw_homepolicy(struct userconf * cnf, struct cargs * args, char const * user);
62 static char *pw_shellpolicy(struct userconf * cnf, struct cargs * args, char *newshell);
63 static char *pw_password(struct userconf * cnf, struct cargs * args, char const * user);
64 static char *shell_path(char const * path, char *shells[], char *sh);
65 static void rmat(uid_t uid);
66 static void rmopie(char const * name);
67
68 static void
69 create_and_populate_homedir(int mode, struct passwd *pwd)
70 {
71 char *homedir, *dotdir;
72 struct userconf *cnf = conf.userconf;
73
74 homedir = dotdir = NULL;
75
76 if (conf.rootdir[0] != '\0') {
77 asprintf(&homedir, "%s/%s", conf.rootdir, pwd->pw_dir);
78 if (homedir == NULL)
79 errx(EX_OSERR, "out of memory");
80 asprintf(&dotdir, "%s/%s", conf.rootdir, cnf->dotdir);
81 }
82
83 copymkdir(homedir ? homedir : pwd->pw_dir, dotdir ? dotdir: cnf->dotdir,
84 cnf->homemode, pwd->pw_uid, pwd->pw_gid);
85 pw_log(cnf, mode, W_USER, "%s(%u) home %s made", pwd->pw_name,
86 pwd->pw_uid, pwd->pw_dir);
87 }
88
89 static int
90 set_passwd(struct passwd *pwd, bool update)
91 {
92 int b, istty;
93 struct termios t, n;
94 login_cap_t *lc;
95 char line[_PASSWORD_LEN+1];
96 char *p;
97
98 if (conf.fd == '-') {
99 if (!pwd->pw_passwd || *pwd->pw_passwd != '*') {
100 pwd->pw_passwd = "*"; /* No access */
101 return (1);
102 }
103 return (0);
104 }
105
106 if ((istty = isatty(conf.fd))) {
107 if (tcgetattr(conf.fd, &t) == -1)
108 istty = 0;
109 else {
110 n = t;
111 n.c_lflag &= ~(ECHO);
112 tcsetattr(conf.fd, TCSANOW, &n);
113 printf("%s%spassword for user %s:",
114 update ? "new " : "",
115 conf.precrypted ? "encrypted " : "",
116 pwd->pw_name);
117 fflush(stdout);
118 }
119 }
120 b = read(conf.fd, line, sizeof(line) - 1);
121 if (istty) { /* Restore state */
122 tcsetattr(conf.fd, TCSANOW, &t);
123 fputc('\n', stdout);
124 fflush(stdout);
125 }
126
127 if (b < 0)
128 err(EX_IOERR, "-%c file descriptor",
129 conf.precrypted ? 'H' : 'h');
130 line[b] = '\0';
131 if ((p = strpbrk(line, "\r\n")) != NULL)
132 *p = '\0';
133 if (!*line)
134 errx(EX_DATAERR, "empty password read on file descriptor %d",
135 conf.fd);
136 if (conf.precrypted) {
137 if (strchr(line, ':') != NULL)
138 errx(EX_DATAERR, "bad encrypted password");
139 pwd->pw_passwd = line;
140 } else {
141 lc = login_getpwclass(pwd);
142 if (lc == NULL ||
143 login_setcryptfmt(lc, "sha512", NULL) == NULL)
144 warn("setting crypt(3) format");
145 login_close(lc);
146 pwd->pw_passwd = pw_pwcrypt(line);
147 }
148 return (1);
149 }
150
151 /*-
152 * -C config configuration file
153 * -q quiet operation
154 * -n name login name
155 * -u uid user id
156 * -c comment user name/comment
157 * -d directory home directory
158 * -e date account expiry date
159 * -p date password expiry date
160 * -g grp primary group
161 * -G grp1,grp2 additional groups
162 * -m [ -k dir ] create and set up home
163 * -s shell name of login shell
164 * -o duplicate uid ok
165 * -L class user class
166 * -l name new login name
167 * -h fd password filehandle
168 * -H fd encrypted password filehandle
169 * -F force print or add
170 * Setting defaults:
171 * -D set user defaults
172 * -b dir default home root dir
173 * -e period default expiry period
174 * -p period default password change period
175 * -g group default group
176 * -G grp1,grp2.. default additional groups
177 * -L class default login class
178 * -k dir default home skeleton
179 * -s shell default shell
180 * -w method default password method
181 */
182
183 int
184 pw_user(int mode, char *name, long id, struct cargs * args)
185 {
186 int rc, edited = 0;
187 char *p = NULL;
188 char *passtmp;
189 struct carg *arg;
190 struct passwd *pwd = NULL;
191 struct group *grp;
192 struct stat st;
193 struct userconf *cnf;
194 char line[_PASSWORD_LEN+1];
195 char path[MAXPATHLEN];
196 FILE *fp;
197 char *dmode_c;
198 void *set = NULL;
199
200 static struct passwd fakeuser =
201 {
202 NULL,
203 "*",
204 -1,
205 -1,
206 0,
207 "",
208 "User &",
209 "/nonexistent",
210 "/bin/sh",
211 0
212 #if defined(__FreeBSD__)
213 ,0
214 #endif
215 };
216
217 cnf = conf.userconf;
218
219 /*
220 * With M_NEXT, we only need to return the
221 * next uid to stdout
222 */
223 if (mode == M_NEXT)
224 {
225 uid_t next = pw_uidpolicy(cnf, id);
226 if (getarg(args, 'q'))
227 return next;
228 printf("%u:", next);
229 pw_group(mode, name, -1, args);
230 return EXIT_SUCCESS;
231 }
232
233 /*
234 * We can do all of the common legwork here
235 */
236
237 if ((arg = getarg(args, 'b')) != NULL) {
238 cnf->home = arg->val;
239 }
240
241 if ((arg = getarg(args, 'M')) != NULL) {
242 dmode_c = arg->val;
243 if ((set = setmode(dmode_c)) == NULL)
244 errx(EX_DATAERR, "invalid directory creation mode '%s'",
245 dmode_c);
246 cnf->homemode = getmode(set, _DEF_DIRMODE);
247 free(set);
248 }
249
250 /*
251 * If we'll need to use it or we're updating it,
252 * then create the base home directory if necessary
253 */
254 if (arg != NULL || getarg(args, 'm') != NULL) {
255 int l = strlen(cnf->home);
256
257 if (l > 1 && cnf->home[l-1] == '/') /* Shave off any trailing path delimiter */
258 cnf->home[--l] = '\0';
259
260 if (l < 2 || *cnf->home != '/') /* Check for absolute path name */
261 errx(EX_DATAERR, "invalid base directory for home '%s'", cnf->home);
262
263 if (stat(cnf->home, &st) == -1) {
264 char dbuf[MAXPATHLEN];
265
266 /*
267 * This is a kludge especially for Joerg :)
268 * If the home directory would be created in the root partition, then
269 * we really create it under /usr which is likely to have more space.
270 * But we create a symlink from cnf->home -> "/usr" -> cnf->home
271 */
272 if (strchr(cnf->home+1, '/') == NULL) {
273 snprintf(dbuf, MAXPATHLEN, "/usr%s", cnf->home);
274 if (mkdir(dbuf, _DEF_DIRMODE) != -1 || errno == EEXIST) {
275 chown(dbuf, 0, 0);
276 /*
277 * Skip first "/" and create symlink:
278 * /home -> usr/home
279 */
280 symlink(dbuf+1, cnf->home);
281 }
282 /* If this falls, fall back to old method */
283 }
284 strlcpy(dbuf, cnf->home, sizeof(dbuf));
285 p = dbuf;
286 if (stat(dbuf, &st) == -1) {
287 while ((p = strchr(p + 1, '/')) != NULL) {
288 *p = '\0';
289 if (stat(dbuf, &st) == -1) {
290 if (mkdir(dbuf, _DEF_DIRMODE) == -1)
291 goto direrr;
292 chown(dbuf, 0, 0);
293 } else if (!S_ISDIR(st.st_mode))
294 errx(EX_OSFILE, "'%s' (root home parent) is not a directory", dbuf);
295 *p = '/';
296 }
297 }
298 if (stat(dbuf, &st) == -1) {
299 if (mkdir(dbuf, _DEF_DIRMODE) == -1) {
300 direrr: err(EX_OSFILE, "mkdir '%s'", dbuf);
301 }
302 chown(dbuf, 0, 0);
303 }
304 } else if (!S_ISDIR(st.st_mode))
305 errx(EX_OSFILE, "root home `%s' is not a directory", cnf->home);
306 }
307
308 if ((arg = getarg(args, 'e')) != NULL)
309 cnf->expire_days = atoi(arg->val);
310
311 if ((arg = getarg(args, 'y')) != NULL)
312 cnf->nispasswd = arg->val;
313
314 if ((arg = getarg(args, 'p')) != NULL && arg->val)
315 cnf->password_days = atoi(arg->val);
316
317 if ((arg = getarg(args, 'g')) != NULL) {
318 if (!*(p = arg->val)) /* Handle empty group list specially */
319 cnf->default_group = "";
320 else {
321 if ((grp = GETGRNAM(p)) == NULL) {
322 if (!isdigit((unsigned char)*p) || (grp = GETGRGID((gid_t) atoi(p))) == NULL)
323 errx(EX_NOUSER, "group `%s' does not exist", p);
324 }
325 cnf->default_group = newstr(grp->gr_name);
326 }
327 }
328 if ((arg = getarg(args, 'L')) != NULL)
329 cnf->default_class = pw_checkname(arg->val, 0);
330
331 if ((arg = getarg(args, 'G')) != NULL && arg->val) {
332 int i = 0;
333
334 for (p = strtok(arg->val, ", \t"); p != NULL; p = strtok(NULL, ", \t")) {
335 if ((grp = GETGRNAM(p)) == NULL) {
336 if (!isdigit((unsigned char)*p) || (grp = GETGRGID((gid_t) atoi(p))) == NULL)
337 errx(EX_NOUSER, "group `%s' does not exist", p);
338 }
339 if (extendarray(&cnf->groups, &cnf->numgroups, i + 2) != -1)
340 cnf->groups[i++] = newstr(grp->gr_name);
341 }
342 while (i < cnf->numgroups)
343 cnf->groups[i++] = NULL;
344 }
345
346 if ((arg = getarg(args, 'k')) != NULL) {
347 if (stat(cnf->dotdir = arg->val, &st) == -1 || !S_ISDIR(st.st_mode))
348 errx(EX_OSFILE, "skeleton `%s' is not a directory or does not exist", cnf->dotdir);
349 }
350
351 if ((arg = getarg(args, 's')) != NULL)
352 cnf->shell_default = arg->val;
353
354 if ((arg = getarg(args, 'w')) != NULL)
355 cnf->default_password = boolean_val(arg->val, cnf->default_password);
356 if (mode == M_ADD && getarg(args, 'D')) {
357 if (name != NULL)
358 errx(EX_DATAERR, "can't combine `-D' with `-n name'");
359 if ((arg = getarg(args, 'u')) != NULL && (p = strtok(arg->val, ", \t")) != NULL) {
360 if ((cnf->min_uid = (uid_t) atoi(p)) == 0)
361 cnf->min_uid = 1000;
362 if ((p = strtok(NULL, " ,\t")) == NULL || (cnf->max_uid = (uid_t) atoi(p)) < cnf->min_uid)
363 cnf->max_uid = 32000;
364 }
365 if ((arg = getarg(args, 'i')) != NULL && (p = strtok(arg->val, ", \t")) != NULL) {
366 if ((cnf->min_gid = (gid_t) atoi(p)) == 0)
367 cnf->min_gid = 1000;
368 if ((p = strtok(NULL, " ,\t")) == NULL || (cnf->max_gid = (gid_t) atoi(p)) < cnf->min_gid)
369 cnf->max_gid = 32000;
370 }
371
372 if (write_userconfig(conf.config))
373 return (EXIT_SUCCESS);
374 err(EX_IOERR, "config udpate");
375 }
376
377 if (mode == M_PRINT && getarg(args, 'a')) {
378 SETPWENT();
379 while ((pwd = GETPWENT()) != NULL)
380 print_user(pwd);
381 ENDPWENT();
382 return EXIT_SUCCESS;
383 }
384
385 if (name != NULL)
386 pwd = GETPWNAM(pw_checkname(name, 0));
387
388 if (id < 0 && name == NULL)
389 errx(EX_DATAERR, "user name or id required");
390
391 /*
392 * Update, delete & print require that the user exists
393 */
394 if (mode == M_UPDATE || mode == M_DELETE ||
395 mode == M_PRINT || mode == M_LOCK || mode == M_UNLOCK) {
396
397 if (name == NULL && pwd == NULL) /* Try harder */
398 pwd = GETPWUID(id);
399
400 if (pwd == NULL) {
401 if (mode == M_PRINT && getarg(args, 'F')) {
402 fakeuser.pw_name = name ? name : "nouser";
403 fakeuser.pw_uid = (uid_t) id;
404 return print_user(&fakeuser);
405 }
406 if (name == NULL)
407 errx(EX_NOUSER, "no such uid `%ld'", id);
408 errx(EX_NOUSER, "no such user `%s'", name);
409 }
410
411 if (name == NULL)
412 name = pwd->pw_name;
413
414 /*
415 * The M_LOCK and M_UNLOCK functions simply add or remove
416 * a "*LOCKED*" prefix from in front of the password to
417 * prevent it decoding correctly, and therefore prevents
418 * access. Of course, this only prevents access via
419 * password authentication (not ssh, kerberos or any
420 * other method that does not use the UNIX password) but
421 * that is a known limitation.
422 */
423
424 if (mode == M_LOCK) {
425 if (strncmp(pwd->pw_passwd, locked_str, sizeof(locked_str)-1) == 0)
426 errx(EX_DATAERR, "user '%s' is already locked", pwd->pw_name);
427 asprintf(&passtmp, "%s%s", locked_str, pwd->pw_passwd);
428 if (passtmp == NULL) /* disaster */
429 errx(EX_UNAVAILABLE, "out of memory");
430 pwd->pw_passwd = passtmp;
431 edited = 1;
432 } else if (mode == M_UNLOCK) {
433 if (strncmp(pwd->pw_passwd, locked_str, sizeof(locked_str)-1) != 0)
434 errx(EX_DATAERR, "user '%s' is not locked", pwd->pw_name);
435 pwd->pw_passwd += sizeof(locked_str)-1;
436 edited = 1;
437 } else if (mode == M_DELETE)
438 return (delete_user(cnf, pwd, name,
439 getarg(args, 'r') != NULL, mode));
440 else if (mode == M_PRINT)
441 return print_user(pwd);
442
443 /*
444 * The rest is edit code
445 */
446 if (conf.newname != NULL) {
447 if (strcmp(pwd->pw_name, "root") == 0)
448 errx(EX_DATAERR, "can't rename `root' account");
449 pwd->pw_name = pw_checkname(conf.newname, 0);
450 edited = 1;
451 }
452
453 if (id > 0 && isdigit((unsigned char)*arg->val)) {
454 pwd->pw_uid = (uid_t)id;
455 edited = 1;
456 if (pwd->pw_uid != 0 && strcmp(pwd->pw_name, "root") == 0)
457 errx(EX_DATAERR, "can't change uid of `root' account");
458 if (pwd->pw_uid == 0 && strcmp(pwd->pw_name, "root") != 0)
459 warnx("WARNING: account `%s' will have a uid of 0 (superuser access!)", pwd->pw_name);
460 }
461
462 if ((arg = getarg(args, 'g')) != NULL && pwd->pw_uid != 0) { /* Already checked this */
463 gid_t newgid = (gid_t) GETGRNAM(cnf->default_group)->gr_gid;
464 if (newgid != pwd->pw_gid) {
465 edited = 1;
466 pwd->pw_gid = newgid;
467 }
468 }
469
470 if ((arg = getarg(args, 'p')) != NULL) {
471 if (*arg->val == '\0' || strcmp(arg->val, "0") == 0) {
472 if (pwd->pw_change != 0) {
473 pwd->pw_change = 0;
474 edited = 1;
475 }
476 }
477 else {
478 time_t now = time(NULL);
479 time_t expire = parse_date(now, arg->val);
480
481 if (pwd->pw_change != expire) {
482 pwd->pw_change = expire;
483 edited = 1;
484 }
485 }
486 }
487
488 if ((arg = getarg(args, 'e')) != NULL) {
489 if (*arg->val == '\0' || strcmp(arg->val, "0") == 0) {
490 if (pwd->pw_expire != 0) {
491 pwd->pw_expire = 0;
492 edited = 1;
493 }
494 }
495 else {
496 time_t now = time(NULL);
497 time_t expire = parse_date(now, arg->val);
498
499 if (pwd->pw_expire != expire) {
500 pwd->pw_expire = expire;
501 edited = 1;
502 }
503 }
504 }
505
506 if ((arg = getarg(args, 's')) != NULL) {
507 char *shell = shell_path(cnf->shelldir, cnf->shells, arg->val);
508 if (shell == NULL)
509 shell = "";
510 if (strcmp(shell, pwd->pw_shell) != 0) {
511 pwd->pw_shell = shell;
512 edited = 1;
513 }
514 }
515
516 if (getarg(args, 'L')) {
517 if (cnf->default_class == NULL)
518 cnf->default_class = "";
519 if (strcmp(pwd->pw_class, cnf->default_class) != 0) {
520 pwd->pw_class = cnf->default_class;
521 edited = 1;
522 }
523 }
524
525 if ((arg = getarg(args, 'd')) != NULL) {
526 if (strcmp(pwd->pw_dir, arg->val))
527 edited = 1;
528 if (stat(pwd->pw_dir = arg->val, &st) == -1) {
529 if (getarg(args, 'm') == NULL && strcmp(pwd->pw_dir, "/nonexistent") != 0)
530 warnx("WARNING: home `%s' does not exist", pwd->pw_dir);
531 } else if (!S_ISDIR(st.st_mode))
532 warnx("WARNING: home `%s' is not a directory", pwd->pw_dir);
533 }
534
535 if ((arg = getarg(args, 'w')) != NULL && conf.fd == -1) {
536 login_cap_t *lc;
537
538 lc = login_getpwclass(pwd);
539 if (lc == NULL ||
540 login_setcryptfmt(lc, "sha512", NULL) == NULL)
541 warn("setting crypt(3) format");
542 login_close(lc);
543 pwd->pw_passwd = pw_password(cnf, args, pwd->pw_name);
544 edited = 1;
545 }
546
547 } else {
548 login_cap_t *lc;
549
550 /*
551 * Add code
552 */
553
554 if (name == NULL) /* Required */
555 errx(EX_DATAERR, "login name required");
556 else if ((pwd = GETPWNAM(name)) != NULL) /* Exists */
557 errx(EX_DATAERR, "login name `%s' already exists", name);
558
559 /*
560 * Now, set up defaults for a new user
561 */
562 pwd = &fakeuser;
563 pwd->pw_name = name;
564 pwd->pw_class = cnf->default_class ? cnf->default_class : "";
565 pwd->pw_uid = pw_uidpolicy(cnf, id);
566 pwd->pw_gid = pw_gidpolicy(args, pwd->pw_name, (gid_t) pwd->pw_uid);
567 pwd->pw_change = pw_pwdpolicy(cnf, args);
568 pwd->pw_expire = pw_exppolicy(cnf, args);
569 pwd->pw_dir = pw_homepolicy(cnf, args, pwd->pw_name);
570 pwd->pw_shell = pw_shellpolicy(cnf, args, NULL);
571 lc = login_getpwclass(pwd);
572 if (lc == NULL || login_setcryptfmt(lc, "sha512", NULL) == NULL)
573 warn("setting crypt(3) format");
574 login_close(lc);
575 pwd->pw_passwd = pw_password(cnf, args, pwd->pw_name);
576 edited = 1;
577
578 if (pwd->pw_uid == 0 && strcmp(pwd->pw_name, "root") != 0)
579 warnx("WARNING: new account `%s' has a uid of 0 (superuser access!)", pwd->pw_name);
580 }
581
582 /*
583 * Shared add/edit code
584 */
585 if ((arg = getarg(args, 'c')) != NULL) {
586 char *gecos = pw_checkname(arg->val, 1);
587 if (strcmp(pwd->pw_gecos, gecos) != 0) {
588 pwd->pw_gecos = gecos;
589 edited = 1;
590 }
591 }
592
593 if (conf.fd != -1)
594 edited = set_passwd(pwd, mode == M_UPDATE);
595
596 /*
597 * Special case: -N only displays & exits
598 */
599 if (conf.dryrun)
600 return print_user(pwd);
601
602 if (mode == M_ADD) {
603 edited = 1; /* Always */
604 rc = addpwent(pwd);
605 if (rc == -1)
606 errx(EX_IOERR, "user '%s' already exists",
607 pwd->pw_name);
608 else if (rc != 0)
609 err(EX_IOERR, "passwd file update");
610 if (cnf->nispasswd && *cnf->nispasswd=='/') {
611 rc = addnispwent(cnf->nispasswd, pwd);
612 if (rc == -1)
613 warnx("User '%s' already exists in NIS passwd", pwd->pw_name);
614 else
615 warn("NIS passwd update");
616 /* NOTE: we treat NIS-only update errors as non-fatal */
617 }
618 } else if (mode == M_UPDATE || mode == M_LOCK || mode == M_UNLOCK) {
619 if (edited) { /* Only updated this if required */
620 rc = chgpwent(name, pwd);
621 if (rc == -1)
622 errx(EX_IOERR, "user '%s' does not exist (NIS?)", pwd->pw_name);
623 else if (rc != 0)
624 err(EX_IOERR, "passwd file update");
625 if ( cnf->nispasswd && *cnf->nispasswd=='/') {
626 rc = chgnispwent(cnf->nispasswd, name, pwd);
627 if (rc == -1)
628 warn("User '%s' not found in NIS passwd", pwd->pw_name);
629 else
630 warn("NIS passwd update");
631 /* NOTE: NIS-only update errors are not fatal */
632 }
633 }
634 }
635
636 /*
637 * Ok, user is created or changed - now edit group file
638 */
639
640 if (mode == M_ADD || getarg(args, 'G') != NULL) {
641 int i, j;
642 /* First remove the user from all group */
643 SETGRENT();
644 while ((grp = GETGRENT()) != NULL) {
645 char group[MAXLOGNAME];
646 if (grp->gr_mem == NULL)
647 continue;
648 for (i = 0; grp->gr_mem[i] != NULL; i++) {
649 if (strcmp(grp->gr_mem[i] , pwd->pw_name) != 0)
650 continue;
651 for (j = i; grp->gr_mem[j] != NULL ; j++)
652 grp->gr_mem[j] = grp->gr_mem[j+1];
653 strlcpy(group, grp->gr_name, MAXLOGNAME);
654 chggrent(group, grp);
655 }
656 }
657 ENDGRENT();
658
659 /* now add to group where needed */
660 for (i = 0; cnf->groups[i] != NULL; i++) {
661 grp = GETGRNAM(cnf->groups[i]);
662 grp = gr_add(grp, pwd->pw_name);
663 /*
664 * grp can only be NULL in 2 cases:
665 * - the new member is already a member
666 * - a problem with memory occurs
667 * in both cases we want to skip now.
668 */
669 if (grp == NULL)
670 continue;
671 chggrent(cnf->groups[i], grp);
672 free(grp);
673 }
674 }
675
676
677 /* go get a current version of pwd */
678 pwd = GETPWNAM(name);
679 if (pwd == NULL) {
680 /* This will fail when we rename, so special case that */
681 if (mode == M_UPDATE && conf.newname != NULL) {
682 name = conf.newname; /* update new name */
683 pwd = GETPWNAM(name); /* refetch renamed rec */
684 }
685 }
686 if (pwd == NULL) /* can't go on without this */
687 errx(EX_NOUSER, "user '%s' disappeared during update", name);
688
689 grp = GETGRGID(pwd->pw_gid);
690 pw_log(cnf, mode, W_USER, "%s(%u):%s(%u):%s:%s:%s",
691 pwd->pw_name, pwd->pw_uid,
692 grp ? grp->gr_name : "unknown", (grp ? grp->gr_gid : (uid_t)-1),
693 pwd->pw_gecos, pwd->pw_dir, pwd->pw_shell);
694
695 /*
696 * If adding, let's touch and chown the user's mail file. This is not
697 * strictly necessary under BSD with a 0755 maildir but it also
698 * doesn't hurt anything to create the empty mailfile
699 */
700 if (mode == M_ADD) {
701 if (PWALTDIR() != PWF_ALT) {
702 arg = getarg(args, 'R');
703 snprintf(path, sizeof(path), "%s%s/%s",
704 arg ? arg->val : "", _PATH_MAILDIR, pwd->pw_name);
705 close(open(path, O_RDWR | O_CREAT, 0600)); /* Preserve contents &
706 * mtime */
707 chown(path, pwd->pw_uid, pwd->pw_gid);
708 }
709 }
710
711 /*
712 * Let's create and populate the user's home directory. Note
713 * that this also `works' for editing users if -m is used, but
714 * existing files will *not* be overwritten.
715 */
716 if (PWALTDIR() != PWF_ALT && getarg(args, 'm') != NULL && pwd->pw_dir &&
717 *pwd->pw_dir == '/' && pwd->pw_dir[1])
718 create_and_populate_homedir(mode, pwd);
719
720 /*
721 * Finally, send mail to the new user as well, if we are asked to
722 */
723 if (mode == M_ADD && !PWALTDIR() && cnf->newmail && *cnf->newmail && (fp = fopen(cnf->newmail, "r")) != NULL) {
724 FILE *pfp = popen(_PATH_SENDMAIL " -t", "w");
725
726 if (pfp == NULL)
727 warn("sendmail");
728 else {
729 fprintf(pfp, "From: root\n" "To: %s\n" "Subject: Welcome!\n\n", pwd->pw_name);
730 while (fgets(line, sizeof(line), fp) != NULL) {
731 /* Do substitutions? */
732 fputs(line, pfp);
733 }
734 pclose(pfp);
735 pw_log(cnf, mode, W_USER, "%s(%u) new user mail sent",
736 pwd->pw_name, pwd->pw_uid);
737 }
738 fclose(fp);
739 }
740
741 return EXIT_SUCCESS;
742 }
743
744
745 static uid_t
746 pw_uidpolicy(struct userconf * cnf, long id)
747 {
748 struct passwd *pwd;
749 uid_t uid = (uid_t) - 1;
750
751 /*
752 * Check the given uid, if any
753 */
754 if (id > 0) {
755 uid = (uid_t) id;
756
757 if ((pwd = GETPWUID(uid)) != NULL && conf.checkduplicate)
758 errx(EX_DATAERR, "uid `%u' has already been allocated", pwd->pw_uid);
759 } else {
760 struct bitmap bm;
761
762 /*
763 * We need to allocate the next available uid under one of
764 * two policies a) Grab the first unused uid b) Grab the
765 * highest possible unused uid
766 */
767 if (cnf->min_uid >= cnf->max_uid) { /* Sanity
768 * claus^H^H^H^Hheck */
769 cnf->min_uid = 1000;
770 cnf->max_uid = 32000;
771 }
772 bm = bm_alloc(cnf->max_uid - cnf->min_uid + 1);
773
774 /*
775 * Now, let's fill the bitmap from the password file
776 */
777 SETPWENT();
778 while ((pwd = GETPWENT()) != NULL)
779 if (pwd->pw_uid >= (uid_t) cnf->min_uid && pwd->pw_uid <= (uid_t) cnf->max_uid)
780 bm_setbit(&bm, pwd->pw_uid - cnf->min_uid);
781 ENDPWENT();
782
783 /*
784 * Then apply the policy, with fallback to reuse if necessary
785 */
786 if (cnf->reuse_uids || (uid = (uid_t) (bm_lastset(&bm) + cnf->min_uid + 1)) > cnf->max_uid)
787 uid = (uid_t) (bm_firstunset(&bm) + cnf->min_uid);
788
789 /*
790 * Another sanity check
791 */
792 if (uid < cnf->min_uid || uid > cnf->max_uid)
793 errx(EX_SOFTWARE, "unable to allocate a new uid - range fully used");
794 bm_dealloc(&bm);
795 }
796 return uid;
797 }
798
799
800 static uid_t
801 pw_gidpolicy(struct cargs * args, char *nam, gid_t prefer)
802 {
803 struct group *grp;
804 gid_t gid = (uid_t) - 1;
805 struct carg *a_gid = getarg(args, 'g');
806 struct userconf *cnf = conf.userconf;
807
808 /*
809 * If no arg given, see if default can help out
810 */
811 if (a_gid == NULL && cnf->default_group && *cnf->default_group)
812 a_gid = addarg(args, 'g', cnf->default_group);
813
814 /*
815 * Check the given gid, if any
816 */
817 SETGRENT();
818 if (a_gid != NULL) {
819 if ((grp = GETGRNAM(a_gid->val)) == NULL) {
820 gid = (gid_t) atol(a_gid->val);
821 if ((gid == 0 && !isdigit((unsigned char)*a_gid->val)) || (grp = GETGRGID(gid)) == NULL)
822 errx(EX_NOUSER, "group `%s' is not defined", a_gid->val);
823 }
824 gid = grp->gr_gid;
825 } else if ((grp = GETGRNAM(nam)) != NULL &&
826 (grp->gr_mem == NULL || grp->gr_mem[0] == NULL)) {
827 gid = grp->gr_gid; /* Already created? Use it anyway... */
828 } else {
829 struct cargs grpargs;
830 char tmp[32];
831
832 LIST_INIT(&grpargs);
833
834 /*
835 * We need to auto-create a group with the user's name. We
836 * can send all the appropriate output to our sister routine
837 * bit first see if we can create a group with gid==uid so we
838 * can keep the user and group ids in sync. We purposely do
839 * NOT check the gid range if we can force the sync. If the
840 * user's name dups an existing group, then the group add
841 * function will happily handle that case for us and exit.
842 */
843 if (GETGRGID(prefer) == NULL) {
844 snprintf(tmp, sizeof(tmp), "%u", prefer);
845 addarg(&grpargs, 'g', tmp);
846 }
847 if (conf.dryrun) {
848 addarg(&grpargs, 'q', NULL);
849 gid = pw_group(M_NEXT, nam, -1, &grpargs);
850 }
851 else
852 {
853 pw_group(M_ADD, nam, -1, &grpargs);
854 if ((grp = GETGRNAM(nam)) != NULL)
855 gid = grp->gr_gid;
856 }
857 a_gid = LIST_FIRST(&grpargs);
858 while (a_gid != NULL) {
859 struct carg *t = LIST_NEXT(a_gid, list);
860 LIST_REMOVE(a_gid, list);
861 a_gid = t;
862 }
863 }
864 ENDGRENT();
865 return gid;
866 }
867
868
869 static time_t
870 pw_pwdpolicy(struct userconf * cnf, struct cargs * args)
871 {
872 time_t result = 0;
873 time_t now = time(NULL);
874 struct carg *arg = getarg(args, 'p');
875
876 if (arg != NULL) {
877 if ((result = parse_date(now, arg->val)) == now)
878 errx(EX_DATAERR, "invalid date/time `%s'", arg->val);
879 } else if (cnf->password_days > 0)
880 result = now + ((long) cnf->password_days * 86400L);
881 return result;
882 }
883
884
885 static time_t
886 pw_exppolicy(struct userconf * cnf, struct cargs * args)
887 {
888 time_t result = 0;
889 time_t now = time(NULL);
890 struct carg *arg = getarg(args, 'e');
891
892 if (arg != NULL) {
893 if ((result = parse_date(now, arg->val)) == now)
894 errx(EX_DATAERR, "invalid date/time `%s'", arg->val);
895 } else if (cnf->expire_days > 0)
896 result = now + ((long) cnf->expire_days * 86400L);
897 return result;
898 }
899
900
901 static char *
902 pw_homepolicy(struct userconf * cnf, struct cargs * args, char const * user)
903 {
904 struct carg *arg = getarg(args, 'd');
905 static char home[128];
906
907 if (arg)
908 return (arg->val);
909
910 if (cnf->home == NULL || *cnf->home == '\0')
911 errx(EX_CONFIG, "no base home directory set");
912 snprintf(home, sizeof(home), "%s/%s", cnf->home, user);
913
914 return (home);
915 }
916
917 static char *
918 shell_path(char const * path, char *shells[], char *sh)
919 {
920 if (sh != NULL && (*sh == '/' || *sh == '\0'))
921 return sh; /* specified full path or forced none */
922 else {
923 char *p;
924 char paths[_UC_MAXLINE];
925
926 /*
927 * We need to search paths
928 */
929 strlcpy(paths, path, sizeof(paths));
930 for (p = strtok(paths, ": \t\r\n"); p != NULL; p = strtok(NULL, ": \t\r\n")) {
931 int i;
932 static char shellpath[256];
933
934 if (sh != NULL) {
935 snprintf(shellpath, sizeof(shellpath), "%s/%s", p, sh);
936 if (access(shellpath, X_OK) == 0)
937 return shellpath;
938 } else
939 for (i = 0; i < _UC_MAXSHELLS && shells[i] != NULL; i++) {
940 snprintf(shellpath, sizeof(shellpath), "%s/%s", p, shells[i]);
941 if (access(shellpath, X_OK) == 0)
942 return shellpath;
943 }
944 }
945 if (sh == NULL)
946 errx(EX_OSFILE, "can't find shell `%s' in shell paths", sh);
947 errx(EX_CONFIG, "no default shell available or defined");
948 return NULL;
949 }
950 }
951
952
953 static char *
954 pw_shellpolicy(struct userconf * cnf, struct cargs * args, char *newshell)
955 {
956 char *sh = newshell;
957 struct carg *arg = getarg(args, 's');
958
959 if (newshell == NULL && arg != NULL)
960 sh = arg->val;
961 return shell_path(cnf->shelldir, cnf->shells, sh ? sh : cnf->shell_default);
962 }
963
964 #define SALTSIZE 32
965
966 static char const chars[] = "0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ./";
967
968 char *
969 pw_pwcrypt(char *password)
970 {
971 int i;
972 char salt[SALTSIZE + 1];
973 char *cryptpw;
974
975 static char buf[256];
976
977 /*
978 * Calculate a salt value
979 */
980 for (i = 0; i < SALTSIZE; i++)
981 salt[i] = chars[arc4random_uniform(sizeof(chars) - 1)];
982 salt[SALTSIZE] = '\0';
983
984 cryptpw = crypt(password, salt);
985 if (cryptpw == NULL)
986 errx(EX_CONFIG, "crypt(3) failure");
987 return strcpy(buf, cryptpw);
988 }
989
990
991 static char *
992 pw_password(struct userconf * cnf, struct cargs * args, char const * user)
993 {
994 int i, l;
995 char pwbuf[32];
996
997 switch (cnf->default_password) {
998 case -1: /* Random password */
999 l = (arc4random() % 8 + 8); /* 8 - 16 chars */
1000 for (i = 0; i < l; i++)
1001 pwbuf[i] = chars[arc4random_uniform(sizeof(chars)-1)];
1002 pwbuf[i] = '\0';
1003
1004 /*
1005 * We give this information back to the user
1006 */
1007 if (conf.fd == -1 && !conf.dryrun) {
1008 if (isatty(STDOUT_FILENO))
1009 printf("Password for '%s' is: ", user);
1010 printf("%s\n", pwbuf);
1011 fflush(stdout);
1012 }
1013 break;
1014
1015 case -2: /* No password at all! */
1016 return "";
1017
1018 case 0: /* No login - default */
1019 default:
1020 return "*";
1021
1022 case 1: /* user's name */
1023 strlcpy(pwbuf, user, sizeof(pwbuf));
1024 break;
1025 }
1026 return pw_pwcrypt(pwbuf);
1027 }
1028
1029 static int
1030 delete_user(struct userconf *cnf, struct passwd *pwd, char *name,
1031 int delete, int mode)
1032 {
1033 char file[MAXPATHLEN];
1034 char home[MAXPATHLEN];
1035 uid_t uid = pwd->pw_uid;
1036 struct group *gr, *grp;
1037 char grname[LOGNAMESIZE];
1038 int rc;
1039 struct stat st;
1040
1041 if (strcmp(pwd->pw_name, "root") == 0)
1042 errx(EX_DATAERR, "cannot remove user 'root'");
1043
1044 if (!PWALTDIR()) {
1045 /*
1046 * Remove opie record from /etc/opiekeys
1047 */
1048
1049 rmopie(pwd->pw_name);
1050
1051 /*
1052 * Remove crontabs
1053 */
1054 snprintf(file, sizeof(file), "/var/cron/tabs/%s", pwd->pw_name);
1055 if (access(file, F_OK) == 0) {
1056 snprintf(file, sizeof(file), "crontab -u %s -r", pwd->pw_name);
1057 system(file);
1058 }
1059 }
1060 /*
1061 * Save these for later, since contents of pwd may be
1062 * invalidated by deletion
1063 */
1064 snprintf(file, sizeof(file), "%s/%s", _PATH_MAILDIR, pwd->pw_name);
1065 strlcpy(home, pwd->pw_dir, sizeof(home));
1066 gr = GETGRGID(pwd->pw_gid);
1067 if (gr != NULL)
1068 strlcpy(grname, gr->gr_name, LOGNAMESIZE);
1069 else
1070 grname[0] = '\0';
1071
1072 rc = delpwent(pwd);
1073 if (rc == -1)
1074 err(EX_IOERR, "user '%s' does not exist", pwd->pw_name);
1075 else if (rc != 0)
1076 err(EX_IOERR, "passwd update");
1077
1078 if (cnf->nispasswd && *cnf->nispasswd=='/') {
1079 rc = delnispwent(cnf->nispasswd, name);
1080 if (rc == -1)
1081 warnx("WARNING: user '%s' does not exist in NIS passwd", pwd->pw_name);
1082 else if (rc != 0)
1083 warn("WARNING: NIS passwd update");
1084 /* non-fatal */
1085 }
1086
1087 grp = GETGRNAM(name);
1088 if (grp != NULL &&
1089 (grp->gr_mem == NULL || *grp->gr_mem == NULL) &&
1090 strcmp(name, grname) == 0)
1091 delgrent(GETGRNAM(name));
1092 SETGRENT();
1093 while ((grp = GETGRENT()) != NULL) {
1094 int i, j;
1095 char group[MAXLOGNAME];
1096 if (grp->gr_mem == NULL)
1097 continue;
1098
1099 for (i = 0; grp->gr_mem[i] != NULL; i++) {
1100 if (strcmp(grp->gr_mem[i], name) != 0)
1101 continue;
1102
1103 for (j = i; grp->gr_mem[j] != NULL; j++)
1104 grp->gr_mem[j] = grp->gr_mem[j+1];
1105 strlcpy(group, grp->gr_name, MAXLOGNAME);
1106 chggrent(group, grp);
1107 }
1108 }
1109 ENDGRENT();
1110
1111 pw_log(cnf, mode, W_USER, "%s(%u) account removed", name, uid);
1112
1113 if (!PWALTDIR()) {
1114 /*
1115 * Remove mail file
1116 */
1117 remove(file);
1118
1119 /*
1120 * Remove at jobs
1121 */
1122 if (getpwuid(uid) == NULL)
1123 rmat(uid);
1124
1125 /*
1126 * Remove home directory and contents
1127 */
1128 if (delete && *home == '/' && getpwuid(uid) == NULL &&
1129 stat(home, &st) != -1) {
1130 rm_r(home, uid);
1131 pw_log(cnf, mode, W_USER, "%s(%u) home '%s' %sremoved",
1132 name, uid, home,
1133 stat(home, &st) == -1 ? "" : "not completely ");
1134 }
1135 }
1136
1137 return (EXIT_SUCCESS);
1138 }
1139
1140 static int
1141 print_user(struct passwd * pwd)
1142 {
1143 if (!conf.pretty) {
1144 char *buf;
1145
1146 buf = conf.v7 ? pw_make_v7(pwd) : pw_make(pwd);
1147 printf("%s\n", buf);
1148 free(buf);
1149 } else {
1150 int j;
1151 char *p;
1152 struct group *grp = GETGRGID(pwd->pw_gid);
1153 char uname[60] = "User &", office[60] = "[None]",
1154 wphone[60] = "[None]", hphone[60] = "[None]";
1155 char acexpire[32] = "[None]", pwexpire[32] = "[None]";
1156 struct tm * tptr;
1157
1158 if ((p = strtok(pwd->pw_gecos, ",")) != NULL) {
1159 strlcpy(uname, p, sizeof(uname));
1160 if ((p = strtok(NULL, ",")) != NULL) {
1161 strlcpy(office, p, sizeof(office));
1162 if ((p = strtok(NULL, ",")) != NULL) {
1163 strlcpy(wphone, p, sizeof(wphone));
1164 if ((p = strtok(NULL, "")) != NULL) {
1165 strlcpy(hphone, p,
1166 sizeof(hphone));
1167 }
1168 }
1169 }
1170 }
1171 /*
1172 * Handle '&' in gecos field
1173 */
1174 if ((p = strchr(uname, '&')) != NULL) {
1175 int l = strlen(pwd->pw_name);
1176 int m = strlen(p);
1177
1178 memmove(p + l, p + 1, m);
1179 memmove(p, pwd->pw_name, l);
1180 *p = (char) toupper((unsigned char)*p);
1181 }
1182 if (pwd->pw_expire > (time_t)0 && (tptr = localtime(&pwd->pw_expire)) != NULL)
1183 strftime(acexpire, sizeof acexpire, "%c", tptr);
1184 if (pwd->pw_change > (time_t)0 && (tptr = localtime(&pwd->pw_change)) != NULL)
1185 strftime(pwexpire, sizeof pwexpire, "%c", tptr);
1186 printf("Login Name: %-15s #%-12u Group: %-15s #%u\n"
1187 " Full Name: %s\n"
1188 " Home: %-26.26s Class: %s\n"
1189 " Shell: %-26.26s Office: %s\n"
1190 "Work Phone: %-26.26s Home Phone: %s\n"
1191 "Acc Expire: %-26.26s Pwd Expire: %s\n",
1192 pwd->pw_name, pwd->pw_uid,
1193 grp ? grp->gr_name : "(invalid)", pwd->pw_gid,
1194 uname, pwd->pw_dir, pwd->pw_class,
1195 pwd->pw_shell, office, wphone, hphone,
1196 acexpire, pwexpire);
1197 SETGRENT();
1198 j = 0;
1199 while ((grp=GETGRENT()) != NULL)
1200 {
1201 int i = 0;
1202 if (grp->gr_mem != NULL) {
1203 while (grp->gr_mem[i] != NULL)
1204 {
1205 if (strcmp(grp->gr_mem[i], pwd->pw_name)==0)
1206 {
1207 printf(j++ == 0 ? " Groups: %s" : ",%s", grp->gr_name);
1208 break;
1209 }
1210 ++i;
1211 }
1212 }
1213 }
1214 ENDGRENT();
1215 printf("%s", j ? "\n" : "");
1216 }
1217 return EXIT_SUCCESS;
1218 }
1219
1220 char *
1221 pw_checkname(char *name, int gecos)
1222 {
1223 char showch[8];
1224 const char *badchars, *ch, *showtype;
1225 int reject;
1226
1227 ch = name;
1228 reject = 0;
1229 if (gecos) {
1230 /* See if the name is valid as a gecos (comment) field. */
1231 badchars = ":!@";
1232 showtype = "gecos field";
1233 } else {
1234 /* See if the name is valid as a userid or group. */
1235 badchars = " ,\t:+&#%$^()!@~*?<>=|\\/\"";
1236 showtype = "userid/group name";
1237 /* Userids and groups can not have a leading '-'. */
1238 if (*ch == '-')
1239 reject = 1;
1240 }
1241 if (!reject) {
1242 while (*ch) {
1243 if (strchr(badchars, *ch) != NULL || *ch < ' ' ||
1244 *ch == 127) {
1245 reject = 1;
1246 break;
1247 }
1248 /* 8-bit characters are only allowed in GECOS fields */
1249 if (!gecos && (*ch & 0x80)) {
1250 reject = 1;
1251 break;
1252 }
1253 ch++;
1254 }
1255 }
1256 /*
1257 * A `$' is allowed as the final character for userids and groups,
1258 * mainly for the benefit of samba.
1259 */
1260 if (reject && !gecos) {
1261 if (*ch == '$' && *(ch + 1) == '\0') {
1262 reject = 0;
1263 ch++;
1264 }
1265 }
1266 if (reject) {
1267 snprintf(showch, sizeof(showch), (*ch >= ' ' && *ch < 127)
1268 ? "`%c'" : "0x%02x", *ch);
1269 errx(EX_DATAERR, "invalid character %s at position %td in %s",
1270 showch, (ch - name), showtype);
1271 }
1272 if (!gecos && (ch - name) > LOGNAMESIZE)
1273 errx(EX_DATAERR, "name too long `%s' (max is %d)", name,
1274 LOGNAMESIZE);
1275
1276 return (name);
1277 }
1278
1279
1280 static void
1281 rmat(uid_t uid)
1282 {
1283 DIR *d = opendir("/var/at/jobs");
1284
1285 if (d != NULL) {
1286 struct dirent *e;
1287
1288 while ((e = readdir(d)) != NULL) {
1289 struct stat st;
1290
1291 if (strncmp(e->d_name, ".lock", 5) != 0 &&
1292 stat(e->d_name, &st) == 0 &&
1293 !S_ISDIR(st.st_mode) &&
1294 st.st_uid == uid) {
1295 char tmp[MAXPATHLEN];
1296
1297 snprintf(tmp, sizeof(tmp), "/usr/bin/atrm %s", e->d_name);
1298 system(tmp);
1299 }
1300 }
1301 closedir(d);
1302 }
1303 }
1304
1305 static void
1306 rmopie(char const * name)
1307 {
1308 static const char etcopie[] = "/etc/opiekeys";
1309 FILE *fp = fopen(etcopie, "r+");
1310
1311 if (fp != NULL) {
1312 char tmp[1024];
1313 off_t atofs = 0;
1314 int length = strlen(name);
1315
1316 while (fgets(tmp, sizeof tmp, fp) != NULL) {
1317 if (strncmp(name, tmp, length) == 0 && tmp[length]==' ') {
1318 if (fseek(fp, atofs, SEEK_SET) == 0) {
1319 fwrite("#", 1, 1, fp); /* Comment username out */
1320 }
1321 break;
1322 }
1323 atofs = ftell(fp);
1324 }
1325 /*
1326 * If we got an error of any sort, don't update!
1327 */
1328 fclose(fp);
1329 }
1330 }
1331
A port of FreeBSDs pw for Darwin