widgets/fs.lua

   1
   2 --[[
   3
   4      Licensed under GNU General Public License v2
   5       * (c) 2013, Luke Bonham
   6       * (c) 2010, Adrian C.      <anrxc@sysphere.org>
   7       * (c) 2009, Lucas de Vries <lucas@glacicle.com>
   8
   9 --]]
  10
  11 local helpers      = require("lain.helpers")
  12
  13 local beautiful    = require("beautiful")
  14 local wibox        = require("wibox")
  15 local naughty      = require("naughty")
  16
  17 local io           = { popen  = io.popen }
  18 local pairs        = pairs
  19 local string       = { match  = string.match,
  20                        format = string.format }
  21 local tonumber     = tonumber
  22
  23 local setmetatable = setmetatable
  24
  25 -- File system disk space usage
  26 -- lain.widgets.fs
  27 local fs = {}
  28
  29 local notification  = nil
  30 fs_notification_preset = { fg = beautiful.fg_normal }
  31
  32 function fs:hide()
  33     if notification ~= nil then
  34         naughty.destroy(notification)
  35         notification = nil
  36     end
  37 end
  38
  39 function fs:show(t_out, scr)
  40     fs:hide()
  41
  42     local f = io.popen(helpers.scripts_dir .. "dfs")
  43     ws = f:read("*all"):gsub("\n*$", "")
  44     f:close()
  45
  46     notification = naughty.notify({
  47         preset  = fs_notification_preset,
  48         text    = ws,
  49         timeout = t_out,
  50         screen  = scr or 1
  51     })
  52 end
  53
  54 -- Unit definitions
  55 local unit = { ["mb"] = 1024, ["gb"] = 1024^2 }
  56
  57 local function worker(args)
  58     local args      = args or {}
  59     local timeout   = args.timeout or 600
  60     local partition = args.partition or "/"
  61     local settings  = args.settings or function() end
  62
  63     fs.widget = wibox.widget.textbox('')
  64
  65     helpers.set_map(partition, false)
  66
  67     function update()
  68         fs_info = {}
  69         fs_now  = {}
  70         local f = assert(io.popen("LC_ALL=C df -kP"))
  71
  72         for line in f:lines() do -- Match: (size) (used)(avail)(use%) (mount)
  73             local s     = string.match(line, "^.-[%s]([%d]+)")
  74             local u,a,p = string.match(line, "([%d]+)[%D]+([%d]+)[%D]+([%d]+)%%")
  75             local m     = string.match(line, "%%[%s]([%p%w]+)")
  76
  77             if u and m then -- Handle 1st line and broken regexp
  78                 fs_info[m .. " size_mb"]  = string.format("%.1f", tonumber(s) / unit["mb"])
  79                 fs_info[m .. " size_gb"]  = string.format("%.1f", tonumber(s) / unit["gb"])
  80                 fs_info[m .. " used_p"]   = tonumber(p)
  81                 fs_info[m .. " avail_p"]  = 100 - tonumber(p)
  82             end
  83         end
  84
  85         f:close()
  86
  87         fs_now.used      = tonumber(fs_info[partition .. " used_p"])  or 0
  88         fs_now.available = tonumber(fs_info[partition .. " avail_p"]) or 0
  89         fs_now.size_mb   = tonumber(fs_info[partition .. " size_mb"]) or 0
  90         fs_now.size_gb   = tonumber(fs_info[partition .. " size_gb"]) or 0
  91
  92         widget = fs.widget
  93         settings()
  94
  95         if fs_now.used >= 99 and not helpers.get_map(partition)
  96         then
  97             naughty.notify({
  98                 title = "warning",
  99                 text = partition .. " ran out!\nmake some room",
 100                 timeout = 8,
 101                 fg = "#000000",
 102                 bg = "#FFFFFF",
 103             })
 104             helpers.set_map(partition, true)
 105         else
 106             helpers.set_map(partition, false)
 107         end
 108     end
 109
 110     fs.widget:connect_signal('mouse::enter', function () fs:show(0, mouse.screen) end)
 111     fs.widget:connect_signal('mouse::leave', function () fs:hide() end)
 112
 113     helpers.newtimer(partition, timeout, update)
 114
 115     return setmetatable(fs, { __index = fs.widget })
 116 end
 117
 118 return setmetatable(fs, { __call = function(_, ...) return worker(...) end })