P @P BP$ DP0 ' CHKAC01 5-Oct-1996 11:03 5-Oct-1996 11:03 VAX FORTRAN V5.9-173 CHKAC P @ *JTAUTHMAINT.EXE* B( U( V( I( J( K( L( S( ) LNM$PROCESS_TABLE EZ$ CHKAC P T l $ (@ L d d ( 0 8 STR$MATCH_WILD @ \ \ d d ( 0 *@ ( H * ITMCHK @ -@ ( H - ITMCHK @ 0@ ( H 0 ITMCHK @ 3@ $ 3 ITMCHK @ 6@ $ $ 6 ITMCHK @ , 9@ L 9 ITMCHK @ T 9@ 0 t 9 ITMCHK @ | <@ < ITMCHK @ <@ 0 < ITMCHK @ @ ? B $ D < D D EXTTRNLNM @ t P [Ь4@Ь HЬ\hЬp| ˀ,˂ Vf˄ަ ˈ ˌˎ$ː$˔ ˘˚(˜Hˠ@ˤ-˦L˨ƌˬ˰˲ ˴ޫ˸˼ ˾ޫ Wg@Xը ި4 SYS$GETJPIW ը Ш` SYS$GETJPIW IVLEN PH IVLEN P IVLEN P$$ IVLEN Pƌ$1 Yx YP( @ 0 IVLEN PT-$$ T $<$@TD HL STR$MATCH_WILD P$ Y$X$\h STR$MATCH_WILD P$ t FOR$SECNDS FaF PJPPP P PYIHTPUEdU1 P@HTEdD gP@HTEdD1 ը ިˀ| GTPRV ը ШXˈ JGTPRVS P@HP`PP$P@HP`PP g1 1 ը ި4˜˔ SYS$GETJPIW Ш4 ը Ш` ˴ SYS$GETJPIW P@HP`PP$P@HP`PP g1 1 IVLEN PH IVLEN P IVLEN P$ IVLEN Pƌ`TDH ITMCHK ի ѫ \P@HP`PP1 Ш Pը PˏPѫ1 P@HTEdN gP@HTEdN1 P@HTEdP1 P@HTEdY P@HTEdR P@HTEdX Ш Pը PˏPѫ1 P@HTEdX g1 `P@H8< ITMCHK ի gի `VFH`d ITMCHK ի gի1 `VFHˈˌ ITMCHK ի gի `VFH˰˴ ITMCHK ի gի1 `VFH ITMCHK ի `VFH ITMCHK ի gի `VFH(, ITMCHK ի @gի1 `VFHPT ITMCHK ի gի1 (P@HP`P ,P@HP`P1 `VFHp| LIB$INDEX PV1 V 1 VTT@ P`UEHXPˈDhˌ˘ LIB$INDEX P1 VPUU 1 (UEHUeUU ,UEHUeUU PVTV`P@HUVˤDe˨ˬ FILCK (P@HP`Pѫ P g(P@HP`Pѫ P1 ,P@HP`Pѫ P g,P@HP`Pѫ P1 TP@HP`P XP@HP`P1 HP`PPP@HP`PPʏ PP Vː FOR$WRITE_IF ˀ FOR$IO_X_DA FOR$IO_END EXTTRNLNM P SWPUIC LIB$SYS_TRNLOG SWPUIC V VPVTDUUPPDV b FOR$READ_IF ߫( FOR$IO_L_R FOR$IO_END b$ FOR$READ_IF ߫, FOR$IO_L_R FOR$IO_END PP(P,TP@HP`PP( gTP@HP`PP( XP@HP`PP, gXP@HP`PP, gԼ CHKAC SYS$GETJPIW LIB$SYS_TRNLOG EXTTRNLNM STR$MATCH_WILD IVLEN FOR$SECNDS GTPRV JGTPRVS ITMCHK LIB$INDEX FILCK SWPUIC $CODE e $PDATA $LOCAL RJCOD KIUIC JPIJUNK @ EXFL FOR$IO_END FOR$IO_L_R FOR$IO_X_DA FOR$READ_IF FOR$WRITE_IF P P TP PR P' P P P P P #P 7P =P QP P P PM PD P PO P P P P aP gP1 zPp P PS P P( P PR P P4 P P 'P ,P HP PP$ iP sPp P P$ P P+ Pm P PJ P P 3P >P LP [P wP P P P P .P @P XP gP wPs P" !P NP P P3 P P Pd ITMCHK01 5-Oct-1996 11:03 5-Oct-1996 11:03 VAX FORTRAN V5.9-173 ITMCHK P ) , & ITMCHK P , @ ` t | P [}PQ} PQ }PQԼ LIB$INDEX P1 P 1 PP Q,Q@ 4 LIB$INDEX PV1 V 1 ,~VV^(V nVXXW,Wn PQ^H LIB$INDEX P T IVLEN PWh LIB$INDEX PXXW X txXPP| ˀ ˄ STR$MATCH_WILD P$ XW X W,WH ITMCHK STR$MATCH_WILD LIB$INDEX IVLEN $CODE $PDATA $LOCAL 1P =P cP oP P PQ PM P P ! j IVLEN01 5-Oct-1996 11:03 5-Oct-1996 11:03 VAX FORTRAN V5.9-173 IVLEN IVLEN P P [}PQPмPQռ RQRSSTDTT PQ SPP IVLEN G $CODE $PDATA $LOCAL P# 9P ?P G FILCK01 5-Oct-1996 11:03 5-Oct-1996 11:03 VAX FORTRAN V5.9-173 FILCK P FILCK P ) IUFCK P [}PQ Pмм RԼԼ P FOR$INQUIRE 4 FOR$OPEN P1 S P P h FOR$CLOSE R FOR$READ_SF k FOR$IO_L_R FOR$IO_X_DA FOR$IO_END Pk RQQ TSQQT SSռ ּ kPp FOR$CLOSE м FILCK IUFCK FOR$INQUIRE FOR$OPEN FOR$CLOSE $CODE R $PDATA $LOCAL FSZC FOR$IO_END FOR$IO_L_R FOR$IO_X_DA FOR$READ_SF >P ]P ~Pa P^ P) P: IUFCK01 5-Oct-1996 11:03 5-Oct-1996 11:03 VAX FORTRAN V5.9-173 IUFCK IUFCK PP P D D P [ЬЬ$84 SYS$OPEN PRR @< SYS$CONNECT PRR P$P@P`PPRkRHD GTXAB k kRkЫ Ы P IUFCK SYS$CONNECT SYS$OPEN GTXAB $CODE $PDATA \ $LOCAL FSZC )P
,S FOR$READ_SF < FOR$IO_T_DS FOR$IO_END t LIB$INDEX Pˈ LIB$INDEX PT˜ LIB$INDEX PPT TTPP˨ D ˬ ˨ FOR$READ_IF k FOR$IO_L_R ߫ FOR$IO_L_R ߫ FOR$IO_L_R FOR$IO_END kRBcּR 1L˰ FOR$CLOSE GETFNM FOR$OPEN LIB$INDEX FOR$CLOSE $CODE $PDATA $LOCAL FOR$IO_END FOR$IO_L_R FOR$IO_T_DS FOR$READ_SF FOR$READ_IF FOR$INI_DES1_R2 7P BP FP % GETFNB01 5-Oct-1996 11:03 5-Oct-1996 11:03 VAX FORTRAN V5.9-173 GETFNB P( ) ) GETFNB P @ p @ @ P [}PQP м 8Ь ޫ P FOR$INI_DES1_R2 RD FOR$OPEN P1 FOR$READ_SF < FOR$IO_T_DS FOR$IO_END t LIB$INDEX Pˈ LIB$INDEX PS˜ LIB$INDEX PPS SSPP˨ C ˬ ˨ FOR$READ_IF k FOR$IO_L_R ߫ FOR$IO_L_R ߫ FOR$IO_L_R FOR$IO_END kR>˴ ˰ VBSET ּ1I˼ FOR$CLOSE GETFNB FOR$OPEN LIB$INDEX VBSET FOR$CLOSE $CODE $PDATA $LOCAL FOR$IO_END FOR$IO_L_R FOR$IO_T_DS FOR$READ_SF FOR$READ_IF FOR$INI_DES1_R2 7P >P BP + LOGLATCH01 5-Oct-1996 11:03 5-Oct-1996 11:03 VAX FORTRAN V5.9-173 LOGLATCH PEACF_LE$$ T LNM$SYSTEM LOGLATCH TPP \ LIB$SYS_TRNLOG @ P T t LIB$SET_LOGICAL @ | LIB$SET_LOGICAL @ LIB$SET_LOGICAL @ P P [Լ LIB$SYS_TRNLOG P < LIB$SET_LOGICAL LOGLATCH LIB$SYS_TRNLOG LIB$SET_LOGICAL LIB$GET_FOREIGN ) $CODE $PDATA $LOCAL P ) GETEXF01 5-Oct-1996 11:03 5-Oct-1996 11:03 VAX FORTRAN V5.9-173 GETEXF P ) GETEXF P P [}PQ IVLEN P FOR$OPEN P R FOR$READ_SF x RP @@ D@ FOR$IO_T_DS FOR$IO_END R RH FOR$CLOSE GETEXF IVLEN FOR$OPEN FOR$CLOSE $CODE $PDATA P $LOCAL @ EXFL FOR$IO_END FOR$IO_T_DS FOR$READ_SF ,PO :PA =P> RJ2ASC01 5-Oct-1996 11:03 5-Oct-1996 11:03 VAX FORTRAN V5.9-173 RJ2ASC RJ2ASC P P< [}PQ, n Ӽ , Ӽ , Ӽ , 2 Ӽ , K Ӽ , b Ӽ , { Ӽ@ , Ӽ , Ӽ , Ӽ , Ӽ , Ӽ , PTime of Day Access rejectPrivs too high for accessUser on forbid. user listUser not on permit listImage on forbid. img listImage not on permit listTerminal on forbid listAccport on forbid listTerm or accpor not permitFile tamper checksum failFile password not enteredUser filter routine rejct <RJ2ASC $CODE $ $PDATA $LOCAL P .P ?P PP aP rP P P P P P P IGETCAP01 5-Oct-1996 11:03 5-Oct-1996 11:03 VAX FORTRAN V5.9-173 IGETCAP PL IGETCAP P P [ JTGLMSK k P8 FOR$EXIT_W P IGETCAP JTGLMSK FOR$EXIT_W 8 $CODE $PDATA $LOCAL 0 ILICC 'P 8 SETCAP101 5-Oct-1996 11:03 5-Oct-1996 11:03 VAX FORTRAN V5.9-173 SETCAP1 SETCAP1 P SETCAP1 $CODE $PDATA $LOCAL 0 ILICC KGETKS01 5-Oct-1996 11:03 5-Oct-1996 11:03 VAX FORTRAN V5.9-173 KGETKS PĜ3 Key error. Key appears invalid in form. Unentered. KGETKS P P [}PQPk k FOR$READ_IF ߫ FOR$IO_X_DA FOR$IO_END KGETKI FOR$WRITE_SF FOR$IO_END KGETKS KGETKI W $CODE < $PDATA 8 $LOCAL FOR$IO_END FOR$IO_X_DA FOR$WRITE_SF FOR$READ_IF P) W TSTULK01 5-Oct-1996 11:03 5-Oct-1996 11:03 VAX FORTRAN V5.9-173 TSTULK TSTULK P P [ FOR$INQUIRE k FOR$UNLOCK P TSTULK FOR$INQUIRE ( $CODE $PDATA $LOCAL FOR$UNLOCK P &P (