dotfiles/.local/bin/scripts/b

237 lines
7.8 KiB
Plaintext
Raw Normal View History

2021-09-20 09:14:34 +00:00
#!/bin/bash
# [b]rowse - overview of given files or current directory
2021-12-08 10:37:18 +00:00
# depends: tput stat bat checkaccess(in my dotfiles)
2022-07-18 10:56:48 +00:00
# optdepends: timg, neovim (compressed files), pdftoppm (PDF), mtn (video), audiowaveform, imagemagick (images)
# args: files to inspect, any arg starting with dash is passed on to bat
#
# Supports:
# - listing directories
# - listing contents of any compressed file with neovim
# - visual files are displayed with timg
# video thumbnails via mtn, pdf pages from pdftoppm
# - text files are displayed through bat
# Automatically requests elevation through sudo when needed
2020-12-10 16:34:56 +00:00
2021-12-16 22:04:50 +00:00
set -o pipefail
2022-06-27 16:21:43 +00:00
2021-12-13 12:56:42 +00:00
inspect=false
2022-06-27 16:21:43 +00:00
opts='itvh'
while getopts "$opts" OPTION; do
case "$OPTION" in
# inspect: Show file info without preview
(i) inspect=true;;
(t) tree=true;;
(v) set -eo xtrace;;
(h|?) echo "Usage: $(basename $0) [-$opts] <paths...>" && exit 2;;
esac
done
shift "$(($OPTIND -1))"
2021-12-13 12:56:42 +00:00
checkperm() {
checkaccess -r "$@" || elevate=sudo
mime="$(test -n "$shifted" || $elevate file --dereference --mime "$@")"
}
fileinfo() {
tput setaf 6
for arg
do case "$arg" in (-*) continue;; esac
$elevate file --exclude elf -E "$arg"
$elevate ssh-keygen -l -f "$arg" 2>/dev/null
2022-05-12 09:32:39 +00:00
# TODO do not grep bitrate but extract properly
#probe="$($elevate ffprobe "$arg" 2>&1)"
#echo $probe | grep -v -e '00:00:00.04' -e 'ansi' &&
2022-01-31 09:36:25 +00:00
$elevate ffprobe -hide_banner "$arg" 2>&1 | grep "bitrate: ....\? " | sed 's/, start:[^,]\+,/,/' ||
2022-03-29 11:51:18 +00:00
$elevate stat --format "%U:%G %A %s $(
2021-12-13 12:56:42 +00:00
size="$($elevate unzip -l "$arg" 2>/dev/null | tail -1)" &&
echo "(uncompressed $(echo $size | cut -d' ' -f1 | numfmt --to=iec-i --suffix=B))"
) - birth %.10w mod %.10y" "$arg" | numfmt --field=3 --to=iec-i --padding=6 --suffix=B
done
tput sgr0
}
prefix=/tmp/b
mkdir -p "$prefix"
declare -a timg timga bat batplain ls
for arg; do
case "$arg" in (-*) flags="$flags $arg"; continue;; esac
checkperm "$arg"
2022-01-08 22:09:59 +00:00
if ! $elevate test -e "$arg"
2022-05-10 07:25:01 +00:00
then if test -h "$arg"
then fileinfo "$arg"
else echo "File not found: '$arg'" 1>&2
fi
2022-01-08 22:09:59 +00:00
continue
fi
# amount of columns in a grid
2022-05-10 08:11:30 +00:00
grid=$(expr $(tput cols) / \( 25 - \( $# / 2 \) \& $# \< 30 \| 5 \))
tmpfile="$prefix/$(basename "$arg")"
mkdir -p "$prefix"
case "$mime" in
(*\ application/pdf\;*)
echo Converting "$arg"
2022-09-27 19:58:26 +00:00
grid=$(expr $(tput cols) \* $# / $(tput lines))
grid=$(expr 3 \& $grid \< 3 \| $grid)
#limit=$(expr $grid \& \( $grid \> 3 \| $# \> 1 \) \| $grid '*' 2)
limit=$grid
test -f "$tmpfile-1.ppm" || pdftoppm -forcenum -r 70 "$arg" "$tmpfile" -l $limit
2022-09-27 19:58:26 +00:00
find "$prefix" -path "$tmpfile*.ppm" | sort | head -$limit | xargs -d'\n' timg -W --grid=$grid
;;
2022-09-27 19:58:26 +00:00
(*\ application/*document*|*.xlsx:\ *)
# https://ask.libreoffice.org/t/convert-to-command-line-parameter/840/4
echo Converting "$arg"
soffice --headless --convert-to png --outdir "$prefix" "$arg" >/dev/null
2022-07-18 10:56:48 +00:00
timg+=("${tmpfile%.*}.png");;
(*/x-xcf*)
echo Converting "$arg"
convert -flatten "$arg" png:"$tmpfile"
2022-07-18 10:56:48 +00:00
timg+=("$tmpfile");;
(*\ video/*)
suffix=_thumbs.jpg
2022-09-08 23:42:02 +00:00
mtn -q -i -t -W -r2 -D6 -b 0,6 -c $grid -w $(expr $(tput cols) '*' 20) \
-O "$prefix" -o "$suffix" "$arg"
timg -W "$prefix/$(basename "${arg%.*}")$suffix"
;;
(*\ image/*)
2022-07-18 10:56:48 +00:00
timg+=("$arg")
which identify >/dev/null && continue;;
(*\ inode/directory\;*)
2022-01-25 12:55:23 +00:00
ls+=("$arg")
test -L "$arg" || continue
;;
(*)
2022-05-03 09:22:10 +00:00
case "$(file --dereference "$arg")" in
(*\ ?udio*)
2022-04-22 11:13:09 +00:00
# TODO preconvert aac - |*\ ADTS\ *
2022-08-30 13:19:41 +00:00
if ! $inspect && which audiowaveform >/dev/null; then
2022-07-06 06:59:22 +00:00
img="$tmpfile.png"
case $TERM in (*-kitty) kitty=true; audioheight=2;; (*) audioheight=5;; esac
find "$img" -not -empty 2>/dev/null | grep --quiet . ||
audiowaveform --quiet --pixels-per-second 2 --height 36 --width 2000 --amplitude-scale auto \
--background-color 000000 --waveform-color 99BBFF --axis-label-color 000000 \
2021-12-08 10:37:18 +00:00
--input-filename "$arg" --output-format png >"$img" && {
test "$kitty" && timg -g x$audioheight "$arg" &&
printf "\\033[${audioheight}A%$(expr $audioheight \* 3)s"
timg -g x$audioheight --auto-crop --upscale "$img"
2021-12-08 10:37:18 +00:00
}
fi
timga+=("$arg")
;;
(*:\ *compress*|*\ archive*)
2021-12-13 12:56:42 +00:00
list="$tmpfile-list.txt"
case "$arg" in
(*.7z) test $# = 1 && 7z l "$arg";;
(*.tar*) tar --list --file "$arg";;
(*)
if test $# = 1
then nvim "$arg"
else case "$arg" in (*.part);; (*)
nvim -es "+2w$list|5,w>>$list" "$arg"
batplain+=("$list");;
esac
fi
esac
;;
2022-03-29 11:51:18 +00:00
(*:\ *database*) highlight "Tables" && sqlite3 "$arg" ".tables";;
2022-05-03 09:22:10 +00:00
(*:\ data) ;;
(*) bat+=("$arg")
timga+=("$arg")
continue
;;
esac
;;
esac
fileinfo "$arg"
done
# timg: images
# timga: potentially viewable as image
if test "$timg"; then
2022-04-12 16:49:08 +00:00
# TODO Don't show info on all images for gifs
$inspect ||
if which timg >/dev/null
then $elevate timg $(test "$timga" && echo "-V") --rotate=exif -g $(tput cols)x$(expr $(tput lines) / 2) \
$(test $# -gt 1 &&
echo "-t0.2 --center $(test $# -lt 20 && echo "--title") --grid=$((grid < $# ? grid : $#))x2") \
"${timg[@]}" "${timga[@]}" 2>/dev/null || true
else for img in "${timg[@]}"
do catimg -H $(expr $(tput lines) / 2) $img
done
fi
if which identify >/dev/null && ( $inspect || test $# -lt 10 ); then
tput setaf 6
for img in "${timg[@]}"
do case $img in (*.gif) continue;; esac
ident="$(identify -ping -precision 3 -format "%wx%h %b %m %[bit-depth]-bit %[colorspace]" "$img")"
printf "%11s %-30s %s\n" "${ident%% *}" "$(basename "$img")" "${ident#* }"
done
tput sgr0
fi
fi
pager="${PAGER:-'less -RF'}"
# bat: unknown files
# batplain: files to print without header
if test "$bat" -o "$batplain"; then
test "$(bat --version | cut -d. -f2)" -gt 16 && rule=,rule
if test $# -gt ${#bat[@]} -a $# -gt ${#batplain[@]} && test -z "$flags"
then cut="--line-range :7"
2022-06-13 13:49:14 +00:00
batpager="cut -c-$(expr $(tput cols) \* 19 / 10 | cut -d. -f1)"
fi
batcommand="$elevate bat $cut $flags --pager"
batstyle="--style plain$rule"
test "$batplain" && $batcommand "${batpager:-$pager}" $batstyle "${batplain[@]}"
2022-08-30 13:19:41 +00:00
test "$bat" &&
if test "$cut" && ! $inspect
then case $TERM in (*kitty)
declare -a timgtxt
for file in "${bat[@]}"
do txt="$prefix/$(basename "$file").txt"
cp "$file" "$txt"
timgtxt+=("$txt")
done
timg -V --grid="$(expr 4 \& ${#bat[@]} \> 5 \| ${#bat[@]})" --title="%b" --frames=3 "${timgtxt[@]}"
#fileinfo "${bat[@]}"
;;
(*) for file in "${bat[@]}"; do
$batcommand "${batpager:-$pager}" $batstyle "$file"
fileinfo "$file"
done;;
esac
2022-08-30 13:19:41 +00:00
else
if ! $inspect
then json=false
if which cj >/dev/null; then
json=true
for file in "${bat[@]}"; do
case $file in (*.json);; (*) json=false;; esac
done
fi
if $json
then cj "${bat[@]}"
else $batcommand "${batpager:-$pager}" $batstyle,header$(test $# -gt 1 && echo ",numbers") "${bat[@]}"
fi
fi
if $inspect || test $# -lt $(expr $(tput lines) / 3);
then fileinfo "${bat[@]}"
fi
2021-12-15 18:43:45 +00:00
fi
fi
if test "$ls" -o $# -le $(echo "$flags" | wc -w); then
2021-12-16 22:04:50 +00:00
checkperm .
# Alternative: find -exec ls -dl {} +
{
2022-07-06 06:59:22 +00:00
# TODO handle single quotes in filenames
# TODO listing sometimes doubles as exa prints partial listings while working
timeout .6s sh -c "
2022-06-27 16:21:43 +00:00
if test '$tree'
then $elevate tree -a --dirsfirst --du -h -C -L 3 $flags $(printf "'%s' " "${ls[@]:-.}")
elif which exa 2>/dev/null >&2
2022-06-27 11:03:11 +00:00
then $elevate exa --color=always --long --group --classify --all --all --sort=changed --reverse $flags $(printf "'%s' " "${ls[@]:-.}")
2022-05-10 08:11:30 +00:00
else $elevate ls -l $(test $# -gt ${#ls[@]} && echo '-d') --color=always --human-readable --si --group-directories-first --file-type --dereference-command-line-symlink-to-dir --all $flags $(printf "'%s' " "${ls[@]:-.}")
fi
" || $elevate ls $(test $# -gt ${#ls[@]} && echo "-d") --color=always --human-readable --si --dereference-command-line --all --sort=none $flags "${ls[@]:-.}"
2022-05-03 09:22:10 +00:00
} | $pager --quit-if-one-screen
fi