FHEM/mod-SmarterCoffee
Archived
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

last State

Browse Source
This commit is contained in:
Marko Oldenburg
2018-10-07 09:45:00 +02:00
parent 96049ae1f9
commit 0060f3abe0
1 changed files with 15 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
98_SmarterCoffee.pm
View File

@@ -405,7 +405,7 @@ sub SmarterCoffee_Connect($) {
DevIo_CloseDev($hash) if DevIo_IsOpen($hash); DevIo_CloseDev($hash) if DevIo_IsOpen($hash);
delete $hash->{DevIoJustClosed} if ($hash->{DevIoJustClosed}); delete $hash->{DevIoJustClosed} if ($hash->{DevIoJustClosed});
SmarterCoffee_ReConnectTimer($hash) InternalTimer(gettimeofday() + 15, "SmarterCoffee_ReConnectTimer", $hash)
unless( AttrVal($hash->{NAME},'reconnectTimer',0) == 0 ); unless( AttrVal($hash->{NAME},'reconnectTimer',0) == 0 );
return SmarterCoffee_OpenIfRequiredAndWritePending($hash, $isNewConnection); return SmarterCoffee_OpenIfRequiredAndWritePending($hash, $isNewConnection);
@@ -598,6 +598,18 @@ sub SmarterCoffee_Attr(@) {
Log3 $name, 3, "SmarterCoffee ($name) - delete Internal devioLoglevel"; Log3 $name, 3, "SmarterCoffee ($name) - delete Internal devioLoglevel";
} }
} }
elsif( $attrName eq "reconnectTimer" ) {
if( $cmd eq "set" ) {
RemoveInternalTimer($hash,'SmarterCoffee_ReConnectTimer');
SmarterCoffee_ReConnectTimer($hash);
Log3 $name, 3, "SmarterCoffee ($name) - set Attribute reconnectTimer";
} elsif( $cmd eq "del" ) {
RemoveInternalTimer($hash,'SmarterCoffee_ReConnectTimer');
Log3 $name, 3, "SmarterCoffee ($name) - delete Attribute reconnectTimer";
}
}
return undef; return undef;
} }
@@ -1326,11 +1338,11 @@ sub SmarterCoffee_ReConnectTimer($) {
if( defined($hash->{FD}) ) { if( defined($hash->{FD}) ) {
DevIo_Disconnected($hash); DevIo_Disconnected($hash);
DevIo_OpenDev($hash, 1, undef); DevIo_OpenDev($hash, 1, "SmarterCoffee_WritePending");
Log3 $hash->{NAME}, 4, "SmarterCoffee_ReConnectTimer - Socket Reconnected"; Log3 $hash->{NAME}, 4, "SmarterCoffee_ReConnectTimer - Socket Reconnected";
} }
InternalTimer(gettimeofday() + 480, "SmarterCoffee_ReConnectTimer", $hash); InternalTimer(gettimeofday() + 360, "SmarterCoffee_ReConnectTimer", $hash);
Log3 $hash->{NAME}, 4, "SmarterCoffee_ReConnectTimer - Call InternalTimer"; Log3 $hash->{NAME}, 4, "SmarterCoffee_ReConnectTimer - Call InternalTimer";
} }