#!/bin/ksh
FAQHOME=/ftp/pub/sdf/faq
FIRST=`echo $*|cut -d\? -f2`
SECOND=`echo $*|cut -d\? -f3`

case $FIRST$SECOND in
 *..*|*/*) FIRST="" ;;
esac

echo "<br><center>"
echo "<table bgcolor=CCCCCC border=1 cellpadding=4 cellspacing=0 width=400>"
if [ "$FIRST" = "" ] || [ "$FIRST" = "faq" ]
then if [ -d $FAQHOME ]
     then for i in `ls $FAQHOME|grep -v gophermap`
          do
          FAQ=$i
          DESC=`head -1 $FAQHOME/$i/.desc`
          echo "<tr><td><font size=1>$FAQ</font></td>"
          echo "<td><font size=1><a href=index.cgi?faq?$FAQ>$DESC</a></font></td></tr>"
          done
     fi
     echo "</table>"
else if [ "$SECOND" = "" ]
     then if [ -d $FAQHOME/$FIRST ]
          then for i in `ls $FAQHOME/$FIRST|grep -v gophermap`
               do
               DESC=`head -1 $FAQHOME/$FIRST/$i|cut -c5-80`
               echo "<tr><td><font size=1>$i</font></td>"
               echo "<td><font size=1><a href=index.cgi?faq?$FIRST?$i>$DESC</a></font></td></tr>"
               done
               echo "</table>"
               echo "<p><font face=arial size=1>[<a href=index.cgi?faq>back</a>]"
           fi 
      else FIRST=`echo $FIRST|tr -d [:punct:]` 
           if [ -f $FAQHOME/$FIRST/$SECOND ]
           then echo "<tr><td><pre>"
                #echo "<font face=arial size=1>"
                cat $FAQHOME/$FIRST/$SECOND
                echo "</pre>"
                echo "</table>"
                echo "<p>"
                echo "<font face=arial size=1>[<a href=index.cgi?faq?$FIRST>back</a>]"
           fi 
      fi
fi