#!/bin/sh

MODEMHOST="god"

WWWUTIL="/var/lib/WWWutil"
WWWDBS="/var/lib/WWWutil/qdDBs"
WWWDB=$WWWDBS/WWWutil
WWWPROJECT=Staffroom

ISPUTIL="/var/lib/ISPutil"
PMACCT_S=$ISPUTIL/sac/pmacct_s.sh

QBIN="/usr/local/qddb/bin"
QUERY=$QBIN/query

SED=/usr/bin/sed

echo Content-type: text/html
echo

HEADER="`$QUERY $WWWDB -sep ' ' Name $WWWPROJECT -print Header`"
FOOTER="`$QUERY $WWWDB -sep ' ' Name $WWWPROJECT -print Footer`"
TITLE="Last Month Modem Usage (summary)"

if [ -x $LAST ]; then
  if [ $# = 0 ]; then
    printf "$HEADER" "$TITLE" "$TITLE"
    cat <<-EOM

    This is a form for viewing a user's hours on modems this month.
    <P>

    <ISINDEX>

    Type a username in your browser's search dialog to
    view that user's hours online so far this month.
    <P>

    <CENTER>
    </MARQUEE>
    <FONT="+3">
    Once you enter the name it could take a while, have patience...
    </FONT>
    </MARQUEE>
    <BR>
    </CENTER>

    <P>
EOM
    printf "$FOOTER"
  else
    user="$*"
    printf "$HEADER" "$TITLE" "$TITLE"
    echo "<MARQUEE>"
    echo "<BLINK>"
    echo "<FONT=+2>"
    echo "This could take a while, have patience..."
    echo "</FONT>"
    echo "</BLINK>"
    echo "</MARQUEE>"
    echo "<PRE>"
    if [ "$MODEMHOST" = "$hostname" ]; then
      $PMACCT_S "$user"
    else
      rsh $MODEMHOST $PMACCT_S "$user"
    fi
    echo "</PRE>"
    echo "<P>"
  fi
fi
