initial

1 files changed, 157 insertions, 0 deletions

diff --git a/other/burneye/src/conf/tmp/condition.c b/other/burneye/src/conf/tmp/condition.c
new file mode 100644
index 0000000..368aa73
--- /dev/null
+++ b/other/burneye/src/conf/tmp/condition.c
@@ -0,0 +1,157 @@
+/* fornax - distributed network
+ *
+ * by team teso
+ *
+ * scripting condition routines
+ */
+
+#include <stdlib.h>
+#include <string.h>
+#include "../../shared/common.h"
+#include "condition.h"
+#include "symbol.h"
+
+extern sym_elem **      gl_ns;
+
+
+int
+cond_verify (condition *cnd)
+{
+        /* condition is invalid and hence cannot be met
+         */
+        if (cnd->cond1 == NULL && cnd->val1 == NULL)
+                return (0);
+
+        /* pair condition
+         */
+        if (cnd->cond1 != NULL) {
+                int     c1_ret, c2_ret;
+
+                c1_ret = cond_verify (cnd->cond1);
+                c2_ret = cond_verify (cnd->cond2);
+
+                if (cnd->logoper == LO_OR) {
+                        return ((c1_ret == 1 || c2_ret == 1) ? 1 : 0);
+                } else if (cnd->logoper == LO_AND) {
+                        return ((c1_ret == 1 && c2_ret == 1) ? 1 : 0);
+                }
+
+                /* shouldn't happen
+                 */
+                return (0);
+        } else {
+                int     eq_val = 0;
+                char *  val1_s;
+                char *  val2_s;
+
+                /* normal equality test (broken-down-case)
+                 * first substitute each side then compare according to the
+                 * equality operator
+                 */
+                val1_s = (char *) sym_resolve (gl_ns, cnd->val1);
+                val2_s = sym_subst (gl_ns, cnd->val2);
+
+                switch (cnd->eqop) {
+                case (EQ_EQUAL):
+                        eq_val = (strcasecmp (val1_s, val2_s) == 0) ? 1 : 0;
+                        break;
+                case (EQ_NOTEQ):
+                        eq_val = (strcasecmp (val1_s, val2_s) == 0) ? 0 : 1;
+                        break;
+                /* to be implemented
+                 */
+                case (EQ_GREATEQ):
+                case (EQ_LOWEREQ):
+                        break;
+                default:
+                        break;
+                }
+
+                free (val2_s);
+
+                return (eq_val);
+        }
+}
+
+
+condition *
+cond_create (void)
+{
+        condition *     new = xcalloc (1, sizeof (condition));
+
+        return (new);
+}
+
+
+void
+cond_free (condition *c)
+{
+        if (c->val1 != NULL)
+                free (c->val1);
+        if (c->val2 != NULL)
+                free (c->val2);
+        if (c->cond1 != NULL)
+                cond_free (c->cond1);
+        if (c->cond2 != NULL)
+                cond_free (c->cond2);
+        free (c);
+
+        return;
+}
+
+
+condition *
+cond_set_cond1 (condition *c, condition *c1)
+{
+        c->cond1 = c1;
+
+        return (c);
+}
+
+
+condition *
+cond_set_cond2 (condition *c, condition *c2)
+{
+        c->cond2 = c2;
+
+        return (c);
+}
+
+
+condition *
+cond_set_logoper (condition *c, int lo)
+{
+        c->logoper = lo;
+
+        return (c);
+}
+
+
+condition *
+cond_set_eqop (condition *c, int eo)
+{
+        c->eqop = eo;
+
+        return (c);
+}
+
+
+condition *
+cond_set_val1 (condition *c, char *val)
+{
+        c->val1 = val;
+
+        return (c);
+}
+
+
+condition *
+cond_set_val2 (condition *c, char *val)
+{
+        c->val2 = val;
+
+        return (c);
+}
+
+
+