Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-04 22:19:38 +00:00
Code Issues Packages Projects Releases Wiki Activity

10_FBDECT.pm: add alarmSensor (Forum #76613)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@15670 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2017-12-22 22:03:42 +00:00
parent a5e77b37a7
commit a8b579992d
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
FHEM/10_FBDECT.pm
View File

@ -2,6 +2,7 @@
# $Id$ # $Id$
package main; package main;
# See also https://avm.de/fileadmin/user_upload/Global/Service/Schnittstellen/AHA-HTTP-Interface.pdf
use strict; use strict;
use warnings; use warnings;
use SetExtensions; use SetExtensions;
@ -13,7 +14,7 @@ sub FBDECT_Cmd($$@);
sub FBDECT_decodePayload($$$); sub FBDECT_decodePayload($$$);
my @fbdect_models = qw(Powerline546E Dect200 CometDECT); my @fbdect_models = qw(Powerline546E Dect200 CometDECT HAN-FUN);
my %fbdect_payload = ( my %fbdect_payload = (
7 => { n=>"connected" }, 7 => { n=>"connected" },
@ -248,8 +249,12 @@ FBDECT_ParseHttp($$$)
my $ain = $h{identifier}; my $ain = $h{identifier};
$ain =~ s/[-: ]/_/g; $ain =~ s/[-: ]/_/g;
my %ll = (6=>"actuator", 7=>"powerMeter", 8=>"tempSensor", my %ll = (4=>"alarmSensor",
9=>"switch", 10=>"repeater"); 6=>"actuator",
7=>"powerMeter",
8=>"tempSensor",
9=>"switch",
10=>"repeater");
my $lsn = int($h{functionbitmask}); my $lsn = int($h{functionbitmask});
my @fb; my @fb;
map { push @fb, $ll{$_} if((1<<$_) & $lsn) } sort keys %ll; map { push @fb, $ll{$_} if((1<<$_) & $lsn) } sort keys %ll;