Cmdalias: Unterschied zwischen den Versionen

Aus FHEMWiki
(Formatierung und hinzufügen der renamehm funktion)
Zeile 11: Zeile 11:
Der Fhem-Befehl [[cmdalias]] dient zur Erstellung von benutzerdefinierten Befehlen.  
Der Fhem-Befehl [[cmdalias]] dient zur Erstellung von benutzerdefinierten Befehlen.  


== Zielsetzung ==
= Zielsetzung =
Die jeweiligen Befehlsketten können mit ''cmdalias'' verkürzt oder sogar verändert werden.
Die jeweiligen Befehlsketten können mit ''cmdalias'' verkürzt oder sogar verändert werden.
Ein schönes Beispiel dafür ist, dass sogar [[:Kategorie:FhemBefehl|interne Befehle]] wie "shutdown restart" ersetzt werden können durch einen alias der genau so heißt aber zusätzlich vorher noch z.B. ein "save" ausführt.
Ein schönes Beispiel dafür ist, dass sogar [[:Kategorie:FhemBefehl|interne Befehle]] wie "shutdown restart" ersetzt werden können durch einen alias der genau so heißt aber zusätzlich vorher noch z.B. ein "save" ausführt.


== Einbindung in Fhem ==
= Einbindung in Fhem =
{{Randnotiz|RNTyp=y|RNText=Die folgenden Codebeispiele sind, sofern nicht anders erwähnt, als Einzeiler '''ohne''' Zeilenumbrüche einzugeben.}}
{{Randnotiz|RNTyp=y|RNText=Die folgenden Codebeispiele sind, sofern nicht anders erwähnt, als Einzeiler '''ohne''' Zeilenumbrüche einzugeben.}}
:<code>define <name> cmdalias <cmd> [parameter] AS newcommand..."</code>
<source lang="perl">define <name> cmdalias <cmd> [parameter] AS newcommand..."</source>


'''Beispieldefinition'''
'''Beispieldefinition'''
:<code>define s1 cmdalias shutdown update AS save;;shutdown</code>
<source lang="perl">define s1 cmdalias shutdown update AS save;;shutdown</source>
:<code>define s2 cmdalias set lamp .* AS { Log 1, "$EVENT";; fhem("set $EVENT") }</code>
<source lang="perl">define s2 cmdalias set lamp .* AS { Log 1, "$EVENT";; fhem("set $EVENT") }</source>


== Aufruf in Fhem ==
= Aufruf in Fhem =
[[Datei:cmdalias_eingabe_telnet.png|mini|right|400px|Ausgabe Telnet]]
[[Datei:cmdalias_eingabe_telnet.png|mini|right|400px|Ausgabe Telnet]]
Die aliase können entweder in der FHEM Befehlzeile oder direkt im Telnet eingegeben werden.
Die aliase können entweder in der FHEM Befehlzeile oder direkt im Telnet eingegeben werden.


[[Datei:cmdalias_eingabe_fhemweb.png|mini|right|400px|Ausgabe in FHEMWEB]]
[[Datei:cmdalias_eingabe_fhemweb.png|mini|right|400px|Ausgabe in FHEMWEB]]
== Beispiele ==
= Beispiele =
== ls ==
Verkürzter Aufruf von list mit Wildcard Suche
Verkürzter Aufruf von list mit Wildcard Suche
:<code>define c_ls cmdalias ls .* AS list .*$EVENT.*</code>
<source lang="perl">define c_ls cmdalias ls .* AS list .*$EVENT.*</source>


== showignoreddevices ==
Auflisten von Geräten, die in FHEM das Attribut "ignore" gesetzt haben:
Auflisten von Geräten, die in FHEM das Attribut "ignore" gesetzt haben:
:<code>define c_showignoreddevices cmdalias showignoreddevices AS { join("\n", grep { $attr{$_}{ignore} } sort keys %attr ) }</code>
<source lang="perl">define c_showignoreddevices cmdalias showignoreddevices AS { join("\n", grep { $attr{$_}{ignore} } sort keys %attr ) }</source>


