usr.sbin/rpc.yppasswdd/yppasswdd_server.c

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