home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 9 / FreshFishVol9-CD2.bin / bbs / gnu / libnix-0.8-src.lha / libnix-0.8 / sources / nix / stdlib / getenv.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-12-12  |  581 b   |  26 lines
  1. #include <stdlib.h>
  2. #include <dos/dos.h>
  3. #include <dos/var.h>
  4. #ifdef __GNUC__
  5. #include <inline/dos.h>
  6. #endif
  7.  
  8. char *getenv(const char *name)
  9. { static char *var=NULL;
  10.   size_t len,i=0;
  11.   do
  12.   { i+=256;
  13.     if(var!=NULL) /* free old buffer */
  14.       free(var);
  15.     var=malloc(i); /* and get a new one */
  16.     if(var==NULL) /* Oh, dear */
  17.       return NULL;
  18.     len=GetVar((char *)name,var,i,GVF_BINARY_VAR)+1;
  19.   }while(len>=i); /* just to be sure we got everything, we _require_ 1 unused byte */
  20.   if(len==0) /* Variable doesn't exist */
  21.     return NULL;
  22.   else
  23.     return var;
  24. }
  25.     
  26.