add wmutils setup

2 files changed, 319 insertions, 0 deletions

diff --git a/wmutils/bin/group b/wmutils/bin/group
new file mode 100755
index 0000000..0d105dc
--- /dev/null
+++ b/wmutils/bin/group
@@ -0,0 +1,105 @@
+#!/bin/sh
+#
+# wmg by:
+#
+# ▓█████▄  ▄████▄   ▄▄▄     ▄▄▄█████▓
+# ▒██▀ ██▌▒██▀ ▀█  ▒████▄   ▓  ██▒ ▓▒
+# ░██   █▌▒▓█    ▄ ▒██  ▀█▄ ▒ ▓██░ ▒░
+# ░▓█▄   ▌▒▓▓▄ ▄██▒░██▄▄▄▄██░ ▓██▓ ░ 
+# ░▒████▓ ▒ ▓███▀ ░ ▓█   ▓██▒ ▒██▒ ░ 
+#  ▒▒▓  ▒ ░ ░▒ ▒  ░ ▒▒   ▓▒█░ ▒ ░░   
+#  ░ ▒  ▒   ░  ▒     ▒   ▒▒ ░   ░    
+#  ░ ░  ░ ░          ░   ▒    ░      
+#    ░    ░ ░            ░  ░        
+#  ░      ░                          
+
+GRP_DIR="/tmp/wmutils/groups"
+USE_FIFO=yes
+
+setup() {
+  [ -d "$GRP_DIR" ] || mkdir -p $GRP_DIR
+  if [ -n "$USE_FIFO" ]
+  then
+    [ -p "$GRP_DIR/.fifo" ] || mkfifo $GRP_DIR/.fifo
+  fi
+}
+
+sed_apply() {
+  TMP=`mktemp /tmp/grp.XXXXXX`
+  sed $1 < $2 > $TMP && mv $TMP $2 || rm $TMP
+  [ -n "$DEBUG" ] && echo "sed $1 < $2 > $TMP && mv $TMP $2 || rm $TMP"
+}
+
+pop() {
+  sed_apply "/$1/d" $2
+}
+
+push() {
+  echo $1 >> $GRP_DIR/$2
+}
+
+view() {
+  while read WID
+  do mapw -m $WID
+  done < $GRP_DIR/$1
+}
+
+hide() {
+  while read WID
+  do mapw -u $WID
+  done < $GRP_DIR/$1
+}
+
+pop_from_all() {
+  for GRP in $GRP_DIR/*
+  do
+    pop $1 $GRP
+  done
+}
+
+case $1 in
+view)
+  setup
+  if [ -f "$GRP_DIR/$2" ]
+  then
+    for GRP in $GRP_DIR/*
+    do hide `basename $GRP`
+    done
+    view $2
+  else
+    echo "group does not exist"
+    exit 1
+  fi
+
+  # customize your fifo printing here
+  if [ -n "$USE_FIFO" ]
+  then
+    for GRP in $GRP_DIR/*
+    do
+      GRP_BASE="`basename $GRP`"
+      GRP_NUM=`wc -l < $GRP | tr -cd '[:digit:]'`
+      [ $GRP_NUM -ne 0 ] && printf '^fg(#888)' || printf '^fg(#555)'
+      [ $GRP_BASE -eq $2 ] && printf '^fg(orange)<'
+      printf "$GRP_BASE^fg()"
+      [ $GRP_BASE -eq $2 ] && printf '>^fg()'
+    done > $GRP_DIR/.fifo
+    echo >> $GRP_DIR/.fifo
+  fi
+
+  ;;
+hide)
+  setup
+  hide $2
+  ;;
+add)
+  setup
+  pop_from_all $2
+  push $2 $3
+  hide $3
+  view $3
+  ;;
+remove)
+  setup
+  pop_from_all $2
+  ;;
+esac
diff --git a/wmutils/bin/groups.sh b/wmutils/bin/groups.sh
new file mode 100755
index 0000000..486c5a7
--- /dev/null
+++ b/wmutils/bin/groups.sh
@@ -0,0 +1,214 @@
+#!/bin/sh
+#
+# Copyright (c) 2015 Greduan <me@greduan.com>, licensed under the WTFPL
+# Adds group-like capabilities, sorta like those you find in CWM and such WMs
+
+usage() {
+    cat << EOF
+usage: $(basename $0) [-hCU] [-c wid] [-s wid group] [-tmMu group]
+       -h shows this help
+       -c cleans WID from group files (and makes it visible)
+       -C runs cleanup routine
+       -s sets WID's group
+       -t toggle group visibility state
+       -m maps (shows) group
+       -M maps group and unmaps all other groups
+       -u unmaps (hides) group
+       -U unmaps all the groups
+EOF
+
+    exit 1
+}
+
+# test for no arguments
+test $# -eq 0 && usage
+
+# I suggest it's under /tmp or somewhere that gets cleaned up at reboot or gets
+# cleaned up after X stops running
+FSDIR=${FSDIR:-/tmp/groups.sh}
+
+# define our functions
+
+# clean WID ($1) from group files
+clean_wid() {
+    # TODO: make POSIX compatible, -i is a GNU-ism
+    sed -i "/$1/d" $FSDIR/group.*
+}
+
+# cleans group ($1) from (in)active files
+clean_status() {
+    # TODO: make POSIX compatible, -i is a GNU-ism
+    sed -i "/$1/d" $FSDIR/active
+    sed -i "/$1/d" $FSDIR/inactive
+}
+
+# shows all the windows in group ($1)
+map_group() {
+    # safety
+    if ! grep -q $1 < $FSDIR/all; then
+        echo "Group doesn't exist"
+        exit 1
+    fi
+
+    # clean statuses
+    clean_status $1
+    # add to active
+    echo $1 >> $FSDIR/active
+
+    # loop through group and map windows
+    while read line; do
+        mapw -m $line
+    done < $FSDIR/group.$1
+}
+
+# hides all the windows in group ($1)
+unmap_group() {
+    # safety
+    if ! grep -q $1 < $FSDIR/all; then
+        echo "Group doesn't exist"
+        exit 1
+    fi
+
+    # clean statuses
+    clean_status $1
+    # add to inactive
+    echo $1 >> $FSDIR/inactive
+
+    # loop through group and unmap windows
+    while read line; do
+        mapw -u $line
+    done < $FSDIR/group.$1
+}
+
+# assigns WID ($1) to the group ($2)
+set_group() {
+    # make sure we've no duplicates
+    clean_wid $1
+    clean_status $2
+
+    # insert WID into new group if not already there
+    grep -q $1 < $FSDIR/group.$2 || \
+    echo $1 >> $FSDIR/group.$2
+
+    # if we can't find the group add it to groups and make it active
+    grep -q $2 < $FSDIR/all || \
+    echo $2 >> $FSDIR/all && \
+    echo $2 >> $FSDIR/active
+
+    # map WID if group is active
+    grep -q $2 < $FSDIR/active && \
+    mapw -m $1
+
+    # unmap WID if group is inactive
+    grep -q $2 < $FSDIR/inactive && \
+    mapw -u $1
+}
+
+# toggles visibility state of all the windows in group ($1)
+toggle_group() {
+    # safety
+    if ! grep -q $1 < $FSDIR/all; then
+        echo "Group doesn't exist"
+        return
+    fi
+
+    # search through active groups first
+    grep -q $1 < $FSDIR/active && \
+    unmap_group $1 && \
+    return
+
+    # search through inactive groups next
+    grep -q $1 < $FSDIR/inactive && \
+    map_group $1 && \
+    return
+}
+
+# removes all the unexistent WIDs from groups
+# removes all group files that don't exist
+# removes from 'all' file all groups that don't exist
+cleanup_everything() {
+    # clean WIDs that don't exist
+    # using `cat` instead of `<` because error suppression
+    cat $FSDIR/group.* 2>/dev/null | while read wid; do
+        wattr $wid || \
+        clean_wid $wid
+    done
+
+    # clean group files that are empty
+    for file in $FSDIR/group.*; do
+        # is the group empty?
+        if [ ! -s $file ]; then
+            rm -f $file
+        fi
+    done
+
+    # remove groups that don't exist from 'all'
+    while read line; do
+        if [ ! -f $FSDIR/group.$line ]; then
+            # TODO: make POSIX compatible, -i is a GNU-ism
+            sed -i "/$line/d" $FSDIR/all
+            clean_status $line
+        fi
+    done < $FSDIR/all
+}
+
+# actual run logic (including arguments and such)
+
+# check $FSDIR exists
+test -d $FSDIR || mkdir -p $FSDIR
+
+# touch all the files
+test -f $FSDIR/active || :> $FSDIR/active
+test -f $FSDIR/inactive || :> $FSDIR/inactive
+test -f $FSDIR/all || :> $FSDIR/all
+
+cleanup_everything
+
+# getopts yo
+while getopts "hc:Cs:t:m:M:u:U" opt; do
+    case $opt in
+        h)
+            usage
+            ;;
+        c)
+            clean_wid $OPTARG
+            mapw -m $OPTARG
+            break
+            ;;
+        C)
+            cleanup_everything
+            break
+            ;;
+        s)
+            set_group $OPTARG $(eval echo "\$$OPTIND")
+            break
+            ;;
+        t)
+            toggle_group $OPTARG
+            break
+            ;;
+        m)
+            map_group $OPTARG
+            break
+            ;;
+        M)
+            for file in $FSDIR/group.*; do
+                group=${file##*.}
+                unmap_group $group
+            done
+            map_group $OPTARG
+            break
+            ;;
+        u)
+            unmap_group $OPTARG
+            break
+            ;;
+        U)
+            for file in $FSDIR/group.*; do
+                group=${file##*.}
+                unmap_group $group
+            done
+            break
+            ;;
+    esac
+done