Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-01 20:20:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

00_TCM: function fingerprint added

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@14876 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
klaus.schauer 2017-08-11 18:46:35 +00:00
parent 1056285f4c
commit 8afb3a4821
1 changed files with 57 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

59
fhem/FHEM/00_TCM.pm
View File

@ -1,4 +1,3 @@
##############################################
# $Id$
@ -56,13 +55,14 @@ TCM_Initialize($)
# Normal devices
$hash->{DefFn} = "TCM_Define";
$hash->{FingerprintFn} = "TCM_Fingerprint";
$hash->{UndefFn} = "TCM_Undef";
$hash->{GetFn} = "TCM_Get";
$hash->{SetFn} = "TCM_Set";
$hash->{NotifyFn} = "TCM_Notify";
$hash->{AttrFn} = "TCM_Attr";
$hash->{AttrList} = "baseID blockSenderID:own,no comModeUTE:auto,biDir,uniDir comType:TCM,RS485 do_not_notify:1,0 " .
"dummy:1,0 learningMode:always,demand,nearfield " .
"dummy:1,0 fingerprint:off,on learningMode:always,demand,nearfield " .
"sendInterval:0,25,40,50,100,150,200,250 smartAckMailboxMax:slider,0,1,20 " .
"smartAckLearnMode:simple,advance,advanceSelectRep";
}
@ -206,6 +206,48 @@ TCM_InitSerialCom($)
return undef;
}
sub
TCM_Fingerprint($$)
{
my ($IODev, $msg) = @_;
return ($IODev, $msg) if (AttrVal($IODev, "fingerprint", 'off') eq 'off');
my @msg = split(":", $msg);
if ($msg[1] == 1) {
#EnOcean:PacketType:RORG:MessageData:SourceID:Status:OptionalData
substr($msg[5], 1, 1, "0");
substr($msg[6], 0, 2, "01");
substr($msg[6], 10, 4, "0000");
} elsif ($msg[1] == 2) {
#EnOcean:PacketType:ResposeCode:MessageData:OptionalData
} elsif ($msg[1] == 3) {
} elsif ($msg[1] == 4) {
#EnOcean:PacketType:eventCode:MessageData
} elsif ($msg[1] == 5) {
} elsif ($msg[1] == 6) {
#EnOcean:PacketType:smartAckCode:MessageData
} elsif ($msg[1] == 7) {
#EnOcean:PacketType:RORG:MessageData:SourceID:DestinationID:FunctionNumber:ManufacturerID:RSSI:Delay
substr($msg[8], 0, 2, "00");
substr($msg[9], 0, 2, "00");
} elsif ($msg[1] == 9) {
} elsif ($msg[1] == 10) {
} else {
}
$msg = join(":", @msg);
#Log3 $IODev, 2, "TCM $IODev <TCM_Fingerprint> PacketType: $msg[1] Data: $msg";
return ($IODev, $msg);
}
# Write
# Input is header and data (HEX), without CRC
sub
@ -1165,6 +1207,14 @@ sub TCM_Attr(@) {
CommandDeleteAttr(undef, "$name $attrName");
}
} elsif ($attrName eq "fingerprint") {
if (!defined $attrVal){
} elsif ($attrVal !~ m/^off|on$/) {
Log3 $name, 2, "EnOcean $name attribute-value [$attrName] = $attrVal wrong";
CommandDeleteAttr(undef, "$name $attrName");
}
} elsif ($attrName eq "learningMode") {
if (!defined $attrVal){
@ -1447,6 +1497,11 @@ TCM_Undef($$)
[baseID] = <none> is default.<br>
Set Transceiver baseID and override automatic allocation. Use this attribute only if the IODev does not allow automatic allocation.
</li>
<li><a name="TCM_fingerprint">fingerprint</a> &lt;off|on&gt;,
[fingerprint] = off is default.<br>
Activate the fingerprint function. The fingerprint function eliminates multiple identical data telegrams received via different TCM modules.<br>
The function must be activated for each TCM module.
</li>
<li><a name="TCM_comModeUTE">comModeUTE</a> &lt;auto|biDir|uniDir&gt;,
[comModeUTE] = auto is default.<br>
Presetting the communication method of actuators that be taught using the UTE teach-in. The automatic selection of the