68 |
+ |
+ |
69 |
diff -Nur smeserver-denyhosts-2.9.old/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/denyhosts smeserver-denyhosts-2.9/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/denyhosts |
diff -Nur smeserver-denyhosts-2.9.old/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/denyhosts smeserver-denyhosts-2.9/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/denyhosts |
70 |
--- smeserver-denyhosts-2.9.old/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/denyhosts 2012-06-03 12:11:23.000000000 -0400 |
--- smeserver-denyhosts-2.9.old/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/denyhosts 2012-06-03 12:11:23.000000000 -0400 |
71 |
+++ smeserver-denyhosts-2.9/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/denyhosts 2019-03-24 22:42:50.227000000 -0400 |
+++ smeserver-denyhosts-2.9/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/denyhosts 2019-03-24 23:00:19.024000000 -0400 |
72 |
@@ -51,4 +51,12 @@ |
@@ -51,4 +51,16 @@ |
73 |
<base>ERROR_STOPPING</base> |
<base>ERROR_STOPPING</base> |
74 |
<trans>Error while trying to stop service</trans> |
<trans>Error while trying to stop service</trans> |
75 |
</entry> |
</entry> |
81 |
+ <base>SUCCESS_IP_WHITE</base> |
+ <base>SUCCESS_IP_WHITE</base> |
82 |
+ <trans>The following IP has been unbanned and whitelisted</trans> |
+ <trans>The following IP has been unbanned and whitelisted</trans> |
83 |
+ </entry> |
+ </entry> |
84 |
|
+ <entry> |
85 |
|
+ <base>WHITELIST</base> |
86 |
|
+ <trans>Whitelist</trans> |
87 |
|
+ </entry> |
88 |
</lexicon> |
</lexicon> |
89 |
diff -Nur smeserver-denyhosts-2.9.old/root/etc/e-smith/web/functions/denyhosts smeserver-denyhosts-2.9/root/etc/e-smith/web/functions/denyhosts |
diff -Nur smeserver-denyhosts-2.9.old/root/etc/e-smith/web/functions/denyhosts smeserver-denyhosts-2.9/root/etc/e-smith/web/functions/denyhosts |
90 |
--- smeserver-denyhosts-2.9.old/root/etc/e-smith/web/functions/denyhosts 2008-04-22 13:07:27.000000000 -0400 |
--- smeserver-denyhosts-2.9.old/root/etc/e-smith/web/functions/denyhosts 2008-04-22 13:07:27.000000000 -0400 |
103 |
diff -Nur smeserver-denyhosts-2.9.old/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/denyhosts.pm smeserver-denyhosts-2.9/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/denyhosts.pm |
diff -Nur smeserver-denyhosts-2.9.old/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/denyhosts.pm smeserver-denyhosts-2.9/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/denyhosts.pm |
104 |
--- smeserver-denyhosts-2.9.old/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/denyhosts.pm 2019-03-24 22:37:21.756000000 -0400 |
--- smeserver-denyhosts-2.9.old/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/denyhosts.pm 2019-03-24 22:37:21.756000000 -0400 |
105 |
+++ smeserver-denyhosts-2.9/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/denyhosts.pm 2019-03-24 22:38:20.584000000 -0400 |
+++ smeserver-denyhosts-2.9/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/denyhosts.pm 2019-03-24 22:38:20.584000000 -0400 |
106 |
@@ -10,21 +10,25 @@ |
@@ -10,10 +10,12 @@ |
107 |
use File::Basename; |
use File::Basename; |
108 |
use Exporter; |
use Exporter; |
109 |
use Carp; |
use Carp; |
113 |
|
|
114 |
-our @EXPORT = qw(get_value get_prop change_settings); |
-our @EXPORT = qw(get_value get_prop change_settings); |
115 |
+our @EXPORT = qw(get_value get_prop change_settings RemoveIP); |
+our @EXPORT = qw(get_value get_prop change_settings RemoveIP); |
116 |
|
+my $scriptname = basename($0); |
117 |
|
|
118 |
our $VERSION = sprintf '%d.%03d', q$Revision: 1.00 $ =~ /: (\d+).(\d+)/; |
our $VERSION = sprintf '%d.%03d', q$Revision: 1.00 $ =~ /: (\d+).(\d+)/; |
119 |
our $db = esmith::ConfigDB->open |
our $db = esmith::ConfigDB->open |
|
|| warn "Couldn't open configuration database (permissions problems?)"; |
|
|
- |
|
|
+my $scriptname = basename($0); |
|
|
|
|
|
sub new { |
|
|
shift; |
|
|
my $self = esmith::FormMagick->new(); |
|
|
$self->{calling_package} = (caller)[0]; |
|
|
bless $self; |
|
|
+# if (defined($self->cgi->param('action')) && $self->cgi->param('action') eq 'RemoveIP') { |
|
|
+# RemoveIP($self); |
|
|
+# } |
|
|
return $self; |
|
|
} |
|
|
|
|
120 |
@@ -55,6 +59,7 @@ |
@@ -55,6 +59,7 @@ |
121 |
return CGI::FormMagick::Validator::ip_number($self, $ip); |
return CGI::FormMagick::Validator::ip_number($self, $ip); |
122 |
} |
} |