From 05d677a3d3e9e540dffd35c76e35335bf43ead7d Mon Sep 17 00:00:00 2001
From: Epoch Qwert <epoch@53flpnlls43fcguy.onion>
Date: Sun, 28 Dec 2014 22:50:23 -0600
Subject: made gopherd symlink friendlier. normalpath was needed for that.
 normalpath just tries to normalize a path, even if the files don't exist.

---
 nocompile/libexec/gopherd.sh | 36 +++++++++++++++++++++++++-----------
 1 file changed, 25 insertions(+), 11 deletions(-)

(limited to 'nocompile')

diff --git a/nocompile/libexec/gopherd.sh b/nocompile/libexec/gopherd.sh
index f627657..130d861 100755
--- a/nocompile/libexec/gopherd.sh
+++ b/nocompile/libexec/gopherd.sh
@@ -1,14 +1,23 @@
 #!/bin/bash
+#usage: $1 is the directory to be served over gopher.
+# If a file is executable it is going to be used as a program.
+# If there's a .header file in any directory it'll get printed
+# before the directory listing.
+# gopherd.sh tries to guess the hostname to use for people accessing the 
+# server (since there isn't a header for it like in HTTP).
+# this requires rDNS records to be set correctly.
+# Or you can just comment out that code and put a value at
+# "export hostname" down there.
 export PATH=$PATH:/usr/local/bin
 read -t 10 req
 base="$1"
 arg=$(echo "$req" | tr -d '\r' | cut -f2)
 req=$(echo "$req" | tr -d '\r' | cut -f1)
-realpath="$(readlink -f "${base}${req}")"
+realpath="$(normalpath "${base}${req}")"
 if grep -v "^${base}" <<< "${realpath}" > /dev/null;then
- echo ${base}
- echo ${realpath}
- echo 'error!!! cant find base in realpath'
+ echo -e 'i'${base}'\tasdf\tasdf\tasdf\r'
+ echo -e 'i'${realpath}'\tadsf\tasdf\tasdf\r'
+ echo -e 'ierror!!! cant find base in realpath\tasdf\tasdf\tasdf\r'
  exit 1
 fi
 myIP=$(hop0 $(/usr/local/libexec/peerip | head -n1))
@@ -30,19 +39,17 @@ else
 fi
 export hostname
 export port=70
-type=$(file "${realpath}" | cut -d: -f2-)
+type=$(file -L "${realpath}" | cut -d: -f2-)
 if strstr "$type" "directory";then
  if [ -e "${realpath}/.header" ];then
-  cat "${realpath}/.header" | while read -r l;do
-   printf "i%s\t%s\t%s\t%s\r\n" "$l" "fake" "(NULL)" "0"
-  done
+  awk '{print "i"$0"\tfake\t(NULL)\t0\r"}' "${realpath}/.header"
  fi
  ls "${realpath}" | while read i;do
-  stype=$(file "${realpath}/${i}" | cut -d: -f2-)
+  stype=$(file -L "${realpath}/${i}" | cut -d: -f2-)
   if strstr "$stype" "directory"; then
    printf "1%s\t%s\t%s\t%s\r\n" "${req}/${i}" "${req}/${i}" $hostname $port
   else
-   if stat "${realpath}/${i}" | cut '-d ' -f3 | grep x >/dev/null;then
+   if [ "_$(stat -L "${realpath}/${i}" | grep -v l | cut '-d ' -f3 | tr 'x' '\n' | wc -l | tr -d ' ')" = "_4" ] ;then
     printf "7%s\t%s\t%s\t%s\r\n" "${req}/${i}" "${req}/${i}" $hostname $port
    else
     printf "0%s\t%s\t%s\t%s\r\n" "${req}/${i}" "${req}/${i}" $hostname $port
@@ -51,9 +58,16 @@ if strstr "$type" "directory";then
  done
  printf ".\r\n"
 else
- if stat "${realpath}" | cut '-d ' -f3 | grep x >/dev/null;then
+#this shit is ugly
+ numX="$(stat -L "${realpath}" | grep -v l | cut '-d ' -f3 | tr 'x' '\n' | wc -l | tr -d ' ')"
+ if [ "_$numX" = "_3" ];then
+  #an executable that outputs text and pretends to be a type 0.
+  "${realpath}"
+ elif [ "_$numX" = "_4" ];then
+  #a type 7
   "${realpath}" $arg | sed "s/\$/"`printf "\r"`"/g"
  else
+  #output the text of the file
   cat "${realpath}"
  fi
 fi
-- 
cgit v1.2.3