John,
> Botnet 0.8 is up and available. It took me a while (things have been
> REALLY busy at work for the last 6 months), but it's there.
>
http://people.ucsc.edu/~jrudd/spamassassin/Botnet-0.8.tarThanks, very nice.
> What changed between 0.7 and 0.8:
It seems a patch by Daniel J McDonald was left out.
See:
http://marc.info/?t=118133681000003 http://marc.info/?l=spamassassin-users&m=118194701009930Here it is, applicable to Botnet-0.8:
--- Botnet.pm.ori Mon Aug 6 15:59:16 2007
+++ Botnet.pm Mon Aug 6 16:02:43 2007
@@ -711,5 +711,14 @@
(defined $max) &&
($max =~ /^-?\d+$/) ) {
- $resolver = Net::DNS::Resolver->new();
+ $resolver = Net::DNS::Resolver->new(
+ udp_timeout => 5,
+ tcp_timeout => 5,
+ retrans => 0,
+ retry => 1,
+ persistent_tcp => 0,
+ persistent_udp => 0,
+ dnsrch => 0,
+ defnames => 0,
+ );
if ($query = $resolver->search($name, $type)) {
# found matches
@@ -834,5 +843,14 @@
my ($ip) = @_;
my ($query, @answer, $rr);
- my $resolver = Net::DNS::Resolver->new();
+ my $resolver = Net::DNS::Resolver->new(
+ udp_timeout => 5,
+ tcp_timeout => 5,
+ retrans => 0,
+ retry => 1,
+ persistent_tcp => 0,
+ persistent_udp => 0,
+ dnsrch => 0,
+ defnames => 0,
+ );
my $name = "";
Mark