#!/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