--[[
Licensed under GNU General Public License v2
- * (c) 2013, Luke Bonham
+ * (c) 2013, Luke Bonham
--]]
local debug = require("debug")
local capi = { timer = timer }
-local io = { open = io.open,
- lines = io.lines }
+local io = { open = io.open,
+ lines = io.lines,
+ popen = io.popen }
local rawget = rawget
-- Lain helper functions for internal use
return f ~= nil
end
--- get all lines from a file, returns an empty
+-- get all lines from a file, returns an empty
-- list/table if the file does not exist
function helpers.lines_from(file)
if not helpers.file_exists(file) then return {} end
lines = {}
- for line in io.lines(file) do
+ for line in io.lines(file) do
lines[#lines + 1] = line
end
return lines
-- returns nil otherwise
function helpers.first_nonempty_line(file)
for k,v in pairs(helpers.lines_from(file)) do
- if #v then return v end
+ if #v then return v end
end
return nil
end
helpers.timer_table = {}
-function helpers.newtimer(name, timeout, fun, nostart)
- helpers.timer_table[name] = capi.timer({ timeout = timeout })
+function helpers.newtimer(_name, timeout, fun, nostart)
+ local name = timeout
+
+ if not helpers.timer_table[name] then
+ helpers.timer_table[name] = capi.timer({ timeout = timeout })
+ helpers.timer_table[name]:start()
+ end
+
helpers.timer_table[name]:connect_signal("timeout", fun)
- helpers.timer_table[name]:start()
+
if not nostart then
helpers.timer_table[name]:emit_signal("timeout")
end
-- }}}
+-- {{{ Pipe operations
+
+-- read the full output of a pipe (command)
+function helpers.read_pipe(cmd)
+ local f = assert(io.popen(cmd))
+ local output = f:read("*all")
+ f:close()
+ return output
+end
+
+-- }}}
+
-- {{{ A map utility
helpers.map_table = {}