#!/bin/sh
#

ACCTS_EMAIL="accounts@`dnsdomainname`"
MODEMHOST="god"
WEBSERVER="www.knotwork.com"

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

ISPUTIL="/var/lib/ISPutil"
ISPDBS="/var/lib/ISPutil/qdDBs"
USERDB=$ISPDBS/Clients

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

LAST=/usr/bin/last
SED=/usr/bin/sed
GREP=/usr/bin/grep
AWK="/usr/bin/awk"
SORT="/usr/bin/sort"
FINGER="/usr/bin/finger -m -p"
USER_DATA=/var/lib/BBSutil/user_data

echo Content-type: text/html
echo

HEADER="`$QUERY $WWWDB -sep ' ' Name $WWWPROJECT -print Header`"
FOOTER="`$QUERY $WWWDB -sep ' ' Name $WWWPROJECT -print Footer`"

if [ -z $REMOTE_USER ]; then
  TITLE="Function requires logged-in user"
  printf "$HEADER" "$TITLE" "$TITLE"
  echo "<FONT SIZE=+1>"
  echo "This routine only works if you are first logged"
  echo "in on the server, because otherwise I have no idea"
  echo "which user to display!"
  echo "</FONT>"
  printf "$FOOTER"
else
  user="$REMOTE_USER"
  hostname=`hostname`
  printf "$HEADER" "$user" "$user"
  GRPS=`id -Gn $REMOTE_USER`
  echo $GRPS | grep sales > /dev/null
  if [ $? = 0 ]; then
    echo "<FONT SIZE=+1>"
    echo "<LI><A HREF=\"http:/staff/cgi-bin/requests\">"
    echo "<STRONG>Support Requests</STRONG></A>"
    echo "<P></FONT>"
  fi
  echo '<FONT SIZE=+1>Please have patience,'
  echo 'this could take a while...</FONT><BR>'
  echo '<P><FONT SIZE="+1"><PRE>'
  $FINGER $user | $GREP -v 'Never logged in.'
  echo '</PRE>'
  SREP="`$QUERY $USERDB -sep ' ' Company.Contact.Username $user \
	-print SalesRep`"
  if [ "$SREP" != "" ]; then
    echo "Your Sales Rep is <A HREF=/~$SREP>$SREP</A><P>"
  fi
  echo "<PRE>"
  if [ "$MODEMHOST" = "$hostname" ]; then
    $USER_DATA $user
  else
    rsh $MODEMHOST $USER_DATA $user
  fi
  echo "</PRE>"
  p=`$QUERY $USERDB -sep '' Company.Contact.Username $user \
        -print CurrentBalance`
  echo -n "<P>Account Balance \$$p , "
  p=`$QUERY $USERDB -sep '' Company.Contact.Username $user \
        -print Pending`
  if [ "$p" != "" ]; then
    echo "plus \$$p pending.<BR>"
  else
    echo '<BR>'
  fi
  declare -i MONTHS
  MONTHS=0
  MONTHS="`$QUERY $USERDB -sep ' ' Company.Contact.Username $user \
	-print Company.Contact.Months`"
  if [ $MONTHS != -99 ]; then
    if [  $MONTHS -le 0 ]; then
      echo "This account has expired ($MONTHS months).<P>"
    else
      if [ $MONTHS = 1 ]; then
        echo "Account expires at end of this month.<P>"
      else
        MONTHS=$[ $MONTHS -1 ]
        echo -n "Account is prepaid for next $MONTHS months."
        declare -i BONUSMONTHS
        BONUSMONTHS=0
        BONUSMONTHS="`$QUERY $USERDB -sep ' ' Company.Contact.Username \
		$user -print Company.Contact.BonusMonths`"
        if [ $BONUSMONTHS -gt 1 ]; then
          BONUSMONTHS=$[ $BONUSMONTHS -1 ]
          echo '<BR>'
          echo "[ $BONUSMONTHS more months include bonus hours ]"
        fi
        echo '<P>'
      fi
    fi
  fi
  if [ -f /etc/issue.web ]; then
    echo "<P>"
    cat /etc/issue.web
  fi
  echo "<P>"
  echo "<MENU>"
  echo "<P><LI><A HREF=\"http:/members/cgi-bin/users_own_DB_info\">"
  echo "<STRONG>User Database entry</STRONG></A>"
  echo "<LI><A HREF=\"http:/members/cgi-bin/last_modem\">"
  echo "<STRONG>Last logins at ModemHost</STRONG></A>"
  echo "<LI><A HREF=\"http:/members/cgi-bin/last\">"
  echo "<STRONG>Last logins at Server</STRONG></A>"
#  echo "<LI><A HREF=\"http:/~$user/MTDhours.spider\">"
#  echo "<STRONG>Hours this month (preprinted)</STRONG></A>"
  echo "<LI><A HREF=\"http:/members/cgi-bin/macct_s\">"
  echo "<STRONG>Hours this month (summary)</STRONG></A>"
  echo "<LI><A HREF=\"http:/members/cgi-bin/macct\">"
  echo "<STRONG>Hours this month (long)</STRONG></A>"
  echo "<LI><A HREF=\"http:/members/cgi-bin/pmacct_s\">"
  echo "<STRONG>Hours last month (summary)</STRONG></A>"
  echo "<LI><A HREF=\"http:/members/cgi-bin/pmacct\">"
  echo "<STRONG>Hours last month (long)</STRONG></A>"
  echo "<LI><A HREF=\"http:/members/cgi-bin/quota\">"
  echo "<STRONG>Disk Quota</STRONG></A>"
  echo "<LI><A HREF=\"http://$WEBSERVER/~$REMOTE_USER\">"
  echo "<STRONG>Home page</STRONG></A>"
  echo "<LI><A HREF=\"http:/members/cgi-bin/wwwserver_log\">"
  echo "<STRONG>Web page access log</STRONG></A>"
  echo "<LI><A HREF=\"http:/members/cgi-bin/wwwserver_log_x\">"
  echo "<STRONG>Web page nonlocal access log</STRONG></A>"
  echo $GRPS | grep sales > /dev/null
  if [ $? = 0 ]; then
    echo "<LI><A HREF=\"http:/members/cgi-bin/salesreport\">"
    echo "<STRONG>Sales Report</STRONG></A>"
  fi
  echo "</MENU>"
#  $GREP -w $user /var/adm/isputil.log | $AWK -f isplog.awk
  echo "<P>"
  printf "$FOOTER"
fi
