FBAHA: add state reading

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@4662 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2014-01-16 08:34:58 +00:00
parent 9987cb28a5
commit ae563279cb

View File

@@ -95,12 +95,16 @@ FBAHA_Set($@)
my ($err, $data) = FBAHA_ReadAnswer($hash, "REGISTER", "^01"); my ($err, $data) = FBAHA_ReadAnswer($hash, "REGISTER", "^01");
if($err) { if($err) {
Log3 $name, 1, $err; Log3 $name, 1, $err;
$hash->{STATE} = "???"; $hash->{STATE} =
$hash->{READINGS}{state}{VAL} = "???";
$hash->{READINGS}{state}{TIME} = TimeNow();
return $err; return $err;
} }
if($data =~ m/^01030010(........)/) { if($data =~ m/^01030010(........)/) {
$hash->{STATE} = "Initialized"; $hash->{STATE} =
$hash->{READINGS}{state}{VAL} = "Iniitalized";
$hash->{READINGS}{state}{TIME} = TimeNow();
$hash->{HANDLE} = $1; $hash->{HANDLE} = $1;
Log3 $name, 1, Log3 $name, 1,
"FBAHA $hash->{NAME} registered with handle: $hash->{HANDLE}"; "FBAHA $hash->{NAME} registered with handle: $hash->{HANDLE}";
@@ -108,7 +112,9 @@ FBAHA_Set($@)
} else { } else {
my $msg = "Got bogus answer for REGISTER request: $data"; my $msg = "Got bogus answer for REGISTER request: $data";
Log3 $name, 1, $msg; Log3 $name, 1, $msg;
$hash->{STATE} = "???"; $hash->{STATE} =
$hash->{READINGS}{state}{VAL} = "???";
$hash->{READINGS}{state}{TIME} = TimeNow();
return $msg; return $msg;
} }