| ' |
| |
| ' To permit this cgi, replace ' on the first line above with the |
| ' appropriate shebang, f.e. '!c:/windows/system32/cscript -nologo |
| ' |
| ' ***** !!! WARNING !!! ***** |
| ' This script echoes the server environment variables and therefore |
| ' leaks information - so NEVER use it in a live server environment! |
| ' It is provided only for testing purpose. |
| ' Also note that it is subject to cross site scripting attacks on |
| ' MS IE and any other browser which fails to honor RFC2616. |
| |
| '' |
| '' printenv -- demo CGI program which just prints its environment |
| '' |
| <job> |
| <script language="JScript"> |
| WScript.Echo("Content-type: text/plain; charset=iso-8859-1\n"); |
| var objShell = new ActiveXObject("WScript.Shell"); |
| var objArray = new Array(); |
| var e = new Enumerator(objShell.Environment("PROCESS")); |
| for (;!e.atEnd();e.moveNext()) { |
| var i = e.item().indexOf("="); |
| var envvar = e.item().substring(0, i); |
| var envval = e.item().substring(i + 1, e.item().length); |
| envval = envval.replace("\n", "\\n"); |
| objArray.push(envvar + "=\"" + envval + "\""); |
| } |
| objArray.sort(); |
| WScript.Echo(objArray.join("\n")); |
| </script> |
| </job> |
| |