1 /* $NetBSD: openpam_load.c,v 1.3 2017/05/06 19:50:09 christos Exp $ */ 2 3 /*- 4 * Copyright (c) 2002-2003 Networks Associates Technology, Inc. 5 * Copyright (c) 2004-2013 Dag-Erling Smørgrav 6 * All rights reserved. 7 * 8 * This software was developed for the FreeBSD Project by ThinkSec AS and 9 * Network Associates Laboratories, the Security Research Division of 10 * Network Associates, Inc. under DARPA/SPAWAR contract N66001-01-C-8035 11 * ("CBOSS"), as part of the DARPA CHATS research program. 12 * 13 * Redistribution and use in source and binary forms, with or without 14 * modification, are permitted provided that the following conditions 15 * are met: 16 * 1. Redistributions of source code must retain the above copyright 17 * notice, this list of conditions and the following disclaimer. 18 * 2. Redistributions in binary form must reproduce the above copyright 19 * notice, this list of conditions and the following disclaimer in the 20 * documentation and/or other materials provided with the distribution. 21 * 3. The name of the author may not be used to endorse or promote 22 * products derived from this software without specific prior written 23 * permission. 24 * 25 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 26 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 27 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 28 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 29 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 30 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 31 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 32 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 33 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 34 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 35 * SUCH DAMAGE. 36 * 37 * $OpenPAM: openpam_load.c 938 2017-04-30 21:34:42Z des $ 38 */ 39 40 #ifdef HAVE_CONFIG_H 41 # include "config.h" 42 #endif 43 44 #include <sys/cdefs.h> 45 __RCSID("$NetBSD: openpam_load.c,v 1.3 2017/05/06 19:50:09 christos Exp $"); 46 47 #include <dlfcn.h> 48 #include <stdlib.h> 49 #include <string.h> 50 51 #include <security/pam_appl.h> 52 53 #include "openpam_impl.h" 54 55 /* 56 * Locate a matching dynamic or static module. 57 */ 58 59 pam_module_t * 60 openpam_load_module(const char *modulename) 61 { 62 pam_module_t *module; 63 64 module = openpam_dynamic(modulename); 65 openpam_log(PAM_LOG_DEBUG, "%s dynamic %s", 66 (module == NULL) ? "no" : "using", modulename); 67 68 #ifdef OPENPAM_STATIC_MODULES 69 /* look for a static module */ 70 if (module == NULL && strchr(modulename, '/') == NULL) { 71 module = openpam_static(modulename); 72 openpam_log(PAM_LOG_DEBUG, "%s static %s", 73 (module == NULL) ? "no" : "using", modulename); 74 } 75 #endif 76 if (module == NULL) { 77 openpam_log(PAM_LOG_ERROR, "no %s found", modulename); 78 return (NULL); 79 } 80 return (module); 81 } 82 83 84 /* 85 * Release a module. 86 * XXX highly thread-unsafe 87 */ 88 89 static void 90 openpam_release_module(pam_module_t *module) 91 { 92 93 if (module == NULL) 94 return; 95 if (module->dlh == NULL) 96 /* static module */ 97 return; 98 dlclose(module->dlh); 99 openpam_log(PAM_LOG_DEBUG, "releasing %s", module->path); 100 FREE(module->path); 101 FREE(module); 102 } 103 104 105 /* 106 * Destroy a chain, freeing all its links and releasing the modules 107 * they point to. 108 */ 109 110 static void 111 openpam_destroy_chain(pam_chain_t *chain) 112 { 113 114 if (chain == NULL) 115 return; 116 openpam_destroy_chain(chain->next); 117 chain->next = NULL; 118 FREEV(chain->optc, chain->optv); 119 openpam_release_module(chain->module); 120 chain->module = NULL; 121 FREE(chain); 122 } 123 124 125 /* 126 * Clear the chains and release the modules 127 */ 128 129 void 130 openpam_clear_chains(pam_chain_t *policy[]) 131 { 132 int i; 133 134 for (i = 0; i < PAM_NUM_FACILITIES; ++i) { 135 openpam_destroy_chain(policy[i]); 136 policy[i] = NULL; 137 } 138 } 139 140 /* 141 * NOPARSE 142 */ 143