summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2005-02-18 11:05:50 +0000
committerOlivier Blin <oblin@mandriva.org>2005-02-18 11:05:50 +0000
commit8f6033d284aba14c73e5357d63404f43456d747d (patch)
tree1830a3abc446b4067b48ad4000ac631e3bc937cd /perl-install/standalone
parent10cc40ff5c0cf102f61c493e7b56fcff408620ef (diff)
downloaddrakx-8f6033d284aba14c73e5357d63404f43456d747d.tar
drakx-8f6033d284aba14c73e5357d63404f43456d747d.tar.gz
drakx-8f6033d284aba14c73e5357d63404f43456d747d.tar.bz2
drakx-8f6033d284aba14c73e5357d63404f43456d747d.tar.xz
drakx-8f6033d284aba14c73e5357d63404f43456d747d.zip
let the daemon handle the blacklist policy in automatic mode
Diffstat (limited to 'perl-install/standalone')
-rw-r--r--perl-install/standalone/net_applet6
1 files changed, 6 insertions, 0 deletions
diff --git a/perl-install/standalone/net_applet b/perl-install/standalone/net_applet
index 904671027..1163e1816 100644
--- a/perl-install/standalone/net_applet
+++ b/perl-install/standalone/net_applet
@@ -188,6 +188,12 @@ sub setAutoStart {
sub handle_attack {
my ($seq, $timestamp, $indev, $prefix, $sensor, $protocol, $addr, $port, $icmp_type) = @_;
+ unless ($interactive_cb->get_active) {
+ #- let the daemon handle the blacklist policy in automatic mode
+ $activefw->blacklist($seq, undef);
+ return;
+ }
+
my $ip_addr = activefw::get_ip_address($addr);
my $hostname = activefw::resolve_address($ip_addr);
my $service = activefw::get_service($port);