1/*-
2 * Copyright (c) 1988, 1993
3 *	The Regents of the University of California.  All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 * 4. Neither the name of the University nor the names of its contributors
14 *    may be used to endorse or promote products derived from this software
15 *    without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 */
29
30#if defined(LIBC_SCCS) && !defined(lint)
31static char sccsid[] = "@(#)putenv.c	8.2 (Berkeley) 3/27/94";
32#endif /* LIBC_SCCS and not lint */
33#include <sys/cdefs.h>
34__FBSDID("$FreeBSD: src/lib/libc/stdlib/putenv.c,v 1.6 2007/05/01 16:02:41 ache Exp $");
35
36#include <stdlib.h>
37#include <string.h>
38#include <sys/types.h>
39#include <db.h>
40#include <crt_externs.h>
41#include <errno.h>
42
43extern struct owned_ptr *__env_owned;
44
45#ifdef LEGACY_CRT1_ENVIRON
46extern char **_saved_environ;
47#endif /* LEGACY_CRT1_ENVIRON */
48
49__private_extern__ int __init__env_owned(int);
50__private_extern__ int __setenv(const char *, const char *, int, int, char ***, struct owned_ptr *);
51
52#ifndef BUILDING_VARIANT
53/*
54 * _putenvp -- SPI using an arbitrary pointer to string array (the array must
55 * have been created with malloc) and an env state, created by _allocenvstate().
56 *	Returns ptr to value associated with name, if any, else NULL.
57 */
58int
59_putenvp(char *str, char ***envp, void *state)
60{
61	if (__init__env_owned(1)) return (-1);
62	return (__setenv(str, NULL, 1, 0, envp, (state ? (struct owned_ptr *)state : __env_owned)));
63}
64#endif /* BUILDING_VARIANT */
65
66int
67putenv(str)
68	char *str;
69{
70#ifdef LEGACY_CRT1_ENVIRON
71	int ret;
72#endif /* LEGACY_CRT1_ENVIRON */
73
74#if __DARWIN_UNIX03
75	if (str == NULL || *str == 0 || index(str, '=') == NULL) {
76		errno = EINVAL;
77		return (-1);
78	}
79#else /* !__DARWIN_UNIX03 */
80	if (index(str, '=') == NULL)
81		return (-1);
82#endif /* __DARWIN_UNIX03 */
83	if (__init__env_owned(1)) return (-1);
84#ifdef LEGACY_CRT1_ENVIRON
85	ret =
86#else /* !LEGACY_CRT1_ENVIRON */
87	return
88#endif /* !LEGACY_CRT1_ENVIRON */
89	    __setenv(str, NULL, 1,
90#if __DARWIN_UNIX03
91		0,
92#else /* !__DARWIN_UNIX03 */
93		-1,
94#endif /* __DARWIN_UNIX03 */
95		_NSGetEnviron(), __env_owned);
96#ifdef LEGACY_CRT1_ENVIRON
97	_saved_environ = *_NSGetEnviron();
98	return ret;
99#endif /* LEGACY_CRT1_ENVIRON */
100}
101