#!/bin/sh

TODAY=`TZ=PST8PDT date +%Y.%m.%d`
if [ $1 ] ; then 
  DATE=$1
else
  DATE=$TODAY
fi
POEM=/home/romosan/poems/$DATE

echo Content-type: text/html
echo 
if [ $DATE == $TODAY ] ; then
  echo \<TITLE\>Today\'s\ Poem\</TITLE\>
else
  echo \<title\>Poem\ on\ $DATE\</title\>
fi
#echo \<BODY\ BGCOLOR=\"\#000000\"\ TEXT=\"\#FFFFFF\"\>
echo \<BODY\ BGCOLOR=\"\#FFFFFF\"\ TEXT=\"\#000000\"\>

#echo \<center\>
echo \<table\>
echo \<tr\>
echo \<td\>\<spacer\ size=50\>\&nbsp\;\</td\>
echo \<td\ align=left\>
echo \<font\ size=\"2\"\ face=\"verdana,courier\ new,sans\ serif\"\>
if [ -f $POEM ]; then
  lns=`cat $POEM | wc -l`
  export lns
  awk '
{
  gsub(" ","\\&nbsp;")
  gsub("--","\\&#151;")
  if (NR==1) {
#    print "<b>" $0 "</b>"
    title=$0
  } else if (NR==2) {
    if ($0 != "") {
      print title "<br>"
      print $0 "<br>"
    } else {
      print "<b>" title "</b><br><br>"
      print $0 "<br>"
    }
  } else if (NR==ENVIRON["lns"]) {
    sub("\\&nbsp;\\&nbsp;","")
    print "<b>" $0 "</b>"
  } else if (NR==3) {
    if ($0 != "" ) {
      print $0 "<br>"
    }
  } else if (NR==ENVIRON["lns"]-2) {
    print $0 "<br>"
    if ($0 != "" ) {
      print "<br>"
    }
  } else {
    print $0 "<br>"
  }
}' $POEM
else
  echo \<h3\>Sorry, the poem doesn\'t exist yet\!\</h3\>
fi

echo \</font\>
echo \</td\>\</tr\>\</table\>
#\</center\>