minix/lib/libc/ansi/getenv.c

29 lines
560 B
C
Raw Normal View History

2005-04-21 16:53:53 +02:00
/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
/* $Header$ */
#include <stdlib.h>
extern const char ***_penviron;
char *
getenv(const char *name)
{
register const char **v = *_penviron;
register const char *p, *q;
if (v == NULL || name == NULL)
return (char *)NULL;
while ((p = *v++) != NULL) {
q = name;
while (*q && (*q == *p++))
q++;
if (*q || (*p != '='))
continue;
return (char *)p + 1;
}
return (char *)NULL;
}