shulman@topaz.RUTGERS.EDU (Jeff Shulman) (03/26/86)
[ From Delphi - Jeff ]
Name: DISKBENCH
Type: PROGRAM
Date: 21-MAR-1986 05:40 by BRECHER
[ Updated 25-MAR-1986 17:49 by BRECHER. This version fixes a bug in
the original that could have caused destruction of data. This version
is thought to be safe (non-destructive), but the safest course is to
back up first.
WARNING: The old version CAN trash the disk that DiskBench is testing --
depending on what happens to be in an uniniitialized memory location.]
DiskBench.Bin is an application performing simple hard disk performance
benchmarks. Direct driver I/O is used so there is no influence from the file
system (HFS/MDS), file structure, etc. Assembly source code is provided:
DiskBench.Asm, DiskBench.R (RMaker source), DiskBench.Link (MDS Link control
file). See Asm file for details. The test is non-destructive.
Notes: don't move the mouse during the test (mouse movements take CPU time).
HyperDrive: run the test in the Startup drawer; for access time test to be
valid, Startup must be more than 1MB in size and not fragmented.
[ PackIt II compressed ]
(This file must be converted with BinHex 4.0)
:"d4#,R"TG$)!8%P8)&"*9#!!N!3@5`#3",BT8%eK0!#afkjJT056l,(JL+,EN9L
HSIAceqGUUX(fKbpGiNmdF,d$mG"SDZA[C1,%`00(AlJk+hFP8C81LLPhC+EUC(&
ZeeJdNa4UR&iV,q9-I$0*YkL4c1U!me45(J&+RD44F3LUUK-L)6MPM"@T,BS8r8A
33%S+',AX')`!YY)31#&mS#i@J@'hrjrdZ*K4Q'`B$+FPdXiCMQ)PRKYYBM%*56f
L@@bc)&4#bd)TLG9l8JXRZ@H1'i`+9c`6q85qj*!!&TI3lQdEbMY2S)!Ldl`#5bU
J#!&mL4)K$,L9,4D@5d@#Z@L`9mY$ekrIKj6)T*`K"h,8KZ%'(@5#S9,2)rj@(BF
K!"q$i185L#8+3Hj(+eQ9,1Krrj!GrSVY13Am8Gfd-mKF1-K%mJZKZ@[a@8P"`E$
S#1QVSCG#U[P`H"U10$2*eAaFFeVPM-$Xe#041e%l86VLCGPA$ac2Nm(3Q5b$c-8
QS0`D&3CJj"`LlLq0L8[L3eN%TI+683U0'QL3!,l'P3cQQaL-'m-L86aBQLP(00*
%Feq*LJe"L)3h#)XbI4Ja,*&)9(CjqQ5k#E!%B@N$+Sl22dbA"X)8#Fp)"N)'8i`
c+QS*X!4KD3-UMXmr+NZ'!K3*cdJ'3JC6M$-UD&iN'M68S04%@DE4Q`D)`Y)'4%@
4Cccp-PakSl22dbA'4#J6K!J'3JC6M$-UD&cKSe"%L1D$0U+&@*GKF0'KH5)jSJD
LK9LAB5N'9J%JdDDP"LiD0#iN4c@%m6+X5l#UqA#eU0'S4FrKU10$2C9AaFFeVPJ
k+K51+[LNc+e`XAHL4(0"Je&"5)e@*GK9I+[PAbi@Y4Se#,RmG&3T('KRM#VjFr,
[5'D3!&jP*#XS8F2-QA!5J`NT)9H5TpRk#iJ+B`R6pC)qIDbYhj@Q(!SqLi6`kJY
*NJ*M!#!Q4lJ!b8&b5S28F`"@SiHCFSffCE%VP'fc,EJ!b`+,6PXqG%5[i5f1%N&
K-LNjJHBF2E-!)&+SfN1E8--!&DFYRcjk*l4%"-%UF`2-1(YQ!%#P8E5("'fm(U!
9Tbf'*liC`hJV)2%`+L3!!&!)&`pi8+,6PX9TrY`8cq3#JQ#3!$l`S8!Z-0U1H!,
Kl`!*B#jT![!d([&"jH"FC5Z-1!U!"N"B!Uq&NBJRK`9TK`+1I2i*S*E6")61$kJ
%Hji!Z,Qc,%fS"!L9aFNU'!+MJM-2"jimHi49NY)'b"()11rX[K&+CqJM)#Q3!((
IbINFV@C8Xk(d+k#,XG$bS*Ka1%mL*L4B#%2pD6JJ$kbQRe1X(([N4R11GmA$#3F
FME(LiMM"a`h)3Z,[G*cMKZQ%',XPP11'kC)aGlB`FF0b(XaFPj1FF0bS2FA3GP1
1'j8'@,SN0M"36@%d!Ya4CU+4-lM5BDZDah8&S8!PmUN90XbGV@+29UL[0A+R,V#
3!*N#bLcc'LQK9@RimRZmY#dL4e+i8%XNT5K9*N,D*dTC'TmR1b8qp808,XY
L!5`Z9d"6Pi%FN!#dF8)lkRlM&ITJ#"D"p,i3b$fSRZfDc0#)3'ETA0LM6LX6#hK
GJ)XmB!BJ01+LlT0h3XAS5iKGAS1iKG)Rh%,T%qkkiK!cd&GGGGGGd$%AG!F2fZZ
iHiGZ)9qAF1AG2GG1"1ZG'"i(5EVVVVZ'q'VVVVZMp'k,`cdISh43E`a5H8VX"&R
M!$%"XBU%5H#[b*mIpATd-eUf9jM$%$B%S*5Pbf#Ki#16Hd+`F"I!9dqRkQ(SC6k
[-DNAb&`Y$0X!(#cqhj%q2qVdi5P,PX&$`%FQZ8+*K`PG"jh+i`[(`CP"h9J!XI-
619b$2Dc0QILRXfE+%T%3U,Re`NCBQJjCX8Q&Q8AV6m!3pM`aE3!,0LJIUJ-dM5"
+8Z@`82!5HEfK6dG`T-1&5&8BJ1!iCH2!cl9Z,[Vai'I3B1"*CJP"+@F33%XA2FB
HKC2B5R@+f%rP"`"QA@&Uq!ZN$,ApKk'8R2S9p))$%#`eB#@aa`"L"T+3!"+4dqR
AF1!)PX889QNT!5N3'Cp*2&aMb#8R2S8@Rc9mPDrX23`5N3'Cp*2&IFKV#AI8@Rc
9mPDrX23`5N5B'Cp*2&J*4L$r%`#R%TeaMLm!lfaHIf2MKP&#PXZN"p@!P!r9Y!X
eLm%T%AI8E2%*6U-AV3!NE&Hq1")I#p+D%T)aKQ%*GK3e)#8L19"A-pqp,fXZ-H4
5FqKAY[',,fT2fYlkdL[5mVP39c2I[5pV,M(N#8LUN!41I3[NNLE9FNALc9rBHKP
S(&U[@8qVCMLeA*&jd`+jR[5pV#@amF0+%S*5JKaL"GB@V!5a@`RmSD4D"lE#,CP
f&$#0#8%TCa!b[Z3ePeKD*4a-ZN$,)I6VT!I9I6L@,M9`mF9LmZ-H5p4HZN$,V#e
B##8S(J2j'&Z$ME#YM3K3(!'X2)b%6M6X2&%Dk&!F!D`mM)BAK!J0(0G#J1!0BH4
NkKJ)$4cA3Kkb@`b&,C!!%"Sk!c2)DjlR[J*I2$AEHi"h8"!D1MQIe3a,#(YSREH
i"h8"!D1MQI5F%%c2b1cCS1kJ)$4dFJcf'GK`"%YP2a`03%"Sk1Hqd+!(SHYLq5Z
`SB5lka@`RmS@3qRAF1!)PXA@&SJaM$-)92a`03%"Sk2MY#J"k(VB[NVX+'%ZqX9
X*r+&1--`K,X+'A@&S3P"+8Z,Hp2CDcj!lfc##8&fhZ+Ya%G-0j4bK8Ai!Df,[V*
!p[F,M$INJAJj*)-!5@4d`hP(+&%"`*,-ZqS13bP+p(**E!`qTiL1Q'[%KjG",'3
TE+8$N!$+8X8q(SE@aAY[',"kb@b*NR3',#4d`hP(+&E!BX*5IaC$kGG`i!L@aGB
@hVM(N!""kb@`[l1J-@%MTK[+18+f!aB5NrLb(dklK`"%YLk`Y[9pb'X)-B`c#&1
J-@%MTK[+18+f!aB5NrLR''B3Pf&$,V#d2@5f4-KQiMTKVa1UK3Yb!$J5NrLaQ8`
F(A'%2E4'QQKkb@`[kCZ)kBDm6UKM''B3M0a(6$ALG8)36-r$0a(6$ALG9#KEN!!
"`T2iVCRiShb-%`Y#,'--`K)kBDm4bK40MZ&he%@K&8i`c#%ZX,4,!PDrX23blrU
+JpV"#&1Yd%kL'DI0#%c6jY)3MpE&e)MZphX+'$[5kN3j[Gl4#MfXrDYJ0%Y"a&J
TakPKa%!*@`'L#P6(4qq*S`@8+F3F#'PaKb3Ta"`)Ee2!d38iJi%0,m!*2I4"6M1
"!F#'K#P1f'mSrQ-UP#&1)1"$AB(YlJ38-(HPe)KmAQ9)K88I9(LU3p9Q1*PI6`d
KeNJHhZ$663S4qYNL#qH'Zfp`$Zh[jM+T3T6YK[+2jM+T3S4qYLkN3rFhZpK3MpE
'mSlhHrQ-UP#R%Z'hJCpGJHhZ!S4qYMH8Q-UP[GYlLVFQM"C3S4qYMH8Q-UP[Ic'
95K3MpE'mT-C9,HrQ-UP#K(kf0j5BbU@pr-C9+&1,aR%!(b4C$k`3TaG`lkl!p[F
"6L#!52NLb(eJS4qYMH8L1XPX-K5f[Gl3T`fVM@mCAY[',+6q+$N-T5[4b5@`ddd
+FH"Rd'$J5@B+2!'3!"-cm#K(kf0j52Zpi155$!%PTS`@8*35P,KY@5!LbbC#YXA
'*i"k&1")XM%R(YUerBHKRc%XQ3VC3"k(VBX!0pBI8m#8eXEbR8T["9EPmIB8
MNN5Q2NF@*BRJ(S[Ml3U,m!0E&hedJJ*6aBYS$(f(J+6#c2Q*HT6H"3MpE'mS5-p
,QVFQMlP[Ml3U,m!0E&he,QQm#K(kf5XCkl%X6`$d64pbh`qTjdd2L@*i"k*S`@8
+%IVC+aRVZ9m!p%dIFYm2UHG0$hFVi"k*S`@8*35P-E9*XG`ZqSLd)UR''B3PeKD
X#9Vq`p$,[qSU$fX%S+8lBDm3`Y#,'--`K64JXU&(%)HKPXI($+`(MZ#!+6KDDAd
V'HafH@,'3TFdIFU&3*8pVH-VfhM&P&#PXY*Up1q+5H'QQK4i!aTL'0Sm9%+dJB"
6L%23berBHKPXI($+`(MZ#!+%IVBhP+aRXGRPLaN+A0(h,Hlf&#)pKdV'Hm&%GRP
L`TSqjEhHe+HPl@88+@bq5YIf(SB+8k)T[+4%cRZHq#'ZHjliPkB&FclhH`SCEd-
,3LaM$-)8dB,+%S*5Q0UMa9aKD[NV$kRLNrLb(dklK`"%YLk`Y%%S*MD2&T!!&1@
1N!$kRNdB,,I(feXEbM`FNN!"J#5ddB,,I'j!!S4qYMH8QMFbh`pi155f64pb
K3MpE'mT%GC,BC#PYI$iPJE6mF$CSqj3S4qYNL#4G62S-dqEI$k[%4q4TSqj3P"+
9he1!X!)E!pPaMb,[U*Q,,[U,6jUq5YIf(SB*5c5H!qHU0ii'U*Q,,X+'@!#lK`"
%YLk`Y&+%S+8lBEbN2Um9+**%fc4pbK6M%XH3!#M`"N"-cm#8%TDQ`RmS@3qRAF1
!)PXA@&SU3Uiaj""+#K(kf,U4%l$J#*E+IMJDrFhZZ8+!(SHYLq5X0E$l$`"AUH3
F@Y)T2iVVh$K3MpE'mT1J-@&Hl24#KDI0J!iAB8-%KGT6YK[+3qVa8SNN6E0(h+&
1-5aj!Sm!C!6-r!K4elKdGFhN,X+'$[6H8R3',#[GRSK6XpHL+,6jX!(#l#KPIU`
%N!!"`Z`SB+F$1$H8GRSL&0Bm865,X+'@!#l!BX)+%IVBhP(Cpr@5f4-Nk!aB8dB
,+%S*5e0K2j3XKp1ZiF!4,BZX,48K9IFKV##8eXA8L*f(!%5f8r(!eqj[GFK3
MpE'mT1J-@&Hl2#3R+8lBEbN2Um9+**%fc4pbK6LAmKV"#M`"N!!6-r!Skp`k1ZE
b%j!!SB1p0j5G!BX+pfH&1"R"[+1c`S4qYMH8GRhpC,BApR3',#QM"C3P"+@TX*r
+&1--`K,X+'A@&Uc$J@B3PVq`p$,[qSU$fY+%S+6KDDm3`Y#,'--`K64JXS8H!-D
BN5`KlD)+%IVBhP)J&FcliI%X$DIMJE0(h+K@-H4I!CAY[',+I9Bia!Y['2X2!#K
(kf,U4%B`c#&6mF$AlQpebK3!p$eXAb9KVBIBH!+p6bG$(&V5+6q+kp`i8)r@a[+
6S$&KAZc`N!#RS4qYMH8L(2Fpm%0FpchaI$k[&5L540XdIFS8ia,(N!!Sm!C!6-r
!T6YK[+3qVa8SNN6E0(h+&1-5aj!!+2!'3%c2`+1[F1MVQmK6`SB1p0j5G!BX+pf
H&1"R"[+1c`S4qYMH8GRhaM$-)8k!aB8dB,+%S*5dr!VE0A'%2E4,[V'C6"`G6J5
+-HePU2Kk*cF,9IBD3,M#(YX!(#Lh)!1""+$%X)HfLT!!eXEbR@5f4-Nk!aB8
dB,,Hlf&1@1R@5f4-KQj0'#bhapK3MpE'mT(hHrQ-UP#P1f)rQ-UP4%+i"k*hQEN
!(!8ie(',G+eXEbR@5f&rCd"L`TS`@@phX+FXG1XPX,qQENdB,,I(feXEb
NIGlqBbU8+8lBMqBbU9%3VJ(SRHCZ3!F"6M8FBYdS8UBk2R-A2f(SCGre&3HeTAc
3SiK$d-S(UFBCK#A@&U[Ta,*i$"5F,6AL'&S4BaKQ%+D-&P#M`"M6%)AD)K3hjM$
DeXEbNB`c#&1J-@&0'#bhZpK6PMT'--`K'ENdB,,I(feXEbNIGmaP8S8Tf
a(maP8U)KA!241mcFJ!i#R'SiaET3N!#l5RE$H8Ic'95K#R'Sq(SR0`Y#8%TCabc
,*lk!T$e@BiQ9p2$5(8i%La4p8H+Z-)HfL@5"lHi#8eXEbMY[F9ENdB,,HrQ-
UP#R&f!S[LGJHhZ!SB1p,U4$i[-U#K(kf5)L@%2E41fp`$Zh[jM+T3T6YK[+2jM+
T3S4qYLkN3rFhZpK3MpE'mSlhHrQ-UP#R%Z'hJCpGJHhZ%4#ZKMLeE-HYPaK$feI
!8@R',"+#8TI2$9*r&T9*+p(hI![A5"J&"Sm0#8&1)1"$DBq#r!SB1p,U4%qmbT%
3S88ic+6q,$@S"L'K5RE$H8Ic'95SL&%`YVC9RM"5TMSq*M+T84#Mb5B[NV$@S"L
'K6L4q3pRB(YlJ+F36K3fGjK!eV"+#8VX"4E(,bM((%bq5T*p2C@c2a6J5+$4iD%
TAHek)VCRiShb-%S)*QIP)6PMS#CRiCZ64JXYmIB3S4qYMH8Ml[Ic'95SK42iY4m
241EKD&!6KDEbM[B8Tfa(maP8S8ie(',G+L)K3hJ9YQUfCq+0mM,[V'C6"`F+8lB
EbMqBbU8+8lBEbMqBbU8+8lBEbMqBbU8+FDMiHLFh#d+%IVBhP(EHiUh*S`@@pr-
C9+K@R,-XR[S#N!$e@BiQ9p2$5(000#R&f!S[LGJHhZ!Ta"`)E6(`Ai&$"hTG5)R
hQ9"#K(kf5)"-cmMXfD$Zh[jM+T3T6YK[+2jM+T3Ta-hiXGQc3Ta"1&$ChQ%$@X%
+!J%JD6,VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVRbhbJ&"0B64!!@j
DH*3"'SDJe909Ie[S)9LLTY(5j5ak[f)a!NMd"p,iR%-"F)1PeS,(C9#ZBSN1e$E
D`CUU*R-L)3&E,ATd3XrqE,"Nai[S8(rV$J[ShVU2RD2RBMeF!YfPQam9kb0@STU
4c4SFci*d(S%d10pYH0pTN[U9*N!!N!pV$&"0B63"BTY9#i5a1,($4-lPG!)eCee
SCP-1JGB%Gp6paJJ8MD$k"I)BJm,8kV%lTEECS)K!D1ZpH*e6e#YB*VHEG-K1Ea4
#8bLhb!J"BCL@`Xe5DbLh-&6TPNQ&P*TD5EPSFrd@dT0"8#A'QVfjqIDL(p2j286
mi`dJKScm'0#IMJQIMJQ5IL$2NNN-icBCKPf5'8C-r"5BC%!b!fjMJr89d6M**$'
855'qf0aLQqf0aL@h&Hh2cl83rTDh*$rlAE"%&#%erF0U#,EE#e)beUFV"mbkNFG
I-XMcJe)b21Fi)L#K#DeIJ1%@ff&U4PV8j@#N42LSr#llGZM3"CZ)qCIJ&U11S()
RTY%F"D&"e59Up[3"CZ)U'"80"aT)U*Kd44A+`krX*CTGH*KDbV[559b6Bp**A*B
GI(6aRH4%&#%eUr!F)YYX,9+KV8j@#J%4(!@K3G8PD[Ed!@EL)T30)Cm5dN)"9S@
M+64'pTT)9Nl6'jic[)MJ,3S1U5YAYk!,0a(J&T)B%KT)b+Y#dC5D)hY0*#Xk*kA
ERM1kL1!Y#JkT+eHhS!Xh%I!c$%03JC'8Mp$Kp[GPlldmCfN4`&S8(9*@Vfp!&Qi
M@['"UkN9C(1#$hhYh3RAe&Pk(2lYEIUN[G,kADpSk1qKedF9JL)Ra8IKGpZh4S!
Xh%Dm31T'A8-JDHC%p0SL#K#DeIJ1%@ff&UN-eUFV"U)i#d+$UNV9lHJ#cF45Pem
I-Y+H#$Yb[U,#%VQ#6YlQaK,0TI@G8kArrrL)JS3QYA#HR)YYX,9+KV8j@#2J&JH
02J&mi'%ep[d"CV05jb[p1U)4U14UP3)JS3QYA#HR)YYX,9)CV8j@#2LA8MMUJbb
21#*VlIS#c@DPcPIkG83M8FM9)B6!NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN
NNNNNRVp38%9ZC)XV!!!: