mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixing devList for multiple devices

Browse Source 
git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@3202 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2013-05-21 12:48:44 +00:00
parent 2ae0dc02b0
commit 8d35c58791
1 changed files with 8 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
fhem/FHEM/00_FBAHA.pm
View File

@@ -143,10 +143,14 @@ FBAHA_getDevList($$)
my ($hash, $onlyId) = @_;
FBAHA_Write($hash, "05", "00000000"); # CONFIG_REQ
my ($err, $data) = FBAHA_ReadAnswer($hash, "CONFIG_RSP", "^06");
return ($err) if($err);
my $data = "";
for(;;) {
my ($err, $buf) = FBAHA_ReadAnswer($hash, "CONFIG_RSP", "^06");
return ($err) if($err);
$data .= substr($buf, 32);
last if($buf =~ m/^060[23]/);
}
$data = substr($data, 32); # Header
return FBAHA_configInd($data, $onlyId);
}
@@ -178,7 +182,7 @@ FBAHA_configInd($$)
if(!$onlyId || $onlyId == $id);
if($onlyId && $onlyId == $id) {
my $mnf = hex(substr($data,184, 4)); # empty/0
my $mnf = hex(substr($data,184, 8)); # empty/0
my $idf = substr($data,192,40); # empty/0
my $frm = substr($data,232,40); # empty/0
push @answer, " MANUF:$mnf";