[test suite] restore --diff mode, fixes #52
authorMichael Rash <mbr@cipherdyne.org>
Sun, 7 Apr 2013 20:28:33 +0000 (16:28 -0400)
committerMichael Rash <mbr@cipherdyne.org>
Sun, 7 Apr 2013 20:28:33 +0000 (16:28 -0400)
test/test-fwknop.pl

index cb18179..4166b6d 100755 (executable)
@@ -337,6 +337,8 @@ if ($enable_all) {
 ### emailed around to assist in debugging fwknop communications
 exit &anonymize_results() if $anonymize_results;
 
+exit &diff_test_results() if $diff_mode;
+
 &identify_loopback_intf();
 
 ### make sure everything looks as expected before continuing
@@ -400,11 +402,6 @@ our $default_server_gpg_args_no_pw = "LD_LIBRARY_PATH=$lib_dir " .
 ### instead of any installed libfko instance
 $ENV{'LD_LIBRARY_PATH'} = $lib_dir;
 
-if ($diff_mode) {
-    &diff_test_results();
-    exit 0;
-}
-
 ### import the tests from the various tests/ files
 &import_test_files();
 
@@ -780,7 +777,7 @@ sub diff_results() {
 sub build_results_hash() {
     my ($hr, $dir) = @_;
 
-    open F, "< $dir/$logfile" or die $!;
+    open F, "< $dir/$logfile" or die "[*] Could not open $dir/$logfile: $!";
     while (<F>) {
         if (/^(.*?)\.\.\..*(pass|fail)\s\((\d+)\)/) {
             $hr->{$1}{'pass_fail'} = $2;