firewalllog.dat: Fix for bug#13492 - include chain in the exported output

- The regex code does not extract out the chain and so it is missed off from the log output
   when it is exported.
- Changed code tested out on my vm testbed and confirmed to work and include the chain in
   the output.

Fixes: Bug13492
Tested-by: Adolf Belka <adolf.belka@ipfire.org>
Signed-off-by: Adolf Belka <adolf.belka@ipfire.org>
Reviewed-by: Bernhard Bitsch <bbitsch@ipfre.org>
This commit is contained in:
Adolf Belka
2023-12-22 13:37:47 +01:00
committed by Peter Müller
parent 6ac85c116e
commit f02adfbc74

View File

@@ -211,11 +211,12 @@ if ($cgiparams{'ACTION'} eq $Lang::tr{'export'})
foreach $_ (@log)
{
/^... (..) (..:..:..) [\w\-]+ kernel:.*(IN=.*)$/;
/^... (..) (..:..:..) [\w\-]+ kernel:(.*)(IN=.*)$/;
my $day = $1;
$day =~ tr / /0/;
my $time = $cgiparams{'DAY'} ? "$2" : "$day/$2" ;
print "$time $3\r\n";
my $chain = $3;
print "$time $chain $4\r\n";
}
exit 0;