Blame src/lib/libast/comp/setenv.c
|
Packit Service |
a8c26c |
/***********************************************************************
|
|
Packit Service |
a8c26c |
* *
|
|
Packit Service |
a8c26c |
* This software is part of the ast package *
|
|
Packit Service |
a8c26c |
* Copyright (c) 1985-2011 AT&T Intellectual Property *
|
|
Packit Service |
a8c26c |
* and is licensed under the *
|
|
Packit Service |
a8c26c |
* Eclipse Public License, Version 1.0 *
|
|
Packit Service |
a8c26c |
* by AT&T Intellectual Property *
|
|
Packit Service |
a8c26c |
* *
|
|
Packit Service |
a8c26c |
* A copy of the License is available at *
|
|
Packit Service |
a8c26c |
* http://www.eclipse.org/org/documents/epl-v10.html *
|
|
Packit Service |
a8c26c |
* (with md5 checksum b35adb5213ca9657e911e9befb180842) *
|
|
Packit Service |
a8c26c |
* *
|
|
Packit Service |
a8c26c |
* Information and Software Systems Research *
|
|
Packit Service |
a8c26c |
* AT&T Research *
|
|
Packit Service |
a8c26c |
* Florham Park NJ *
|
|
Packit Service |
a8c26c |
* *
|
|
Packit Service |
a8c26c |
* Glenn Fowler <gsf@research.att.com> *
|
|
Packit Service |
a8c26c |
* David Korn <dgk@research.att.com> *
|
|
Packit Service |
a8c26c |
* Phong Vo <kpv@research.att.com> *
|
|
Packit Service |
a8c26c |
* *
|
|
Packit Service |
a8c26c |
***********************************************************************/
|
|
Packit Service |
a8c26c |
#pragma prototyped
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
#define setenv ______setenv
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
#include <ast.h>
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
#undef setenv
|
|
Packit Service |
a8c26c |
#undef _lib_setenv /* procopen() calls setenv() */
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
#if _lib_setenv
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
NoN(setenv)
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
#else
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
#undef _def_map_ast
|
|
Packit Service |
a8c26c |
#include <ast_map.h>
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
#if defined(__EXPORT__)
|
|
Packit Service |
a8c26c |
#define extern __EXPORT__
|
|
Packit Service |
a8c26c |
#endif
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
extern int
|
|
Packit Service |
a8c26c |
setenv(const char* name, const char* value, int overwrite)
|
|
Packit Service |
a8c26c |
{
|
|
Packit Service |
a8c26c |
char* s;
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
if (overwrite || !getenv(name))
|
|
Packit Service |
a8c26c |
{
|
|
Packit Service |
a8c26c |
if (!(s = sfprints("%s=%s", name, value)) || !(s = strdup(s)))
|
|
Packit Service |
a8c26c |
return -1;
|
|
Packit Service |
a8c26c |
return setenviron(s) ? 0 : -1;
|
|
Packit Service |
a8c26c |
}
|
|
Packit Service |
a8c26c |
return 0;
|
|
Packit Service |
a8c26c |
}
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
#endif
|