home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 31
/
CDASC_31_1996_juillet_aout.iso
/
internet
/
rgiserv.zip
/
RGI_T4.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1996-05-16
|
2KB
|
49 lines
/* Test the RGIQEnv and RGIQMethod Functions */
Call RGIUtils '-ct text/html','No'
If rgi_retc=0 Then Do i=1 to rgi_hdr.0
Say rgi_hdr.i
End
Say '<form action=cgi-bin/rgi_t5.cmd method=post>'
Say '<html><head><title>' /* Introduce the document */
Say 'RGI Installation Test' /* as part of the RGI */
Say '</head></title>' /* Installation Test */
Say '<body>'
Say '<em>This screen is brought to you by RGI_T4.CMD</em>'
Say '<p>This document tests the RGIQEnv and RGIQMethod functions.'
Say '<p>First we issue the call:'
Say '<p><ce>'
Say "<tt>Call RGIQEnv,'No'"
Say '</tt></ce>'
Call RGIQEnv 'No'
Say '<p>which generates the following variables:'
Say '<table border><caption>CGI Environment Variables</caption>'
Say '<th>RGI Variable name</th><th>Value</th>'
Say '<tr><td>RGI.AUTH_TYPE</td><td>'rgi.auth_type'</td>'
Say '<tr><td>RGI.CONTENT_LENGTH</td><td>'rgi.content_length'</td>'
Say '<tr><td>RGI.CONTENT_TYPE</td><td>'rgi.content_type'</td>'
Say '<tr><td>RGI.GATEWAY_INTERFACE</td><td>'rgi.gateway_interface'</td>'
Say '<tr><td>RGI.HTTP_ACCEPT</td><td>'rgi.http_accept'</td>'
Say '<tr><td>RGI.HTTP_USER_AGENT</td><td>'rgi.http_user_agent'</td>'
Say '<tr><td>RGI.PATH_INFO</td><td>'rgi.path_info'</td>'
Say '<tr><td>RGI.PATH_TRANSLATED</td><td>'rgi.path_translated'</td>'
Say '<tr><td>RGI.QUERY_STRING</td><td>'rgi.query_string'</td>'
Say '<tr><td>RGI.REMOTE_ADDRESS</td><td>'rgi.remote_address'</td>'
Say '<tr><td>RGI.REMOTE_HOST</td><td>'rgi.remote_host'</td>'
Say '<tr><td>RGI.REMOTE_IDENT</td><td>'rgi.remote_ident'</td>'
Say '<tr><td>RGI.REMOTE_USER</td><td>'rgi.remote_user'</td>'
Say '<tr><td>RGI.REQUEST_METHOD</td><td>'rgi.request_method'</td>'
Say '<tr><td>RGI.SCRIPT_NAME</td><td>'rgi.script_name'</td>'
Say '<tr><td>RGI.SERVER_NAME</td><td>'rgi.server_name'</td>'
Say '<tr><td>RGI.SERVER_PORT</td><td>'rgi.server_port'</td>'
Say '<tr><td>RGI.SERVER_PROTOCOL</td><td>'rgi.server_protocol'</td>'
Say '<tr><td>RGI.SERVER_SOFTWARE</td><td>'rgi.server_software'</td>'
Say '</table>'
Say '<p>'
Say 'Finally, we issue the RGIQMethod call: <tt>mthod=RGIQMethod()</tt>'
mthod=RGIQMethod()
Say 'which should show <tt>'mthod'</tt> as in RGI.REQUEST_METHOD.'
Say '<p><p>Press the'
Say '<input type=submit value=Continue> button now.'
Say '</body>'
Say '</html>'