X-Git-Url: https://git.dogcows.com/gitweb?a=blobdiff_plain;f=obcl%2Fobcl.c;h=408a67ce19162db2df5bc5d911ad576d4b8eef34;hb=4b421dc811d01d7eb0b40edae5513ebdef9da440;hp=e69de29bb2d1d6434b8b29ae775ad8c2e48c5391;hpb=d0e9015651aa960cf8cb58a5ab08da79e6aeb51b;p=chaz%2Fopenbox

diff --git a/obcl/obcl.c b/obcl/obcl.c
index e69de29b..408a67ce 100644
--- a/obcl/obcl.c
+++ b/obcl/obcl.c
@@ -0,0 +1,84 @@
+#include "obcl.h"
+
+void cl_tree_free(GList *tree)
+{
+    CLNode *tmp;
+
+    if (!tree) return;
+
+    for (; tree; tree = tree->next) {
+        tmp = (CLNode*)tree->data;
+        switch(tmp->type) {
+        case CL_ID:
+        case CL_STR:
+            g_free(tmp->u.str);
+            break;
+        case CL_LIST:
+        case CL_BLOCK:
+        case CL_LISTBLOCK:
+            g_free(tmp->u.lb.id);
+            cl_tree_free(tmp->u.lb.list);
+            cl_tree_free(tmp->u.lb.block);
+            break;
+        default:
+            break;
+        }
+        g_free(tmp);
+    }
+    g_list_free(tree);
+}
+
+GList *cl_parse(gchar *file)
+{
+    FILE *fh = fopen(file, "r");
+    GList *ret = NULL;
+
+    if (fh) {
+        ret = cl_parse_fh(fh);
+        fclose(fh);
+    } else {
+        perror(file);
+    }
+
+    return ret;
+}
+
+void cl_tree_print(GList *tree, int depth)
+{
+    CLNode *tmp;
+    int tmpd = depth;
+
+    for (; tree; tree = tree->next) {
+        tmp = (CLNode*)tree->data;
+
+        while (tmpd-- > 0)
+            printf(" ");
+        tmpd = depth;
+
+        switch(tmp->type) {
+        case CL_ID:
+            printf("[ID] '%s'\n", tmp->u.str);
+            break;
+        case CL_STR:
+            printf("[STR] '%s'\n", tmp->u.str);
+            break;
+        case CL_NUM:
+            printf("[NUM] %.2f\n", tmp->u.num);
+            break;
+        case CL_LIST:
+            printf("[LIST] '%s'\n", tmp->u.lb.id);
+            cl_tree_print(tmp->u.lb.list, depth+2);
+            break;
+        case CL_BLOCK:
+            printf("[BLOCK] '%s'\n", tmp->u.lb.id);
+            cl_tree_print(tmp->u.lb.block, depth+2);
+            break;
+        case CL_LISTBLOCK:
+            printf("[LISTBLOCK] %s\n", tmp->u.lb.id);
+            cl_tree_print(tmp->u.lb.list, depth+2);
+            printf("\n");
+            cl_tree_print(tmp->u.lb.block, depth+2);
+            break;
+        }
+    }
+}