xref: /freebsd/usr.sbin/rpc.yppasswdd/yppasswdd_server.c (revision efe3b0de1438e7a8473d92f2be57072394559e3c)
1 /*
2  * Copyright (c) 1995, 1996
3  *	Bill Paul <wpaul@ctr.columbia.edu>.  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 Bill Paul.
16  * 4. Neither the name of the author nor the names of any co-contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY Bill Paul AND CONTRIBUTORS ``AS IS'' AND
21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL Bill Paul OR CONTRIBUTORS BE LIABLE
24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30  * SUCH DAMAGE.
31  */
32 
33 #include <sys/cdefs.h>
34 __FBSDID("$FreeBSD$");
35 
36 #include <sys/param.h>
37 #include <sys/fcntl.h>
38 #include <sys/socket.h>
39 #include <sys/stat.h>
40 #include <sys/wait.h>
41 
42 #include <arpa/inet.h>
43 #include <netinet/in.h>
44 
45 #include <ctype.h>
46 #include <db.h>
47 #include <dirent.h>
48 #include <errno.h>
49 #include <limits.h>
50 #include <pwd.h>
51 #include <signal.h>
52 #include <stdio.h>
53 #include <stdlib.h>
54 #include <string.h>
55 #include <unistd.h>
56 
57 #include <libgen.h>
58 #include <libutil.h>
59 
60 #include <rpc/rpc.h>
61 #include <rpcsvc/yp.h>
62 struct dom_binding;
63 #include <rpcsvc/ypclnt.h>
64 #include "yppasswdd_extern.h"
65 #include "yppasswd.h"
66 #include "yppasswd_private.h"
67 #include "ypxfr_extern.h"
68 #include "yp_extern.h"
69 
70 static struct passwd yp_password;
71 
72 static void
73 xlate_passwd(struct x_master_passwd *xpwd, struct passwd *pwd)
74 {
75 	pwd->pw_name = xpwd->pw_name;
76 	pwd->pw_passwd = xpwd->pw_passwd;
77 	pwd->pw_uid = xpwd->pw_uid;
78 	pwd->pw_gid = xpwd->pw_gid;
79 	pwd->pw_change = xpwd->pw_change;
80 	pwd->pw_class = xpwd->pw_class;
81 	pwd->pw_gecos = xpwd->pw_gecos;
82 	pwd->pw_dir = xpwd->pw_dir;
83 	pwd->pw_shell = xpwd->pw_shell;
84 	pwd->pw_expire = xpwd->pw_expire;
85 	pwd->pw_fields = xpwd->pw_fields;
86 }
87 
88 static void
89 copy_yp_pass(char *p, int x, int m)
90 {
91 	char *t, *s = p;
92 	static char *buf;
93 
94 	yp_password.pw_fields = 0;
95 
96 	buf = realloc(buf, m + 10);
97 	bzero(buf, m + 10);
98 
99 	/* Turn all colons into NULLs */
100 	while (strchr(s, ':')) {
101 		s = (strchr(s, ':') + 1);
102 		*(s - 1)= '\0';
103 	}
104 
105 	t = buf;
106 #define EXPAND(e) do { \
107 	e = t; \
108 	while ((*t++ = *p++)); \
109 } while (0)
110         EXPAND(yp_password.pw_name);
111 	yp_password.pw_fields |= _PWF_NAME;
112         EXPAND(yp_password.pw_passwd);
113 	yp_password.pw_fields |= _PWF_PASSWD;
114 	yp_password.pw_uid = atoi(p);
115         p += (strlen(p) + 1);
116 	yp_password.pw_fields |= _PWF_UID;
117 	yp_password.pw_gid = atoi(p);
118         p += (strlen(p) + 1);
119 	yp_password.pw_fields |= _PWF_GID;
120 	if (x) {
121 		EXPAND(yp_password.pw_class);
122 		yp_password.pw_fields |= _PWF_CLASS;
123 		yp_password.pw_change = atol(p);
124 		p += (strlen(p) + 1);
125 		yp_password.pw_fields |= _PWF_CHANGE;
126 		yp_password.pw_expire = atol(p);
127 		p += (strlen(p) + 1);
128 		yp_password.pw_fields |= _PWF_EXPIRE;
129 	}
130         EXPAND(yp_password.pw_gecos);
131 	yp_password.pw_fields |= _PWF_GECOS;
132         EXPAND(yp_password.pw_dir);
133 	yp_password.pw_fields |= _PWF_DIR;
134         EXPAND(yp_password.pw_shell);
135 	yp_password.pw_fields |= _PWF_SHELL;
136 
137 	return;
138 }
139 
140 static int
141 validchars(char *arg)
142 {
143 	size_t i;
144 
145 	for (i = 0; i < strlen(arg); i++) {
146 		if (iscntrl(arg[i])) {
147 			yp_error("string contains a control character");
148 			return(1);
149 		}
150 		if (arg[i] == ':') {
151 			yp_error("string contains a colon");
152 			return(1);
153 		}
154 		/* Be evil: truncate strings with \n in them silently. */
155 		if (arg[i] == '\n') {
156 			arg[i] = '\0';
157 			return(0);
158 		}
159 	}
160 	return(0);
161 }
162 
163 static int
164 validate_master(struct passwd *opw __unused, struct x_master_passwd *npw)
165 {
166 
167 	if (npw->pw_name[0] == '+' || npw->pw_name[0] == '-') {
168 		yp_error("client tried to modify an NIS entry");
169 		return(1);
170 	}
171 
172 	if (validchars(npw->pw_shell)) {
173 		yp_error("specified shell contains invalid characters");
174 		return(1);
175 	}
176 
177 	if (validchars(npw->pw_gecos)) {
178 		yp_error("specified gecos field contains invalid characters");
179 		return(1);
180 	}
181 
182 	if (validchars(npw->pw_passwd)) {
183 		yp_error("specified password contains invalid characters");
184 		return(1);
185 	}
186 	return(0);
187 }
188 
189 static int
190 validate(struct passwd *opw, struct x_passwd *npw)
191 {
192 
193 	if (npw->pw_name[0] == '+' || npw->pw_name[0] == '-') {
194 		yp_error("client tried to modify an NIS entry");
195 		return(1);
196 	}
197 
198 	if ((uid_t)npw->pw_uid != opw->pw_uid) {
199 		yp_error("UID mismatch: client says user %s has UID %d",
200 			 npw->pw_name, npw->pw_uid);
201 		yp_error("database says user %s has UID %d", opw->pw_name,
202 			 opw->pw_uid);
203 		return(1);
204 	}
205 
206 	if ((gid_t)npw->pw_gid != opw->pw_gid) {
207 		yp_error("GID mismatch: client says user %s has GID %d",
208 			 npw->pw_name, npw->pw_gid);
209 		yp_error("database says user %s has GID %d", opw->pw_name,
210 			 opw->pw_gid);
211 		return(1);
212 	}
213 
214 	/*
215 	 * Don't allow the user to shoot himself in the foot,
216 	 * even on purpose.
217 	 */
218 	if (!no_chsh && !ok_shell(npw->pw_shell)) {
219 		yp_error("%s is not a valid shell", npw->pw_shell);
220 		return(1);
221 	}
222 
223 	if (!no_chsh && validchars(npw->pw_shell)) {
224 		yp_error("specified shell contains invalid characters");
225 		return(1);
226 	}
227 
228 	if (validchars(npw->pw_gecos)) {
229 		yp_error("specified gecos field contains invalid characters");
230 		return(1);
231 	}
232 
233 	if (validchars(npw->pw_passwd)) {
234 		yp_error("specified password contains invalid characters");
235 		return(1);
236 	}
237 	return(0);
238 }
239 
240 /*
241  * Kludge alert:
242  * In order to have one rpc.yppasswdd support multiple domains,
243  * we have to cheat: we search each directory under /var/yp
244  * and try to match the user in each master.passwd.byname
245  * map that we find. If the user matches (username, uid and gid
246  * all agree), then we use that domain. If we match the user in
247  * more than one database, we must abort.
248  */
249 static char *
250 find_domain(struct x_passwd *pw)
251 {
252 	struct stat statbuf;
253 	struct dirent *dirp;
254 	DIR *dird;
255 	char yp_mapdir[MAXPATHLEN + 2];
256 	static char domain[YPMAXDOMAIN];
257 	char *tmp = NULL;
258 	DBT key, data;
259 	int hit = 0;
260 
261 	yp_error("performing multidomain lookup");
262 
263 	if ((dird = opendir(yp_dir)) == NULL) {
264 		yp_error("opendir(%s) failed: %s", yp_dir, strerror(errno));
265 		return(NULL);
266 	}
267 
268 	while ((dirp = readdir(dird)) != NULL) {
269 		snprintf(yp_mapdir, sizeof yp_mapdir, "%s/%s",
270 							yp_dir, dirp->d_name);
271 		if (stat(yp_mapdir, &statbuf) < 0) {
272 			yp_error("stat(%s) failed: %s", yp_mapdir,
273 							strerror(errno));
274 			closedir(dird);
275 			return(NULL);
276 		}
277 		if (S_ISDIR(statbuf.st_mode)) {
278 			tmp = (char *)dirp->d_name;
279 			key.data = pw->pw_name;
280 			key.size = strlen(pw->pw_name);
281 
282 			if (yp_get_record(tmp,"master.passwd.byname",
283 			  		&key, &data, 0) != YP_TRUE) {
284 				continue;
285 			}
286 			*((char *)data.data + data.size) = '\0';
287 			copy_yp_pass(data.data, 1, data.size);
288 			if (yp_password.pw_uid == (uid_t)pw->pw_uid &&
289 			    yp_password.pw_gid == (gid_t)pw->pw_gid) {
290 				hit++;
291 				snprintf(domain, YPMAXDOMAIN, "%s", tmp);
292 			}
293 		}
294 	}
295 
296 	closedir(dird);
297 	if (hit > 1) {
298 		yp_error("found same user in two different domains");
299 		return(NULL);
300 	} else
301 		return((char *)&domain);
302 }
303 
304 static const char *maps[] = {
305 	"master.passwd.byname",
306 	"master.passwd.byuid",
307 	"passwd.byname",
308 	"passwd.byuid"
309 };
310 
311 static const char *formats[] = {
312 	"%s:%s:%d:%d:%s:%ld:%ld:%s:%s:%s",
313 	"%s:%s:%d:%d:%s:%ld:%ld:%s:%s:%s",
314 	"%s:%s:%d:%d:%s:%s:%s",
315 	"%s:%s:%d:%d:%s:%s:%s"
316 };
317 
318 static int
319 update_inplace(struct passwd *pw, char *domain)
320 {
321 	DB *dbp = NULL;
322 	DBT key = { NULL, 0 };
323 	DBT data = { NULL, 0 };
324 	char pwbuf[YPMAXRECORD];
325 	char keybuf[20];
326 	int i;
327 	char *ptr = NULL;
328 	static char yp_last[] = "YP_LAST_MODIFIED";
329 	char yplastbuf[YPMAXRECORD];
330 
331 	snprintf(yplastbuf, sizeof yplastbuf, "%llu",
332 	    (unsigned long long)time(NULL));
333 
334 	for (i = 0; i < 4; i++) {
335 
336 		if (i % 2) {
337 			snprintf(keybuf, sizeof keybuf,
338 			    "%llu", (unsigned long long)pw->pw_uid);
339 			key.data = &keybuf;
340 			key.size = strlen(keybuf);
341 		} else {
342 			key.data = pw->pw_name;
343 			key.size = strlen(pw->pw_name);
344 		}
345 
346 		/*
347 		 * XXX The passwd.byname and passwd.byuid maps come in
348 		 * two flavors: secure and insecure. The secure version
349 		 * has a '*' in the password field whereas the insecure one
350 		 * has a real crypted password. The maps will be insecure
351 		 * if they were built with 'unsecure = TRUE' enabled in
352 		 * /var/yp/Makefile, but we'd have no way of knowing if
353 		 * this has been done unless we were to try parsing the
354 		 * Makefile, which is a disgusting thought. Instead, we
355 		 * read the records from the maps, skip to the first ':'
356 		 * in them, and then look at the character immediately
357 		 * following it. If it's an '*' then the map is 'secure'
358 		 * and we must not insert a real password into the pw_passwd
359 		 * field. If it's not an '*', then we put the real crypted
360 		 * password in.
361 		 */
362 		if (yp_get_record(domain,maps[i],&key,&data,1) != YP_TRUE) {
363 			yp_error("couldn't read %s/%s: %s", domain,
364 						maps[i], strerror(errno));
365 			return(1);
366 		}
367 
368 		if ((ptr = strchr(data.data, ':')) == NULL) {
369 			yp_error("no colon in passwd record?!");
370 			return(1);
371 		}
372 
373 		/*
374 		 * XXX Supposing we have more than one user with the same
375 		 * UID? (Or more than one user with the same name?) We could
376 		 * end up modifying the wrong record if were not careful.
377 		 */
378 		if (i % 2) {
379 			if (strncmp(data.data, pw->pw_name,
380 							strlen(pw->pw_name))) {
381 				yp_error("warning: found entry for UID %d \
382 in map %s@%s with wrong name (%.*s)", pw->pw_uid, maps[i], domain,
383 				    (int)(ptr - (char *)data.data),
384 				    (char *)data.data);
385 				yp_error("there may be more than one user \
386 with the same UID - continuing");
387 				continue;
388 			}
389 		} else {
390 			/*
391 			 * We're really being ultra-paranoid here.
392 			 * This is generally a 'can't happen' condition.
393 			 */
394 			snprintf(pwbuf, sizeof pwbuf, ":%d:%d:", pw->pw_uid,
395 								  pw->pw_gid);
396 			if (!strstr(data.data, pwbuf)) {
397 				yp_error("warning: found entry for user %s \
398 in map %s@%s with wrong UID", pw->pw_name, maps[i], domain);
399 				yp_error("there may be more than one user \
400 with the same name - continuing");
401 				continue;
402 			}
403 		}
404 
405 		if (i < 2) {
406 			snprintf(pwbuf, sizeof pwbuf, formats[i],
407 			   pw->pw_name, pw->pw_passwd, pw->pw_uid,
408 			   pw->pw_gid, pw->pw_class, pw->pw_change,
409 			   pw->pw_expire, pw->pw_gecos, pw->pw_dir,
410 			   pw->pw_shell);
411 		} else {
412 			snprintf(pwbuf, sizeof pwbuf, formats[i],
413 			   pw->pw_name, *(ptr+1) == '*' ? "*" : pw->pw_passwd,
414 			   pw->pw_uid, pw->pw_gid, pw->pw_gecos, pw->pw_dir,
415 			   pw->pw_shell);
416 		}
417 
418 #define FLAGS O_RDWR|O_CREAT
419 
420 		if ((dbp = yp_open_db_rw(domain, maps[i], FLAGS)) == NULL) {
421 			yp_error("couldn't open %s/%s r/w: %s",domain,
422 						maps[i],strerror(errno));
423 			return(1);
424 		}
425 
426 		data.data = pwbuf;
427 		data.size = strlen(pwbuf);
428 
429 		if (yp_put_record(dbp, &key, &data, 1) != YP_TRUE) {
430 			yp_error("failed to update record in %s/%s", domain,
431 								maps[i]);
432 			(void)(dbp->close)(dbp);
433 			return(1);
434 		}
435 
436 		key.data = yp_last;
437 		key.size = strlen(yp_last);
438 		data.data = (char *)&yplastbuf;
439 		data.size = strlen(yplastbuf);
440 
441 		if (yp_put_record(dbp, &key, &data, 1) != YP_TRUE) {
442 			yp_error("failed to update timestamp in %s/%s", domain,
443 								maps[i]);
444 			(void)(dbp->close)(dbp);
445 			return(1);
446 		}
447 
448 		(void)(dbp->close)(dbp);
449 	}
450 
451 	return(0);
452 }
453 
454 int *
455 yppasswdproc_update_1_svc(yppasswd *argp, struct svc_req *rqstp)
456 {
457 	static int  result;
458 	struct sockaddr_in *rqhost;
459 	DBT key, data;
460 	int rval = 0;
461 	int pfd, tfd;
462 	int pid;
463 	int passwd_changed = 0;
464 	int shell_changed = 0;
465 	int gecos_changed = 0;
466 	char *cryptpw;
467 	char *oldshell = NULL;
468 	char *oldgecos = NULL;
469 	char *passfile_hold;
470 	char passfile_buf[MAXPATHLEN + 2];
471 	char passfile_hold_buf[MAXPATHLEN + 2];
472 	char *domain = yppasswd_domain;
473 	static struct sockaddr_in clntaddr;
474 	static struct timeval t_saved, t_test;
475 
476 	/*
477 	 * Normal user updates always use the 'default' master.passwd file.
478 	 */
479 
480 	passfile = passfile_default;
481 	result = 1;
482 
483 	rqhost = svc_getcaller(rqstp->rq_xprt);
484 
485 	gettimeofday(&t_test, NULL);
486 	if (!bcmp(rqhost, &clntaddr, sizeof *rqhost) &&
487 		t_test.tv_sec > t_saved.tv_sec &&
488 		t_test.tv_sec - t_saved.tv_sec < 300) {
489 
490 		bzero(&clntaddr, sizeof clntaddr);
491 		bzero(&t_saved, sizeof t_saved);
492 		return(NULL);
493 	}
494 
495 	bcopy(rqhost, &clntaddr, sizeof clntaddr);
496 	gettimeofday(&t_saved, NULL);
497 
498 	if (yp_access(resvport ? "master.passwd.byname" : NULL, rqstp)) {
499 		yp_error("rejected update request from unauthorized host");
500 		svcerr_auth(rqstp->rq_xprt, AUTH_BADCRED);
501 		return(&result);
502 	}
503 
504 	/*
505 	 * Step one: find the user. (It's kinda pointless to
506 	 * proceed if the user doesn't exist.) We look for the
507 	 * user in the master.passwd.byname database, _NOT_ by
508 	 * using getpwent() and friends! We can't use getpwent()
509 	 * since the NIS master server is not guaranteed to be
510 	 * configured as an NIS client.
511 	 */
512 
513 	if (multidomain) {
514 		if ((domain = find_domain(&argp->newpw)) == NULL) {
515 			yp_error("multidomain lookup failed - aborting update");
516 			return(&result);
517 		} else
518 			yp_error("updating user %s in domain %s",
519 					argp->newpw.pw_name, domain);
520 	}
521 
522 	key.data = argp->newpw.pw_name;
523 	key.size = strlen(argp->newpw.pw_name);
524 
525 	if ((rval = yp_get_record(domain,"master.passwd.byname",
526 		  	&key, &data, 0)) != YP_TRUE) {
527 		if (rval == YP_NOKEY) {
528 			yp_error("user %s not found in passwd database",
529 			 	argp->newpw.pw_name);
530 		} else {
531 			yp_error("database access error: %s",
532 			 	yperr_string(rval));
533 		}
534 		return(&result);
535 	}
536 
537 	/* Nul terminate, please. */
538 	*((char *)data.data + data.size) = '\0';
539 
540 	copy_yp_pass(data.data, 1, data.size);
541 
542 	/* Step 2: check that the supplied oldpass is valid. */
543 
544 	cryptpw = crypt(argp->oldpass, yp_password.pw_passwd);
545 	if (cryptpw == NULL || strcmp(cryptpw, yp_password.pw_passwd)) {
546 		yp_error("rejected change attempt -- bad password");
547 		yp_error("client address: %s username: %s",
548 			  inet_ntoa(rqhost->sin_addr),
549 			  argp->newpw.pw_name);
550 		return(&result);
551 	}
552 
553 	/* Step 3: validate the arguments passed to us by the client. */
554 
555 	if (validate(&yp_password, &argp->newpw)) {
556 		yp_error("rejecting change attempt: bad arguments");
557 		yp_error("client address: %s username: %s",
558 			 inet_ntoa(rqhost->sin_addr),
559 			 argp->newpw.pw_name);
560 		svcerr_decode(rqstp->rq_xprt);
561 		return(&result);
562 	}
563 
564 	/* Step 4: update the user's passwd structure. */
565 
566 	if (!no_chsh && strcmp(argp->newpw.pw_shell, yp_password.pw_shell)) {
567 		oldshell = yp_password.pw_shell;
568 		yp_password.pw_shell = argp->newpw.pw_shell;
569 		shell_changed++;
570 	}
571 
572 
573 	if (!no_chfn && strcmp(argp->newpw.pw_gecos, yp_password.pw_gecos)) {
574 		oldgecos = yp_password.pw_gecos;
575 		yp_password.pw_gecos = argp->newpw.pw_gecos;
576 		gecos_changed++;
577 	}
578 
579 	if (strcmp(argp->newpw.pw_passwd, yp_password.pw_passwd)) {
580 		yp_password.pw_passwd = argp->newpw.pw_passwd;
581 		yp_password.pw_change = 0;
582 		passwd_changed++;
583 	}
584 
585 	/*
586 	 * If the caller specified a domain other than our 'default'
587 	 * domain, change the path to master.passwd accordingly.
588 	 */
589 
590 	if (strcmp(domain, yppasswd_domain)) {
591 		snprintf(passfile_buf, sizeof(passfile_buf),
592 			"%s/%s/master.passwd", yp_dir, domain);
593 		passfile = (char *)&passfile_buf;
594 	}
595 
596 	/*
597 	 * Create a filename to hold the original master.passwd
598 	 * so if our call to yppwupdate fails we can roll back
599 	 */
600 	snprintf(passfile_hold_buf, sizeof(passfile_hold_buf),
601 	    "%s.hold", passfile);
602 	passfile_hold = (char *)&passfile_hold_buf;
603 
604 
605 	/* Step 5: make a new password file with the updated info. */
606 
607 	if (pw_init(dirname(passfile), passfile)) {
608 		yp_error("pw_init() failed");
609 		return &result;
610 	}
611 	if ((pfd = pw_lock()) == -1) {
612 		pw_fini();
613 		yp_error("pw_lock() failed");
614 		return &result;
615 	}
616 	if ((tfd = pw_tmp(-1)) == -1) {
617 		pw_fini();
618 		yp_error("pw_tmp() failed");
619 		return &result;
620 	}
621 	if (pw_copy(pfd, tfd, &yp_password, NULL) == -1) {
622 		pw_fini();
623 		yp_error("pw_copy() failed");
624 		return &result;
625 	}
626 	if (rename(passfile, passfile_hold) == -1) {
627 		pw_fini();
628 		yp_error("rename of %s to %s failed", passfile,
629 		    passfile_hold);
630 		return &result;
631 	}
632 
633 	if (strcmp(passfile, _PATH_MASTERPASSWD) == 0) {
634 		/*
635 		 * NIS server is exporting the system's master.passwd.
636 		 * Call pw_mkdb to rebuild passwd and the .db files
637 		 */
638 		if (pw_mkdb(yp_password.pw_name) == -1) {
639 			pw_fini();
640 			yp_error("pw_mkdb() failed");
641 			rename(passfile_hold, passfile);
642 			return &result;
643 		}
644 	} else {
645 		/*
646 		 * NIS server is exporting a private master.passwd.
647 		 * Rename tempfile into final location
648 		 */
649 		if (rename(pw_tempname(), passfile) == -1) {
650 			pw_fini();
651 			yp_error("rename of %s to %s failed",
652 			    pw_tempname(), passfile);
653 			rename(passfile_hold, passfile);
654 			return &result;
655 		}
656 	}
657 
658 	pw_fini();
659 
660 	if (inplace) {
661 		if ((rval = update_inplace(&yp_password, domain))) {
662 			yp_error("inplace update failed -- rebuilding maps");
663 		}
664 	}
665 
666 	switch ((pid = fork())) {
667 	case 0:
668 		if (inplace && !rval) {
669     			execlp(MAP_UPDATE_PATH, MAP_UPDATE, passfile,
670 				yppasswd_domain, "pushpw", (char *)NULL);
671 		} else {
672     			execlp(MAP_UPDATE_PATH, MAP_UPDATE, passfile,
673 				yppasswd_domain, (char *)NULL);
674 		}
675     		yp_error("couldn't exec map update process: %s",
676 					strerror(errno));
677 		unlink(passfile);
678 		rename(passfile_hold, passfile);
679     		exit(1);
680 		break;
681 	case -1:
682 		yp_error("fork() failed: %s", strerror(errno));
683 		unlink(passfile);
684 		rename(passfile_hold, passfile);
685 		return(&result);
686 		break;
687 	default:
688 		unlink(passfile_hold);
689 		break;
690 	}
691 
692 	if (verbose) {
693 		yp_error("update completed for user %s (uid %d) in %s:",
694 		    argp->newpw.pw_name, argp->newpw.pw_uid, passfile);
695 
696 		if (passwd_changed)
697 			yp_error("password changed");
698 
699 		if (gecos_changed)
700 			yp_error("gecos changed ('%s' -> '%s')",
701 					oldgecos, argp->newpw.pw_gecos);
702 
703 		if (shell_changed)
704 			yp_error("shell changed ('%s' -> '%s')",
705 					oldshell, argp->newpw.pw_shell);
706 	}
707 
708 	result = 0;
709 	return (&result);
710 }
711 
712 /*
713  * Note that this function performs a little less sanity checking
714  * than the last one. Since only the superuser is allowed to use it,
715  * it is assumed that the caller knows what he's doing.
716  */
717 int *
718 yppasswdproc_update_master_1_svc(master_yppasswd *argp,
719     struct svc_req *rqstp)
720 {
721 	static int result;
722 	int pfd, tfd;
723 	int pid;
724 	uid_t uid;
725 	int rval = 0;
726 	DBT key, data;
727 	char *passfile_hold;
728 	char passfile_buf[MAXPATHLEN + 2];
729 	char passfile_hold_buf[MAXPATHLEN + 2];
730 	struct sockaddr_in *rqhost;
731 	SVCXPRT	*transp;
732 	struct passwd newpasswd;
733 
734 	result = 1;
735 	transp = rqstp->rq_xprt;
736 
737 	/*
738 	 * NO AF_INET CONNETCIONS ALLOWED!
739 	 */
740 	rqhost = svc_getcaller(transp);
741 	if (rqhost->sin_family != AF_UNIX) {
742 		yp_error("Alert! %s/%d attempted to use superuser-only \
743 procedure!\n", inet_ntoa(rqhost->sin_addr), rqhost->sin_port);
744 		svcerr_auth(transp, AUTH_BADCRED);
745 		return(&result);
746 	}
747 
748 	if (rqstp->rq_cred.oa_flavor != AUTH_SYS) {
749 		yp_error("caller didn't send proper credentials");
750 		svcerr_auth(transp, AUTH_BADCRED);
751 		return(&result);
752 	}
753 
754 	if (__rpc_get_local_uid(transp, &uid) < 0) {
755 		yp_error("caller didn't send proper credentials");
756 		svcerr_auth(transp, AUTH_BADCRED);
757 		return(&result);
758 	}
759 
760 	if (uid) {
761 		yp_error("caller euid is %d, expecting 0 -- rejecting request",
762 		    uid);
763 		svcerr_auth(rqstp->rq_xprt, AUTH_BADCRED);
764 		return(&result);
765 	}
766 
767 	passfile = passfile_default;
768 
769 	key.data = argp->newpw.pw_name;
770 	key.size = strlen(argp->newpw.pw_name);
771 
772 	/*
773 	 * The superuser may add entries to the passwd maps if
774 	 * rpc.yppasswdd is started with the -a flag. Paranoia
775 	 * prevents me from allowing additions by default.
776 	 */
777 	if ((rval = yp_get_record(argp->domain, "master.passwd.byname",
778 			  &key, &data, 0)) != YP_TRUE) {
779 		if (rval == YP_NOKEY) {
780 			yp_error("user %s not found in passwd database",
781 				 argp->newpw.pw_name);
782 			if (allow_additions)
783 				yp_error("notice: adding user %s to \
784 master.passwd database for domain %s", argp->newpw.pw_name, argp->domain);
785 			else
786 				yp_error("restart rpc.yppasswdd with the -a flag to \
787 allow additions to be made to the password database");
788 		} else {
789 			yp_error("database access error: %s",
790 				 yperr_string(rval));
791 		}
792 		if (!allow_additions)
793 			return(&result);
794 	} else {
795 
796 		/* Nul terminate, please. */
797 		*((char *)data.data + data.size) = '\0';
798 
799 		copy_yp_pass(data.data, 1, data.size);
800 	}
801 
802 	/*
803 	 * Perform a small bit of sanity checking.
804 	 */
805 	if (validate_master(rval == YP_TRUE ? &yp_password:NULL,&argp->newpw)){
806 		yp_error("rejecting update attempt for %s: bad arguments",
807 			 argp->newpw.pw_name);
808 		return(&result);
809 	}
810 
811 	/*
812 	 * If the caller specified a domain other than our 'default'
813 	 * domain, change the path to master.passwd accordingly.
814 	 */
815 
816 	if (strcmp(argp->domain, yppasswd_domain)) {
817 		snprintf(passfile_buf, sizeof(passfile_buf),
818 			"%s/%s/master.passwd", yp_dir, argp->domain);
819 		passfile = (char *)&passfile_buf;
820 	}
821 
822 	/*
823 	 * Create a filename to hold the original master.passwd
824 	 * so if our call to yppwupdate fails we can roll back
825 	 */
826 	snprintf(passfile_hold_buf, sizeof(passfile_hold_buf),
827 	    "%s.hold", passfile);
828 	passfile_hold = (char *)&passfile_hold_buf;
829 
830 	if (pw_init(dirname(passfile), passfile)) {
831 		yp_error("pw_init() failed");
832 		return &result;
833 	}
834 	if ((pfd = pw_lock()) == -1) {
835 		pw_fini();
836 		yp_error("pw_lock() failed");
837 		return &result;
838 	}
839 	if ((tfd = pw_tmp(-1)) == -1) {
840 		pw_fini();
841 		yp_error("pw_tmp() failed");
842 		return &result;
843 	}
844 	xlate_passwd(&argp->newpw, &newpasswd);
845 	if (pw_copy(pfd, tfd, &newpasswd, NULL) == -1) {
846 		pw_fini();
847 		yp_error("pw_copy() failed");
848 		return &result;
849 	}
850 	if (rename(passfile, passfile_hold) == -1) {
851 		pw_fini();
852 		yp_error("rename of %s to %s failed", passfile,
853 		    passfile_hold);
854 		return &result;
855 	}
856 	if (strcmp(passfile, _PATH_MASTERPASSWD) == 0) {
857 		/*
858 		 * NIS server is exporting the system's master.passwd.
859 		 * Call pw_mkdb to rebuild passwd and the .db files
860 		 */
861 		if (pw_mkdb(argp->newpw.pw_name) == -1) {
862 			pw_fini();
863 			yp_error("pw_mkdb() failed");
864 			rename(passfile_hold, passfile);
865 			return &result;
866 		}
867 	} else {
868 		/*
869 		 * NIS server is exporting a private master.passwd.
870 		 * Rename tempfile into final location
871 		 */
872 		if (rename(pw_tempname(), passfile) == -1) {
873 			pw_fini();
874 			yp_error("rename of %s to %s failed",
875 			    pw_tempname(), passfile);
876 			rename(passfile_hold, passfile);
877 			return &result;
878 		}
879 	}
880 	pw_fini();
881 
882 	if (inplace) {
883 		xlate_passwd(&argp->newpw, &newpasswd);
884 		if ((rval = update_inplace(&newpasswd, argp->domain))) {
885 			yp_error("inplace update failed -- rebuilding maps");
886 		}
887 	}
888 
889 	switch ((pid = fork())) {
890 	case 0:
891 		if (inplace && !rval) {
892     			execlp(MAP_UPDATE_PATH, MAP_UPDATE, passfile,
893 				argp->domain, "pushpw", (char *)NULL);
894     		} else {
895 			execlp(MAP_UPDATE_PATH, MAP_UPDATE, passfile,
896 				argp->domain, (char *)NULL);
897 		}
898     		yp_error("couldn't exec map update process: %s",
899 					strerror(errno));
900 		unlink(passfile);
901 		rename(passfile_hold, passfile);
902     		exit(1);
903 		break;
904 	case -1:
905 		yp_error("fork() failed: %s", strerror(errno));
906 		unlink(passfile);
907 		rename(passfile_hold, passfile);
908 		return(&result);
909 		break;
910 	default:
911 		unlink(passfile_hold);
912 		break;
913 	}
914 
915 	yp_error("performed update of user %s (uid %d) domain %s",
916 						argp->newpw.pw_name,
917 						argp->newpw.pw_uid,
918 						argp->domain);
919 
920 	result = 0;
921 	return(&result);
922 }
923