function submitValue(type,id,param,val)
- if web_url then
+ val = tonumber(val)
+
+ if web_url and val then
local url = web_url.."?stype="..url_encode(type).."&sid="..url_encode(id).."¶m="..url_encode(param).."&value="..url_encode(val)
return req_sock
end})
- if code ~= 200 then
- print("writing record to backlog...")
+ if code ~= 200 and backlog_con then
+ printLog("writing record to backlog...")
backlog_con:execute(string.format("INSERT INTO queue(time_stamp,sensor_id,sensor,param,value) VALUES (datetime('now','localtime'),'%s','%s','%s',%f)",id,type,param,val))
end
if backlogdb then
if not file_exists(backlogdb) then
touch(backlogdb)
- backlog_con = assert(env:connect(backlogdb))
- backlog_con:execute("CREATE TABLE queue(time_stamp datetime,sensor_id varchar(16),sensor varchar(16),param varchar(16),value float)")
- else
- backlog_con = assert(env:connect(backlogdb))
- end
+ end
+ backlog_con = assert(env:connect(backlogdb))
+ backlog_con:execute("CREATE TABLE queue(time_stamp datetime,sensor_id varchar(16),sensor varchar(16),param varchar(16),value float)")
end
if logdb then
if not file_exists(logdb) then
touch(logdb)
- log_con = assert(env:connect(logdb))
- log_con:execute("CREATE TABLE log(time_stamp datetime,sensor_id varchar(16),sensor varchar(16),param varchar(16),value float)")
- log_con:execute("CREATE INDEX log_idx ON log(sensor_id,sensor,param,time_stamp)")
- else
- log_con = assert(env:connect(logdb))
- end
+ end
+ log_con = assert(env:connect(logdb))
+ log_con:execute("CREATE TABLE log(time_stamp datetime,sensor_id varchar(16),sensor varchar(16),param varchar(16),value float)")
+ log_con:execute("CREATE INDEX log_idx ON log(sensor_id,sensor,param,time_stamp)")
end
if mqtt_host then
return
end
+serialin:setvbuf('no')
+
records = {}
while 1 do