[Gelöst] notify - an bestimmten Tag zur bestimmen Uhrzeit ausschließen

[Depechem]

Hi,
ich möchte gern ein für mich umfangreiches "notify" erstellen.

Was soll geschehen:
wenn

Code Auswählen Erweitern

DME_Kontakt:closed und es NICHT

Code Auswählen Erweitern

Mittwochs zwischen 17:55-18:05 Uhr
soll folgendes augelößt werden:

Code Auswählen Erweitern

set Hoftor on sowie immer

Code Auswählen Erweitern

zwischen 22:00-05:00 zusätzlich

Code Auswählen Erweitern

set Lampe1 on

wie muss das ganze dann zusammengebaut aussehen? Ich hänge an dem Ausschließen eines bestimmten Tages sowie Uhrzeit und an der zweiten Auslösung die nur zur einer bestimmen Uhrzeit mit erfolgen soll. Oder muss ich da mehrere notifys bauen.

Eigentlich wollte ich sogar noch einen Googlekalender prüfen(also ob ich arbeiten oder zuhause bin) aber das wird im Moment zu viel.

Viele Grüße Thomas

[betateilchen]

Das ist kein "umfangreiches notify" sondern pillepalle.

Bau Dir eine Funktion in der 99_myUtils.pm die Du aus dem notify aufrufst.
In dieser Funktion kannst Du Fallunterscheidungen einbauen, soviele Du willst. Und es bleibt auch nach vier Wochen noch nachvollziehbar, ganz im Gegensatz zu Romanen in der notify-Definition selbst.

Hier mal ein Beispiel aus meiner 99_myUtils.pm. Diese Funktion wird einmal pro Minute aufgerufen.

Code Auswählen Erweitern


sub n_minuteJobs($$) {
my ($h,$m) = @_;
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);

# do jobs every minute
my $logpath = AttrVal('global','logdir','./log/');
$logpath .= "/fhem.heartbeat";
# Debug $logpath;
qx(touch $logpath);

# do jobs all 3 min
if(!($m % 3)) {
addLog("out_Regen_Rain", "state");
addLog("GW1__Warnung", "state");
}

# do jobs all 10 min
if(!($m % 10)) {
CommandGet(undef,'gds rereadcfg');
}

# do jobs all 30 min
if(!($m % 30)) {
        # nothing to do
}

# do jobs hourly
if(!($m)) {
addLog("out_Balkon", "state");
WriteStatefile;

my $off = 22;
CommandSet(undef,'wz_TC_Climate desired-temp 19.0') if ($hour == $off);

# $off++ if ($mon >= 4 && $mon < 9);
$off++ if ($isdst && $yday < 250);
CommandSet(undef,'Licht_Balkon off') if ($hour == $off);

if(!($h)) {
# do jobs at midnight
CommandSet(undef,'wz_Licht_Regal off');
CommandSet(undef,'Logfile reopen');
CommandSet(undef,'heizperiode $month');

my $d = sprintf("%02d.%02d.%04d", $mday, $mon+1, $year+1900);
CommandSetReading(undef,"global panelDatum $d");
}
}
return;
}


[CoolTux]

Code Auswählen Erweitern


define notifyDepechem notify DME_Kontakt:closed {

            #my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);           # sollte in einem Notify eigentlich nicht nötig sein

            fhem('set Hoftor on') if( $wday == 3 and $hour > 16 and $min > 54 and $hour < 19 and $min < 6 );
            fhem('set Hoftor on') if( $hour < 4 and $hour > 21 );
}


Mit der Minute kleiner 6 bin ich mir unsicher. 06 wäre aber schon komisch.

[betateilchen]

Code Auswählen Erweitern


and $min > 54 ... and $min < 6


Nenne mir bitte eine Zahl, die größer ist als 54 und gleichzeitig kleiner als 6

(Popcorn?)

[CoolTux]

Jupp hast Recht. Ist doof
Neuer Versuch durch zu Hilfename einer kleinen geklauten Hilfsfunktion

99_myUtils

Code Auswählen Erweitern


