From 904cec3c4a329cf89fc3219d359239910d61f3f6 Mon Sep 17 00:00:00 2001 From: thing1 Date: Tue, 28 Jan 2025 09:14:32 +0000 Subject: init commit --- autoload/tools/clang.kak | 196 +++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 196 insertions(+) create mode 100644 autoload/tools/clang.kak (limited to 'autoload/tools/clang.kak') diff --git a/autoload/tools/clang.kak b/autoload/tools/clang.kak new file mode 100644 index 0000000..41f6c55 --- /dev/null +++ b/autoload/tools/clang.kak @@ -0,0 +1,196 @@ +hook -once global BufSetOption filetype=(c|cpp) %{ + require-module clang +} + +provide-module clang %[ + +declare-option -docstring "options to pass to the `clang` shell command" \ + str clang_options + +declare-option -docstring "directory from which to invoke clang" \ + str clang_directory + +declare-option -hidden completions clang_completions +declare-option -hidden line-specs clang_flags +declare-option -hidden line-specs clang_errors + +define-command -params ..1 \ + -docstring %{ + Parse the contents of the current buffer + The syntaxic errors detected during parsing are shown when auto-diagnostics are enabled + } clang-parse %{ + evaluate-commands %sh{ + dir=$(mktemp -d "${TMPDIR:-/tmp}"/kak-clang.XXXXXXXX) + mkfifo ${dir}/fifo + printf %s\\n " + evaluate-commands -no-hooks write -sync -method replace ${dir}/buf + evaluate-commands -draft %{ + edit! -fifo ${dir}/fifo -debug *clang-output* + set-option buffer filetype make + set-option buffer jump_current_line 0 + hook -once -always buffer BufCloseFifo .* %{ nop %sh{ rm -r ${dir} } } + }" + + # this runs in a detached shell, asynchronously, so that kakoune does + # not hang while clang is running. As completions references a cursor + # position and a buffer timestamp, only valid completions should be + # displayed. + (( + trap - INT QUIT + until [ -f ${dir}/buf ]; do :; done # wait for the buffer to be written + + if [ -n "$kak_opt_clang_directory" ]; then + cd "$kak_opt_clang_directory" + fi + case ${kak_opt_filetype} in + (c) ft=c ;; + (cpp) ft=c++ ;; + (obj-c) ft=objective-c ;; + (*) ft=c++ ;; + esac + + if [ "$1" = "-complete" ]; then + pos=-:${kak_cursor_line}:${kak_cursor_column} + header="${kak_cursor_line}.${kak_cursor_column}@${kak_timestamp}" + compl=$(clang++ -x ${ft} -fsyntax-only ${kak_opt_clang_options} \ + -Xclang -code-completion-brief-comments -Xclang -code-completion-at=${pos} - < ${dir}/buf 2> ${dir}/stderr | + awk -F ': ' ' + /^COMPLETION:/ && $2 !~ /[(,](Hidden|Inaccessible)[),]/ { + candidate=$3 + gsub(/[[<{]#[^#]*#[]>}]/, "", candidate) + gsub(/~/, "~~", candidate) + gsub(/\|/, "\\|", candidate) + + gsub(/[[{<]#|#[]}>]/, " ", $3) + gsub(/:: /, "::", $3) + gsub(/ ,/, ",", $3) + gsub(/^ +| +$/, "", $3) + docstring=$4 ? $3 "\n" $4 : $3 + + gsub(/~|!/, "&&", docstring) + gsub(/\|/, "\\|", docstring) + if (candidate in candidates) + candidates[candidate]=candidates[candidate] "\n" docstring + else + candidates[candidate]=docstring + } + END { + for (candidate in candidates) { + menu=candidate + gsub(/(^|[^[:alnum:]_])(operator|new|delete)($|[^{}_[:alnum:]]+)/, "{keyword}&{}", menu) + gsub(/(^|[[:space:]])(int|size_t|bool|char|unsigned|signed|long)($|[[:space:]])/, "{type}&{}", menu) + gsub(/[^{}_[:alnum:]]+/, "{operator}&{}", menu) + printf "%%~%s|info -style menu %!%s!|%s~ ", candidate, candidates[candidate], menu + } + }') + printf %s\\n "evaluate-commands -client ${kak_client} echo 'clang completion done' + set-option 'buffer=${kak_buffile}' clang_completions ${header} ${compl}" | kak -p ${kak_session} + else + clang++ -x ${ft} -fsyntax-only ${kak_opt_clang_options} - < ${dir}/buf 2> ${dir}/stderr + printf %s\\n "evaluate-commands -client ${kak_client} echo 'clang parsing done'" | kak -p ${kak_session} + fi + + flags=$(cat ${dir}/stderr | sed -Ene " + /^:[0-9]+:([0-9]+:)? (fatal )?error/ { s/^:([0-9]+):.*/'\1|{red}█'/; p } + /^:[0-9]+:([0-9]+:)? warning/ { s/^:([0-9]+):.*/'\1|{yellow}█'/; p } + " | paste -s -d ' ' -) + + errors=$(cat ${dir}/stderr | sed -Ene " + /^:[0-9]+:([0-9]+:)? ((fatal )?error|warning)/ { + s/'/''/g; s/^:([0-9]+):([0-9]+:)? (.*)/'\1|\3'/; p + }" | sort -n | paste -s -d ' ' -) + + sed -e "s||${kak_bufname}|g" < ${dir}/stderr > ${dir}/fifo + + printf %s\\n "set-option 'buffer=${kak_buffile}' clang_flags ${kak_timestamp} ${flags} + set-option 'buffer=${kak_buffile}' clang_errors ${kak_timestamp} ${errors}" | kak -p ${kak_session} + ) & ) > /dev/null 2>&1 < /dev/null + } +} + +define-command clang-complete -docstring "Complete the current selection" %{ clang-parse -complete } + +define-command -hidden clang-show-completion-info %[ try %[ + evaluate-commands -draft %[ + execute-keys ,{( ^\( b \A\w+\z + evaluate-commands %sh[ + desc=$(printf %s\\n "${kak_opt_clang_completions}" | sed -e "{ s/\([^\\]\):/\1\n/g }" | sed -ne "/^${kak_selection}|/ { s/^[^|]\+|//; s/|.*$//; s/\\\:/:/g; p }") + if [ -n "$desc" ]; then + printf %s\\n "evaluate-commands -client $kak_client %{info -anchor ${kak_cursor_line}.${kak_cursor_column} -style above %{${desc}}}" + fi + ] ] +] ] + +define-command clang-enable-autocomplete -docstring "Enable automatic clang completion" %{ + set-option window completers "option=clang_completions" %opt{completers} + hook window -group clang-autocomplete InsertIdle .* %{ + try %{ + execute-keys -draft (\.|->|::).\z + echo 'completing...' + clang-complete + } + clang-show-completion-info + } + alias window complete clang-complete +} + +define-command clang-disable-autocomplete -docstring "Disable automatic clang completion" %{ + evaluate-commands %sh{ printf "set-option window completers %s\n" $(printf %s "${kak_opt_completers}" | sed -e "s/'option=clang_completions'//g") } + remove-hooks window clang-autocomplete + unalias window complete clang-complete +} + +define-command -hidden clang-show-error-info %{ + update-option buffer clang_errors # Ensure we are up to date with buffer changes + evaluate-commands %sh{ + eval "set -- ${kak_quoted_opt_clang_errors}" + shift # skip timestamp + desc=$(for error in "$@"; do + if [ "${error%%|*}" = "$kak_cursor_line" ]; then + printf '%s\n' "${error##*|}" + fi + done) + if [ -n "$desc" ]; then + desc=$(printf %s "${desc}" | sed "s/'/''/g") + printf "info -anchor %d.%d '%s'\n" "${kak_cursor_line}" "${kak_cursor_column}" "${desc}" + fi + } } + +define-command clang-enable-diagnostics -docstring %{ + Activate automatic error reporting and diagnostics + Information about the analysis will be shown after the buffer has been parsed with the clang-parse function +} %{ + add-highlighter window/clang_flags flag-lines default clang_flags + hook window -group clang-diagnostics NormalIdle .* %{ clang-show-error-info } + hook window -group clang-diagnostics WinSetOption ^clang_errors=.* %{ info; clang-show-error-info } +} + +define-command clang-disable-diagnostics -docstring "Disable automatic error reporting and diagnostics" %{ + remove-highlighter window/clang_flags + remove-hooks window clang-diagnostics +} + +define-command clang-diagnostics-next -docstring "Jump to the next line that contains an error" %{ + update-option buffer clang_errors # Ensure we are up to date with buffer changes + evaluate-commands %sh{ + eval "set -- ${kak_quoted_opt_clang_errors}" + shift # skip timestamp + unset line + unset first_line + for error in "$@"; do + candidate=${error%%|*} + first_line=${first_line-$candidate} + if [ "$candidate" -gt $kak_cursor_line ]; then + line=$candidate + break + fi + done + line=${line-$first_line} + if [ -n "$line" ]; then + printf %s\\n "execute-keys ${line} g" + else + echo "fail no next clang diagnostic" + fi + } } + +] -- cgit v1.2.3