Skip Menu |

This queue is for tickets about the IPTables-Log CPAN distribution.

Report information
The Basics
Id: 96851
Status: new
Priority: 0/
Queue: IPTables-Log

People
Owner: Nobody in particular
Requestors:
Cc:
AdminCc:

Bug Information
Severity: Important
Broken in: 0.0005
Fixed in: (no value)



Subject: IPTables-Log-0.0005 doesn't parse log entries with "Day of the Month" less than 10.
Patch attached
Subject: IPTables_Log_Set_Record.pm.diff
--- Record.pm.old 2014-06-30 21:31:55.000000000 -0400 +++ Record.pm 2014-06-30 21:32:01.000000000 -0400 @@ -177,7 +177,7 @@ else { ($date, $time, $hostname, undef, $prefix, $in, $out, undef, $mac, $src, $dst, $len, $ttl, $id, $df, $proto) - = $text =~ /(\w{3}\s\d{1,2})\s{1,2}(\d{2}:\d{2}:\d{2})\s(.+)\skernel:(\s\[\d+\.\d+\])?\s(\S*)\sIN=(\S*)\sOUT=(\S*)\s(MAC=)?(\S+)?\s*SRC=(\d+\.\d+\.\d+\.\d+|\S+)\sDST=(\d+\.\d+\.\d+\.\d+|\S+)\sLEN=(\d+).+TTL=(\d+).+ID=(\d+)\s(DF)*\s*PROTO=(\S+)/; + = $text =~ /(\w{3}\s{1,2}\d{1,2})\s{1,2}(\d{2}:\d{2}:\d{2})\s(.+)\skernel:(\s\[\d+\.\d+\])?\s(\S*)\sIN=(\S*)\sOUT=(\S*)\s(MAC=)?(\S+)?\s*SRC=(\d+\.\d+\.\d+\.\d+|\S+)\sDST=(\d+\.\d+\.\d+\.\d+|\S+)\sLEN=(\d+).+TTL=(\d+).+ID=(\d+)\s(DF)*\s*PROTO=(\S+)/; } # Get the protocol first. Based on this, we know what regex we need next.