\section{HTTP-Server Gateway zu \emph{Tycoon}(Listing)} \label{anhangGateway}

\begin{verbatim}
#!/bin/sh
#cgi-script
#18.04.1996 Kay Ramme

pairs=""

if test $SERVER_SOFTWARE 
then 
pairs="$pairs SERVER_SOFTWARE $SERVER_SOFTWARE"
fi

if test $GATEWAY_INTERFACE
then    
pairs="$pairs GATEWAY_INTERFACE $GATEWAY_INTERFACE"
fi

if test $SERVER_PROTOCOL 
then
pairs="$pairs SERVER_PROTOCOL $SERVER_PROTOCOL"
fi

if test $SERVER_PORT
then
pairs="$pairs SERVER_PORT $SERVER_PORT"
fi

if test $REQUEST_METHOD
then
pairs="$pairs REQUEST_METHOD $REQUEST_METHOD"
fi

if test $HTTP_ACCEPT
then
pairs="$pairs HTTP_ACCEPT $HTTP_ACCEPT"
fi

if test $PATH_INFO
then
pairs="$pairs PATH_INFO $PATH_INFO"
fi

if test $PATH_TRANSLATED
then
pairs="$pairs PATH_TRANSLATED $PATH_TRANSLATED"
fi

if test $SCRIPT_NAME
then
pairs="$pairs SCRIPT_NAME $SCRIPT_NAME"
fi

if test $QUERY_STRING
then
pairs="$pairs QUERY_STRING $QUERY_STRING"
fi

if test $REMOTE_HOST
then
pairs="$pairs REMOTE_HOST $REMOTE_HOST"
fi

if test $REMOTE_ADDR
then
pairs="$pairs REMOTE_ADDR $REMOTE_ADDR"
fi

if test $REMOTE_USER
then
pairs="$pairs REMOTE_USER $REMOTE_USER"
fi

if test $AUTH_TYPE
then
pairs="$pairs AUTH_TYPE $AUTH_TYPE"
fi

if test $CONTENT_TYPE
then
pairs="$pairs CONTENT_TYPE $CONTENT_TYPE"
fi

if test $CONTENT_LENGTH
then
pairs="$pairs CONTENT_LENGTH $CONTENT_LENGTH"
fi

pairs="$pairs $* SERVICE_NAME quasServ"

echo "Content-type: text/html"
echo ""

echo `/home/kay/projects/quas/tip/tipClient -debug -port 6001 \
      -server dbis11.informatik.uni-hamburg.de $pairs &`

\end{verbatim}
%%% Local Variables: 
%%% mode: latex
%%% TeX-master: "quas"
%%% End: 
