mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-03-13 17:26:34 +00:00
98_readingsWatcher: add first version
git-svn-id: https://svn.fhem.de/fhem/trunk@20104 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
8870d4fda9
commit
75386cb65a
635
fhem/FHEM/98_readingsWatcher.pm
Normal file
635
fhem/FHEM/98_readingsWatcher.pm
Normal file
@ -0,0 +1,635 @@
|
|||||||
|
################################################################
|
||||||
|
#
|
||||||
|
# $Id$
|
||||||
|
#
|
||||||
|
# (c) 2015,2016 Copyright: HCS,Wzut
|
||||||
|
# All rights reserved
|
||||||
|
#
|
||||||
|
# FHEM Forum : https://forum.fhem.de/index.php/topic,49408.0.html
|
||||||
|
#
|
||||||
|
# This code is free software; you can redistribute it and/or modify
|
||||||
|
# it under the terms of the GNU General Public License as published by
|
||||||
|
# the Free Software Foundation; either version 2 of the License, or
|
||||||
|
# (at your option) any later version.
|
||||||
|
# The GNU General Public License can be found at
|
||||||
|
# http://www.gnu.org/copyleft/gpl.html.
|
||||||
|
# A copy is found in the textfile GPL.txt and important notices to the license
|
||||||
|
# from the author is found in LICENSE.txt distributed with these scripts.
|
||||||
|
# This script is distributed in the hope that it will be useful,
|
||||||
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
|
# GNU General Public License for more details.
|
||||||
|
################################################################
|
||||||
|
|
||||||
|
|
||||||
|
package main;
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
eval "use FHEM::Meta;1";
|
||||||
|
|
||||||
|
#####################################################################################
|
||||||
|
|
||||||
|
sub readingsWatcher_Initialize($)
|
||||||
|
{
|
||||||
|
my ($hash) = @_;
|
||||||
|
$hash->{GetFn} = "FHEM::readingsWatcher::Get";
|
||||||
|
$hash->{SetFn} = "FHEM::readingsWatcher::Set";
|
||||||
|
$hash->{DefFn} = "FHEM::readingsWatcher::Define";
|
||||||
|
$hash->{UndefFn} = "FHEM::readingsWatcher::Undefine";
|
||||||
|
$hash->{AttrFn} = "FHEM::readingsWatcher::Attr";
|
||||||
|
$hash->{AttrList} = "disable:0,1 interval deleteUnusedReadings:1,0 readingActivity ".$readingFnAttributes;
|
||||||
|
|
||||||
|
eval { FHEM::Meta::InitMod( __FILE__, $hash ) }; # für Meta.pm (https://forum.fhem.de/index.php/topic,97589.0.html)
|
||||||
|
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
###############################################################
|
||||||
|
# Begin Package
|
||||||
|
###############################################################
|
||||||
|
package FHEM::readingsWatcher;
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
use GPUtils qw(:all); # wird für den Import der FHEM Funktionen aus der fhem.pl benötigt
|
||||||
|
use POSIX;
|
||||||
|
use Time::HiRes qw(gettimeofday);
|
||||||
|
|
||||||
|
eval "use FHEM::Meta;1" or my $modMetaAbsent = 1;
|
||||||
|
|
||||||
|
# Run before module compilation
|
||||||
|
BEGIN {
|
||||||
|
# Import from main::
|
||||||
|
GP_Import(
|
||||||
|
qw(
|
||||||
|
attr
|
||||||
|
AttrVal
|
||||||
|
AttrNum
|
||||||
|
CommandAttr
|
||||||
|
addToAttrList
|
||||||
|
delFromAttrList
|
||||||
|
delFromDevAttrList
|
||||||
|
defs
|
||||||
|
devspec2array
|
||||||
|
init_done
|
||||||
|
InternalTimer
|
||||||
|
RemoveInternalTimer
|
||||||
|
IsDisabled
|
||||||
|
IsIgnored
|
||||||
|
Log3
|
||||||
|
modules
|
||||||
|
readingsSingleUpdate
|
||||||
|
readingsBulkUpdate
|
||||||
|
readingsBeginUpdate
|
||||||
|
readingsDelete
|
||||||
|
readingsEndUpdate
|
||||||
|
ReadingsNum
|
||||||
|
ReadingsAge
|
||||||
|
ReadingsTimestamp
|
||||||
|
ReadingsVal
|
||||||
|
setReadingsVal
|
||||||
|
CommandSetReading
|
||||||
|
gettimeofday
|
||||||
|
TimeNow
|
||||||
|
)
|
||||||
|
);
|
||||||
|
}
|
||||||
|
|
||||||
|
# Versions History intern
|
||||||
|
our %vNotesIntern =
|
||||||
|
(
|
||||||
|
"1.6.0" => "27.08.19 package, Meta",
|
||||||
|
"1.5.0" => "18.02.19",
|
||||||
|
"1.3.0" => "26.01.18 use ReadingsAge",
|
||||||
|
"1.2.0" => "15.02.16 add Set, Get",
|
||||||
|
"1.1.0" => "14.02.16",
|
||||||
|
"1.0.0" => "(c) HCS, first version"
|
||||||
|
);
|
||||||
|
|
||||||
|
our %gets = ("devices:noArg" => "");
|
||||||
|
our %sets = ("checkNow:noArg" => "","inactive:noArg"=>"", "active:noArg"=>"" , "clearReadings:noArg"=>"");
|
||||||
|
|
||||||
|
#####################################################################################
|
||||||
|
|
||||||
|
sub Define($$)
|
||||||
|
{
|
||||||
|
my ($hash,$def) = @_;
|
||||||
|
my ($name, $type, $noglobal) = split("[ \t\n]+", $def, 3);
|
||||||
|
|
||||||
|
if(exists($modules{readingsWatcher}{defptr}))
|
||||||
|
{
|
||||||
|
my $txt = 'one readingsWatcher device is already defined !';
|
||||||
|
Log3 $name, 1, $txt;
|
||||||
|
return $txt;
|
||||||
|
}
|
||||||
|
|
||||||
|
$modules{readingsWatcher}{defptr} = $hash;
|
||||||
|
|
||||||
|
if (defined($noglobal) && ($noglobal eq 'noglobal'))
|
||||||
|
{ $hash->{DEF} = 'noglobal'; }
|
||||||
|
else { addToAttrList('readingsWatcher'); $hash->{DEF} = 'global';} # global -> userattr
|
||||||
|
|
||||||
|
CommandAttr(undef,$name.' interval 60') unless (exists($attr{$name}{interval}));
|
||||||
|
CommandAttr(undef,$name.' readingActivity none') unless (exists($attr{$name}{readingActivity}));
|
||||||
|
|
||||||
|
RemoveInternalTimer($hash);
|
||||||
|
InternalTimer(gettimeofday()+5, "FHEM::readingsWatcher::OnTimer", $hash, 0);
|
||||||
|
return $@ unless ( FHEM::Meta::SetInternals($hash) ) if(!$modMetaAbsent);
|
||||||
|
return undef;
|
||||||
|
}
|
||||||
|
|
||||||
|
#####################################################################################
|
||||||
|
|
||||||
|
sub Undefine($$)
|
||||||
|
{
|
||||||
|
my ($hash, $arg) = @_;
|
||||||
|
RemoveInternalTimer($hash);
|
||||||
|
delete($modules{readingsWatcher}{defptr});
|
||||||
|
if ($hash->{DEF} eq 'global')
|
||||||
|
{
|
||||||
|
delFromAttrList('readingsWatcher'); # global -> userattr
|
||||||
|
my @devs = devspec2array("readingsWatcher!="); # wer hat alles ein Attribut readingsWatcher ?
|
||||||
|
foreach (@devs)
|
||||||
|
{ delFromDevAttrList($_, 'readingsWatcher'); } # aufräumen
|
||||||
|
}
|
||||||
|
return undef;
|
||||||
|
}
|
||||||
|
|
||||||
|
#####################################################################################
|
||||||
|
|
||||||
|
sub Set($@)
|
||||||
|
{
|
||||||
|
my ($hash, @a)= @_;
|
||||||
|
my $name= $hash->{NAME};
|
||||||
|
|
||||||
|
return join(' ', sort keys %sets) if((@a < 2) || ($a[1] eq '?'));
|
||||||
|
readingsSingleUpdate($hash, 'state', 'inactive', 1) if ($a[1] eq 'inactive');
|
||||||
|
readingsSingleUpdate($hash, 'state', 'active', 1) if ($a[1] eq 'active');
|
||||||
|
return undef if(IsDisabled($name));
|
||||||
|
|
||||||
|
OnTimer($hash) if ($a[1] eq 'checkNow') || ($a[1] eq 'active');
|
||||||
|
|
||||||
|
if ($a[1] eq 'clearReadings')
|
||||||
|
{
|
||||||
|
foreach (keys %{$defs{$name}{READINGS}}) # alle eignen Readings
|
||||||
|
{
|
||||||
|
if ($_ =~ /_/) # device.reading
|
||||||
|
{
|
||||||
|
readingsDelete($hash, $_);
|
||||||
|
Log3 $name,4,$name.", delete reading ".$_;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return undef;
|
||||||
|
}
|
||||||
|
|
||||||
|
#####################################################################################
|
||||||
|
|
||||||
|
sub Get($@)
|
||||||
|
{
|
||||||
|
my ($hash, @a)= @_;
|
||||||
|
my ($ret, @parts, $deviceName, $rSA, $d, $curVal, $age, $st);
|
||||||
|
my @devs;
|
||||||
|
|
||||||
|
return join(' ', sort keys %gets) if(@a < 2);
|
||||||
|
|
||||||
|
if ($a[1] eq 'devices')
|
||||||
|
{
|
||||||
|
@devs = devspec2array("readingsWatcher!="); # wer hat alles ein Attribut readingsWatcher ?
|
||||||
|
|
||||||
|
foreach $deviceName (@devs)
|
||||||
|
{
|
||||||
|
$st = '';
|
||||||
|
$rSA = ($deviceName eq $a[0]) ? '' : AttrVal($deviceName, 'readingsWatcher', '');
|
||||||
|
|
||||||
|
if ($rSA)
|
||||||
|
{
|
||||||
|
if (IsDisabled($deviceName) || IsIgnored($deviceName)) { $st = '(disable)'; }
|
||||||
|
else
|
||||||
|
{
|
||||||
|
($rSA,undef) = split(';', $rSA);
|
||||||
|
@parts = split(',', $rSA);
|
||||||
|
if (@parts > 2)
|
||||||
|
{
|
||||||
|
my $timeout = $parts[0];
|
||||||
|
shift @parts;
|
||||||
|
shift @parts;
|
||||||
|
foreach (@parts) # alle zu überwachenden Readings
|
||||||
|
{
|
||||||
|
$_ =~ s/^\s+|\s+$//g;
|
||||||
|
$_ = 'state' if ($_ eq 'STATE');
|
||||||
|
|
||||||
|
$age = ReadingsAge($deviceName, $_, undef);
|
||||||
|
|
||||||
|
if (!defined($age))
|
||||||
|
{
|
||||||
|
$ret .= $deviceName.':'.$_ ." (no Timestamp)\n";
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
my $s = ($age>$timeout) ? 'timeout ('.$timeout.')' : 'ok ('.$timeout.')';
|
||||||
|
$ret .= $deviceName.':'.$_." $s -> $age sec\n";
|
||||||
|
}
|
||||||
|
}
|
||||||
|
} else { $st= '(wrong parameters)'; } # @parts >2
|
||||||
|
} # disabled
|
||||||
|
} # rSA
|
||||||
|
} # foreach
|
||||||
|
|
||||||
|
if ($ret)
|
||||||
|
{
|
||||||
|
my $head = 'Devices';
|
||||||
|
my $width = 10;
|
||||||
|
my @arr = split('\n',$ret.$st);
|
||||||
|
foreach(@arr) { $width = length($_) if(length($_) > $width); }
|
||||||
|
return $head."\n".('-' x $width)."\n".$ret.$st;
|
||||||
|
}
|
||||||
|
return 'Sorry, no devices with valid attribute readingsWatcher found !';
|
||||||
|
} # get devices
|
||||||
|
return $hash->{NAME}.' get with unknown argument '.$a[1].', choose one of ' . join(' ', sort keys %gets);
|
||||||
|
}
|
||||||
|
|
||||||
|
#####################################################################################
|
||||||
|
|
||||||
|
sub OnTimer($)
|
||||||
|
{
|
||||||
|
my ($hash) = @_;
|
||||||
|
my $name = $hash->{NAME};
|
||||||
|
my $interval = AttrNum($name, 'interval', 0);
|
||||||
|
$hash->{INTERVAL} = $interval;
|
||||||
|
RemoveInternalTimer($hash);
|
||||||
|
|
||||||
|
return if (!$interval);
|
||||||
|
|
||||||
|
InternalTimer(gettimeofday()+$interval, 'FHEM::readingsWatcher::OnTimer', $hash, 0);
|
||||||
|
|
||||||
|
readingsSingleUpdate($hash, 'state', 'disabled', 0) if (IsDisabled($name));
|
||||||
|
return if(IsDisabled($name) || !$init_done);
|
||||||
|
|
||||||
|
my ($timeOutState, $errorValue, $timeout, $associated, $error, $readingsList);
|
||||||
|
my ($deviceName, $rSA, $age, @devices, $rts, @parts, @devs);
|
||||||
|
my ($alives, $deads, $state, $readings) = (0, 0, '', 0);
|
||||||
|
my @timeOutdevs = ();
|
||||||
|
|
||||||
|
foreach (keys %{$defs{$name}{READINGS}}) # alle eignen Readings
|
||||||
|
{ $readingsList .= $_ .',' if ($_ =~ /_/); }# nur die mit _ im Namen
|
||||||
|
|
||||||
|
@devs = devspec2array("readingsWatcher!=");
|
||||||
|
|
||||||
|
my ($areading,$dead,$alive) = split(":",AttrVal($name,'readingActivity','none:dead:alive'));
|
||||||
|
$dead = 'dead' if(!$dead);
|
||||||
|
$alive= 'aöive' if(!$alive);
|
||||||
|
$areading = '' if ($areading eq 'none');
|
||||||
|
|
||||||
|
readingsBeginUpdate($hash);
|
||||||
|
|
||||||
|
foreach $deviceName (@devs)
|
||||||
|
{
|
||||||
|
|
||||||
|
$rSA = ($deviceName eq $name) ? '' : AttrVal($deviceName, 'readingsWatcher', undef);
|
||||||
|
|
||||||
|
if(defined($rSA) && !IsDisabled($deviceName) && !IsIgnored($deviceName))
|
||||||
|
{
|
||||||
|
push @devices, $deviceName if !grep {/$deviceName/} @devices; # keine doppelten Namen
|
||||||
|
|
||||||
|
# rSA: timeout, errorValue, reading1, reading2, reading3, ...
|
||||||
|
# 120,---,temperature,humidity,battery
|
||||||
|
# or 900,,current,eState / no errorValue = do not change reading
|
||||||
|
|
||||||
|
|
||||||
|
#($rSA,$areading) = split(';', $rSA);
|
||||||
|
#($areading,$alive,$dead) = split(':', $areading) if ($areading);
|
||||||
|
|
||||||
|
@parts = split(',', $rSA);
|
||||||
|
if (@parts > 2)
|
||||||
|
{
|
||||||
|
$timeout = int($parts[0]);
|
||||||
|
$errorValue = $parts[1]; # = leer, Readings des Device nicht anfassen !
|
||||||
|
|
||||||
|
# die ersten beiden brauchen wir nicht mehr
|
||||||
|
shift @parts;
|
||||||
|
shift @parts;
|
||||||
|
|
||||||
|
foreach (@parts) # alle zu überwachenden Readings
|
||||||
|
{
|
||||||
|
$_ =~ s/^\s+|\s+$//g; # $_ = Reading Name
|
||||||
|
|
||||||
|
$state = 0;
|
||||||
|
if ($_ eq 'STATE')
|
||||||
|
{
|
||||||
|
$_ = 'state'; $state = 1; # Sonderfall STATE
|
||||||
|
}
|
||||||
|
|
||||||
|
$age = ReadingsAge($deviceName, $_, undef);
|
||||||
|
|
||||||
|
if (defined($age))
|
||||||
|
{
|
||||||
|
$readings++;
|
||||||
|
|
||||||
|
if (($age > $timeout) && ($timeout>0))
|
||||||
|
{
|
||||||
|
push @timeOutdevs, $deviceName if !grep {/$deviceName/} @timeOutdevs;
|
||||||
|
$timeOutState = "timeout";
|
||||||
|
$deads++;
|
||||||
|
$rts = ReadingsTimestamp($deviceName, $_,0);
|
||||||
|
setReadingsVal($defs{$deviceName},$_,$errorValue,$rts) if ($errorValue && $rts); # leise setzen ohne Event
|
||||||
|
$error = CommandSetReading(undef, "$deviceName $areading $dead") if ($areading); # und das mit Event
|
||||||
|
$defs{$deviceName}->{STATE} = $errorValue if ($errorValue && $state);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
$alives++;
|
||||||
|
$timeOutState = "ok";
|
||||||
|
$error = CommandSetReading(undef, "$deviceName $areading $alive") if ($areading);
|
||||||
|
}
|
||||||
|
|
||||||
|
Log3 $name,2,$name.', '.$error if ($error);
|
||||||
|
|
||||||
|
my $r = $deviceName.'_'.$_;
|
||||||
|
|
||||||
|
readingsBulkUpdate($hash, $r, $timeOutState) if ($timeout>0);
|
||||||
|
$readingsList =~ s/$r,// if ($readingsList) ; # das Reading aus der Liste streichen, leer solange noch kein Device das Attr hat !
|
||||||
|
|
||||||
|
if ($timeout < 1)
|
||||||
|
{
|
||||||
|
$alives--;
|
||||||
|
$error = 'Invalid timeout value '.$timeout.' for reading '.$deviceName.'.'.$_;
|
||||||
|
Log3 $name,2,$name.', '.$error;
|
||||||
|
}
|
||||||
|
}#age
|
||||||
|
else
|
||||||
|
{
|
||||||
|
$error = 'Timestamp for '.$_.' not found on device '.$deviceName;
|
||||||
|
Log3 $name,3,$name.', reading '.$error;
|
||||||
|
readingsBulkUpdate($hash, $deviceName.'_'.$_, 'no Timestamp');
|
||||||
|
}
|
||||||
|
}# foreach @parts
|
||||||
|
}# parts > 2
|
||||||
|
else
|
||||||
|
{
|
||||||
|
$error = 'insufficient parameters for device '.$deviceName;
|
||||||
|
Log3 $name,2,$name.', '.$error.' - skipped !';
|
||||||
|
}
|
||||||
|
}# if $readingsWatcherAttribute
|
||||||
|
}# foreach $deviceName
|
||||||
|
|
||||||
|
readingsBulkUpdate($hash,'readings' , $readings);
|
||||||
|
readingsBulkUpdate($hash,'devices' , int(@devices));
|
||||||
|
readingsBulkUpdate($hash,'alive' , $alives);
|
||||||
|
readingsBulkUpdate($hash,'timeouts' , $deads);
|
||||||
|
readingsBulkUpdate($hash,'state' , ($deads) ? 'timeout' : 'ok');
|
||||||
|
|
||||||
|
# nicht aktualisierte Readings markieren oder löschen
|
||||||
|
if ($readingsList)
|
||||||
|
{
|
||||||
|
my @a = split(",",$readingsList);
|
||||||
|
foreach (@a)
|
||||||
|
{
|
||||||
|
if ($_)
|
||||||
|
{
|
||||||
|
if (AttrNum($name,'deleteUnusedReadings','1'))
|
||||||
|
{
|
||||||
|
readingsDelete($hash, $_);
|
||||||
|
Log3 $name,3,$name.', delete unused reading '.$_;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
readingsBulkUpdate($hash, $_ , 'unused');
|
||||||
|
Log3 $name,4,$name.', unused reading '.$_;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if (int(@devices))
|
||||||
|
{ readingsBulkUpdate($hash,'.associatedWith' , join(',',@devices)); }
|
||||||
|
else
|
||||||
|
{ readingsDelete($hash, '.associatedWith'); }
|
||||||
|
|
||||||
|
if (int(@timeOutdevs))
|
||||||
|
{ readingsBulkUpdate($hash,'timeoutdevs',join(',',@timeOutdevs));}
|
||||||
|
else
|
||||||
|
{ readingsBulkUpdate($hash,'timeoutdevs','none');}
|
||||||
|
|
||||||
|
readingsEndUpdate($hash, 1);
|
||||||
|
|
||||||
|
return undef;
|
||||||
|
}
|
||||||
|
|
||||||
|
sub Attr (@)
|
||||||
|
{
|
||||||
|
|
||||||
|
my ($cmd, $name, $attrName, $attrVal) = @_;
|
||||||
|
my $hash = $defs{$name};
|
||||||
|
my $error;
|
||||||
|
|
||||||
|
if ($cmd eq "set")
|
||||||
|
{
|
||||||
|
if ($attrName eq "disable")
|
||||||
|
{
|
||||||
|
readingsSingleUpdate($hash,"state","disabled",1) if ($attrVal == 1);
|
||||||
|
OnTimer($hash) if ($attrVal == 0);
|
||||||
|
$_[3] = $attrVal;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
elsif ($cmd eq "del")
|
||||||
|
{
|
||||||
|
if ($attrName eq "disable")
|
||||||
|
{
|
||||||
|
OnTimer($hash);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return undef;
|
||||||
|
}
|
||||||
|
#####################################################################################
|
||||||
|
1;
|
||||||
|
|
||||||
|
=pod
|
||||||
|
=item helper
|
||||||
|
=item summary cyclical watching of readings updates
|
||||||
|
=item summary_DE zyklische Überwachung von Readings auf Aktualisierung
|
||||||
|
=begin html
|
||||||
|
|
||||||
|
<a name="readingsWatcher"></a>
|
||||||
|
<h3>readingsWatcher</h3>
|
||||||
|
<ul>
|
||||||
|
The module monitors readings in other modules that its readings or their times change at certain intervals and<br>
|
||||||
|
if necessary, triggers events that can be processed further with other modules (for example, notify, DOIF).<br>
|
||||||
|
Forum : <a href="https://forum.fhem.de/index.php/topic,49408.0.html">https://forum.fhem.de/index.php/topic,49408.0.html</a><br><br>
|
||||||
|
|
||||||
|
<a name="readingsWatcher_Define"></a>
|
||||||
|
<b>Define</b>
|
||||||
|
<ul>
|
||||||
|
<code>define <name> readingsWatcher</code><br>
|
||||||
|
<br>
|
||||||
|
Defines a readingsWatcher device.<br><br>
|
||||||
|
Afterwards each FHEM device has the new global attribute readingsWatcher<br>
|
||||||
|
This attribute must be assigned at all monitored devices as follows:<br>
|
||||||
|
Timeout in seconds, new Reading value, Reading1 of the device, Reading2, etc.<br><br>
|
||||||
|
|
||||||
|
Example: A radio thermometer sends its values at regular intervals (eg.5 seconds)<br>
|
||||||
|
If these remain off for a time X, the module can overwrite these invalid values with any other new value (Ex. ???)<br>
|
||||||
|
The readingsWatcher attribute could be set here as follows:<br><br>
|
||||||
|
<code>attr myThermo readingsWatcher 300, ???, temperature</code><br><br>
|
||||||
|
or if more than one reading should be monitored<br><br>
|
||||||
|
<code>attr myThermo readingsWatcher 300, ???, temperature, humidity</code><br><br>
|
||||||
|
If readings are only to be monitored for their update and should <b>not</b> be overwritten<br>
|
||||||
|
so the replacement string must be <b>empty</b><br><br>
|
||||||
|
Example : <code>attr myThermo readingsWatcher 300,,temperature,humidity</code><br><br>
|
||||||
|
</ul>
|
||||||
|
|
||||||
|
<a name="readingsWatcherSet"></a>
|
||||||
|
<b>Set</b>
|
||||||
|
<ul>
|
||||||
|
<li>active</li>
|
||||||
|
<li>inactive</li>
|
||||||
|
<li>checkNow</li>
|
||||||
|
<li>clearReadings</li>
|
||||||
|
</ul>
|
||||||
|
|
||||||
|
<a name="readingsWatcherGet"></a>
|
||||||
|
<b>Get</b>
|
||||||
|
<ul>
|
||||||
|
devices
|
||||||
|
</ul>
|
||||||
|
|
||||||
|
<a name="readingsWatcherAttr"></a>
|
||||||
|
<b>Attribute</b>
|
||||||
|
<ul>
|
||||||
|
<br>
|
||||||
|
<ul>
|
||||||
|
<a name="disable"></a><li><b>disable</b><br>deactivate/activate the device</li><br>
|
||||||
|
<a name="interval"></a><li><b>interval <seconds></b><br>Time interval for continuous check (default 60)</li><br>
|
||||||
|
<a name="deleteUnusedReadings"></a><li><b>deleteUnusedReadings</b><br>delete unused readings (default 1)</li><br>
|
||||||
|
<a name="readingActifity"></a><li><b>readingActifity</b> (default none)<br>
|
||||||
|
Similar to the HomeMatic ActionDetector, the module can set its own reading in the monitored device and save the monitoring status.<br>
|
||||||
|
<code>attr <name> readingActifity actifity</code><br>
|
||||||
|
Creates the additional reading actifity in the monitored devices and supplies it with the status dead or alive<br>
|
||||||
|
<code>attr <name> readingActifity activ:0:1</code><br>
|
||||||
|
Creates the additional reading activ in the monitored devices and supplies it with the status 0 or 1
|
||||||
|
</li><br>
|
||||||
|
</ul>
|
||||||
|
</ul>
|
||||||
|
<br>
|
||||||
|
</ul>
|
||||||
|
|
||||||
|
=end html
|
||||||
|
|
||||||
|
=begin html_DE
|
||||||
|
|
||||||
|
<a name="readingsWatcher"></a>
|
||||||
|
<h3>readingsWatcher</h3>
|
||||||
|
<ul>
|
||||||
|
Das Modul überwacht Readings in anderen Modulen darauf das sich dessen Readings bzw. deren Zeiten in bestimmten Abständen
|
||||||
|
ändern<br> und löst ggf. Events aus die mit anderen Modulen (z.B. notify,DOIF) weiter verarbeitet werden können.<br>
|
||||||
|
Forum : <a href="https://forum.fhem.de/index.php/topic,49408.0.html">https://forum.fhem.de/index.php/topic,49408.0.html</a><br><br>
|
||||||
|
|
||||||
|
<a name="readingsWatcher_Define"></a>
|
||||||
|
<b>Define</b>
|
||||||
|
<ul>
|
||||||
|
<code>define <name> readingsWatcher</code><br>
|
||||||
|
<br>
|
||||||
|
Definiert ein readingsWatcher Device.<br><br>
|
||||||
|
Danach besitzt jedes FHEM Device das neue globale Attribut readingsWatcher<br>
|
||||||
|
Dieses Attribut ist bei allen zu überwachenden Geräten wie folgt zu belegen :<br>
|
||||||
|
<code>attr mydevice timeout,[Ersatz],Readings1,[Readings2][;Activity:]</code>
|
||||||
|
Timeout in Sekunden, neuer Reading Wert, Reading1 des Devices, Reading2, usw.<br><br>
|
||||||
|
Beispiel : Ein Funk Thermometer sendet in regelmäßigen Abständen ( z.b.5 Sekunden ) seine Werte.<br>
|
||||||
|
Bleiben diese nun für eine bestimmte Zeit aus, so kann das Modul diesen nun nicht mehr aktuellen Werte (oder Werte)<br>
|
||||||
|
mit einem beliebigen anderen Wert überschreiben ( z.B. ??? )<br>
|
||||||
|
Das Attribut readingsWatcher könnte hier wie folgt gesetzt werden :<br><br>
|
||||||
|
<code>attr AussenTemp readingsWatcher 300,???,temperature</code><br><br>
|
||||||
|
oder falls mehr als ein Reading überwacht werden soll<br><br>
|
||||||
|
<code>attr AussenTemp readingsWatcher 300,???,temperature,humidity</code><br><br>
|
||||||
|
Sollen Readings nur auf ihre Aktualiesierung überwacht, deren Wert aber <b>nicht</b> überschrieben werden,<br>
|
||||||
|
so muß der Ersatzsstring <b>leer</b> gelassen werden :<br>
|
||||||
|
Bsp : <code>attr AussenTemp readingsWatcher 300,,temperature,humidity</code><br><br>
|
||||||
|
</ul>
|
||||||
|
|
||||||
|
<a name="readingsWatcherSet"></a>
|
||||||
|
<b>Set</b>
|
||||||
|
<ul>
|
||||||
|
<li>active</li>
|
||||||
|
<li>inactive</li>
|
||||||
|
<li>checkNow</li>
|
||||||
|
<li>clearReadings</li>
|
||||||
|
</ul><br>
|
||||||
|
|
||||||
|
<a name="readingsWatcherGet"></a>
|
||||||
|
<b>Get</b>
|
||||||
|
<ul>
|
||||||
|
<li>devices</li>
|
||||||
|
</ul><br>
|
||||||
|
|
||||||
|
<a name="readingsWatcherAttr"></a>
|
||||||
|
<b>Attribute</b>
|
||||||
|
<ul>
|
||||||
|
<br>
|
||||||
|
<ul>
|
||||||
|
<a name="disable"></a><li><b>disable</b><br>Deaktiviert das Device</li><br>
|
||||||
|
<a name="interval"></a><li><b>interval <Sekunden></b> (default 60)<br>Zeitintervall zur kontinuierlichen Überprüfung</li><br>
|
||||||
|
<a name="deleteUnusedReadings"></a><li><b>deleteUnusedReadings</b> (default 1)<br>Readings mit dem Wert unused werden automatisch gelöscht</li><br>
|
||||||
|
<a name="readingActifity"></a><li><b>readingActifity</b> (default none)<br>
|
||||||
|
Das Modul kann ähnlich dem HomeMatic ActionDetector im überwachten Gerät ein eigenes Reading setzen und den Überwachungsstatus<br>
|
||||||
|
in diesem speichern. Beispiel :<br>
|
||||||
|
<code>attr <name> readingActifity actifity</code><br>
|
||||||
|
Erzeugt in den überwachten Geräten das zusätzliche Reading actifity und versorgt es mit dem Status dead bzw alive<br>
|
||||||
|
<code>attr <name> readingActifity aktiv:0:1</code><br>
|
||||||
|
Erzeugt in den überwachten Geräten das zusätzliche Reading aktiv und versorgt es mit dem Status 0 bzw 1
|
||||||
|
</li><br>
|
||||||
|
</ul>
|
||||||
|
</ul>
|
||||||
|
<br>
|
||||||
|
|
||||||
|
</ul>
|
||||||
|
|
||||||
|
=end html_DE
|
||||||
|
|
||||||
|
=encoding utf8
|
||||||
|
=for :application/json;q=META.json 98_readingsWatcher.pm
|
||||||
|
|
||||||
|
{
|
||||||
|
"abstract": "Module for cyclical watching of readings updates",
|
||||||
|
"x_lang": {
|
||||||
|
"de": {
|
||||||
|
"abstract": "Modul zur zyklische Überwachung von Readings auf Aktualisierung"
|
||||||
|
}
|
||||||
|
},
|
||||||
|
"keywords": [
|
||||||
|
"readings",
|
||||||
|
"watch",
|
||||||
|
"supervision",
|
||||||
|
"ueberwachung"
|
||||||
|
],
|
||||||
|
"version": "1.6.0",
|
||||||
|
"release_status": "stable",
|
||||||
|
"author": [
|
||||||
|
"Wzut"
|
||||||
|
],
|
||||||
|
"x_fhem_maintainer": [
|
||||||
|
"Wzut"
|
||||||
|
],
|
||||||
|
"x_fhem_maintainer_github": [
|
||||||
|
"Wzut"
|
||||||
|
],
|
||||||
|
"prereqs": {
|
||||||
|
"runtime": {
|
||||||
|
"requires": {
|
||||||
|
"FHEM": 5.00918799,
|
||||||
|
"perl": 5.014,
|
||||||
|
"POSIX": 0,
|
||||||
|
"GPUtils": 0,
|
||||||
|
"Time::HiRes": 0
|
||||||
|
},
|
||||||
|
"recommends": {
|
||||||
|
"FHEM::Meta": 0
|
||||||
|
},
|
||||||
|
"suggests": {
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
=end :application/json;q=META.json
|
||||||
|
|
||||||
|
=cut
|
||||||
|
|
||||||
|
|
Loading…
x
Reference in New Issue
Block a user