From 460a3c56f926ab7e82364b8d26b21b33bea8506d Mon Sep 17 00:00:00 2001
From: Daniel Fichtinger <daniel@ficd.ca>
Date: Sun, 11 May 2025 20:23:54 -0400
Subject: [PATCH] AutoYADM commit: 2025-05-11 20:23:54

---
 .config/kak/autoload/lang/python.kak |   9 +++
 .config/kak/autoload/lsp.kak         |   4 +-
 .config/kak/autoload/vim-tab.kak     | 110 +++++++++++++++++++++++++++
 3 files changed, 122 insertions(+), 1 deletion(-)
 create mode 100644 .config/kak/autoload/lang/python.kak
 create mode 100644 .config/kak/autoload/vim-tab.kak

diff --git a/.config/kak/autoload/lang/python.kak b/.config/kak/autoload/lang/python.kak
new file mode 100644
index 00000000..0c2e4853
--- /dev/null
+++ b/.config/kak/autoload/lang/python.kak
@@ -0,0 +1,9 @@
+hook global WinSetOption filetype=python %{
+    set-option window expandtab true
+    set-option window softtabstop 4
+    set-option window formatcmd "ruff format --line-length 79 -"
+}
+hook global WinSetOption filetype=go %{
+    set-option window expandtab false
+    set-option window softtabstop 4
+}
diff --git a/.config/kak/autoload/lsp.kak b/.config/kak/autoload/lsp.kak
index b8113037..e87106c7 100644
--- a/.config/kak/autoload/lsp.kak
+++ b/.config/kak/autoload/lsp.kak
@@ -16,12 +16,14 @@ map global object D '<a-semicolon>lsp-diagnostic-object<ret>' -docstring 'LSP er
 
 # Server Config
 set-option global lsp_debug false
