I AUTHAGENT_CELV1.0 4-NOV-2021 10:08 VSI C V7.4-002 8 $READONLY$ DISALLOWVMSFLAGS(DISALLOWVMSPRIVILEGESUTILITY SYSPRVMASKiH $CODE$ $LITERAL$$LINK$p$DATA$l$BSS$8 DISALLOWVMSFLAGS8 DISALLOWVMSPRIVILEGES  CGIPLUSUSAGECOUNT8 CGIPLUSUSAGECOUNT( UTILITY DEBUG( DEBUG  DEBUGWATCH0 DEBUGWATCH 0 SOFTWAREID0 SOFTWAREID0  SYSPRVMASK(JMAIN0JPROCESSREQUEST0J@ AUTHORIZEUSER(JSTRSAME0J MATCHHOST0J` MATCHSYSUAF(Jx__MAIN @6= $=  $=  .=AUTHAGENT_CEL 9=6  =#G8^~ _#0"@^4GHcGG#]("8[@b "G@Zkhb#@hBG4Gpb/@ZkcG8]@]HP#/k///#h;4G~^[^~" (GGb@Zk`"h"C4GBbh"/@Zk`"p"C4GPBXb@ZkBGGGtGb@Zk`BGhb@Zk>b B4Gb"@Zk B"4G(b0@@Zk/// ,hBG0B8bTG HP2"@ZkBGb@ZkpBGxb/@Zkh"@BGGdHbG0"@Zkb#/@@B4G"Hb@ZkBGb@Zk/0B"TG""8b@ZkBTG"b @ZkB4G4Gb@Zk//h#p;TG^~^ ~!"(GG[b//@ZkhHBGPb/@Zk(B4G8"0b@ZkCTGJpbBb "@ZkB4Gb@ZkxB _"X""bGb/ ///@ZkB4Gb@ZkBx"4Gb@Zkp"BG4Gb"@ZkGhbGhb# @chGpb `G]] }(0#/k///G]] }(0#k/BG4Gb@Zk///0#@;CGP^~X^`~hpx޴[>^~޵GۤGG:"P[G^GGXb/@ZkBGG@"PBGXb2"S_"/@Zk@`B4Ghb@ZkB4Gp"GbGG@Zk BPBG @GGXb D @b02"^_"/@Zk`B4Ghb@ZkPB1EtGXb$"@Zk`B4Ghb@ZkMPBG@!B"GtGXb/@ZkBGp"GGGb@Zk//OBGb&@¤/@ZkGGBPBXb Gp2"r_"@Zk`B4Ghb@ZkPBGtGXbH("@Zk`B4Ghb/@Zk//=!G!O! G TG}!?F=///B]?"P"tGb 0 A/@ZkP'P="PF8 #XF //.1"JCUB7GQ/1"QKCUACD1,1"1HCU!@aF .1"JCUBF//B@PBXK?02"_"GP"GXb@Zk`B4Ghb/@ZkPP!FFUBB5BPF0F////h.!hJdB5aBUaBBFFF/KXG/?xG//FGG0""b#HݢFHݲ=?G=q@/k(,!(H $@5!@!F ///H.!HJDB5AB_BFF?.J#C//UBCEsJzG!/8@8.Q8J#C3F8>H.HJUABC{XJ!FF/( ,@HD#C<H/HK!UBCtJF3F/ .WJF>(,(H#C!U@CsHyGYF/@.VJF>(.#(J.UJ>"@PBtGx""]"Xb@Zk/,2v@IHXDD=1?J2F=h.hJXeF*`///.!EJXF /!KXG/H/!HKXEG@(,!(HXD.!JXF/ H.!HJXEF@h.!hJXeF.JB5B5G ///!KC5CC5DAG?,HDk"/E///U@@5@EF@BwFGaH/5`4T/!ZTK"BAGT?(.(JCUBB5BVF7GBaJWFsGSF@,!@H"BD<.JCUBB5B6FBaJ7G{F7F3F/ ,@HD<.!"J.@]"VJPBXb>&7" tG/@Zk,H@5@F/ ///(.!(J$B5!B?BF`F.JFL.! JUBB= ,@#5B[G7D:D /.BGH"4Gb! PJJ@Zk.qH@PJF>H.HJUABDB5ABFFCFF/E/ZEKE?f@PB`Xb""]"tG@Zk-I@5@D ///(,!(H$@5!@?@EF%FHh.hJH"?`//UaBdBE5aBFBpuJ4zG!/0@,@H"BD<(,(H5!@CU!@6G$@%F{5H!FD/.WJ"BF =>H/HK5@C2FU@@E!3FtHE/.VJF>,"H/@BBtGXK2"H]"?fPB`Xb//@ZkB}""@PBH"GXb 2"_"@Zk`B4Ghb/@ZkHEEDEE/B@PBGG2"_"GXb/@Zk`B4Ghb@Zk/UACG="E_"b#////g@z"b#@E/'///@BGPBGGXbh2"_"@Zk`B4Ghb@ZkPBTG""Xb@Zk`B4Ghb@Zk B4G(b@ZkMݤH]H="b#_"D _E XEE@,@ H}G b#= E XeE/`///@@PB`""XbTG @Zk`B 4Ghb@Zk B4G(b@Zk! B4G(b@@ZkݥPB""]"XbtGE/@Zk //"PBTGXbP)"@Zk`B4Ghb/@ZkGP]X]`}hpxݤ=]}ݥ#/k///BG4Gb@Zk///(;#0;G^~tGhx[1^ ~(08޴@HPGGG 8!"b@Zk80BGGh"xBb2"8_"@ZkhB4Gb@Zk,G (¤H"/fE"/ %.Q2J'JQ3B1!J/ //.HB4G"PbTJJ/@Zk///%, %H?%.XB%J4G`b "@Zk,GHG((E'"/ .PJJPBJ/ //g.HB4G"PbStJgJ/@Zk', 'H?'.'J0BhxB2"I_"GGGb@ZkB4Gb@Zk8BGGTG@b@Zk//0BGGhxBb2" S_"/@ZkB4Gb@ZkB(G4Gbh@Zk0BtGxB2"Gb/@ZkhBG"GTGtGpb!^h@ZkG//0BxBGGb 2"__"/@ZkB4Gb@ZkGE0BGGh¤xBb2"%,.h_"%HP J0DC@ZkB4Gb@Zk,-GTG8B@bHH IDC@Zk"/XB4G`bx"h@Zk0BGGxBGGb2" t_"//@ZkB4Gb@Zk8BGGTG@b/@ZkG]] }(08ݤ@HP`#k///[# TG^~^ ~R0[(08޴@HP>X^`~hGG# =@;"8b@Zkݠb,G d@HCD////f.BG"4Gb  StJgJ@Zk.qH@PJF>F.FJCTF_.(VJ>$%@%vHB ¤0BGX2"_"8b9?K%G$G@Zk@B4GHb@ZkP`B4GGhbGGG@Zk B0BG @GG8b D b02"_"/@Zk@B4GHb@Zk0B1DtG8b$"@Zk@B4GHb@ZkG///(BBGGGGb r"G/@Zk"BGtG 0B8b!2"G @Zk`BGGGGGhb@ZkB b0BGG8b2" _"/@Zk@B4GHb@ZkGtGB0B8b(!2"_"%D   ///@Zk@B4GHb@ZkGð"tGB0B8b!2"_"D  /@Zk@B4GHb@ZkGy ]7#!" B,H C3D //.B G"4GbJ! UJJ@Zk .q H@P JF >J.JJCTF_.VJ>`P("H%@pB" H%vHD2v KGh"f"`GH"xb@Zk) B GX$"0BG8btG /@ZkBG` ¤0BG8b (2" _"@Zk@B4GHb@ZkG ///Xh\H_"tG`(d 0B"iDHE8bhD/ `//@Zk@B4GHb@ZkG4GG]] }(08ݤ@HP=X]`}hp#/k///BG4Gb@Zk///#C~^^~ (0޴8@GGGGGG///,4G@b#"Hc %D/DK @.8BPJJ/@Zk$,8BG =4G@bA$H'H@ZkD//%1@C4G /G //G//.J@G]]} (0ݤ8@P#k4;HGd DECC$MAIN4<Lb#x DECC$MAIN4;`@d DECC$MAIN4 lG DECC$EXIT4xb#x DECC$EXIT4 @ DECC$EXIT4-G DECC$GETENV4.b# DECC$GETENV4-@ DECC$GETENV4-G DECC$GETENV4.b# DECC$GETENV4-@ DECC$GETENVD5$G8CGILIBENVIRONMENTSETDEBUGD6(b#CGILIBENVIRONMENTSETDEBUGD54@8CGILIBENVIRONMENTSETDEBUG<+8GTCGILIBENVIRONMENTINIT<,Lb#CGILIBENVIRONMENTINIT<+P@TCGILIBENVIRONMENTINITD7TGdCGILIBENVIRONMENTISCGIPLUSD8\b#CGILIBENVIRONMENTISCGIPLUSD7`@dCGILIBENVIRONMENTISCGIPLUS4pG CGILIBVAR4xb# CGILIBVAR4@ CGILIBVAR4#G CGILIBVARNULL4$b# CGILIBVARNULL4#@ CGILIBVARNULL<1GCGILIBRESPONSEHEADER<2b#CGILIBRESPONSEHEADER<1@CGILIBRESPONSEHEADER</GCGILIBCGIPLUSEOF<0b#CGILIBCGIPLUSEOF</@CGILIBCGIPLUSEOFD9GCGILIBENVIRONMENTVERSIOND:b#CGILIBENVIRONMENTVERSIOND9@CGILIBENVIRONMENTVERSION<3G(CGILIBCGIPLUSCALLOUT<4b#CGILIBCGIPLUSCALLOUT<3$@(CGILIBCGIPLUSCALLOUT<34GHCGILIBCGIPLUSCALLOUT<4@b#CGILIBCGIPLUSCALLOUT<3D@HCGILIBCGIPLUSCALLOUT</HGXCGILIBCGIPLUSEOF<0Pb#CGILIBCGIPLUSEOF</T@XCGILIBCGIPLUSEOF<1`GxCGILIBRESPONSEHEADER<2pb#CGILIBRESPONSEHEADER<1t@xCGILIBRESPONSEHEADER4)|G DECC$FPUTS4*b# DECC$FPUTS4)@ DECC$FPUTS4 G DECC$EXIT4b# DECC$EXIT4 @ DECC$EXIT4GDECC$GXFPRINTF4b#DECC$GXFPRINTF4@DECC$GXFPRINTF<%G$CGILIBCGIPLUSESC<&b#CGILIBCGIPLUSESC<% @$CGILIBCGIPLUSESC4#$G8 CGILIBVARNULL4$0b# CGILIBVARNULL4#4@8 CGILIBVARNULL4PGdDECC$GXFPRINTF4Tb#DECC$GXFPRINTF4`@dDECC$GXFPRINTF4dGx DECC$FFLUSH4pb# DECC$FFLUSH 4t@x DECC$FFLUSH4|GDECC$GXFPRINTF4b#DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH4b# DECC$FFLUSH4@ DECC$FFLUSH4G CGILIBVAR4b# CGILIBVAR4@ CGILIBVAR4G CGILIBVAR4b# CGILIBVAR4@ CGILIBVAR<'GDCGILIBCGIPLUSEOT<(b#CGILIBCGIPLUSEOT<'@DCGILIBCGIPLUSEOT4 pG DECC$EXIT4|b# DECC$EXIT4 @ DECC$EXIT4G(DECC$GXFPRINTF4b#@DECC$GXFPRINTF4$@(DECC$GXFPRINTF4<GdDECC$GXFPRINTF4Db#@DECC$GXFPRINTF4`@dDECC$GXFPRINTF4hG| DECC$FFLUSH4pb#@ DECC$FFLUSH4x@| DECC$FFLUSH4 |G SYS$SETPRV4 b#@ SYS$SETPRV4 @ SYS$SETPRV4GDECC$GXFPRINTF4b#@DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH4b#@ DECC$FFLUSH4@ DECC$FFLUSH4GDECC$GXFPRINTF4 b#@DECC$GXFPRINTF4@DECC$GXFPRINTF4G, DECC$FFLUSH4$b#@ DECC$FFLUSH4(@, DECC$FFLUSH4!0GT DECC$FOPEN4"Hb#@ DECC$FOPEN4!P@T DECC$FOPEN4 TGx SYS$SETPRV4 pb#@ SYS$SETPRV4 t@x SYS$SETPRVDGCMA$TIS_VMSERRNO_GET_ADDRDb#@CMA$TIS_VMSERRNO_GET_ADDRD@CMA$TIS_VMSERRNO_GET_ADDR4GDECC$GXFPRINTF4b#@DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH4b#@ DECC$FFLUSH4@ DECC$FFLUSH4G DECC$GXFPRINTF4b#@DECC$GXFPRINTF4@ DECC$GXFPRINTF4 G$ DECC$FFLUSH4b#@ DECC$FFLUSH4 @$ DECC$FFLUSH4`G DECC$FGETS4tb#@ DECC$FGETS4@ DECC$FGETS4@GlDECC$GXFPRINTF4db#@DECC$GXFPRINTF4h@lDECC$GXFPRINTF4lG DECC$FFLUSH4xb#@ DECC$FFLUSH4@ DECC$FFLUSH4 G DECC$GXFPRINTF4 b#@DECC$GXFPRINTF4 @ DECC$GXFPRINTF4l G DECC$GXFPRINTF 4p b#@DECC$GXFPRINTF4 @ DECC$GXFPRINTF44G\ DECC$TOLOWER4Db#@ DECC$TOLOWER4X@\ DECC$TOLOWER4GDECC$GXFPRINTF4b#@DECC$GXFPRINTF4@DECC$GXFPRINTF4\GtDECC$GXFPRINTF4db#@DECC$GXFPRINTF4p@tDECC$GXFPRINTF4GDECC$GXFPRINTF4b#@DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH4b#@ DECC$FFLUSH4@ DECC$FFLUSH4G$DECC$GXFPRINTF4b#@DECC$GXFPRINTF4 @$DECC$GXFPRINTF4$G8 DECC$FFLUSH40b#@ DECC$FFLUSH44@8 DECC$FFLUSH4GDECC$GXFPRINTF4b#@DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH4b#@ DECC$FFLUSH4@ DECC$FFLUSH4GDECC$GXFPRINTF4b#@DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH4b#@ DECC$FFLUSH4@ DECC$FFLUSH4G, DECC$FCLOSE4 $b#@ DECC$FCLOSE4(@, DECC$FCLOSE4GDECC$GXFPRINTF4b#@DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH4b#@ DECC$FFLUSH4@ DECC$FFLUSH4G DECC$FCLOSE4 b#@ DECC$FCLOSE4@ DECC$FCLOSE4G DECC$FCLOSE4 b#@ DECC$FCLOSE4@ DECC$FCLOSE4G$DECC$GXFPRINTF4 b#@DECC$GXFPRINTF4 @$DECC$GXFPRINTF44GLDECC$GXFPRINTF4@b#@DECC$GXFPRINTF4H@LDECC$GXFPRINTF4LGd DECC$FFLUSH4Xb#@ DECC$FFLUSH4`@d DECC$FFLUSH4 G DECC$EXIT4b#@ DECC$EXIT4 @ DECC$EXIT4GHDECC$GXFPRINTF4@b#DECC$GXFPRINTF4D@HDECC$GXFPRINTF4\G|DECC$GXFPRINTF4`b#DECC$GXFPRINTF4x@|DECC$GXFPRINTF4G DECC$FFLUSH4b# DECC$FFLUSH4@ DECC$FFLUSH4G DECC$ISALPHA4b# DECC$ISALPHA4@ DECC$ISALPHA48GX CGILIBVAR4Db# CGILIBVAR4T@X CGILIBVAR4G DECC$ISALPHA 4b# DECC$ISALPHA4@ DECC$ISALPHA4G(DECC$GXFPRINTF4b#DECC$GXFPRINTF4$@(DECC$GXFPRINTF4(G< DECC$FFLUSH44b# DECC$FFLUSH48@< DECC$FFLUSH4<GTDECC$MATCH_WILD4Lb#DECC$MATCH_WILD4P@TDECC$MATCH_WILD4tGDECC$GXFPRINTF4xb#DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH4b# DECC$FFLUSH4@ DECC$FFLUSH4GDECC$INET_ADDR4b#DECC$INET_ADDR4@DECC$INET_ADDR4GDECC$GXFPRINTF4b#DECC$GXFPRINTF4@DECC$GXFPRINTF<G$DECC$GETHOSTBYADDR<b#DECC$GETHOSTBYADDR< @$DECC$GETHOSTBYADDR4<GdDECC$GXFPRINTF4Lb#DECC$GXFPRINTF4`@dDECC$GXFPRINTF4dGx DECC$FFLUSH4pb# DECC$FFLUSH4t@x DECC$FFLUSH4GDECC$GXFPRINTF4b#DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH4b# DECC$FFLUSH4@ DECC$FFLUSH4GDECC$MATCH_WILD4b#DECC$MATCH_WILD4@DECC$MATCH_WILD4G( CGILIBVAR4b# CGILIBVAR4$@( CGILIBVAR48GdDECC$GXFPRINTF4Hb#DECC$GXFPRINTF4`@dDECC$GXFPRINTF4dGx DECC$FFLUSH4pb# DECC$FFLUSH4t@x DECC$FFLUSH4xGDECC$MATCH_WILD4b#DECC$MATCH_WILD4@DECC$MATCH_WILD4GHDECC$GXFPRINTF4@b#`DECC$GXFPRINTF4D@HDECC$GXFPRINTF4G DECC$TOUPPER4b#` DECC$TOUPPER4@ DECC$TOUPPER4G4DECC$GXFPRINTF4b#`DECC$GXFPRINTF40@4DECC$GXFPRINTF44GH DECC$FFLUSH4@b#` DECC$FFLUSH4D@H DECC$FFLUSH4 LGl SYS$SETPRV4 Xb#` SYS$SETPRV4 h@l SYS$SETPRV4tGDECC$GXFPRINTF4b#`DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH4b#` DECC$FFLUSH4@ DECC$FFLUSH4GDECC$GXFPRINTF4b#`DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH  4b#` DECC$FFLUSH4@ DECC$FFLUSH4GD SYS$GETUAI4,b#` SYS$GETUAI4@@D SYS$GETUAI4XGxDECC$GXFPRINTF4\b#`DECC$GXFPRINTF4t@xDECC$GXFPRINTF4 xG SYS$SETPRV4 b#` SYS$SETPRV4 @ SYS$SETPRV4GDECC$GXFPRINTF4b#`DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH4b#` DECC$FFLUSH4@ DECC$FFLUSH4GDDECC$GXFPRINTF4b#`DECC$GXFPRINTF4@@DDECC$GXFPRINTF4DGX DECC$FFLUSH4Pb#` DECC$FFLUSH4T@X DECC$FFLUSH4pGDECC$GXFPRINTF4tb#`DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH4b#` DECC$FFLUSH4@ DECC$FFLUSH4G DECC$TOUPPER4b#` DECC$TOUPPER4@ DECC$TOUPPER< hGSYS$HASH_PASSWORD< b#`SYS$HASH_PASSWORD< @SYS$HASH_PASSWORD4GDECC$GXFPRINTF4b#`DECC$GXFPRINTF4@DECC$GXFPRINTF4GDECC$GXFPRINTF4b#`DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH4b#` DECC$FFLUSH4@ DECC$FFLUSH4PGDECC$GXFPRINTF4`b#`DECC$GXFPRINTF4@DECC$GXFPRINTF4G DECC$FFLUSH4b#` DECC$FFLUSH4@ DECC$FFLUSH4 G DECC$EXIT4b#` DECC$EXIT4 @ DECC$EXIT4hb# DECC$TOUPPER4G DECC$TOUPPER4@ DECC$TOUPPER4G DECC$TOUPPER4b# DECC$TOUPPER4@ DECC$TOUPPER =0%000 [%d] failed on SYSUAF password (=8*000 [%d] sys$hash_password() %%X%08.08X X=0!sys$hash_password() %%X%08.08X =0'000 [%d] failed on SYSUAF privileges =0"000 [%d] failed on SYSUAF flags =0#000 [%d] sys$getuai() %%X%08.08X =(sys$getuai() %%X%08.08X = 500 Error %%X%08.08X 0=0#000 [%d] sys$setprv() %%X%08.08X X=8)000 [%d] authenticate "%s" from SYSUAF =8*000 [%d] host address "%s" not resolved = IpAddress: %08.08X =0%000 [%d] resolve host address "%s" =(000 [%d] match "%s" by "%s" =(000 [%d] match host "%s" 8=paRestrictOnHost() |%s| 401 Not authenticated 000 [%d] restricted by host at line %d of "%s" =@4000 [%d] configuration problem at line %d of "%s" =0$000 [%d] authorize "%s"@"%s" "%s" = CelPassword |%s| = CelUserName |%s| 0=H>000 [%d] line %d "%s" 500 Error %%X%08.08X opening file. p=8.000 [%d] error %%X%08.08X opening file "%s" =0&000 [%d] authorizing "%s" from "%s" =(AuthorizeUser() |%s|%s|%s| = WWW_AUTH_PASSWORD=8+100 AUTHAGENT-CALLOUT ProcessRequest() 0=@5!AGENT-BEGIN: %s (%s) usage:%dapplication/proctorh= AUTHAGENT_CEL$WATCH=AUTHAGENT_CEL$DBUG  SYS$GETUAI;=MatchSysUaf() 0 DECC$TOUPPER7DEBUG;7 DEBUGWATCH ;=0";=pP 7DECC$GA_STDOUT;DECC$GXFPRINTF DECC$FFLUSH; SYS$SETPRV SYS$HASH_PASSWORD DECC$EXIT;=0";=P0 =0";=`L 7DECC$$GL___CTYPEA7DECC$$GA___CTYPETP DECC$MATCH_WILD DECC$ISALPHA CGILIBVAR DECC$GETHOSTBYADDR= WWW_REMOTE_ADDR= WWW_REMOTE_HOSTDECC$INET_ADDR DECC$TOLOWER= 401 "%s" = 403 Forbidden. = shr=get  DECC$FGETS(CMA$TIS_VMSERRNO_GET_ADDR=0P";=\  DECC$FCLOSE= =r! DECC$FOPEN= 200 READ+WRITE =(CelRealm |%s| CelHost |%s| =0";=04 # CGILIBVARNULL=WWW_AUTH_AGENT %CGILIBCGIPLUSESC=000 [%d] %s @ 'CGILIBCGIPLUSEOT= WWW_REMOTE_USERh7 SOFTWAREID) DECC$FPUTS= !AGENT-END:=REQUEST_METHOD +CGILIBENVIRONMENTINIT= text/plain- DECC$GETENV /CGILIBCGIPLUSEOF=0";=00 7CGIPLUSUSAGECOUNT 1CGILIBRESPONSEHEADER 3CGILIBCGIPLUSCALLOUT(5CGILIBENVIRONMENTSETDEBUG(7CGILIBENVIRONMENTISCGIPLUS(9CGILIBENVIRONMENTVERSION= CGIplus! p=x=08";=P0 7DECC$$SHELL_HANDLER=; DECC$MAIN == 4= h4=# 4= 4= `4= H4= P46h=' 4 C=3+* AUTHAGENT_CELVSI C V7.4-002 ?= 4=TRANSFER$BREAK$GO = 44= main4= $?  $?  $?  $?  .? .? /? /? @? ?? @? C? C?" K?