1f7e6344dSDag-Erling Smørgrav /*-
2f7e6344dSDag-Erling Smørgrav * Copyright (c) 2002-2003 Networks Associates Technology, Inc.
3*49e56509SDag-Erling Smørgrav * Copyright (c) 2004-2017 Dag-Erling Smørgrav
4f7e6344dSDag-Erling Smørgrav * All rights reserved.
5f7e6344dSDag-Erling Smørgrav *
6f7e6344dSDag-Erling Smørgrav * This software was developed for the FreeBSD Project by ThinkSec AS and
7f7e6344dSDag-Erling Smørgrav * Network Associates Laboratories, the Security Research Division of
8f7e6344dSDag-Erling Smørgrav * Network Associates, Inc. under DARPA/SPAWAR contract N66001-01-C-8035
9f7e6344dSDag-Erling Smørgrav * ("CBOSS"), as part of the DARPA CHATS research program.
10f7e6344dSDag-Erling Smørgrav *
11f7e6344dSDag-Erling Smørgrav * Redistribution and use in source and binary forms, with or without
12f7e6344dSDag-Erling Smørgrav * modification, are permitted provided that the following conditions
13f7e6344dSDag-Erling Smørgrav * are met:
14f7e6344dSDag-Erling Smørgrav * 1. Redistributions of source code must retain the above copyright
15f7e6344dSDag-Erling Smørgrav * notice, this list of conditions and the following disclaimer.
16f7e6344dSDag-Erling Smørgrav * 2. Redistributions in binary form must reproduce the above copyright
17f7e6344dSDag-Erling Smørgrav * notice, this list of conditions and the following disclaimer in the
18f7e6344dSDag-Erling Smørgrav * documentation and/or other materials provided with the distribution.
19f7e6344dSDag-Erling Smørgrav * 3. The name of the author may not be used to endorse or promote
20f7e6344dSDag-Erling Smørgrav * products derived from this software without specific prior written
21f7e6344dSDag-Erling Smørgrav * permission.
22f7e6344dSDag-Erling Smørgrav *
23f7e6344dSDag-Erling Smørgrav * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
24f7e6344dSDag-Erling Smørgrav * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25f7e6344dSDag-Erling Smørgrav * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26f7e6344dSDag-Erling Smørgrav * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
27f7e6344dSDag-Erling Smørgrav * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28f7e6344dSDag-Erling Smørgrav * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29f7e6344dSDag-Erling Smørgrav * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30f7e6344dSDag-Erling Smørgrav * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31f7e6344dSDag-Erling Smørgrav * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32f7e6344dSDag-Erling Smørgrav * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33f7e6344dSDag-Erling Smørgrav * SUCH DAMAGE.
34f7e6344dSDag-Erling Smørgrav */
35f7e6344dSDag-Erling Smørgrav
36f7e6344dSDag-Erling Smørgrav #ifdef HAVE_CONFIG_H
37f7e6344dSDag-Erling Smørgrav # include "config.h"
38f7e6344dSDag-Erling Smørgrav #endif
39f7e6344dSDag-Erling Smørgrav
40f3b0ac34SDag-Erling Smørgrav #include <errno.h>
41f7e6344dSDag-Erling Smørgrav #include <stdlib.h>
42f7e6344dSDag-Erling Smørgrav #include <stdio.h>
43f7e6344dSDag-Erling Smørgrav #include <string.h>
44f7e6344dSDag-Erling Smørgrav
45f7e6344dSDag-Erling Smørgrav #include <security/pam_appl.h>
46f7e6344dSDag-Erling Smørgrav
47f7e6344dSDag-Erling Smørgrav #include "openpam_impl.h"
48ce77a8d6SDag-Erling Smørgrav #include "openpam_asprintf.h"
49f7e6344dSDag-Erling Smørgrav
50f7e6344dSDag-Erling Smørgrav /*
51f7e6344dSDag-Erling Smørgrav * OpenPAM extension
52f7e6344dSDag-Erling Smørgrav *
53f7e6344dSDag-Erling Smørgrav * Set the value of an environment variable
54f7e6344dSDag-Erling Smørgrav * Mirrors setenv(3)
55f7e6344dSDag-Erling Smørgrav */
56f7e6344dSDag-Erling Smørgrav
57f7e6344dSDag-Erling Smørgrav int
pam_setenv(pam_handle_t * pamh,const char * name,const char * value,int overwrite)58f7e6344dSDag-Erling Smørgrav pam_setenv(pam_handle_t *pamh,
59f7e6344dSDag-Erling Smørgrav const char *name,
60f7e6344dSDag-Erling Smørgrav const char *value,
61f7e6344dSDag-Erling Smørgrav int overwrite)
62f7e6344dSDag-Erling Smørgrav {
63f7e6344dSDag-Erling Smørgrav char *env;
64f7e6344dSDag-Erling Smørgrav int r;
65f7e6344dSDag-Erling Smørgrav
66f7e6344dSDag-Erling Smørgrav ENTER();
67f7e6344dSDag-Erling Smørgrav
68f7e6344dSDag-Erling Smørgrav /* sanity checks */
69f3b0ac34SDag-Erling Smørgrav if (*name == '\0' || strchr(name, '=') != NULL) {
70f3b0ac34SDag-Erling Smørgrav errno = EINVAL;
71f7e6344dSDag-Erling Smørgrav RETURNC(PAM_SYSTEM_ERR);
72f3b0ac34SDag-Erling Smørgrav }
73f7e6344dSDag-Erling Smørgrav
74f7e6344dSDag-Erling Smørgrav /* is it already there? */
75f7e6344dSDag-Erling Smørgrav if (!overwrite && openpam_findenv(pamh, name, strlen(name)) >= 0)
76f7e6344dSDag-Erling Smørgrav RETURNC(PAM_SUCCESS);
77f7e6344dSDag-Erling Smørgrav
78f7e6344dSDag-Erling Smørgrav /* set it... */
79f7e6344dSDag-Erling Smørgrav if (asprintf(&env, "%s=%s", name, value) < 0)
80f7e6344dSDag-Erling Smørgrav RETURNC(PAM_BUF_ERR);
81f7e6344dSDag-Erling Smørgrav r = pam_putenv(pamh, env);
82f7e6344dSDag-Erling Smørgrav FREE(env);
83f7e6344dSDag-Erling Smørgrav RETURNC(r);
84f7e6344dSDag-Erling Smørgrav }
85f7e6344dSDag-Erling Smørgrav
86f7e6344dSDag-Erling Smørgrav /*
87f7e6344dSDag-Erling Smørgrav * Error codes:
88f7e6344dSDag-Erling Smørgrav *
89f7e6344dSDag-Erling Smørgrav * =pam_putenv
90f7e6344dSDag-Erling Smørgrav * PAM_SYSTEM_ERR
91f7e6344dSDag-Erling Smørgrav * PAM_BUF_ERR
92f7e6344dSDag-Erling Smørgrav */
93f7e6344dSDag-Erling Smørgrav
94f7e6344dSDag-Erling Smørgrav /**
95f7e6344dSDag-Erling Smørgrav * The =pam_setenv function sets an environment variable.
96f7e6344dSDag-Erling Smørgrav * Its semantics are similar to those of =setenv, but it modifies the PAM
97f7e6344dSDag-Erling Smørgrav * context's environment list instead of the application's.
98f7e6344dSDag-Erling Smørgrav *
99f7e6344dSDag-Erling Smørgrav * >pam_getenv
100f7e6344dSDag-Erling Smørgrav * >pam_getenvlist
101f7e6344dSDag-Erling Smørgrav * >pam_putenv
102f7e6344dSDag-Erling Smørgrav */
103