== shownotypedevices ==
Auflisten von Geräten ohne TYPE Definition (sollte nur bei einer fehlerhaften Definition eine Ausgabe erstellen):
Auflisten von Geräten ohne TYPE Definition (sollte nur bei einer fehlerhaften Definition eine Ausgabe erstellen):
:<code>define c_shownotypedevices cmdalias shownotypedevices AS { join("\n", grep { !defined($defs{$_}{TYPE}) } keys %defs) }</code>
<source lang="perl">define c_shownotypedevices cmdalias shownotypedevices AS { join("\n", grep { !defined($defs{$_}{TYPE}) } keys %defs) }</source>


== v5 ==
Setzen des "Verbose Level" in FHEM auf 5
Setzen des "Verbose Level" in FHEM auf 5
:<code>define c_v5 cmdalias v5 .* AS {fhem ("attr ".($EVENT||="global")." verbose 5")}</code>
<source lang="perl">define c_v5 cmdalias v5 .* AS {fhem ("attr ".($EVENT||="global")." verbose 5")}</source>


== v3 ==
Setzen des "Verbose Level" in FHEM auf 3
Setzen des "Verbose Level" in FHEM auf 3
:<code>define c_v3 cmdalias v3 .* AS {fhem ("attr ".($EVENT||="global")." verbose 3")}</code>
<source lang="perl">define c_v3 cmdalias v3 .* AS {fhem ("attr ".($EVENT||="global")." verbose 3")}</source>


== Änderung von Geräte Aktionen ==
In diesem Beispiel wird dem Gerät MiLight_1 nicht erlaubt ausgeschaltet zu werden
In diesem Beispiel wird dem Gerät MiLight_1 nicht erlaubt ausgeschaltet zu werden
:<code>define c_aliasMiLight_1 cmdalias set MiLight_1 off AS set HMSchaltaktor_1 off</code>
<source lang="perl">define c_aliasMiLight_1 cmdalias set MiLight_1 off AS set HMSchaltaktor_1 off</source>


== say ==
Verkürzter Befehlsaufruf des TTS Moduls
Verkürzter Befehlsaufruf des TTS Moduls
:<code>define c_say cmdalias say .* AS set MyTTS tts '$EVENT'</code>
<source lang="perl">define c_say cmdalias say .* AS set MyTTS tts '$EVENT'</source>


== roomrename ==
Umbenennen eines FHEM Raumes '''Aufruf roomrename <oldroom> <newroom>'''
Umbenennen eines FHEM Raumes '''Aufruf roomrename <oldroom> <newroom>'''
:<code><nowiki>define c_roomrename cmdalias roomrename .* AS { for my $name (devspec2array("room=$EVTPART0")){ map {s/$EVTPART0/$EVTPART1/;; fhem("attr $name room $_")} AttrVal($name,'room','') } }</nowiki></code>
<source lang="perl">define c_roomrename cmdalias roomrename .* AS { for my $name (devspec2array("room=$EVTPART0")){ map {s/$EVTPART0/$EVTPART1/;; fhem("attr $name room $_")} AttrVal($name,'room','') } }</source>


