mirror of
https://github.com/rkd77/elinks.git
synced 2024-12-04 14:46:47 -05:00
75 lines
1.5 KiB
C
75 lines
1.5 KiB
C
/* Environment variables handling */
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include <ctype.h>
|
|
#include <errno.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
|
|
#include "elinks.h"
|
|
|
|
#include "util/env.h"
|
|
#include "util/memory.h"
|
|
#include "util/string.h"
|
|
|
|
/* Set @name environment variable to @value or a substring of it:
|
|
* On success, it returns 0.
|
|
* If @value is NULL and on error, it returns -1.
|
|
* If @length >= 0 and smaller than true @value length, it will
|
|
* set @name to specified substring of @value.
|
|
*/
|
|
int
|
|
env_set(unsigned char *name, unsigned char *value, int length)
|
|
{
|
|
int true_length, substring = 0;
|
|
|
|
if (!value || !name || !*name) return -1;
|
|
|
|
true_length = strlen(value);
|
|
substring = (length >= 0 && length < true_length);
|
|
if (!substring) length = true_length;
|
|
|
|
#if defined(HAVE_SETENV)
|
|
{
|
|
int ret, allocated = 0;
|
|
|
|
if (substring) {
|
|
/* Copy the substring. */
|
|
value = memacpy(value, length);
|
|
if (!value) return -1;
|
|
allocated = 1;
|
|
}
|
|
|
|
ret = setenv(name, value, 1);
|
|
if (allocated) mem_free(value);
|
|
return ret;
|
|
}
|
|
|
|
#elif defined(HAVE_PUTENV)
|
|
|
|
{
|
|
int namelen = strlen(name);
|
|
char *s = malloc(namelen + length + 2);
|
|
|
|
if (!s) return -1;
|
|
memcpy(s, name, namelen);
|
|
s[namelen] = '=';
|
|
memcpy(&s[namelen + 1], value, length);
|
|
s[namelen + 1 + length] = '\0';
|
|
|
|
/* @s is never freed by us, this is intentional.
|
|
* --> Possible memleaks on repeated use of
|
|
* this function. */
|
|
return putenv(s);
|
|
}
|
|
|
|
#else
|
|
/* XXX: what to do ?? */
|
|
return -1;
|
|
#endif
|
|
}
|