From f03f34298bbd749211d7ee8c6c4252bb9cc1bda8 Mon Sep 17 00:00:00 2001 From: Stefan Schantl Date: Sat, 11 Jan 2020 19:34:12 +0100 Subject: [PATCH] dns.cgi: Only perform reverse lookup if DNS is working. Signed-off-by: Stefan Schantl --- html/cgi-bin/dns.cgi | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/html/cgi-bin/dns.cgi b/html/cgi-bin/dns.cgi index cb6f16f67a..69ab7bb7b8 100755 --- a/html/cgi-bin/dns.cgi +++ b/html/cgi-bin/dns.cgi @@ -411,6 +411,7 @@ sub show_nameservers () { my $dns_status_string; my $dns_status_col; + my $dns_working; # Test if the DNS system is working. # @@ -421,6 +422,7 @@ sub show_nameservers () { if ($dns_status_ret eq "2") { $dns_status_string = "$Lang::tr{'working'}"; $dns_status_col = "${Header::colourgreen}"; + $dns_working = 1; } else { $dns_status_string = "$Lang::tr{'broken'}"; $dns_status_col = "${Header::colourred}"; @@ -577,7 +579,7 @@ END my $rdns; # Only do the reverse lookup if the system is online. - if (&red_is_active()) { + if ($dns_working) { my $iaddr = inet_aton($nameserver); $rdns = gethostbyaddr($iaddr, AF_INET); } -- 2.39.2