mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

HttpUptil.pm: fix 2nd get with the same $hash (Forum #62260)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@12740 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2016-12-11 12:57:36 +00:00
parent 605d20f51e
commit 4e39ded6f6
1 changed files with 3 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
fhem/FHEM/HttpUtils.pm
View File

@@ -406,6 +406,7 @@ HttpUtils_Connect2($)
$hash->{FD} = $hash->{conn}->fileno(); $hash->{FD} = $hash->{conn}->fileno();
$hash->{buf} = ""; $hash->{buf} = "";
delete($hash->{httpdatalen}); delete($hash->{httpdatalen});
delete($hash->{httpheader});
$hash->{NAME} = "" if(!defined($hash->{NAME})); $hash->{NAME} = "" if(!defined($hash->{NAME}));
my %timerHash = (hash=>$hash, checkSTS=>$selectTimestamp, msg=>"write to"); my %timerHash = (hash=>$hash, checkSTS=>$selectTimestamp, msg=>"write to");
$hash->{directReadFn} = sub() { $hash->{directReadFn} = sub() {
@@ -595,6 +596,7 @@ HttpUtils_ParseAnswer($)
} }
} }
my $ret = $hash->{httpdata}; my $ret = $hash->{httpdata};
$ret = "" if(!defined($ret));
delete $hash->{httpdata}; delete $hash->{httpdata};
delete $hash->{httpdatalen}; delete $hash->{httpdatalen};
@@ -708,6 +710,7 @@ HttpUtils_BlockingGet($)
$hash->{conn}->timeout($hash->{timeout}); $hash->{conn}->timeout($hash->{timeout});
$hash->{buf} = ""; $hash->{buf} = "";
delete($hash->{httpdatalen}); delete($hash->{httpdatalen});
delete($hash->{httpheader});
for(;;) { for(;;) {
my ($rout, $rin) = ('', ''); my ($rout, $rin) = ('', '');
vec($rin, $hash->{conn}->fileno(), 1) = 1; vec($rin, $hash->{conn}->fileno(), 1) = 1;