-
--[[
-
- Licensed under GNU General Public License v2
- * (c) 2013, Luke Bonham
- * (c) 2010-2012, Peter Hofmann
- * (c) 2010, Adrian C. <anrxc@sysphere.org>
-
+
+ Licensed under GNU General Public License v2
+ * (c) 2013, Luca CPZ
+
--]]
-local awful = require("awful")
-local debug = require("debug")
-local pairs = pairs
-local rawget = rawget
+local spawn = require("awful.spawn")
+local timer = require("gears.timer")
+local debug = require("debug")
+local io = { lines = io.lines,
+ open = io.open }
+local pairs = pairs
+local rawget = rawget
+local table = { sort = table.sort, unpack = table.unpack }
+local unpack = unpack or table.unpack -- lua 5.1 retro-compatibility
-- Lain helper functions for internal use
-- lain.helpers
-- }}}
--- {{{
--- If lain.terminal is a string, e.g. "xterm", then "xterm -e " .. cmd is
--- run. But if lain.terminal is a function, then terminal(cmd) is run.
-
-function helpers.run_in_terminal(cmd)
- if type(terminal) == "function"
- then
- terminal(cmd)
- elseif type(terminal) == "string"
- then
- awful.util.spawn(terminal .. ' -e ' .. cmd)
+-- {{{ File operations
+
+-- check if the file exists and is readable
+function helpers.file_exists(path)
+ local file = io.open(path, "rb")
+ if file then file:close() end
+ return file ~= nil
+end
+
+-- get a table with all lines from a file
+function helpers.lines_from(path)
+ local lines = {}
+ for line in io.lines(path) do
+ lines[#lines + 1] = line
end
+ return lines
end
--- }}}
+-- get a table with all lines from a file matching regexp
+function helpers.lines_match(regexp, path)
+ local lines = {}
+ for line in io.lines(path) do
+ if string.match(line, regexp) then
+ lines[#lines + 1] = line
+ end
+ end
+ return lines
+end
--- {{{ Format units to one decimal point
+-- get first line of a file
+function helpers.first_line(path)
+ local file, first = io.open(path, "rb"), nil
+ if file then
+ first = file:read("*l")
+ file:close()
+ end
+ return first
+end
-function helpers.uformat(array, key, value, unit)
- for u, v in pairs(unit) do
- array["{"..key.."_"..u.."}"] = string.format("%.1f", value/v)
+-- get first non empty line from a file
+function helpers.first_nonempty_line(path)
+ for line in io.lines(path) do
+ if #line then return line end
end
- return array
+ return nil
end
-- }}}
--- {{{ Read the first line of a file or return nil.
+-- {{{ Timer maker
+
+helpers.timer_table = {}
-function helpers.first_line(f)
- local fp = io.open(f)
- if not fp
- then
- return nil
+function helpers.newtimer(name, timeout, fun, nostart, stoppable)
+ if not name or #name == 0 then return end
+ name = (stoppable and name) or timeout
+ if not helpers.timer_table[name] then
+ helpers.timer_table[name] = timer({ timeout = timeout })
+ helpers.timer_table[name]:start()
end
+ helpers.timer_table[name]:connect_signal("timeout", fun)
+ if not nostart then
+ helpers.timer_table[name]:emit_signal("timeout")
+ end
+ return stoppable and helpers.timer_table[name]
+end
+
+-- }}}
+
+-- {{{ Pipe operations
+
+-- run a command and execute a function on its output (asynchronous pipe)
+-- @param cmd the input command
+-- @param callback function to execute on cmd output
+-- @return cmd PID
+function helpers.async(cmd, callback)
+ return spawn.easy_async(cmd,
+ function (stdout, stderr, reason, exit_code)
+ callback(stdout, exit_code)
+ end)
+end
- local content = fp:read("*l")
- fp:close()
- return content
+-- like above, but call spawn.easy_async with a shell
+function helpers.async_with_shell(cmd, callback)
+ return spawn.easy_async_with_shell(cmd,
+ function (stdout, stderr, reason, exit_code)
+ callback(stdout, exit_code)
+ end)
+end
+
+-- run a command and execute a function on its output line by line
+function helpers.line_callback(cmd, callback)
+ return spawn.with_line_callback(cmd, {
+ stdout = function (line)
+ callback(line)
+ end,
+ })
end
-- }}}
-- }}}
+-- {{{ Misc
+
+-- check if an element exist on a table
+function helpers.element_in_table(element, tbl)
+ for _, i in pairs(tbl) do
+ if i == element then
+ return true
+ end
+ end
+ return false
+end
+
+-- iterate over table of records sorted by keys
+function helpers.spairs(t)
+ -- collect the keys
+ local keys = {}
+ for k in pairs(t) do keys[#keys+1] = k end
+
+ table.sort(keys)
+
+ -- return the iterator function
+ local i = 0
+ return function()
+ i = i + 1
+ if keys[i] then
+ return keys[i], t[keys[i]]
+ end
+ end
+end
+
+-- create the partition of singletons of a given set
+-- example: the trivial partition set of {a, b, c}, is {{a}, {b}, {c}}
+function helpers.trivial_partition_set(set)
+ local ss = {}
+ for _,e in pairs(set) do
+ ss[#ss+1] = {e}
+ end
+ return ss
+end
+
+-- create the powerset of a given set
+function helpers.powerset(s)
+ if not s then return {} end
+ local t = {{}}
+ for i = 1, #s do
+ for j = 1, #t do
+ t[#t+1] = {s[i],unpack(t[j])}
+ end
+ end
+ return t
+end
+
+-- }}}
+
return helpers
projects / etc / awesome.git / blobdiff