apps/interpreters/minibasic: Add an option to enable/disable the test…

… script

interpreters/minibasic/Kconfig

@@ -51,4 +51,13 @@ config INTERPRETER_MINIBASIC_IOBUFSIZE
 	---help---
 		Size of the statically allocated I/O buffer.
 
+config INTERPRETER_MINIBASIC_TESTSCRIPT
+	bool "Test script"
+	default n
+	---help---
+		By default, the path to a basic program must provided on the command
+		line.  It this option is selected, then a built-in, canned script is
+		enabled and will be used if no path is provided on the command line.
+		This canned script can be used for testing purposes.
+
 endif

interpreters/minibasic/script.c

@@ -47,13 +47,15 @@
 
 #include <stdio.h>
 #include <stdlib.h>
+#include <errno.h>
 
 #include "interpreters/minibasic.h"
 
 /****************************************************************************
  * Private Data
  ****************************************************************************/
 
+#ifdef CONFIG_INTERPRETER_MINIBASIC_TESTSCRIPT
 /* Here is a simple script to play with */
 
 static FAR char *script =
@@ -64,7 +66,9 @@ static FAR char *script =
   "40 PRINT INSTR(\"FRED\", \"ED\", 4)\n"
   "50 PRINT VALLEN(\"12a\"), VALLEN(\"xyz\")\n"
   "60 LET x = SQRT(3.0) * SQRT(3.0)\n"
-  "65 LET x = INT(x + 0.5)\n" "70 PRINT MID$(\"1234567890\", x, -1)\n";
+  "65 LET x = INT(x + 0.5)\n"
+  "70 PRINT MID$(\"1234567890\", x, -1)\n";
+#endif
 
 /****************************************************************************
  * Public Functions
@@ -91,7 +95,7 @@ static FAR char *loadfile(FAR char *path)
   fp = fopen(path, "r");
   if (!fp)
     {
-      printf("Can't open %s\n", path);
+      fprintf(stderr, "ERROR: Failed to open %s: %d\n", path, errno);
       return 0;
     }
 
@@ -102,7 +106,7 @@ static FAR char *loadfile(FAR char *path)
   answer = malloc(size + 100);
   if (!answer)
     {
-      printf("Out of memory\n");
+      fprintf(stderr, "ERROR: Out of memory\n");
       fclose(fp);
       return 0;
     }
@@ -128,10 +132,10 @@ static FAR char *loadfile(FAR char *path)
 
 static void usage(void)
 {
-  printf("MiniBasic: a BASIC interpreter\n");
-  printf("usage:\n");
-  printf("Basic <script>\n");
-  printf("See documentation for BASIC syntax.\n");
+  fprintf(stderr, "MiniBasic: a BASIC interpreter\n");
+  fprintf(stderr, "usage:\n");
+  fprintf(stderr, "Basic <script>\n");
+  fprintf(stderr, "See documentation for BASIC syntax.\n");
   exit(EXIT_FAILURE);
 }
 
@@ -157,12 +161,14 @@ int basic_main(int argc, char *argv[])
 
   if (argc == 1)
     {
-      /* Comment out usage call to run test script */
-
-      usage();
+#ifdef CONFIG_INTERPRETER_MINIBASIC_TESTSCRIPT
       basic(script, stdin, stdout, stderr);
+#else
+      fprintf(stderr, "ERROR: Missing argument.\n");
+      usage();
+#endif
     }
-  else
+  else if (argc == 2)
     {
       scr = loadfile(argv[1]);
       if (scr)
@@ -171,6 +177,11 @@ int basic_main(int argc, char *argv[])
           free(scr);
         }
     }
+  else
+    {
+      fprintf(stderr, "ERROR: Too many arguments.\n");
+      usage();
+    }
 
   return 0;
 }