1 /* $NetBSD: nsdispatch.c,v 1.9 1999/01/25 00:16:17 lukem Exp $ */ 2 3 /*- 4 * Copyright (c) 1997, 1998, 1999 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Luke Mewburn. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 3. All advertising materials mentioning features or use of this software 19 * must display the following acknowledgement: 20 * This product includes software developed by the NetBSD 21 * Foundation, Inc. and its contributors. 22 * 4. Neither the name of The NetBSD Foundation nor the names of its 23 * contributors may be used to endorse or promote products derived 24 * from this software without specific prior written permission. 25 * 26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 36 * POSSIBILITY OF SUCH DAMAGE. 37 */ 38 /*- 39 * Copyright (c) 2003 Networks Associates Technology, Inc. 40 * All rights reserved. 41 * 42 * Portions of this software were developed for the FreeBSD Project by 43 * Jacques A. Vidrine, Safeport Network Services, and Network 44 * Associates Laboratories, the Security Research Division of Network 45 * Associates, Inc. under DARPA/SPAWAR contract N66001-01-C-8035 46 * ("CBOSS"), as part of the DARPA CHATS research program. 47 * 48 * Redistribution and use in source and binary forms, with or without 49 * modification, are permitted provided that the following conditions 50 * are met: 51 * 1. Redistributions of source code must retain the above copyright 52 * notice, this list of conditions and the following disclaimer. 53 * 2. Redistributions in binary form must reproduce the above copyright 54 * notice, this list of conditions and the following disclaimer in the 55 * documentation and/or other materials provided with the distribution. 56 * 57 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 58 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 59 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 60 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 61 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 62 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 63 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 64 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 65 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 66 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 67 * SUCH DAMAGE. 68 * 69 */ 70 #include <sys/cdefs.h> 71 __FBSDID("$FreeBSD$"); 72 73 #include "namespace.h" 74 #include <sys/param.h> 75 #include <sys/stat.h> 76 77 #include <dlfcn.h> 78 #include <errno.h> 79 #include <fcntl.h> 80 #define _NS_PRIVATE 81 #include <nsswitch.h> 82 #include <pthread.h> 83 #include <stdio.h> 84 #include <stdlib.h> 85 #include <string.h> 86 #include <syslog.h> 87 #include <unistd.h> 88 #include "un-namespace.h" 89 #ifdef NS_CACHING 90 #include "nscache.h" 91 #endif 92 93 enum _nss_constants { 94 /* Number of elements allocated when we grow a vector */ 95 ELEMSPERCHUNK = 8 96 }; 97 98 /* 99 * Global NSS data structures are mostly read-only, but we update 100 * them when we read or re-read the nsswitch.conf. 101 */ 102 static pthread_rwlock_t nss_lock = PTHREAD_RWLOCK_INITIALIZER; 103 104 /* 105 * Runtime determination of whether we are dynamically linked or not. 106 */ 107 extern int _DYNAMIC __attribute__ ((weak)); 108 #define is_dynamic() (&_DYNAMIC != NULL) 109 110 /* 111 * default sourcelist: `files' 112 */ 113 const ns_src __nsdefaultsrc[] = { 114 { NSSRC_FILES, NS_SUCCESS }, 115 { 0 }, 116 }; 117 118 /* Database, source mappings. */ 119 static unsigned int _nsmapsize; 120 static ns_dbt *_nsmap = NULL; 121 122 /* NSS modules. */ 123 static unsigned int _nsmodsize; 124 static ns_mod *_nsmod; 125 126 /* Placeholder for builtin modules' dlopen `handle'. */ 127 static int __nss_builtin_handle; 128 static void *nss_builtin_handle = &__nss_builtin_handle; 129 130 #ifdef NS_CACHING 131 /* 132 * Cache lookup cycle prevention function - if !NULL then no cache lookups 133 * will be made 134 */ 135 static void *nss_cache_cycle_prevention_func = NULL; 136 #endif 137 138 /* 139 * When this is set to 1, nsdispatch won't use nsswitch.conf 140 * but will consult the 'defaults' source list only. 141 * NOTE: nested fallbacks (when nsdispatch calls fallback functions, 142 * which in turn calls nsdispatch, which should call fallback 143 * function) are not supported 144 */ 145 static int fallback_dispatch = 0; 146 147 /* 148 * Attempt to spew relatively uniform messages to syslog. 149 */ 150 #define nss_log(level, fmt, ...) \ 151 syslog((level), "NSSWITCH(%s): " fmt, __func__, __VA_ARGS__) 152 #define nss_log_simple(level, s) \ 153 syslog((level), "NSSWITCH(%s): " s, __func__) 154 155 /* 156 * Dynamically growable arrays are used for lists of databases, sources, 157 * and modules. The following `vector' interface is used to isolate the 158 * common operations. 159 */ 160 typedef int (*vector_comparison)(const void *, const void *); 161 typedef void (*vector_free_elem)(void *); 162 static void vector_sort(void *, unsigned int, size_t, 163 vector_comparison); 164 static void vector_free(void *, unsigned int *, size_t, 165 vector_free_elem); 166 static void *vector_ref(unsigned int, void *, unsigned int, size_t); 167 static void *vector_search(const void *, void *, unsigned int, size_t, 168 vector_comparison); 169 static void *vector_append(const void *, void *, unsigned int *, size_t); 170 171 172 /* 173 * Internal interfaces. 174 */ 175 static int string_compare(const void *, const void *); 176 static int mtab_compare(const void *, const void *); 177 static int nss_configure(void); 178 static void ns_dbt_free(ns_dbt *); 179 static void ns_mod_free(ns_mod *); 180 static void ns_src_free(ns_src **, int); 181 static void nss_load_builtin_modules(void); 182 static void nss_load_module(const char *, nss_module_register_fn); 183 static void nss_atexit(void); 184 /* nsparser */ 185 extern FILE *_nsyyin; 186 187 188 /* 189 * The vector operations 190 */ 191 static void 192 vector_sort(void *vec, unsigned int count, size_t esize, 193 vector_comparison comparison) 194 { 195 qsort(vec, count, esize, comparison); 196 } 197 198 199 static void * 200 vector_search(const void *key, void *vec, unsigned int count, size_t esize, 201 vector_comparison comparison) 202 { 203 return (bsearch(key, vec, count, esize, comparison)); 204 } 205 206 207 static void * 208 vector_append(const void *elem, void *vec, unsigned int *count, size_t esize) 209 { 210 void *p; 211 212 if ((*count % ELEMSPERCHUNK) == 0) { 213 p = realloc(vec, (*count + ELEMSPERCHUNK) * esize); 214 if (p == NULL) { 215 nss_log_simple(LOG_ERR, "memory allocation failure"); 216 return (vec); 217 } 218 vec = p; 219 } 220 memmove((void *)(((uintptr_t)vec) + (*count * esize)), elem, esize); 221 (*count)++; 222 return (vec); 223 } 224 225 226 static void * 227 vector_ref(unsigned int i, void *vec, unsigned int count, size_t esize) 228 { 229 if (i < count) 230 return (void *)((uintptr_t)vec + (i * esize)); 231 else 232 return (NULL); 233 } 234 235 236 #define VECTOR_FREE(v, c, s, f) \ 237 do { vector_free(v, c, s, f); v = NULL; } while (0) 238 static void 239 vector_free(void *vec, unsigned int *count, size_t esize, 240 vector_free_elem free_elem) 241 { 242 unsigned int i; 243 void *elem; 244 245 for (i = 0; i < *count; i++) { 246 elem = vector_ref(i, vec, *count, esize); 247 if (elem != NULL) 248 free_elem(elem); 249 } 250 free(vec); 251 *count = 0; 252 } 253 254 /* 255 * Comparison functions for vector_search. 256 */ 257 static int 258 string_compare(const void *a, const void *b) 259 { 260 return (strcasecmp(*(const char * const *)a, *(const char * const *)b)); 261 } 262 263 264 static int 265 mtab_compare(const void *a, const void *b) 266 { 267 int cmp; 268 269 cmp = strcmp(((const ns_mtab *)a)->name, ((const ns_mtab *)b)->name); 270 if (cmp != 0) 271 return (cmp); 272 else 273 return (strcmp(((const ns_mtab *)a)->database, 274 ((const ns_mtab *)b)->database)); 275 } 276 277 /* 278 * NSS nsmap management. 279 */ 280 void 281 _nsdbtaddsrc(ns_dbt *dbt, const ns_src *src) 282 { 283 const ns_mod *modp; 284 285 dbt->srclist = vector_append(src, dbt->srclist, &dbt->srclistsize, 286 sizeof(*src)); 287 modp = vector_search(&src->name, _nsmod, _nsmodsize, sizeof(*_nsmod), 288 string_compare); 289 if (modp == NULL) 290 nss_load_module(src->name, NULL); 291 } 292 293 294 #ifdef _NSS_DEBUG 295 void 296 _nsdbtdump(const ns_dbt *dbt) 297 { 298 int i; 299 300 printf("%s (%d source%s):", dbt->name, dbt->srclistsize, 301 dbt->srclistsize == 1 ? "" : "s"); 302 for (i = 0; i < (int)dbt->srclistsize; i++) { 303 printf(" %s", dbt->srclist[i].name); 304 if (!(dbt->srclist[i].flags & 305 (NS_UNAVAIL|NS_NOTFOUND|NS_TRYAGAIN)) && 306 (dbt->srclist[i].flags & NS_SUCCESS)) 307 continue; 308 printf(" ["); 309 if (!(dbt->srclist[i].flags & NS_SUCCESS)) 310 printf(" SUCCESS=continue"); 311 if (dbt->srclist[i].flags & NS_UNAVAIL) 312 printf(" UNAVAIL=return"); 313 if (dbt->srclist[i].flags & NS_NOTFOUND) 314 printf(" NOTFOUND=return"); 315 if (dbt->srclist[i].flags & NS_TRYAGAIN) 316 printf(" TRYAGAIN=return"); 317 printf(" ]"); 318 } 319 printf("\n"); 320 } 321 #endif 322 323 324 /* 325 * The first time nsdispatch is called (during a process's lifetime, 326 * or after nsswitch.conf has been updated), nss_configure will 327 * prepare global data needed by NSS. 328 */ 329 static int 330 nss_configure(void) 331 { 332 static pthread_mutex_t conf_lock = PTHREAD_MUTEX_INITIALIZER; 333 static time_t confmod; 334 struct stat statbuf; 335 int result, isthreaded; 336 const char *path; 337 #ifdef NS_CACHING 338 void *handle; 339 #endif 340 341 result = 0; 342 isthreaded = __isthreaded; 343 #if defined(_NSS_DEBUG) && defined(_NSS_SHOOT_FOOT) 344 /* NOTE WELL: THIS IS A SECURITY HOLE. This must only be built 345 * for debugging purposes and MUST NEVER be used in production. 346 */ 347 path = getenv("NSSWITCH_CONF"); 348 if (path == NULL) 349 #endif 350 path = _PATH_NS_CONF; 351 if (stat(path, &statbuf) != 0) 352 return (0); 353 if (statbuf.st_mtime <= confmod) 354 return (0); 355 if (isthreaded) { 356 result = _pthread_mutex_trylock(&conf_lock); 357 if (result != 0) 358 return (0); 359 (void)_pthread_rwlock_unlock(&nss_lock); 360 result = _pthread_rwlock_wrlock(&nss_lock); 361 if (result != 0) 362 goto fin2; 363 } 364 _nsyyin = fopen(path, "r"); 365 if (_nsyyin == NULL) 366 goto fin; 367 VECTOR_FREE(_nsmap, &_nsmapsize, sizeof(*_nsmap), 368 (vector_free_elem)ns_dbt_free); 369 VECTOR_FREE(_nsmod, &_nsmodsize, sizeof(*_nsmod), 370 (vector_free_elem)ns_mod_free); 371 nss_load_builtin_modules(); 372 _nsyyparse(); 373 (void)fclose(_nsyyin); 374 vector_sort(_nsmap, _nsmapsize, sizeof(*_nsmap), string_compare); 375 if (confmod == 0) 376 (void)atexit(nss_atexit); 377 confmod = statbuf.st_mtime; 378 379 #ifdef NS_CACHING 380 handle = dlopen(NULL, RTLD_LAZY | RTLD_GLOBAL); 381 if (handle != NULL) { 382 nss_cache_cycle_prevention_func = dlsym(handle, 383 "_nss_cache_cycle_prevention_function"); 384 dlclose(handle); 385 } 386 #endif 387 fin: 388 if (isthreaded) { 389 (void)_pthread_rwlock_unlock(&nss_lock); 390 if (result == 0) 391 result = _pthread_rwlock_rdlock(&nss_lock); 392 } 393 fin2: 394 if (isthreaded) 395 (void)_pthread_mutex_unlock(&conf_lock); 396 return (result); 397 } 398 399 400 void 401 _nsdbtput(const ns_dbt *dbt) 402 { 403 unsigned int i; 404 ns_dbt *p; 405 406 for (i = 0; i < _nsmapsize; i++) { 407 p = vector_ref(i, _nsmap, _nsmapsize, sizeof(*_nsmap)); 408 if (string_compare(&dbt->name, &p->name) == 0) { 409 /* overwrite existing entry */ 410 if (p->srclist != NULL) 411 ns_src_free(&p->srclist, p->srclistsize); 412 memmove(p, dbt, sizeof(*dbt)); 413 return; 414 } 415 } 416 _nsmap = vector_append(dbt, _nsmap, &_nsmapsize, sizeof(*_nsmap)); 417 } 418 419 420 static void 421 ns_dbt_free(ns_dbt *dbt) 422 { 423 ns_src_free(&dbt->srclist, dbt->srclistsize); 424 if (dbt->name) 425 free((void *)dbt->name); 426 } 427 428 429 static void 430 ns_src_free(ns_src **src, int srclistsize) 431 { 432 int i; 433 434 for (i = 0; i < srclistsize; i++) 435 if ((*src)[i].name != NULL) 436 /* This one was allocated by nslexer. You'll just 437 * have to trust me. 438 */ 439 free((void *)((*src)[i].name)); 440 free(*src); 441 *src = NULL; 442 } 443 444 445 446 /* 447 * NSS module management. 448 */ 449 /* The built-in NSS modules are all loaded at once. */ 450 #define NSS_BACKEND(name, reg) \ 451 ns_mtab *reg(unsigned int *, nss_module_unregister_fn *); 452 #include "nss_backends.h" 453 #undef NSS_BACKEND 454 455 static void 456 nss_load_builtin_modules(void) 457 { 458 #define NSS_BACKEND(name, reg) nss_load_module(#name, reg); 459 #include "nss_backends.h" 460 #undef NSS_BACKEND 461 } 462 463 464 /* Load a built-in or dynamically linked module. If the `reg_fn' 465 * argument is non-NULL, assume a built-in module and use reg_fn to 466 * register it. Otherwise, search for a dynamic NSS module. 467 */ 468 static void 469 nss_load_module(const char *source, nss_module_register_fn reg_fn) 470 { 471 char buf[PATH_MAX]; 472 ns_mod mod; 473 nss_module_register_fn fn; 474 475 memset(&mod, 0, sizeof(mod)); 476 mod.name = strdup(source); 477 if (mod.name == NULL) { 478 nss_log_simple(LOG_ERR, "memory allocation failure"); 479 return; 480 } 481 if (reg_fn != NULL) { 482 /* The placeholder is required, as a NULL handle 483 * represents an invalid module. 484 */ 485 mod.handle = nss_builtin_handle; 486 fn = reg_fn; 487 } else if (!is_dynamic()) 488 goto fin; 489 else { 490 if (snprintf(buf, sizeof(buf), "nss_%s.so.%d", mod.name, 491 NSS_MODULE_INTERFACE_VERSION) >= (int)sizeof(buf)) 492 goto fin; 493 mod.handle = dlopen(buf, RTLD_LOCAL|RTLD_LAZY); 494 if (mod.handle == NULL) { 495 #ifdef _NSS_DEBUG 496 /* This gets pretty annoying since the built-in 497 * sources aren't modules yet. 498 */ 499 nss_log(LOG_DEBUG, "%s, %s", mod.name, dlerror()); 500 #endif 501 goto fin; 502 } 503 fn = (nss_module_register_fn)dlfunc(mod.handle, 504 "nss_module_register"); 505 if (fn == NULL) { 506 (void)dlclose(mod.handle); 507 mod.handle = NULL; 508 nss_log(LOG_ERR, "%s, %s", mod.name, dlerror()); 509 goto fin; 510 } 511 } 512 mod.mtab = fn(mod.name, &mod.mtabsize, &mod.unregister); 513 if (mod.mtab == NULL || mod.mtabsize == 0) { 514 if (mod.handle != nss_builtin_handle) 515 (void)dlclose(mod.handle); 516 mod.handle = NULL; 517 nss_log(LOG_ERR, "%s, registration failed", mod.name); 518 goto fin; 519 } 520 if (mod.mtabsize > 1) 521 qsort(mod.mtab, mod.mtabsize, sizeof(mod.mtab[0]), 522 mtab_compare); 523 fin: 524 _nsmod = vector_append(&mod, _nsmod, &_nsmodsize, sizeof(*_nsmod)); 525 vector_sort(_nsmod, _nsmodsize, sizeof(*_nsmod), string_compare); 526 } 527 528 529 530 static void 531 ns_mod_free(ns_mod *mod) 532 { 533 534 free(mod->name); 535 if (mod->handle == NULL) 536 return; 537 if (mod->unregister != NULL) 538 mod->unregister(mod->mtab, mod->mtabsize); 539 if (mod->handle != nss_builtin_handle) 540 (void)dlclose(mod->handle); 541 } 542 543 544 545 /* 546 * Cleanup 547 */ 548 static void 549 nss_atexit(void) 550 { 551 int isthreaded; 552 553 isthreaded = __isthreaded; 554 if (isthreaded) 555 (void)_pthread_rwlock_wrlock(&nss_lock); 556 VECTOR_FREE(_nsmap, &_nsmapsize, sizeof(*_nsmap), 557 (vector_free_elem)ns_dbt_free); 558 VECTOR_FREE(_nsmod, &_nsmodsize, sizeof(*_nsmod), 559 (vector_free_elem)ns_mod_free); 560 if (isthreaded) 561 (void)_pthread_rwlock_unlock(&nss_lock); 562 } 563 564 565 566 /* 567 * Finally, the actual implementation. 568 */ 569 static nss_method 570 nss_method_lookup(const char *source, const char *database, 571 const char *method, const ns_dtab disp_tab[], void **mdata) 572 { 573 ns_mod *mod; 574 ns_mtab *match, key; 575 int i; 576 577 if (disp_tab != NULL) 578 for (i = 0; disp_tab[i].src != NULL; i++) 579 if (strcasecmp(source, disp_tab[i].src) == 0) { 580 *mdata = disp_tab[i].mdata; 581 return (disp_tab[i].method); 582 } 583 mod = vector_search(&source, _nsmod, _nsmodsize, sizeof(*_nsmod), 584 string_compare); 585 if (mod != NULL && mod->handle != NULL) { 586 key.database = database; 587 key.name = method; 588 match = bsearch(&key, mod->mtab, mod->mtabsize, 589 sizeof(mod->mtab[0]), mtab_compare); 590 if (match != NULL) { 591 *mdata = match->mdata; 592 return (match->method); 593 } 594 } 595 596 *mdata = NULL; 597 return (NULL); 598 } 599 600 601 __weak_reference(_nsdispatch, nsdispatch); 602 603 int 604 _nsdispatch(void *retval, const ns_dtab disp_tab[], const char *database, 605 const char *method_name, const ns_src defaults[], ...) 606 { 607 va_list ap; 608 const ns_dbt *dbt; 609 const ns_src *srclist; 610 nss_method method, fb_method; 611 void *mdata; 612 int isthreaded, serrno, i, result, srclistsize; 613 614 #ifdef NS_CACHING 615 nss_cache_data cache_data; 616 nss_cache_data *cache_data_p; 617 int cache_flag; 618 #endif 619 620 dbt = NULL; 621 fb_method = NULL; 622 623 isthreaded = __isthreaded; 624 serrno = errno; 625 if (isthreaded) { 626 result = _pthread_rwlock_rdlock(&nss_lock); 627 if (result != 0) { 628 result = NS_UNAVAIL; 629 goto fin; 630 } 631 } 632 result = nss_configure(); 633 if (result != 0) { 634 result = NS_UNAVAIL; 635 goto fin; 636 } 637 if (fallback_dispatch == 0) { 638 dbt = vector_search(&database, _nsmap, _nsmapsize, sizeof(*_nsmap), 639 string_compare); 640 fb_method = nss_method_lookup(NSSRC_FALLBACK, database, 641 method_name, disp_tab, &mdata); 642 } 643 644 if (dbt != NULL) { 645 srclist = dbt->srclist; 646 srclistsize = dbt->srclistsize; 647 } else { 648 srclist = defaults; 649 srclistsize = 0; 650 while (srclist[srclistsize].name != NULL) 651 srclistsize++; 652 } 653 654 #ifdef NS_CACHING 655 cache_data_p = NULL; 656 cache_flag = 0; 657 #endif 658 for (i = 0; i < srclistsize; i++) { 659 result = NS_NOTFOUND; 660 method = nss_method_lookup(srclist[i].name, database, 661 method_name, disp_tab, &mdata); 662 663 if (method != NULL) { 664 #ifdef NS_CACHING 665 if (strcmp(srclist[i].name, NSSRC_CACHE) == 0 && 666 nss_cache_cycle_prevention_func == NULL) { 667 #ifdef NS_STRICT_LIBC_EID_CHECKING 668 if (issetugid() != 0) 669 continue; 670 #endif 671 cache_flag = 1; 672 673 memset(&cache_data, 0, sizeof(nss_cache_data)); 674 cache_data.info = (nss_cache_info const *)mdata; 675 cache_data_p = &cache_data; 676 677 va_start(ap, defaults); 678 if (cache_data.info->id_func != NULL) 679 result = __nss_common_cache_read(retval, 680 cache_data_p, ap); 681 else if (cache_data.info->marshal_func != NULL) 682 result = __nss_mp_cache_read(retval, 683 cache_data_p, ap); 684 else 685 result = __nss_mp_cache_end(retval, 686 cache_data_p, ap); 687 va_end(ap); 688 } else { 689 cache_flag = 0; 690 va_start(ap, defaults); 691 result = method(retval, mdata, ap); 692 va_end(ap); 693 } 694 #else /* NS_CACHING */ 695 va_start(ap, defaults); 696 result = method(retval, mdata, ap); 697 va_end(ap); 698 #endif /* NS_CACHING */ 699 700 if (result & (srclist[i].flags)) 701 break; 702 } else { 703 if (fb_method != NULL) { 704 fallback_dispatch = 1; 705 va_start(ap, defaults); 706 result = fb_method(retval, 707 (void *)srclist[i].name, ap); 708 va_end(ap); 709 fallback_dispatch = 0; 710 } else 711 nss_log(LOG_DEBUG, "%s, %s, %s, not found, " 712 "and no fallback provided", 713 srclist[i].name, database, method_name); 714 } 715 } 716 717 #ifdef NS_CACHING 718 if (cache_data_p != NULL && 719 (result & (NS_NOTFOUND | NS_SUCCESS)) && cache_flag == 0) { 720 va_start(ap, defaults); 721 if (result == NS_SUCCESS) { 722 if (cache_data.info->id_func != NULL) 723 __nss_common_cache_write(retval, cache_data_p, 724 ap); 725 else if (cache_data.info->marshal_func != NULL) 726 __nss_mp_cache_write(retval, cache_data_p, ap); 727 } else if (result == NS_NOTFOUND) { 728 if (cache_data.info->id_func == NULL) { 729 if (cache_data.info->marshal_func != NULL) 730 __nss_mp_cache_write_submit(retval, 731 cache_data_p, ap); 732 } else 733 __nss_common_cache_write_negative(cache_data_p); 734 } 735 va_end(ap); 736 } 737 #endif /* NS_CACHING */ 738 739 if (isthreaded) 740 (void)_pthread_rwlock_unlock(&nss_lock); 741 fin: 742 errno = serrno; 743 return (result); 744 } 745