home *** CD-ROM | disk | FTP | other *** search
/ Resource for Source: C/C++ / Resource for Source - C-C++.iso / codelib8 / v_10_08 / 1008014b < prev    next >
Encoding:
Text File  |  1995-11-01  |  441 b   |  22 lines
  1.  
  2. Listing 4 -- getenv.c
  3.  
  4. * getenv function -- in-memory version */
  5. #include <stdlib.h>
  6. #include <string.h>
  7. #include "yfuns.h"
  8.  
  9. char *(getenv)(const char *name)
  10.     {    /* search environment list for named entry */
  11.     const char *s;
  12.     size_t n = strlen(name);
  13.  
  14.     for (s = _Envp; *s; s += strlen(s) + 1)
  15.         {    /* look for name match */
  16.         if (!strncmp(s, name, n) && s[n] == '=')
  17.             return ((char *)&s[n + 1]);
  18.         }
  19.     return (NULL);
  20.     }
  21.  
  22.