FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-01-31 06:39:11 +00:00
Code Issues Releases Wiki Activity

57_SSCal: compatibility to DSM7

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@24736 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2021-07-12 15:43:19 +00:00
parent 35473aeb15
commit 699c3253b9
2 changed files with 18 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
fhem/CHANGED
View File

@ -1,5 +1,6 @@
# Add changes at the top of the list. Keep it in ASCII, and 80-char wide. # Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
# Do not insert empty lines here, update check depends on it. # Do not insert empty lines here, update check depends on it.
- change: 57_SSCal: compatibility to DSM7
- bugfix: 10_WS980: v.1.5.0 fix fhem-crash when autodiscovery fails - bugfix: 10_WS980: v.1.5.0 fix fhem-crash when autodiscovery fails
- change: 10_WS980: allow to ignore invalid values - change: 10_WS980: allow to ignore invalid values
- feature: 49_SSCam: new value 8.2.8-xxxx for attr simu_SVSversion - feature: 49_SSCam: new value 8.2.8-xxxx for attr simu_SVSversion

25
fhem/FHEM/57_SSCal.pm
View File

@ -3,7 +3,7 @@
######################################################################################################################### #########################################################################################################################
# 57_SSCal.pm # 57_SSCal.pm
# #
# (c) 2019 - 2020 by Heiko Maaz # (c) 2019 - 2021 by Heiko Maaz
# e-mail: Heiko dot Maaz at t-online dot de # e-mail: Heiko dot Maaz at t-online dot de
# #
# This Module integrate the Synology Calendar into FHEM # This Module integrate the Synology Calendar into FHEM
@ -140,6 +140,7 @@ BEGIN {
# Versions History intern # Versions History intern
my %vNotesIntern = ( my %vNotesIntern = (
"2.4.9" => "11.07.2021 set adaption of AUTH for DSM7 compatibility ",
"2.4.8" => "16.12.2020 accep umlauts in calendar name ", "2.4.8" => "16.12.2020 accep umlauts in calendar name ",
"2.4.7" => "08.12.2020 fix handle code recognition in createAtDevices as single line ", "2.4.7" => "08.12.2020 fix handle code recognition in createAtDevices as single line ",
"2.4.6" => "06.11.2020 bugfix weekly byDay ", "2.4.6" => "06.11.2020 bugfix weekly byDay ",
@ -217,6 +218,11 @@ my %hget = ( # Ha
versionNotes => { fn => \&_getversionNotes, needcred => 0 }, versionNotes => { fn => \&_getversionNotes, needcred => 0 },
); );
my %hvada = ( # Funktionshash Version Adaption
"a01" => {AUTH => "6", INFO => "1", CAL => "2",
EVENT => "3", SHARE => "1", TODO => "1" },
);
# Versions History extern # Versions History extern
my %vNotesExtern = ( my %vNotesExtern = (
"2.4.0" => "19.05.2020 Switched to Perl packages. Use <i>FHEM::SSCal::calAsHtml</i> from now instead of ". "2.4.0" => "19.05.2020 Switched to Perl packages. Use <i>FHEM::SSCal::calAsHtml</i> from now instead of ".
@ -873,6 +879,8 @@ sub _setlogout {
my $name = $paref->{name}; my $name = $paref->{name};
logout($hash, $data{SSCal}{$name}{calapi}, $splitstr); logout($hash, $data{SSCal}{$name}{calapi}, $splitstr);
delete $data{SSCal}{$name}{calapi}{PARSET}; # erzwinge Abruf API beim nächsten Login
return; return;
} }
@ -1247,15 +1255,14 @@ sub getApiSites_parse { ## no critic 'complex
# Downgrades für nicht kompatible API-Versionen. Hier nur nutzen wenn API zentral downgraded werden soll # Downgrades für nicht kompatible API-Versionen. Hier nur nutzen wenn API zentral downgraded werden soll
Log3($name, 4, "$name - ------- Begin of adaption section -------"); Log3($name, 4, "$name - ------- Begin of adaption section -------");
my @sims; my $adavs = "a01"; # adaptierte Version
push @sims, "EVENT:3"; if($adavs) {
for my $av (sort keys %{$hvada{$adavs}}) {
for my $esim (@sims) { $data{SSCal}{$name}{calapi}{$av}{VER} = $hvada{$adavs}{$av};
my($k,$v) = split ":", $esim; $data{SSCal}{$name}{calapi}{$av}{MOD} = "yes";
$data{SSCal}{$name}{calapi}{$k}{VER} = $v; Log3($name, 4, "$name - Version of $data{SSCal}{$name}{calapi}{$av}{NAME} adapted to: $data{SSCal}{$name}{calapi}{$av}{VER}");
$data{SSCal}{$name}{calapi}{$k}{MOD} = "yes"; }
Log3($name, 4, "$name - Version of $data{SSCal}{$name}{calapi}{$k}{NAME} adapted to: $data{SSCal}{$name}{calapi}{$k}{VER}");
} }
Log3($name, 4, "$name - ------- End of adaption section -------"); Log3($name, 4, "$name - ------- End of adaption section -------");