webadmin/bpfire
1
0
Fork 0
mirror of https://github.com/vincentmli/bpfire.git synced 2026-04-15 13:32:59 +02:00
Code Issues Packages Projects Releases Wiki Activity

dns.cgi: Shorten time when checking if DNS is alive

Browse Source 
For localhost, one second should be plenty

Signed-off-by: Michael Tremer <michael.tremer@ipfire.org>
This commit is contained in:
Michael Tremer
2020-01-29 11:47:35 +01:00
parent 351ad526b2
commit 38f51465c9
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
html/cgi-bin/dns.cgi
View File

@@ -434,7 +434,7 @@ sub show_nameservers () {
#
# Simple send a request to unbound and check if it can resolve the
# DNS test server.
my $dns_status_ret = &check_nameserver("127.0.0.1", "$dns_test_server", "UDP");
my $dns_status_ret = &check_nameserver("127.0.0.1", "$dns_test_server", "UDP", undef, "+timeout=1", "+retry=0");
if ($dns_status_ret eq "2") {
$dns_status_string = "$Lang::tr{'working'}";
@@ -841,8 +841,8 @@ sub red_is_active () {
}
# Function to check a given nameserver against propper work.
sub check_nameserver($$$$) {
my ($nameserver, $record, $proto, $tls_hostname) = @_;
sub check_nameserver($$$$$) {
my ($nameserver, $record, $proto, $tls_hostname, @args) = @_;
# Check if the system is online.
unless (&red_is_active()) {
@@ -851,7 +851,7 @@ sub check_nameserver($$$$) {
# Default values.
my @command = ("kdig", "+dnssec",
"+bufsize=1232");
"+bufsize=1232", @args);
# Handle different protols.
if ($proto eq "TCP") {