#!/bin/sh #FILENAME: papiani-new-gbis2.query 02/JUN/95 # Generic WWW root. ########## 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=$$ #create a unique file name using PID #use as stem for other o/p files CHANGE=$CGI/papiani-new-gbis-change.script DEFAULT=$CGI/papiani-new-gbis-default.script PLOTLIST=$TEMP/$PIDFILE.tmp touch $PLOTLIST chmod ugo=rw $PLOTLIST PLOTLIST1=$TEMP/$PIDFILE.files touch $PLOTLIST1 chmod ugo=rw $PLOTLIST1 exec 2>$ERRORFILE # # Set path to just /bin to reduce likelyhood of hacking. # PATH='/bin' # # Write reply header. # echo "Content-type: text/html" echo "" # # 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 # QUERY_STRING=`echo $QUERY_STRING|sed 's/+/_/g'` 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_DATA_1_ ] then echo $QS_DATA_1_ >>$PLOTLIST fi if [ $QS_DATA_2_ ] then echo $QS_DATA_2_ >>$PLOTLIST fi if [ $QS_DATA_3_ ] then echo $QS_DATA_3_ >>$PLOTLIST fi if [ $QS_DATA_4_ ] then echo $QS_DATA_4_ >>$PLOTLIST fi if [ $QS_DATA_5_ ] then echo $QS_DATA_5_ >>$PLOTLIST fi if [ $QS_DATA_6_ ] then echo $QS_DATA_6_ >>$PLOTLIST fi if [ $QS_DATA_7_ ] then echo $QS_DATA_7_ >>$PLOTLIST fi if [ $QS_DATA_8_ ] then echo $QS_DATA_8_ >>$PLOTLIST fi if [ $QS_DATA_9_ ] then echo $QS_DATA_9_ >>$PLOTLIST fi if [ $QS_DATA_10_ ] then echo $QS_DATA_10_ >>$PLOTLIST fi if [ $QS_DATA_11_ ] then echo $QS_DATA_11_ >>$PLOTLIST fi if [ $QS_DATA_12_ ] then echo $QS_DATA_12_ >>$PLOTLIST fi if [ $QS_DATA_13_ ] then echo $QS_DATA_13_ >>$PLOTLIST fi if [ $QS_DATA_14_ ] then echo $QS_DATA_14_ >>$PLOTLIST fi if [ $QS_DATA_15_ ] then echo $QS_DATA_15_ >>$PLOTLIST fi if [ $QS_DATA_16_ ] then echo $QS_DATA_16_ >>$PLOTLIST fi if [ $QS_DATA_17_ ] then echo $QS_DATA_17_ >>$PLOTLIST fi if [ $QS_DATA_18_ ] then echo $QS_DATA_18_ >>$PLOTLIST fi if [ $QS_DATA_19_ ] then echo $QS_DATA_19_ >>$PLOTLIST fi if [ $QS_DATA_20_ ] then echo $QS_DATA_20_ >>$PLOTLIST fi if [ $QS_DATA_21_ ] then echo $QS_DATA_21_ >>$PLOTLIST fi if [ $QS_DATA_22_ ] then echo $QS_DATA_22_ >>$PLOTLIST fi if [ $QS_DATA_23_ ] then echo $QS_DATA_23_ >>$PLOTLIST fi if [ $QS_DATA_24_ ] then echo $QS_DATA_24_ >>$PLOTLIST fi if [ $QS_DATA_25_ ] then echo $QS_DATA_25_ >>$PLOTLIST fi if [ $QS_DATA_26_ ] then echo $QS_DATA_26_ >>$PLOTLIST fi if [ $QS_DATA_27_ ] then echo $QS_DATA_27_ >>$PLOTLIST fi if [ $QS_DATA_28_ ] then echo $QS_DATA_28_ >>$PLOTLIST fi if [ $QS_DATA_29_ ] then echo $QS_DATA_29_ >>$PLOTLIST fi if [ $QS_DATA_30_ ] then echo $QS_DATA_30_ >>$PLOTLIST fi if [ $QS_DATA_31_ ] then echo $QS_DATA_31_ >>$PLOTLIST fi if [ $QS_DATA_32_ ] then echo $QS_DATA_32_ >>$PLOTLIST fi if [ $QS_DATA_33_ ] then echo $QS_DATA_33_ >>$PLOTLIST fi if [ $QS_DATA_34_ ] then echo $QS_DATA_34_ >>$PLOTLIST fi if [ $QS_DATA_35_ ] then echo $QS_DATA_35_ >>$PLOTLIST fi if [ $QS_DATA_36_ ] then echo $QS_DATA_36_ >>$PLOTLIST fi if [ $QS_DATA_37_ ] then echo $QS_DATA_37_ >>$PLOTLIST fi if [ $QS_DATA_38_ ] then echo $QS_DATA_38_ >>$PLOTLIST fi if [ $QS_DATA_39_ ] then echo $QS_DATA_39_ >>$PLOTLIST fi if [ $QS_DATA_40_ ] then echo $QS_DATA_40_ >>$PLOTLIST fi if [ $QS_DATA_41_ ] then echo $QS_DATA_41_ >>$PLOTLIST fi if [ $QS_DATA_42_ ] then echo $QS_DATA_42_ >>$PLOTLIST fi if [ $QS_DATA_43_ ] then echo $QS_DATA_43_ >>$PLOTLIST fi if [ $QS_DATA_44_ ] then echo $QS_DATA_44_ >>$PLOTLIST fi if [ $QS_DATA_45_ ] then echo $QS_DATA_45_ >>$PLOTLIST fi if [ $QS_DATA_46_ ] then echo $QS_DATA_46_ >>$PLOTLIST fi if [ $QS_DATA_47_ ] then echo $QS_DATA_47_ >>$PLOTLIST fi if [ $QS_DATA_48_ ] then echo $QS_DATA_48_ >>$PLOTLIST fi if [ $QS_DATA_49_ ] then echo $QS_DATA_49_ >>$PLOTLIST fi if [ $QS_DATA_50_ ] then echo $QS_DATA_50_ >>$PLOTLIST fi if [ -s $PLOTLIST ] then sed "s/%2F/\//g" $PLOTLIST >> $PLOTLIST1 rm $PLOTLIST if [ $QS_FORMAT ] then if [ $QS_FORMAT = 'DEFAULT' ] then $DEFAULT $PIDFILE else $CHANGE $PIDFILE fi else $DEFAULT $PIDFILE fi else cat << HTML
Submitted by Mark Papiani,
last updated 24 February 1994.