Compare commits

14 Commits
2 changed files with 54 additions and 29 deletions

No files matched your search

+16 -14
View File
@@ -32,13 +32,24 @@ g - go to top
G - go to bottom
q - quit
: - cd to <input>
/ - search current directory *<input>*
/ - search current directory <input>*
- - go to last directory
~ - go home
! - spawn shell
. - toggle hidden files
? - show help
Also supported:
down arrow - down
up arrow - up
left arrow - go up level
right arrow - open file or directory
backspace - up
enter - open file or directory
todo
________________________________________________________________________________
@@ -65,7 +76,7 @@ rather flexible.
# store pwd in var on exit
var=$(shfm)
# store pwd in a file one exit
# store pwd in a file on exit
shfm > file
For ease of use, a wrapper function can be added to your .shellrc (.bashrc, etc).
@@ -164,9 +175,9 @@ ________________________________________________________________________________
* VT100/ANSI escape sequences (widely available) are used in place of tput. A
few non-VT100 sequences /are/ needed however.
- IL vt102 \033[L: controls upwards scroll. (required)
- ? xterm \033[?1049[lh]: controls alternate screen. (optional)
- DECTCEM vt520 \033[?25[lh]: controls cursor visibility. (optional)
- IL vt102 \033[L: upwards scroll. (required)
- xterm \033[?1049[lh]: alternate screen. (optional)
- DECTCEM vt520 \033[?25[lh]: cursor visibility. (optional)
Why avoid tput?
@@ -244,15 +255,6 @@ ________________________________________________________________________________
- If input doesn't follow this sequence, 'esc' is reset to '0'.
* There is no usage of '[' or 'test'.
Despite these being commonly provided as "shell builtins" (part of the shell),
a lot of shells still use the external utilities from the coreutils. All usage
of these has been replaced with 'case' as it is always a "shell keyword".
This is one of the approaches taken to reduce the need for anything external.
* Filename escaping works via looping over a string char by char.
I didn't think this was possible in POSIX shell until I needed to do this in
+38 -15
View File
@@ -24,6 +24,7 @@ esc() {
term_setup() {
stty=$(stty -g)
stty -icanon -echo
esc screen_alt h
esc DECAWM l
esc DECTCEM l
esc ED2
@@ -31,10 +32,11 @@ term_setup() {
}
term_reset() {
esc DECAWM h >&2
esc DECTCEM h >&2
esc ED2 >&2
esc DECSTBM >&2
esc DECAWM h >&2
esc DECTCEM h >&2
esc ED2 >&2
esc DECSTBM >&2
esc screen_alt l >&2
stty "$stty"
# needed for cd-on-exit
@@ -88,14 +90,15 @@ term_scroll_up() {
}
cmd_run() {
esc screen_alt h
stty "$stty"
esc DECTCEM h
esc DECSTBM
esc ED2
"$@" ||:
esc DECSTBM 1 "$((LINES - 2))"
esc screen_alt l
esc DECTCEM l
esc CUP "$y2"
stty -icanon -echo
hist=2
}
file_escape() {
@@ -133,13 +136,22 @@ list_print() {
end=$((bottom + 1))
mid=$((bottom / 4 < 5 ? 1 : bottom / 4))
case $1$# in
'*1') set -- empty ;;
'.[!.]*1') set -- 'no hidden files'
esac
case $hist in
1)
2) # redraw after cmd run
shift "$((y > y2 ? y - y2 : 0))"
;;
1) # redraw after go-to-parent
hist_search "$@"
shift "$((y >= bottom ? y - mid : 0))"
;;
*)
*) # everything else
shift "$((y >= bottom ? y - bottom : 0))"
;;
esac
@@ -159,7 +171,7 @@ list_print() {
i=$((i + 1))
done
esc CUP "$((y > bottom ? y2 : y))"
esc CUP "$((y > y2 ? y2 : y))"
}
redraw() {
@@ -226,6 +238,7 @@ line_print() {
line_format() {
file_escape "$1"
esc EL0
[ -d "$1" ] && esc SGR 1 31
printf %s "$safe"
[ -d "$1" ] && printf /
esc SGR
@@ -242,7 +255,7 @@ main() {
;;
-v|--version)
printf 'shfm 0.4.1\n'
printf 'shfm 0.4.2\n'
exit 0
;;
@@ -277,13 +290,14 @@ main() {
;;
l?|C2|"$esc") # ARROW RIGHT
if [ -d "$cur" ] && cd "$cur" >/dev/null 2>&1; then
if [ -d "$cur" ] && cd -- "$cur" >/dev/null 2>&1; then
set -- *
y=1 y2=1 cur=$1 ltype=
redraw "$@"
elif [ -e "$cur" ]; then
cmd_run "${SHFM_OPENER:="${EDITOR:=vi}"}" "$cur"
redraw "$@"
fi
;;
@@ -335,7 +349,7 @@ main() {
'~/'*) ans=$HOME/${ans#"~/"}
esac
cd "${ans:="$0"}" >/dev/null 2>&1|| continue
cd -- "${ans:="$0"}" >/dev/null 2>&1|| continue
set -- *
y=1 y2=1 cur=$1
redraw "$@"
@@ -343,14 +357,22 @@ main() {
/?)
prompt / r
set -- "$ans"*
# word splitting and globbing intentional
# shellcheck disable=2086
set -- $ans*
case $1$# in
"$ans*1") set -- 'no results'
esac
y=1 y2=1 cur=$1 ltype="search $PWD/$ans*"
redraw "$@"
status_line "$#"
;;
-?)
cd "$OLDPWD" >/dev/null 2>&1|| continue
cd -- "$OLDPWD" >/dev/null 2>&1|| continue
set -- *
y=1 y2=1 cur=$1
redraw "$@"
@@ -367,6 +389,7 @@ main() {
export SHFM_LEVEL
SHFM_LEVEL=$((SHFM_LEVEL + 1))
cmd_run "${SHELL:=/bin/sh}"
redraw "$@"
;;
\??)