Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-07 22:29:19 +00:00
Code

98_DOIF.pm: Regex for readings in aggregate function

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@15917 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
Damian 2018-01-17 20:22:17 +00:00
parent 826071c9a6
commit 9b62cf5f3f
1 changed files with 82 additions and 66 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
FHEM/98_DOIF.pm
View File

@ -725,6 +725,7 @@ sub AggrIntDoIf
my $format; my $format;
my $place; my $place;
my $number; my $number;
my $readingRegex;
if ($modeType =~ /.(sum|average|max|min)?[:]?(?:(a|d)?(\d)?)?/) { if ($modeType =~ /.(sum|average|max|min)?[:]?(?:(a|d)?(\d)?)?/) {
$type = (defined $1)? $1 : ""; $type = (defined $1)? $1 : "";
@ -739,8 +740,16 @@ sub AggrIntDoIf
$default=EvalValueDoIf($hash,"default",$default); $default=EvalValueDoIf($hash,"default",$default);
} }
} }
if (defined $reading) {
if ($reading =~ /^"(.*)"$/) {
$readingRegex = $1;
}
}
foreach my $name (($device eq "") ? keys %defs:grep {/$device/} keys %defs) { foreach my $name (($device eq "") ? keys %defs:grep {/$device/} keys %defs) {
next if($attr{$name} && $attr{$name}{ignore}); next if($attr{$name} && $attr{$name}{ignore});
foreach my $reading ((defined $readingRegex) ? grep {/$readingRegex/} keys %{$defs{$name}{READINGS}} : $reading) {
$value=""; $value="";
$number=""; $number="";
if ($reading) { if ($reading) {
@ -810,6 +819,7 @@ sub AggrIntDoIf
} }
} }
} }
}
delete ($defs{$hash->{NAME}}{READINGS}{warning_aggr}) if (defined $hash and $warning==0); delete ($defs{$hash->{NAME}}{READINGS}{warning_aggr}) if (defined $hash and $warning==0);
@ -3492,7 +3502,7 @@ Die Angabe des Readings kann weggelassen werden, dann wird lediglich nach entspr
<br> <br>
Syntax:<br> Syntax:<br>
<br> <br>
<code>[&lt;function&gt;:&lt;format&gt;:"&lt;regex device&gt;:&lt;regex event&gt;":&lt;reading&gt;:&lt;condition&gt;,&lt;default&gt;]</code><br> <code>[&lt;function&gt;:&lt;format&gt;:"&lt;regex device&gt;:&lt;regex event&gt;":&lt;reading&gt;|"&lt;regex reading&gt;":&lt;condition&gt;,&lt;default&gt;]</code><br>
<br> <br>
&lt;function&gt;:<br> &lt;function&gt;:<br>
<br> <br>
@ -3512,6 +3522,8 @@ Die Angabe &lt;regex Event&gt; ist im Ausführungsteil nicht sinnvoll und sollte
<br> <br>
&lt;reading&gt; Reading, welches überprüft werden soll<br> &lt;reading&gt; Reading, welches überprüft werden soll<br>
<br> <br>
"&lt;regex reading&gt"; Regex für Readings, die überprüft werden sollen<br>
<br>
&lt;condition&gt; Aggregations-Bedingung, $_ ist der Platzhalter für den aktuellen Wert des internen Schleifendurchlaufs, Angaben in Anführungszeichen der Art "&lt;value&gt;" entsprechen $_ =~ "&lt;value&gt;" , hier sind alle Perloperatoren möglich.<br> &lt;condition&gt; Aggregations-Bedingung, $_ ist der Platzhalter für den aktuellen Wert des internen Schleifendurchlaufs, Angaben in Anführungszeichen der Art "&lt;value&gt;" entsprechen $_ =~ "&lt;value&gt;" , hier sind alle Perloperatoren möglich.<br>
<br> <br>
&lt;default&gt; Default-Wert, falls kein Device gefunden wird, entspricht der Syntax des Default-Wertes bei Readingangaben<br> &lt;default&gt; Default-Wert, falls kein Device gefunden wird, entspricht der Syntax des Default-Wertes bei Readingangaben<br>
@ -3524,10 +3536,6 @@ Anzahl der Devices, die mit "window" beginnen:<br>
<br> <br>
<code>[#"^window"]</code><br> <code>[#"^window"]</code><br>
<br> <br>
Liste der Devices, die mit "window" beginnen:<br>
<br>
<code>[@"^window"]</code><br>
<br>
Liste der Devices, die mit "window" beginnen, es werden Aliasnamen ausgegeben, falls definiert:<br> Liste der Devices, die mit "window" beginnen, es werden Aliasnamen ausgegeben, falls definiert:<br>
<br> <br>
<code>[@:a"^window"]</code><br> <code>[@:a"^window"]</code><br>
@ -3544,6 +3552,14 @@ entspricht:<br>
<br> <br>
<code>[@"^window":state:$_ =~ "open"]</code> siehe Aggregationsbedingung.<br> <code>[@"^window":state:$_ =~ "open"]</code> siehe Aggregationsbedingung.<br>
<br> <br>
Kleinster Wert der Readings des Devices "abfall", in deren Namen "Gruenschnitt" vorkommt und die mit "_days" enden:<br>
<br>
<code>[#min:"^abfall$":"Gruenschnitt.*_days$"]</code><br>
<br>
Durchschnitt von Readings aller Devices, die mit "T_" beginnen, in deren Reading-Namen "temp" vorkommt:<br>
<br>
<code>[#average:"^T_":"temp"]</code><br>
<br>
In der Aggregationsbedingung <condition> können alle in FHEM definierten Perlfunktionen genutzt werden. Folgende Variablen sind vorbelegt und können ebenfalls benutzt werden:<br> In der Aggregationsbedingung <condition> können alle in FHEM definierten Perlfunktionen genutzt werden. Folgende Variablen sind vorbelegt und können ebenfalls benutzt werden:<br>
<br> <br>
<b>$_</b> Inhalt des angegebenen Readings (s.o.)<br> <b>$_</b> Inhalt des angegebenen Readings (s.o.)<br>