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

added sanity check for S300TH and KS300

Browse Source 
git-svn-id: https://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@709 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
wherzig
2010-08-19 18:42:06 +00:00
parent dbd99bee6b
commit 3454a820b2
1 changed files with 11 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
FHEM/14_CUL_WS.pm
View File

@@ -1,4 +1,4 @@
# $Id: 14_CUL_WS.pm,v 1.27 2010-08-14 11:42:46 rudolfkoenig Exp $ # $Id: 14_CUL_WS.pm,v 1.28 2010-08-19 18:42:06 wherzig Exp $
# #
############################################## ##############################################
package main; package main;
@@ -230,6 +230,12 @@ CUL_WS_Parse($$)
} else { # $firstbyte not 7 } else { # $firstbyte not 7
if(@a == 9 && int(@a) > 8) { # S300TH if(@a == 9 && int(@a) > 8) { # S300TH
# Sanity check
if (!($msg =~ /^K\d\d\d\d\d\d\d\d$/ )) {
Log GetLogLevel($name,1), "Error: S300TH CUL_WS Cannot decode $msg (sanitycheck). Malformed";
return "";
}
$sgn = ($firstbyte&8) ? -1 : 1; $sgn = ($firstbyte&8) ? -1 : 1;
$tmp = $sgn * ($a[6].$a[3].".".$a[4]) + $hash->{corr1}; $tmp = $sgn * ($a[6].$a[3].".".$a[4]) + $hash->{corr1};
$hum = ($a[7].$a[8].".".$a[5]) + $hash->{corr2}; $hum = ($a[7].$a[8].".".$a[5]) + $hash->{corr2};
@@ -240,6 +246,10 @@ CUL_WS_Parse($$)
$NotifyTemperature=$tmp; $NotifyTemperature=$tmp;
$NotifyHumidity=$hum; $NotifyHumidity=$hum;
} elsif(@a == 15 && int(@a) > 14) { # KS300/2 } elsif(@a == 15 && int(@a) > 14) { # KS300/2
if (!($msg =~ /^K\d\d\d\d\d\d\d\d\d\d\d\d\d\d$/ )) {
Log GetLogLevel($name,1), "Error: KS300/2 Cannot decode $msg (sanitycheck). Malformed";
return "";
}
my $c = $hash->{corr4} ? $hash->{corr4} : 255; my $c = $hash->{corr4} ? $hash->{corr4} : 255;
$rain = sprintf("%0.1f", hex("$a[14]$a[11]$a[12]") * $c / 1000); $rain = sprintf("%0.1f", hex("$a[14]$a[11]$a[12]") * $c / 1000);