home/src/rc/git-tools.kak

decl line-flag-list git_diff_flags

def git-diff-update-buffer %{ %sh{
    added_lines=""
    removed_lines=""
    git diff -U0 $kak_bufname | {
        line=0
        flags="0|red|."
        while read; do
            if [[ $REPLY =~ ^---.* ]]; then
                continue
            elif [[ $REPLY =~ ^@@.-[0-9]+(,[0-9]+)?.\+([0-9]+)(,[0-9]+)?.@@.* ]]; then
                line=${BASH_REMATCH[2]}
            elif [[ $REPLY =~ ^\+ ]]; then
                flags="$flags;$line|green|+"
                ((line++))
            elif [[ $REPLY =~ ^\- ]]; then
                flags="$flags;$line|red|-"
            fi
        done
        echo "setb git_diff_flags '$flags'"
    }
}}

def git-diff-show %{ addhl flag_lines black git_diff_flags; git-diff-update-buffer }

decl line-flag-list git_blame_flags

def git-blame %{
    try %{ addhl flag_lines magenta git_blame_flags } catch %{}
    setb git_blame_flags ''
    %sh{ (
            declare -A authors
            declare -A dates
            send_flags() {
                if [[ -z "$line" ]]; then return; fi
                text="${sha:0:8} ${dates[$sha]} ${authors[$sha]}"
                flag="$line|black|$text"
                for (( i=1; $i < $count; i++ )); do
                    flag="$flag;$(($line+$i))|black|$text"
                done
                echo "setb -add -buffer $kak_bufname git_blame_flags %{${flag}}" | socat -u stdin UNIX-CONNECT:${kak_socket}
            }
            git blame --incremental $kak_bufname | ( while read blame_line; do
                if [[ $blame_line =~ ([0-9a-f]{40}).([0-9]+).([0-9]+).([0-9]+) ]]; then
                    send_flags
                    sha=${BASH_REMATCH[1]}
                    line=${BASH_REMATCH[3]}
                    count=${BASH_REMATCH[4]}
                elif [[ $blame_line =~ author[^-](.*) ]]; then
                    authors[$sha]=${BASH_REMATCH[1]}
                elif [[ $blame_line =~ author-time.([0-9]*) ]]; then
                    dates[$sha]="$(date -d @${BASH_REMATCH[1]} +'%F %T')"
                fi
            done; send_flags )
       ) >& /dev/null < /dev/null & }
}

def -shell-params git-show %{ %sh{
    tmpfile=$(mktemp /tmp/kak-git-show-XXXXXX)
    if git show "$@" > ${tmpfile}; then
       echo "edit! -scratch *git-show*
             exec |cat<space>${tmpfile}<ret>gk
             nop %sh{rm ${tmpfile}}
             setb filetype diff"
    else
       echo "echo %{git show '$@' failed, see *debug* buffer}"
       rm ${tmpfile}
    fi
}}