1 /*- 2 * SPDX-License-Identifier: BSD-2-Clause 3 * 4 * Copyright (C) 1996 5 * David L. Nugent. All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY DAVID L. NUGENT AND CONTRIBUTORS ``AS IS'' AND 17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 19 * ARE DISCLAIMED. IN NO EVENT SHALL DAVID L. NUGENT OR CONTRIBUTORS BE LIABLE 20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 26 * SUCH DAMAGE. 27 */ 28 29 #include <sys/wait.h> 30 31 #include <err.h> 32 #include <errno.h> 33 #include <pwd.h> 34 #include <libutil.h> 35 #include <stdio.h> 36 #include <stdlib.h> 37 #include <string.h> 38 #include <unistd.h> 39 40 #include "pwupd.h" 41 42 char * 43 getpwpath(char const * file) 44 { 45 static char pathbuf[MAXPATHLEN]; 46 47 snprintf(pathbuf, sizeof pathbuf, "%s/%s", conf.etcpath, file); 48 49 return (pathbuf); 50 } 51 52 static int 53 pwdb_check(void) 54 { 55 int i = 0; 56 pid_t pid; 57 char *args[10]; 58 59 args[i++] = _PATH_PWD_MKDB; 60 args[i++] = "-C"; 61 62 if (strcmp(conf.etcpath, _PATH_PWD) != 0) { 63 args[i++] = "-d"; 64 args[i++] = conf.etcpath; 65 } 66 args[i++] = getpwpath(_MASTERPASSWD); 67 args[i] = NULL; 68 69 if ((pid = fork()) == -1) /* Error (errno set) */ 70 i = errno; 71 else if (pid == 0) { /* Child */ 72 execv(args[0], args); 73 _exit(1); 74 } else { /* Parent */ 75 waitpid(pid, &i, 0); 76 if (WEXITSTATUS(i)) 77 i = EIO; 78 } 79 80 return (i); 81 } 82 83 static int 84 pw_update(struct passwd * pwd, char const * user) 85 { 86 struct passwd *pw = NULL; 87 struct passwd *old_pw = NULL; 88 int rc, pfd, tfd; 89 90 if ((rc = pwdb_check()) != 0) 91 return (rc); 92 93 if (pwd != NULL) 94 pw = pw_dup(pwd); 95 96 if (user != NULL) 97 old_pw = GETPWNAM(user); 98 99 if (pw_init(conf.etcpath, NULL)) 100 err(1, "pw_init()"); 101 if ((pfd = pw_lock()) == -1) { 102 pw_fini(); 103 err(1, "pw_lock()"); 104 } 105 if ((tfd = pw_tmp(-1)) == -1) { 106 pw_fini(); 107 err(1, "pw_tmp()"); 108 } 109 if (pw_copy(pfd, tfd, pw, old_pw) == -1) { 110 pw_fini(); 111 close(tfd); 112 err(1, "pw_copy()"); 113 } 114 fsync(tfd); 115 close(tfd); 116 /* 117 * in case of deletion of a user, the whole database 118 * needs to be regenerated 119 */ 120 if (pw_mkdb(pw != NULL ? pw->pw_name : NULL) == -1) { 121 pw_fini(); 122 err(1, "pw_mkdb()"); 123 } 124 free(pw); 125 pw_fini(); 126 127 return (0); 128 } 129 130 int 131 addpwent(struct passwd * pwd) 132 { 133 134 return (pw_update(pwd, NULL)); 135 } 136 137 int 138 chgpwent(char const * login, struct passwd * pwd) 139 { 140 141 return (pw_update(pwd, login)); 142 } 143 144 int 145 delpwent(struct passwd * pwd) 146 { 147 148 return (pw_update(NULL, pwd->pw_name)); 149 } 150