summaryrefslogtreecommitdiff
path: root/.local/src/blesh/lib/init-bind.sh
diff options
context:
space:
mode:
authorSaumit Dinesan <justsaumit@protonmail.com>2022-09-05 03:26:33 +0530
committerSaumit Dinesan <justsaumit@protonmail.com>2022-09-05 03:26:33 +0530
commit4a94495f747fef1b32bb8ea3aa8adbe81314795a (patch)
tree8471f4c33dfdc6cdc9136821682d5fd5f671ee47 /.local/src/blesh/lib/init-bind.sh
parente96cda8f3d313e3e95b5d5e9c9a0ccce0f81960f (diff)
spring cleaning 0.3
Diffstat (limited to '.local/src/blesh/lib/init-bind.sh')
-rw-r--r--.local/src/blesh/lib/init-bind.sh92
1 files changed, 0 insertions, 92 deletions
diff --git a/.local/src/blesh/lib/init-bind.sh b/.local/src/blesh/lib/init-bind.sh
deleted file mode 100644
index 056654b..0000000
--- a/.local/src/blesh/lib/init-bind.sh
+++ /dev/null
@@ -1,92 +0,0 @@
-# this script is a part of blesh (https://github.com/akinomyoga/ble.sh) under BSD-3-Clause license
-function ble/init:bind/append {
- local xarg="\"$1\":ble-decode/.hook $2; builtin eval -- \"\$_ble_decode_bind_hook\""
- local rarg=$1 condition=$3${3:+' && '}
- ble/util/print "${condition}builtin bind -x '${xarg//$q/$Q}'" >> "$fbind1"
- ble/util/print "${condition}builtin bind -r '${rarg//$q/$Q}'" >> "$fbind2"
-}
-function ble/init:bind/append-macro {
- local kseq1=$1 kseq2=$2 condition=$3${3:+' && '}
- local sarg="\"$kseq1\":\"$kseq2\"" rarg=$kseq1
- ble/util/print "${condition}builtin bind '${sarg//$q/$Q}'" >> "$fbind1"
- ble/util/print "${condition}builtin bind -r '${rarg//$q/$Q}'" >> "$fbind2"
-}
-function ble/init:bind/generate-binder {
- local fbind1=$_ble_base_cache/decode.bind.$_ble_bash.$bleopt_input_encoding.bind
- local fbind2=$_ble_base_cache/decode.bind.$_ble_bash.$bleopt_input_encoding.unbind
- ble/edit/info/show text "ble.sh: updating binders..."
- : >| "$fbind1"
- : >| "$fbind2"
- local q=\' Q="'\\''"
- local altdqs24='\xC0\x98'
- local altdqs27='\xC0\x9B'
- local esc00=$((40300<=_ble_bash&&_ble_bash<50000))
- local bind18XX=0
- if ((40400<=_ble_bash&&_ble_bash<50000)); then
- ble/util/print "[[ -o emacs ]] && builtin bind 'set keyseq-timeout 1'" >> "$fbind1"
- fbind2=$fbind1 ble/init:bind/append '\C-x\C-x' 24 '[[ -o emacs ]]'
- elif ((_ble_bash<40300)); then
- bind18XX=1
- fi
- local esc1B=3
- local esc1B5B=1 bindAllSeq=0
- local esc1B1B=$((40100<=_ble_bash&&_ble_bash<40300))
- local i
- for i in {128..255} {0..127}; do
- local ret; ble/decode/c2dqs "$i"
- if ((i==0)); then
- if ((esc00)); then
- ble/init:bind/append-macro '\C-@' '\xC0\x80'
- else
- ble/init:bind/append "$ret" "$i"
- fi
- elif ((i==24)); then
- if ((bind18XX)); then
- ble/init:bind/append "$ret" "$i" '[[ ! -o emacs ]]'
- else
- ble/init:bind/append "$ret" "$i"
- fi
- elif ((i==27)); then
- if ((esc1B==0)); then
- ble/init:bind/append "$ret" "$i"
- elif ((esc1B==2)); then
- ble/init:bind/append-macro '\e' "$altdqs27"
- elif ((esc1B==3)); then
- ble/init:bind/append-macro '\e' '\xDF\xBF' # C-[
- fi
- else
- ((i==28&&_ble_bash>=50000)) && ret='\x1C'
- ble/init:bind/append "$ret" "$i"
- fi
- if ((bind18XX)); then
- if ((i==24)); then
- ble/init:bind/append-macro "\C-x$ret" "$altdqs24$altdqs24" '[[ -o emacs ]]'
- else
- ble/init:bind/append-macro "\C-x$ret" "$altdqs24$ret" '[[ -o emacs ]]'
- fi
- fi
- if ((esc1B==3)); then
- ble/init:bind/append-macro '\e'"$ret" "$altdqs27$ret"
- else
- if ((esc1B==1)); then
- if ((i==91&&esc1B5B)); then
- ble/init:bind/append-macro '\e[' "$altdqs27["
- else
- ble/init:bind/append "\\e$ret" "27 $i"
- fi
- fi
- if ((i==27&&esc1B1B)); then
- ble/init:bind/append-macro '\e\e' '\e[^'
- ble/util/print "ble-bind -k 'ESC [ ^' __esc__" >> "$fbind1"
- ble/util/print "ble-bind -f __esc__ '.CHARS 27 27'" >> "$fbind1"
- fi
- fi
- done
- if ((bindAllSeq)); then
- ble/util/print 'source "$_ble_decode_bind_fbinder.bind"' >> "$fbind1"
- ble/util/print 'source "$_ble_decode_bind_fbinder.unbind"' >> "$fbind2"
- fi
- ble/function#try ble/encoding:"$bleopt_input_encoding"/generate-binder
- ble/edit/info/immediate-show text "ble.sh: updating binders... done"
-}
-ble/init:bind/generate-binder