From 98e26ee0436822b00d4a6e707d86cf33d24bc00f Mon Sep 17 00:00:00 2001
From: "Adrian C. (anrxc)" <anrxc@sysphere.org>
Date: Wed, 29 Jul 2009 17:59:32 +0200
Subject: Import of vicious source tree.

Vicious is a modular widget library for 'awesome' window manager,
derived from the 'Wicked' widget library.

Summary of changes:
  * Original wicked code modularized
  * Widgets ported from Wicked:
    - CPU, MEM, FS, NET, Date, Uptime, MPD
      * CPU widget rewritten, uses pattern matching
      * MEM widget rewritten, uses pattern matching
        - Swap widget merged with MEM widget type
      * FS widget rewritten, uses pattern matching
        - Also fixed padding in the process
      * NET widget rewritten, uses pattern matching
      * MPD widget rewritten, a bit more versatile
      * Removed deprecated helper functions
  * Widgets written for Vicious:
    - Thermal, Battery, Mbox, OrgMode, Volume, Entropy,
      Disk I/O, System Load, Wireless, Pacman, Maildir
---
 fs.lua | 56 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 56 insertions(+)
 create mode 100644 fs.lua

(limited to 'fs.lua')

diff --git a/fs.lua b/fs.lua
new file mode 100644
index 0000000..3afe801
--- /dev/null
+++ b/fs.lua
@@ -0,0 +1,56 @@
+----------------------------------------------------------
+-- Licensed under the GNU General Public License version 2
+--  * Copyright (C) 2009 Adrian C. <anrxc_sysphere_org>
+----------------------------------------------------------
+
+-- {{{ Grab environment
+local type = type
+local io = { popen = io.popen }
+local helpers = require("vicious.helpers")
+-- }}}
+
+
+-- FS: provides usage statistics for requested mount points
+module("vicious.fs")
+
+
+-- {{{ Filesystem widget type
+function worker(format, padding)
+    -- Get data from df
+    local f = io.popen("df -hP")
+    local args = {}
+
+    -- Format data
+    for line in f:lines() do
+        if not line:match("^Filesystem.*") then
+            -- Format helper can't deal with matrices, so don't setup a
+            -- table for each mount point with gmatch
+            local size, used, avail, usep, mount =
+             -- Instead match all at once, including network file systems
+             line:match("^[%w/-:%.]+[%s]+([%d%.]+)[%a]?[%s]+([%d%.]+)[%a]?[%s]+([%d%.]+)[%a]?[%s]+([%d]+)%%[%s]+([-/%w]+)$")
+
+            if padding then
+                if type(padding) == "table" then
+                    size  = helpers.padd(size,  padding[1])
+                    used  = helpers.padd(used,  padding[2])
+                    avail = helpers.padd(avail, padding[3])
+                    usep  = helpers.padd(usep,  padding[4])
+                else
+                    size  = helpers.padd(size,  padding)
+                    used  = helpers.padd(used,  padding)
+                    avail = helpers.padd(avail, padding)
+                    usep  = helpers.padd(usep,  padding)
+                end
+            end
+
+            args["{"..mount.." size}"]  = size
+            args["{"..mount.." used}"]  = used
+            args["{"..mount.." avail}"] = avail
+            args["{"..mount.." usep}"]  = usep
+        end
+    end
+    f:close()
+
+    return args
+end
+-- }}}
-- 
cgit v1.2.3