FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-03 16:56:54 +00:00
Code Issues Releases Wiki Activity

FRITZBOX: Better debugging

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@7905 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
tpoitzsch 2015-02-07 17:03:28 +00:00
parent 4c40644f9b
commit 54249f53ac
1 changed files with 15 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
fhem/FHEM/72_FRITZBOX.pm
View File

@ -691,6 +691,8 @@ sub FRITZBOX_Readout_Run($)
# Execute commands
$resultArray = FRITZBOX_Readout_Query( $hash, \@readoutCmdArray, \@readoutReadings);
return "$name|Error|No STDOUT from shell command." unless defined $resultArray;
my $dectCount = $resultArray->[1];
$dectCount = 0 unless $dectCount=~ /\d/;
my $radioCount = $resultArray->[2];
@ -1053,18 +1055,21 @@ sub FRITZBOX_Readout_Query($$$)
}
my $resultArray = FRITZBOX_Exec( $hash, \@cmdArray);
$count = int @{$resultArray} -1;
for (0..$count)
if (defined ($resultArray))
{
$rValue = $resultArray->[$_];
$rFormat = $readoutCmdArray->[$_][2];
$rFormat = "" unless defined $rFormat;
$rValue = FRITZBOX_Readout_Format ($hash, $rFormat, $rValue);
$rName = $readoutCmdArray->[$_][0];
if ($rName ne "")
$count = int @{$resultArray} -1;
for (0..$count)
{
FRITZBOX_Log $hash, 5, "$rName: $rValue";
push @{$readoutReadings}, $rName."|".$rValue;
$rValue = $resultArray->[$_];
$rFormat = $readoutCmdArray->[$_][2];
$rFormat = "" unless defined $rFormat;
$rValue = FRITZBOX_Readout_Format ($hash, $rFormat, $rValue);
$rName = $readoutCmdArray->[$_][0];
if ($rName ne "")
{
FRITZBOX_Log $hash, 5, "$rName: $rValue";
push @{$readoutReadings}, $rName."|".$rValue;
}
}
}
@{$readoutCmdArray} = ();