2 * Copyright (c) 2002-2003 Networks Associates Technology, Inc.
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.
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
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
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
34 * $P4: //depot/projects/openpam/lib/pam_putenv.c#12 $
40 #include <security/pam_appl.h>
42 #include "openpam_impl.h"
48 * Set the value of an environment variable
52 pam_putenv(pam_handle_t
*pamh
,
53 const char *namevalue
)
60 RETURNC(PAM_SYSTEM_ERR
);
63 if (namevalue
== NULL
|| (p
= strchr(namevalue
, '=')) == NULL
)
64 RETURNC(PAM_SYSTEM_ERR
);
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
)
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));
82 pamh
->env_size
= pamh
->env_size
* 2 + 1;
85 /* add the variable at the end */
86 if ((pamh
->env
[pamh
->env_count
] = strdup(namevalue
)) == NULL
)
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.