| files >> /usr/libexec/webmin/tcpwrappers/ |
| files >> //usr/libexec/webmin/tcpwrappers/cgi_args.pl |
do 'tcpwrappers-lib.pl';
sub cgi_args
{
my ($cgi) = @_;
if ($cgi eq 'edit_rule.cgi') {
my @rules = &list_rules($config{'hosts_allow'});
my $type = 'allow';
if (!@rules) {
@rules = &list_rules($config{'hosts_deny'});
$type = 'deny';
}
return @rules ? 'edit_rule.cgi?'.$type.'=1'.
'&id='.$rules[0]->{'id'} : 'new=1&allow=1';
}
return undef;
}
y~or5J ={Eeu磝Qk ᯘG{?+]ן?wM3X^歌>{7پK>on\jy R g/=fOroNVv~Y+ NGuÝHWyw[eQʨSb> >}Gmx[o[<{Ϯ_qF vM IENDB`