rolling-directory

1 files changed, 58 insertions, 0 deletions

diff --git a/rolling-directory b/rolling-directory
new file mode 100644
index 0000000..d85f8b7
--- /dev/null
+++ b/rolling-directory
@@ -0,0 +1,58 @@
+#!@zsh@/bin/zsh
+
+set -e
+
+PATH=@coreutils@/bin:@findutils@/bin:@gawk@/bin:@inotify@/bin:$PATH
+
+dir=${1:A}
+maxSize=$(numfmt --from=auto --to=none -- $2)
+shift 2
+
+[[ -d "${dir}" ]] || exit 2
+[[ "${maxSize}" = <-> ]] || exit 2
+
+typeset -a findExtra
+findExtra=(-not -path ${dir}/CACHEDIR.TAG)
+
+resize() {
+    echo "Resizing ${dir} to below $(numfmt --to=iec-i --suffix=B -- ${maxSize})..." >&2
+
+    while [[ $(du -xbs ${dir} | awk '{ print $1; }') -gt $maxSize ]]; do
+        find ${dir} -xdev -type f \( ${findExtra} \) -print0 | \
+            xargs -r0 -- stat --printf '%W %Y %Z %X %n\0' | \
+            sort -t '\0' -z | \
+            awk -F '\0' '{ gsub("^\\S+\\s+\\S+\\s+\\S+\\s+\\S+\\s+", "", $1); printf "%s\0", $1; }' | \
+            xargs -r0 -- rm -v
+    done
+
+    find ${dir} -xdev -xtype l -print0 | xargs -r0 -- rm -v
+    find ${dir} -xdev -type d \( -not -path ${dir} \) -empty -print0 | xargs -r0 -- rmdir -v
+}
+
+case "${1}" in
+    monitor)
+        shift
+
+        typeset -a inotifyExtra
+        inotifyExtra=()
+
+        if [[ "${1}" = <-> ]]; then
+            inotifyExtra=(-t "${1}")
+            shift
+        fi
+        
+        while
+            resize
+            inotifywait -qq -r ${dir} ${inotifyExtra} \
+                        -e modify \
+                        -e close_write \
+                        -e moved_to \
+                        -e move_self \
+                        -e create
+            true
+        do :; done
+    ;;
+    *)
+        resize
+    ;;
+esac