From 3fa145ef055689ca26697b2373c49a7ca84fb5d1 Mon Sep 17 00:00:00 2001 From: rudolfkoenig <> Date: Wed, 12 Apr 2023 09:39:43 +0000 Subject: [PATCH] 00_MQTT2_CLIENT.pm: nextOpenDelay Attribut (Forum #111959) git-svn-id: https://svn.fhem.de/fhem/trunk@27435 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/00_MQTT2_CLIENT.pm | 15 ++++++++++++--- 1 file changed, 12 insertions(+), 3 deletions(-) diff --git a/fhem/FHEM/00_MQTT2_CLIENT.pm b/fhem/FHEM/00_MQTT2_CLIENT.pm index 34db5d6e6..c1c650845 100644 --- a/fhem/FHEM/00_MQTT2_CLIENT.pm +++ b/fhem/FHEM/00_MQTT2_CLIENT.pm @@ -54,6 +54,7 @@ MQTT2_CLIENT_Initialize($) msgAfterConnect msgBeforeDisconnect mqttVersion:3.1.1,3.1 + nextOpenDelay privacy:0,1 qosMaxQueueLength rawEvents @@ -118,21 +119,21 @@ MQTT2_CLIENT_connect($;$) return; } - my $cfn = AttrVal($hash->{NAME}, "connectFn", undef); # for AWS-IOT / auth + my $cfn = AttrVal($me, "connectFn", undef); # for AWS-IOT / auth if($cfn) { if($calledFromConnectFn) { delete($hash->{inConnectFn}); } else { return if($hash->{inConnectFn}); # called by readyFn $hash->{inConnectFn} = 1; - $cfn = EvalSpecials($cfn, ("%NAME" => $hash->{NAME})); + $cfn = EvalSpecials($cfn, ("%NAME" => $me)); return AnalyzeCommand(undef, $cfn); } } my $disco = (DevIo_getState($hash) eq "disconnected"); $hash->{connecting} = 1 if($disco && !$hash->{connecting}); - $hash->{nextOpenDelay} = 10; + $hash->{nextOpenDelay} = AttrVal($me, "nextOpenDelay", 10); $hash->{BUF}=""; if($hash->{DeviceName} =~ m/^wss?:/) { $hash->{binary} = 1; @@ -985,6 +986,14 @@ MQTT2_CLIENT_feedTheList($$$;$) set the MQTT protocol version in the CONNECT header, default is 3.1 + +