Received: (from major@localhost)
	by minnie.cs.adfa.edu.au (8.9.1/8.9.1) id GAA20122
	for pups-liszt; Wed, 16 Dec 1998 06:15:11 +1100 (EST)
Received: from harrier.Uznet.NET (harrier.ml.org [193.220.92.194])
	by minnie.cs.adfa.edu.au (8.9.1/8.9.1) with ESMTP id GAA20114
	for <pups@minnie.cs.adfa.edu.au>; Wed, 16 Dec 1998 06:14:57 +1100 (EST)
Received: from dosdev (pm8-143.dial.qual.net [205.212.2.143])
	by harrier.Uznet.NET (8.8.8/8.8.8) with SMTP id AAA10682
	for <pups@minnie.cs.adfa.edu.au>; Wed, 16 Dec 1998 00:14:31 +0500
Message-Id: <199812151914.AAA10682@harrier.Uznet.NET>
From: Michael Sokolov <msokolov@harrier.Uznet.NET>
Date: 15 Dec 1998   19:14:23 GMT
To: pups@minnie.cs.adfa.edu.au
Subject: A program to read tapes in a snap
Sender: owner-pups@minnie.cs.adfa.edu.au
Precedence: bulk

Dear PUPS/TUHS members,

While exchanging tapes and tape images with a number of people on this list, I
have mentioned the existence of this program to a number of people, but so far
I haven't given it to anyone. Now I'm posting it to the list for everyone's
benefit. This program can read a tape on a UNIX box without the user having to
know anything about its format. This program automatically determines how many
files are on the tape, what is the record size for each, and whether there are
any oddities such as partial records. It saves each tape file into a separate
disk file and produces a log of everything found on the tape.

It's a simple C program and should compile and run on virtually any UNIX or
UNIX-like system. The original version was written by one guy I met on another
list once and then it was significantly enhanced by me. I include it below as
a uuencoded gzipped tarball.

Sincerely,
Michael Sokolov
Cellular phone: 216-217-2579
ARPA Internet SMTP mail: msokolov@harrier.Uznet.NET

Enclosure: uuencoded cptape.tar.gz:

