3dabf7b8d0
Initial parsing of test.conf must be done directly in filter_test main, while reconfiguration is handled as a regular test. Also fix several minor issues in test code.
91 lines
1.8 KiB
C
91 lines
1.8 KiB
C
/*
|
|
* Filters: Tests
|
|
*
|
|
* (c) 2015 CZ.NIC z.s.p.o.
|
|
*
|
|
* Can be freely distributed and used under the terms of the GNU GPL.
|
|
*/
|
|
|
|
#ifndef _GNU_SOURCE
|
|
#define _GNU_SOURCE
|
|
#endif
|
|
|
|
#include <string.h>
|
|
#include <stdlib.h>
|
|
|
|
#include "test/birdtest.h"
|
|
#include "test/bt-utils.h"
|
|
|
|
#include "filter/filter.h"
|
|
#include "filter/data.h"
|
|
#include "filter/f-inst.h"
|
|
#include "conf/conf.h"
|
|
|
|
#define BT_CONFIG_FILE "filter/test.conf"
|
|
|
|
|
|
static int
|
|
t_reconfig(void)
|
|
{
|
|
if (!bt_config_file_parse(BT_CONFIG_FILE))
|
|
return 0;
|
|
|
|
struct symbol *s;
|
|
WALK_LIST(s, config->symbols)
|
|
if ((s->class == SYM_FUNCTION) || (s->class == SYM_FILTER))
|
|
bt_assert_msg((s->flags & SYM_FLAG_SAME), "Symbol %s same check", s->name);
|
|
|
|
return 1;
|
|
}
|
|
|
|
static int
|
|
run_function(const void *arg)
|
|
{
|
|
const struct f_bt_test_suite *t = arg;
|
|
|
|
if (t->cmp)
|
|
return t->result == f_same(t->fn, t->cmp);
|
|
|
|
linpool *tmp = lp_new_default(&root_pool);
|
|
enum filter_return fret = f_eval(t->fn, tmp, NULL);
|
|
rfree(tmp);
|
|
|
|
return (fret < F_REJECT);
|
|
}
|
|
|
|
static void
|
|
bt_assert_filter(int result, const struct f_line_item *assert)
|
|
{
|
|
int bt_suit_case_result = 1;
|
|
if (!result)
|
|
{
|
|
bt_result = 0;
|
|
bt_suite_result = 0;
|
|
bt_suit_case_result = 0;
|
|
}
|
|
|
|
bt_log_suite_case_result(bt_suit_case_result, "Assertion at line %d (%s)",
|
|
assert->lineno, assert->i_FI_ASSERT.s);
|
|
}
|
|
|
|
int
|
|
main(int argc, char *argv[])
|
|
{
|
|
bt_init(argc, argv);
|
|
bt_bird_init();
|
|
|
|
bt_assert_hook = bt_assert_filter;
|
|
|
|
/* Initial test.conf parsing, must be done here */
|
|
if (!bt_config_file_parse(BT_CONFIG_FILE))
|
|
abort();
|
|
|
|
bt_test_suite(t_reconfig, "Testing reconfiguration");
|
|
|
|
struct f_bt_test_suite *t;
|
|
WALK_LIST(t, config->tests)
|
|
bt_test_suite_base(run_function, t->fn_name, t, BT_FORKING, BT_TIMEOUT, "%s", t->dsc);
|
|
|
|
bt_bird_cleanup();
|
|
return bt_exit_value();
|
|
}
|