diff options
Diffstat (limited to 'scripts/services/sshd')
| -rwxr-xr-x | scripts/services/sshd | 128 |
1 files changed, 64 insertions, 64 deletions
diff --git a/scripts/services/sshd b/scripts/services/sshd index 1b4131e..0ad9e64 100755 --- a/scripts/services/sshd +++ b/scripts/services/sshd @@ -518,54 +518,54 @@ if ($#BadRSA >= 0) { } } -if (keys %TooManyFailures) { - print "\nDisconnecting after too many authentication failures for user:\n"; - foreach my $User (sort {$a cmp $b} keys %TooManyFailures) { - print " $User : $TooManyFailures{$User} Time(s)\n"; - } -} +#if (keys %TooManyFailures) { +# print "\nDisconnecting after too many authentication failures for user:\n"; +# foreach my $User (sort {$a cmp $b} keys %TooManyFailures) { +# print " $User : $TooManyFailures{$User} Time(s)\n"; +# } +#} -if (keys %BadLogins) { - print "\nFailed logins from:\n"; - foreach my $ip (sort SortIP keys %BadLogins) { - my $name = LookupIP($ip); - my $totcount = 0; - foreach my $user (keys %{$BadLogins{$ip}}) { - $totcount += $BadLogins{$ip}{$user}; - } - my $plural = ($totcount > 1) ? "s" : ""; - print " $name: $totcount time$plural\n"; - if ($Detail >= 5) { - my $sort = CountOrder(%{$BadLogins{$ip}}); - foreach my $user (sort $sort keys %{$BadLogins{$ip}}) { - my $val = $BadLogins{$ip}{$user}; - my $plural = ($val > 1) ? "s" : ""; - print " $user: $val time$plural\n"; - } - } - } -} +#if (keys %BadLogins) { +# print "\nFailed logins from:\n"; +# foreach my $ip (sort SortIP keys %BadLogins) { +# my $name = LookupIP($ip); +# my $totcount = 0; +# foreach my $user (keys %{$BadLogins{$ip}}) { +# $totcount += $BadLogins{$ip}{$user}; +# } +# my $plural = ($totcount > 1) ? "s" : ""; +# print " $name: $totcount time$plural\n"; +# if ($Detail >= 5) { +# my $sort = CountOrder(%{$BadLogins{$ip}}); +# foreach my $user (sort $sort keys %{$BadLogins{$ip}}) { +# my $val = $BadLogins{$ip}{$user}; +# my $plural = ($val > 1) ? "s" : ""; +# print " $user: $val time$plural\n"; +# } +# } +# } +#} -if (keys %IllegalUsers) { - print "\nIllegal users from:\n"; - foreach my $ip (sort SortIP keys %IllegalUsers) { - my $name = LookupIP($ip); - my $totcount = 0; - foreach my $user (keys %{$IllegalUsers{$ip}}) { - $totcount += $IllegalUsers{$ip}{$user}; - } - my $plural = ($totcount > 1) ? "s" : ""; - print " $name: $totcount time$plural\n"; - if ($Detail >= 5) { - my $sort = CountOrder(%{$IllegalUsers{$ip}}); - foreach my $user (sort $sort keys %{$IllegalUsers{$ip}}) { - my $val = $IllegalUsers{$ip}{$user}; - my $plural = ($val > 1) ? "s" : ""; - print " $user: $val time$plural\n"; - } - } - } -} +#if (keys %IllegalUsers) { +# print "\nIllegal users from:\n"; +# foreach my $ip (sort SortIP keys %IllegalUsers) { +# my $name = LookupIP($ip); +# my $totcount = 0; +# foreach my $user (keys %{$IllegalUsers{$ip}}) { +# $totcount += $IllegalUsers{$ip}{$user}; +# } +# my $plural = ($totcount > 1) ? "s" : ""; +# print " $name: $totcount time$plural\n"; +# if ($Detail >= 5) { +# my $sort = CountOrder(%{$IllegalUsers{$ip}}); +# foreach my $user (sort $sort keys %{$IllegalUsers{$ip}}) { +# my $val = $IllegalUsers{$ip}{$user}; +# my $plural = ($val > 1) ? "s" : ""; +# print " $user: $val time$plural\n"; +# } +# } +# } +#} if (keys %LockedAccount) { print "\nLocked account login attempts:\n"; @@ -694,24 +694,24 @@ if (keys %KrbErr) { } -if (keys %DisconnectReceived) { - print "\n\nReceived disconnect:\n"; - foreach my $Reason (sort {$a cmp $b} keys %DisconnectReceived) { - my $Total = 0; - print " $Reason"; - foreach my $Host (sort {$a cmp $b} keys %{$DisconnectReceived{$Reason}}) { - $Total += $DisconnectReceived{$Reason}{$Host}; - if( $Detail > 0 ) { - print "\n $Host : $DisconnectReceived{$Reason}{$Host} Time(s)"; - } - } - if( $Detail > 0 ) { - print "\n"; - } else { - print " : $Total Time(s)\n"; - } - } -} +#if (keys %DisconnectReceived) { +# print "\n\nReceived disconnect:\n"; +# foreach my $Reason (sort {$a cmp $b} keys %DisconnectReceived) { +# my $Total = 0; +# print " $Reason"; +# foreach my $Host (sort {$a cmp $b} keys %{$DisconnectReceived{$Reason}}) { +# $Total += $DisconnectReceived{$Reason}{$Host}; +# if( $Detail > 0 ) { +# print "\n $Host : $DisconnectReceived{$Reason}{$Host} Time(s)"; +# } +# } +# if( $Detail > 0 ) { +# print "\n"; +# } else { +# print " : $Total Time(s)\n"; +# } +# } +#} if ($#Scanned >= 0) { print "\nScanned from:\n"; |
