FHTTK: Benachrichtigung bei offenem Fenster: Unterschied zwischen den Versionen
K (Code Snippets als "source" formatiert) |
(Anpassung von <source>-Tags nach <syntaxhighlight>) |
||
| Zeile 3: | Zeile 3: | ||
in (z.B.) [[99 myUtils anlegen|99_myUtils.pm]]: | in (z.B.) [[99 myUtils anlegen|99_myUtils.pm]]: | ||
< | <syntaxhighlight lang="perl">sub FHTTK_status { | ||
my @fhttks = devspec2array("TYPE=CUL_FHTTK"); | my @fhttks = devspec2array("TYPE=CUL_FHTTK"); | ||
my @wopen = (); | my @wopen = (); | ||
| Zeile 22: | Zeile 22: | ||
} | } | ||
return $resultstring; | return $resultstring; | ||
}</ | }</syntaxhighlight> | ||
in die [[Konfiguration]] (hier für Eingabe in fhem.cfg formatiert): | in die [[Konfiguration]] (hier für Eingabe in fhem.cfg formatiert): | ||
< | <syntaxhighlight lang="perl">define n_Fenster notify .*:Window.*(Open|Closed) { \ | ||
my $window_state=ReadingsVal("$NAME", "Window", "nA");;\ | my $window_state=ReadingsVal("$NAME", "Window", "nA");;\ | ||
my $deftype=$defs{$NAME}{TYPE};;\ | my $deftype=$defs{$NAME}{TYPE};;\ | ||
| Zeile 36: | Zeile 36: | ||
Log 3, "$NAME: Window ".$window_state;;\ | Log 3, "$NAME: Window ".$window_state;;\ | ||
}\ | }\ | ||
}</ | }</syntaxhighlight> | ||
Achtung: Hier wird fb_mail als Mailer benutzt (siehe auch [[E-Mail senden]]) - je nach *nix-Version muss u.U. der Pfad angepasst sowie die entsprechenden Codezeilen in die .pm-Datei übernommen werden. | Achtung: Hier wird fb_mail als Mailer benutzt (siehe auch [[E-Mail senden]]) - je nach *nix-Version muss u.U. der Pfad angepasst sowie die entsprechenden Codezeilen in die .pm-Datei übernommen werden. | ||
Aktuelle Version vom 26. Juli 2017, 18:57 Uhr
Wer wird nicht gerne per Mail benachrichtigt, wenn ein Fenster auf- oder zugemacht wird? Richtig komfortabel ist es, wenn man dann auch noch gleich eine Liste aller FHTTK-devices mitgeliefert bekommt, die den Status "Window: Open" haben:
in (z.B.) 99_myUtils.pm:
sub FHTTK_status {
my @fhttks = devspec2array("TYPE=CUL_FHTTK");
my @wopen = ();
foreach(@fhttks) {
my $fhttk_window = ReadingsVal($_, "Window", "nA");
push (@wopen,$_) if ($fhttk_window eq "Open" );
}
my $num_wopen = @wopen;
my $resultstring='';
if ( $num_wopen gt 0 ) {
$resultstring="folgende Fenster sind noch offen:\n\n";
foreach(@wopen) {
$resultstring.="- ".$_."\n";
Log 4, "FHTTK_status: ". $_. "noch offen";
}
} else {
$resultstring="alle Fenster sind derzeit geschlossen.";
}
return $resultstring;
}
in die Konfiguration (hier für Eingabe in fhem.cfg formatiert):
define n_Fenster notify .*:Window.*(Open|Closed) { \
my $window_state=ReadingsVal("$NAME", "Window", "nA");;\
my $deftype=$defs{$NAME}{TYPE};;\
return if ( $deftype ne "CUL_FHTTK" );;\
if ( $defs{$NAME}{PREVSTATE} ne $window_state ) { \
my $fhttk_status=FHTTK_status;;\
my $subject="FHEM: Fenster $NAME ".$window_state;; \
fb_mail('xxx@@xxx.de',$subject,$fhttk_status);;\
Log 3, "$NAME: Window ".$window_state;;\
}\
}
Achtung: Hier wird fb_mail als Mailer benutzt (siehe auch E-Mail senden) - je nach *nix-Version muss u.U. der Pfad angepasst sowie die entsprechenden Codezeilen in die .pm-Datei übernommen werden.
Randbemerkung zum Config-Code: Ein "notify <sensor>:Open" alleine reicht nicht. Da der Sensor etwa alle zwei Minuten seinen Status sendet, muss zudem der vorherige Status abgefragt werden, um nur bei Statusänderungen zu reagieren.