Additional filter test case.

This commit is contained in:
Ondrej Zajicek 2013-11-20 13:30:00 +01:00
parent 4d4979c67c
commit f8f2419d4c

View file

@ -265,6 +265,7 @@ ec cc;
int set is; int set is;
pair set ps; pair set ps;
ec set ecs; ec set ecs;
ip set ips;
prefix set pxs; prefix set pxs;
string s; string s;
{ {
@ -360,6 +361,12 @@ string s;
if ( b = true ) then print "Testing bool comparison b = true: ", b; if ( b = true ) then print "Testing bool comparison b = true: ", b;
else { print "*** FAIL: TRUE test failed" ; quitbird; } else { print "*** FAIL: TRUE test failed" ; quitbird; }
ips = [ 1.1.1.0 .. 1.1.1.255, 1.2.2.2];
print "Testing IP sets: ";
print ips;
print " must be true: ", 1.1.1.0 ~ ips, ",", 1.1.1.100 ~ ips, ",", 1.2.2.2 ~ ips;
print " must be false: ", 1.1.0.255 ~ ips, ",", 1.1.2.0 ~ ips, ",", 1.2.2.3 ~ ips, ",", 192.168.1.1 ~ ips;
pxs = [ 1.2.0.0/16, 1.4.0.0/16+]; pxs = [ 1.2.0.0/16, 1.4.0.0/16+];
print "Testing prefix sets: "; print "Testing prefix sets: ";
print pxs; print pxs;
@ -386,6 +393,9 @@ string s;
print "1.2.3.4 = ", onetwo; print "1.2.3.4 = ", onetwo;
i = 4200000000;
print "4200000000 = ", i, " false: ", i = 4200000000, " ", i > 4100000000, " false: ", i > 4250000000;
test_undef(2); test_undef(2);
test_undef(3); test_undef(3);
test_undef(2); test_undef(2);