Monday, November 08, 2010 at 12:06 AM.
system.verbs.builtins.webserver.responders.echo.methods.GET
<<Script: system.verbs.builtins.webserver.responders.echo.methods.GET; Version 1; Date: Wed, 13 May 1998 06:21:43 GMT; ID: RAB on get (adrParamTable) { <<March 03, 1998 at 9:36:20 PM by WMF <<This is a debugging responder that echos all the parameters that are available to a responder <<It is similar to the samples.tellParams CGI local (response, i); on add (s) { response = response + s + cr}; on addVar (name, val) { response = response + "<B>" + name + ":</B> " + string(val) + "<BR>\r"}; response = ""; add ("<HTML><HEAD><TITLE>Parameters Received</TITLE></HEAD><BODY>"); bundle { // show general parameters (those at the top level of adrParamTable) add ("<H3>General Parameters:</H3>"); for i = 1 to sizeOf (adrParamTable^) { if (typeOf (adrParamTable^[i]) != tableType) { addVar (nameOf (adrParamTable^[i]), adrParamTable^[i])}}}; bundle { // show the request headers (things at adrParamTable^.requestHeaders) add ("<H3>Request Headers:</H3>"); for i = 1 to sizeOf (adrParamTable^.requestHeaders) { addVar (nameOf (adrParamTable^.requestHeaders[i]), adrParamTable^.requestHeaders[i])}}; add ("</BODY></HTML>"); adrParamTable^.responseHeaders.["Content-Type"] = "text/html"; // always set the MIME type adrParamTable^.responseBody = response; return (true)}
This listing is for code that runs in the OPML Editor environment. I created these listings because I wanted the search engines to index it, so that when I want to look up something in my codebase I don't have to use the much slower search functionality in my object database. Dave Winer.