zeek/testing/btest/language/short-circuit.bro
Daniel Thayer 90281a2423 Add tests of the Bro scripting language
Added tests of all built-in Bro data types (including different
representations of constant values, and max./min. values), keywords, and
operators (including special properties of certain operators, such as
short-circuit evaluation and associativity).
2012-08-24 11:32:49 -05:00

48 lines
966 B
Text

# @TEST-EXEC: bro %INPUT >out
# @TEST-EXEC: btest-diff out
function test_case(msg: string, expect: bool)
{
print fmt("%s (%s)", msg, expect ? "PASS" : "FAIL");
}
global ct: count;
function t_func(): bool
{
ct += 1;
return T;
}
function f_func(): bool
{
ct += 2;
return F;
}
event bro_init()
{
local res: bool;
# both functions should be called
ct = 0;
res = t_func() && f_func();
test_case("&& operator (eval. both operands)", res == F && ct == 3 );
# only first function should be called
ct = 0;
res = f_func() && t_func();
test_case("&& operator (eval. 1st operand)", res == F && ct == 2 );
# only first function should be called
ct = 0;
res = t_func() || f_func();
test_case("|| operator (eval. 1st operand)", res == T && ct == 1 );
# both functions should be called
ct = 0;
res = f_func() || t_func();
test_case("|| operator (eval. both operands)", res == T && ct == 3 );
}