release
[hcoop/zz_old/debian/djbdns.git] / env.c
1 #include "str.h"
2 #include "env.h"
3
4 extern /*@null@*/char *env_get(const char *s)
5 {
6 int i;
7 unsigned int len;
8
9 if (!s) return 0;
10 len = str_len(s);
11 for (i = 0;environ[i];++i)
12 if (str_start(environ[i],s) && (environ[i][len] == '='))
13 return environ[i] + len + 1;
14 return 0;
15 }