E SHTTPDMONV1.0 4-NOV-2021 10:11
VSI C V7.4-002
`
$READONLY$ DBUG MONSTYLE i L $CODE$ $LITERAL$ $LINK$ $DATA$ $BSS$ (
DBUG
BEGUN ( BEGUN
INSPECT ( INSPECT
CGIQUERYSTRING 0
CGIQUERYSTRING
CGIREMOTEUSER 0
CGIREMOTEUSER
CGISERVERSOFTWARE 8 CGISERVERSOFTWARE
@
SCRIPTNAME 0
SCRIPTNAME 0
MONSTYLE 0 J
SHTTPDMONEXIT ( J MAIN ( J __MAIN
6 =
$ =
, 4
= TL #G8 ^ ~ _#0 " @ ^4GH c GG# ] ( "8 [@ b " G @Zk( =0 b# @ӘBG4Gb @Zk c G8 ]@ ]H P #k / / /0#= BGtG ^ ~ ^ ~ GG# p [ ;"x b @Zk"B` ""c GbTG ! = @ZkbBG"" bS"G / @ZkR / /b B""" bGpb" C @Zk BG b / / @Zk Gb#C@H B }"GG bGG P" / @Zk P "4G"0 B8 b v H @ .P J >" @Zk0 B"4G8 b / / / / @Zk 4GGb# @Ө0 B4G8 b" @ZkB@ G4Gb @Zk 4G"0 B 8 bp" @Zk0 B4G"8 b / @Zk0 B4G "8 b / @Zk / / "" $G B b d.7"W" dJP b @Zk4G4Gb# @Ө0 B4G8 bh" @Zk0 B"4G8 b / / / / @Zk "" $TGTGB"0B @Zk B ""(b / @ZkPB / /s GXb / @Zk"0 BG4G8 bP" / @Zk0 BG " 4G8 b / @ZkG@ ""TGBb ! " #D / @Zk /BTG #b` " @Zk`B 4Ghb / @Zk" 4GBX "" cGbTG
@ZkBG8%"GtGb / @Zkb@ "b" B bG E#" @ZkBGTG ="b @Zk , , "G0B8bGtGHD HDۧc ` / / @ZkG / BG b @ZkGb#?"B @' /B cGX ""TGb @ZkBGG@""TGb @ZkBGG ""TGb @ZkbGBGbbG 4G x 3"S"P b / @Zk 4Gb#)?" @ G ] ] 4G } # /k / / /B4G4Gb @Zk / / /0 [# ;TG ^ ~( @ [ R ^ GG > !( " @H b / @Zk ` BG( " } ]h b @ZkP B 4GX b @Zk 4 # H G d DECC$MAIN 4 $ L b# DECC$MAIN 4 # ` @ d DECC$MAIN 4 t G DECC$EXIT 4 b# DECC$EXIT 4 @ DECC$EXIT < G DECC$STRNCASECMP < b# DECC$STRNCASECMP < @ DECC$STRNCASECMP 4 G , SCREPERDO 4 b# SCREPERDO 4 ( @ , SCREPERDO 4 0 G T DECC$GXFPRINTF 4 @ b# DECC$GXFPRINTF 4 P @ T DECC$GXFPRINTF 4 d G DECC$FREOPEN 4 p b# DECC$FREOPEN 4 @ DECC$FREOPEN D G CMA$TIS_VMSERRNO_GET_ADDR D b# CMA$TIS_VMSERRNO_GET_ADDR D @ CMA$TIS_VMSERRNO_GET_ADDR 4 G
LIB$GETSYI 4 b#
LIB$GETSYI 4 @
LIB$GETSYI 4 G DECC$GETENV 4 b# DECC$GETENV 4 @ DECC$GETENV 4 G D DECC$GETENV 4 $ b# DECC$GETENV 4 @ @ D DECC$GETENV 4 d G x DECC$GETENV 4 l b# DECC$GETENV 4 t @ x DECC$GETENV 4 x G DECC$ATOL 4 b# DECC$ATOL 4 @ DECC$ATOL 4 G DECC$GETENV 4 b# DECC$GETENV 4 @ DECC$GETENV 4 G DECC$GETENV
4 b# DECC$GETENV 4 @ DECC$GETENV 4 G DECC$GETENV 4 b# DECC$GETENV 4 @ DECC$GETENV 4 G L DECC$GXFPRINTF 4 $ b# DECC$GXFPRINTF 4 H @ L DECC$GXFPRINTF 4 ` G x DECC$GETENV 4 h b# DECC$GETENV 4 t @ x DECC$GETENV 4 x G DECC$GETENV 4 b# DECC$GETENV 4 @ DECC$GETENV 4 ! G OTS$MOVE 4 ! @ OTS$MOVE 4 G DECC$STRSTR 4 b# DECC$STRSTR 4 @ DECC$STRSTR 4 G SCREPERINIT 4 b# SCREPERINIT 4 @ SCREPERINIT 4 G $ DECC$GETENV 4 b# DECC$GETENV 4 @ $ DECC$GETENV 4 $ G D DECC$GETENV 4 8 b# DECC$GETENV 4 @ @ D DECC$GETENV 4 T G x
DECC$FPUTS 4 X b#
DECC$FPUTS 4 t @ x
DECC$FPUTS 4 G
DECC$FPUTS 4 b#
DECC$FPUTS 4 @
DECC$FPUTS 4
G DECC$FFLUSH 4 b# DECC$FFLUSH 4
@ DECC$FFLUSH 4 G SCREPERDO 4 b# SCREPERDO 4 @ SCREPERDO 4 G DECC$GXFPRINTF 4 b# DECC$GXFPRINTF 4 @ DECC$GXFPRINTF 4 G , DECC$GXSPRINTF 4 b# DECC$GXSPRINTF 4 ( @ , DECC$GXSPRINTF 4 , G D SCREPERDO 4 < b# SCREPERDO 4 @ @ D SCREPERDO 4 T G DECC$STRTOL 4
X b# DECC$STRTOL 4 @ DECC$STRTOL 4 G SYS$HIBER 4 b# SYS$HIBER 4 @ SYS$HIBER 4 G SCREPERDO 4 b# SCREPERDO 4 @ SCREPERDO 4 G SCREPERDO 4 b# SCREPERDO 4 @ SCREPERDO 4 G SCREPERDO 4 b# SCREPERDO 4 @ SCREPERDO 4 G T DECC$GXFPRINTF 4 ( b# DECC$GXFPRINTF 4 P @ T DECC$GXFPRINTF 4 G DECC$EXIT 4 b# DECC$EXIT 4 @ DECC$EXIT 4 G
DECC$FPUTS 4 b#
DECC$FPUTS 4 @
DECC$FPUTS 4 G 8 DECC$GXFPRINTF 4 , b# DECC$GXFPRINTF 4 4 @ 8 DECC$GXFPRINTF 4 8 G L DECC$EXIT 4 D b# DECC$EXIT
8 4 H @ L DECC$EXIT
" = 0 $
( = X O Status: 200 OK
Content-Type: text/plain
Script-Control: X-record-mode=1
x = ( Status: 200 OK
Content-Type: text/html
Script-Control: X-stream-mode
%s:: %s
%s%s
%s
= -inspect=%d -utility="%s" -page=32 -snap=17 -dcl=SET PROCESS /PRIVILEGE=(SYSPRV,SYSLCK,WORLD)
@WASD_FILE_DEV
HTTPDMON = "$HT_EXE:HTTPDMON"
HTTPDMON /STATUS 8 =
%s
Status: 200 OK
Content-Type: text/html
Script-Control: X-stream-mode=1
Script-Control: X-timeout-output=none
Script-Control: X-content-encoding-gzip=0
Status: 200 OK
Content-Type: text/plain
Script-Control: X-record-mode=1
P = WWW_HTTP_REFERER h = WWW_QUERY_STRING = Status: 403 Forbidden
Content-Type: text/html
%s:: %s
%s
authorization failure
p = SHTTPDMON_REMOTE_USER = SHTTPDMON_INSPECT = WWW_SERVER_SOFTWARE = SHTTPDMON v1.0.0 AXP
= 0 ; = 0 0 7 DECC$GA_STDOUT ; 7 BEGUN @
DECC$FPUTS DECC$EXIT DECC$GXFPRINTF = QUERY_STRING = populate= DECC$ATOL =
REMOTE_USER DECC$STRTOL =
-javascript SCREPERINIT
DECC$FFLUSH = ctx=bin = SYS$OUTPUT = w = SERVER_SOFTWARE 0 =
%s
%s
@ = sHTTPDmon P 7
SCRIPTNAME ` SCREPERDO 7 CGISERVERSOFTWARE 7 CGIQUERYSTRING = 0 " ; = 0 < 7
CGIREMOTEUSER DECC$GETENV 7 INSPECT ; ; = -css =
-version DECC$STRNCASECMP =
/VERSION
LIB$GETSYI ( CMA$TIS_VMSERRNO_GET_ADDR DECC$FREOPEN DECC$GXSPRINTF = HTTP_REFERER ` = -screen p SYS$HIBER ; = WWW_REMOTE_USER DECC$STRSTR 8 OTS$MOVE = 08 " ; = P 0 7 DECC$$SHELL_HANDLER= # DECC$MAIN
l = = 4 =
( CMA$TIS_VMSERRNO_GET_ADDR DECC$GA_STDOUT DECC$FFLUSH DECC$GXFPRINTF
DECC$FPUTS DECC$GXSPRINTF DECC$FREOPEN DECC$ATOL DECC$EXIT DECC$GETENV DECC$STRTOL DECC$STRSTR DECC$STRNCASECMP
LIB$GETSYI SYS$HIBER SCREPERDO SCREPERINIT DECC$MAIN DECC$$SHELL_HANDLER OTS$MOVE
$TIS