test/dos/getenv.c

   1 #include <proto/dos.h>
   2 #include <stdio.h>
   3 #include <stdlib.h>
   4
   5 int main(int argc, char *argv[])
   6 {
   7     char c;
   8     if (argc < 2)
   9     {
  10         fprintf(stderr, "usage: %s <varname>\n", argv[0]);
  11         return 20;
  12     }
  13
  14     if (GetVar(argv[1], &c, 1, GVF_BINARY_VAR) == 0)
  15     {
  16         LONG len = IoErr();
  17         char *buf = malloc(len + 1);
  18         if (!buf)
  19         {
  20             PrintFault(ERROR_NO_FREE_STORE, argv[0]);
  21             return 20;
  22         }
  23
  24         printf("IoErr() says the len of the value of the var '%s' is: %ld\n", argv[1], (long)len);
  25
  26
  27         len = GetVar(argv[1], buf, len+1, GVF_BINARY_VAR);
  28
  29         printf("GetVar() says the len of the value of the var '%s' is: %ld - its value is '%s'\n",
  30                argv[1], (long)len, buf);
  31
  32         free(buf);
  33
  34         return 0;
  35     }
  36
  37     PrintFault(IoErr(), argv[1]);
  38
  39     return 20;
  40 }