X-Git-Url: http://git.nikiroo.be/?a=blobdiff_plain;f=gopher.sh;h=73256524e15020fcc0244ca330078f8bd42d712d;hb=7f7487a64b9f441fcf38eb6e43a908a154ceb910;hp=f91be7a8c6f27fa1a30be4086280f1fab2a0538b;hpb=0eb21b2178dbb2cc1faea64447b861a91e442b90;p=gofetch.git

diff --git a/gopher.sh b/gopher.sh
index f91be7a..7325652 100755
--- a/gopher.sh
+++ b/gopher.sh
@@ -1,5 +1,22 @@
 #!/bin/sh
 
+# $0 [server] ([selector]) ([port]) ([mode])
+# 	server: the gopher server to dig to
+#	selector: the gopher selector (default is empty)
+#	port: the port to use (default is 70)
+#	mode: the filetype mode (default depends upon selector)
+#		0: plain text
+#		1: menu (dir-like)
+#		...
+#		download: fake mode to download the result without changes
+
+# ENV variables:
+#	LINK_COLOR: escape sequences colour (def: 2)
+#		- : means no escape sequence
+#		1 : means colour 1
+#		2 : means colour 2
+#		[...]
+
 SERVER="$1"
 SELECTOR="$2"
 PORT="$3"
@@ -18,53 +35,62 @@ if [ "$SERVER" = "" ]; then
 	exit 2
 fi
 
+# can be "-" for no escape sequences
+[ "$LINK_COLOR" = ""  ] && LINK_COLOR=2
+
+# Start and end link tags
+SL=
+EL=
+if [ "$LINK_COLOR" != "-" ]; then
+	SL="`tput setf $LINK_COLOR``tput setaf $LINK_COLOR`"
+	EL="`tput init`";
+fi
+
+PREFIX="[0-9h]"
+
 # $0 [FILE]
+# Display a gopher menu for the given resource
 cat_menu() {
 	i=0
-	cat "$1" | grep '^[i0-9]' | while read ln; do
+	cat "$1" | grep "^i\|^$PREFIX" | while read ln; do
 		ln="`echo "$ln" | cut -f1`"
 		if echo "$ln" | grep "^i" >/dev/null 2>&1; then
 			echo "$ln" | sed "s:^.:	:g"
-		elif echo "$ln" | grep "^[0-9]" >/dev/null 2>&1; then
+		elif echo "$ln" | grep "^$PREFIX" >/dev/null 2>&1; then
 			i=`expr $i + 1`
 			i=`printf %2.f $i`
 			field="`echo "$ln" | cut -c1`"
 			case "$field" in
 				0) typ='TXT';;
-				1) typ='DIR';;
-				7) typ='SRH';;
-				8) typ='TEL';;
-				*) typ='???';;
+				1) typ='DIR';; # menu, actually
+				7) typ='(?)';; # query
+				8) typ='TEL';; # TELnet (not TELephone)
+				h) typ='WEB';; # HTML
+				g) typ='GIF';;
+				I) typ='IMG';;
+				+) typ='SVR';; # redundant server
+				*) typ='!!!';;
 			esac
-			echo "$ln" | sed "s:^.:$typ $i	:g"
+			echo "$ln" | sed "s:^.\\(.*\\):$typ $i	$SL\\1$EL:g"
 		#else
 			# Bad line
 		fi
 	done
 }
 
-# $0 [FILE]
-choices() {
-	i=0
-	cat "$1" | grep '^[0-9]' | while read choice; do
-		i=`expr $i + 1`
-		i=`printf %2.f $i`
-		
-		echo "$i --> $choice"
-	done
-}
-
 # $0 [FILE] [INDEX] [FIELD]
+# Get a field from the given-by-index link in FILE
+#
 # Fields:
 # 	1 = type/name
 # 	2 = selector
 # 	3 = server
 # 	4 = port
 getsel() {
-	cat "$1" | grep '^[0-9]' | tail -n+"$2" | head -n 1 | cut -f"$3"
+	cat "$1" | grep "^$PREFIX" | tail -n+"$2" | head -n 1 | cut -f"$3"
 }
 
-tmp="`mktemp gofetch.current_page.XXXXX`"
+tmp="`mktemp -t gofetch.current_page.XXXXXX`"
 finish() {
   rm -rf "$tmp"
 }
@@ -77,6 +103,10 @@ else
 fi
 
 case "$MODE" in
+download)
+	# Special, fake mode, only from top-level
+	cat "$tmp"
+;;
 0)
 	cat "$tmp" | less
 ;;