djb/env_get.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

#include "../byte_defs.h"
extern char **environ;

char *env_get(const char *s) /*EXTRACT_INCL*/ {
  int i;
  unsigned int slen;
  char *envi;
 
  if (environ==0) return 0;
  slen = str_len(s);
  for (i = 0; (envi = environ[i]); ++i)
    if ((!byte_diff(s,slen,envi)) && (envi[slen] == '='))
      return envi + slen + 1;
  return 0;
}