| 435 |
$single_dnsbl = 1; |
$single_dnsbl = 1; |
| 436 |
} |
} |
| 437 |
|
|
| 438 |
|
my $rhsblrules = $scanner->{uridnsbl_active_rules_rhsbl}; |
| 439 |
|
my $reviprules = $scanner->{uridnsbl_active_rules_revipbl}; |
| 440 |
|
|
| 441 |
if ($single_dnsbl) { |
if ($single_dnsbl) { |
| 442 |
# look up the domain in the RHSBL subset |
# look up the domain in the RHSBL subset |
| 443 |
my $cf = $scanner->{uridnsbl_active_rules_rhsbl}; |
foreach my $rulename (keys %{$rhsblrules}) { |
|
foreach my $rulename (keys %{$cf}) { |
|
| 444 |
my $rulecf = $scanner->{conf}->{uridnsbls}->{$rulename}; |
my $rulecf = $scanner->{conf}->{uridnsbls}->{$rulename}; |
| 445 |
$self->lookup_single_dnsbl($scanner, $obj, $rulename, |
$self->lookup_single_dnsbl($scanner, $obj, $rulename, |
| 446 |
$dom, $rulecf->{zone}, $rulecf->{type}); |
$dom, $rulecf->{zone}, $rulecf->{type}); |
| 449 |
$scanner->register_async_rule_start($rulename); |
$scanner->register_async_rule_start($rulename); |
| 450 |
} |
} |
| 451 |
|
|
| 452 |
# perform NS, A lookups to look up the domain in the non-RHSBL subset |
# perform NS, A lookups to look up the domain in the non-RHSBL subset, |
| 453 |
if ($dom !~ /^\d+\.\d+\.\d+\.\d+$/) { |
# but only if there are active reverse-IP-URIBL rules |
| 454 |
|
if ($dom !~ /^\d+\.\d+\.\d+\.\d+$/ && (scalar keys %{$reviprules})) { |
| 455 |
$self->lookup_domain_ns($scanner, $obj, $dom); |
$self->lookup_domain_ns($scanner, $obj, $dom); |
| 456 |
} |
} |
| 457 |
} |
} |
| 459 |
# note that these rules are now underway. important: unless the |
# note that these rules are now underway. important: unless the |
| 460 |
# rule hits, in the current design, these will not be considered |
# rule hits, in the current design, these will not be considered |
| 461 |
# "finished" until harvest_dnsbl_queries() completes |
# "finished" until harvest_dnsbl_queries() completes |
| 462 |
my $cf = $scanner->{uridnsbl_active_rules_revipbl}; |
foreach my $rulename (keys %{$reviprules}) { |
|
foreach my $rulename (keys %{$cf}) { |
|
| 463 |
$scanner->register_async_rule_start($rulename); |
$scanner->register_async_rule_start($rulename); |
| 464 |
} |
} |
| 465 |
} |
} |