From 9efb310110d8ec5e20ae9eb11f7ab36ed7b6b112 Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Fri, 18 Sep 2020 16:06:16 +0200
Subject: [PATCH] request setting on heartbeat

---
 zc-mqtt | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/zc-mqtt b/zc-mqtt
index 6aeafb7..f954956 100755
--- a/zc-mqtt
+++ b/zc-mqtt
@@ -73,6 +73,19 @@ while (1) {
       } else {
         print $msg->string, "\n";
       }
+
+#      if ( $msg->topic =~ m{Inclinometer/ZCT330Ex_SWP_N_YK/869858031634109/up} ) {
+      if ( substr($msg->message,2,1) eq "\x07" ) { # heartbeat
+	my $raw = "\x5a\x0b\x03\x09\x00\x00\x04\xe8\x03\x00\x00\x21\x44\xaa\x4B\xF3";
+	my $topic = $msg->topic;
+	$topic =~ s/up$/down/;
+	send_message($socket,
+		message_type => MQTT_PUBLISH,
+		retain => 0, #$retain,
+		topic => $topic,
+		message => $raw);
+      }
+
       if (defined $count && --$count == 0) {
         exit;
       }
-- 
2.20.1