877
edits
Changes
Jump to navigation
Jump to search
Line 138:
Line 138: − use esmith::ConfigDB;+ − my $db = esmith::ConfigDB->open_ro || die 'Could not open configuration database';+ − # Completely block any riff raff+ − if ( ( my $status = $db->get_prop( 'ipblock', 'status' ) ) eq 'enabled' ) {+ − my $DenyHosts = $db->get_prop( 'ipblock', 'DenyHosts' ) || '';+
→Automated method
{
{
<nowiki> </nowiki> use esmith::ConfigDB;
<nowiki> </nowiki> my $db = esmith::ConfigDB->open_ro || die 'Could not open configuration database';
<nowiki> </nowiki> # Completely block any riff raff
<nowiki> </nowiki> if ( ( my $status = $db->get_prop( 'ipblock', 'status' ) ) eq 'enabled' ) {
<nowiki> </nowiki> my $DenyHosts = $db->get_prop( 'ipblock', 'DenyHosts' ) || <nowiki>''</nowiki>'';
my $logging = $db->get_prop( 'ipblock', 'logging' ) || 'disabled';
my $logging = $db->get_prop( 'ipblock', 'logging' ) || 'disabled';
foreach my $host ( split( ',', $DenyHosts ) ) {
foreach my $host ( split( ',', $DenyHosts ) ) {