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
| | #include <stdlib.h>
#include <string.h>
#include <errno.h>
#include "libc.h"
char *__strchrnul(const char *, int);
static void dummy(char *old, char *new) {}
weak_alias(dummy, __env_rm_add);
int unsetenv(const char *name)
{
size_t l = __strchrnul(name, '=') - name;
if (!l || name[l]) {
errno = EINVAL;
return -1;
}
if (__environ) {
char **e = __environ, **eo = e;
for (; *e; e++)
if (!strncmp(name, *e, l) && l[*e] == '=')
__env_rm_add(*e, 0);
else if (eo != e)
*eo++ = *e;
else
eo++;
if (eo != e) *eo = 0;
}
return 0;
}
|