sub isTime($) {

    my $dfi = shift;

    $dfi =~ s/{([^\x7d]*)}/$cmdFromAnalyze=$1; eval $1/ge; # Forum #69787
    my ($sec,$min,$hour,$mday,$month,$year,$wday,$yday,$isdst) = localtime;
    my $dhms = sprintf("%s\@%02d:%02d:%02d", $wday, $hour, $min, $sec);
    foreach my $ft (split(" ", $dfi)) {
      my ($from, $to) = split("-", $ft);
      if(defined($from) && defined($to)) {
        $from = "$wday\@$from" if(index($from,"@") < 0);
        $to   = "$wday\@$to"   if(index($to,  "@") < 0);
        return 0 if($from le $dhms && $dhms le $to);
      }
    }
   
    return 1;
}

Noch ungetestet

Code Auswählen Erweitern


define notifyDepechem notify DME_Kontakt:closed {

            #my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);           # sollte in einem Notify eigentlich nicht nötig sein

            fhem('set Hoftor on') if( $wday == 3 and isTime('17:55-18:05') );
            fhem('set Hoftor on') if( isTime('21:00-04:00') );
}



Da mich das auch interessiert teste ich es gleich mal

[Depechem]

Jupp hast Recht. Ist doof
Neuer Versuch durch zu Hilfename einer kleinen geklauten Hilfsfunktion

99_myUtils

Code Auswählen Erweitern


sub isTime($) {

    my $dfi = shift;

    $dfi =~ s/{([^\x7d]*)}/$cmdFromAnalyze=$1; eval $1/ge; # Forum #69787
    my ($sec,$min,$hour,$mday,$month,$year,$wday,$yday,$isdst) = localtime;
    my $dhms = sprintf("%s\@%02d:%02d:%02d", $wday, $hour, $min, $sec);
    foreach my $ft (split(" ", $dfi)) {
      my ($from, $to) = split("-", $ft);
      if(defined($from) && defined($to)) {
        $from = "$wday\@$from" if(index($from,"@") < 0);
        $to   = "$wday\@$to"   if(index($to,  "@") < 0);
        return 0 if($from le $dhms && $dhms le $to);
      }
    }
   
    return 1;
}

Noch ungetestet

Code Auswählen Erweitern


define notifyDepechem notify DME_Kontakt:closed {

            #my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);           # sollte in einem Notify eigentlich nicht nötig sein

            fhem('set Hoftor on') if( $wday == 3 and isTime('17:55-18:05') );
            fhem('set Hoftor on') if( isTime('21:00-04:00') );
}



Da mich das auch interessiert teste ich es gleich mal

Super Grundlegend funktioniert dies.
Nur ist dies ja jetzt die Routine das

Code Auswählen Erweitern

set Hoftor on nur am

Code Auswählen Erweitern

Tag 3 zw.

Code Auswählen Erweitern

17:55-18:05 funktioniert, aber es soll ja genau umgedreht sein:

Code Auswählen Erweitern

set Hoftor on am

Code Auswählen Erweitern

Tag 3 zw.

Code Auswählen Erweitern

17:55-18:05 NICHT auslösen, sonst immer

[CoolTux]

Hatte noch Fehler im return

Code Auswählen Erweitern


sub isTime($) {

    my $dfi = shift;

    $dfi =~ s/{([^\x7d]*)}/$cmdFromAnalyze=$1; eval $1/ge; # Forum #69787
    my ($sec,$min,$hour,$mday,$month,$year,$wday,$yday,$isdst) = localtime;
    my $dhms = sprintf("%s\@%02d:%02d:%02d", $wday, $hour, $min, $sec);
    foreach my $ft (split(" ", $dfi)) {
      my ($from, $to) = split("-", $ft);
      if(defined($from) && defined($to)) {
        $from = "$wday\@$from" if(index($from,"@") < 0);
        $to   = "$wday\@$to"   if(index($to,  "@") < 0);
        return 1 if($from le $dhms && $dhms le $to);
      }
    }
   
    return 0;
}

So funktioniert es nun korrekt

Und nun zum Notify

Code Auswählen Erweitern


define notifyDepechem notify DME_Kontakt:closed {

            #my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);           # sollte in einem Notify eigentlich nicht nötig sein

            fhem('set Hoftor on') if( $wday != 3 or ($wday == 3 and ! isTime('17:55-18:05')) );
            fhem('set Hoftor on') if( isTime('21:00-04:00') );
}


