ua1zbe
/
aprsc
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

testing: test cases for dupecheck 8-bit mangling handling

This commit is contained in:
Heikki Hannikainen 2012-10-09 01:57:32 +03:00
parent d388f26ca1
commit 5f021c73f8
1 changed files with 22 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
tests/t/10dupecheck.t
View File

@ -3,7 +3,7 @@
#
use Test;
BEGIN { plan tests => 20 };
BEGIN { plan tests => 20 + 4 };
use runproduct;
use istest;
use Ham::APRS::IS;
@ -97,6 +97,27 @@ istest::should_drop(\&ok, $i_tx, $i_rx,
"SRC>DST2,DIGI1*,qAR,$login:xxx",
"SRC>DST:dummy3", 1); # will pass (helper packet)
######
# 17: send a packet with some 8-bit binary data, test that trimmed packets are dropped
istest::txrx(\&ok, $i_tx, $i_rx,
"SRC>DST2,qAR,$login:latin1 \xC5\xC4\xD6 skandit",
"SRC>DST2,qAR,$login:latin1 \xC5\xC4\xD6 skandit");
# 18: removed
istest::should_drop(\&ok, $i_tx, $i_rx,
"SRC>DST2,qAR,$login:latin1 skandit",
"SRC>DST:latin1 dummy1", 1); # will pass (helper packet)
# 19: replaced with spaces
istest::should_drop(\&ok, $i_tx, $i_rx,
"SRC>DST2,qAR,$login:latin1 skandit",
"SRC>DST:latin1 dummy2", 1); # will pass (helper packet)
# 20: 8th bit trimmed
istest::should_drop(\&ok, $i_tx, $i_rx,
"SRC>DST2,qAR,$login:latin1 \x45\x44\x56 skandit",
"SRC>DST:latin1 dummy3", 1); # will pass (helper packet)
# disconnect