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

10_CUL_HM: aesKey allow change experimental

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@8721 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2015-06-09 19:08:57 +00:00
parent 10498d9ba3
commit efe997eaa2
2 changed files with 14 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
fhem/FHEM/10_CUL_HM.pm
View File

@ -4980,7 +4980,18 @@ sub CUL_HM_Set($@) {#+++++++++++++++++ set command+++++++++++++++++++++++++++++
}
CUL_HM_UpdtCentral($name);
}
elsif($cmd eq "assignHmKey") { ##############################################
$state = "";
my $oldKeyIdx = ReadingsVal($name, "aesKeyNbr", "00");
return "current key unknown" if (!defined $oldKeyIdx || $oldKeyIdx eq "");
CUL_HM_PushCmdStack($hash,'++'.$flag.'04'.$id.$dst.'01'.
sprintf("%02X",$oldKeyIdx));
CUL_HM_PushCmdStack($hash,'++'.$flag.'04'.$id.$dst.'01'.
sprintf("%02X",($oldKeyIdx+1)));
}
else{
return "$cmd not implemented - contact sysop";
}
@ -5234,6 +5245,7 @@ sub CUL_HM_getConfig($){
}
}
sub CUL_HM_calcDisWmSet($){
my $dh = shift;
my ($txt,$col,$icon) = eval $dh->{exe};

1
fhem/FHEM/HMConfig.pm
View File

@ -1378,6 +1378,7 @@ $culHmRegChan{"ROTO_ZEL-STG-RM-FWT03"}= $culHmRegChan{"HM-CC-TC03"};
raw => "data ..."
,reset => ""
,unpair => ""
,assignHmKey => ""
);
%culHmSubTypeDevSets = (# device of this subtype