showrequestfromblocklist.dat: Modify regex for added space in

log-prefix.

Signed-off-by: Rob Brewer <rob.brewer@ipfire.org>
Signed-off-by: Stefan Schantl <stefan.schantl@ipfire.org>
This commit is contained in:
Rob Brewer
2022-03-05 21:18:42 +00:00
committed by Stefan Schantl
parent 98d50c03e7
commit 3e0cb28fc6

View File

@@ -161,8 +161,8 @@ my $blaoklist = $cgiparams{blocklist};
if (!$skip)
{
while (<FILE>) {
if (/^${monthstr} ${daystr} ..:..:.. [\w\-]+ kernel:.*BLKLST_(\w+)IN=.*/) {
if($1 eq $blocklist){
if (/^${monthstr} ${daystr} ..:..:.. [\w\-]+ kernel:.*BLKLST_(\w+)\s?IN=.*/) {
if($1 eq $blacklist){
$log[$lines] = $_;
$lines++;
}
@@ -186,8 +186,8 @@ if ($multifile) {
}
if (!$skip) {
while (<FILE>) {
if (/^${monthstr} ${daystr} ..:..:.. [\w\-]+ kernel:.*BLKLST_(\w+)IN=.*/) {
if($1 eq $blocklist){
if (/^${monthstr} ${daystr} ..:..:.. [\w\-]+ kernel:.*BLKLST_(\w+)\s?IN=.*/) {
if($1 eq $blacklist){
$log[$lines] = $_;
$lines++;
}
@@ -308,9 +308,8 @@ $lines = 0;
foreach $_ (@slice) {
$a = $_;
# Check whether valid ipv4 or ipv6 address
if (($_ =~ /BLKLST_(\w+)IN=/)) {
if($1 eq $blocklist) {
if (($_ =~ /BLKLST_(\w+)\s?IN=/)) {
if($1 eq $blacklist) {
my $in = '-'; my $out = '-';
my $srcaddr = ''; my $dstaddr = '';
my $protostr = '';