1 /* Copyright (C) 1995,1996 Robert de Bath <rdebath@cix.compulink.co.uk> 2 * This file is part of the Linux-8086 C library and is distributed 3 * under the GNU Library General Public License. 4 */ 5 6 extern char ** environ; 7 8 char * getenv(name)9getenv(name) 10 char * name; 11 { 12 register int l; 13 register char ** ep = environ; 14 l = strlen(name); 15 16 if( ep == 0 || l == 0 ) return 0; 17 18 while(*ep) 19 { 20 if( **ep == *name && memcmp(name, *ep, l) == 0 && (*ep)[l] == '=' ) 21 return *ep+l+1; 22 ep++; 23 } 24 return 0; 25 } 26 27