test/dos/setenv.c

   1 /*
   2     Copyright © 1995-2015, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <string.h>
   7 #include <stdio.h>
   8 #include <proto/dos.h>
   9
  10 static LONG testvalue(CONST_STRPTR var, STRPTR expval, ULONG explen,
  11     BOOL expnull, LONG cnt)
  12 {
  13     TEXT buffer[10];
  14     LONG len, failed = 0;
  15     struct LocalVar *lv;
  16
  17     if ((len = GetVar(var, buffer, sizeof(buffer), 0)) < 0)
  18     {
  19         printf("test %d ERROR getvar %d\n", (int)cnt, (int)len);
  20         failed++;
  21     }
  22     else
  23         printf("test %d getvar '%s'\n", (int)cnt, buffer);
  24
  25     if ((lv = FindVar(var, 0)) == NULL)
  26     {
  27         printf("test %d ERROR findvar\n", (int)cnt);
  28         failed++;
  29     }
  30     else
  31         printf("test %d findvar lv_Value=%p, lv_Len=%d\n", (int)cnt,
  32             lv->lv_Value, (int)lv->lv_Len);
  33
  34     if (lv->lv_Len != explen)
  35     {
  36         printf("test %d ERROR lv_Len, expected %d, found %d\n", (int)cnt,
  37             (int)explen, (int)lv->lv_Len);
  38         failed++;
  39     }
  40
  41     if (expnull && lv->lv_Value != NULL)
  42     {
  43         printf("test %d ERROR lv_Value expected NULL, found %p\n", (int)cnt,
  44             lv->lv_Value);
  45         failed++;
  46     }
  47
  48     if (!expnull && lv->lv_Value == NULL)
  49     {
  50         printf("test %d ERROR lv_Value expected not NULL, found %p\n",
  51             (int)cnt, lv->lv_Value);
  52         failed++;
  53     }
  54
  55     return failed;
  56 }
  57
  58 int main(void)
  59 {
  60     CONST_STRPTR var = "abc";
  61     STRPTR val = "cde";
  62     LONG cnt = 1, failed = 0;
  63
  64     /* Behavior validated with OS3.x */
  65
  66     printf("test %d setvar '%s'\n", (int)cnt, val);
  67     if (SetVar(var, val, strlen(val), 0) == DOSFALSE)
  68     {
  69         printf("error setvar\n");
  70         failed++;
  71     }
  72     failed += testvalue(var, val, 3, FALSE, cnt++);
  73
  74     val = "";
  75     printf("test %d setvar '%s'\n", (int)cnt, val);
  76     if (SetVar(var, val, strlen(val), 0) == DOSFALSE)
  77     {
  78         printf("error setvar\n");
  79         failed++;
  80     }
  81     failed += testvalue(var, val, 0, TRUE, cnt++);
  82
  83     val = "abcd";
  84     printf("test %d setvar '%s'\n", (int)cnt, val);
  85     if (SetVar(var, val, strlen(val), 0) == DOSFALSE)
  86     {
  87         printf("error setvar\n");
  88         failed++;
  89     }
  90     failed += testvalue(var, val, 4, FALSE, cnt++);
  91
  92     val = "";
  93     printf("test %d setvar '%s'\n", (int)cnt, val);
  94     if (SetVar(var, val, strlen(val), 0) == DOSFALSE)
  95     {
  96         printf("error setvar\n");
  97         failed++;
  98     }
  99     failed += testvalue(var, val, 0, TRUE, cnt++);
 100
 101     val = "";
 102     printf("test %d setvar '%s'\n", (int)cnt, val);
 103     if (SetVar(var, val, strlen(val), 0) == DOSFALSE)
 104     {
 105         printf("error setvar\n");
 106         failed++;
 107     }
 108     failed += testvalue(var, val, 0, TRUE, cnt++);
 109
 110     return failed == 0 ? RETURN_OK : RETURN_ERROR;
 111 }