[apple/libc.git] / stdlib / FreeBSD / putenv.c

/*-
 * Copyright (c) 1988, 1993
 *	The Regents of the University of California.  All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 4. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 */

#if defined(LIBC_SCCS) && !defined(lint)
static char sccsid[] = "@(#)putenv.c	8.2 (Berkeley) 3/27/94";
#endif /* LIBC_SCCS and not lint */
#include <sys/cdefs.h>
__FBSDID("$FreeBSD: src/lib/libc/stdlib/putenv.c,v 1.6 2007/05/01 16:02:41 ache Exp $");

#include <stdlib.h>
#include <string.h>
#include <sys/types.h>
#include <db.h>
#include <crt_externs.h>
#include <errno.h> 

extern struct owned_ptr *__env_owned;

#ifdef LEGACY_CRT1_ENVIRON
extern char **_saved_environ;
#endif /* LEGACY_CRT1_ENVIRON */

__private_extern__ int __init__env_owned(int);
__private_extern__ int __setenv(const char *, const char *, int, int, char ***, struct owned_ptr *);

#ifndef BUILDING_VARIANT
/*
 * _putenvp -- SPI using an arbitrary pointer to string array (the array must
 * have been created with malloc) and an env state, created by _allocenvstate().
 *	Returns ptr to value associated with name, if any, else NULL.
 */
int
_putenvp(char *str, char ***envp, void *state)
{
	if (__init__env_owned(1)) return (-1);
	return (__setenv(str, NULL, 1, 0, envp, (state ? (struct owned_ptr *)state : __env_owned)));
}
#endif /* BUILDING_VARIANT */

int
putenv(str)
	char *str;
{
#ifdef LEGACY_CRT1_ENVIRON
	int ret;
#endif /* LEGACY_CRT1_ENVIRON */

#if __DARWIN_UNIX03
	if (str == NULL || *str == 0 || index(str, '=') == NULL) {
		errno = EINVAL;
		return (-1);
	}
#else /* !__DARWIN_UNIX03 */
	if (index(str, '=') == NULL)
		return (-1);
#endif /* __DARWIN_UNIX03 */
	if (__init__env_owned(1)) return (-1);
#ifdef LEGACY_CRT1_ENVIRON
	ret =
#else /* !LEGACY_CRT1_ENVIRON */
	return
#endif /* !LEGACY_CRT1_ENVIRON */
	    __setenv(str, NULL, 1,
#if __DARWIN_UNIX03
		0,
#else /* !__DARWIN_UNIX03 */
		-1,
#endif /* __DARWIN_UNIX03 */
		_NSGetEnviron(), __env_owned);
#ifdef LEGACY_CRT1_ENVIRON
	_saved_environ = *_NSGetEnviron();
	return ret;
#endif /* LEGACY_CRT1_ENVIRON */
}
Commit	Line	Data
9385eb3d A	1	/*-
9385eb3d A	2	* Copyright (c) 1988, 1993
e9ce8d39 A	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.
e9ce8d39 A	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
5b2abdfb	30	#if defined(LIBC_SCCS) && !defined(lint)
9385eb3d	31	static char sccsid[] = "@(#)putenv.c 8.2 (Berkeley) 3/27/94";
5b2abdfb	32	#endif /* LIBC_SCCS and not lint */
9385eb3d	33	#include <sys/cdefs.h>
1f2f436a	34	__FBSDID("$FreeBSD: src/lib/libc/stdlib/putenv.c,v 1.6 2007/05/01 16:02:41 ache Exp $");
e9ce8d39	35
9385eb3d A	36	#include <stdlib.h>
9385eb3d A	37	#include <string.h>
ad3c9f2a A	38	#include <sys/types.h>
	39	#include <db.h>
	40	#include <crt_externs.h>
	41	#include <errno.h>
	42
	43	extern struct owned_ptr *__env_owned;
	44
	45	#ifdef LEGACY_CRT1_ENVIRON
	46	extern 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	*/
	58	int
	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 */
e9ce8d39	65
5b2abdfb	66	int
9385eb3d	67	putenv(str)
ad3c9f2a	68	char *str;
e9ce8d39	69	{
ad3c9f2a A	70	#ifdef LEGACY_CRT1_ENVIRON
	71	int ret;
	72	#endif /* LEGACY_CRT1_ENVIRON */
5b2abdfb	73
ad3c9f2a A	74	#if __DARWIN_UNIX03
	75	if (str == NULL \|\| *str == 0 \|\| index(str, '=') == NULL) {
	76	errno = EINVAL;
9385eb3d A	77	return (-1);
9385eb3d A	78	}
ad3c9f2a A	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 */
e9ce8d39	100	}