ACC_CKPT010.BCK-XACC_CKPT010.BCK\BACKUP [...] $1$DUA7:[ANONYMOUS.PUB.FREEWARE_CD]ACC_CKPT010.BCK/SAVE/PROT=W:R/BLOCK=2048/LOG GEGE ОOS7.0 _BRAHMS::  _$1$DUA7: V6.2  dp*[ACC_CKPT]ALPHA.DIR;1+,E ./ 4-0123 KPWO56a7a8ɡpʙ9GHJI|Nl 0B 0d ]0]0ACC_CKPT$MAIN.EXE ACC_CKPT$MAIN.OBJ  ACC_CKPT.EXE  ACC_CKPT.MAP2 2 ACC_CKPT.OBJ@#*[ACC_CKPT.ALPHA]ACC_CKPT$MAIN.EXE;2+, ./ 4-E 0123 KPWO 56/7 8 Jʙ9GHJPC:&ACC_CKPT010.BCK E #[ACC_CKPT.ALPHA]ACC_CKPT$MAIN.EXE;2(h (.0@ ACC_CKPT$MAINV1.0-2A11-36$ $ $ $J$( 4  LIBRTL_0014& LIBOTS_001<3SYS$BASE_IMAGE_001@f)SYS$PUBLIC_VECTORS_0010  p ` 0 0 `C0 0 0 La)ACC_CKPT010.BCK E #[ACC_CKPT.ALPHA]ACC_CKPT$MAIN.EXE;2Tp SYS$LOADABLE_IMAGES:ACC_CKPT.EXEACC_CKPT_gAQ 8Pid: >C~^ GG>C(mG>CtjC ^GGHmG^G@M9BZk(C(P2HB@[/[K0DC 1@`G0MtB8mtBrKXrKBvs KGG`tBcZk(M pMxmTGTBtQBzZkPMGXmTG` @ZkGCk>C~^ ( GGA6@-p\tCAt@KCCP@Ө-0M8mG&C!CtGZkA!@p|tCt`KCCMGͦTG(m4CTC MsG*@Zk>CA .@ CG (Ck >C^ G>ChMG tLCtMC>CMG,ޢG0~GtG޶~4ޢ8~޶~<ޢm ޶AZkCCk>C^ GHGGGo.CG\/J[ \KMFmCAZkCkYACC_CKPT010.BCK E #[ACC_CKPT.ALPHA]ACC_CKPT$MAIN.EXE;2|TX0p@P @LIBRTL@LIBOTS@SYS$BASE_IMAGE@SYS$PUBLIC_VECTORS#*[ACC_CKPT.ALPHA]ACC_CKPT$MAIN.OBJ;2+, ./ 4~-E 0123KPWO 56!@7S8Svʙ9GHJ@@.MAIN.V115-DEC-1995 16:15AMAC V2.2-16 $LINKAGE $CODE$DATA $ABS$ . BLANK . . ABS . SYS$GETSYILIB$GET_FOREIGN OTS$CVT_TZ_L SYS$CMKRNLLDR$LOAD_IMAGESYS$ENQWSYS$DEQ OTS$CALL_PROC(JMAIN0J  DO_THE_WORK~4$oACC_CKPT010.BCK E #[ACC_CKPT.ALPHA]ACC_CKPT$MAIN.OBJ;2F =0 ;= =; LIB$GET_FOREIGN""  SYS$GETSYI"""  SYS$CMKRNL";p  OTS$CVT_TZ_L"=0 ;=0  OTS$CALL_PROC LDR$LOAD_IMAGE""=0 ; SYS$ENQW""" =0;SYS$DEQ"" = >C~^ GG>C(mG>CtjC ^GGHmG^G@M@Zk(C(P2HB@[/[K0DC 1@`G0MtB8mtBrKXrKBvs KGG`tB@Zk(M pMxmTGTBtQB@ZkPMGXmTG` @ZkGCk>C~^ ( GGA6@-p\tCAt@KCCP@Ө-0M8mG&C!CtG@ZkA!@p|tCt`KCCMGͦTG(m4CTC MsG@Zk>CA .@ CG (Ck >C^ G>ChMG tLCtMC>CMG,ޢG0~GtG޶~4ޢ8~޶~<ޢm ޶@ZkCCk>C^ GHGGGo.CG\/J[ \KMFmC@ZkCk4Dm# SYS$GETSYI4TG\ SYS$GETSYI4X@\ SYS$GETSYI4GPACC_CKPT010.BCK E #[ACC_CKPT.ALPHA]ACC_CKPT$MAIN.OBJ;22LIB$GET_FOREIGN4m#LIB$GET_FOREIGN4@LIB$GET_FOREIGN4G OTS$CVT_TZ_L4m# OTS$CVT_TZ_L4@ OTS$CVT_TZ_L4G SYS$CMKRNL4m# SYS$CMKRNL4@ SYS$CMKRNL4 tGLDR$LOAD_IMAGE4 xm#LDR$LOAD_IMAGE4 @LDR$LOAD_IMAGE4 m# OTS$CALL_PROC4 G OTS$CALL_PROC4 @ OTS$CALL_PROC4 XGSYS$ENQW4m#SYS$ENQW4 @SYS$ENQW,GSYS$DEQ,m#SYS$DEQ,@SYS$DEQU U= 4=8-SYS$LOADABLE_IMAGES:ACC_CKPT.EXEACC_CKPT_S=gA4Q4= 84=4=4= Pid:  3ACC_CKPT010.BCK E [ACC_CKPT.ALPHA]ACC_CKPT.EXE;2O*[ACC_CKPT.ALPHA]ACC_CKPT.EXE;2+, ./ 4-E 0123 KPWO 5678iʙ9GHJLDh (z.0-izACC_CKPTV1.0-2A11-36@@@@@$ $$J<3SYS$BASE_IMAGE_001@f)SYS$PUBLIC_VECTORS_001OACC_CKPT010.BCK E [ACC_CKPT.ALPHA]ACC_CKPT.EXE;2>C?G~(^0^8@ GHG==G0UC80M8mZk&(- H/KT 0XC:FK8K4GXCFG) m[@>C@MٔHHmG>G>CBTG޶Zk^C\HCHGGGGGGG(0^8@HCk pM>Cxm >GZkTGCv HyS`KCXmWJFB`ZR@KYGBCPM GZk.W JGG>C~^ (08 GG(M '@GG0M8mwZk 'Hhͦ(mPMdh೐$ೀ;` 8G;Xm4G'@ZkG (08Ck0(P$ -D A &0 @0 @.`0 P@ "0 ` ACC_CKPT_g >C~^ ^( G08(GO/4AA"/yKZ[KX KYG K4AG"?O?|uJ ϦAyIGVtJGF ϶/O/G2/GGZ[KX KYG IG2?G/O?>C@MHmGG>CG ޢGtAGG޶GAZk(C0@@M2H/A@:/:K1$CV 1@AP 8CAvuKWtJzHF8?o/AB//GG[|KY C0M8m >C,ޢ0޶4ޢ8޶<ޢ ޶AZk0@@C(m0@@0tfCrH/"BHTGCDGCGGGG ^(08Ck(ϦG0MGGrJVrJC{sJtAF(϶>C8mtA tG>CG,ޢ0޶4ޢ8޶<ޢ ޶jAZkC0@@(m0@@0tfCrHTXp@ ! H``h0Pp @SYS$BASE_IMAGE@SYS$PUBLIC_VECTORSFFACC_CKPTV1.0-215-DEC-1995 16:1515-DEC-1995 16:15Linker A11-36  .$$ABS$$.  ACC_CKPT010.BCK2 2E [ACC_CKPT.ALPHA]ACC_CKPT.MAP;2 +*[ACC_CKPT.ALPHA]ACC_CKPT.MAP;2+,2 2. / 4 -E 0123KPWO!566}7??8?ʙ9GHJ [.ALPHA]ACC_CKPT.EXE 15-DEC-1995 16:15 Linker A11-36 Page 1G +------------------------+G ! Object Module Synopsis !G +------------------------+lModule Name Ident Bytes File Creation Date Creatorl----------- ----- ----- ----- ------------- -------nACC_CKPT V1 1895 [ACC_CKPT.ALPHA]ACC_CKPT.OBJ;1 15-DEC-1995 15:45 AMAC V2.2-16oSYS$BASE_IMAGE ALPHA X658-T3A 0 [SYS$LDR]SYS$BASE_IMAGE.EXE;1 16-NOV-1995 20:54 Linker A11-20SYS$PUBLIC_VECTORS o X-54 0 [SYSLIB]SYS$PUBLIC_VECTORS.EXE;1 16-NOV-1995 20:54 Linker A11-20 KERNEL_ROOT:[ACC_CKPT.ALPHA]ACC_CKPT.EXE;2  ŧ% ?E #[ACC_CKPT.ALPHA]ACC_CKPT$EX\N.EXE;2 h_oyb9qY {lfav*OasDDqJ f OV_OemD`|@nTCto|%as!S?jnDVPM#{a=;ܒ͢A. #M$]ureU&6m%O}c `11~bh.Hs5:&!H4 Gc7.$;Lե"߰u[Ѐ\'dsU[j"47th|1:ۙMVn53+`G7HH% 09p! g4!**qB&˄T`12lVqI.nj s/ƝNH(ԗn*)4lm*imj9V&ηԉԌߩxAuT.3/h*S|C~.0E=1;:{\ڕm#h9Bj~_ w`aoZ7*  D9U'E "meZSsJ#8Ulܯ{ZV:nY"X i|U0\*a,1R ǁP%>AS? 1a Rd=c z{9pdYms= 6_.ԍh]Xc.Tou QnO+r<մ.΃bወ;xı{JzKnfH!<3Tܨqχ`+^LB*K1]AŴxJ[j5)3ݔtkj@IЈ,tg\ *d&sduXRv$grY}Rk.sR]C JG%EH6V,ML0:$Y5n.,.vX$!_(ׂʸՑބ\H ;ǖhO)8l2E˩w1~ c׌͛-âOh >tٵT䱹.T剶!Ѹ\74q%Y,eHoy=Ws\iDŽ߳a,)\U@=QJƾV~7OF{ nXHW@ etm5&pylGAzH C%UH:(9aQ$G{MA @Tj$C 1@ 8 S8%,IKWtJ(HF9go/ABoGHG[|KS_e?C?UUHtGGC/?>o?tG7/ p;/G .ACC_CKPT010.BCK2 2E [ACC_CKPT.ALPHA]ACC_CKPT.MAP;2  15-DEC-1995 16:15 Linker A11-36 Page 2G +------------------------+G ! Image Section Synopsis !G +------------------------+~ Cluster Type Pglts Base Addr Disk VBN PFC Protection and Paging Global Sec. Name Match Majorid Minorid~ ------- ---- ----- --------- -------- --- --------------------- ---------------- ----- ------- -------NPERMANENT_PSECTS 4 2 00000000-R 3 0 READ WRITE COPY ON REFINITIALIZATION_PSECTS N 4 2 00010000-R 5 0 READ WRITE COPY ON REFP 2 1 00020000-R 7 0 READ WRITE FIXUP VECTORSSYS$BASE_IMAGE 1 90 00000000-R 0 0 READ ONLY EXECUTABLE SYS$BASE_IMAGE_0 EQUAL 23 15610857 1 244 0000C000-R 0 0 READ WRITE COPY ON REF SYS$BASE_IMAGE_0 EQUAL 23 15610857 2 7 0002C000-R 0 0 READ WRITE FIXUP VECTORS SYS$BASE_IMAGE_0 EQUAL 23 15610857SYS$PUBLIC_VECTORS  2 13 00000000-R 0 0 READ ONLY EXECUTABLE SYS$PUBLIC_VECTO EQUAL 23 15608166 1 38 00004000-R 0 0 READ WRITE COPY ON REF SYS$PUBLIC_VECTO EQUAL 23 15608166  GACC_CKPT010.BCK2 2E [ACC_CKPT.ALPHA]ACC_CKPT.MAP;2 ?' 2 1 0000C000-R 0 0 READ WRITE FIXUP VECTORS SYS$PUBLIC_VECTO EQUAL 23 15608166$ Key for special characters above: +--------------------+ ! R - Relocatable ! ! P - Protected ! +--------------------+ KERNEL_ROOT:[ACC_CKPT.ALPHA]ACC_CKPT.EXE;2 15-DEC-1995 16:15 Linker A11-36 Page 3H +--------------------------+H ! Program Section Synopsis !H +--------------------------+kPsect Name Module Name Base End Length Align Attributesk---------- ----------- ---- --- ------ ----- ----------. BLANK . 00000000 00000000 00000000 ( 0.) OCTA 4 NOPIC,CON,REL,LCL,NOSHR, EXE, WRT,NOVEC, MOD Q ACC_CKPT 00000000 00000000 00000000 ( 0.) OCTA 4$CODE 00000000 00000293 00000294 ( 660.) OCTA 4 PIC,CON,REL,GBL,NOSHR,NOEXE, WRT,NOVEC, MOD Q ACC_CKPT 00000000 00000293 00000294 ( 660.) OCTA 4$LINKAGE 000002A0 000003E7 00000148 ( 328.) OCTA 4 PIC,CON,REL,GBL,NOSHR,NOEXE, WRT,NOVEC, MOD Q ACC_CKPT 000002A0 000003E7 00000148 ( 328.) OCTA 4$INIT ACC_CKPT010.BCK2 2E [ACC_CKPT.ALPHA]ACC_CKPT.MAP;2  00010000 0001004A 0000004B ( 75.) OCTA 4 PIC,CON,REL,GBL,NOSHR, EXE, WRT,NOVEC, MOD Q ACC_CKPT 00010000 0001004A 0000004B ( 75.) OCTA 4$INIT_CODE 00010050 0001038F 00000340 ( 832.) OCTA 4 PIC,CON,REL,GBL,NOSHR, EXE, WRT,NOVEC, MOD Q ACC_CKPT 00010050 0001038F 00000340 ( 832.) OCTA 4 KERNEL_ROOT:[ACC_CKPT.ALPHA]ACC_CKPT.EXE;2 15-DEC-1995 16:15 Linker A11-36 Page 4C +-----------------+C ! Symbols By Name !C +-----------------+Symbol Value Symbol Value Symbol Value ------ ----- ------ ----- ------ ----- XACC_CKPT 00000320-R XCTL$GL_FINALSTS 00000390-X XCTL$GL_PCB 00000560-X XCTL$GL_PHD 00000330-X XCTL$GL_VOLUMES 000003C0-X XCTL$GQ_LOGIN 00000380-X 븡ACC_CKPT010.BCK2 2E [ACC_CKPT.ALPHA]ACC_CKPT.MAP;2 T XEXE$ALONONPAGED 000026C0-RX XEXE$NAM_TO_PCB 00002D00-RX XEXE$PRCPURMSG 00002E40-RX XINI$BRK 00003260-RX XINIT 00000390-R XSCH$GL_SWPPID  00008A90-RX XSCH$QAST 00004120-RX XSMP$GL_FLAGS 00008420-RX XSMP$RELEASE 00004400-RX XSYS$ENQW 00000930-RX XSYS$GETSYI 00000960-RX XSYS$GETTIM 00000360-RX XSYS$K_VERSION 00000000-X XSYS$K_VERSION_01 00000010-X XSYS$K_VERSION_02 00000020-X XSYS$K_VERSION_03 00000030-X XSYS$K_VERSION_04 00000040-X HdACC_CKPT010.BCK2 2E [ACC_CKPT.ALPHA]ACC_CKPT.MAP;2  XSYS$K_VERSION_05 00000050-X XSYS$K_VERSION_06 00000060-X XSYS$K_VERSION_07 00000070-X XSYS$K_VERSION_08 00000080-X XSYS$K_VERSION_09 00000090-X XSYS$K_VERSION_10 000000A0-X XSYS$K_VERSION_11 000000B0-X XSYS$K_VERSION_12 000000C0-X XSYS$K_VERSION_13 000000D0-X XSYS$K_VERSION_14 000000E0-X XSYS$K_VERSION_15 000000F0-X XSYS$K_VERSION_16 00000100-X XSYS$K_VERSION_17 0000A6F0-X XSYS$K_VERSION_18 0000A700-X  !KERNEL_ROOT:[ACC_CKPT.ALPHA]ACC_CKPT.EXE;2 15-DEC-1995 16:15 Linker A11-36 Page 5 D +------------------+D &oGACC_CKPT010.BCK2 2E [ACC_CKPT.ALPHA]ACC_CKPT.MAP;2 g ! Symbols By Value !D +------------------+2Value Symbols...2----- ---------- 00000000 X-SYS$K_VERSION 00000010 X-SYS$K_VERSION_01 00000020 X-SYS$K_VERSION_02 00000030 X-SYS$K_VERSION_03 00000040 X-SYS$K_VERSION_04 00000050 X-SYS$K_VERSION_05 00000060 X-SYS$K_VERSION_06 00000070 X-SYS$K_VERSION_07 00000080 X-SYS$K_VERSION_08 00000090 X-SYS$K_VERSION_09 000000A0 X-SYS$K_VERSION_10 000000B0 X-SYS$K_VERSION_11 000000C0 X-SYS$K_VERSION_12 000000D0 X-SYS$K_VERSION_13 000000E0 X-SYS$K_VERSION_14 000000F0 X-SYS$K_VERSION_15 00000100 X-SYS$K_VERSION_16 00000320 R-ACC_CKPT 00000330 X-CTL$GL_PHD 00000360 RX-SYS$GETTIM 00000380 X-CTL$GQ_LOGIN 500000390 X-CTL$GL_FINALSTS R-INIT - 000003C0 X-CTL$GL_VOLUMES 00000560 X-CTL$GL_PCB 00000930 RX-SYS$ENQW 00000960 RX-SYS$GETSYI 000026C0 RX-EXE$ALONONPAGED 00002D00 RX-EXE$NAM_TO_PCB 00002E40 RX-EXE$PRCPURMSG 00003260 RX-INI$BRK 00004120 RX-SCH$QAST 00004400 RX-SMP$RELEASE 00008420 RX-SMP$GL_FLAGS 00008A90 RX-SCH$GL_SWPPID 0000A6F0 X-SYS$K_VERSION_17 0000A700 X-SYS$K_VERSION_18$ Key for special characters above: +--------------------+ ! * - UndefinACC_CKPT010.BCK2 2E [ACC_CKPT.ALPHA]ACC_CKPT.MAP;2 ed ! ! A - Alias Name ! ! I - Internal Name ! ! U - Universal ! ! R - Relocatable ! ! X - External ! ! WK - Weak ! ! M - Mask value ! KERNEL_ROOT:[ACC_CKPT.ALPHA]ACC_CKPT.EXE;2 15-DEC-1995 16:15 Linker A11-36 Page 6P2Value Symbols...2----- ---------- +--------------------+ EKERNEL_ROOT:[ACC_CKPT.ALPHA]ACC_CKPT.EXE;2 15-DEC-1995 16:15 Linker A11-36 Page 7 C +----------------+vC ! Image Synopsis !eC +----------------+]hVirtual memory allocated: 00000000 0002FFFF 00030000 (196608. bytes, 384. pages)AStack size: 0. pages-UImage header virtual block limits: 1. 2. ( 2. blocks) UImage binary virtual block limits: 3. 7. ( 5. blocks)uAImage name and identification: ACC_CKPT V1.0-2 ;System component mask: 0005B812 5 SYS$K_VERSION_MEMORY_MANAGEMENT 3,0 5 SYS$K_VERSION_PROCESS_SCHED 2,006 SYS$K_VERSION_COUNTERS 1,646 SYS$K_VERSION_STABLE 1,646 SYS$K_VERSION_MuyACC_CKPT010.BCK2 2E [ACC_CKPT.ALPHA]ACC_CKPT.MAP;2 ^gISC 1,646 SYS$K_VERSION_VOLATILE 1,646 SYS$K_VERSION_SHELL 1,645 SYS$K_VERSION_MULTI_PROCESSING 1,0 ;Number of files: 5.L;Number of modules: 3. ;Number of program sections: 9. ;Number of global symbols: 18.1;Number of image sections:  9. :User transfer address: 00000390;Number of code references to shareable images: 35.K~Image type: PIC, SHAREABLE. Global Section Match=EQUAL, Ident, Major=46, Minor=9502074iMap format: FULL in file KERNEL_ROOT:[ACC_CKPT.ALPHA]ACC_CKPT.MAP;20<Estimated map length: 27. blocksE +---------------------+ E ! Link Run Statistics ! E +---------------------+ SPerformance Indicators Page Faults CPU Time Elapsed Time S---------------------- ----------- -------- ------------ U Command processing: 90 00:00:00.05 00:00:00.28 U Pass 1: 103 00:00:00.08 00:00:00.80 U Allocation/Relocation: 5ACC_CKPT010.BCK2 2E [ACC_CKPT.ALPHA]ACC_CKPT.MAP;2 k 7 00:00:00.02 00:00:00.48 U Pass 2: 8 00:00:00.01 00:00:00.18 U Map data after object module synopsis: 5 00:00:00.01 00:00:00.04 U Symbol table output: 3 00:00:00.01 00:00:00.12 UTotal run values: 216 00:00:00.18 00:00:01.93 YUsing a working set limited to 5648 pages and 528 pages of data storage (excluding image) 5Total number object records read (both passes): 386 Q of which 0 were in libraries and 0 were DEBUG data records containing 0 bytesO6Number of modules extracted explicitly = 01 with 0 extracted to resolve undefined symbols ?3 library searches were for symbols not in the library searched 4A total of 4 global symbol table records was writtenLINK/NOTRACE/SHARE=[.ALPHA]ACC_CKPT.EXE/MAP=[.ALPHA]/FULL [.ALPHA]ACC_CKPT.OBJ,[.SRC]ACC_CKPT_ALPHA.OPT/OPTION,[.SRC]ACC_CKPT.OPT/OP KERNEL_ROOT:[ACC_CKPT.ALPHA]ACC_CKPT.EXE;2 15-DEC-1995 16:15 Linker A11-36 Page 8 TION/SYSEXE 9! this link options file works only for a shareable image ! without fixup sections! ! E! to avoid consuming one extra page, since $LINKAGE must be writeable D! because it is updated by the loader, we put all the code writeable%! together with the $LINKAGE section.>! since the loader uses exe to see what's readonly, remove exe4! from the $CODE psect (and y ACC_CKPT010.BCK2 2E [ACC_CKPT.ALPHA]ACC_CKPT.MAP;2 don't set it in $LINKAGE! "psect_attr=$LINKAGE,PIC,wrt ! ,exepsect_attr=$CODE,wrt,noexeCOLLECT=PERMANENT_PSECTS,-A $CODE,$LINKAGE ! a mon avis, ca serait 1 mauvaise idee de mettreO: ! le linkage avec INIT, sinon les procedure descriptors- ! seraitent perdus apres l'init de l'image >COLLECT=INITIALIZATION_PSECTS/ATTRIBUTES=INITIALIZATION_CODE,- $INIT,$INIT_CODE identification="V1.0-2" XSYS$K_VERSION_04 00000040-X *[ACC_CKPT.ALPHA]ACC_CKPT.OBJ;1+,@. / 4\ -E 0123KPWO 56AU݌7;0⌮8;䥮 ʙ9GHJBBACC_CKPTV115-DEC-1995 15:45AMAC V2.2-16 H$LINKAGE@ $INIT_CODEK$INIT$CODE $ABS$ . BLANK . . ABS .EXE$NAM_TO_PCB SCH$GL_SWPPIDEXE$ALONONPAGEDSCH$QAST SMP$GL_FLAGS SMP$RELEASE CTL$GL_PCBCTL$GL_FINALSTS EXE$PRCPURMSG CTL$GL_PHDzthx-UO1j0>W yf>c|t S!6WiZ*`7Jy3,>gloNX!*1<83Ez+G\v5&3O''@!/C4CGoo3<,!z^JI\EeM&-ts2OMB HBI~Wb)h`^Fcx^:s]R3"hvzh]$(|{y@8]J,~N7=(*"qlM\l( n6{bchG ^0E[ehD!%Ige@c|$# H8HcJ#=, pNT1YAO>Yl:qd;0k'n$.g-knz|tT*=;[?(,65Nn!}zVXk|]2 osV .UjY`[*KYAFS` g 6E;=V4gkwtp_^JE'#LVgC:}-w 2"W^qW XE=FX8[r6MlX? `3I>$ :"%<]S`8K:)u\41C zl5?6uo  4D[mE%>'JA;?BjUR5@T{u{G~FUM=["PNov4rog|ny- hm7ZT#4ThO4Lw5n+~+ ki8>i(;#[qkddOI K9e!}~noBnBSfmxU.0G'h ecwoVc8jze;L0YD9,8Q1 zuraz7!fbq9zfoA2h\gK8jze0Y3+~#[weUB,NK\8Y +?>2^0\u|ETSLSZ>Ϡ&?Q5k%ğo;M>bX>#*ZU=gutu|#p$#YAc=`h wf*&4%5rg{*aKOQM8ni#GVU9- QG9Sv7'9#TA=J2yzB( 6:r#FB@7jrmktaR aSyR%z#,(+>)7H._tf \l(f&/{)!$0~ur omWyKW t $b=mo!4Fmf~I~gHbq=LcUz|3Ixnfmp7R602*]^[8--);T/alC7 I^= ed1&[A3a S-*'!G2}G1t 1'vLVx +5@P  )ka`>tuCWYGw1+Da~\KFTq yi5{M#D~=MVh{"$ Ezk 5aA"yGH{y'_EZZ FBEU5QYJEJV]S7&5-{)eyKTe|w"u\MNm='z~1K ('Y^(V] 5UbmB A#s$hUYmX =O\kgwe{My9JCX>I+I u#+&A NAND-XACC_CKPT010.BCK@E [ACC_CKPT.ALPHA]ACC_CKPT.OBJ;1\ uCTL$GL_VOLUMES CTL$GQ_LOGIN SYS$GETTIM SYS$GETSYISYS$ENQWINI$BRK0JACC_CKPT(JINIT =0(;=P$ 7 SMP$GL_FLAGS7 SCH$GL_SWPPID EXE$NAM_TO_PCB  SMP$RELEASE SCH$QAST;p EXE$ALONONPAGED=0 ;=@0 =7CTL$GL_FINALSTS EXE$PRCPURMSG7 CTL$GL_PCB7 CTL$GL_PHD SYS$GETTIM"7 CTL$GQ_LOGIN7CTL$GL_VOLUMES=0 ;=@ ="; SYS$ENQW"""   SYS$GETSYI""";4 4=H@>C~^ ^( G08(GO/4AA"/yKZ[KX KYG K4AG"?O?|uJ ϦAyIGVtJGF ϶/O/G2/GGZ[KX KYG IG2?G/O?>C@MHmGG>CG ޢGtAGG޶G@Zk(C0@@M2H/A@:/:K1$CV 1@AP 8CAvuKWtJzHF8?o/AB//GG[|KY C0M8m >C,ޢ0޶4ޢ8޶<ޢ ޶@Zk0@@C{ACC_CKPT010.BCK@E [ACC_CKPT.ALPHA]ACC_CKPT.OBJ;1\ (m0@@0tfCrH/"BHTGCDGCGGGG ^(08Ck(ϦG0MGGrJVrJC{sJtAF(϶>C8mtA tG>CG,ޢ0޶4ޢ8޶<ޢ ޶@ZkC0@@(m0@@0tfCrH4G SYS$GETSYI4m# SYS$GETSYI4@ SYS$GETSYI4 G$SYS$ENQW4m#SYS$ENQW4  @$SYS$ENQW4 GSYS$ENQW4m#SYS$ENQW4 @SYS$ENQWx x= ACC_CKPT_=g'= \ \=>C?G~(^0^8@ GHG==G0UC80M8m@Zk&(- H/KT 0XC:FK8K4GXCFG) m[@>C@MٔHHmG>G>CBTG޶@Zk^C\HCHGGGGGGG(0^8@HCk pM>Cxm >G@ZkTGCv HyS`KCXmWJFB`ZR@KYGBCPM G@Zk.W JGG>C~^ (08 GG(M '@GG0M8m@Zk 'Hhͦ(mPMdh೐$ೀ;` 8G;Xm4G@ZkG Ծl ACC_CKPT010.BCK@E [ACC_CKPT.ALPHA]ACC_CKPT.OBJ;1\ il(08Ck4HGTEXE$NAM_TO_PCB4Lm#EXE$NAM_TO_PCB4P@TEXE$NAM_TO_PCB4G SMP$RELEASE4m# SMP$RELEASE4@ SMP$RELEASE40GHEXE$ALONONPAGED48m#EXE$ALONONPAGED4D@HEXE$ALONONPAGED4l m#SCH$QAST4GSCH$QAST4@SCH$QAST4 G$ EXE$PRCPURMSG4 m# EXE$PRCPURMSG4  @$ EXE$PRCPURMSG4 <Gt SYS$GETTIM4 hm# SYS$GETTIM4 p@t SYS$GETTIM *[ACC_CKPT]DESCRIP.MMS;50+,J ./ 4Q-0123KPWO56Ȍ7-Ȍ8ݢ ʙ9GHJ=ACC_CKPT010.BCKJ [ACC_CKPT]DESCRIP.MMS;50Q~ default :! __arch__= f$getsyi ("Arch_name")8 if f$getsyi ("Arch_name").eqs."Alpha" then __alpha__ =1L if f$search ("$(__ARCH__).DIR;1").eqs."" then create/dir/log [.$(__ARCH__)]$ $(MMS) $(MMS$QUALIFIERS) arch_build#ARCH_DIR= [.$(__ARCH__)]SRC_DIR= [.SRC].ifdef __ALPHA__ SUFF= _ALPHASYSEXE=/SYSEXE acc_ckpt$unl=.suffixes : .mar .obj .mar.obj :4 macro sys$share:arch_defs+'f$search("$?") $(MFLAGS).else SUFF=_VAXSYSEXE=,sys$system:sys.stb/sel(acc_ckpt$unl=$(ARCH_DIR)acc_ckpt$unl.exe.endifQarch_build : $(ARCH_DIR)acc_ckpt.exe $(ARCH_DIR)acc_ckpt$main.exe $(acc_ckpt$unl)# @ write sys$output "Build done..."A$(ARCH_DIR)acc_ckpt.exe : $(ARCH_DIR)acc_ckpt.obj, descrip.mms, \7 $(SRC_DIR)acc_ckpt$(SUFF).opt, $(SRC_DIR)acc_ckpt.opt. link /notrace/share=$@/map=$(ARCH_DIR)/full \ $(ARCH_DIR)acc_ckpt.obj,\* $(SRC_DIR)acc_ckpt$(SUFF).opt/option, \* $(SRC_DIR)acc_ckpt.opt/option $(SYSEXE)K$(ARCH_DIR)acc_ckpt$main.exe : $(ARCH_DIR)acc_ckpt$main.obj, descrip.mms, \ $(SRC_DIR)acc_ckpt.opt6 link /exe=$@ $(LFLAGS) $(ARCH_DIR)acc_ckpt$main.obj,\+ $(SRC_DIR)acc_ckpt.opt/option $(SYSEXE)I$(ARCH_DIR)acc_ckpt$unl.exe : $(ARCH_DIR)acc_ckpt$unl.obj, descrip.mms, \ $(SRC_DIR)acc_ckpt.opt5 link /exe=$@ $(LFLAGS) $(ARCH_DIR)acc_ckpt$unl.obj,\, $(SRC_DIR)acc_ckpt.opt/option $(SYSEXE) 0$(ARCH_DIR)acc_ckpt.obj : $(SRC_DIR)acc_ckpt.mar:$(ARCH_DIR)acc_ckpt$main.obj : $(SRC_DIR)acc_ckpt$main.mar8$(ARCH_DIR)acc_ckpt$unl.obj : $(SRC_DIR)acc_ckpt$unl/ ACC_CKPT010.BCKJ [ACC_CKPT]DESCRIP.MMS;50Q>.mar*[ACC_CKPT]FREEWARE_DEMO.TXT;3+, ./ 4<d-0123KPWO566Vx7Jvjx8JDʙ9GHJ1 install loadable image @install<2 use the test_acc program to see an use of the loaded image *[ACC_CKPT]FREEWARE_README.TXT;11+, ./ 4D-0123KPWO56B7'kC8'ʙ9GHJ{H$ACC_CKPT010.BCK  [ACC_CKPT]FREEWARE_README.TXT;11D6ACC_CKPT V1.0-3 , TOOLS, Accounting checkpoint utilityD This tool forces a process to write an accounting record, resetting all accounting counters.>files: acc_ckpt.exe,.mar,.obj,.map loadable_image for acc_ckpt+ acc_ckpt$main.exe,.mar,.obj main procedure# install as a foreign command, and $ acc_ckpt$main : will checkpoint the specified process and load the image if necessary' acc_chkpt$unl.exe,.mar,.obj (VAX only) unloads the loadable image< install.com [ADD/REMOVE] adds or removes the loadable image test.com tests the software3 Ecole Nationale suprieure des Tlcommunications Guillaume Grard gege@cal.enst.fr# CO:FR; AD:ATLAS; PD:TELECPARIS 0208075041285021::gege*[ACC_CKPT]HISTO.TXT;3+,0 ./ 4@-0123KPWO56?X7(8hʙ9GHJ`tACC_CKPT010.BCK0 [ACC_CKPT]HISTO.TXT;3@)t"v1.0 15-dec-95 gg: initial release tested on vax/alpha v6.2, s7.0.v1.0-1 changed names, reorganized option files@v1.0-2 changed localization of loadable image to work with vaxen*[ACC_CKPT]INSTALL.COM;12+,5 ./ 4;N-0123KPWO56ɔ7#8c<ʙ9GHJ$ arch= f$getsyi ("arch_name")$ cmd=p1$ if cmd.eqs."" then cmd:= add$ if cmd.eqs."ADD";$ then copy [.'arch']acc_ckpt.exe sys$common:[sys$ldr];/log$ else if p1.nes."REMOVE"7$ then write sys$output "Syntaxe: @install [ADD/REMOVE]$ exit$ endif $ set noon/$ delete sys$loadable_images:acc_ckpt.exe;*/log$ endif*[ACC_CKPT]MKFREEWARE.COM;10+, ./ 4V-0123KPWO56v&7X"'8 ʙ9GHJ9ACC_CKPT010.BCK CC_CKPT]MKFREEWARE.COM;10V$!$ open/read v version.dat$ read v version $ close v$!>$ if f$search ("[-]DIRSTARTUP.COM").nes."" then @[-]dirstartup$!V$ backup [...] $1$dua7:[anonymous.pub.freeware_cd]acc_ckpt'version'.bck/save/prot=w:r- /block=2048/log*[ACC_CKPT]RELFORM.TXT;2+, ./ 4D-0123KPWO56*Ř7}8mʙ9GHJ RELEASE FORM ------------OpenVMS Freeware CD--------------------DEVELOPER RELEASE FORM:= As the owner/developer of this software, I release it to be D included on the OpenVMS Freeware CD-ROM. I expect no renumerances D or payments for the use of this software from Digital or Digital's customers. gerard@cal.enst.fr Developer/Owner Namep*[ACC_CKPT]SRC.DIR;1+,../ 4-0123 KPWO56'%>fl7'%>fl8'e2ə9GHJI|Nl 0B 0d ]0]0P$>\ACC_CKPT010.BCK.[ACC_CKPT]SRC.DIR;1 uACC_CKPT$MAIN.MAR; ACC_CKPT$UNL.MAR>  ACC_CKPT.MAR/  ACC_CKPT.OPT. ACC_CKPT_ALPHA.OPT-ACC_CKPT_VAX.OPTI!!*[ACC_CKPT.SRC]ACC_CKPT$MAIN.MAR;2+,; ./ 4@6-.0123KPWO56ߑ[7_\8_(ʙ9GHJ .if NDF,EVAXEVAX=0 .endc .library "sys$share:lib.mlb" .link "sys$system:sys.stb"/se .disable global6 .external LDR$LOAD_IMAGE,LIB$GET_FOREIGN,OTS$CVT_TZ_L $LCKDEF $LDRIMGDEF $SBDEF $SSDEF $SYIDEF; .psect $DATA,RD,WRT,NOSHR,NOEXEldr_handle_null:.long 0 .long 0 .long 09ldr_image_name: .ascid /SYS$LOADABLE_IMAGES:ACC_CKPT.EXE/ ldr_flags: .if NE,EVAX .long 0 .iff .long LDR_DYN$M_UNL .endc;lockname: .ascii /ACC_CKPT_/nodename: .b ACC_CKPT010.BCK; .![ACC_CKPT.SRC]ACC_CKPT$MAIN.MAR;2@0lkb SB$S_NODENAMEnodename_s= .-nodenamenodename_l: .blkw 1'syilist: .word nodename_s, SYI$_SCSNODE .address nodename .address nodename_l .long 0lock_d: .long nodename-lockname .address lockname lksb: .blkl 1 lkid: .blkl 1valblk: .blkq 2 ; 16 bytesreptxt: .blkb 8repbuf: .long .-reptxt .address reptxtprompt: .ascid /Pid: / pid: .blkl 1;-; called at IPL 2, cannot use system services8; since some of them change IPL to 0, and REI crashes; .psect $CODE,RD,NOWRT,SHR,EXE .entry main,^M<> $GETSYI_S itmlst=syilist blbc r0,33$ movzwl nodename_l,r091$: cmpb [r0],#^A' ' ; remove trailing spaces bneq 10$ decl r0 brb 1$@10$: addw r0,lock_d ; removes the trailing '_' if not in cluster; clrl -(SP) moval repbuf,-(SP) moval prompt,-(SP) moval repbuf,-(SP) calls #4,G^LIB$GET_FOREIGN blbc r0,33$ pushal pid pushal repbuf calls #2,G^OTS$CVT_TZ_L blbc r0,33$; $CMKRNL_S routin=do_the_work blbc r0,33$ ;;;33$: ret; .entry do_the_work,^M<> bsbb get_lock& blbc r0,331$ ; ret without unlocking tstl valblk blss 100$ bsbb free_lock pushal ldr_handle_null pushal ldr_flags pushal ldr_image_name calls #3,G^LDR$LOAD_IMAGE blbc r0,33$ bsbb get_lock blbc r0,33$ tstl valblk bgeq bug;;; lock granted; value block contains system routine address;"100$: clrl -(SP) ; pushal prcnam_d pushal pid calls #2,@valblk33$: movl r0,-(SP) bsbb free_lock movl (SP)+,r0 331$: re!K v,x}{h8Kh<"Kc 2NBq9AxЂI=HOׅrX sSH 6SvE3"C 5LAFt'4F< k&V"HzzEr' =?NXS7[p4T#07UH'5{y$G"|Bnc{ f;}[ > k. QXFE->Z[ޔ4Z}.lkI@U\j Ƕ'?E~DBm}1J5[?lv Jb/޼Jq,t|ON7K?O3/6 P*khI9_-5o;y$T:0HhL6f[ IDVK#B+A(44+BkgC'w1Io{ep_Xy 4M,J?O iEm:$RMM*X჌E=2#)%8|s{i B%NuZ kѓ[ NLJ<3 V7lL<\~YPpXIv9^sW>cg uHa %*]ZB"l =@xsVt"+( $by`najLkEMg:3?|QI3F+5_T`J'i4L]F+e8kSq &2|3FO_PKZ%xr9},^C;7kp\%SU6G-51{,A3ZYI  Cƹ=Nw+YF i3Nו?&dꢚfp)b楿 #G0!cxE>}W=j}wnv8/..shF.AbA17+סc'/:=—EUT8U2S)jC`N4cCC"h$>m~;?cki e5P.cRdd5vFOIjB}"2Q 8PWDt|;p 0S`w~'7 X?3,wl0/uq RxίQt& LXuͤ(JV0mxSpk_ZroKHE3&{ 0B 0d ]0]0P"73ACC_CKPT010.BCK; .![ACC_CKPT.SRC]ACC_CKPT$MAIN.MAR;2@ htbug: movl #SS$_BUGCHECK,r0 ret; get_lock: .if NE,EVAX .jsb_entry .endc $ENQW_S resnam=lock_d,- lkmode=#LCK$K_NLMODE,- lksb=lksb,-2 flags=#33$: rsb; free_lock: .if NE,EVAX .jsb_entry .endc $DEQ_S lkid=lkid rsb .end main *[ACC_CKPT.SRC]ACC_CKPT$UNL.MAR;2+,> ./ 4@-.0123KPWO56߃7߷%8Pʙ9GHJ .library "sys$share:lib.mlb" .link "sys$system:sys.stb"/se .disable global .external LDR$UNLOAD_IMAGE $LCKDEF $LDRIMGDEF $SBDEF $SSDEF $SYIDEF; .psect $DATA,RD,WRT,NOSHR,NOEXEhandle_null: .long 0 .long 0 .long 05image_name: .ascid /SYS$LOADABLE_IMAGES:ACC_CKPT.EXE/lockname: .ascii /ACC_CKPT_/nodename: .blkb SB$S_NODENAMEnodename_s= .-nodenamenodename_l: .blkw 1'syilist: .word nodename_s, SYI$_SCSNODE .address nodename .address nodename_l .long 0#dACC_CKPT010.BCK> . [ACC_CKPT.SRC]ACC_CKPT$UNL.MAR;2@elock_d: .long nodename-lockname .address lockname lksb: .blkl 1 lkid: .blkl 1valblk: .blkq 2 ; 16 bytes;-; called at IPL 2, cannot use system services8; since some of them change IPL to 0, and REI crashes; .psect $CODE,RD,NOWRT,SHR,EXE .entry main,^M<> $GETSYI_S itmlst=syilist blbc r0,33$ movzwl nodename_l,r091$: cmpb [r0],#^A' ' ; remove trailing spaces bneq 10$ decl r0 brb 1$@10$: addw r0,lock_d ; removes the trailing '_' if not in cluster;; $CMKRNL_S routin=unload;33$: retbugcheck:movl #SS$_BUGCHECK,R0 ret .entry unload,^M clrl r3 $ENQW_S resnam=lock_d,- lkmode=#LCK$K_PRMODE,- lksb=lksb,-2 flags=# blbc R0,330$ incl r3 $DEQ_S lkid=lkid blbc r0,330$ incl r3 tstl valblk bgeq bugcheck movl valblk+8,lkid movl valblk+4,r2 $ENQW_S lkmode=#LCK$K_EXMODE,-7 lksb=lksb,- ; note: lock is converted to process mode? flags=# ; since lkmode increases330$: blbc r0,33$; incl r3 movl LDRIMG$L_BASE(r2),valblk+4 movl r2,valblk+8 movl LDRIMG$L_SEQ(r2),valblk+12; moval ,-(SP) moval image_name,-(SP) calls #2,G^LDR$UNLOAD_IMAGE blbc r0,3333$ incl r3 $DEQ_S lkid=lkid33$: ashl #16,r3,r3 bisl r3,r0 ret;3333$: ; cannot unload image; revert lock to normal PR mode movl #100,r3 $ENQW_S lkmode=#LCK$K_PRMODE,- lksb=lksb,-% flags=# brb 33$; .en$|LACC_CKPT010.BCK> . [ACC_CKPT.SRC]ACC_CKPT$UNL.MAR;2@.id main*[ACC_CKPT.SRC]ACC_CKPT.MAR;3+,/ . / 4A <-.0123KPWO 56Ħ78 s ʙ9GHJ) .title ACC_CKPT -- accounting checkpoint .disable global .if NDF,EVAXEVAX=0 .endc .if NE,EVAX .disable FLAGGING .endcA .external CTL$GL_VOLUMES,CTL$GL_FINALSTS,CTL$GL_PHD,CTL$GL_PCB,- CTL$GQ_LOGIN .if NE,EVAX .external EXE$NAM_To_PCB .iff .external EXE$NAMPID .endc( .external EXE$PRCPURMSG,EXE$ALONONPAGED! .external SCH$GL_SWPPID,SCH$QAST* .external SMP$GL_FLAGS ; for UNLOCK macro .external INI$BRK .library "sys$share:lib.mlb" .link "sys$system:sys.stb"/s%#sACC_CKPT010.BCK/ .[ACC_CKPT.SRC]ACC_CKPT.MAR;3A e $ACBDEF $DYNDEF $IPLDEF $LCKDEF $LDRIMGDEF .if NE,EVAX $NSADEF .endc $PCBDEF $PHDDEF0 $PRDEF ; define processor registers for SETIPL $PRIDEF# $SBDEF ; define maximum node size $SPLCODDEF $SSDEF $SYIDEF .page  .psect $CODE,RD,NOWRT,EXE,PIC;; context: kernel mode, IPL 0+; 4(AP) target process external PID address; 8(AP) target process name; .if DF,EVAX/CKPT_PROC:.call_entry max_args=2,home_args=TRUE .iff .entry CKPT_PROC,^M .endc cmpl #2,(AP) bneq badarg .if NE,EVAX movl #NSA$C_MSG_CUSTOMER,r0 jsb G^EXE$NAM_TO_PCB .iff jsb G^EXE$NAMPID .endc; ; r0= status ; r1= IPID; r2-r3: scratch; r4: pcb target process!; Spinlock SCHED held if no error; blbc r0,ret01 cmpw r1,G^SCH$GL_SWPPID ; avoid SWAPPER and NULL bgtru pid_ok ; br if ok+ movl #SS$_NONEXPR,r0 ; pas de a lisette. brb retunlbadarg: movl #SS$_INVARG,R0 retpid_ok: movl r1,-(SP) movzbl #ACB$C_LENGTH,r1 jsb G^EXE$ALONONPAGED blbc r0,retunl clrq (r2) movw r1,ACB$W_SIZE(r2)+ movw #DYN$C_ACB,ACB$B_TYPE(R2) ; type/rmod movl (SP)+,ACB$L_PID(R2) moval acc_ckpt,ACB$L_AST(R2) clrq ACB$L_ASTPRM(R2); movl r2,r5 movl #PRI$_TICOM,R26 jsb G^SCH$QAST ; pour le meilleur ou pour le pire...;; R4= target process PCB addr;retunl: UNLOCK SCHEDret0: setipl #0 ret ;; special kernel ast; IPL: 2; context: target process ; R0: scratch; .entry acc_ckpt,^M;$ movl G^CTL$GL_PCB,r&T ACC_CKPT010.BCK/ .[ACC_CKPT.SRC]ACC_CKPT.MAR;3A J4 ; current PCB% clrl R5 ; not a special kernel ast# bisl #^X20000000,G^CTL$GL_FINALSTS jsb G^EXE$PRCPURMSG ;; RESOURCE DATA;$ MOVL G^CTL$GL_PHD,R0 ; PHD ADDRESS .IF EQ,EVAX+ CLRL PHD$L_VP_CPUTIM(R0) ; VECTOR CPU TIME.ENDC( CLRL G^CTL$GL_VOLUMES ; VOLUMES MOUNTED6 CLRQ PHD$L_DIOCNT(R0) ; DIRECT AND BUFFERED IO COUNTS:;;; CLRQ G^CTL$GL_WSPEAK ; WORKING SET AND PAGE FILE PEAK. CLRL PHD$L_PGFLTIO(R0) ; PAGE FAULT I/O COUNT+ CLRL PHD$L_PAGEFLTS(R0) ; PAGE FAULT COUNT! CLRL PHD$L_CPUTIM(R0) ; CPU TIME. CLRL PHD$L_IMGCNT(R0) ; IMAGE EXECUTION COUNT2 bicl #^X20000000,G^CTL$GL_FINALSTS ; FINAL STATUS& $GETTIM_S G^CTL$GQ_LOGIN ; LOGIN TIME; ret;" .psect $INIT,RD,WRT,NOSHR,EXE,PIClockname: .ascii /ACC_CKPT_/nodename: .blkb SB$S_NODENAMEnodename_s= .-nodenamenodename_l: .blkw 1'syilist: .word nodename_s, SYI$_SCSNODE .blkl 1 .blkl 1 .long 0lock_d: .long nodename-lockname .blkl 1 lksb: .blkl 1 lkid: .blkl 1valblk: .blkq 2 ; 16 bytes! .psect $INIT_CODE,RD,WRT,EXE,PIC;-; called at IPL 2, cannot use system services8; since some of them change IPL to 0, and REI crashes; .entry init,^M clrl r21 moval nodename,syilist+4 ; avoid .address fixups moval nodename_l,syilist+8 moval lockname,lock_d+45 setipl #0 ; temp X fingers, do not delete process! $GETSYI_S itmlst=syilist incl r2 blbc r0,330$; jsb G^INI$BRK movzwl nodename_l,r091$: cmpb [r0],#^A' ' ; remove trailing spaces bneq 10$ decl '?~FACC_CKPT010.BCK/ .[ACC_CKPT.SRC]ACC_CKPT.MAR;3A dr0 brb 1$@10$: addw r0,lock_d ; removes the trailing '_' if not in cluster $ENQW_S resnam=lock_d,- lkmode=#LCK$K_EXMODE,- lksb=lksb,-% flags=# incl r2 blbc r0,330$ incl r2 movzwl lksb,r0330$: blbc r0,33$ moval ckpt_proc,valblk movl 4(AP),r0 movl r0,valblk+4 movl lkid,valblk+8 $ENQW_S lksb=lksb,- lkmode=#LCK$K_PRMODE,-2 flags=# incl r2 blbc r0,33$ incl r2 movzwl lksb,r033$: ashl #16,r2,r2 bisl r2,r0 setipl #IPL$_ASTDEL ret .end init*[ACC_CKPT.SRC]ACC_CKPT.OPT;2+,. ./ 4-.0123KPWO56?H7nz8߮qʙ9GHJ(g7sACC_CKPT010.BCK. .[ACC_CKPT.SRC]ACC_CKPT.OPT;2identification="V1.0-2""*[ACC_CKPT.SRC]ACC_CKPT_ALPHA.OPT;1+,-./ 4E-.0123KPWO56!=@}D7X񉮙8XR} ʙ9GHJ9! this link options file works only for a shareable image! without fixup sections!!E! to avoid consuming one extra page, since $LINKAGE must be writeableD! because it is updated by the loader, we put all the code writeable%! together with the $LINKAGE section.>! since the loader uses exe to see what's readonly, remove exe4! from the $CODE psect (and don't set it in $LINKAGE!"psect_attr=$LINKAGE,PIC,wrt ! ,exepsect_attr=$CODE,wrt,noexeCOLLECT=PERMANENT_PSECTS,-A $CODE,$LINKAGE ! a )ACC_CKPT010.BCK-."[ACC_CKPT.SRC]ACC_CKPT_ALPHA.OPT;1Emon avis, ca serait 1 mauvaise idee de mettre: ! le linkage avec INIT, sinon les procedure descriptors- ! seraitent perdus apres l'init de l'image>COLLECT=INITIALIZATION_PSECTS/ATTRIBUTES=INITIALIZATION_CODE,- $INIT,$INIT_CODE *[ACC_CKPT.SRC]ACC_CKPT_VAX.OPT;1+,I!./ 4>-.0123KPWO562%78Z ʙ9GHJ9! this link options file works only for a shareable image! without fixup sections!COLLECT=PERMANENT_PSECTS,- $CODE>COLLECT=INITIALIZATION_PSECTS/ATTRIBUTES=INITIALIZATION_CODE,- $INIT*[ACC_CKPT]TEST.COM;17+, ./ 4F-0123KPWO56NP@7\mb@8\ ʙ9GHJ*٩ACC_CKPT010.BCK [ACC_CKPT]TEST.COM;17F֯$!-$ dt:= 1:: ! 1 login hour => accounting reset$!#$ savdef= f$environment ("default")$ on warning then goto fini$ on control_y then goto fini#$ proc= f$environment ("procedure")F$ set default 'f$parse (proc,,,"device")''f$parse(proc,,,"directory")'$!>$ resetacc:= $SYS$DISK:[.'f$getsyi("arch_name")']acc_ckpt$main $next_pass:$ctx=""$npid:$pid= f$pid(ctx)$ if pid.eqs."" then goto wait $ lt= f$getjpi (pid, "logintim")-$ if f$cvtime ("''lt'+''dt'").les.f$cvtime() $ then show sym pid=$ if f$cvtime(lt).ges.f$cvtime(f$getsyi ("boottime")) then -! resetacc 'pid' ! avoid SWAPPER$ endif $ goto npid$wait: $ wait 'dt'$ goto next_pass$fini: set noon$ set default 'savdef'p*[ACC_CKPT]VAX.DIR;1+,6*./ 4-0123 KPWO5R6 %7~U8X|ə9-RGGHJI|Nl 0B 0d ]0]0`+;'8ACC_CKPT010.BCK6*[ACC_CKPT]VAX.DIR;1kACC_CKPT$MAIN.EXE- ACC_CKPT$MAIN.OBJ3 ACC_CKPT$UNL.EXE1 ACC_CKPT$UNL.OBJ<  ACC_CKPT.EXE,  ACC_CKPT.MAP  ACC_CKPT.OBJ !*[ACC_CKPT.VAX]ACC_CKPT$MAIN.EXE;3+,- ./ 4-6*0123 KPWO 56߲ҏ7Zӏ8ߚʙ9GHJ0D`0205Bҏ.h ACC_CKPT$MAINV1.0-2\BҏV11-36  ?! LIBRTL_001,N zj v 17{nco 1 Jv/a\g7^OH+gl 9o RW|ۉ'R9S(T/lqugE , >s{'`ESHGC\B_R=>qfUD:OVzDg%3k #A [NbwC^qC9( M&u@ =O8sv.Ebz8GUJHy``7pA01=?L4xy#ebK[O/c3+UGO\!Ts[(_;.7~hV[(thi% "$w/j!Yn8Qk>aqDpbv:< $Jq=Npu~- r(v/MA 7jCLDX6-v 3mS5.Wgv&_P<?p2 0j0O[214o7<=7&c+B:VC$F^W c993Ɂ aN N12e5K<\1j+DE^^1=+^(+.JoqF9}^4K_\^:Z"wT/3j7| :LHvU(nbc35g%*7]g](gWfAB,LN[I>}JSLV4$g F{/4uR]_{=pwoV@,DSdh$v"ag-o@5 *b)/r/tddITY,WeN="Xv R:ewnpeR0~K2Esx'31b(Sg&et D.$,@ _e[#*v[6*_gHQ9pE& \S{m ? @2AX>s9K.~KL'W6ONg4#=xh! 'z2A/{if9eSC=:i?R O^4@A`̳0ql33veC/Հ}ʴ&a7{([ J)%nt9M]~?fMin:yl}7t]u:rS8TFY͚T+d?C{ @)#rRr[-~~Yݖj9Q%3d \iV6N7U/f~ЪFYt֍7.vos ]A/hH٫~Q-߸ _X0sssp$D s\^\^ \^ b ݯda-̵~ Synopsis !H +--------------------------+kPsect Name Module Name Base End Length Align Attributesk--8ACC_CKPT010.BCK 6*[ACC_CKPT.VAX]ACC_CKPT.MAP;2)-------- ----------- ---- --- ------ ----- ----------$CODE 00000000 000000D0 000000D1 ( 209.) BYTE 0 PIC,USR,CON,REL,GBL,NOSHR, EXE, RD,NOWRT,NOVECQ ACC_CKPT 00000000 000000D0 000000D1 ( 209.) BYTE 0$INIT 00000200 0000024A 0000004B ( 75.) BYTE 0 PIC,USR,CON,REL,GBL,NOSHR, EXE, RD, WRT,NOVECQ ACC_CKPT 00000200 0000024A 0000004B ( 75.) BYTE 0$INIT_CODE 00000400 000004F0 000000F1 ( 241.) BYTE 0 PIC,USR,CON,REL,LCL,NOSHR, EXE, RD, WRT,NOVECQ ACC_CKPT 00000400 000004F0 000000F1 ( 241.) BYTE 0 UT_ROOT:[ACC_CKPT.VAX]ACC_CKPT.EXE;2 15-DEC-1995 16:06 Linker V11-36 Page 4C +-----------------+C ! Symbols By Name !C +-----------------+Symbol Value Symbol Value Symbol Value ------ ----- ------ ----- ------ ----- XACC_CKPT 00000077-R XCTL$GL_FINALSTS 7FFEFEB8 9MACC_CKPT010.BCK 6*[ACC_CKPT.VAX]ACC_CKPT.MAP;2[ XCTL$GL_PCB 7FFEFF58 XCTL$GL_PHD 7FFEFE88 XCTL$GL_VOLUMES 7FFEFEC4 XCTL$GQ_LOGIN 7FFEFEB0 XEXE$ALONONPAGED 80002180 XEXE$NAMPID 800024F8 XEXE$PRCPURMSG 80002598 XINI$BRK 800027A8 XINIT 00000400-R XSCH$GL_SWPPID 80004DCC XSCH$QAST 800030B8 XSMP$GL_FLAGS 800045CC XSMP$RELEASE 800031F8 XSYS$ENQW 7FFEE3D0 XSYS$GETSYI 7FFEE3F8 XSYS$GETTIM 7FFEDF78 XSYS$K_VERSION 01000000 :-ACC_CKPT010.BCK 6*[ACC_CKPT.VAX]ACC_CKPT.MAP;2Z XSYS$K_VERSION_01 00020001 XSYS$K_VERSION_02 00010051 XSYS$K_VERSION_03 00020000 XSYS$K_VERSION_04 00010051 XSYS$K_VERSION_05 00010051 XSYS$K_VERSION_06 00010052 XSYS$K_VERSION_07 00010001 XSYS$K_VERSION_08 00020000 XSYS$K_VERSION_09 00010050 XSYS$K_VERSION_10 00010050 XSYS$K_VERSION_11 00010050 XSYS$K_VERSION_12 00010050 XSYS$K_VERSION_13 00010050 XSYS$K_VERSION_14 00010051 XSYS$K_VERSION_15 00010050 XSYS$K_VERSION_16 00010051 XSYS$K_VERSION_17 00010001 ;LACC_CKPT010.BCK 6*[ACC_CKPT.VAX]ACC_CKPT.MAP;2b XSYS$K_VERSION_18 00010001  UT_ROOT:[ACC_CKPT.VAX]ACC_CKPT.EXE;2 15-DEC-1995 16:06 Linker V11-36 Page 5D +------------------+D ! Symbols By Value !D +------------------+2Value Symbols...2----- ---------- 00000077 R-ACC_CKPT 00000400 R-INIT J00010001 SYS$K_VERSION_07 SYS$K_VERSION_17 SYS$K_VERSION_18t00010050 SYS$K_VERSION_09 SYS$K_VERSION_10 SYS$K_VERSION_11 SYS$K_VERSION_12 SYS$K_VERSION_13 SYS$K_VERSION_15t00010051 SYS$K_VERSION_02 SYS$K_VERSION_04 SYS$K_VERSION_05 SYS$K_VERSION_14 SYS$K_VERSION_16 00010052 SYS$K_VERSION_06500020000  SYS$K_VERSION_03 SYS$K_VERSION_08 00020001 SYS$K_VERSION_01 01000000 SYS$K_VERSION 7FFEDF78 SYS$GETTIM 7FFEE3D0 SYS$ENQW 7FFEE3F8 SYS$GETSYI 7FFEFE88 CTL$GL_PHD 7FFEFEB0 CTL$GQ_LOGIN 7FFEFEB8 CTL$GL_FINALSTS 7FFEFEC4 CTL$GL_VOLUMES 7FFEFF58 CTL$GL_PCB 80002180 EXE$ALONONPAGED 800024F8 EXE$NAMPID 80002598 EXE$PRCPURMSG 800027A8 INI$BRK <-ACC_CKPT010.BCK 6*[ACC_CKPT.VAX]ACC_CKPT.MAP;2 800030B8 SCH$QAST 800031F8 SMP$RELEASE 800045CC SMP$GL_FLAGS 80004DCC SCH$GL_SWPPID $ Key for special characters above: +--------------------+ ! * - Undefined ! ! A - Alias Name ! ! I - Internal Name ! ! U - Universal ! ! R - Relocatable ! ! X - External ! ! WK - Weak ! ! M - Mask value ! +--------------------+ UT_ROOT:[ACC_CKPT.VAX]ACC_CKPT.EXE;2 15-DEC-1995 16:06 Linker V11-36 Page 6 C +----------------+ C ! Image Synopsis !-C +----------------+adVirtual memory allocated: 00000000 000005FF 00000600 (1536. bytes, 3. pages)AStack size: 0. pagesiTImage header virtual block limits: 1. 1. ( 1. block)UImage binary virtual block limits: 2. 4. ( 3. blocks) AImage name and identification: ACC_CKPT V1.0-2E;System component mask: 0005B812 5 SYS$K_VERSION_MEMORY_MANAGEMENT 2,1C6 SYS$K_VERSION_PROCESS_SCHED 1,816 SYS$K_VERSION_COUNTERS 1,806 SYS$K_VERSION_STABLE 1,806 SYS$K_VERSION_MISC =P9Q_ACC_CKPT010.BCK 6*[ACC_CKPT.VAX]ACC_CKPT.MAP;2)V 1,806 SYS$K_VERSION_VOLATILE 1,806 SYS$K_VERSION_SHELL 1,815 SYS$K_VERSION_MULTI_PROCESSING 1,1 ;Number of files: 5.+;Number of modules: 4.o;Number of program sections: 6.-;Number of global symbols: 18. ;Number of image sections: 3. :User transfer address: 00000400~Image type: PIC, SHAREABLE. Global Section Match=EQUAL, Ident, Major=46, Minor=9424329cMap format: FULL in file UT_ROOT:[ACC_CKPT.VAX]ACC_CKPT.MAP;2 <Estimated map length: 22. blocksE +---------------------+EE ! Link Run Statistics ! E +---------------------+ISPerformance Indicators Page Faults CPU Time Elapsed TimeSS---------------------- ----------- -------- ------------0U Command processing: 278 00:00:00.51 00:00:07.04 U Pass 1: 129 00:00:00.94 00:00:02.20 U Allocation/Relocation: 36 00:00:00.10 00:00:00.57 U Pass 2: >XACC_CKPT010.BCK 6*[ACC_CKPT.VAX]ACC_CKPT.MAP;2 59 00:00:00.31 00:00:00.92 U Map data after object module synopsis: 20 00:00:00.07 00:00:00.19yU Symbol table output: 7 00:00:00.00 00:00:00.16UTotal run values: 529 00:00:01.93 00:00:11.08 YUsing a working set limited to 1358 pages and 392 pages of data storage (excluding image) 5Total number object records read (both passes): 516 T of which 24 were in libraries and 3 were DEBUG data records containing 140 bytes6Number of modules extracted explicitly = 01 with 1 extracted to resolve undefined symbols ?0 library searches were for symbols not in the library searchedL4A total of 4 global symbol table records was writtenLINK/NOTRACE/SHARE=[.VAX]ACC_CKPT.EXE/MAP=[.VAX]/FULL [.VAX]ACC_CKPT.OBJ,[.SRC]ACC_CKPT_VAX.OPT/OPTION,[.SRC]ACC_CKPT.OPT/OPTION,SYS$SYSTEM:SYS.STB/SEL  UT_ROOT:[ACC_CKPT.VAX]ACC_CKPT.EXE;2 15-DEC-1995 16:06 Linker V11-36 Page 7X9! this link options file works only for a shareable image ! without fixup sections!$COLLECT=PERMANENT_PSECTS,- $CODE>COLLECT=INITIALIZATION_PSECTS/ATTRIBUTES=INITIALIZATION_CODE,- $INITidentification="V1.0-2" XSCH$GL_SWPPID 80004DCC XSCH$QAST 800030B8 XSM?ACC_CKPT010.BCK 6*[ACC_CKPT.VAX]ACC_CKPT.OBJ;1=^*[ACC_CKPT.VAX]ACC_CKPT.OBJ;1+, ./ 4=H-6*0123KPWO56onM댮7O 􌮙8O% ʙ9GHJ2ACC_CKPT015-DEC-1995 15:46 VAX MACRO V5.4-3;MACRO/NOLIST/OBJECT=[.VAX]ACC_CKPT.OBJ [.SRC]ACC_CKPT.MAR-- accounting checkpointACC_CKPTCTL$GL_FINALSTS CTL$GL_PCB CTL$GL_PHDCTL$GL_VOLUMES CTL$GQ_LOGINEXE$ALONONPAGED EXE$NAMPID EXE$PRCPURMSGINI$BRK SCH$GL_SWPPIDSCH$QAST SMP$GL_FLAGS SMP$RELEASESYS$ENQW SYS$GETSYI SYS$GETTIMsys$system:sys.stb . ABS .P$ABS$5PPPPPPPPPPPPP$CODEPl EXE$NAMPIDPcQ SCH$GL_SWPPIDЏP<ЏPQ~QEXE$ALONONPAGEDP%|bQ Ў w|RURSCH$QAST^P SMP$GL_FLAGSP/P SMP$RELEASEЎP0 w0ACC_CKPT& CTL$GL_PCBTUȏ CTL$GL_FINALSTS EXE$PRCPURMSG CTL$GL_PHDPCTL$GL_VOLUMES|,ʏ CTL$GL_FINALSTS CTL$GQ_LOGIN SYS$GETTIMK$INITE@NACC_CKPT010.BCK 6*[ACC_CKPT.VAX]ACC_CKPT.OBJ;1=PACC_CKPT_QQgQQ QQQQ $INIT_CODEP INIT&=R 33+3|~ SYS$GETSYIRPM<P 4@ PP+|~|~|~+3 SYS$ENQWRP R<3PPR;ЬPP;37;3|~|~|~ݏC3 SYS$ENQWRP R<3PxRRRP;wACC_CKPT CKPT_PROC INIT?$CODE$INITK $INIT_CODE*[ACC_CKPT]VERSION.DAT;2+, ./ 4-0123KPWO56˔ T7T8T!ʙ9GHJAӺ-ACC_CKPT010.BCK [ACC_CKPT]VERSION.DAT;2x010B$"+ s  q oMAP;2XO-(g $8+4$Ndpgfdyih|W[FkxO~__Jt%(*"pH! 0==)}4Pc^at`An;CdQjE,-KSRBXna 3FVKVLfq6 $Ctlv,q8u\JNA]$ JMNݥ[X>B^) A5Yr2j)ލnbR(UdQwL4X>b0}hmG"@38o>*F-2:uZ bg tDLQ3v.Ci| |=k Uh76o:##ZwfFU>c)'Da-.u8ӢPNVtQ}9$N(kGa g~p-6d$aB1f7[8ǎHL?pFI&"AR _Jn0IPwuq'swk'W mvztG Ed@u>~[N2ultuzF*! 4 p j\NOAM7l5/ccK`[1f[W\fj+5`7E [gn3ihy:u~`?$uU0 B@GQsLm0qurhUY1DhJ,ooXPjc=@AXI'eݎz,foTW$;'N1 \dENe09c)UqryeeTCpm @ qRqv9 ew+4H+S hUs}u< VI]Ghty$NVO%U>"TCBR2*9`A!9Zmmxxt} $ =(V70,"E ? t$ZEV&&2@%/-;;!") ',SChR"FEFEC4 XSCH$QM#N8<`?\L+4KkRgJVY]3$HH[gWCEUJ*EG!'G\(%'DFFd|sQ{nr =C}|ocatxcv*SxlW8?K%08534,+N'S?2:X^uF5S$3%