== roomdelete ==
Löschen eines FHEM Raumes '''Aufruf: roomdelete <roomName>'''
Löschen eines FHEM Raumes '''Aufruf: roomdelete <roomName>'''
:<code><nowiki>define c_roomdelete cmdalias roomdelete .* AS { for my $name (devspec2array("room=$EVENT")){ map { /^$EVENT$/ ? fhem("deleteattr $name room") : do{s/,$EVENT|$EVENT,//;; fhem("attr $name room $_")} } AttrVal($name,'room','') } }</nowiki></code>
<source lang="perl">define c_roomdelete cmdalias roomdelete .* AS { for my $name (devspec2array("room=$EVENT")){ map { /^$EVENT$/ ? fhem("deleteattr $name room") : do{s/,$EVENT|$EVENT,//;; fhem("attr $name room $_")} } AttrVal($name,'room','') } }</source>


Umfangreicher alias zum automatischen Setzen verschiedener Gruppen in FHEM Räumen (mehrzeiliges Codebeispiel):
== regroup ==
Umfangreicher alias zum automatischen Setzen verschiedener Gruppen in FHEM Räumen
 
<source lang="perl">define c_regroup cmdalias regroup .* AS { my @EVTPART=split(' ',$EVENT);; $EVTPART[2] =~ s/\|/:FILTER=/g if($EVTPART[2]);; for my $name (devspec2array("group=".($EVTPART[0] ? $EVTPART[0] : '.*').($EVTPART[2] ? ":FILTER=$EVTPART[2]" : ''))){ map { ($_ && /^$EVTPART[0]$/ && !$EVTPART[1]) ? fhem("deleteattr $name group") : do{ if(!$EVTPART[1]){$EVTPART[0]=",$EVTPART[0]|$EVTPART[0],";; $EVTPART[1]='';;} s/$EVTPART[0]/$EVTPART[1]/;; fhem("attr $name group $_")} } AttrVal($name,'group',0) } }</source>
 
Die zusätzlichen Gruppen, in welchen sich die devices sonst noch befinden, bleiben unberührt. Als FILTER kann alles was der normale fhem-devspec Filter verarbeiten kann angegeben werden. Es sollte nur aufgepasst werden, wenn ein "Device" mehrere ähnliche Gruppenbennungen wie "attr name group test2,test" hat. Wenn man hier ein 'regroup test test3' macht, könnte es passieren, dass man dadurch bei diesem device die Gruppe 'test2' nach 'test32' umbenennt. In dem Beispiel müsste man den Befehl z.B. mit 'regroup test$ test3' angeben, damit das nicht passiert.
 
Beispiele:
<pre>regroup <oldGroup> [<newGroup> [<FILTER>][|<FILTER2>]...]
<pre>regroup <oldGroup> [<newGroup> [<FILTER>][|<FILTER2>]...]


Zeile 86: Zeile 102:
regroup 0 myGroup room=myRoom|TYPE=CUL_HM|NAME=.*Licht.*</pre>
regroup 0 myGroup room=myRoom|TYPE=CUL_HM|NAME=.*Licht.*</pre>


:<code><nowiki>define c_regroup cmdalias regroup .* AS { my @EVTPART=split(' ',$EVENT);; $EVTPART[2] =~ s/\|/:FILTER=/g if($EVTPART[2]);; for my $name (devspec2array("group=".($EVTPART[0] ? $EVTPART[0] : '.*').($EVTPART[2] ? ":FILTER=$EVTPART[2]" : ''))){ map { ($_ && /^$EVTPART[0]$/ && !$EVTPART[1]) ? fhem("deleteattr $name group") : do{ if(!$EVTPART[1]){$EVTPART[0]=",$EVTPART[0]|$EVTPART[0],";; $EVTPART[1]='';;} s/$EVTPART[0]/$EVTPART[1]/;; fhem("attr $name group $_")} } AttrVal($name,'group',0) } }</nowiki></code>
== autocreate ==
 
Die zusätzlichen Gruppen, in welchen sich die devices sonst noch befinden, bleiben unberührt. Als FILTER kann alles was der normale fhem-devspec Filter verarbeiten kann angegeben werden.
 
Es sollte nur aufgepasst werden, wenn ein "Device" mehrere ähnliche Gruppenbennungen wie "attr name group test2,test" hat. Wenn man hier ein 'regroup test test3' macht, könnte es passieren, dass man dadurch bei diesem device die Gruppe 'test2' nach 'test32' umbenennt.
In dem Beispiel müsste man den Befehl z.B. mit 'regroup test$ test3' angeben, damit das nicht passiert.
 
 
Schnelles (de)aktivieren der [[autocreate]] Funktion:
Schnelles (de)aktivieren der [[autocreate]] Funktion:
<pre style="width:570px;">
<pre style="width:570px;">
Zeile 101: Zeile 110:


Optional kann noch das autocreate Icon definiert werden:
Optional kann noch das autocreate Icon definiert werden:
:<code>attr autocreate devStateIcon disabled:ios-off:on active:ios-on-blue:off</code>
<source lang="perl">attr autocreate devStateIcon disabled:ios-off:on active:ios-on-blue:off</source>
 
== renamehm ==
Homematic Devices werden gerne mit zusätzlichen Geräten angelegt (z.B: HM-ES-PMSw1-PI legt die Geräte HM_12345B, HM_12345B_Pwr, HM_12345B_SenF, HM_12345B_SenI, HM_12345B_SenPwr, HM_12345B_SenU, HM_12345B_Sw an). Um diese umzubenennen kann man mit der folgenden Funktion den Prefix von HM_12345B auf einen beliebigen Ändern. Diese wird nach Definition via "<code>renamehm HM_12345B NEW_DEVICE_PREFIX</code>" ausgeführt:
<source lang="perl">define c_renamehm cmdalias renamehm .* AS { for my $name (devspec2array("$EVTPART0.*")){ my $newname=$name;;$newname =~ s/$EVTPART0/$EVTPART1/gi;; fhem("rename $name $newname");;} }</source>


== Links ==
= Links =
* Thread über das Modul im {{Link2Forum|Topic=15648|LinkText=Fhem Forum}}
* Thread über das Modul im {{Link2Forum|Topic=15648|LinkText=Fhem Forum}}
* Thread mit {{Link2Forum|Topic=42211|LinkText=weiteren Informationen}}
* Thread mit {{Link2Forum|Topic=42211|LinkText=weiteren Informationen}}


[[Kategorie:Code Snippets]]
[[Kategorie:Code Snippets]]

Version vom 30. Dezember 2015, 15:26 Uhr


cmdalias
Zweck / Funktion
Erstellen von Benutzer-definierten Befehlen in FHEM
Allgemein
Typ Befehl
Details
Dokumentation EN / DE
Support (Forum) FHEM
Modulname 98_cmdalias.pm
Ersteller Rudolf König
Wichtig: sofern vorhanden, gilt im Zweifel immer die (englische) Beschreibung in der commandref!


Der Fhem-Befehl cmdalias dient zur Erstellung von benutzerdefinierten Befehlen.

Zielsetzung

Die jeweiligen Befehlsketten können mit cmdalias verkürzt oder sogar verändert werden. Ein schönes Beispiel dafür ist, dass sogar interne Befehle wie "shutdown restart" ersetzt werden können durch einen alias der genau so heißt aber zusätzlich vorher noch z.B. ein "save" ausführt.

Einbindung in Fhem

Emblem-question-yellow.svgDie folgenden Codebeispiele sind, sofern nicht anders erwähnt, als Einzeiler ohne Zeilenumbrüche einzugeben.
define <name> cmdalias <cmd> [parameter] AS newcommand..."

Beispieldefinition

define s1 cmdalias shutdown update AS save;;shutdown
define s2 cmdalias set lamp .* AS { Log 1, "$EVENT";; fhem("set $EVENT") }

Aufruf in Fhem

Ausgabe Telnet

Die aliase können entweder in der FHEM Befehlzeile oder direkt im Telnet eingegeben werden.

Ausgabe in FHEMWEB

Beispiele

ls

Verkürzter Aufruf von list mit Wildcard Suche

define c_ls cmdalias ls .* AS list .*$EVENT.*

showignoreddevices

Auflisten von Geräten, die in FHEM das Attribut "ignore" gesetzt haben:

define c_showignoreddevices cmdalias showignoreddevices AS { join("\n", grep { $attr{$_}{ignore} } sort keys %attr ) }

shownotypedevices

Auflisten von Geräten ohne TYPE Definition (sollte nur bei einer fehlerhaften Definition eine Ausgabe erstellen):

define c_shownotypedevices cmdalias shownotypedevices AS { join("\n", grep { !defined($defs{$_}{TYPE}) } keys %defs) }

v5

Setzen des "Verbose Level" in FHEM auf 5

define c_v5 cmdalias v5 .* AS {fhem ("attr ".($EVENT||="global")." verbose 5")}

v3

Setzen des "Verbose Level" in FHEM auf 3

define c_v3 cmdalias v3 .* AS {fhem ("attr ".($EVENT||="global")." verbose 3")}

Änderung von Geräte Aktionen

In diesem Beispiel wird dem Gerät MiLight_1 nicht erlaubt ausgeschaltet zu werden

define c_aliasMiLight_1 cmdalias set MiLight_1 off AS set HMSchaltaktor_1 off

say

Verkürzter Befehlsaufruf des TTS Moduls

define c_say cmdalias say .* AS set MyTTS tts '$EVENT'

roomrename

Umbenennen eines FHEM Raumes Aufruf roomrename <oldroom> <newroom>

define c_roomrename cmdalias roomrename .* AS { for my $name (devspec2array("room=$EVTPART0")){ map {s/$EVTPART0/$EVTPART1/;; fhem("attr $name room $_")} AttrVal($name,'room','') } }

roomdelete

Löschen eines FHEM Raumes Aufruf: roomdelete <roomName>

define c_roomdelete cmdalias roomdelete .* AS { for my $name (devspec2array("room=$EVENT")){ map { /^$EVENT$/ ? fhem("deleteattr $name room") : do{s/,$EVENT|$EVENT,//;; fhem("attr $name room $_")} } AttrVal($name,'room','') } }

regroup

Umfangreicher alias zum automatischen Setzen verschiedener Gruppen in FHEM Räumen

define c_regroup cmdalias regroup .* AS { my @EVTPART=split(' ',$EVENT);; $EVTPART[2] =~ s/\|/:FILTER=/g if($EVTPART[2]);; for my $name (devspec2array("group=".($EVTPART[0] ? $EVTPART[0] : '.*').($EVTPART[2] ? ":FILTER=$EVTPART[2]" : ''))){ map { ($_ && /^$EVTPART[0]$/ && !$EVTPART[1]) ? fhem("deleteattr $name group") : do{ if(!$EVTPART[1]){$EVTPART[0]=",$EVTPART[0]|$EVTPART[0],";; $EVTPART[1]='';;} s/$EVTPART[0]/$EVTPART[1]/;; fhem("attr $name group $_")} } AttrVal($name,'group',0) } }

Die zusätzlichen Gruppen, in welchen sich die devices sonst noch befinden, bleiben unberührt. Als FILTER kann alles was der normale fhem-devspec Filter verarbeiten kann angegeben werden. Es sollte nur aufgepasst werden, wenn ein "Device" mehrere ähnliche Gruppenbennungen wie "attr name group test2,test" hat. Wenn man hier ein 'regroup test test3' macht, könnte es passieren, dass man dadurch bei diesem device die Gruppe 'test2' nach 'test32' umbenennt. In dem Beispiel müsste man den Befehl z.B. mit 'regroup test$ test3' angeben, damit das nicht passiert.

Beispiele:

regroup <oldGroup> [<newGroup> [<FILTER>][|<FILTER2>]...]

# Allen devices ohne group die Gruppe 'myGroup' setzen:
regroup 0 myGroup

# Nur den devices im Raum 'myRoom' welche keine group haben die Gruppe 'myGroup' setzen:
regroup 0 myGroup room=myRoom

# Alle devices aus 'oldGroup' in 'newGroup' verschieben
regroup oldGroup newGroup

# Nur die devices im Raum 'myRoom' aus 'oldGroup' in 'newGroup' verschieben
regroup oldGroup newGroup room=myRoom

# Gruppe 'myGroup' löschen
regroup myGroup

# Nur die devices im Raum 'myRoom' aus der Gruppe 'myGroup' löschen.
regroup myGroup 0 room=myRoom

# Devices aus allen Gruppen welche mit 'licht' beginnen aus Raum 'Obergeschoss' entfernen.
regroup licht.* 0 room=Obergeschoss

# Devices aus dem Raum 'myRoom'  aus allen Gruppen entfernen und in die Gruppe 'myGroup' verschieben.
regroup .* myGroup room=myRoom

# Devices ohne Gruppe aus dem Raum 'myRoom' mit dem TYPE 'CUL_HM' und welche ebenfalls 'Licht' im Namen enthalten die Gruppe 'myGroup' hinzufügen
regroup 0 myGroup room=myRoom|TYPE=CUL_HM|NAME=.*Licht.*

autocreate

Schnelles (de)aktivieren der autocreate Funktion:

define c_autocreate_off cmdalias set autocreate off AS attr autocreate disable 1
define c_autocreate_on cmdalias set autocreate on AS attr autocreate disable 0

Optional kann noch das autocreate Icon definiert werden:

attr autocreate devStateIcon disabled:ios-off:on active:ios-on-blue:off

renamehm

Homematic Devices werden gerne mit zusätzlichen Geräten angelegt (z.B: HM-ES-PMSw1-PI legt die Geräte HM_12345B, HM_12345B_Pwr, HM_12345B_SenF, HM_12345B_SenI, HM_12345B_SenPwr, HM_12345B_SenU, HM_12345B_Sw an). Um diese umzubenennen kann man mit der folgenden Funktion den Prefix von HM_12345B auf einen beliebigen Ändern. Diese wird nach Definition via "renamehm HM_12345B NEW_DEVICE_PREFIX" ausgeführt:

define c_renamehm cmdalias renamehm .* AS { for my $name (devspec2array("$EVTPART0.*")){ my $newname=$name;;$newname =~ s/$EVTPART0/$EVTPART1/gi;; fhem("rename $name $newname");;} }

Links