From e3617ea976de2e7fa14a68edee2dda33a16928cb Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Wed, 24 Aug 2005 19:51:58 +0000 Subject: handle additionnal parameter to differentiate processed alerts and notifications from automatic mode --- perl-install/network/ifw.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/network/ifw.pm b/perl-install/network/ifw.pm index 4684183a8..fdefcaef2 100644 --- a/perl-install/network/ifw.pm +++ b/perl-install/network/ifw.pm @@ -125,7 +125,7 @@ sub resolve_address { sub attack_to_hash { my ($args) = @_; - my $attack = { mapn { $_[0] => $_[1] } [ 'timestamp', 'indev', 'prefix', 'sensor', 'protocol', 'addr', 'port', 'icmp_type', 'seq' ], $args }; + my $attack = { mapn { $_[0] => $_[1] } [ 'timestamp', 'indev', 'prefix', 'sensor', 'protocol', 'addr', 'port', 'icmp_type', 'seq', 'processed' ], $args }; $attack->{port} = unpack('S', pack('n', $attack->{port})); $attack->{date} = format_date($attack->{timestamp}); $attack->{ip_addr} = get_ip_address($attack->{addr}); -- cgit v1.2.1