FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-06 12:18:46 +00:00
Code Issues Releases Wiki Activity

70_ENIGMA2.pm: implement stateAV reading

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@12043 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
jpawlowski 2016-08-21 15:01:51 +00:00
parent 83760d456d
commit 47a2e2dc49
1 changed files with 28 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
fhem/FHEM/70_ENIGMA2.pm
View File

@ -1036,6 +1036,7 @@ sub ENIGMA2_ReceiveCommand($$$) {
readingsBulkUpdate( $hash, "presence", $presence )
if ( ReadingsVal( $name, "presence", "" ) ne $presence );
}
}
# data received
@ -2187,6 +2188,11 @@ sub ENIGMA2_ReceiveCommand($$$) {
readingsBulkUpdate( $hash, "state", $state )
if ( ReadingsVal( $name, "state", "" ) ne $state );
# Set reading for stateAV
my $stateAV = ENIGMA2_GetStateAV($hash);
readingsBulkUpdate( $hash, "stateAV", $stateAV )
if ( ReadingsVal( $name, "stateAV", "-" ) ne $stateAV );
# Set ENIGMA2 online-only readings to "-" in case box is in
# offline or in standby mode
if ( $state eq "off"
@ -2256,6 +2262,28 @@ sub ENIGMA2_Undefine($$) {
return;
}
###################################
sub ENIGMA2_GetStateAV($) {
my ($hash) = @_;
my $name = $hash->{NAME};
if ( ReadingsVal( $name, "presence", "absent" ) eq "absent" ) {
return "absent";
}
elsif ( ReadingsVal( $name, "power", "off" ) eq "off" ) {
return "off";
}
elsif ( ReadingsVal( $name, "mute", "off" ) eq "on" ) {
return "muted";
}
elsif ( ReadingsVal( $name, "playStatus", "stopped" ) ne "stopped" ) {
return ReadingsVal( $name, "playStatus", "stopped" );
}
else {
return ReadingsVal( $name, "power", "off" );
}
}
###################################
sub ENIGMA2_wake ($$) {
my ( $name, $mac_addr ) = @_;