blob: d4a53d284513aeaa924716a450cadc8ba14a0f87 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
/*
* Copyright 2004 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
/*
* 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
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
/* setenv - update or insert environment (name,value) pair */
int setenv(name, value, clobber)
char *name;
char *value;
int clobber;
{
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));
}
|
