web_user = cur.get(config,"web","user")
web_pass = cur.get(config,"web","password")
web_devid = cur.get(config,"web","devid")
+
+ web_iface = cur.get(config,"web","iface")
+
+ if web_iface then
- io.input("/sys/class/net/eth0/address")
- mac = io.read("*line")
- mac = mac:gsub(":","")
- mac = mac:upper()
+ command = '/sbin/ifconfig '..web_iface..' | grep \'\\<inet\\>\' | sed -n \'1p\' | tr -s \' \' | cut -d \' \' -f3 | cut -d \':\' -f2'
+ f=io.popen(command,'r')
+ ip_addr=f:read()
+
+ end
- web_devid = web_devid or mac
+ if not web_devid then
+
+ if web_iface then
+ io.input("/sys/class/net/"..web_iface.."/address")
+ else
+ io.input("/sys/class/net/eth0/address")
+ end
+
+ mac = io.read("*line")
+ mac = mac:gsub(":","")
+ mac = mac:upper()
+
+ web_devid = mac
+
+ end
logging = cur.get(config,"logging","enabled")
+ serial_port = cur.get(config,"serial","port")
+ serial_baud = cur.get(config,"serial","baud")
+
+ input_file = cur.get(config,"input","file")
+ input_exec = cur.get(config,"input","exec")
+ alarm_exec = cur.get(config,"alarm","exec")
+
+ if serial_port then
+
+ command = "stty -F "..serial_port.." "..serial_baud
+ os.execute(command)
+
+ end
+
+ mqtt_host = cur.get(config,"mqtt","host")
+ mqtt_port = cur.get(config,"mqtt","port")
+ mqtt_id = cur.get(config,"mqtt","id")
+ mqtt_topic = cur.get(config,"mqtt","topic")
+ mqtt_alarm_topic = cur.get(config,"mqtt","alarm_topic")
+
+ if mqtt_host and not mqtt_id then
+ mqtt_id="weather-"..web_devid
+ end
+
+ if mqtt_host and not mqtt_port then
+ mqtt_port = 1883
+ end
+
+ if mqtt_host and not mqtt_topic then
+ mqtt_topic = 'weathermon/'..web_devid
+ end
+
+ if mqtt_host and not mqtt_alarm_topic then
+ mqtt_alarm_topic = 'alarm/'..web_devid
+ end
+
end
require "socket"
function submitValue(type,id,param,val)
- printLog("URL="..web_url)
-
url = web_url.."?stype="..type.."&sid="..id.."¶m="..param.."&value="..val
- printLog(url)
-
command = "curl"
+ if web_iface then
+ command = command.." --interface "..ip_addr
+ end
+
if web_user then
command = command.." -u "..web_user..":"..web_pass
end
command = command.." \""..url.."\""
- printLog("COMMAND=\""..command.."\"")
os.execute(command)
- print("")
end
end
end
end
+ mqtt_param = {}
for k,v in pairs(sensor) do
- printLog("Type = "..sensor_type..", ID = "..sensor_id..", Param = "..key..", Value = "..value)
- submitValue(sensor_type,sensor_id,key,value)
+ 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)
+ end
+ elseif msg_type=="ALARM" then
+ printLog("ALARM: "..msg_body)
+ sens = splitStr(msg_body,",")
+ sensor = {}
+ idx = 1
+ sensor_type = nil
+ sensor_id = web_devid
+ mqtt_param = {}
+ for i,rec in ipairs(sens) do
+ recrd=splitStr(rec,'=')
+ key=recrd[1] or nil
+ value=recrd[2] or nil
+ 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)
+ end
+ if alarm_exec then
+ command=alarm_exec..
+ " \""..string.gsub(alarm_type,"\"","\\\"")..
+ "\" \""..string.gsub(alarm_id,"\"","\\\"")..
+ "\" \""..string.gsub(msg_body,"\"","\\\"").."\""
+ os.execute(command)
end
end
getConfig()
-line=arg[1]
-print(line)
-processLine(line)
+if mqtt_host then
+ MQTT = require "paho.mqtt"
+ mqtt_client = MQTT.client.create(mqtt_host, mqtt_port)
+ mqtt_client:connect(mqtt_id)
+ json = require( "json" )
+end
+
+if serial_port then
+ serialin=io.open(serial_port,"r")
+elseif input_file == "-" then
+ serialin=io.stdin;
+elseif input_file then
+ serialin=io.open(input_file,"r")
+elseif input_exec then
+ serialin=io.popen(input_exec,"r")
+else
+ printLog("No input selected")
+ return
+end
+while 1 do
+ line=serialin:read()
+ print(line)
+ processLine(line)
+end