1 /* $NetBSD: pam_getenvlist.c,v 1.2 2014/10/24 18:17:56 christos Exp $ */ 2 3 /*- 4 * Copyright (c) 2002-2003 Networks Associates Technology, Inc. 5 * Copyright (c) 2004-2011 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 * Id: pam_getenvlist.c 648 2013-03-05 17:54:27Z des 38 */ 39 40 #ifdef HAVE_CONFIG_H 41 # include "config.h" 42 #endif 43 44 #include <sys/cdefs.h> 45 __RCSID("$NetBSD: pam_getenvlist.c,v 1.2 2014/10/24 18:17:56 christos Exp $"); 46 47 #include <stdlib.h> 48 #include <string.h> 49 50 #include <security/pam_appl.h> 51 52 #include "openpam_impl.h" 53 54 /* 55 * XSSO 4.2.1 56 * XSSO 6 page 45 57 * 58 * Returns a list of all the PAM environment variables 59 */ 60 61 char ** 62 pam_getenvlist(pam_handle_t *pamh) 63 { 64 char **envlist; 65 int i; 66 67 ENTER(); 68 if (pamh == NULL) 69 RETURNP(NULL); 70 envlist = malloc(sizeof(*envlist) * ((size_t)pamh->env_count + 1)); 71 if (envlist == NULL) { 72 openpam_log(PAM_LOG_ERROR, "%s", 73 pam_strerror(pamh, PAM_BUF_ERR)); 74 RETURNP(NULL); 75 } 76 for (i = 0; i < pamh->env_count; ++i) { 77 if ((envlist[i] = strdup(pamh->env[i])) == NULL) { 78 while (i) { 79 --i; 80 FREE(envlist[i]); 81 } 82 FREE(envlist); 83 openpam_log(PAM_LOG_ERROR, "%s", 84 pam_strerror(pamh, PAM_BUF_ERR)); 85 RETURNP(NULL); 86 } 87 } 88 envlist[i] = NULL; 89 RETURNP(envlist); 90 } 91 92 /** 93 * The =pam_getenvlist function returns a copy of the given PAM context's 94 * environment list as a pointer to an array of strings. 95 * The last element in the array is =NULL. 96 * The pointer is suitable for assignment to {Va environ}. 97 * 98 * The array and the strings it lists are allocated using =malloc, and 99 * should be released using =free after use: 100 * 101 * char **envlist, **env; 102 * 103 * envlist = environ; 104 * environ = pam_getenvlist(pamh); 105 * \/\* do something nifty \*\/ 106 * for (env = environ; *env != NULL; env++) 107 * free(*env); 108 * free(environ); 109 * environ = envlist; 110 * 111 * >environ 7 112 * >pam_getenv 113 * >pam_putenv 114 * >pam_setenv 115 */ 116