mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-01-31 06:39:11 +00:00
10_RHASSPY:Initial Commit
git-svn-id: https://svn.fhem.de/fhem/trunk@24343 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
drhirn
parent
7b91ed778e
commit
7b1f0ca1f2
4051
fhem/contrib/RHASSPY/10_RHASSPY.pm
Normal file
4051
fhem/contrib/RHASSPY/10_RHASSPY.pm
Normal file
File diff suppressed because it is too large
Load Diff
133
fhem/contrib/RHASSPY/99_RHASSPY_Utils_Demo.pm
Normal file
133
fhem/contrib/RHASSPY/99_RHASSPY_Utils_Demo.pm
Normal file
@ -0,0 +1,133 @@
|
||||
##############################################
|
||||
# $Id$
|
||||
#
|
||||
|
||||
package RHASSPY::Demo; ## no critic 'Package declaration'
|
||||
|
||||
use strict;
|
||||
use warnings;
|
||||
use JSON;
|
||||
use Encode;
|
||||
use List::Util qw(max min);
|
||||
|
||||
use GPUtils qw(GP_Import);
|
||||
|
||||
## Import der FHEM Funktionen
|
||||
#-- Run before package compilation
|
||||
BEGIN {
|
||||
|
||||
# Import from main context
|
||||
GP_Import(
|
||||
qw(
|
||||
AttrVal
|
||||
InternalVal
|
||||
ReadingsVal
|
||||
ReadingsNum
|
||||
ReadingsAge
|
||||
fhem
|
||||
Log3
|
||||
decode
|
||||
defs
|
||||
round
|
||||
)
|
||||
);
|
||||
}
|
||||
|
||||
sub ::RHASSPY_Utils_Demo_Initialize { goto &Initialize }
|
||||
|
||||
# initialize ##################################################################
|
||||
sub Initialize {
|
||||
my $hash = shift;
|
||||
return;
|
||||
}
|
||||
|
||||
# Enter you functions below _this_ line.
|
||||
|
||||
sub BasicTest {
|
||||
my $site = shift;
|
||||
my $type = shift;
|
||||
Log3('rhasspy',3 , "RHASSPY: Site $site, Type $type");
|
||||
return "RHASSPY: Site $site, Type $type";
|
||||
}
|
||||
|
||||
sub DataTest {
|
||||
my $name = shift;
|
||||
my $rawd = shift;
|
||||
|
||||
my $hash = $defs{$name} // return;
|
||||
my $data;
|
||||
if ( !eval { $data = decode_json($rawd) ; 1 } ) {
|
||||
Log3($hash->{NAME}, 1, "JSON decoding error, $rawd seems not to be valid JSON data: $@");
|
||||
return "Error! $rawd seems not to be valid JSON data!";
|
||||
}
|
||||
my $site = $data->{siteId};
|
||||
my $type = $data->{Type};
|
||||
Log3('rhasspy',3 , "RHASSPY: Site $site, Type $type");
|
||||
my @devices = sort keys %{$hash->{helper}{devicemap}->{devices}};
|
||||
while (@devices > 2) {
|
||||
shift @devices; # limit triggered devices two to minimize unwanted side effects
|
||||
}
|
||||
my @rets;
|
||||
|
||||
$rets[0] = "RHASSPY: Site $site, Type $type";
|
||||
$rets[1] = join q{,}, @devices;
|
||||
return \@rets;
|
||||
}
|
||||
|
||||
sub DialogueTest{
|
||||
my $name = shift;
|
||||
my $rawd = shift;
|
||||
|
||||
my $hash = $defs{$name} // return;
|
||||
my $data;
|
||||
if ( !eval { $data = decode_json($rawd) ; 1 } ) {
|
||||
Log3($hash->{NAME}, 1, "JSON decoding error, $rawd seems not to be valid JSON data: $@");
|
||||
return "Error! $rawd seems not to be valid JSON data!";
|
||||
}
|
||||
my $site = $data->{siteId};
|
||||
my $type = $data->{Type};
|
||||
Log3('rhasspy',3 , "RHASSPY: Site $site, Type $type");
|
||||
my @devices = sort keys %{$hash->{helper}{devicemap}->{devices}};
|
||||
while (@devices > 2) {
|
||||
shift @devices; # limit triggered devices two to minimize unwanted side effects
|
||||
}
|
||||
my @rets;
|
||||
|
||||
#interactive dialogue as described in https://rhasspy.readthedocs.io/en/latest/reference/#dialoguemanager_continuesession and https://docs.snips.ai/articles/platform/dialog/multi-turn-dialog
|
||||
|
||||
#This example here just lets you confirm the action, as intent filter is limited to ConfirmAction
|
||||
|
||||
my $response = "RHASSPY asking for OK or cancellation: Site $site, Type $type";
|
||||
my $ca_string = qq{$hash->{LANGUAGE}.$hash->{fhemId}:ConfirmAction};
|
||||
my $reaction = { text => $response,
|
||||
intentFilter => ["$ca_string"] };
|
||||
|
||||
$rets[0] = $reaction;
|
||||
$rets[2] = 30; #timeout to replace default timeout
|
||||
|
||||
return \@rets;
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
__END__
|
||||
|
||||
=pod
|
||||
=begin html
|
||||
|
||||
<a name="RHASSPY_Demo_Utils"></a>
|
||||
<h3>RHASSPY_Demo_Utils</h3>
|
||||
<ul>
|
||||
<b>Routines to demonstrate how to handle function calls from within Custom intents in RHASSPY context</b><br>
|
||||
<li>BasicTest</li>
|
||||
This is to demonstrate how to get single elements from the message hash just by their name.</p>
|
||||
Example: <code>attr <rhasspyDevice> rhasspyIntents SetCustomIntentsBasicTest=RHASSPY::Demo::BasicTest(siteId,Type)</code></p>
|
||||
<li>DataTest</li>
|
||||
This is to demonstrate how to get NAME and entire message hash and return a list of devices that may have been triggered. This is just a showcase to extended options and might be a good starting point for developing own complex Custom Intent functions.</p>
|
||||
Example: <code>attr <rhasspyDevice> rhasspyIntents SetCustomIntentsDataTest=RHASSPY::Demo::DataTest(NAME,DATA)</code></p>
|
||||
<li>DialogueTest</li>
|
||||
This is to demonstrate how to keep dialogue open for some time and dynamically fill a slot for possible answer values to the dialoge. This is not fully tested jet and might somewhen in time be a good starting point for developing own complex Custom Intent functions including dialogues.</p>
|
||||
Example: <code>attr <rhasspyDevice> rhasspyIntents SetCustomIntentsDialogueTest=RHASSPY::Demo::DialogueTest(NAME,DATA)</code></p>
|
||||
</ul>
|
||||
=end html
|
||||
=cut
|
||||
83
fhem/contrib/RHASSPY/99_RHASSPY_Utils_siteId2room.pm
Normal file
83
fhem/contrib/RHASSPY/99_RHASSPY_Utils_siteId2room.pm
Normal file
@ -0,0 +1,83 @@
|
||||
##############################################
|
||||
# $Id$
|
||||
#
|
||||
|
||||
package RHASSPY::siteId2room; ## no critic 'Package declaration'
|
||||
|
||||
use strict;
|
||||
use warnings;
|
||||
use JSON;
|
||||
use Encode;
|
||||
use List::Util qw(max min);
|
||||
|
||||
use GPUtils qw(GP_Import);
|
||||
|
||||
## Import der FHEM Funktionen
|
||||
#-- Run before package compilation
|
||||
BEGIN {
|
||||
|
||||
# Import from main context
|
||||
GP_Import(
|
||||
qw(
|
||||
ReadingsVal
|
||||
readingsSingleUpdate
|
||||
Log3
|
||||
decode
|
||||
defs
|
||||
makeReadingName
|
||||
)
|
||||
);
|
||||
}
|
||||
|
||||
sub ::RHASSPY_Utils_siteId2room_Initialize { goto &Initialize }
|
||||
|
||||
# initialize ##################################################################
|
||||
sub Initialize {
|
||||
my $hash = shift;
|
||||
return;
|
||||
}
|
||||
|
||||
# Enter you functions below _this_ line.
|
||||
|
||||
sub siteId2room {
|
||||
my $name = shift;
|
||||
my $rawd = shift;
|
||||
|
||||
my $hash = $defs{$name} // return;
|
||||
my $data;
|
||||
if ( !eval { $data = decode_json($rawd) ; 1 } ) {
|
||||
Log3($hash->{NAME}, 1, "JSON decoding error, $rawd seems not to be valid JSON data: $@");
|
||||
return "Error! $rawd seems not to be valid JSON data!";
|
||||
}
|
||||
my $site = encode('UTF-8',$data->{siteId});
|
||||
my $room = encode('UTF-8',$data->{Room});
|
||||
my $rreading = makeReadingName("siteId2room_$site");
|
||||
|
||||
readingsSingleUpdate($hash, $rreading, $room, 1);
|
||||
|
||||
Log3($name, 5, "RHASSPY: Site $site now is in room $room");
|
||||
|
||||
my @rets;
|
||||
|
||||
$rets[0] = "Habe den Raum von $site auf $room geändert";
|
||||
$rets[1] = $name;
|
||||
return \@rets;
|
||||
}
|
||||
|
||||
|
||||
1;
|
||||
|
||||
__END__
|
||||
|
||||
=pod
|
||||
=begin html
|
||||
|
||||
<a name="RHASSPY_Utils_siteId2room"></a>
|
||||
<h3>RHASSPY_Utils_siteId2room</h3>
|
||||
<ul>
|
||||
<li>siteId2room</li>
|
||||
Routine to change the default room a siteId is assigned to. Might be usefull if you use e.g. your mobile phone as satellite.<br>
|
||||
Example: <code>attr <rhasspyDevice> rhasspyIntents siteId2room=RHASSPY::siteId2room::siteId2room(NAME,DATA)</code></p>
|
||||
</ul>
|
||||
=end html
|
||||
=cut
|
||||
144
fhem/contrib/RHASSPY/rhasspy-de.cfg
Normal file
144
fhem/contrib/RHASSPY/rhasspy-de.cfg
Normal file
@ -0,0 +1,144 @@
|
||||
#$Id$
|
||||
# Diese Datei an einem Ort ablegen, den der user fhem lesen kann
|
||||
# und dann diesen Ort im Attribut configFile hinterlegen. Beispiel:
|
||||
# attr <rhasspy> configFile ./log/rhasspy-de.cfg
|
||||
#
|
||||
# "commaconversion", "units" und "mutated_vowels" sind optional, wenn nicht
|
||||
# angegeben, werden die englischen Werte/Gepflogenheiten verwendet bzw. keine
|
||||
# Ersetzungen vorgenommen.
|
||||
|
||||
{"default":
|
||||
{
|
||||
"commaconversion": "1",
|
||||
"mutated_vowels": {
|
||||
"Ä": "Ae",
|
||||
"Ö": "Oe",
|
||||
"Ü": "Ue",
|
||||
"ß": "ss",
|
||||
"ä": "ae",
|
||||
"ö": "oe",
|
||||
"ü": "ue"
|
||||
},
|
||||
"units": {
|
||||
"unitHours" : {
|
||||
"0": "stunden",
|
||||
"1": "eine stunde"
|
||||
},
|
||||
"unitMinutes": {
|
||||
"0": "minuten",
|
||||
"1": "eine minute"
|
||||
},
|
||||
"unitSeconds": {
|
||||
"0": "sekunden",
|
||||
"1": "eine sekunde"
|
||||
}
|
||||
},
|
||||
"responses": {
|
||||
"DefaultConfirmation": "OK",
|
||||
"DefaultConfirmationTimeout": "Tut mir leid, da hat etwas zu lange gedauert",
|
||||
"DefaultConfirmationNoOutstanding": "warte grade nicht auf eine bestätigung",
|
||||
"DefaultCancelConfirmation": "Habe abgebrochen",
|
||||
"DefaultConfirmationReceived": "Ok, werde ich machen",
|
||||
"DefaultError": "Da ist leider etwas schief gegangen",
|
||||
"NoValidData": "Tut mir leid, aber ich habe zu wenig Daten um den Vorgang auszuführen",
|
||||
"NoDeviceFound": "Tut mir leid, ich konnte kein passendes Gerät finden",
|
||||
"NoMappingFound": "Tut mir leid, aber ich konnte kein passendes Mäpping finden",
|
||||
"NoNewValDerived": "Tut mir leid, aber ich konnte den Zielwert nicht ausrechnen",
|
||||
"NoActiveMediaDevice": "Tut mir leid, es ist kein Wiedergabegerät aktiv",
|
||||
"NoMediaChannelFound": "Tut mir leid, der angefragte Kanal scheint nicht zu existieren.",
|
||||
"duration_not_understood": "Tut mir leid, ich habe die Dauer nicht verstanden",
|
||||
"timerEnd": {
|
||||
"0": "$label abgelaufen",
|
||||
"1": "$label im raum $room abgelaufen"
|
||||
},
|
||||
"timerSet": {
|
||||
"0": "$label im Raum $room ist gestellt auf $seconds sekunden",
|
||||
"1": "$label im Raum $room ist gestellt auf $minutetext $seconds",
|
||||
"2": "$label im Raum $room ist gestellt auf $minutetext",
|
||||
"3": "$label im Raum $room ist gestellt auf $hours stunden $minutetext",
|
||||
"4": "$label im Raum $room ist gestellt auf $hours uhr $minutes",
|
||||
"5": "$label im Raum $room ist gestellt auf morgen, $hours uhr $minutes"
|
||||
},
|
||||
"timerCancellation": "$label im $room gelöscht",
|
||||
"timeRequest": "Es ist $hour Uhr $min",
|
||||
"weekdayRequest": "Heute ist $weekDay",
|
||||
"reSpeak_failed": "Tut mir leid, ich kann mich nicht erinnern",
|
||||
"Change": {
|
||||
"volume": "$deviceName ist auf $value gestellt",
|
||||
"brightness": "$deviceName ist auf $value gestellt",
|
||||
"temperature": {
|
||||
"0": "Die Temperatur von $location ist $value",
|
||||
"1": "Die Temperatur von $location beträgt $value Grad"
|
||||
},
|
||||
"desired-temp": "Die Solltemperatur von $location beträgt $value Grad",
|
||||
"battery": {
|
||||
"0": "Der Batteriestand von $location ist $value",
|
||||
"1": "Der Batteriestand von $location beträgt $value Prozent"
|
||||
},
|
||||
"waterLevel": "Der Wasserstand von $location beträgt $value Prozent",
|
||||
"airHumidity": "Die Luftfeuchtigkeit von $location beträgt $value Prozent",
|
||||
"soilMoisture": "Die Bodenfeuchte von $location beträgt $value Prozent",
|
||||
"setTarget": "$device ist auf $value gesetzt",
|
||||
"knownType": "$mappingType von $location beträgt $value Prozent",
|
||||
"unknownType": "Der Wert von $location beträgt $value Prozent"
|
||||
}
|
||||
},
|
||||
"stateResponses": {
|
||||
"onOff": {
|
||||
"0": "$deviceName ist ausgeschaltet",
|
||||
"1": "$deviceName ist eingeschaltet"
|
||||
},
|
||||
"openClose": {
|
||||
"0": "$deviceName ist geöffnet",
|
||||
"1": "$deviceName ist geschlossen"
|
||||
},
|
||||
"inOut": {
|
||||
"0": "$deviceName ist ausgefahren",
|
||||
"1": "$deviceName ist eingefahren"
|
||||
},
|
||||
"inOperation": {
|
||||
"0": "$deviceName ist fertig",
|
||||
"1": "$deviceName läuft noch"
|
||||
}
|
||||
}
|
||||
},
|
||||
"user":
|
||||
{
|
||||
"units": {
|
||||
"unitSeconds": {
|
||||
"0": "Test einige Sekunden",
|
||||
"1": "Test genau eine Sekunde"
|
||||
}
|
||||
}
|
||||
|
||||
},
|
||||
"slots":
|
||||
{
|
||||
"Colors": "braun:20,
|
||||
grüngelb:90,
|
||||
blaurot:330,
|
||||
leichtes grüngelb:75,
|
||||
grünblau:210,
|
||||
rot:0,
|
||||
grün:120,
|
||||
magenta:300,
|
||||
indigo:255,
|
||||
dunkelgrün:120,
|
||||
leichtes blaurot:345,
|
||||
zinnober:15,
|
||||
cyan:180,
|
||||
leichtes grünblau:225,
|
||||
leichtes blaugrün:135,
|
||||
limett:105,
|
||||
orange:30,
|
||||
blaugrün:150,
|
||||
gelb:60,
|
||||
blau:240,
|
||||
blaumagenta:315,
|
||||
grüncyan:165,
|
||||
violett:270,
|
||||
blaucyan:195,
|
||||
rotmagenta:315,
|
||||
safran:45"
|
||||
}
|
||||
}
|
||||
Loading…
Reference in New Issue
Block a user