pam_putenv.c revision 115619
1/*- 2 * Copyright (c) 2002-2003 Networks Associates Technology, Inc. 3 * All rights reserved. 4 * 5 * This software was developed for the FreeBSD Project by ThinkSec AS and 6 * Network Associates Laboratories, the Security Research Division of 7 * Network Associates, Inc. under DARPA/SPAWAR contract N66001-01-C-8035 8 * ("CBOSS"), as part of the DARPA CHATS research program. 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. The name of the author may not be used to endorse or promote 19 * products derived from this software without specific prior written 20 * permission. 21 * 22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR 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 THE AUTHOR 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 * $P4: //depot/projects/openpam/lib/pam_putenv.c#12 $ 35 */ 36 37#include <stdlib.h> 38#include <string.h> 39 40#include <security/pam_appl.h> 41 42#include "openpam_impl.h" 43 44/* 45 * XSSO 4.2.1 46 * XSSO 6 page 56 47 * 48 * Set the value of an environment variable 49 */ 50 51int 52pam_putenv(pam_handle_t *pamh, 53 const char *namevalue) 54{ 55 char **env, *p; 56 int i; 57 58 ENTER(); 59 if (pamh == NULL) 60 RETURNC(PAM_SYSTEM_ERR); 61 62 /* sanity checks */ 63 if (namevalue == NULL || (p = strchr(namevalue, '=')) == NULL) 64 RETURNC(PAM_SYSTEM_ERR); 65 66 /* see if the variable is already in the environment */ 67 if ((i = openpam_findenv(pamh, namevalue, p - namevalue)) >= 0) { 68 if ((p = strdup(namevalue)) == NULL) 69 RETURNC(PAM_BUF_ERR); 70 FREE(pamh->env[i]); 71 pamh->env[i] = p; 72 RETURNC(PAM_SUCCESS); 73 } 74 75 /* grow the environment list if necessary */ 76 if (pamh->env_count == pamh->env_size) { 77 env = realloc(pamh->env, 78 sizeof(char *) * (pamh->env_size * 2 + 1)); 79 if (env == NULL) 80 RETURNC(PAM_BUF_ERR); 81 pamh->env = env; 82 pamh->env_size = pamh->env_size * 2 + 1; 83 } 84 85 /* add the variable at the end */ 86 if ((pamh->env[pamh->env_count] = strdup(namevalue)) == NULL) 87 RETURNC(PAM_BUF_ERR); 88 ++pamh->env_count; 89 RETURNC(PAM_SUCCESS); 90} 91 92/* 93 * Error codes: 94 * 95 * PAM_SYSTEM_ERR 96 * PAM_BUF_ERR 97 */ 98 99/** 100 * The =pam_putenv function sets a environment variable. 101 * Its semantics are similar to those of =putenv, but it modifies the PAM 102 * context's environment list instead of the application's. 103 * 104 * >pam_getenv 105 * >pam_getenvlist 106 * >pam_setenv 107 */ 108