From af359b71b000651812e1ee70638b480502eba0ec Mon Sep 17 00:00:00 2001
From: Gregor Kleen <gkleen@yggdrasil.li>
Date: Thu, 5 Apr 2018 22:05:05 +0200
Subject: media-server on odin

---
 custom/uucp-mediaserver/scripts/queuestatus | 41 +++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)
 create mode 100755 custom/uucp-mediaserver/scripts/queuestatus

(limited to 'custom/uucp-mediaserver/scripts/queuestatus')

diff --git a/custom/uucp-mediaserver/scripts/queuestatus b/custom/uucp-mediaserver/scripts/queuestatus
new file mode 100755
index 00000000..babacfea
--- /dev/null
+++ b/custom/uucp-mediaserver/scripts/queuestatus
@@ -0,0 +1,41 @@
+#!@zsh@/bin/zsh
+
+typeset -a queue
+queue=()
+
+suffix=${${0:t}##*.}
+uucpsize() {
+    command queuesize.${suffix} ${@}
+}
+mediaspace() {
+    cat @queueDir@/${suffix}.space
+}
+queuesize() {
+    local sum=0
+    for file (${queue}); do
+        local size=$(stat -c "%s" "${file}") || continue
+        sum=$((sum + size))
+    done
+    printf "%d" ${sum}
+}
+
+queueTxt=$(grep -vE '^\s*$' @queueDir@/${suffix}.queue)
+queue=(${(f)queueTxt})
+
+printf "Space: %s\n  Reported: %s\n  UUCP queue size: %s\n" \
+       $(numfmt --to=iec-i --suffix=B -- $(($(mediaspace) - $(uucpsize)))) \
+       $(mediaspace | numfmt --to=iec-i --suffix=B) \
+       $(uucpsize | numfmt --to=iec-i --suffix=B)
+
+printf "Queue: %d\n  Size: %s\n" \
+       ${#queue} \
+       $(queuesize | numfmt --to=iec-i --suffix=B)
+
+printf "\n"
+
+for file (${queue}); do
+    size() {
+        stat -c "%s" "${file}" | numfmt --to=iec-i --suffix=B
+    }
+    printf "%6s %s\n" $(size || printf "N/A") ${file:t}
+done
-- 
cgit v1.2.3