begin 644 cptape.tar.gz
M'XL("`ZQ=C8``V-P=&%P92YT87(`[5AM4QLW$.:K]2L$-(,-QOC`.!D[ID,(
MM&D)S$#2-YKIB#N=?<-9<N_D&)KPW[N[.OGN'%+:SD`^Y'8FPTE:[<NS;W)>
MBRL91K%<>D#RVNUNI\.7./?:W1W\RSN[M+;D=9YRWNWN[.[NM+>];6)K[R[Q
M]D,:Y6B:&I%POC2^3CO=?^![.PS.'\.>1Z95M@H1>)UE`0]UPOV)$1/)5AD[
M??'#H#86D6II=GYVD'W[C!T<'>]_=SZH;9XR9ME[M6_JP-Y@-=_G]I-O:B>+
M?6DW*_H,G1WNOWQ]^+`Z[JE_K[-=J/^=I\C6WNU6]?\89`N4)U($*1><%I'B
M6DF>CK1I\DDL_$@-N13^R!Y3HXB4T<"?RHE(A)$\B-(K1B="!3S6PR%>,B/D
MA*8R%B;2BHM+/36@S-=)P-/H+YFV7`,A13+]-WKLB1)C&?`U_&XIM=;DLY%,
M)%.*1RDI-C.]&43#R,#M/Z=2F4C$7$W'ES+A.B06$@1V$3OJK(/O@?2CL8@9
M)H9!+V:1&?&VUVCQ-R.9VEL`5B*Y#[@9L"*R(OQIDH`>,!)<-#JY:?$C:*AF
M%*4,.%.MR$I%<*-DP96<D>8F03[3TSC@"O&*XYM,/'#-!5*#CDR3^0$'8."+
M\$ZF*FNU/$ST&(U))$![,I=D#R&DJ.!2T@V1@K@XUK.T-X_"9DSF6!>?IQ/`
M0L1[C!&X^8;#&(/@P$R$=04`?!_YH,SR$EQ-+EO#5I-MP=F62L:FC6""D%D4
MQ[F?=P667*:L6(P60]?+E^:VK]FH"1Y'J4$+`88\K5)[2E;GR<B<IM;7,Z_L
M1']8'??T_]W=;KO0_]O(MMWUJO[_&+2USOBZ:P^;W->3FV*90.%,U972,^4*
M)99J:$9P:8NQU4CY\33`OF""2+=&>X6MT%<F+F_))%$+7.E-ND65#KML-8#B
MA39X\N+M48V>!J@CI#7?@U7Y7J3]3(-4010R!L."#Z71$\/KC3Z3UT8FT!A'
M$.!UV!3)<+Z)K+`5J:")?\&R?JX?U)V_^NW0FM#=>=:I;:WS?1_]IZFF^1C&
M6;W3:/*QN+9X7<;:O[)MI`8$H&(W.3\X?T7GJ6M</^W_@LW3Z_[8RABWR'`6
M:`2_COT[!*-@A"(N#7+*;O;9T:OC0[Z>'?79!X860@*;R(<XI=%001,D?R^G
M82B3B\R3=WWBG+/$&MRP`57:GI$:D*HG,)\&O+UP`X\@H'#BY?Q&HU&X(IVP
M!"[LQ!?/[M1(\]%'C`!L/$:(ZOW^W)2-C0;_P&K$?'EC9(J#$GAKE#G6K-K\
M`-;X9PZ9];GIP@<94(/DJ>?\SWF;Y*/J"8C427UE_OQ907X\2:290H9X?5I!
MY'%^8\R$XG0)0U:[Y3*&MT!9P6!0T(!'#M&&W8(3,LF/=2KK"%\#3FJX7;0)
M'DF3J0U'CQ,O&4<\\CHR=8^6M_!ODD`@POK*&W!C+)(K&+0P%*%L:2JN/FEO
M3W]7*TT7/[J7?6]LN$4><U)Q:_^@?[G98%!ZAQJ$SQJ7P580DD&4P0%`$D:I
MAB=#((QP[08>:`CHI^E"N,Z2R!BI,`D<J,MWH.IP.'>/MMS_9G'&]_B3N(1(
M,\,5:!Y'\@<US8O0\H29EFR[R5>._KN6.U2EF=R\@$`T=464O!`]S!H(%KV9
M2C?:W6YW;KGE&O!-[_X$0TF?3;!"?G@VS+94LWRIY34-.X6:_323%HIQ>5#H
M!R4CLU#^+!(%D>PY8%<!TW)F8U'B)@E%N,LH.U/S*"S@[A*J$.;:IS'^'W;<
MK_HVR^=B8YLG1I;SL(U?ME'D[:TDR+E0NK=<B$3#EL==@2?AI>+U^K90\S;G
M2IG:]2V>A?:$935]<OKF['#_X/O#E[AKW:)YAB_+.HQ<'WZB),/W=I#ANL_L
M1%[';3?$\-`OS!(WY.@'QH"?O#T^MJ>E$5@ZL?=H&-QU,9^C',LBWP1GPWAH
M8T";LQ&*KM=]V+//B8(?D!!Q;Z710)`/3X\(WA1^3<#OD[I/*U]`TUN+UWH6
MO;(C[AEB@PT!NH)O>':(:6QZ[NZW[JXUC1IUD3^+AK46HY^Y\/%C]J9!X]!D
M:+$>V>2R&MYIP`L^3%,QQ-JW#[\+^-F7V?F.0((DQKR@7K#=Z"_J*_B4#6P7
MCA![1?$<=,U6W"A>SBNM/(:+`C-G\SY4<G<AOAB2"^OTNWZ!(R"LP90B?Y.?
M_G'V\O3D^%?HEIE7-*6S&]0NT9]YN8`$>O'9_Q9QI9-CXY6QR<KH,T^Y/I3'
BEW[O5U1111555%%%%5544445551115\?_0UI&$I7`"@``)6Q
`
end


