From ee585977d88feb9accaadaccb7979ee899bc7ba1 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Thu, 11 Feb 2016 06:26:06 +0000
Subject: [PATCH] FHEM/14_CUL_WS.pm: Some more safety checks for the S300TH

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@10794 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/14_CUL_WS.pm | 20 +++++++++++---------
 1 file changed, 11 insertions(+), 9 deletions(-)

diff --git a/fhem/FHEM/14_CUL_WS.pm b/fhem/FHEM/14_CUL_WS.pm
index 048049525..8e1bcc357 100755
--- a/fhem/FHEM/14_CUL_WS.pm
+++ b/fhem/FHEM/14_CUL_WS.pm
@@ -269,15 +269,17 @@ CUL_WS_Parse($$)
       $NotifyIsRaining=$ir;
 
    } elsif(int(@a) > 8) {                       # WS7000 Temp/Hum sensors
-      $sgn = ($firstbyte&8) ? -1 : 1;
-      $tmp = $sgn * ($a[6].$a[3].".".$a[4]) + $hash->{corr1};
-      $hum = ($a[7].$a[8].".".$a[5]) + $hash->{corr2};
-      $val = "T: $tmp  H: $hum";
-      $devtype = "TH".$sfirstbyte;
-      $family = "WS7000";
-      $NotifyType="T H";
-      $NotifyTemperature=$tmp;
-      $NotifyHumidity=$hum;
+      if(join("", @a[3..8]) =~ m/^\d*$/) {      # Forum 49125
+        $sgn = ($firstbyte&8) ? -1 : 1;
+        $tmp = $sgn * ($a[6].$a[3].".".$a[4]) + $hash->{corr1};
+        $hum = ($a[7].$a[8].".".$a[5]) + $hash->{corr2};
+        $val = "T: $tmp  H: $hum";
+        $devtype = "TH".$sfirstbyte;
+        $family = "WS7000";
+        $NotifyType="T H";
+        $NotifyTemperature=$tmp;
+        $NotifyHumidity=$hum;
+      }
     }
 
   }