mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-05-04 22:19:38 +00:00
HttpUtils.pm: fixing gethostbyname (Forum #53406)
git-svn-id: https://svn.fhem.de/fhem/trunk@11517 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
ab0dcca5d5
commit
aadb8bf44e
@ -136,9 +136,9 @@ HttpUtils_gethostbyname($$$)
|
|||||||
my $iaddr = inet_aton($host);
|
my $iaddr = inet_aton($host);
|
||||||
my $err;
|
my $err;
|
||||||
if(!defined($iaddr)) {
|
if(!defined($iaddr)) {
|
||||||
my @addr = gethostbyname($host); # This is still blocking
|
$iaddr = gethostbyname($host); # This is still blocking
|
||||||
$err = ($addr[0] ? undef : "gethostbyname $host failed");
|
$err = (($iaddr && length($iaddr)==4) ?
|
||||||
$iaddr = $addr[4];
|
undef : "gethostbyname $host failed");
|
||||||
}
|
}
|
||||||
$fn->($hash, $err, $iaddr);
|
$fn->($hash, $err, $iaddr);
|
||||||
return;
|
return;
|
||||||
|
Loading…
x
Reference in New Issue
Block a user