From 239eccb8fc5a4091fb10bd6dfeab926a64492b70 Mon Sep 17 00:00:00 2001
From: xeruf <27jf@pm.me>
Date: Tue, 11 Jun 2024 15:05:12 +0300
Subject: [PATCH] feat: move handler listing to function and improve

---
 instalee | 19 +++++++++++++++----
 1 file changed, 15 insertions(+), 4 deletions(-)

diff --git a/instalee b/instalee
index 8a96242..a2bca8d 100755
--- a/instalee
+++ b/instalee
@@ -19,6 +19,14 @@ dir_packages="$dir_home/packages"
 highlight() { echo $2 "$1" >&2; }
 destress() { echo $2 "$1" >&2; }
 
+listhandlers() {
+	(
+		cd "$dir_home/handlers"
+		find -- * -type f | grep install | sed 's|/install\(_\)\?|\1|'
+		find "$dir_packages" -type f -printf "%f\n" | grep -vE '(depends|post_|\.)'
+	) | sort | uniq
+}
+
 # Cat a file, filtering out dos line endings and commented lines
 catfile() {
 	cat "$@" | tr -d '\r' | sed '/^#/d'
@@ -107,10 +115,15 @@ version=$(printf "$name r%s.%s%s" "$(git rev-list --count HEAD 2>/dev/null)" "$(
 while true
 do case "$1" in
 	(-V|--version|"")
-		printf "$version\nHomedir: $dir_home\nTry '$0 --help' or 'man $name' for usage info\n" >&2
+		printf "$version\nHomedir: $dir_home\nTry '$0 --help' or 'man $name' for usage info\nAvailable handlers: " >&2
+		listhandlers | paste -s -d ' '
 		# TODO license https://www.gnu.org/prep/standards/html_node/_002d_002dversion.html#g_t_002d_002dversion
 		exit 0
 		;;
+	(--handlers)
+		listhandlers
+		exit $?
+		;;
 	(-h|--help)
 		man $name 2>/dev/null || man "$dir_home/$name.1"
 		exit $?
@@ -146,9 +159,7 @@ do case "$1" in
 			while printf "Handler? (Ctrl-C or Ctrl-D to exit, / to list all) " && read handler
 			do
 				case "$handler" in
-				(/*) find "$dir_packages" "$dir_home/handlers" -type f -printf "%f\n" |
-					grep -vE '(_|\.)' |
-					sort | uniq | paste -s -d ' ';;
+				(/*) listhandlers | paste -s -d ' ';;
 				(*) ${EDITOR:-vi} "$dir/$handler";;
 				esac
 			done