FHEM/mod-GardenaSmart
1
0
Fork 0
Code Issues 2 Pull Requests Releases 3 Wiki Activity

patch-watercontrol_schedule #32

Merged
sebastianschwarz merged 4 commits from patch-watercontrol_schedule into devel 2021-05-30 20:37:06 +00:00
Conversation 1 Commits 4 Files Changed 3 +16 -4
2 changed files with 16 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files
Showing only changes of commit 249f996db7 - Show all commits

16
FHEM/74_GardenaSmartDevice.pm
View File

@ -377,6 +377,18 @@ sub Set {
. ',"valve_id":'
. $valve_id . '}}';
}
elsif ( $cmd =~ /.*Schedule/ ){
my $duration = (( defined($aArg->[0]) ? ( ((Time::Piece->new)+(ONE_HOUR * $aArg->[0]) - (Time::Piece->new)->tzoffset )->datetime ).'.000Z' : '2040-12-31T22:00:00.000Z'));
$abilities = 'wateringcomputer_settings';
$service_id = $hash->{helper}->{'schedules_paused_until_id'};
$payload = '"settings":{"name":"schedules_paused_until"'
. ', "value":"'
. ($cmd eq 'resumeSchedule' ? '' : $duration )
. '","device":"'
. $hash->{DEVICEID}
. '"}';
}
elsif ( lc $cmd eq 'on' || lc $cmd eq 'off' || lc $cmd eq 'on-for-timer' ) {
my $val = (
defined($aArg) && ref($aArg) eq 'ARRAY'
@ -408,7 +420,7 @@ sub Set {
elsif ( $cmd =~ /.*ScheduleValve/ ){
my $valve_id = $aArg->[0];
my $duration = (( defined($aArg->[1]) ? ( ((Time::Piece->new)+(ONE_HOUR * $aArg->[1]) - (Time::Piece->new)->tzoffset )->datetime ).'.000Z' : '2040-12-31T22:00:00.000Z'));
$abilities = 'irrigation_settings';
$service_id = $hash->{helper}->{'schedules_paused_until_'.$valve_id.'_id'};
$payload = '"settings":{"name":"schedules_paused_until_'
@ -452,7 +464,7 @@ sub Set {
'parkUntilFurtherNotice:noArg parkUntilNextTimer:noArg startResumeSchedule:noArg startOverrideTimer:slider,0,1,240 startpoint'
if ( AttrVal( $name, 'model', 'unknown' ) eq 'mower' );
$list .= 'manualOverride:slider,1,1,59 cancelOverride:noArg'
$list .= 'manualOverride:slider,1,1,59 cancelOverride:noArg resumeSchedule:noArg stopSchedule'
if ( AttrVal( $name, 'model', 'unknown' ) eq 'watering_computer' );
$list .=

4
controls_GardenaSmartDevice.txt
View File

@ -1,2 +1,2 @@
UPD 2021-05-22_04:53:56 46135 FHEM/73_GardenaSmartBridge.pm
UPD 2021-05-22_04:54:14 51644 FHEM/74_GardenaSmartDevice.pm
UPD 2021-05-26_20:23:34 46135 FHEM/73_GardenaSmartBridge.pm
UPD 2021-05-26_20:36:16 52284 FHEM/74_GardenaSmartDevice.pm