Add setenv() to libroken
This commit is contained in:

committed by
Love Hornquist Astrand

parent
649a929a54
commit
28023be15a
@@ -80,6 +80,7 @@ libroken_la_OBJS = \
|
|||||||
$(OBJ)\roken_gethostby.obj \
|
$(OBJ)\roken_gethostby.obj \
|
||||||
$(OBJ)\rtbl.obj \
|
$(OBJ)\rtbl.obj \
|
||||||
$(OBJ)\sendmsg_w32.obj \
|
$(OBJ)\sendmsg_w32.obj \
|
||||||
|
$(OBJ)\setenv.obj \
|
||||||
$(OBJ)\setprogname.obj \
|
$(OBJ)\setprogname.obj \
|
||||||
$(OBJ)\simple_exec_w32.obj \
|
$(OBJ)\simple_exec_w32.obj \
|
||||||
$(OBJ)\sleep.obj \
|
$(OBJ)\sleep.obj \
|
||||||
|
@@ -47,6 +47,7 @@
|
|||||||
ROKEN_LIB_FUNCTION int ROKEN_LIB_CALL
|
ROKEN_LIB_FUNCTION int ROKEN_LIB_CALL
|
||||||
setenv(const char *var, const char *val, int rewrite)
|
setenv(const char *var, const char *val, int rewrite)
|
||||||
{
|
{
|
||||||
|
#ifndef _WIN32
|
||||||
char *t;
|
char *t;
|
||||||
|
|
||||||
if (!rewrite && getenv(var) != 0)
|
if (!rewrite && getenv(var) != 0)
|
||||||
@@ -60,4 +61,15 @@ setenv(const char *var, const char *val, int rewrite)
|
|||||||
return 0;
|
return 0;
|
||||||
else
|
else
|
||||||
return -1;
|
return -1;
|
||||||
|
#else /* Win32 */
|
||||||
|
char dummy[8];
|
||||||
|
|
||||||
|
if (!rewrite && GetEnvironmentVariable(var, dummy, sizeof(dummy)/sizeof(char)) != 0)
|
||||||
|
return 0;
|
||||||
|
|
||||||
|
if (SetEnvironmentVariable(var, val) == 0)
|
||||||
|
return -1;
|
||||||
|
else
|
||||||
|
return 0;
|
||||||
|
#endif
|
||||||
}
|
}
|
||||||
|
Reference in New Issue
Block a user