Shells

# gemini host [port]
#       "post" stdin to the given gemini server
gemini() {
        host=${1:?missing host}
        port=${2:-1965}
        nc -c -Tnoverify "${host}" "${port}"
}

vterm_printf()
{
        if [ -n "$TMUX" ]; then
                printf '\ePtmux;\e\e]%s\007\e\\' "$1"
        elif [ "${TERM%%-*}" = "screen" ]; then
                printf '\eP\e]%s\007\e\\' "$1"
        else
                printf '\e]%s\e\\' "$1"
        fi
}

clear()
{
        vterm_printf '51;Evterm-clear-scrollback'
        tput clear
}

vterm_set_title()
{
        printf '\033]0;%s\007' "$(hostname):$PWD"
}

vterm_prompt_end()
{
        vterm_printf "51;A$USER@$(hostname):$PWD";
}

function cd
{
        builtin cd "$@"
        vterm_set_title
}

vterm_set_title
PS1=${PS1%% }'$(vterm_prompt_end) '

if [[ "$INSIDE_EMACS" = 'vterm' ]]; then

fi

HOST_LIST=$(awk '/Host /{print $2}' ~/.ssh/config | xargs echo)

set -A complete_ssh -- $HOST_LIST
set -A complete_scp -- $HOST_LIST

set -A complete_kill_1 -- -9 -HUP -INFO -KILL -TERM
set -A complete_pkill_2 -- -SIGHUP -SIGUSR1 -SIGUSR2 -SIGTERM -SIGKILL

if pgrep -fq /usr/sbin/vmd; then
        set -A complete_vmctl_1 -- console load reload start stop reset \
            status send receive
        set -A complete_vmctl -- \
            $(vmctl status | awk '!/NAME/ { printf "%s ", $NF }')
fi

set -A complete_ifconfig_1 -- $(ifconfig | grep ^[a-z] | cut -d: -f1)

set -A complete_got_1 --        \
        bl blame                \
        bo backout              \
        br branch               \
        ci commit               \
        co checkout             \
        cy cherrypick           \
        di diff                 \
        he histedit             \
        im import               \
        in init                 \
        log                     \
        rb rebase               \
        ref                     \
        rm remove               \
        rv revert               \
        sg stage                \
        st status               \
        tr tree                 \
        ug unstage              \
        up update

set -A complete_git_1 --                                \
        checkout cherry-pick clean clone commit config  \
        mpull mpush                                     \
        pull push                                       \
        status

alias ls="ls -F"
alias serve="python3 -m http.server"
alias ec='emacsclient -nw -c'

# colors ain't welcome here!
alias nim="nim --colors=off"

mgdiff()
{
        if [ -z "$1" ]; then
                printf "%s\n" "USAGE: mgdiff <file>" >&2
                return
        fi
        doas cp -p "$1" "$1.orig"
        doas mg "$1"
}

vdiff()
{
        if [ -z "$1" ]; then
                printf "%s\n" "USAGE: vdiff <file>" >&2
                return
        fi
        cp -p "$1" "$1.orig"
        vi "$1"
}

hist()
{
        if [ -z "$1" ]; then
                printf "%s\n" "USAGE: hist <pattern>" >&2
                return 1
        fi

        history 0 | grep "$1"
}

export NNN_BMS="h:$HOME;t:/tmp"
export NNN_USE_EDITOR=1

bind -m '^O'='^U ncd^J^Y'

ncd()
{
        # block nesting of nnn in subshells
        if [ "${NNNLVL:-0}" -ge 1 ]; then
                echo nnn is aready running
                return
        fi

        export NNN_TMPFILE=$HOME/.config/nnn/.lastd

        nnn "$@"

        if [ -f "$NNN_TMPFILE" ]; then
                . "$NNN_TMPFILE"
                rm "$NNN_TMPFILE"
        fi
}

goman()
{
        if [ -z "$1" ]; then
                echo "USAGE: goman terms..." >&2
                return 1
        fi

        go doc "$@" 2>&1 | ${MANPAGER:-less}
}

