00_FBAHA.pm: decode unique number and version string

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@9510 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2015-10-18 10:12:19 +00:00
parent a59f21bcc8
commit 5101777981

View File

@@ -215,8 +215,8 @@ FBAHA_configInd($$)
if($onlyId && $onlyId == $id) { if($onlyId && $onlyId == $id) {
my $mnf = hex(substr($data,184, 8)); # empty/0 my $mnf = hex(substr($data,184, 8)); # empty/0
my $idf = substr($data,192,40); # empty/0 my $idf = substr($data,192,40); $idf =~ s/(00)*$//; $idf =pack("H*",$idf);
my $frm = substr($data,232,40); # empty/0 my $frm = substr($data,232,40); $frm =~ s/(00)*$//; $frm =pack("H*",$frm);
push @answer, " MANUF:$mnf"; push @answer, " MANUF:$mnf";
push @answer, " UniqueID:$idf"; push @answer, " UniqueID:$idf";
push @answer, " Firmware:$frm"; push @answer, " Firmware:$frm";