2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-01-31 18:59:33 +00:00

CUL_HM:change IO clients support detection, ignore empty peerlist at vccu update

git-svn-id: https://svn.fhem.de/fhem/trunk@24961 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2021-09-12 06:46:07 +00:00
parent 0fb0c4be39
commit 000893273f

View File

@ -992,7 +992,11 @@ sub CUL_HM_Attr(@) {#################################
$attrVal =~ s/ //g; $attrVal =~ s/ //g;
my @newIO = CUL_HM_noDup(split(",",$attrVal)); my @newIO = CUL_HM_noDup(split(",",$attrVal));
foreach my $nIO (@newIO){ foreach my $nIO (@newIO){
return "$nIO does not support CUL_HM" if(InternalVal($nIO,"Clients","") !~ m /:CUL_HM:/); return "$nIO does not support CUL_HM" if(InternalVal($nIO,"Clients",
defined $modules{InternalVal($nIO,"TYPE","")}{Clients}
? $modules{InternalVal($nIO,"TYPE","")}{Clients}
:"")
!~ m /:CUL_HM:/);
} }
if($attr{$name}{$attrName}){# see who we lost if($attr{$name}{$attrName}){# see who we lost
foreach my $oldIOs (split(",",$attr{$name}{$attrName})){ foreach my $oldIOs (split(",",$attr{$name}{$attrName})){
@ -10696,6 +10700,7 @@ sub CUL_HM_UpdtCentral($){
grep{AttrVal($_,"peerIDs","") =~ m/$id/} grep{AttrVal($_,"peerIDs","") =~ m/$id/}
keys %defs)){ keys %defs)){
# now for each ccu Channel, that ist peered with someone. # now for each ccu Channel, that ist peered with someone.
next if ($ccuBId !~ m/^[0-9A-F]{8}$/);
my $btn = hex(substr($ccuBId,6,2)) + 0; my $btn = hex(substr($ccuBId,6,2)) + 0;
CommandDefine(undef,$name."_Btn$btn CUL_HM $ccuBId") if (!$modules{CUL_HM}{defptr}{$ccuBId}); CommandDefine(undef,$name."_Btn$btn CUL_HM $ccuBId") if (!$modules{CUL_HM}{defptr}{$ccuBId});
foreach my $pn (grep !/^$/, foreach my $pn (grep !/^$/,