So und jetzt nehme ich bitte ein bisschen Popcorn. So früh am Morgen denken macht müde.

@Udo
Hast Du Zeit und Lust kurz ein zweites Beispiel zu bringen? Es gibt sicherlich noch eine einfachere Lösung. Also weniger Code.

[CoolTux]

Habe das Notify noch mal angepasst. Auf meinem Testsystem rennt es nun genau so wie Du es wolltest.

[Depechem]

Danke Leon, es funktioniert fast genau so wie gewünscht.

nur soll:

Code Auswählen Erweitern

fhem('set Hoftor on') if( isTime('21:00-04:00') ); auch nicht Mittwochs zw. 17:55-18:05 Uhr angehen.

Also die Routine so das:
Notify NIE

Code Auswählen Erweitern

Mittwochs zw. 17:55-18:05 Uhr auslößt, sonst immer

Code Auswählen Erweitern

set Hoftor on sowie zusätzlich

Code Auswählen Erweitern

fhem('set Hoftor2 on') if( isTime('21:00-04:00') ) < Aber auch nicht Mittwochs in zw. 17:55-18:05 Uhr.
Verstehst?

[CoolTux]

Oh man das mit dem verstehen ist so eine Sache 
Sehe auch gerade das ich ja eh Mist gemacht habe, das zweite war ja eine Lampe. Ich lese jetzt noch mal gaaanz genau und versuche es dann noch einmal.

[Depechem]

Oh man das mit dem verstehen ist so eine Sache 
Sehe auch gerade das ich ja eh Mist gemacht habe, das zweite war ja eine Lampe. Ich lese jetzt noch mal gaaanz genau und versuche es dann noch einmal.

[CoolTux]

Code Auswählen Erweitern


define notifyDepechem notify DME_Kontakt:closed {

            #my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);           # sollte in einem Notify eigentlich nicht nötig sein

            fhem('set Hoftor on') if( $wday != 3 or ($wday == 3 and ! isTime('17:55-18:05')) );
            fhem('set Lampe1 on') if( isTime('21:00-04:00') );
}

Also laut Deiner Beschreibung geht nun IMMER Hoftor auf AUSSER Mittwoch zwischen 17:55 und 18:05 ausserdem geht (IMMER ZWISCHEN) 21:00-04:00 Uhr die Lampe an.


Ist das für so einen Feuerwehrmelder, wenn Einsatzmeldung kommt dann los ausser Mittwoch um 18 Uhr da ist Probealarm?

[Depechem]

Code Auswählen Erweitern


define notifyDepechem notify DME_Kontakt:closed {

            #my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);           # sollte in einem Notify eigentlich nicht nötig sein

            fhem('set Hoftor on') if( $wday != 3 or ($wday == 3 and ! isTime('17:55-18:05')) );
            fhem('set Lampe1 on') if( isTime('21:00-04:00') );
}

Also laut Deiner Beschreibung get nun IMMER Hoftor auf AUSSER Mittwoch zwischen 17:55 und 18:05 ausserdem geht (IMMER ZWISCHEN) 21:00-04:00 Uhr die Lampe an.

Lampe soll nur zw. 21:00-04:00 Uhr angehen, aber auch nicht  "Mittwoch zwischen 17:55 und 18:05" < da Probealarm

Ist das für so einen Feuerwehrmelder, wenn Einsatzmeldung kommt dann los ausser Mittwoch um 18 Uhr da ist Probealarm?

Ja genau 

[CoolTux]

Die Lampe kann am Mittwoch ja gar nicht zwischen 7:55-18:05 angehen, da wir ja schon sagen sie soll nur zwischen 21:00-04:00 angehen. Das passt also. Kannst das letzte Notify nehmen.

[Depechem]

Die Lampe kann am Mittwoch ja gar nicht zwischen 7:55-18:05 angehen, da wir ja schon sagen sie soll nur zwischen 21:00-04:00 angehen. Das passt also. Kannst das letzte Notify nehmen.

Na ich bin ja blöd  stimmt 

VIEELEN DANK wiedereinmal mehr.