DeforaNetworks/fwknop
3
0
Fork 0
Code Releases Activity

added test to validate digest.cache structure

Browse Source
This commit is contained in:
Michael Rash
2011-10-22 14:25:56 -04:00
parent 266150218a
commit e4f4ee7825
1 changed files with 53 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
test/test-fwknop.pl
+53 -1
View File
@@ -60,6 +60,8 @@ my $NO_FW_RULE = 2;
my $REQUIRED = 1;
my $OPTIONAL = 0;
my $ip_re = qr|(?:[0-2]?\d{1,2}\.){3}[0-2]?\d{1,2}|; ### IPv4
exit 1 unless GetOptions(
'Prepare-results' => \$prepare_results,
'fwknop-path=s' => \$fwknopCmd,
@@ -510,6 +512,15 @@ my @tests = (
"-i $loopback_intf --foreground --verbose",
'fatal' => $NO
},
{
'category' => 'Rijndael SPA ops',
'subcategory' => 'server',
'detail' => 'digest cache structure',
'err_msg' => 'improper digest cache structure',
'function' => \&digest_cache_structure,
'fatal' => $NO
},
{
'category' => 'Rijndael SPA ops',
'subcategory' => 'client+server',
@@ -902,6 +913,45 @@ sub replay_detection_rijndael() {
return $rv;
}
sub digest_cache_structure() {
my $test_hr = shift;
my $rv = 1;
&run_cmd("file $default_digest_file", $cmd_out_tmp, $current_test_file);
if (&file_find_regex([qr/ASCII/i], $cmd_out_tmp)) {
### the format should be:
### <digest> <proto> <src_ip> <src_port> <dst_ip> <dst_port> <time>
open F, "< $default_digest_file" or
die "[*] could not open $default_digest_file: $!";
while (<F>) {
next if /^#/;
next unless /\S/;
unless (m|^\S+\s+\d+\s+$ip_re\s+\d+\s+$ip_re\s+\d+\s+\d+|) {
&write_test_file("[-] invalid digest.cache line: $_");
$rv = 0;
last;
}
}
close F;
} elsif (&file_find_regex([qr/dbm/i], $cmd_out_tmp)) {
&write_test_file("[+] DBM digest file format, " .
"assuming this is valid.\n");
} else {
### don't know what kind of file the digest.cache is
&write_test_file("[-] unrecognized file type for " .
"$default_digest_file.\n");
$rv = 0;
}
if ($rv) {
&write_test_file("[+] valid digest.cache structure.\n");
}
return $rv;
}
sub server_bpf_ignore_packet() {
my $test_hr = shift;
@@ -1643,7 +1693,6 @@ sub init() {
die "[*] $conf_dir directory does not exist." unless -d $conf_dir;
die "[*] $lib_dir directory does not exist." unless -d $lib_dir;
die "[*] $run_dir directory does not exist." unless -d $run_dir;
die "[*] default config $default_conf does not exist" unless -e $default_conf;
die "[*] default access config $default_access_conf does not exist"
unless -e $default_access_conf;
@@ -1652,6 +1701,9 @@ sub init() {
unless (-d $output_dir) {
mkdir $output_dir or die "[*] Could not mkdir $output_dir: $!";
}
unless (-d $run_dir) {
mkdir $run_dir or die "[*] Could not mkdir $run_dir: $!";
}
for my $file (glob("$output_dir/*.test")) {
unlink $file or die "[*] Could not unlink($file)";