FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-22 08:11:44 +00:00
Code Issues Releases Wiki Activity

NaN values and prevent too much logs

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@3038 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
bentele 2013-04-05 20:58:33 +00:00
parent fd7f0f5f8d
commit 416ea638f5
1 changed files with 13 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
fhem/FHEM/70_SML.pm
View File

@ -95,7 +95,7 @@ energy_Define($$)
$hash->{Interval} = int(@args) >= 5 ? int($args[4]) : 300; $hash->{Interval} = int(@args) >= 5 ? int($args[4]) : 300;
$hash->{Timeout} = int(@args) >= 6 ? int($args[5]) : 4; $hash->{Timeout} = int(@args) >= 6 ? int($args[5]) : 4;
Log 3, "$hash->{NAME} will read from SML at $hash->{Host}:$hash->{Port} " ; Log 4, "$hash->{NAME} will read from SML at $hash->{Host}:$hash->{Port} " ;
$hash->{Invalid} = -1; # default value for invalid readings $hash->{Invalid} = -1; # default value for invalid readings
$hash->{Rereads} = 2; # number of retries when reading curPwr of 0 $hash->{Rereads} = 2; # number of retries when reading curPwr of 0
$hash->{UseSVTime} = ''; # use the SV time as timestamp (else: TimeNow()) $hash->{UseSVTime} = ''; # use the SV time as timestamp (else: TimeNow())
@ -176,15 +176,18 @@ if (defined ($socket) and $socket and $socket->connected())
@array = split(/\n/,$message); @array = split(/\n/,$message);
foreach (@array){ foreach (@array){
if ( $_ =~ /<v>(.*)<\/v>/ ) if ( $_ =~ /<v>(.*)<\/v>/ ){
{
Log 5, "$hash->{NAME} got fresh values from $ip ($1)"; Log 5, "$hash->{NAME} got fresh values from $ip ($1)";
if ( $1 eq "NaN" ){
Log 5, "$hash->{NAME} NaN fehler ($1) summary: $summary";
}else{
$last = $1; $last = $1;
$counts++ ; $counts++ ;
$summary += $1; $summary += $1;
if ($last < $min) {$min = $last}; if ($last < $min) {$min = $last};
if ($last > $max) {$max = $last}; if ($last > $max) {$max = $last};
} }
}
if ( $_ =~ /<error>(.*)<\/error>/ ) if ( $_ =~ /<error>(.*)<\/error>/ )
{ {
if ( $1 eq "true" ) if ( $1 eq "true" )
@ -290,7 +293,7 @@ if ( $success == 0 and $summary > 0 and $counts > 0)
} }
push @{$hash->{CHANGED}}, $log; push @{$hash->{CHANGED}}, $log;
DoTrigger($hash->{NAME}, undef) if ($init_done); DoTrigger($hash->{NAME}, undef) if ($init_done);
Log 3, "$hash->{NAME} write log file: $log"; Log 4, "$hash->{NAME} write log file: $log";
}else{ }else{
Log 3, "$hash->{NAME} can't update - device send a error"; Log 3, "$hash->{NAME} can't update - device send a error";
} }