A program to read tapes in a snap

Michael Sokolov msokolov at harrier.Uznet.NET
Wed Dec 16 05:14:23 AEST 1998


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 at 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 at H1>)UE`0]UPOV)$1/)5AD[
M??'#H#86D6II=GYVD'W[C!T<'>]_=SZH;9XR9ME[M6_JP-Y at -=_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 at 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 at 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 at V1@K at 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 at 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_ at LW3Z_[8RABWR'`6
M:`2_COT[!*- at 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 at 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 at 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 at PT!NH)O>':(:6QZ[NZW[JXUC1IUD3^+AK46HY^Y\/%C]J9!X]!D
M:+$>V>2R&MYIP`L^3%,QQ-JW#[\+^-F7V?F.0((DQKR at 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


Received: (from major at localhost)
	by minnie.cs.adfa.edu.au (8.9.1/8.9.1) id GAA20201
	for pups-liszt; Wed, 16 Dec 1998 06:34:19 +1100 (EST)


More information about the TUHS mailing list