From 76b8978ef2d75ba8930ef263afb4a2d583c629c4 Mon Sep 17 00:00:00 2001
From: "Adrian C. (anrxc)" <anrxc@sysphere.org>
Date: Wed, 29 Jul 2009 22:20:32 +0200
Subject: Battery widget moved to batat.lua in preparation for a new bat
 widget.

It's time for a standalone battery widget that reads
/proc/acpi/battery/*/{info,state} alone. However the old battery
widget that uses 'acpitool' will not be deleted, let it serve as an
alternative widget as a convenience. Some might also prefer it over
reading multiple files in /proc
---
 batat.lua | 44 ++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 44 insertions(+)
 create mode 100644 batat.lua

(limited to 'batat.lua')

diff --git a/batat.lua b/batat.lua
new file mode 100644
index 0000000..dba49fd
--- /dev/null
+++ b/batat.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 using acpitool
+module("vicious.batat")
+
+
+-- {{{ 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
+-- }}}
-- 
cgit v1.2.3