2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00

00_HMUARTLGW.pm: check if FD is defined before using it

git-svn-id: https://svn.fhem.de/fhem/trunk@14240 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
mgernoth 2017-05-10 09:27:09 +00:00
parent 5da9bffee6
commit e5e6ee9bb3

View File

@ -1675,16 +1675,18 @@ sub HMUARTLGW_CheckCmdResp($)
#The data we wait for might have already been received but never
#read from the FD. Do a last check now and process new data.
my $rin = '';
vec($rin, $hash->{FD}, 1) = 1;
my $n = select($rin, undef, undef, 0);
if ($n > 0) {
Log3($hash, HMUARTLGW_getVerbLvl($hash, undef, undef, 5),
"HMUARTLGW ${name} HMUARTLGW_CheckCmdResp: FD is readable, this might be the data we are looking for!");
#We will be back very soon!
InternalTimer(gettimeofday()+0, "HMUARTLGW_CheckCmdResp", $hash, 0);
HMUARTLGW_Read($hash);
return;
if (defined($hash->{FD})) {
my $rin = '';
vec($rin, $hash->{FD}, 1) = 1;
my $n = select($rin, undef, undef, 0);
if ($n > 0) {
Log3($hash, HMUARTLGW_getVerbLvl($hash, undef, undef, 5),
"HMUARTLGW ${name} HMUARTLGW_CheckCmdResp: FD is readable, this might be the data we are looking for!");
#We will be back very soon!
InternalTimer(gettimeofday()+0, "HMUARTLGW_CheckCmdResp", $hash, 0);
HMUARTLGW_Read($hash);
return;
}
}
if ($hash->{DevState} == HMUARTLGW_STATE_SEND) {