rebuild_gerbil_doc()
{
        rm -rf /tmp/build_gerbil_doc
        mkdir /tmp/build_gerbil_doc || return 1
        cp -R /usr/local/gerbil/doc /tmp/build_gerbil_doc/ || return 1
        cd /tmp/build_gerbil_doc/doc/
        ./build.sh || return 1
        rm -rf /var/www/cons.local/*
        cp -R .vuepress/dist/* /var/www/cons.local/
}

# ports stuff
alias portsql='sqlite3 /usr/local/share/sqlports'
alias portslol='make 2>&1 | /home/ports/infrastructure/bin/portslogger .'
alias portspldc='make port-lib-depends-check'
alias portsldc='make lib-depends-check'
alias portsplif='diff -up pkg/PLIST.orig pkg/PLIST'
alias portstsilp='mv pkg/PLIST.orig pkg/PLIST'
alias portspy3plist='FLAVOR=python3 make plist'
alias portsrc='cd `make show=WRKSRC`'
alias portsfast='MAKE_JOBS=6 make'

portsdiff() { cvs diff > /home/ports/mystuff/${PWD##*/}.diff  ; less /home/ports/mystuff/${PWD##*/}.diff ;}
portslessdiff() { less /home/ports/mystuff/${PWD##*/}.diff  ; }
# portscp() { scp /home/ports/mystuff/${PWD##*/}.diff virtie:/var/www/iota/ports/ && echo https://chown.me/iota/ports/${PWD##*/}.diff ;}
portspy3() { FLAVOR="python3" make "$@" ;}
portspy3and2() { make "$@" ; FLAVOR="python3" make "$@" ;}
portspygrep() { (cd /home/ports && grep "$@" */py-*/Makefile ) ;}
portslib() { nm -g "$1" | cut -c10- | grep -e^T > /tmp/"$(pwd |xargs basename)" ;}
portsfind() { find /home/ports -iname "${1}" -exec grep -iH ${2} {} \; ;}
portsgrep() { ( cd /home/ports && grep "$@" */*/Makefile */*/*/Makefile ) ;}

alias mup="make update-patches"
alias pfast="MAKE_JOBS=7 make"
alias m="make"
alias mpldc="make port-lib-depends-check"

pclear()
{
        doas find /home/ports/packages/ -iname "*${1:?}*" -delete
        doas find /home/ports/plist/ -iname "*${1:?}*" -delete
}

#!/usr/bin/env rc

. $home/lib/profile

if (~ $PLAN9 '') {
        echo '$PLAN9 is not defined!'
        exit 1
}

NAMESPACE=/tmp/ns.$user.$pid

SHELL=rc
PAGER=nobs
MANPAGER=nobs
EDITOR=editinacme
VISUAL=editinacme

mkdir -p $"NAMESPACE

plumber
fontsrv &
fontsrvpid=$apid

font=/mnt/font/GoMono/10a/font
FONT=/mnt/font/InputSans-Regular/10a/font

$PLAN9/bin/acme -a -f $font -F $FONT $* &
acmepid=$apid

{
        sleep 1
        winid=1
        exec acmeeval 'autoacme '$home'/bin/acmeconfig'
} &
acmeevalpid=$apid

wait $acmepid

kill $acmeevalpid
kill $fontsrvpid

wait # just in case

rm -rf $"NAMESPACE

#!/bin/sh

if pgrep firefox >/dev/null 2>&1; then
        exec firefox "$1"
fi

if pgrep iridium >/dev/null 2>&1; then
        exec iridium "$1"
fi

exec firefox "$1"

#!/bin/sh

exec curl -F 'clbin=<-' https://clbin.com

#!/bin/ksh

a-menu() {
        mymenu -f 'Go Mono-11' -l vertical -p '% ' \
               -W 50% -H 30% -P 10 -x center -y center \
               -C '#ffffea' -c '#000' -T '#ffffea' \
               -t '#000' -S '#000' -s '#fff' -b 3 \
               -a
}

# pass
p() {
        prefix=${PASSWORD_STORE_DIR:-~/.password-store}
        typeit=${1:-no}

        sleep 1
        p=$(find "$prefix" -type f -iname '*.gpg' | \
                sort | \
                sed -e 's/\.gpg$//' -e "s,^$prefix/,," | \
                a-menu)
        if [ $? -eq 0 ]; then
                if [ "$typeit" = yes ]; then
                        pass show "$p" | { IFS= read -r pass; printf %s "$pass"; } |
                                xdotool type --clearmodifiers --file -
                else
                        pass show --clip "$password"
                fi
        fi
}

# exec
e() {
        if ! x=$(a-menu); then
                return
        elif [ "$x" = "pass" ]; then
                p yes
        elif [ "$x" = "pass copy" ]; then
                p nope
        elif [ "$x" = "keep" ]; then
                exec keepassxc
        else
                exec $x
        fi
}

(

        echo audacity
        echo blender
        echo chrome
        echo dino
        echo emacs
        echo emacsclient -c
        echo firefox
        echo gajim
        echo gimp
        echo godot
        echo inkscape
        echo iridium
        echo keep
        echo lagrange
        echo libreoffice
        echo links -g -mode 800x600
        echo lmms
        echo luakit
        echo lxappearance
        echo mumble
        echo netsurf-gtk3
        echo obs
        echo pass
        echo pass copy # not "copy pass" so it's after pass
        echo pixelorama
        echo poedit
        echo spectral
        echo tor-browser
        echo xfe
        echo zathura

) | e

#!/bin/ksh

if ! s=$(slop -f "%x %y %w %h"); then
        exit 1
fi

set -A s -- $s

x=${s[0]}
y=${s[1]}
w=${s[2]}
h=${s[3]}

exec ffmpeg -y \
        -f x11grab \
        -s ${w}x${h} \
        -framerate 30 \
        -i $DISPLAY+${x},${y} \
        ${1:?missing output file}

#!/bin/sh

stumpwm
exec cwm

#!/bin/sh

case "$@" in
        *://*)          exec browser "$@" ;;
        *jpg|*jpeg)     exec gpicview "$@" ;;
        *mp4|*mkv)      exec mpv "$@" ;;
        *m4a)           exec mpv --force-window --lavfi-complex='[aid1] asplit [ao] [v] ; [v] showwaves=mode=line:split_channels=1 [vo]' "$@" ;;
        *svg)           exec inkscape "$@" ;;
        *core)          ;; # do nothing
        *png)           exec gpicview "$@" ;;
        *gif)           exec gpicview "$@" ;;
        *webp)          exec gpicview "$@" ;;
        *)              exec emacsclient -c "$@" ;;
esac