bozodirs.dcgi - gophercgis - Collection of gopher CGI/DCGI for geomyidae
 (HTM) hg clone https://bitbucket.org/iamleot/gophercgis
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) README
 (DIR) LICENSE
       ---
       bozodirs.dcgi
       ---
            1 #!/bin/sh
            2 
            3 . ../common/config.sh
            4 
            5 CGI="${CGI_BASEDIR}/bozodirs/fetch.cgi"
            6 DCGI="${CGI_BASEDIR}/bozodirs/bozodirs.dcgi"
            7 
            8 if [ -n "$2" ]; then
            9         url=$2
           10 else
           11         exit 1
           12 fi
           13 
           14 curl -Lgs -- "${url}" |
           15 awk -v url="${url}" -v cgi="${CGI}" -v dcgi="${DCGI}" \
           16 '
           17 {
           18         if (match($0, /href="[^"]+"/)) {
           19                 href = substr($0, RSTART + 6, RLENGTH - 7)
           20                 type = substr(href, length(href)) == "/" ? 1 : 0
           21                 printf("[%s|%s|%s?%s|server|port]\n",
           22                         type,
           23                         href,
           24                         type ? dcgi : cgi,
           25                         url href)
           26         }
           27 }
           28 '