@
@<HTML>
<BODY>
@
function ENV_VALUE(sEnv : value) {
if !existEnv(sEnv) return "(null)";
return "<KBD>" + getEnv(sEnv) + "</KBD>";
}
setWorkingPath(getEnv("REMOTE_HOST") + "/");
if !existEnv("GATEWAY_INTERFACE") || !existEnv("REQUEST_METHOD") {
@ <H2>Warning!</H2>
<P/>
<H3>
If you can read this message, it means that the Web server hasn't registered
<I class="CodeWorker">CodeWorker</I> as a CGI program for processing ".cwt"
file extensions!
</H3>
@
} else {
@ <TABLE border=1>
<TR><TD colspan=2><B>CGI:</B> <I>environment variables</I></TD></TR>
<TR><TD>GATEWAY_INTERFACE</TD><TD>@ENV_VALUE("GATEWAY_INTERFACE")@</TD></TR>
<TR><TD>SERVER_SOFTWARE</TD><TD>@ENV_VALUE("SERVER_SOFTWARE")@</TD></TR>
<TR><TD>SERVER_NAME</TD><TD>@ENV_VALUE("SERVER_NAME")@</TD></TR>
<TR><TD>SERVER_PROTOCOL</TD><TD>@ENV_VALUE("SERVER_PROTOCOL")@</TD></TR>
<TR><TD>SERVER_PORT</TD><TD>@ENV_VALUE("SERVER_PORT")@</TD></TR>
<TR><TD>REMOTE_HOST</TD><TD>@ENV_VALUE("REMOTE_HOST")@</TD></TR>
<TR><TD>REMOTE_ADDR</TD><TD>@ENV_VALUE("REMOTE_ADDR")@</TD></TR>
<TR><TD>REQUEST_METHOD</TD><TD>@ENV_VALUE("REQUEST_METHOD")@</TD></TR>
<TR><TD>CONTENT_LENGTH</TD><TD>@ENV_VALUE("CONTENT_LENGTH")@</TD></TR>
<TR><TD>CONTENT_TYPE</TD><TD>@ENV_VALUE("CONTENT_TYPE")@</TD></TR>
<TR><TD>QUERY_STRING</TD><TD>@ENV_VALUE("QUERY_STRING")@</TD></TR>
<TR><TD>SCRIPT_NAME</TD><TD>@ENV_VALUE("SCRIPT_NAME")@</TD></TR>
<TR><TD>PATH_INFO</TD><TD>@ENV_VALUE("PATH_INFO")@</TD></TR>
<TR><TD>PATH_TRANSLATED</TD><TD>@ENV_VALUE("PATH_TRANSLATED")@</TD></TR>
</TABLE>
<P/>
@
if _REQUEST.empty() {
@ <H3>No client request</H3>
@
} else {
@ <TABLE border=1>
<TR><TD colspan=2><B>Client Request</B></TD></TR>
<TR><TD><B>attribute</B></TD><TD><B>Value</B></TD></TR>
@
foreach i in _REQUEST {
@ <TR><TD>@key(i)@</TD><TD>@i@</TD></TR>
@
}
@ </TABLE>
@
}
}
@ <P/>
<SMALL><B><I>CodeWorker</I></B> version @getVersion()@
</BODY>
</HTML>