Import of vicious source tree.v1.0.0

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

1 files changed, 44 insertions, 0 deletions

diff --git a/bat.lua b/bat.lua
new file mode 100644
index 0000000..e6caacf
--- /dev/null
+++ b/bat.lua
@@ -0,0 +1,44 @@
+----------------------------------------------------------
+-- Licensed under the GNU General Public License version 2
+--  * Copyright (C) 2009 Adrian C. <anrxc_sysphere_org>
+----------------------------------------------------------
+
+-- {{{ Grab environment
+local io = { popen = io.popen }
+local table = { insert = table.insert }
+-- }}}
+
+
+-- Bat: provides state, charge, and remaining time for all batteries
+module("vicious.bat")
+
+
+-- {{{ Battery widget type
+function worker(format)
+    -- Initialise tables
+    local battery_info  = {}
+    local battery_state = {
+        ["charged"]     = "+",
+        ["charging"]    = "+",
+        ["discharging"] = "-"
+    }
+
+    -- Get data from acpitool
+    local f = io.popen("acpitool -b")
+
+    -- Format data
+    for line in f:lines() do
+        -- Check if the battery is present
+        if line:match("^[%s]+Battery.*") then
+            -- Store state and charge information
+            table.insert(battery_info, battery_state[line:match("([%a]*),")])
+            table.insert(battery_info, line:match("([%d]?[%d]?[%d])%."))
+            -- Store remaining time information if the battery supports it
+            table.insert(battery_info, (line:match("%%,%s(.*)") or "/"))
+        end
+    end
+    f:close()
+
+    return battery_info
+end
+-- }}}