freebsd-src/contrib/tcp_wrappers/setenv.c
Ed Maste 14f102eacc tcp_wrappers: Use ANSI (c89) function definitions
Although this code is in contrib/ there is no active upstream.

Reviewed by:	brooks
Sponsored by:	The FreeBSD Foundation
Differential Revision: https://reviews.freebsd.org/D36047
2023-03-21 10:09:34 -04:00

32 lines
901 B
C

/*
* Some systems do not have setenv(). This one is modeled after 4.4 BSD, but
* is implemented in terms of portable primitives only: getenv(), putenv()
* and malloc(). It should therefore be safe to use on every UNIX system.
*
* If clobber == 0, do not overwrite an existing variable.
*
* Returns nonzero if memory allocation fails.
*
* Author: Wietse Venema, Eindhoven University of Technology, The Netherlands.
*/
#ifndef lint
static char sccsid[] = "@(#) setenv.c 1.1 93/03/07 22:47:58";
#endif
/* setenv - update or insert environment (name,value) pair */
int setenv(char *name, char *value, int clobber)
{
char *malloc();
char *getenv();
char *cp;
if (clobber == 0 && getenv(name) != 0)
return (0);
if ((cp = malloc(strlen(name) + strlen(value) + 2)) == 0)
return (1);
sprintf(cp, "%s=%s", name, value);
return (putenv(cp));
}