#!/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:
+# LESS: will be used with 'less' (think: "export LESS=-r")
+# 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"
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-9hIg]"
+
# $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`"
+# Save page content to 'tmp' file
+tmp="`mktemp -t gofetch.current_page.XXXXXX`"
finish() {
- rm -rf "$tmp"
+ rm -rf "$tmp" "$tmp.jpg"
}
trap finish EXIT
echo "$SELECTOR" | nc "$SERVER" "$PORT" > "$tmp"
fi
+# Process page content
case "$MODE" in
+download)
+ # Special, fake mode, only from top-level
+ cat "$tmp"
+;;
0)
cat "$tmp" | less
;;
9)
echo "<BINARY FILE>" | less
;;
+g|I)
+ if img2aa --help >/dev/null 2>&1; then
+ img2aa --mode=DITHERING \
+ --width=74 "$tmp" | less
+ elif jp2a -h >/dev/null 2>&1; then
+ if convert -h >/dev/null 2>&1; then
+ convert "$tmp" "$tmp.jpg"
+ jp2a --border --chars=" .-+=o8#"\
+ --width=74 "$tmp.jpg" | less
+ else
+ echo "required program not found to view images: convert" \
+ | less
+ fi
+ else
+ echo "required program not found to view images:" \
+ jp2a or img2aa | less
+ fi
+;;
*)
echo "unknwon selector mode: <$MODE>" | less
exit 3