[test suite] don't remove output/ directory in --list mode, closes #53
authorMichael Rash <mbr@cipherdyne.org>
Mon, 8 Apr 2013 00:57:35 +0000 (20:57 -0400)
committerMichael Rash <mbr@cipherdyne.org>
Mon, 8 Apr 2013 00:57:35 +0000 (20:57 -0400)
test/test-fwknop.pl

index 4166b6d..3266bac 100755 (executable)
@@ -4574,38 +4574,40 @@ sub init() {
         chmod 0600, $cf{$name} or die "[*] Could not chmod 0600 $cf{$name}";
     }
 
-    if (-d $output_dir) {
-        if (-d "${output_dir}.last") {
-            rmtree "${output_dir}.last"
-                or die "[*] rmtree ${output_dir}.last $!";
-        }
-        move $output_dir, "${output_dir}.last" or die $!;
-        if (-e "$output_dir/init") {
-            copy "$output_dir/init", "${output_dir}.last/init";
-        }
-        if (-e $logfile) {
-            copy $logfile, "${output_dir}.last/$logfile" or die $!;
+    unless ($list_mode) {
+        if (-d $output_dir) {
+            if (-d "${output_dir}.last") {
+                rmtree "${output_dir}.last"
+                    or die "[*] rmtree ${output_dir}.last $!";
+            }
+            move $output_dir, "${output_dir}.last" or die $!;
+            if (-e "$output_dir/init") {
+                copy "$output_dir/init", "${output_dir}.last/init";
+            }
+            if (-e $logfile) {
+                copy $logfile, "${output_dir}.last/$logfile" or die $!;
+            }
+            $saved_last_results = 1;
+        } else {
+            mkdir $output_dir or die "[*] Could not mkdir $output_dir: $!";
         }
-        $saved_last_results = 1;
-    } else {
-        mkdir $output_dir or die "[*] Could not mkdir $output_dir: $!";
-    }
 
-    if (-d $run_dir) {
-        rmtree $run_dir or die $!;
-    }
-    mkdir $run_dir or die "[*] Could not mkdir $run_dir: $!";
+        if (-d $run_dir) {
+            rmtree $run_dir or die $!;
+        }
+        mkdir $run_dir or die "[*] Could not mkdir $run_dir: $!";
 
-    for my $dir ($output_dir, $run_dir) {
-        next if -d $dir;
-        mkdir $dir or die "[*] Could not mkdir $dir: $!";
-    }
+        for my $dir ($output_dir, $run_dir) {
+            next if -d $dir;
+            mkdir $dir or die "[*] Could not mkdir $dir: $!";
+        }
 
-    for my $file (glob("$output_dir/*.test"), "$output_dir/init",
-            $tmp_rc_file, $tmp_pkt_file, $tmp_args_file,
-            $logfile, $key_gen_file) {
-        next unless -e $file;
-        unlink $file or die "[*] Could not unlink($file)";
+        for my $file (glob("$output_dir/*.test"), "$output_dir/init",
+                $tmp_rc_file, $tmp_pkt_file, $tmp_args_file,
+                $logfile, $key_gen_file) {
+            next unless -e $file;
+            unlink $file or die "[*] Could not unlink($file)";
+        }
     }
 
     if ($test_include) {