test/runtests.c

   1 #include <aros/debug.h>
   2 #include <proto/dos.h>
   3
   4 BPTR scripthandle;
   5 CONST_STRPTR scriptname;
   6 UBYTE command[200];
   7 LONG error;
   8 LONG failcnt;
   9 LONG errorcnt;
  10 LONG warncnt;
  11 LONG okcnt;
  12 LONG noshellcnt;
  13 LONG rubbishcnt;
  14
  15 int main(int argc, char **argv)
  16 {
  17     if (argc == 1)
  18     {
  19         scriptname = "testscript";
  20     }
  21     else if (argc == 2)
  22     {
  23         scriptname = argv[1];
  24     }
  25     else
  26     {
  27         PutStr("Usage runtest [scriptfile]\n");
  28     }
  29
  30     scripthandle = Open(scriptname, MODE_OLDFILE);
  31     if (!scripthandle)
  32     {
  33         PutStr("Can't open file\n");
  34         return 0;
  35     }
  36
  37     PutStr("Reading commands from file ");
  38     PutStr(scriptname);
  39     PutStr("\nOutput will be sent to the debugging console\n\n");
  40
  41     while (FGets(scripthandle, command, sizeof command))
  42     {
  43         if (command[0] != '#' && command[0] != '\n')
  44         {
  45             bug("====================================\n");
  46             bug("Running command: %s", command);
  47             error = SystemTagList(command, NULL);
  48             bug("returns: %d\n", error);
  49
  50             if (error == -1)
  51                 noshellcnt++;
  52             else if (error > 100 || error < 0)
  53                 rubbishcnt++;
  54             else if (error >= RETURN_FAIL)
  55                 failcnt++;
  56             else if (error >= RETURN_ERROR)
  57                 errorcnt++;
  58             else if (error >= RETURN_WARN)
  59                 warncnt++;
  60             else
  61                 okcnt++;
  62         }
  63     }
  64     bug("====================================\n");
  65     bug("Summary: ok %d, warn %d, error %d, fail %d, no Shell %d, rubbish %d\n",
  66         okcnt, warncnt, errorcnt, failcnt, noshellcnt, rubbishcnt);
  67
  68     Close(scripthandle);
  69
  70     return 0;
  71 }