initial

1 files changed, 74 insertions, 0 deletions

diff --git a/other/burneye/src/conf/tmp/compiler-test.c b/other/burneye/src/conf/tmp/compiler-test.c
new file mode 100644
index 0000000..969ae4d
--- /dev/null
+++ b/other/burneye/src/conf/tmp/compiler-test.c
@@ -0,0 +1,74 @@
+/* fornax - distributed network
+ *
+ * by team teso
+ *
+ * compiler test program
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include "../../shared/common.h"
+#include "element.h"
+#include "compiler.h"
+#include "script.h"
+
+
+extern void     scr_elem_exec (element **el);
+char *          file_read (char *filename);
+
+
+char *
+file_read (char *filename)
+{
+        FILE                    *fp;
+        char                    *array = NULL;
+        unsigned long int       readbytes = 0;
+        size_t                  rb;
+
+        fp = fopen (filename, "r");
+        if (fp == NULL)
+                return (NULL);
+
+        do {
+                array = xrealloc (array, readbytes + 1024);
+                rb = fread (array + readbytes, 1, 1024, fp);
+                readbytes += rb;
+        } while (rb > 0);
+
+        fclose (fp);
+
+        return (array);
+}
+
+
+int
+main (int argc, char **argv)
+{
+        element **      script_c;
+        char *          script;
+
+        if (argc != 2) {
+                printf ("usage: %s <inputfile>\n\n", argv[0]);
+                exit (EXIT_FAILURE);
+        }
+
+        script = file_read (argv[1]);
+        if (script == NULL) {
+                fprintf (stderr, "couldn't open %s, aborting\n", argv[1]);
+                exit (EXIT_FAILURE);
+        }
+
+        script_c = cp_compile (script, strlen (script));
+        printf ("-------------------------------------------------------------------------------\n");
+        printf ("compilation of script %s %s.\n\n", argv[1], (script_c == NULL) ? "failed" : "successful");
+
+        printf ("\ntrying to run it...\n");
+        scr_elem_exec (script_c);
+
+        elem_list_free (script_c);
+
+        exit (EXIT_SUCCESS);
+}
+
+