Add option to run post-backup command even if tar fails https://sourceforge.net/p/webadmin/bugs/4605/

fsdump/backup.cgi

@@ -73,7 +73,7 @@ else {
 			}
 
 		# Execute the post-backup command, if any
-		if ($ok) {
+		if ($ok || $dump->{'afteraok'}) {
 			print "<pre>";
 			$bok = &execute_after($dump, STDOUT, 1);
 			print "</pre>\n";

fsdump/backup.pl

@@ -72,7 +72,7 @@ else {
 	$status{'end'} = time();
 	&write_file($sfile, \%status);
 
-	if ($status{'status'} eq 'complete') {
+	if ($status{'status'} eq 'complete' || $dump->{'afteraok'}) {
 		# Execute the post-backup script
 		$bok = &execute_after($dump, OUT, 0);
 		if (!$bok && !$dump->{'afterfok'}) {

fsdump/edit_dump.cgi

@@ -101,15 +101,17 @@ if ($access{'extra'}) {
 # Before and after commands
 if ($access{'cmds'}) {
 	print &ui_table_row(&hlink($text{'dump_before'},"before"),
-			    &ui_textbox("before", $dump->{'before'}, 60)." ".
+			    &ui_textbox("before", $dump->{'before'}, 60)."<br>".
 			    &ui_checkbox("beforefok", 1, $text{'dump_fok'},
 					 !$dump->{'beforefok'}),
 			    3, \@tds);
 
 	print &ui_table_row(&hlink($text{'dump_after'},"after"),
-			    &ui_textbox("after", $dump->{'after'}, 60)." ".
+			    &ui_textbox("after", $dump->{'after'}, 60)."<br>".
 			    &ui_checkbox("afterfok", 1, $text{'dump_fok2'},
-					 !$dump->{'afterfok'}),
+					 !$dump->{'afterfok'})."<br>".
+			    &ui_checkbox("afteraok", 1, $text{'dump_aok'},
+                                         !$dump->{'afteraok'}),
 			    3, \@tds);
 	}
 print &ui_hidden_table_end();

fsdump/lang/en

@@ -70,6 +70,7 @@ dump_before=Command to run before backup
 dump_after=Command to run after backup
 dump_fok=Halt if command fails
 dump_fok2=Report failure if command fails
+dump_aok=Skip command even if backup fails
 dump_extra=Extra command-line parameters
 dump_rsh=Remote backup command
 dump_rsh0=Default (RSH)

fsdump/save_dump.cgi

@@ -78,6 +78,7 @@ else {
 		$dump->{'after'} = $in{'after'};
 		$dump->{'beforefok'} = !$in{'beforefok'};
 		$dump->{'afterfok'} = !$in{'afterfok'};
+		$dump->{'afteraok'} = !$in{'afteraok'};
 		}
 	$in{'file'} =~ s/^\s+//; $in{'file'} =~ s/\s+$//;
 	$in{'hfile'} =~ s/^\s+//; $in{'hfile'} =~ s/\s+$//;