1 |
charliebrady |
1.1 |
diff -ru qpsmtpd-0.40/plugins/require_resolvable_fromhost qpsmtpd-0.40.fix/plugins/require_resolvable_fromhost |
2 |
|
|
--- qpsmtpd-0.40/plugins/require_resolvable_fromhost 2007-06-14 13:57:24.000000000 -0400 |
3 |
|
|
+++ qpsmtpd-0.40.fix/plugins/require_resolvable_fromhost 2008-08-11 16:26:59.000000000 -0400 |
4 |
|
|
@@ -53,7 +53,12 @@ |
5 |
|
|
$res->udp_timeout(30); |
6 |
|
|
my @mx = mx($res, $host); |
7 |
|
|
foreach my $mx (@mx) { |
8 |
|
|
- return mx_valid($self, $mx->exchange, $host); |
9 |
|
|
+ # if any MX is valid, then we consider the domain |
10 |
|
|
+ # resolvable |
11 |
|
|
+ return 1 if mx_valid($self, $mx->exchange, $host); |
12 |
|
|
+ # if there are MX records, and we got here, |
13 |
|
|
+ # then none of them are valid |
14 |
|
|
+ return 0 if (@mx > 0); |
15 |
|
|
} |
16 |
|
|
my $query = $res->search($host); |
17 |
|
|
if ($query) { |