aboutsummaryrefslogtreecommitdiff
path: root/entropy.lua
blob: ce87f8429bace0cc21a47bf56406c7d8d1870443 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
---------------------------------------------------
-- Licensed under the GNU General Public License v2
--  * (c) 2009, Adrian C. <anrxc@sysphere.org>
---------------------------------------------------

-- {{{ Grab environment
local tonumber = tonumber
local io = { open = io.open }
local setmetatable = setmetatable
local math = { ceil = math.ceil }
-- }}}


-- Entropy: provides available system entropy
module("vicious.entropy")


-- {{{ Entropy widget type
local function worker(format, poolsize)
    -- Linux 2.6 has a default entropy pool of 4096-bits
    if poolsize == nil then poolsize = 4096 end

    -- Get available entropy
    local f = io.open("/proc/sys/kernel/random/entropy_avail")
    local ent = tonumber(f:read("*line"))
    f:close()

    -- Calculate percentage
    local ent_percent = math.ceil(ent * 100 / poolsize)

    return {ent, ent_percent}
end
-- }}}

setmetatable(_M, { __call = function(_, ...) return worker(...) end })