#!/bin/sh -vx
#FILENAME: papiani-new-gbis1.query 02/JUN/95
########## SET UP VARIABLES ###############################
WWW_ROOT=/netlib/parkbench/gbis
HTTP_WWW_ROOT=http://www.netlib.org/parkbench/gbis
GENESIS_DIRS=/pcsg/ftp/pub/benchmark_results/
PLOT_ROOT=/pcsg/ftp/pub/benchmark_results
FTP=ftp://cs.utk.edu/pub/benchmark_results
TAIL=/usr/ucb/tail
CGI=/usr/local/netlib/bin/cgi-bin/gbis
HTTP_CGI=http://www.netlib.org/cgi-bin/gbis
PSTOGIF=$WWW_ROOT/bin/pstogif
PSTOXBM=$WWW_ROOT/bin/pstoxbm
GNUPLOT=/local/gnu/bin/gnuplot
LD_LIBRARY_PATH=/usr/local/X11R5/lib ; export LD_LIBRARY_PATH
######## The following paths are set relative to those above
HOME=$WWW_ROOT ; export HOME
TEMP=$WWW_ROOT/tmp
HTTP_TEMP=$HTTP_WWW_ROOT/tmp
ICONS=$HTTP_WWW_ROOT/gif_icons
GBIS_TOP=$HTTP_WWW_ROOT/html
##########END VARIABLES ####################################
ERRORFILE=$TEMP/gbis.query.err
exec 2>$ERRORFILE
PIDFILE=$$
MANLIST=$TEMP/$PIDFILE.tmp
touch $MANLIST
chmod ugo=rw $MANLIST
MANLIST1=$TEMP/$PIDFILE.tmp1
touch $MANLIST1
chmod ugo=rw $MANLIST1
#
# Set path to just /bin to reduce likelyhood of hacking.
#
PATH='/bin'
# Write reply header.
#
echo "Content-type: text/html"
echo
# Print all environment variables if in debug mode
#
# process query string.
#
# o sed removes any ' that would upset quoted assignment
#
# o awk ensures that
# - all variables passed have legal names
# - special characters are not interpreted by sh
#
eval `echo $PREFIX$QUERY_STRING | sed -e 's/'"'"'/%27/g' | sed -e s/'+'/'_'/ | \
awk 'BEGIN{RS="&";FS="="} $1~/^[a-zA-Z][a-zA-Z0-9_]*$/ \
{printf "if [ $QS_%s ]; then QS_%s=$QS_%s%c, %s%c; else QS_%s=%c%s%c; fi; \n", \
$1,$1,$1,39,$2,39,$1,39,$2,39}' `
if [ $QS_MAN1 ]
then
echo $QS_MAN1 >>$MANLIST
fi
if [ $QS_MAN2 ]
then
echo $QS_MAN2 >>$MANLIST
fi
if [ $QS_MAN3 ]
then
echo $QS_MAN3 >>$MANLIST
fi
if [ $QS_MAN4 ]
then
echo $QS_MAN4 >>$MANLIST
fi
if [ $QS_MAN5 ]
then
echo $QS_MAN5 >>$MANLIST
fi
if [ $QS_MAN6 ]
then
echo $QS_MAN6 >>$MANLIST
fi
if [ $QS_MAN7 ]
then
echo $QS_MAN7 >>$MANLIST
fi
if [ $QS_MAN8 ]
then
echo $QS_MAN8 >>$MANLIST
fi
if [ $QS_MAN9 ]
then
echo $QS_MAN9 >>$MANLIST
fi
if [ $QS_MAN10 ]
then
echo $QS_MAN10 >>$MANLIST
fi
if [ $QS_MAN11 ]
then
echo $QS_MAN11 >>$MANLIST
fi
if [ $QS_MAN12 ]
then
echo $QS_MAN12 >>$MANLIST
fi
if [ $QS_MAN13 ]
then
echo $QS_MAN13 >>$MANLIST
fi
if [ $QS_MAN14 ]
then
echo $QS_MAN14 >>$MANLIST
fi
if [ $QS_MAN15 ]
then
echo $QS_MAN15 >>$MANLIST
fi
if [ $QS_MAN16 ]
then
echo $QS_MAN16 >>$MANLIST
fi
if [ $QS_MAN17 ]
then
echo $QS_MAN17 >>$MANLIST
fi
if [ $QS_MAN18 ]
then
echo $QS_MAN18 >>$MANLIST
fi
if [ $QS_MAN19 ]
then
echo $QS_MAN19 >>$MANLIST
fi
if [ $QS_MAN20 ]
then
echo $QS_MAN20 >>$MANLIST
fi
if [ $QS_MAN21 ]
then
echo $QS_MAN21 >>$MANLIST
fi
if [ $QS_MAN22 ]
then
echo $QS_MAN22 >>$MANLIST
fi
if [ $QS_MAN23 ]
then
echo $QS_MAN23 >>$MANLIST
fi
if [ $QS_MAN24 ]
then
echo $QS_MAN24 >>$MANLIST
fi
if [ $QS_MAN25 ]
then
echo $QS_MAN25 >>$MANLIST
fi
if [ $QS_MAN26 ]
then
echo $QS_MAN26 >>$MANLIST
fi
if [ $QS_MAN27 ]
then
echo $QS_MAN27 >>$MANLIST
fi
if [ $QS_MAN28 ]
then
echo $QS_MAN28 >>$MANLIST
fi
if [ $QS_MAN29 ]
then
echo $QS_MAN29 >>$MANLIST
fi
if [ $QS_MAN30 ]
then
echo $QS_MAN30 >>$MANLIST
fi
cat << HTML
Southampton HPC Centre - GBIS - Machine List
HTML
if [ -s $MANLIST ]
then
sed "s/%2F/\//g" $MANLIST >> $MANLIST1
rm $MANLIST
BENCHMARK=`$TAIL -1 $MANLIST1|cut -f1 -d\/`
if [ $QS_GRAPH ]
then
if [ $QS_KERNEL ]
then
QS_GRAPH=_${QS_KERNEL}_${QS_GRAPH}
else
QS_GRAPH=_${QS_GRAPH}
fi
else
if [ $BENCHMARK = 'POLY1' -o $BENCHMARK = 'POLY2' -o $BENCHMARK = 'POLY3' ]
then
QS_GRAPH=_POLY
else
if [ $BENCHMARK = 'TRANS1' ]
then
QS_GRAPH=_TRANS
else
QS_GRAPH=_PERF
fi
fi
fi
#cat $MANLIST1
echo '