summaryrefslogtreecommitdiffstats
path: root/perl-install/network/ifw.pm
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2005-08-24 19:51:58 +0000
committerOlivier Blin <oblin@mandriva.org>2005-08-24 19:51:58 +0000
commite3617ea976de2e7fa14a68edee2dda33a16928cb (patch)
tree6b2fb5aa18a8fbdf433a3750e5a72d322c465951 /perl-install/network/ifw.pm
parent6176a44edbf20a934ed83bbf57d3c7553f0e7a8b (diff)
downloaddrakx-backup-do-not-use-e3617ea976de2e7fa14a68edee2dda33a16928cb.tar
drakx-backup-do-not-use-e3617ea976de2e7fa14a68edee2dda33a16928cb.tar.gz
drakx-backup-do-not-use-e3617ea976de2e7fa14a68edee2dda33a16928cb.tar.bz2
drakx-backup-do-not-use-e3617ea976de2e7fa14a68edee2dda33a16928cb.tar.xz
drakx-backup-do-not-use-e3617ea976de2e7fa14a68edee2dda33a16928cb.zip
handle additionnal parameter to differentiate processed alerts and notifications from automatic mode
Diffstat (limited to 'perl-install/network/ifw.pm')
-rw-r--r--perl-install/network/ifw.pm2
1 files changed, 1 insertions, 1 deletions
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});