initial

1 files changed, 115 insertions, 0 deletions

diff --git a/other/burneye/src/conf/tmp/element.c b/other/burneye/src/conf/tmp/element.c
new file mode 100644
index 0000000..ee7633e
--- /dev/null
+++ b/other/burneye/src/conf/tmp/element.c
@@ -0,0 +1,115 @@
+/* fornax - distributed network
+ *
+ * by team teso
+ *
+ * scripting element routines
+ */
+
+#include <string.h>
+#include <stdlib.h>
+#include "../../shared/common.h"
+#include "call.h"
+#include "branch.h"
+#include "element.h"
+#include "symbol.h"
+
+
+/* static function declarations
+ */
+static int      elem_count (element **el);
+
+
+void
+elem_list_free (element **el)
+{
+        if (el == NULL)
+                return;
+
+        while (elem_count (el) > 0) {
+                elem_free (el[0]);
+                memmove (&el[0], &el[1], (elem_count (&el[1]) + 1) * sizeof (element *));
+        }
+
+        if (el != NULL)
+                free (el);
+}
+
+
+static int
+elem_count (element **el)
+{
+        int     count;
+
+        if (el == NULL)
+                return (0);
+
+        for (count = 0 ; el[count] != NULL ; ++count)
+                ;
+
+        return (count);
+}
+
+
+element **
+elem_add (element **el, element *e)
+{
+        int     ec = elem_count (el);
+
+        el = xrealloc (el, (ec + 2) * sizeof (element *));
+        el[ec] = e;
+        el[ec + 1] = NULL;
+
+        return (el);
+}
+
+
+element *
+elem_create (void)
+{
+        element *       new = xcalloc (1, sizeof (element));
+
+        return (new);
+}
+
+
+void
+elem_free (element *e)
+{
+        switch (e->type) {
+        case (ELEM_TYPE_CALL):
+                call_free ((call *) e->data);
+                break;
+        case (ELEM_TYPE_BRANCH):
+                br_free ((branch *) e->data);
+                break;
+        case (ELEM_TYPE_SET):
+                sym_elem_free ((sym_elem *) e->data);
+                break;
+        default:
+                break;
+        }
+
+        free (e);
+
+        return;
+}
+
+
+element *
+elem_set_type (element *e, int type)
+{
+        e->type = type;
+
+        return (e);
+}
+
+
+element *
+elem_set_data (element *e, void *data)
+{
+        e->data = data;
+
+        return (e);
+}
+
+