/* * $Id: sttype-test.c,v 1.2 2001/02/01 20:31:18 gram Exp $ * * Ethereal - Network traffic analyzer * By Gerald Combs <gerald@zing.org> * Copyright 2001 Gerald Combs * *  * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License * as published by the Free Software Foundation; either version 2 * of the License, or (at your option) any later version. *  * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the * GNU General Public License for more details. *  * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA. */#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	0xab9009bastatic gpointertest_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 voidtest_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 intnum_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;}voidsttype_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;}voidsttype_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;}voidsttype_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;}voidsttype_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;}voidsttype_register_test(void){	static sttype_t test_type = {		STTYPE_TEST,		"TEST",		test_new,		test_free,	};	sttype_register(&test_type);}