+lsp-inlay-hints-enable global
+# TODO: set up toggle binding for this
+# lsp-inlay-diagnostics-enable global
 
 remove-hooks global lsp-filetype-python
 hook -group lsp-filetype-python global BufSetOption filetype=python %{
 	set-option buffer lsp_servers %{
 		[basedpyright-langserver]
-		# command = "basedpyright-langserver"
 		root_globs = ["requirements.txt", "setup.py", "pyproject.toml", "pyrightconfig.json", ".git", ".hg"]
 		args = ["--stdio"]
 		settings_section = "basedpyright"
diff --git a/.config/kak/autoload/vim-tab.kak b/.config/kak/autoload/vim-tab.kak
new file mode 100644
index 00000000..572bcb8f
--- /dev/null
+++ b/.config/kak/autoload/vim-tab.kak
@@ -0,0 +1,110 @@
+# Replicate expandtab from vim.
+declare-option -docstring "Expand <tab> to spaces based on tabstop." bool expandtab yes
+
+# Replicate softtabstop from vim.
+declare-option -docstring "Make tabstop number of spaces feel like a <tab> when pressing <tab> or <backspace> in insert mode." int softtabstop 4
+
+# Helper function for inserting a <tab>
+def softtabstop-insert-tab -hidden %{
+    evaluate-commands -no-hooks -draft -itersel %{
+        try %sh{
+            tabstop=$kak_opt_softtabstop
+            if [ $tabstop -lt 0 ]; then
+                tabstop=$kak_opt_indentwidth
+            fi
+            # Determine if this is an append operation (end column > start column). If so, prefix with ';'
+            prefix=$(echo $kak_selections_display_column_desc | awk -F '[.,]' '{if($4 > $2) {print ";"}}')
+            if [ $tabstop -eq 0 ]; then
+                # if tabstop is 0 that means we are just inserting tabs
+                printf "execute-keys '${prefix}i<tab><esc>'\n"
+                # expand tabs to spaces if needed
+                [ $kak_opt_expandtab = "true" ] && printf "%s\n" 'execute-keys h<ret>@'
+            else
+                # compute the number of spaces needed to reach the next softtabstop
+                display_column=$((kak_cursor_display_column - 1)) # adjust for 1-based indexing
+                end_column=$((display_column % tabstop))
+                space_count=$((tabstop - end_column))
+                # insert enough spaces to reach the next softtabstop
+                printf "execute-keys '${prefix}i%${space_count}s<esc>'\n"
+                # if not expanding tabs, convert *all* preceding whitespace to a mix of spaces and
+                # tabs, not just the spaces that were inserted (this is how vim behaves)
+                [ $kak_opt_expandtab = "false" ] && printf "execute-keys '<a-?>\h+<ret><a-:>H<a-@>'"
+            fi
+        }
+    }
+}
+
+# Helper function for deleting whitespace a <tab>
+def softtabstop-insert-backspace -hidden %{
+    evaluate-commands -no-hooks -draft -itersel -save-regs ^ %{
+        # save off the current selection in case the try block fails
+        try %sh{
+            tabstop=$kak_opt_softtabstop
+            if [ $tabstop -lt 0 ]; then
+                tabstop=$kak_opt_indentwidth
+            fi
+            if [ $tabstop -gt 0 ]; then
+                # compute the end display column based on tabstop and the number of
+                # number spaces needed to reach it
+                display_column=$((kak_cursor_display_column - 1)) # adjust for 1-based indexing
+                num_spaces=$((display_column % tabstop))
+                [ $num_spaces -eq 0 ] && num_spaces=$tabstop
+                end_display_column=$((display_column - num_spaces))
+                # extract any preceding whitespace
+                echo "evaluate-commands -draft %{
+                    execute-keys '<a-?>\h+<ret><a-;>H'
+                    echo -to-file $kak_response_fifo %val{selection}
+                }" > $kak_command_fifo
+                whitespace="$(cat $kak_response_fifo)"
+                # count the number of mixed tabs and spaces needed to reach the end display column
+                tab=$(printf "\t")
+                num_whitespaces=0
+                adjust_cursor="<a-:>;"
+                while [ -z "$non_ws" ] \
+                    && [ -n "$whitespace" ] \
+                    && [ $display_column -gt $end_display_column ];
+                do
+                    # iterate over the whitespace right-to-left, early out after reaching the
+                    # first non whitespace
+                    prefix=${whitespace%?};
+                    ws="${whitespace#$prefix}";
+                    case "$ws" in
+                        $tab) display_column=$((display_column - $kak_opt_tabstop));
+                              # the first whitespace encountered is a tab. when '@' is pressed, the
+                              # cursor moves (or extends) one char to the right. account for this here
+                              [ $num_whitespaces -eq 0 ] && adjust_cursor="${adjust_cursor}h";;
+                         " ") display_column=$((display_column - 1));;
+                           *) non_ws="true";;
+                    esac
+                    whitespace=$prefix;
+                    if [ -z "$non_ws" ]; then
+                        num_whitespaces=$((num_whitespaces + 1));
+                    fi
+                done
+                if [ $num_whitespaces -gt 0 ]; then
+                    # * select the number of mixed tabs and spaces computed above
+                    # * convert to spaces and adjust the cursor position
+                    # * select the number of spaces to reach the end column and delete them
+                    echo "execute-keys '<a-:>;h<a-?>\h{$((num_whitespaces - 1))}<ret>@${adjust_cursor}<a-?> {,$((num_spaces - 1))}<ret>d'"
+                else
+                    echo "fail"
+                fi
+            else
+                echo "fail"
+            fi
+        } catch %{
+            # in normal mode, delete previous character
+            execute-keys 'hd'
+        }
+    }
+}
+
+# Use a hook to enable/disable key mappings such that '\' properly allows disabling specialized <tab> behavior
+hook global ModeChange 'push:.+:insert' %{
+    map buffer insert <tab> '<a-;>:softtabstop-insert-tab<ret>'
+    map buffer insert <backspace> '<a-;>:softtabstop-insert-backspace<ret>'
+}
+hook global ModeChange 'pop:insert:normal' %{
+    unmap buffer insert <tab> '<a-;>:softtabstop-insert-tab<ret>'
+    unmap buffer insert <backspace> '<a-;>:softtabstop-insert-backspace<ret>'
+}