nsz Git - musl/blob - src/env/unsetenv.c

   1 #include <stdlib.h>
   2 #include <string.h>
   3 #include <errno.h>
   4 #include <unistd.h>
   5 #include "libc.h"
   6
   7 static void dummy(char *old, char *new) {}
   8 weak_alias(dummy, __env_rm_add);
   9
  10 int unsetenv(const char *name)
  11 {
  12         size_t l = __strchrnul(name, '=') - name;
  13         if (!l || name[l]) {
  14                 errno = EINVAL;
  15                 return -1;
  16         }
  17         if (__environ) {
  18                 char **e = __environ, **eo = e;
  19                 for (; *e; e++)
  20                         if (!strncmp(name, *e, l) && l[*e] == '=')
  21                                 __env_rm_add(*e, 0);
  22                         else if (eo != e)
  23                                 *eo++ = *e;
  24                         else
  25                                 eo++;
  26                 if (eo != e) *eo = 0;
  27         }
  28         return 0;
  29 }