diff options
| -rw-r--r-- | CHANGES | 3 | ||||
| -rw-r--r-- | lib/Smokeping/probes/DNS.pm | 6 |
2 files changed, 8 insertions, 1 deletions
@@ -1,3 +1,6 @@ +* let the name of the dns server be configured in DNS.pm + -- ark <yesv *ring.wtwf.com> + 2006/3/24 -- released version 20060324_trunk 2006/3/23 -- released version 20060323_trunk diff --git a/lib/Smokeping/probes/DNS.pm b/lib/Smokeping/probes/DNS.pm index 1cb188f..5c3c0e6 100644 --- a/lib/Smokeping/probes/DNS.pm +++ b/lib/Smokeping/probes/DNS.pm @@ -90,6 +90,9 @@ sub targetvars { lookup => { _doc => "Name of the host to look up in the dns.", _example => "www.example.org", }, + server => { _doc => "Name of the dns server to use.", + _example => "ns1.someisp.net", + }, }); } @@ -109,8 +112,9 @@ sub pingone ($){ my $host = $target->{addr}; my $lookuphost = $target->{vars}{lookup}; $lookuphost = $target->{addr} unless defined $lookuphost; + my $dnsserver = $target->{vars}{server} || $host; + my $query = "$self->{properties}{binary} \@$dnsserver $lookuphost"; - my $query = "$self->{properties}{binary} \@$host $lookuphost"; my @times; $self->do_debug("query=$query\n"); |