about summary refs log tree commit diff stats
path: root/common/files/shell_line_editor.sh
diff options
context:
space:
mode:
authorBenedikt Peetz <benedikt.peetz@b-peetz.de>2024-06-11 09:45:18 +0200
committerBenedikt Peetz <benedikt.peetz@b-peetz.de>2024-06-11 09:45:18 +0200
commitedc2a126900a7df96a1c7f1f6c96b6d8ad4f041b (patch)
tree8f8f3d93e08c2baa559457054bb16473233d0943 /common/files/shell_line_editor.sh
parentfix(common/treefmt.nix): Improve the prettier formatting configuration (diff)
downloadflake-templates-edc2a126900a7df96a1c7f1f6c96b6d8ad4f041b.tar.gz
flake-templates-edc2a126900a7df96a1c7f1f6c96b6d8ad4f041b.zip
refactor(common/): Remove the `files` subdirectory
Diffstat (limited to 'common/files/shell_line_editor.sh')
-rw-r--r--common/files/shell_line_editor.sh247
1 files changed, 0 insertions, 247 deletions
diff --git a/common/files/shell_line_editor.sh b/common/files/shell_line_editor.sh
deleted file mode 100644
index 8d6833a..0000000
--- a/common/files/shell_line_editor.sh
+++ /dev/null
@@ -1,247 +0,0 @@
-#! /usr/bin/env sh
-# Taken in verbatim from: https://unix.stackexchange.com/a/113450, and somewhat changed
-
-LE_print_debug() {
-    LE_debug="$1"
-    LE_debug_msg="$2"
-    [ -n "$LE_debug" ] && printf "\nDBG: (%s)\n" "$LE_debug_msg" >outfile.debug
-}
-
-LE() {
-    # Shell Line Editor. Extremely slow and stupid code. However it
-    # should work on ansi/vt100/linux derived terminals on POSIX
-    # systems.
-    # Understands some emacs key bindings: CTRL-(A,B,D,E,F,H,K,L)
-    # plus the CTRL-W and CTRL-U normal killword and kill.
-    # no Meta-X key, but handling of <Left>, <Right>, <Home>, <End>
-    # <Suppr>.
-    #
-    # Args:
-    #  [1]: prompt (\x sequences recognized, defaults to "")
-    #  [2]: max input length (unlimited if < 0, (default))
-    #  [3]: fill character when erasing (defaults to space)
-    #  [4]: initial value.
-    #  [5]: whether to output debugfiles (outfile.debug and outfile.raw.debug)
-    # Returns:
-    #  0: OK
-    #  1: od(d) error or CTRL-C hit
-
-    LE_prompt="$1"
-    LE_max=${2--1}
-    LE_fill=${3-" "}
-    LE_debug="$5"
-
-    LE_backward() {
-        LE_substract="$1"
-        while [ -n "$LE_substract" ]; do
-            printf '\b%s' "$2"
-            LE_substract=${LE_substract%?}
-        done
-    }
-
-    LE_fill() {
-        LE_substract="$1"
-        while [ -n "$LE_substract" ]; do
-            printf '%s' "$LE_fill"
-            LE_substract=${LE_substract%?}
-        done
-    }
-
-    # Used but not right now
-    # shellcheck disable=2016
-    LE_restore='stty "$LE_tty"
-              LC_COLLATE='${LC_COLLATE-"; unset LC_COLLATE"}
-
-    # LE_tty is used in the restore above
-    # shellcheck disable=2034
-    LE_ret=1 LE_tty=$(stty -g) LC_COLLATE=C
-
-    # text on the right of the cursor
-    LE_left=$4
-    # text on the left of the cursor
-    LE_right=''
-
-    # Tell the terminal to show us every char inputted
-    stty -icanon -echo -isig min 3 time 1 -istrip
-    printf '%b%s' "$LE_prompt" "$LE_left"
-
-    # clear the output
-    [ -n "$LE_debug" ] && printf "" >outfile.debug
-    [ -n "$LE_debug" ] && printf "" >outfile.raw.debug
-
-    # The value needs to be split for it to work (and it's either way just numbers)
-    # shellcheck disable=2046
-    while set -- $(dd bs=3 count=1 2>/dev/null | od -vAn -to1); do
-        while [ "$#" -gt 0 ]; do
-            [ -n "$LE_debug" ] && printf "%b" "\0$1" >>outfile.debug
-            [ -n "$LE_debug" ] && printf "%s " "$1" >>outfile.raw.debug
-            LE_current_key=$1
-            shift
-
-            # 033 is ^[ (`printf "\\$1\n" | cat -v`)
-            if [ "$LE_current_key" = 033 ]; then
-                case "$1$2$3" in
-                # [ C | O C -> ^F forward
-                133103* | 117103*)
-                    shift 2
-                    LE_current_key=006
-                    ;;
-                # [ D | O D -> ^B backward
-                133104* | 117104*)
-                    shift 2
-                    LE_current_key=002
-                    ;;
-                # [ H | O H -> ^A beginning of line
-                133110* | 117110*)
-                    shift 2
-                    LE_current_key=001
-                    ;;
-                # [ P | O P -> ^D del char
-                133120* | 117120*)
-                    shift 2
-                    LE_current_key=004
-                    ;;
-                # [ F | O F -> ^E end of line
-                133106* | 117106*)
-                    shift 2
-                    LE_current_key=005
-                    ;;
-                # [ 1 ~ -> ^A beginning of line
-                133061176)
-                    shift 3
-                    LE_current_key=001
-                    ;;
-                # [ 4 ~ -> ^E end of line
-                133064176)
-                    shift 3
-                    LE_current_key=005
-                    ;;
-                # [ 3 ~ -> ^D del char
-                133063176)
-                    shift 3
-                    LE_current_key=004
-                    ;;
-                # [ | O
-                133* | 117*)
-                    shift
-                    # Is $1 in ge 0 AND le 9 OR eq ';'?
-                    # These are control sequences for things like colors; Ignore them
-                    while [ "0$1" -ge 060 ] && [ "0$1" -le 071 ] ||
-                        [ "0$1" -eq 073 ]; do
-                        shift
-                    done
-                    ;;
-                esac
-            fi
-
-            case "$LE_current_key" in
-            001) # ^A beginning of line
-                LE_backward "$LE_left"
-                LE_right="$LE_left$LE_right"
-                LE_left=
-                ;;
-            002) # ^B backward
-                if [ "$LE_left" = "" ]; then
-                    # bell
-                    printf '\a'
-                    LE_print_debug "$LE_debug" "backward with empty left"
-                else
-                    printf '\b'
-                    LE_tmp="${LE_left%?}"
-                    LE_right="${LE_left#"$LE_tmp"}$LE_right"
-                    LE_left="$LE_tmp"
-                fi ;;
-            003) # CTRL-C
-                break 2 ;;
-            004) # ^D del char
-                if [ "$LE_right" = "" ]; then
-                    # bell (tell the user that the line is empty)
-                    printf '\a'
-                    LE_print_debug "$LE_debug" "delete with empty right"
-                else
-                    LE_right="${LE_right#?}"
-                    printf '%s\b' "$LE_right$LE_fill"
-                    LE_backward "$LE_right"
-                fi ;;
-            012 | 015) # NL or CR
-                LE_ret=0
-                break 2
-                ;;
-            005) # ^E end of line
-                printf '%s' "$LE_right"
-                LE_left="$LE_left$LE_right"
-                LE_right=
-                ;;
-            006) # ^F forward
-                if [ "$LE_right" = "" ]; then
-                    # bell (tell the user that the line is empty)
-                    printf '\a'
-                    LE_print_debug "$LE_debug" "forward with empty right"
-                else
-                    LE_tmp="${LE_right#?}"
-                    LE_left="$LE_left${LE_right%"$LE_tmp"}"
-                    printf %s "${LE_right%"$LE_tmp"}"
-                    LE_right="$LE_tmp"
-                fi ;;
-            010 | 177) # backspace or del
-                if [ "$LE_left" = "" ]; then
-                    # bell
-                    printf '\a'
-                    LE_print_debug "$LE_debug" "backspace with empty left"
-                else
-                    printf '\b%s\b' "$LE_right$LE_fill"
-                    LE_backward "$LE_right"
-                    LE_left="${LE_left%?}"
-                fi ;;
-            013) # ^K kill to end of line
-                LE_fill "$LE_right"
-                LE_backward "$LE_right"
-                LE_right=""
-                ;;
-            014) # ^L redraw
-                printf '\r%b%s' "$LE_prompt" "$LE_left$LE_right"
-                LE_backward "$LE_right"
-                ;;
-            025) # ^U kill line
-                LE_backward "$LE_left"
-                LE_fill "$LE_left$LE_right"
-                LE_backward "$LE_left$LE_right"
-                LE_left=""
-                LE_right=""
-                ;;
-            027) # ^W kill word
-                if [ "$LE_left" = "" ]; then
-                    # bell
-                    printf '\a'
-                else
-                    LE_tmp="${LE_left% *}"
-                    LE_backward "${LE_left#"$LE_tmp"}"
-                    LE_fill "${LE_left#"$LE_tmp"}"
-                    LE_backward "${LE_left#"$LE_tmp"}"
-                    LE_left="$LE_tmp"
-                fi ;;
-            # Print the received key, as it did not match a special key
-            [02][4-7]? | [13]??) # 040 -> 177, 240 -> 377
-                # was assuming iso8859-x at the time
-                if [ "$LE_max" -gt 0 ] && LE_tmp="$LE_left$LE_right" &&
-                    [ "${#LE_tmp}" -eq "$LE_max" ]; then
-                    # bell, when the user is trying to cross the line limit
-                    printf '\a'
-                    LE_print_debug "$LE_debug" "max output reached"
-                else
-                    LE_left="$LE_left$(printf '%b' "\0$LE_current_key")"
-                    printf '%b%s' "\0$LE_current_key" "$LE_right"
-                    LE_backward "$LE_right"
-                fi ;;
-            *)
-                LE_print_debug "$LE_debug" "key not recognized: $(printf "%b" "\0$LE_current_key")"
-                printf '\a'
-                ;;
-            esac
-        done
-    done
-    eval "$LE_restore"
-    REPLY=$LE_left$LE_right
-    echo
-    return "$LE_ret"
-}