1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License (the "License"). 6 * You may not use this file except in compliance with the License. 7 * 8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9 * or http://www.opensolaris.org/os/licensing. 10 * See the License for the specific language governing permissions 11 * and limitations under the License. 12 * 13 * When distributing Covered Code, include this CDDL HEADER in each 14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15 * If applicable, add the following below this CDDL HEADER, with the 16 * fields enclosed by brackets "[]" replaced with your own identifying 17 * information: Portions Copyright [yyyy] [name of copyright owner] 18 * 19 * CDDL HEADER END 20 */ 21 22 /* 23 * Copyright (c) 2006, 2010, Oracle and/or its affiliates. All rights reserved. 24 * Copyright 2012 Milan Jurik. All rights reserved. 25 * Copyright 2018 Joyent Inc. 26 */ 27 28 #include <stdio.h> 29 #include <stdlib.h> 30 #include <synch.h> 31 #include <thread.h> 32 #include <string.h> 33 #include <errno.h> 34 #include <dlfcn.h> 35 #include <door.h> 36 #include <libscf.h> 37 #include <ucred.h> 38 #include <sys/varargs.h> 39 #include <signal.h> 40 #include <unistd.h> 41 #include <sys/types.h> 42 #include <dirent.h> 43 #include <sys/proc.h> 44 #include <procfs.h> 45 #include <sys/stat.h> 46 #include <fcntl.h> 47 #include <libscf.h> 48 #include "nscd_door.h" 49 #include "nscd_config.h" 50 #include "nscd_log.h" 51 #include "nscd_frontend.h" 52 #include "nscd_selfcred.h" 53 #include "nscd_admin.h" 54 #include "nscd_common.h" 55 #include "ns_sldap.h" 56 57 extern int _logfd; 58 static char *execpath; 59 static char **execargv; 60 static char *selfcred_dbs = NULL; 61 62 static void *get_smf_prop(const char *var, char type, void *def_val); 63 64 /* current self-cred configuration data being used */ 65 static nscd_cfg_global_selfcred_t nscd_selfcred_cfg_g; 66 67 #define _NSCD_PUN_BLOCK 1024 68 static uint8_t pu_nscd_enabled; 69 static int max_pu_nscd = _NSCD_PUN_BLOCK; 70 static int pu_nscd_ttl; 71 72 static nscd_rc_t setup_ldap_backend(); 73 static nscd_rc_t init_user_proc_monitor(); 74 75 /* 76 * clild state 77 */ 78 typedef enum { 79 CHILD_STATE_NONE = 0, 80 CHILD_STATE_UIDKNOWN, 81 CHILD_STATE_FORKSENT, 82 CHILD_STATE_PIDKNOWN 83 } child_state_t; 84 85 86 typedef struct _child { 87 int child_slot; 88 int child_door; 89 pid_t child_pid; 90 uid_t child_uid; 91 gid_t child_gid; 92 child_state_t child_state; 93 int next_open; 94 mutex_t *mutex; 95 cond_t *cond; 96 } child_t; 97 98 static child_t **child = NULL; 99 static mutex_t child_lock = DEFAULTMUTEX; 100 static int open_head; 101 static int open_tail; 102 static int used_slot; 103 104 /* nscd door id */ 105 extern int _doorfd; 106 static pid_t main_uid = 0; 107 108 /* nscd id: main, forker, or child */ 109 extern int _whoami; 110 111 /* forker nscd pid */ 112 static pid_t forker_pid = 0; 113 static pid_t forker_uid = 0; 114 115 long activity = 0; 116 mutex_t activity_lock = DEFAULTMUTEX; 117 118 static int forking_door = -1; 119 static mutex_t forking_lock = DEFAULTMUTEX; 120 121 static void 122 free_slot(int s) 123 { 124 if (child[s] == NULL) 125 return; 126 free(child[s]->mutex); 127 free(child[s]->cond); 128 free(child[s]); 129 child[s] = NULL; 130 } 131 132 void 133 _nscd_free_cslots() 134 { 135 136 int i; 137 138 (void) mutex_lock(&child_lock); 139 140 for (i = 0; i < max_pu_nscd; i++) 141 free_slot(i); 142 143 open_head = -1; 144 open_tail = -1; 145 used_slot = -1; 146 147 (void) mutex_unlock(&child_lock); 148 149 } 150 151 static int 152 init_slot(int s) 153 { 154 child_t *ch; 155 char *me = "init_slot"; 156 157 if (child[s] == NULL) { 158 child[s] = (child_t *)calloc(1, sizeof (child_t)); 159 if (child[s] == NULL) 160 return (-1); 161 ch = child[s]; 162 163 if ((ch->mutex = (mutex_t *)calloc(1, 164 sizeof (mutex_t))) == NULL) { 165 free(ch); 166 return (-1); 167 } 168 (void) mutex_init(ch->mutex, USYNC_THREAD, NULL); 169 170 if ((ch->cond = (cond_t *)calloc(1, 171 sizeof (cond_t))) == NULL) { 172 free(ch->mutex); 173 free(ch); 174 return (-1); 175 } 176 (void) cond_init(ch->cond, USYNC_THREAD, NULL); 177 178 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 179 (me, "slot %d allocated\n", s); 180 } else 181 ch = child[s]; 182 183 ch->child_slot = s; 184 ch->child_door = 0; 185 ch->child_state = CHILD_STATE_NONE; 186 ch->child_pid = 0; 187 ch->child_uid = 0; 188 ch->child_gid = 0; 189 ch->next_open = -1; 190 191 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 192 (me, "slot %d initialized\n", s); 193 194 return (0); 195 } 196 197 static int 198 _nscd_init_cslots() 199 { 200 (void) mutex_lock(&child_lock); 201 202 child = (child_t **)calloc(max_pu_nscd, sizeof (child_t *)); 203 if (child == NULL) 204 return (-1); 205 206 open_head = -1; 207 open_tail = -1; 208 used_slot = -1; 209 210 (void) mutex_unlock(&child_lock); 211 212 return (0); 213 } 214 215 static child_t * 216 get_cslot( 217 uid_t uid, 218 int no_alloc) 219 { 220 int i; 221 child_t *ch, *ret = NULL; 222 char *me = "get_cslot"; 223 224 (void) mutex_lock(&child_lock); 225 226 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 227 (me, "looking for uid %d (slot used = %d)\n", uid, used_slot); 228 229 /* first find the slot with a matching uid */ 230 for (i = 0; i <= used_slot; i++) { 231 ch = child[i]; 232 if (ch->child_state >= CHILD_STATE_UIDKNOWN && 233 ch->child_uid == uid) { 234 ret = ch; 235 (void) mutex_unlock(&child_lock); 236 237 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 238 (me, "slot %d found with uid %d\n", 239 ret->child_slot, ret->child_uid); 240 241 return (ret); 242 } 243 } 244 245 /* if no need to allocate a new slot, return NULL */ 246 if (no_alloc == 1) { 247 (void) mutex_unlock(&child_lock); 248 return (ret); 249 } 250 251 /* no open slot ? get a new one */ 252 if (open_head == -1) { 253 /* if no slot available, allocate more */ 254 if (used_slot >= max_pu_nscd - 1) { 255 child_t **tmp; 256 int newmax = max_pu_nscd + _NSCD_PUN_BLOCK; 257 258 tmp = (child_t **)calloc(newmax, sizeof (child_t *)); 259 if (tmp == NULL) { 260 (void) mutex_unlock(&child_lock); 261 return (ret); 262 } 263 (void) memcpy(tmp, child, sizeof (child_t) * 264 max_pu_nscd); 265 free(child); 266 child = tmp; 267 max_pu_nscd = newmax; 268 } 269 used_slot++; 270 if (init_slot(used_slot) == -1) { 271 used_slot--; 272 (void) mutex_unlock(&child_lock); 273 return (ret); 274 } 275 ch = child[used_slot]; 276 } else { 277 ch = child[open_head]; 278 open_head = ch->next_open; 279 /* got last one ? reset tail */ 280 if (open_head == -1) 281 open_tail = -1; 282 ch->next_open = -1; 283 } 284 285 ch->child_uid = uid; 286 ch->child_state = CHILD_STATE_UIDKNOWN; 287 ret = ch; 288 289 (void) mutex_unlock(&child_lock); 290 291 return (ret); 292 } 293 294 static void 295 return_cslot_nolock(child_t *ch) 296 { 297 298 int slot = ch->child_slot; 299 300 /* have open slot ? add to and reset tail */ 301 if (open_tail != -1) { 302 child[open_tail]->next_open = slot; 303 open_tail = slot; 304 } else { 305 /* no open slot ? make one */ 306 open_head = open_tail = slot; 307 } 308 309 (void) init_slot(ch->child_slot); 310 } 311 312 static void 313 return_cslot(child_t *ch) 314 { 315 316 char *me = "return_cslot"; 317 318 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 319 (me, "returning slot %d\n", ch->child_slot); 320 321 /* return if the slot has been returned by another thread */ 322 if (ch->child_state == CHILD_STATE_NONE) 323 return; 324 325 (void) mutex_lock(&child_lock); 326 327 /* check one more time */ 328 if (ch->child_state == CHILD_STATE_NONE) { 329 (void) mutex_unlock(&child_lock); 330 return; 331 } 332 333 return_cslot_nolock(ch); 334 335 (void) mutex_unlock(&child_lock); 336 } 337 338 static int 339 selfcred_kill( 340 int fd) 341 { 342 int ret; 343 char *me = "selfcred_kill"; 344 345 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 346 (me, "sending kill to door %d\n", fd); 347 348 if (fd != -1) 349 ret = _nscd_doorcall_fd(fd, NSCD_KILL, NULL, 0, 350 NULL, 0, NULL); 351 else 352 ret = _nscd_doorcall(NSCD_KILL); 353 354 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 355 (me, "kill request sent to door %d (rc = %d)\n", fd, ret); 356 357 return (ret); 358 } 359 360 361 void 362 _nscd_kill_forker() 363 { 364 (void) mutex_lock(&forking_lock); 365 if (forking_door != -1) 366 (void) selfcred_kill(forking_door); 367 forking_door = -1; 368 (void) mutex_unlock(&forking_lock); 369 } 370 371 void 372 _nscd_kill_all_children() 373 { 374 int i; 375 int ret; 376 char *me = "_nscd_kill_all_children"; 377 378 (void) mutex_lock(&child_lock); 379 for (i = 0; i <= used_slot; i++) { 380 if (child[i] == NULL) 381 continue; 382 383 if (child[i]->child_state >= CHILD_STATE_PIDKNOWN) { 384 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 385 (me, "killing child process %d (doorfd %d)\n", 386 child[i]->child_pid, child[i]->child_door); 387 388 ret = selfcred_kill(child[i]->child_door); 389 390 if (ret != -1) 391 (void) kill(child[i]->child_pid, SIGTERM); 392 } 393 if (child[i]->child_state != CHILD_STATE_NONE) 394 (void) return_cslot_nolock(child[i]); 395 } 396 (void) mutex_unlock(&child_lock); 397 } 398 static int 399 selfcred_pulse( 400 int fd) 401 { 402 int ret; 403 char *me = "selfcred_pulse"; 404 405 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 406 (me, "start monitoring door %d\n", fd); 407 408 ret = _nscd_doorcall_fd(fd, NSCD_PULSE |(_whoami & NSCD_WHOAMI), 409 NULL, 0, NULL, 0, NULL); 410 411 /* Close door because the other side exited. */ 412 (void) close(fd); 413 414 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 415 (me, "door (%d) monitor exited (rc = %d)\n", fd, ret); 416 417 return (ret); 418 } 419 420 /*ARGSUSED*/ 421 static void * 422 forker_monitor( 423 void *arg) 424 { 425 pid_t fpid; 426 char *fmri; 427 char *me = "forker_monitor"; 428 429 (void) thr_setname(thr_self(), me); 430 431 /* wait until forker exits */ 432 fpid = forker_pid; 433 (void) selfcred_pulse(forking_door); 434 435 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 436 (me, "forker (pid = %d) exited or crashed, " 437 "killing all child processes\n", fpid); 438 439 (void) mutex_lock(&forking_lock); 440 forking_door = -1; 441 forker_pid = -1; 442 (void) mutex_unlock(&forking_lock); 443 444 /* forker exited/crashed, kill all the child processes */ 445 _nscd_kill_all_children(); 446 447 /* restart forker */ 448 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 449 (me, "restarting the forker ...\n"); 450 451 switch (fpid = fork1()) { 452 case (pid_t)-1: 453 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 454 (me, "unable to fork and start the forker ...\n"); 455 456 /* enter the maintenance mode */ 457 if ((fmri = getenv("SMF_FMRI")) != NULL) { 458 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 459 (me, "entering maintenance mode ...\n"); 460 (void) smf_maintain_instance(fmri, SMF_TEMPORARY); 461 } 462 return ((void *)1); 463 case 0: 464 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 465 (me, "execv path = %s\n", execpath); 466 467 (void) execv(execpath, execargv); 468 exit(0); 469 default: 470 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 471 (me, "new forker's pid is %d\n", fpid); 472 forker_pid = fpid; 473 break; 474 } 475 476 return (NULL); 477 } 478 479 static void * 480 child_monitor( 481 void *arg) 482 { 483 child_t *ch = (child_t *)arg; 484 pid_t cpid; 485 char *me = "child_monitor"; 486 487 /* wait until child exits */ 488 cpid = ch->child_pid; 489 (void) selfcred_pulse(ch->child_door); 490 491 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 492 (me, "child (pid = %d) exited or crashed ...\n", cpid); 493 494 /* return the slot used by the child */ 495 return_cslot(ch); 496 497 return (NULL); 498 } 499 500 501 void 502 _nscd_proc_iamhere( 503 void *buf, 504 door_desc_t *dp, 505 uint_t n_desc, 506 int iam) 507 { 508 int cslot; 509 child_t *ch; 510 int errnum; 511 ucred_t *uc = NULL; 512 uid_t uid; 513 nscd_imhere_t *ih; 514 nss_pheader_t *phdr = (nss_pheader_t *)buf; 515 char *me = "_nscd_proc_iamhere"; 516 517 518 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 519 (me, "%d receives iamhere from %d\n", _whoami, iam); 520 521 if (door_ucred(&uc) != 0) { 522 errnum = errno; 523 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 524 (me, "door_ucred failed: %s\n", strerror(errnum)); 525 526 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, errnum, 527 NSCD_DOOR_UCRED_ERROR); 528 return; 529 } 530 uid = ucred_geteuid(uc); 531 532 switch (iam) { 533 534 case NSCD_MAIN: 535 if (_whoami == NSCD_MAIN || uid != main_uid) { 536 /* 537 * I'm main, or uid from door is not correct, 538 * this must be an imposter 539 */ 540 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 541 (me, "MAIN IMPOSTER CAUGHT!\n"); 542 543 544 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 545 NSCD_SELF_CRED_MAIN_IMPOSTER); 546 } 547 break; 548 549 case NSCD_FORKER: 550 if (_whoami == NSCD_FORKER || uid != forker_uid) { 551 /* 552 * I'm forker, or uid from door is not correct, 553 * this must be an imposter 554 */ 555 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 556 (me, "FORKER IMPOSTER CAUGHT!\n"); 557 558 559 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 560 NSCD_SELF_CRED_FORKER_IMPOSTER); 561 break; 562 } 563 564 /* only main needs to know the forker */ 565 if (_whoami != NSCD_MAIN) { 566 567 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 568 NSCD_SELF_CRED_WRONG_NSCD); 569 break; 570 } 571 572 if (ucred_getpid(uc) != forker_pid) { 573 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 574 (me, "FORKER IMPOSTER CAUGHT: pid = %d should be %d\n", 575 ucred_getpid(uc), forker_pid); 576 577 578 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 579 NSCD_SELF_CRED_FORKER_IMPOSTER); 580 break; 581 } 582 583 if (n_desc < 1) { 584 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 585 (me, "BAD FORKER, NO DOOR!\n"); 586 587 588 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 589 NSCD_SELF_CRED_NO_DOOR); 590 break; 591 } 592 593 if ((dp->d_attributes & DOOR_DESCRIPTOR) && 594 dp->d_data.d_desc.d_descriptor > 0 && 595 dp->d_data.d_desc.d_id != 0) { 596 (void) mutex_lock(&forking_lock); 597 if (forking_door != -1) 598 (void) close(forking_door); 599 forking_door = dp->d_data.d_desc.d_descriptor; 600 (void) mutex_unlock(&forking_lock); 601 602 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 603 (me, "forking door is %d\n", forking_door); 604 605 NSCD_SET_STATUS_SUCCESS(phdr); 606 } else { 607 NSCD_SET_STATUS(phdr, NSS_ALTRETRY, 0); 608 break; 609 } 610 611 /* monitor the forker nscd */ 612 (void) thr_create(NULL, 0, forker_monitor, NULL, 613 THR_DETACHED, NULL); 614 615 break; 616 617 case NSCD_CHILD: 618 if (_whoami != NSCD_MAIN) { 619 /* child nscd can only talk to the main nscd */ 620 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 621 (me, "CHILD IMPOSTER CAUGHT!\n"); 622 623 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 624 NSCD_SELF_CRED_CHILD_IMPOSTER); 625 break; 626 } 627 628 /* get the main nscd assigned slot number */ 629 ih = NSCD_N2N_DOOR_DATA(nscd_imhere_t, buf); 630 cslot = ih->slot; 631 (void) mutex_lock(&child_lock); 632 if (cslot < 0 || cslot >= max_pu_nscd) 633 ch = NULL; 634 else 635 ch = child[cslot]; 636 (void) mutex_unlock(&child_lock); 637 638 if (ch == NULL) { 639 /* Bad slot number */ 640 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 641 (me, "bad slot number %d\n", cslot); 642 643 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 644 NSCD_SELF_CRED_INVALID_SLOT_NUMBER); 645 break; 646 } 647 648 if (uid != ch->child_uid) { 649 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 650 (me, "CHILD IMPOSTER CAUGHT: uid = %d should be %d\n", 651 uid, ch->child_uid); 652 653 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 654 NSCD_SELF_CRED_CHILD_IMPOSTER); 655 break; 656 } 657 658 if (ch->child_state != CHILD_STATE_UIDKNOWN && 659 ch->child_state != CHILD_STATE_FORKSENT) { 660 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 661 (me, "invalid slot/child state (%d) for uid %d\n", 662 ch->child_state, uid); 663 664 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 665 NSCD_SELF_CRED_INVALID_SLOT_STATE); 666 break; 667 } 668 669 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 670 (me, "d_descriptor = %d, d_id = %lld\n", 671 dp->d_data.d_desc.d_descriptor, dp->d_data.d_desc.d_id); 672 673 if ((dp->d_attributes & DOOR_DESCRIPTOR) && 674 dp->d_data.d_desc.d_descriptor > 0 && 675 dp->d_data.d_desc.d_id != 0) { 676 (void) mutex_lock(ch->mutex); 677 if (ch->child_door != -1) 678 (void) close(ch->child_door); 679 ch->child_door = dp->d_data.d_desc.d_descriptor; 680 ch->child_pid = ucred_getpid(uc); 681 ch->child_state = CHILD_STATE_PIDKNOWN; 682 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 683 (me, "child in slot %d has door %d\n", 684 cslot, ch->child_door); 685 686 /* 687 * let waiters know that the child is ready to 688 * serve 689 */ 690 (void) cond_broadcast(ch->cond); 691 (void) mutex_unlock(ch->mutex); 692 693 /* monitor the child nscd */ 694 (void) thr_create(NULL, 0, child_monitor, 695 ch, THR_DETACHED, NULL); 696 NSCD_SET_STATUS_SUCCESS(phdr); 697 break; 698 } else { 699 NSCD_SET_STATUS(phdr, NSS_ALTRETRY, 0); 700 } 701 break; 702 } 703 704 ucred_free(uc); 705 uc = NULL; 706 } 707 708 void 709 _nscd_proc_pulse( 710 void *buf, 711 int iam) 712 { 713 long last_active; 714 int done = 0; 715 nss_pheader_t *phdr = (nss_pheader_t *)buf; 716 char *me = "_nscd_proc_pulse"; 717 718 /* only main nscd sends pulse */ 719 if (iam != NSCD_MAIN) { 720 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 721 (me, "MAIN IMPOSTER CAUGHT! i am %d not NSCD_MAIN\n", iam); 722 723 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 724 NSCD_SELF_CRED_MAIN_IMPOSTER); 725 return; 726 } 727 728 /* forker doesn't return stats, it just pauses */ 729 if (_whoami == NSCD_FORKER) { 730 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 731 (me, "forker ready to pause ...\n"); 732 733 for (;;) 734 (void) pause(); 735 } 736 737 /* remember the current activity sequence number */ 738 (void) mutex_lock(&activity_lock); 739 last_active = activity; 740 (void) mutex_unlock(&activity_lock); 741 742 while (!done) { 743 744 /* allow per_user_nscd_ttl seconds of inactivity */ 745 (void) sleep(pu_nscd_ttl); 746 747 (void) mutex_lock(&activity_lock); 748 if (last_active == activity) 749 done = 1; 750 else { 751 last_active = activity; 752 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 753 (me, "active, sleep again for %d seconds\n", 754 pu_nscd_ttl); 755 } 756 (void) mutex_unlock(&activity_lock); 757 } 758 759 /* no activity in the specified seconds, exit and disconnect */ 760 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 761 (me, "no activity in the last %d seconds, exit\n", pu_nscd_ttl); 762 exit(0); 763 } 764 765 void 766 _nscd_proc_fork( 767 void *buf, 768 int iam) 769 { 770 int slot; 771 int ret; 772 char *fmri; 773 pid_t cid; 774 uid_t set2uid; 775 gid_t set2gid; 776 nss_pheader_t *phdr = (nss_pheader_t *)buf; 777 char *me = "_nscd_proc_fork"; 778 nscd_fork_t *f; 779 nscd_imhere_t ih; 780 781 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 782 (me, "%d receives fork request from %d\n", _whoami, iam); 783 784 /* only main nscd sends fork requests */ 785 if (iam != NSCD_MAIN) { 786 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 787 (me, "MAIN IMPOSTER CAUGHT! i am %d not NSCD_MAIN\n", iam); 788 789 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 790 NSCD_SELF_CRED_MAIN_IMPOSTER); 791 return; 792 } 793 794 /* only forker handles fork requests */ 795 if (_whoami != NSCD_FORKER) { 796 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 797 (me, "MAIN IMPOSTER CAUGHT! I AM NOT FORKER!\n"); 798 799 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 800 NSCD_SELF_CRED_WRONG_NSCD); 801 return; 802 } 803 804 /* fork a child for the slot assigned by the main nscd */ 805 f = NSCD_N2N_DOOR_DATA(nscd_fork_t, buf); 806 slot = f->slot; 807 /* set the uid/gid as assigned by the main nscd */ 808 set2uid = f->uid; 809 set2gid = f->gid; 810 811 /* ignore bad slot number */ 812 if (slot < 0 || slot >= max_pu_nscd) { 813 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 814 (me, "bas slot number\n"); 815 816 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 817 NSCD_SELF_CRED_INVALID_SLOT_NUMBER); 818 return; 819 } 820 821 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 822 (me, "before fork1() ...\n"); 823 824 if ((cid = fork1()) == 0) { 825 _whoami = NSCD_CHILD; 826 827 /* 828 * remember when this child nscd starts 829 * (replace the forker start time) 830 */ 831 _nscd_set_start_time(1); 832 833 /* close all except the log file */ 834 if (_logfd > 0) { 835 int i; 836 for (i = 0; i < _logfd; i++) 837 (void) close(i); 838 closefrom(_logfd + 1); 839 } else 840 closefrom(0); 841 842 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 843 (me, "child %d\n", getpid()); 844 845 (void) setgid(set2gid); 846 (void) setuid(set2uid); 847 848 /* set up the door and server thread pool */ 849 if ((_doorfd = _nscd_setup_child_server(_doorfd)) == -1) 850 exit(-1); 851 852 /* tell libsldap to do self cred only */ 853 (void) setup_ldap_backend(); 854 855 /* notify main that child is active */ 856 ih.slot = slot; 857 for (ret = NSS_ALTRETRY; ret == NSS_ALTRETRY; ) 858 ret = _nscd_doorcall_sendfd(_doorfd, 859 NSCD_IMHERE | (NSCD_CHILD & NSCD_WHOAMI), 860 &ih, sizeof (ih), NULL); 861 862 NSCD_SET_STATUS_SUCCESS(phdr); 863 return; 864 } if (cid == (pid_t)-1) { 865 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 866 (me, "forker unable to fork ...\n"); 867 868 /* enter the maintenance mode */ 869 if ((fmri = getenv("SMF_FMRI")) != NULL) { 870 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 871 (me, "entering maintenance mode ...\n"); 872 (void) smf_maintain_instance(fmri, SMF_TEMPORARY); 873 } 874 exit(0); 875 } else { 876 /* 877 * start the monitor so as to exit as early as 878 * possible if no other processes are running 879 * with the same PUN uid (i.e., this PUN is 880 * not needed any more) 881 */ 882 (void) init_user_proc_monitor(); 883 884 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 885 (me, "child forked: parent pid = %d, child pid = %d\n", 886 getpid(), cid); 887 888 NSCD_SET_STATUS_SUCCESS(phdr); 889 } 890 891 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 892 (me, "after fork\n"); 893 } 894 895 static void 896 selfcred_fork( 897 void *buf, 898 int doorfd, 899 int cslot, 900 uid_t uid, 901 gid_t gid) 902 { 903 int ret; 904 nscd_fork_t f; 905 nss_pheader_t *phdr = (nss_pheader_t *)buf; 906 char *me = "selfcred_fork"; 907 908 /* if no door fd, do nothing */ 909 if (doorfd == -1) { 910 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 911 NSCD_SELF_CRED_NO_DOOR); 912 } 913 914 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 915 (me, "sending fork request to door %d for slot %d " 916 "(uid = %d, gid = %d)\n", doorfd, cslot, uid, gid); 917 918 f.slot = cslot; 919 f.uid = uid; 920 f.gid = gid; 921 922 ret = _nscd_doorcall_fd(doorfd, NSCD_FORK|(_whoami&NSCD_WHOAMI), 923 &f, sizeof (f), NULL, 0, phdr); 924 925 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 926 (me, "fork request sent to door %d for slot %d (rc = %d)\n", 927 doorfd, cslot, ret); 928 929 if (NSCD_STATUS_IS_NOT_OK(phdr)) { 930 931 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 932 (me, "fork request sent to door %d for slot %d failed: " 933 "status = %d, errno = %s, nscd status = %d\n", doorfd, 934 cslot, NSCD_GET_STATUS(phdr), 935 strerror(NSCD_GET_ERRNO(phdr)), 936 NSCD_GET_NSCD_STATUS(phdr)); 937 938 } 939 } 940 941 void 942 _nscd_proc_alt_get( 943 void *buf, 944 int *door) 945 { 946 int errnum; 947 uid_t set2uid; 948 gid_t set2gid; 949 nss_pheader_t *phdr = (nss_pheader_t *)buf; 950 char *me = "_nscd_proc_alt_get"; 951 ucred_t *uc = NULL; 952 child_t *ch; 953 954 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 955 (me, "getting an alternate door ...\n"); 956 957 /* make sure there is a door to talk to the forker */ 958 if (forking_door == -1) { 959 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_ERROR) 960 (me, "no door to talk to the forker\n"); 961 962 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 963 NSCD_SELF_CRED_NO_FORKER); 964 return; 965 } 966 967 /* get door client's credential information */ 968 if (door_ucred(&uc) != 0) { 969 errnum = errno; 970 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 971 (me, "door_ucred failed: %s\n", strerror(errnum)); 972 973 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, errnum, 974 NSCD_DOOR_UCRED_ERROR); 975 return; 976 } 977 978 /* get door client's effective uid and effective gid */ 979 set2uid = ucred_geteuid(uc); 980 set2gid = ucred_getegid(uc); 981 ucred_free(uc); 982 uc = NULL; 983 984 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 985 (me, "child uid = %d, gid = %d\n", set2uid, set2gid); 986 987 /* is a slot available ? if not, no one to serve */ 988 if (child == NULL || (ch = get_cslot(set2uid, 0)) == NULL) { 989 990 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 991 (me, "no child slot available (child array = %p, slot = %d)\n", 992 child, ch->child_slot); 993 994 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 995 NSCD_SELF_CRED_NO_CHILD_SLOT); 996 return; 997 } 998 999 /* create the per user nscd if necessary */ 1000 if (ch->child_state != CHILD_STATE_PIDKNOWN) { 1001 1002 nss_pheader_t phdr1; 1003 NSCD_CLEAR_STATUS(&phdr1); 1004 1005 (void) mutex_lock(ch->mutex); 1006 if (ch->child_state == CHILD_STATE_UIDKNOWN) { 1007 1008 /* ask forker to fork a new child */ 1009 selfcred_fork(&phdr1, forking_door, ch->child_slot, 1010 set2uid, set2gid); 1011 if (NSCD_STATUS_IS_NOT_OK(&phdr1)) { 1012 (void) mutex_unlock(ch->mutex); 1013 NSCD_COPY_STATUS(phdr, &phdr1); 1014 return; 1015 } 1016 ch->child_state = CHILD_STATE_FORKSENT; 1017 } 1018 1019 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 1020 (me, "waiting for door (slot = %d, uid = %d, gid = %d)\n", 1021 ch->child_slot, set2uid, set2gid); 1022 1023 /* wait for the per user nscd to become available */ 1024 while (ch->child_state == CHILD_STATE_FORKSENT) { 1025 timestruc_t to; 1026 int err; 1027 int ttl = 5; 1028 1029 to.tv_sec = ttl; 1030 to.tv_nsec = 0; 1031 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 1032 (me, "cond_reltimedwait %d seconds\n", ttl); 1033 err = cond_reltimedwait(ch->cond, ch->mutex, &to); 1034 if (err == ETIME) { 1035 ch->child_state = CHILD_STATE_UIDKNOWN; 1036 _NSCD_LOG(NSCD_LOG_SELF_CRED, 1037 NSCD_LOG_LEVEL_DEBUG) 1038 (me, "door wait timedout (slot = %d)\n", 1039 ch->child_slot); 1040 break; 1041 } 1042 } 1043 (void) mutex_unlock(ch->mutex); 1044 } 1045 1046 if (ch->child_state != CHILD_STATE_PIDKNOWN) { 1047 1048 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 1049 NSCD_SELF_CRED_INVALID_SLOT_STATE); 1050 return; 1051 } 1052 1053 *door = ch->child_door; 1054 1055 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 1056 (me, "returning door %d for slot %d, uid %d, gid = %d\n", 1057 *door, ch->child_slot, set2uid, set2gid); 1058 1059 NSCD_SET_STATUS(phdr, NSS_ALTRETRY, 0); 1060 } 1061 1062 static char ** 1063 cpargv( 1064 int argc, 1065 char **inargv) 1066 { 1067 char **newargv; 1068 int c = 4; 1069 int i = 0, j, k = 0, n = 0; 1070 1071 newargv = (char **)calloc(c + 1, sizeof (char *)); 1072 if (newargv == NULL) 1073 return (NULL); 1074 1075 newargv[n] = strdup(inargv[0]); 1076 if (newargv[n++] == NULL) { 1077 free(newargv); 1078 return (NULL); 1079 } 1080 1081 newargv[n] = strdup("-F"); 1082 if (newargv[n++] == NULL) { 1083 free(newargv[0]); 1084 free(newargv); 1085 return (NULL); 1086 } 1087 1088 for (i = 1; i < argc; i++) { 1089 if (strcmp(inargv[i], "-f") == 0) 1090 k = 2; 1091 if (k == 0) 1092 continue; 1093 1094 newargv[n] = strdup(inargv[i]); 1095 if (newargv[n] == NULL) { 1096 for (j = 0; j < n; j++) 1097 free(newargv[j]); 1098 free(newargv); 1099 return (NULL); 1100 } 1101 1102 k--; 1103 n++; 1104 } 1105 return (newargv); 1106 } 1107 1108 1109 void 1110 _nscd_start_forker( 1111 char *path, 1112 int argc, 1113 char **argv) 1114 { 1115 pid_t cid; 1116 1117 /* if self cred is not configured, do nothing */ 1118 if (!_nscd_is_self_cred_on(1, NULL)) 1119 return; 1120 1121 /* save pathname and generate the new argv for the forker */ 1122 execpath = strdup(path); 1123 execargv = cpargv(argc, argv); 1124 if (execpath == NULL || execargv == NULL) 1125 exit(1); 1126 1127 switch (cid = fork1()) { 1128 case (pid_t)-1: 1129 exit(1); 1130 break; 1131 case 0: 1132 /* start the forker nscd */ 1133 (void) execv(path, execargv); 1134 exit(0); 1135 break; 1136 default: 1137 /* main nscd */ 1138 /* remember process id of the forker */ 1139 forker_pid = cid; 1140 1141 /* enable child nscd management */ 1142 (void) _nscd_init_cslots(); 1143 break; 1144 } 1145 } 1146 1147 static nscd_rc_t 1148 get_ldap_funcs( 1149 char *name, 1150 void **func_p) 1151 { 1152 char *me = "get_ldap_funcs"; 1153 static void *handle = NULL; 1154 void *sym; 1155 1156 if (name == NULL && handle != NULL) { 1157 (void) dlclose(handle); 1158 return (NSCD_SUCCESS); 1159 } 1160 /* no handle to close, it's OK */ 1161 if (name == NULL) 1162 return (NSCD_SUCCESS); 1163 1164 if (handle == NULL) { 1165 handle = dlopen("libsldap.so.1", RTLD_LAZY); 1166 if (handle == NULL) { 1167 1168 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_ERROR) 1169 (me, "unable to dlopen libsldap.so.1"); 1170 return (NSCD_CFG_DLOPEN_ERROR); 1171 } 1172 } 1173 1174 if ((sym = dlsym(handle, name)) == NULL) { 1175 1176 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_ERROR) 1177 (me, "unable to find symbol %s", name); 1178 return (NSCD_CFG_DLSYM_ERROR); 1179 } else 1180 (void) memcpy(func_p, &sym, sizeof (void *)); 1181 1182 return (NSCD_SUCCESS); 1183 } 1184 1185 1186 int 1187 _nscd_is_self_cred_on(int recheck, char **dblist) 1188 { 1189 static int checked = 0; 1190 static int is_on = 0; 1191 static int (*ldap_func)(); 1192 char *srcs = "ldap"; /* only ldap support self cred */ 1193 int ldap_on = 0; 1194 1195 char *ldap_sc_func = "__ns_ldap_self_gssapi_config"; 1196 ns_ldap_self_gssapi_config_t ldap_config; 1197 1198 if (checked && !recheck) { 1199 if (is_on && dblist != NULL) 1200 *dblist = selfcred_dbs; 1201 return (is_on); 1202 } 1203 1204 if (selfcred_dbs != NULL) 1205 free(selfcred_dbs); 1206 selfcred_dbs = _nscd_srcs_in_db_nsw_policy(1, &srcs); 1207 1208 if (selfcred_dbs == NULL) { 1209 is_on = 0; 1210 checked = 1; 1211 return (0); 1212 } 1213 1214 /* 1215 * also check the ldap backend to see if 1216 * the configuration there is good for 1217 * doing self credentialing 1218 */ 1219 if (ldap_func == NULL) 1220 (void) get_ldap_funcs(ldap_sc_func, (void **)&ldap_func); 1221 if (ldap_func != NULL) { 1222 if (ldap_func(&ldap_config) == NS_LDAP_SUCCESS && 1223 ldap_config != NS_LDAP_SELF_GSSAPI_CONFIG_NONE) 1224 ldap_on = 1; 1225 } 1226 1227 is_on = (pu_nscd_enabled == nscd_true) && ldap_on; 1228 1229 checked = 1; 1230 1231 if (is_on && dblist != NULL) 1232 *dblist = selfcred_dbs; 1233 1234 return (is_on); 1235 } 1236 1237 static nscd_rc_t 1238 setup_ldap_backend() 1239 { 1240 nscd_rc_t rc; 1241 static void (*ldap_func)(); 1242 char *ldap_sc_func = "__ns_ldap_self_gssapi_only_set"; 1243 if (ldap_func == NULL) 1244 rc = get_ldap_funcs(ldap_sc_func, (void **)&ldap_func); 1245 if (ldap_func != NULL) { 1246 ldap_func(1); 1247 return (NSCD_SUCCESS); 1248 } 1249 return (rc); 1250 } 1251 1252 /*ARGSUSED*/ 1253 void 1254 _nscd_peruser_getadmin( 1255 void *buf, 1256 int buf_size) 1257 { 1258 void *result_mn = NSCD_N2N_DOOR_DATA(void, buf); 1259 int errnum = 0; 1260 int ret; 1261 uid_t uid; 1262 nss_pheader_t *phdr = (nss_pheader_t *)buf; 1263 char *me = "_nscd_peruser_getadmin"; 1264 ucred_t *uc = NULL; 1265 child_t *ch; 1266 1267 /* get door client's credential information */ 1268 if (door_ucred(&uc) != 0) { 1269 errnum = errno; 1270 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 1271 (me, "door_ucred failed: %s\n", strerror(errnum)); 1272 1273 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, errnum, 1274 NSCD_DOOR_UCRED_ERROR); 1275 return; 1276 } 1277 1278 /* get door client's effective uid */ 1279 uid = ucred_geteuid(uc); 1280 ucred_free(uc); 1281 uc = NULL; 1282 1283 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 1284 (me, "per user get admin ... (uid = %d)\n", uid); 1285 1286 /* is the per-user nscd running ? if not, no one to serve */ 1287 ch = get_cslot(uid, 1); 1288 if (ch == NULL) { 1289 NSCD_SET_N2N_STATUS(phdr, NSS_NSCD_PRIV, 0, 1290 NSCD_SELF_CRED_NO_CHILD_SLOT); 1291 return; 1292 } 1293 1294 ret = _nscd_doorcall_fd(ch->child_door, NSCD_GETADMIN, 1295 NULL, sizeof (nscd_admin_t), result_mn, 1296 sizeof (nscd_admin_t), phdr); 1297 1298 if (ret == NSS_SUCCESS) { 1299 phdr->data_len = sizeof (nscd_admin_t); 1300 return; 1301 } 1302 } 1303 1304 static void 1305 set_selfcred_cfg( 1306 char param, 1307 void *data) 1308 { 1309 int64_t prop_int; 1310 uint8_t prop_boolean; 1311 char *me = "set_selfcred_cfg"; 1312 1313 if (param == 'e') { 1314 prop_boolean = *(uint8_t *)data; 1315 pu_nscd_enabled = *(uint8_t *)get_smf_prop( 1316 "enable_per_user_lookup", 'b', &prop_boolean); 1317 1318 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 1319 (me, "self cred config: enabled = %d\n", pu_nscd_enabled); 1320 } 1321 1322 if (param == 't') { 1323 prop_int = *(int *)data; 1324 pu_nscd_ttl = *(int64_t *)get_smf_prop( 1325 "per_user_nscd_time_to_live", 'i', &prop_int); 1326 1327 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 1328 (me, "self cred config: PUN TTL = %d\n", pu_nscd_ttl); 1329 } 1330 } 1331 1332 /* ARGSUSED */ 1333 nscd_rc_t 1334 _nscd_cfg_selfcred_notify( 1335 void *data, 1336 struct nscd_cfg_param_desc *pdesc, 1337 nscd_cfg_id_t *nswdb, 1338 nscd_cfg_flag_t dflag, 1339 nscd_cfg_error_t **errorp, 1340 void *cookie) 1341 { 1342 1343 nscd_cfg_global_selfcred_t *sc_cfg = &nscd_selfcred_cfg_g; 1344 int off; 1345 1346 /* 1347 * At init time, the whole group of config params are received. 1348 * At update time, group or individual parameter value could 1349 * be received. 1350 */ 1351 1352 if (_nscd_cfg_flag_is_set(dflag, NSCD_CFG_DFLAG_GROUP)) { 1353 1354 *sc_cfg = *(nscd_cfg_global_selfcred_t *)data; 1355 1356 off = offsetof(nscd_cfg_global_selfcred_t, 1357 enable_selfcred); 1358 set_selfcred_cfg('e', (char *)data + off); 1359 1360 off = offsetof(nscd_cfg_global_selfcred_t, 1361 per_user_nscd_ttl); 1362 set_selfcred_cfg('t', (char *)data + off); 1363 1364 return (NSCD_SUCCESS); 1365 } 1366 1367 /* 1368 * individual config parameter 1369 */ 1370 off = offsetof(nscd_cfg_global_selfcred_t, enable_selfcred); 1371 if (pdesc->p_offset == off) { 1372 sc_cfg->enable_selfcred = *(nscd_bool_t *)data; 1373 set_selfcred_cfg('e', data); 1374 return (NSCD_SUCCESS); 1375 } 1376 1377 off = offsetof(nscd_cfg_global_selfcred_t, per_user_nscd_ttl); 1378 if (pdesc->p_offset == off) { 1379 sc_cfg->per_user_nscd_ttl = *(int *)data; 1380 set_selfcred_cfg('t', data); 1381 return (NSCD_SUCCESS); 1382 } 1383 1384 return (NSCD_SUCCESS); 1385 } 1386 1387 /* ARGSUSED */ 1388 nscd_rc_t 1389 _nscd_cfg_selfcred_verify( 1390 void *data, 1391 struct nscd_cfg_param_desc *pdesc, 1392 nscd_cfg_id_t *nswdb, 1393 nscd_cfg_flag_t dflag, 1394 nscd_cfg_error_t **errorp, 1395 void **cookie) 1396 { 1397 1398 return (NSCD_SUCCESS); 1399 } 1400 1401 /* ARGSUSED */ 1402 nscd_rc_t 1403 _nscd_cfg_selfcred_get_stat( 1404 void **stat, 1405 struct nscd_cfg_stat_desc *sdesc, 1406 nscd_cfg_id_t *nswdb, 1407 nscd_cfg_flag_t *dflag, 1408 void (**free_stat)(void *stat), 1409 nscd_cfg_error_t **errorp) 1410 { 1411 return (NSCD_SUCCESS); 1412 } 1413 1414 static int 1415 check_uid(char *pid_name) 1416 { 1417 char pname[PATH_MAX]; 1418 static pid_t pid = 0; 1419 static uid_t uid = 0; 1420 static uid_t euid = 0; 1421 int pfd; /* file descriptor for /proc/<pid>/psinfo */ 1422 psinfo_t info; /* process information from /proc */ 1423 1424 if (uid == 0) { 1425 pid = getpid(); 1426 uid = getuid(); 1427 euid = geteuid(); 1428 } 1429 1430 (void) snprintf(pname, sizeof (pname), "/proc/%s/psinfo", pid_name); 1431 retry: 1432 if ((pfd = open(pname, O_RDONLY)) == -1) { 1433 /* Process may have exited */ 1434 return (1); 1435 } 1436 1437 /* 1438 * Get the info structure for the process and close quickly. 1439 */ 1440 if (read(pfd, (char *)&info, sizeof (info)) < 0) { 1441 int saverr = errno; 1442 1443 (void) close(pfd); 1444 if (saverr == EAGAIN) 1445 goto retry; 1446 if (saverr != ENOENT) 1447 return (1); 1448 } 1449 (void) close(pfd); 1450 1451 if (info.pr_pid != pid && 1452 info.pr_uid == uid && info.pr_euid == euid) 1453 return (0); 1454 else 1455 return (1); 1456 } 1457 1458 1459 /* 1460 * FUNCTION: check_user_process 1461 */ 1462 /*ARGSUSED*/ 1463 static void * 1464 check_user_process(void *arg) 1465 { 1466 1467 DIR *dp; 1468 struct dirent *ep; 1469 int found; 1470 char *me = "check_user_process"; 1471 1472 (void) thr_setname(thr_self(), me); 1473 1474 for (;;) { 1475 (void) sleep(60); 1476 1477 found = 0; 1478 1479 /* 1480 * search the /proc directory and look at each process 1481 */ 1482 if ((dp = opendir("/proc")) == NULL) { 1483 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_ERROR) 1484 (me, "unable to open the /proc directory\n"); 1485 continue; 1486 } 1487 1488 /* for each active process */ 1489 while (ep = readdir(dp)) { 1490 if (ep->d_name[0] == '.') /* skip . and .. */ 1491 continue; 1492 if (check_uid(ep->d_name) == 0) { 1493 found = 1; 1494 break; 1495 } 1496 } 1497 1498 /* 1499 * if no process running as the PUN uid found, exit 1500 * to kill this PUN 1501 */ 1502 if (found == 0) { 1503 (void) closedir(dp); 1504 exit(1); 1505 } 1506 (void) closedir(dp); 1507 } 1508 /*LINTED E_FUNC_HAS_NO_RETURN_STMT*/ 1509 } 1510 1511 static nscd_rc_t 1512 init_user_proc_monitor() { 1513 1514 int errnum; 1515 char *me = "init_user_proc_monitor"; 1516 1517 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_DEBUG) 1518 (me, "initializing the user process monitor\n"); 1519 1520 /* 1521 * start a thread to make sure there is at least a process 1522 * running as the PUN user. If not, terminate this PUN. 1523 */ 1524 if (thr_create(NULL, NULL, check_user_process, 1525 NULL, THR_DETACHED, NULL) != 0) { 1526 errnum = errno; 1527 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_ERROR) 1528 (me, "thr_create: %s\n", strerror(errnum)); 1529 return (NSCD_THREAD_CREATE_ERROR); 1530 } 1531 1532 return (NSCD_SUCCESS); 1533 } 1534 1535 static void * 1536 get_smf_prop(const char *var, char type, void *def_val) 1537 { 1538 scf_simple_prop_t *prop; 1539 void *val; 1540 char *me = "get_smf_prop"; 1541 1542 prop = scf_simple_prop_get(NULL, NULL, "config", var); 1543 if (prop) { 1544 switch (type) { 1545 case 'b': 1546 val = scf_simple_prop_next_boolean(prop); 1547 if (val != NULL) 1548 (void) memcpy(def_val, val, sizeof (uint8_t)); 1549 break; 1550 1551 case 'i': 1552 val = scf_simple_prop_next_integer(prop); 1553 if (val != NULL) 1554 (void) memcpy(def_val, val, sizeof (int64_t)); 1555 break; 1556 } 1557 scf_simple_prop_free(prop); 1558 } 1559 1560 if (prop == NULL || val == NULL) { 1561 char vs[64]; 1562 1563 switch (type) { 1564 case 'b': 1565 if (*(uint8_t *)def_val) 1566 (void) strcpy(vs, "yes"); 1567 else 1568 (void) strcpy(vs, "no"); 1569 1570 break; 1571 1572 case 'i': 1573 (void) sprintf(vs, "%lld", *(int64_t *)def_val); 1574 break; 1575 1576 } 1577 _NSCD_LOG(NSCD_LOG_SELF_CRED, NSCD_LOG_LEVEL_ALERT) 1578 (me, "no value for config/%s (%s). " 1579 "Using default \"%s\"\n", var, 1580 scf_strerror(scf_error()), vs); 1581 } 1582 1583 return (def_val); 1584 } 1585