Исправлена ошибка, из-за которой программа падала на некорректном (без разделителей...

[weathermon.git] / weathermon.lua

diff --git a/weathermon.lua b/weathermon.lua
index 5e193487d37bbdeeca22f122a8ed4f3b35a50a92..d1917c1c4ef203be8bef441b79a362ad4bbafb51 100755 (executable)
--- a/weathermon.lua
+++ b/weathermon.lua
@@ -71,11 +71,11 @@ function getConfig()
   end
 
   if mqtt_host and not mqtt_topic then
-    mqtt_topic = 'weathermon/'..web_devid
+    mqtt_topic = 'weathermon/{dev}/{type}/{id}/{param}'
   end
 
   if mqtt_host and not mqtt_alarm_topic then
-    mqtt_alarm_topic = 'alarm/'..web_devid
+    mqtt_alarm_topic = 'alarm/{dev}/{type}/{id}'
   end
 
 end
@@ -139,8 +139,8 @@ end
 function processLine(str)
 
   msg=splitStr(line,':')
-  msg_type=msg[1] or nil
-  msg_body=msg[2] or nil
+  msg_type=msg[1] or ''
+  msg_body=msg[2] or ''
   if msg_type=="STATUS" then
     printLog("Status: "..msg_body)
   elseif msg_type=="ERROR" then
@@ -154,8 +154,8 @@ function processLine(str)
     sensor_id = web_devid
     for i,rec in ipairs(sens) do
       recrd=splitStr(rec,'=')
-      key=recrd[1] or nil
-      value=recrd[2] or nil
+      key=recrd[1] or ''
+      value=recrd[2] or ''
       if value then
         if key=="TYPE" then
           sensor_type=value
@@ -166,16 +166,26 @@ function processLine(str)
         end
       end
     end
-    mqtt_param = {}
     for k,v in pairs(sensor) do
       printLog("Type = "..sensor_type..", ID = "..sensor_id..", Param = "..k..", Value = "..v)
       submitValue(sensor_type,sensor_id,k,v)
-      mqtt_param[k]=v
-    end
-    mqtt_msg = { type=sensor_type, id=sensor_id, data=mqtt_param }
-    if mqtt_client then
-      serializedString = json.encode(mqtt_msg)
-      mqtt_client:publish(mqtt_topic,serializedString)
+      if mqtt_client then
+        mqtt_path=string.gsub(mqtt_topic,"{(.-)}", 
+          function (name) 
+            if name=="dev" then
+              return web_devid
+            elseif name=="type" then
+              return sensor_type
+            elseif name=="id" then
+              return sensor_id
+            elseif name=="param" then
+              return k
+            else
+              return '{'..name..'}'
+            end      
+          end)
+        mqtt_client:publish(mqtt_path,v)
+      end  
     end
   elseif msg_type=="ALARM" then
     printLog("ALARM: "..msg_body)  
@@ -187,22 +197,30 @@ function processLine(str)
     mqtt_param = {}
     for i,rec in ipairs(sens) do
       recrd=splitStr(rec,'=')
-      key=recrd[1] or nil
-      value=recrd[2] or nil
+      key=recrd[1] or ''
+      value=recrd[2] or ''
       if value then
         if key=="TYPE" then
           alarm_type=value
         elseif key=="ID" then
           alarm_id=value
-        else
-          mqtt_param[key]=value
         end
       end
     end
     if mqtt_client then
-      mqtt_msg = { type = alarm_type, id = alarm_id, data = mqtt_param }
-      serializedString = json.encode(mqtt_msg)
-      mqtt_client:publish(mqtt_alarm_topic,serializedString)
+      mqtt_path=string.gsub(mqtt_alarm_topic,"{(.-)}", 
+        function (name) 
+          if name=="dev" then
+            return web_devid
+          elseif name=="type" then
+            return sensor_type
+          elseif name=="id" then
+            return sensor_id
+          else
+            return '{'..name..'}'
+          end      
+        end)
+      mqtt_client:publish(mqtt_path,msg_body)
     end
     if alarm_exec then
       command=alarm_exec..