test/dos/getenv.c

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