bash/.local/share/blesh/lib/vim-arpeggio.sh
2024-08-18 03:40:38 +02:00

56 lines
2.1 KiB
Bash

# Copyright 2015 Koichi Murase <myoga.murase@gmail.com>. All rights reserved.
# This script is a part of blesh (https://github.com/akinomyoga/ble.sh)
# provided under the BSD-3-Clause license. Do not edit this file because this
# is not the original source code: Various pre-processing has been applied.
# Also, the code comments and blank lines are stripped off in the installation
# process. Please find the corresponding source file(s) in the repository
# "akinomyoga/ble.sh".
#
# Source: /lib/vim-arpeggio.sh
ble-import keymap.vi
bleopt/declare -v vim_arpeggio_timeoutlen 40
function ble/lib/vim-arpeggio.sh/bind/.usage {
ble/util/print "usage: ble/lib/vim-arpeggio.sh/bind [-m KEYMAP] -[fxcs@] KEYS COMMAND"
ble/util/print " KEYS has the form of {mods}{X}{Y}. {mods} are modifiers of the form"
ble/util/print " /([CSMAsH]-)*/ and {X} and {Y} are alphabets which specify simultaneous"
ble/util/print " keys."
}
function ble/lib/vim-arpeggio.sh/bind {
local -a opts=()
if [[ $1 == -m ]]; then
if [[ ! $2 ]]; then
ble/util/print "vim-arpeggio.sh: invalid option argument for \`-m'." >&2
ble/lib/vim-arpeggio.sh/bind/.usage >&2
return 1
fi
ble/array#push opts -m "$2"
shift 2
fi
local type=$1 keys=$2 cmd=$3
if [[ $type == --help ]]; then
ble/lib/vim-arpeggio.sh/bind/.usage
return 0
elif [[ $type != -[fxcs@] ]]; then
ble/util/print "vim-arpeggio.sh: invalid bind type." >&2
ble/lib/vim-arpeggio.sh/bind/.usage >&2
return 1
fi
local mods=
if local rex='^(([CSMAsH]-)+)..'; [[ $keys =~ $rex ]]; then
mods=${BASH_REMATCH[1]}
keys=${keys:${#mods}}
fi
local timeout=$((bleopt_vim_arpeggio_timeoutlen))
((timeout<0)) && timeout=
if ((${#keys}==2)); then
local k1=$mods${keys::1} k2=$mods${keys:1:1}
ble-bind "${opts[@]}" "$type" "$k1 $k2" "$cmd"
ble-bind "${opts[@]}" "$type" "$k2 $k1" "$cmd"
ble-bind "${opts[@]}" -T "$k1" "$timeout"
ble-bind "${opts[@]}" -T "$k2" "$timeout"
else
ble/util/print "vim-arpeggio.sh: sorry only 2-key bindings are supported now." >&2
ble/lib/vim-arpeggio.sh/bind/.usage >&2
return 1
fi
}