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
---
 mdir.lua | 41 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)
 create mode 100644 mdir.lua

(limited to 'mdir.lua')

diff --git a/mdir.lua b/mdir.lua
new file mode 100644
index 0000000..e0fe392
--- /dev/null
+++ b/mdir.lua
@@ -0,0 +1,41 @@
+----------------------------------------------------------
+-- Licensed under the GNU General Public License version 2
+--  * Copyright (C) 2009 Adrian C. <anrxc_sysphere_org>
+--  * Derived from Maildir Biff Widget, by Fredrik Ax
+----------------------------------------------------------
+
+-- {{{ Grab environment
+local io = { popen = io.popen }
+-- }}}
+
+
+-- Mdir: provides a number of new and unread messages in a Maildir structure
+module("vicious.mdir")
+
+
+-- {{{ Maildir widget type
+function worker(format, mdir)
+    -- Widgets like this one are not agressive like CPU or NET, so we
+    -- can keep it simple, find is OK with me if we execute every >60s
+    --
+    -- Initialise counters
+    local newcount = 0
+    local curcount = 0
+
+    -- Recursively find new messages
+    local fnew = io.popen("find " .. mdir .. " -type f -wholename '*/new/*'")
+    for line in fnew:lines() do
+        newcount = newcount + 1
+    end
+    fnew:close()
+
+    -- Recursively find "old" messages lacking the Seen flag
+    local fcur = io.popen("find " .. mdir .. " -type f -regex '.*/cur/.*2,[^S]*$'")
+    for line in fcur:lines() do
+        curcount = curcount + 1
+    end
+    fcur:close()
+
+    return {newcount, curcount}
+end
+-- }}}
-- 
cgit v1.2.3