FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-01 01:09:47 +00:00
Code Issues Releases Wiki Activity

75_MSG: improved absence detection for message gateway devices (forum topic,39983.msg562710.html#msg562710)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@13123 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
jpawlowski 2017-01-17 12:13:08 +00:00
parent 7aea568591
commit b2d3803496
1 changed files with 18 additions and 24 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
fhem/FHEM/75_MSG.pm
View File

@ -1608,44 +1608,38 @@ m/^@?([A-Za-z0-9._]+):([A-Za-z0-9._\-\/@+]*):?([A-Za-z0-9._\-\/@+]*)$/
$routeStatus = "UNDEFINED";
}
elsif ( $type[$i] ne "mail"
&& AttrVal( $gatewayDev, "disable", "0" ) eq
"1" )
&& IsDisabled($gatewayDev) )
{
$routeStatus = "DISABLED";
}
elsif (
$type[$i] ne "mail"
&& (
ReadingsVal( $gatewayDev, "power", "on" )
eq "off"
|| ReadingsVal( $gatewayDev, "presence",
"present" ) eq "absent"
|| ReadingsVal( $gatewayDev, "presence",
"appeared" ) eq "disappeared"
ReadingsVal( $gatewayDev, "presence",
"present" ) =~
m/^(0|absent|disappeared|unauthorized|disconnected|unreachable)$/i
|| ReadingsVal( $gatewayDev, "state",
"present" ) eq "absent"
|| ReadingsVal( $gatewayDev, "state",
"connected" ) eq "unauthorized"
|| ReadingsVal( $gatewayDev, "state",
"connected" ) eq "disconnected"
|| ReadingsVal( $gatewayDev, "state",
"reachable" ) eq "unreachable"
|| ReadingsVal(
$gatewayDev, "available", "1"
) eq "0"
"present" ) =~
m/^(absent|disappeared|unauthorized|disconnected|unreachable)$/i
|| ( $defs{$gatewayDev}{STATE}
&& $defs{$gatewayDev}{STATE} =~
m/^(absent|disappeared|unauthorized|disconnected|unreachable)$/i
)
|| ReadingsVal( $gatewayDev, "available",
"yes" ) eq "no"
|| ReadingsVal(
$gatewayDev, "reachable", "1"
) eq "0"
"yes" ) =~ m/^(0|no)$/i
|| ReadingsVal( $gatewayDev, "reachable",
"yes" ) eq "no"
"yes" ) =~ m/^(0|no)$/i
)
)
{
$routeStatus = "UNAVAILABLE";
}
elsif ( $type[$i] eq "screen"
&& ReadingsVal( $gatewayDev, "power", "on" ) =~
m/^(0|off)$/i )
{
$routeStatus = "OFF";
}
elsif ($type[$i] eq "audio"
&& $annState ne "long"
&& $annState ne "short" )