[gelöst] alle Dummys mit status "On" listen? dann per yowsup weitergeben

[MKeY]

Hallo, ich werkel schon ein wenig an meiner FHEM Konfiguration.
Mein Ziel ist es, dass mir yowsup eine Meldung mit allen dummys schickt, die den status "On" haben, wenn ich das haus verlassen hat.
notify/doif bekomme ich hin, die frage ist nur, gibt es eine Abfrage, die mir das erleichtert, ohne dass ich alle dummy in perl reinschreibe und dort eine if abfrage mache?

so ähnlich wie der befehl List, jedoch auf den status bezogen?

[CoolTux]

Code Auswählen Erweitern


list TYPE=dummy:FILTER=STATE=On


[MKeY]

ok, so einfach. oh man. (sorry, sehe gerade, dass es so im wiki beschrieben ist...schande über mein haupt, danke!

kann man diese Liste dann auch in ein dummy schreiben, oder irgendwie in die yowsup nachricht abspeichern?

[CoolTux]

Du könntest es in ein Notify anwenden oder in einer myUtils. Aber dann solltest Du die devspec2array Funktion auf Perlebene dafür nehmen. Ist eine FHEM Perlfunktion.
Schau mal in der Commandref nach devspec2array. Wenn noch Fragen sind einfach fragen, aber bitte erstmal selber schauen.

[MKeY]

danke für deine Hilfe! hab es derzeit noch im DOIF, denke aber ich werde es in myUtils auslagern, damit ich mir auch die alias anzeigen lassen kann und nicht nur die device Namen. coole Sache!

Code Auswählen Erweitern

([DEVICE:presence] eq "absent")
{fhem ("set DEVICE send Status der Geraete: +++".(join("+++",devspec2array('TYPE=dummy:FILTER=state=on'))))}

DEVICE dementsprechend euer Handy
+++ im yowsup eingetragen als Zeilenumbruch https://forum.fhem.de/index.php?topic=53665.0

Update:
jetzt mit Alias Abfrage durch myUtils

NOTIFY:

Code Auswählen Erweitern

([DEVICE:presence] eq "absent")
{fhem ("set DEVICE send Folgende Geraete sind noch an: +++".getStatusAlias())}

myUtils:

Code Auswählen Erweitern

sub getStatusAlias() {
my $ret = '';
my @array = '';

@array = devspec2array("TYPE=dummy:FILTER=state=on");
foreach (@array)
{
if ($_ ne $array[$#array]) {
$ret = $ret.AttrVal($_, 'alias', 'ERROR')."+++";
}
if ($_ eq $array[$#array]) {
$ret = $ret.AttrVal($_, 'alias', 'ERROR');
}
}
if ($ret eq '') {
$ret = "Alles ist aus!";}

return $ret;
}