361 |
+ |
+ |
362 |
+our @EXPORT = qw(get_value get_prop change_settings RemoveIP); |
+our @EXPORT = qw(get_value get_prop change_settings RemoveIP); |
363 |
+ |
+ |
364 |
+our $VERSION = sprintf '%d.%03d', q$Revision: 1.1 $ =~ /: (\d+).(\d+)/; |
+our $VERSION = sprintf '%d.%03d', q$Revision: 1.2 $ =~ /: (\d+).(\d+)/; |
365 |
+our $db = esmith::ConfigDB->open |
+our $db = esmith::ConfigDB->open |
366 |
+ || warn "Couldn't open configuration database (permissions problems?)"; |
+ || warn "Couldn't open configuration database (permissions problems?)"; |
367 |
+my $scriptname = basename($0); |
+my $scriptname = basename($0); |
781 |
+fail2ban-client status $SERVI |grep -E 'IP list|Status for the jail' |sed 'N;s/\n/:/'|cut -d: -f2,4 |
+fail2ban-client status $SERVI |grep -E 'IP list|Status for the jail' |sed 'N;s/\n/:/'|cut -d: -f2,4 |
782 |
+done |
+done |
783 |
+ |
+ |
784 |
|
diff -Nur smeserver-fail2ban-0.1.18.old/createlinks smeserver-fail2ban-0.1.18/createlinks |
785 |
|
--- smeserver-fail2ban-0.1.18.old/createlinks 2017-10-27 08:34:58.000000000 -0400 |
786 |
|
+++ smeserver-fail2ban-0.1.18/createlinks 2019-04-09 23:39:11.772000000 -0400 |
787 |
|
@@ -2,6 +2,8 @@ |
788 |
|
|
789 |
|
use esmith::Build::CreateLinks qw(:all); |
790 |
|
|
791 |
|
+panel_link("fail2ban", "manager"); |
792 |
|
+ |
793 |
|
templates2events("/etc/rc.d/init.d/masq", "fail2ban-update"); |
794 |
|
|
795 |
|
foreach my $event qw(fail2ban-conf bootstrap-console-save){ |