2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 03:06:37 +00:00

00_HMLAN:correct time zone handling. Should have no impact to the behavior or timing

git-svn-id: https://svn.fhem.de/fhem/trunk@18041 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2018-12-23 18:17:01 +00:00
parent 9b5629c6da
commit 7bf89a4b28

View File

@ -927,7 +927,7 @@ sub HMLAN_DoInit($) {##########################################################
HMLAN_assignIDs($hash);
HMLAN_writeAesKey($name);
my $s2000 = sprintf("%02X", HMLAN_secSince2000());
HMLAN_SimpleWrite($hash, "T$s2000,04,00,00000000");
HMLAN_SimpleWrite($hash, "T$s2000,02,00,00000000");
$hash->{helper}{setTime} = int(gettimeofday())>>15;
delete $hash->{helper}{ref};
@ -996,7 +996,7 @@ sub HMLAN_KeepAlive($) {#######################################################
if( $rht != $hash->{helper}{setTime}){# reset HMLAN watch about each 10h
$hash->{helper}{setTime} = $rht;
my $s2000 = sprintf("%02X", HMLAN_secSince2000());
HMLAN_SimpleWrite($hash, "T$s2000,04,00,00000000");
HMLAN_SimpleWrite($hash, "T$s2000,02,00,00000000");
}
HMLAN_SimpleWrite($hash, "K");
@ -1049,7 +1049,7 @@ sub HMLAN_secSince2000() {#####################################################
$t += 60*(($l[2]-$g[2] + ((($l[5]<<9)|$l[7]) <=> (($g[5]<<9)|$g[7])) * 24) * 60 + $l[1]-$g[1])
# timezone and daylight saving...
- 946684800 # seconds between 01.01.2000, 00:00 and THE EPOCH (1970)
- 7200; # HM Special
- 3600; # time zone
return $t;
}
sub HMLAN_qResp($$$) {#response-waiting queue##################################