10_ZWave.pm: fix manuf. spec. init bug, and subdevice naming (Forum #65842)

git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@13264 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2017-01-28 22:03:46 +00:00
parent c069256e40
commit 6661c4dcad

View File

@ -2160,7 +2160,8 @@ ZWave_mcCapability($$)
my $id = $hash->{nodeIdHex};
my @classes;
shift(@l); shift(@l); # Skip generic and specific class
my $genericClass = shift(@l);
my $specificClass = shift(@l);
for my $classId (@l) {
push @classes, $zwave_id2class{lc($classId)} ?
$zwave_id2class{lc($classId)} : "UNKNOWN_".uc($classId);
@ -2172,8 +2173,7 @@ ZWave_mcCapability($$)
my $lcaps = substr($caps, 6);
$id = hex($id);
DoTrigger("global",
"UNDEFINED ZWave_$classes[0]_$id.$chid ZWave $homeId $lid $lcaps",
1);
"UNDEFINED ZWave_${genericClass}_$id.$chid ZWave $homeId $lid $lcaps", 1);
}
return "mcCapability_$chid:".join(" ", @classes);
@ -2249,6 +2249,8 @@ ZWave_mfsParse($$$$$)
if($config) {
$ret = (($l =~ m/config\s*=\s*"([^"]*)"/) ? $1 : "unknown");
ZWave_mfsAddClasses($hash, $1);
# execInits needs the modelId
setReadingsVal($hash, "modelId", "$mf-$prod-$id", TimeNow());
ZWave_execInits($hash, 50, $ret);
return "modelConfig:$ret";
} else {