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 42char * 43getpwpath(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 52static int 53pwdb_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 83static int 84pw_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 130int 131addpwent(struct passwd * pwd) 132{ 133 134 return (pw_update(pwd, NULL)); 135} 136 137int 138chgpwent(char const * login, struct passwd * pwd) 139{ 140 141 return (pw_update(pwd, login)); 142} 143 144int 145delpwent(struct passwd * pwd) 146{ 147 148 return (pw_update(NULL, pwd->pw_name)); 149} 150