forked from osmocom/wireshark
145 lines
2.2 KiB
C
145 lines
2.2 KiB
C
/* $Id: sttype-test.c,v 1.1 2001/02/01 20:21:18 gram Exp $ */
|
|
|
|
#include "syntax-tree.h"
|
|
#include "sttype-test.h"
|
|
|
|
typedef struct {
|
|
guint32 magic;
|
|
test_op_t op;
|
|
stnode_t *val1;
|
|
stnode_t *val2;
|
|
} test_t;
|
|
|
|
#define TEST_MAGIC 0xab9009ba
|
|
|
|
static gpointer
|
|
test_new(gpointer junk)
|
|
{
|
|
test_t *test;
|
|
|
|
g_assert(junk == NULL);
|
|
|
|
test = g_new(test_t, 1);
|
|
|
|
test->magic = TEST_MAGIC;
|
|
test->op = TEST_OP_UNINITIALIZED;
|
|
test->val1 = NULL;
|
|
test->val2 = NULL;
|
|
|
|
return (gpointer) test;
|
|
}
|
|
|
|
static void
|
|
test_free(gpointer value)
|
|
{
|
|
test_t *test = value;
|
|
assert_magic(test, TEST_MAGIC);
|
|
|
|
if (test->val1)
|
|
stnode_free(test->val1);
|
|
if (test->val2)
|
|
stnode_free(test->val2);
|
|
|
|
g_free(test);
|
|
}
|
|
|
|
static int
|
|
num_operands(test_op_t op)
|
|
{
|
|
switch(op) {
|
|
case TEST_OP_UNINITIALIZED:
|
|
g_assert_not_reached();
|
|
case TEST_OP_EXISTS:
|
|
return 1;
|
|
case TEST_OP_NOT:
|
|
return 1;
|
|
case TEST_OP_AND:
|
|
return 2;
|
|
case TEST_OP_OR:
|
|
return 2;
|
|
case TEST_OP_EQ:
|
|
return 2;
|
|
case TEST_OP_NE:
|
|
return 2;
|
|
case TEST_OP_GT:
|
|
return 2;
|
|
case TEST_OP_GE:
|
|
return 2;
|
|
case TEST_OP_LT:
|
|
return 2;
|
|
case TEST_OP_LE:
|
|
return 2;
|
|
}
|
|
g_assert_not_reached();
|
|
return -1;
|
|
}
|
|
|
|
|
|
void
|
|
sttype_test_set1(stnode_t *node, test_op_t op, stnode_t *val1)
|
|
{
|
|
test_t *test;
|
|
|
|
test = stnode_data(node);
|
|
assert_magic(test, TEST_MAGIC);
|
|
|
|
g_assert(num_operands(op) == 1);
|
|
test->op = op;
|
|
test->val1 = val1;
|
|
}
|
|
|
|
void
|
|
sttype_test_set2(stnode_t *node, test_op_t op, stnode_t *val1, stnode_t *val2)
|
|
{
|
|
test_t *test;
|
|
|
|
test = stnode_data(node);
|
|
assert_magic(test, TEST_MAGIC);
|
|
|
|
g_assert(num_operands(op) == 2);
|
|
test->op = op;
|
|
test->val1 = val1;
|
|
test->val2 = val2;
|
|
}
|
|
|
|
void
|
|
sttype_test_set2_args(stnode_t *node, stnode_t *val1, stnode_t *val2)
|
|
{
|
|
test_t *test;
|
|
|
|
test = stnode_data(node);
|
|
assert_magic(test, TEST_MAGIC);
|
|
|
|
if (num_operands(test->op) == 1) {
|
|
g_assert(val2 == NULL);
|
|
}
|
|
test->val1 = val1;
|
|
test->val2 = val2;
|
|
}
|
|
|
|
void
|
|
sttype_test_get(stnode_t *node, test_op_t *p_op, stnode_t **p_val1, stnode_t **p_val2)
|
|
{
|
|
test_t *test;
|
|
|
|
test = stnode_data(node);
|
|
assert_magic(test, TEST_MAGIC);
|
|
|
|
*p_op = test->op;
|
|
*p_val1 = test->val1;
|
|
*p_val2 = test->val2;
|
|
}
|
|
|
|
void
|
|
sttype_register_test(void)
|
|
{
|
|
static sttype_t test_type = {
|
|
STTYPE_TEST,
|
|
"TEST",
|
|
test_new,
|
|
test_free,
|
|
};
|
|
|
|
sttype_register(&test_type);
|
|
}
|