From 0b64f165a41d9fdf1768ec9ef12809b0e7cdb86a Mon Sep 17 00:00:00 2001 From: sailor-fhem <> Date: Mon, 12 Oct 2015 08:50:32 +0000 Subject: [PATCH] 73_km200: Update: Improving error message in state git-svn-id: https://svn.fhem.de/fhem/trunk@9442 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/73_km200.pm | 27 ++++++++++++++------------- 1 file changed, 14 insertions(+), 13 deletions(-) diff --git a/fhem/FHEM/73_km200.pm b/fhem/FHEM/73_km200.pm index 40db60b39..181e00de9 100644 --- a/fhem/FHEM/73_km200.pm +++ b/fhem/FHEM/73_km200.pm @@ -1,4 +1,4 @@ -# $Id: 73_km200.pm 0054 2015-10-09 16:30:00Z Matthias_Deeke $ +# $Id: 73_km200.pm 0055 2015-10-11 10:45:00Z Matthias_Deeke $ ######################################################################################################################## # # 73_km200.pm @@ -212,7 +212,8 @@ # 0053 15.07.2015 Sailor km200_ParseHttpResponseInit Static Service deleted # 0053 15.07.2015 Sailor km200_GetStatService Deleted # 0053 15.07.2015 Sailor km200_ParseHttpResponseStat Deleted -# 0053 09.10.2015 Sailor km200_ParseHttpResponseInit Adding a timer to restart Initialisation process if first contact failed. +# 0054 09.10.2015 Sailor km200_ParseHttpResponseInit Adding a timer to restart Initialisation process if first contact failed. +# 0055 09.10.2015 Sailor km200_ParseHttpResponseInit Setting state accordingly if connection is failed ######################################################################################################################## @@ -281,7 +282,7 @@ sub km200_Define($$) my $url = $a[2]; my $km200_gateway_password = $a[3]; my $km200_private_password = $a[4]; - my $ModuleVersion = "0054"; + my $ModuleVersion = "0055"; $hash->{NAME} = $name; $hash->{STATE} = "define"; @@ -2076,19 +2077,19 @@ sub km200_ParseHttpResponseInit($) my $type; my $json ->{type} = ""; - - ### Log entries for debugging purposes - # Log3 $name, 5, $name. " : km200_ParseHttpResponseInit: Try to parse : " .$Service; - ### Log entries for debugging purposes - - if($err ne "") { + ### Create Log entry Log3 $name, 2, $name . " : km200_ParseHttpResponseInit - ERROR - Service: ".$Service. ": No proper Communication with Gateway: " .$err; if ($hash->{CONSOLEMESSAGE} == true) {print("km200_ParseHttpResponseInit ERROR: $err\n");} + + ### Set status of km200 fhem module + $hash->{STATE} = "ERROR - Initial Connection failed... Try to re-connect in 10s"; ### Start the timer for polling again but wait 10s InternalTimer(gettimeofday()+10, "km200_GetInitService", $hash, 0); + + ### Create Log entry Log3 $name, 2, $name . " : km200_ParseHttpResponseInit - ERROR - Timer restarted to try again in 10s"; return "ERROR"; @@ -3229,9 +3230,9 @@ sub km200_ParseHttpResponseDyn($)