Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!utgpu!dtinker From: dtinker@utgpu.UUCP Newsgroups: comp.os.minix Subject: Paste Utility Message-ID: <1987Sep19.215819.4942@gpu.utcs.toronto.edu> Date: Sat, 19-Sep-87 21:58:19 EDT Article-I.D.: gpu.1987Sep19.215819.4942 Posted: Sat Sep 19 21:58:19 1987 Date-Received: Sun, 20-Sep-87 14:38:55 EDT References: None Reply-To: utgpu!dtinker/dtinker@utoronto.bitnet Organization: University of Toronto Computing Services Lines: 731 Keywords: paste.c Checksum: 39393 Title: paste() Utility This is a version of the UNIX (tm) paste() utility. The program was originally written by David Ihnat for the CP/M operating system, and published by the C Users' Group (CUG). It contains no proprietary code. The CP/M version is copyrighted by David Ihnat, who released it with permission to copy or distribute freely, so long as the copyright notice was preserved. I have done so. I have modified this version somewhat to make it run under MINIX (it runs perfectly well under 1.1, so should run under 1.2 OK). The modi- fications did not change the algorithm, so I believe David Ihnat would still retain the copyright to this version. Included in this version is the MINIX source, a diff file to regenerate David Ihnat's original program, (using Erik Baalbergen's fix() utility), a doc file describing the program, and a uuencoded binary of the MINIX executable file, for those who don't wish to re-compile. They are bundled in the following uuencoded tar archive. (I made paste.tar using the MINIX tar utility - first time I've used it; it can be extracted in MINIX but I haven't tried to do so using the UNIX tar). As usual, I make no warranties, express or implied about the usefulness, safety or any other attribute of this program. David O. Tinker UUCP: utgpu!dtinker Dept. of Biochemistry BITNET: dtinker@utoronto University of Toronto BIX: dtinker Toronto, Ont. Canada M5S 1A8 Voice: (416)978-3636 //////////////////////////// O O \\\\\\\\\\\\\\\\\\\\\\\\\ -------------------------[ Cut Here ]-------------------------- begin 644 paste.tar M<&%S=&4N8P M M # P,#8T-" ,# P,#$Q( P,# P,#,@ # P,# P,#(W,C8W M(# T,3(T-30S,30P(# P-C V-0 @( M M M M M M M M O*@H@*B!P87-T92 M(&$@"A4;2D@<&%S=&4H,2D@8V]M;6%N9"X*("H*("H@"A4;2D*("H@8V]M;6%N9"!O9B!T M:&4@7-T96T@5BX@($ET(&-O;G1A:6YS(&YO M('!R;W!R:65T87)Y"B J(&-O9&4L(&%N9"!T:&5R969O2!S<&5C M:69Y(&IU2!B M92!F'!R97-S('=R:71T96X@8V]N"A4;2D@)W!A2!F;W(@86YY(&5F9F5C=',@;W(@;&]S2!L M;W-S97,L"B J(&5X<&QI8VET(&]R(&EN8VED96YT86PL('1H870@;6%Y(&)E M(&EN8W5R&5D('1H:7,L(&%N9"!R97!O"X*("H*("H@ M,BD@5&AE(&QI'!A;F1E9"!T;R!I;F-L=61E"B J(" @(%QB+%QF+"!A;F0@7'(N(" H M2G5S="!B96-A=7-E("I)*B!C86XG="!I;6%G:6YE('=H>2!Y;W4G9"!W86YT M"B J(" @('1O('5S92!T:&5M(&1O97-N)W0@;65A;B!)('-H;W5L9"!K965P M('1H96T@9G)O;2!Y;W4N*0H@*@H@*B S*2!4:&5R92!I2!B=6=S("AA;F0L(&EF('!O"%I9VYA='H*("HO"@HO*B!-;V1I9FEE9"!T M;R!R=6X@=6YD97(@34E.25@@,2XQ"B J(&)Y($1A=FED($\N(%1I;FMEPH)8VAAPH*"2\J(%-K:7 @:6YV;V-A=&EO;B!N86UE("HO M"@EAPH)"0EC87-E("=$)SH*"0D)"2\J($1E;&EM:71E2AD96QI;7,L)F%R9W9;,%U;,ETI.PH)"0D):68H M*F1E;&EM6-L M:6YG(&1E;&EM:71E'!E;G-E M(&]F(')E;65M8F5R:6YG('1H92!F:6QE(&%N9 H)("H@:71S(&-U2!D;V5S;B=T('=A6]U(&=O('1H2!O M9B!T:&4@9FEL97,N"@D@*B\*"69O"LK*0H)"7L*"0D)+RH@4F5A M9"!A(&QI;F4@86YD(&EM;65D:6%T96QY(&]U='!U="X*"0D)("H@268@:70G M2D* M"0D)("HO"@H)"0ES=')E;F0@/2 P.PDO*B!3970@2!D M971E8W0@14]&("HO"@H)"0EI9BAF:6QE<'1R6VEN9&5X72 A/2!#3$]3140I M"@H)"0D)=VAI;&4H9F=E=',H:6]B=69F+"A?34%84UHM,2DL9FEL97!T%TI("$]("AC:&%R("HI3E5,3"D*"0D)"7L*"0D)"0ES=')E;F0@/2!S M=')L96XH:6]B=69F*3L)+RH@1&ED('1H92!B=69F97(@9FEL;#\@*B\*"@D) M"0D):68HPH)"0D)"0DO*B!' M;W-H+"!W:&%T(&$@;&]N9R!L:6YE+B J+PH)"0D)"0EF<'5T2X@0F5S:61E&%C=&QY('=H870@=V5N M= H)"0D@*B!W"UL M:6ME(&%N9"!I9VYO"LQ72 ]/2!%3D1,25-4 M*0H)"0D)>PH)"0D)"6EF*&1E;&)U9ELP72D*"0D)"0E["@D)"0D)"69P=71S M*"9D96QB=69;,5TL'0@PH)"0D) M+RH@4V]M92!D871A(')E860N("HO"@D)"0ES;VUE9&]N92LK.PH*"0D)"2\J M($%N>2!S879E9"!D96QI;7,_("HO"@D)"0EI9BAD96QB=69;,%TI"@D)"0E[ M"@D)"0D)9G!U=',H)F1E;&)U9ELQ72QS=&1O=70I.PH)"0D)"61E;&)U9ELP M72 ](# ["@D)"0E]"@H)"0D)+RH@268@;&%S="!F:6QE+"!L87-T(&-H87(@ M=VEL;"!B92!.3"X@*B\*"0D)"6EF*&9I;&5P=');:6YD97@K,5T@(3T@14Y$ M3$E35"D*"0D)"7L*"0D)"0EI9B@J9&5L:6UP='(@/3T@1$5,*0H)"0D)"7L* M"0D)"0D)9&5L:6UP='(K*SL*"0D)"0D):6]B=69F6W-TPH)"0DO*B!%;7!T M>2!F:6QE(2 J+PH)"0EP=71C*$Y,+'-T9&]U="D["@D)"5]C;&5A;G5P*"D[ M"@D)"6-O;G1I;G5E.PDO*B!';R!O;B!T;R!T:&4@;F5X="!F:6QE("HO"@D) M?0H*"0DO*B!/:RP@)V-H87)O;&0G(&ES('-E="!U<"X@($AI="!I="$@*B\* M"@D)=VAI;&4H*&-H87)N97<@/2!G971C*&9I;&5P='(I*2 A/2!%3T8I"@D) M>PH)"0DO*B!/:RP@<')O8V5S2!T:&4@6]N9"!T:&%T(')E8V]G;FEZ M960@8GD@=&AE"@D@*B!V86YI;&QA(%5N:7@H5&TI('9EPH)"0ES M=')P='(K*SL)+RH@1V5T('!A7!E+"!E#L*"B @ M(&EF("AIPH@(" @ M("!I9B H:7-D:6=I="AC*2D*(" @(" @"7@@/2!C.PH@(" @("!E;'-E('@@ M/2 G7# G.PD)+RH@=&AI" ](&,["B @ M('T*(" @96QS92!["B @(" @(&EP87-T92YD:69F M M ,# P-C8V( P,# P,3$@ M # P,# P,R ,# P,# P,#4U,S(@,#0Q,C0U-3(S-S8@,# V-38Q " @ M M M M M M M M #,X8S,X"CP@ M("H@(" @7&(L7&8L(&%N9"!<2!C87-E("HO"CP@"0DO*B!J=7-T(&EN(&-A" ]("=<,"<["0DO*B!T:&ES('=I;&P@=&5R;6EN871E(&$@2!C:&%R86-T97(@;W1H97(@=&AA;B!A"CP@"0D)"2 J M(&QE='1E2P@=W)I='1E;B!B>2 *1&%V:60@ M26AN870@9F]R('1H92!#4"]-(&]P97)A=&EN9R!S>7-T96TL(&%N9"!M;V1I M9FEE9"!T;R!R=6X@=6YD97(*34E.25@@8GD@1&%V:60@3RX@5&EN:V5R("AU M=&=P=2%D=&EN:V5R*2X*"E1H92!F:6QE('!A71E6]U('=I"!P87-T92YC('!A2!B92!A;GD@86QP:&%N=6UE"DTA("E=(%Y&,B H+28A0"M?,T R*S= .BLG6"!?*S1UT@/#XF7T]4(" L/B94 M3U4R)CPZ)EPO5"!16#LP7S @($)8.S!?/2= "DU"/#HC3DT[75]',S! 6ULT M7S A5%(\/B933U0@("A.)E0O5S%8*$5E1/5B-!32M=(#5.*T%,6UTR*$(2 A50I-(%Y'2R H33XA M2$P_0"-<33TP1BLG0U Z0C5;6%I2-BLW0#I812%%,%]3/TA=0"T^-TA%)EXH M+5Y>("%5"DTC2$T^(4]<5TX@+" T+D%0(#59/E%4.UHT04=?/4]#2$50-3Y" M-#M<0%=;7%]7-#-?4SA>)DM *B E(T@*348P43XW3D!0($Y&(2 O759>+D%4 M(35:*3%/6B,_3UM?/21*(S]/4"H],EHK-T]*("]7750E7UQ6+T%+7PI-/4]* M(S%/2"$V6$@G+"XR.#0N03XC)5D^0E5;6D C7" ],3)DM *B E(T@*321 43XW3UTN(2@M)B% M*TDC+UXI6R57(S4X1T4T*$TF(2A%)E](33XA*"!?("(S%/6"%:52XK-T];)B%01B,Q M3U@A6E0^*S=/6R8A4$HC,4]8(5I33BLW3ULF(5!"(S%/6"$*35I27BLW3ULF M(5!2(S%/6"%:4BXK-T];)B%05B,Q3U@A6E$^*S= ,BL]3UHJ(5A )$!4.UX@ M/DPG3T8@.0I--DY$("1(+28A("=)-S]>*S=/6R8A4"(I6R57(S4X1T5?5S@D M6E4_7RU+,#M?4SI4)EM"-B8U(U\M1" Z"DU:)5@A0%PP*%I4.U\M2S [3BQ0 M.30O7%8P(4M(,D F(U$@.TLL3UU6(4]<5DTA3EA8(44P7U,Y("9.0%,*32 X M+R0B+DP[7U,Z5"9;0U@F-2-?+40@.EHA7"% 7# F6E ^7C\A13M:-DPQ6B=8 M($X@)" T+D F(R5:*0I-6R57(S4X1T4T*$DF(2,C1$8H1R-"2#XO)D,C1$8K M1"(@*TPB("Y!520Z0",](B8J,4 P4%DI0%TV0"%>"DTC2$DF(2,C1$8B5$ @ M*$$F7UY,4$)$."1")#M?6E)"*C% ,%!9*4(I4%A*)T-12%!9*4)9($ B6R! M(T@*32XA)D@A)S H0D0X)$(D.U]:4#,F,4]<($)$.U\L+C(I6R57(S4X1T4T M+#TF7T @($!76UXE)U1"0E0[7@I-5#XB*5!8+E\O(4@@/2!>*S%/6S%8*$(4 A5BA/758B+D-8($5:*3%/6B,_3UM?/2$J*S=/4BLQ3UHH M(5@M)E\@)B,*33]/6"H]/%XC/T];7STP5BLQ0#!9,4]152$S)R T+DPI0E5; M7%% /"!?5S@D-BA'3#<\+35"/C8M,4!!, I-7U"DTF M3D(\(%@O)"%(3#XO04M6,5 Q(#T@0U\M0U@Z6BY8(3=(1TPW/"TU0CXV*S= M,BHA4R-$1B!'(#TA0U\*33U .U\]0#(C,4 P(3982")2=0)DXO7U\T M+DQ6"DU?5S@D6B=$(3=(33XA+UQ76B4D*C=(33XA+SDG(2(A5"1833XA*"U? M(4 A5")(33XA+UU7(4Y#3",E6U\*33U ,TA9,%$^+#PA,#8H1TPW/"TU0CXV M(UL@2R5#XB*5!8+E\O(4@@/2$F(PI-/T]8-#\@ M.%%0)2-))3 G7S%/6TM8.$T^(4A()RPN,C@T+D58("@E+EX@*"!.*C A-"]= M5B$N0D(B-5D^"DU"-#M:0%=;6B G544L/"$P6CXP($ T6U@@0")8(# A,%]7 M."1:+S L-T5:*3%/2B,_3T@@/S X45 E(TD*35$@(E@@0"$P+#PA,#0O759> M3D);(C@O)"(N3$Q -%M8(# @45 E(U\]0#-(4$!1/C=(129>2"U>7D A70I- M)%,G(#0N1C(@(R<@-"Y&+" K6"XF14M)44!:6") (3!:)" J-TA%)E\H+5Y? M("%5(3,G(#0N34]"55M<"DU15#PB(" B*S%/2BLW3U(I(5A-/E\H329>*$4G M(2M ("$E(T@D,$D^0E5;7$(T/"9"55M<0%=<)B G-#(*34)56UQ 7"PD0C5; M5D)0/"TA("(I(5Y,,$)56UQ 7"PD0C5;5D)0/"TH("(I(5A-/E\H359?*$TG M(4A%) I-(BA-)E]-)T!"/"XK,4]2*4%34#I?5SM<-BA'3#<\+35"/C4P-"A- M/B$O.2(%Y&)2 H33XA+SDG(2 Q5"9833X* M32$K0"$@)2(M,4]9,%]3/T@W,$XC42 Z*S= ,BDQ4"M+)EA-/B$H358A*T @ M(24C7SU0.U\M+D$@(E@O) I-(4A-/B$H12<@2$T^(2@M7R! (5\L.$T^(2@M M7R! (54D2$T^(2@O(R$H13Y?*$PG(S! ($(P/TLD*$T^"DTA*"\C(2A%/E\H M3"1# @6$T^(4A()RPN,C@O,C0@/2%#7SU ,U\]0#HC,4 X(3982"($A-/E](32=?2$4F6T]=5B$O759;3D$O M(B59,$)$.TTL+C(X-"]=5EXO759>3UU6"DU;3D(N($@O)",H+28A0"=),D]7 M7SU ,E@I,"$P6B,H(S=%6U\]0#-?/4 Z(S% ."$V6$@G+"XR.#0N0#P*32!5 M63Y:,C==3T8P.C9.1E0B.%4F6#4C7SU/4U\]3S-?/4\K2"PP(B-1($-?/4 R M+3%.)3!:+CPG-T4B*@I-,4Y44%DI03!?5SM87U<[6D,T.T$T+D!%($@O)",H M+28A0"=)6#]2*5LE5R,U.$=%0%Y0-E%4.U @("(K"DTQ0#(K-T X32 @(B-6 M4"%5($!'(R(]354D6$T^(DPX)RPH328B1"(I4%PX)R H1TPW/"XC/T! *CTR M5BL*33% ,BLW0#A-(" B(U90(54A,B<@/2 E(R(]35TE2$T^(2A-)B%//SA= M74P](" B*3= ,BDQ0#M?,4\C)PI-,4Y8(" H+5Y;0%%=(RA-5EM,.2)=("-? M,4Y;2UM,/29;0" @0%=8*")'-%Q?5S@F7U3#9"5SM,0S5+5$(U6TI"55M* M0D \4%DI0"4M4"(H(5]=)EQ/72X*35LN3CI 5UM0("7U1;7C8@1R ](4-?/4!;7SU ,B,Q0# A-EA()PI- M+"XR.#0N028@)5D^6ETF(S] ." _,4HJ,4!(4%DI0%TL("%5(U]=5B-+0$X@ M)2-(*5 A/C=/728A2$TF"DU?+S\X+C0X)C\Q,U\Q0#HJ,4!(4%DI0U\]0%DP M6B! (#=%6TM82$=,-SPM-4(^-B-;(#LG,4]0(" H33X*32%/.22"1?(" Q7"Q(33XA3SDG(2@A52HX33X*32%(358A M2$U>(4]=5R!/750A3UQ56B0E58)D)7."9"5#PF0C0P*%]4 M.UQ 5UM<("(5A?(U] 7"]>0C5;7@I-0E%:5BA313Y?1R@K7U<[7EHC2"(W M0$<@/S T45 E(TLN*$T^7TA$/DU"+BLG2T!#0C5;7D)56UY 4UP@"DT](%8K M-T]:*R%2-UY?6$4F7TY/2T)16E8H6$U67TA$/$)16E8H7#PG(" B6" P(3 V M*$=,-SPM-4(^-B,*35L@0BLQ0# E(# @15]/7"4@0"(I,4]"*R=+0$-"-5M> M0%-:6"A0(54G.T B("4C2"!0*3Y"-#M>0E5;7@I-0C%:6"A833Y?2$0^34(O M)R%0("!"55M>0E<[7D)0,U\M6$4F7R5 72 @(54@7D8A("\Y)E\@)50B6$TF M"DU?(C=>7UA%)E].3SE"55M<0E<[7$)0,U\M6$4F7D5 72 @(50C3SDF7D E M52(H329>2$4F7RY//T)4.UP*32I4.UY.,"@@3E H(%HO7",N-#M8/5,J6" P M(U2$TF7R-%)EY'+"A"5#M<0E5;6@I-0C ^*S%/2"T@ M,"(K-T]:*2%833Y?2"\C($4O2R@X329?*$4F7TY%25]?759>+D)27T58*5 G M,"I?5S@D"DU:(4-?-T4C2R!3)R T)4(I6R57(S4X1T5 7E L0E58)$!<+UY" M-5M>0E0X)B$P)" I/UM?(3 H($(T.U@*34)56UY"4#Q%7T]>*3%/4BLQ3U!+ M,4 R62! (EL@0"-(.D N*3%/.BLW3U(K/4]2*R$O7%="-#M:-B-4( I-("

*$0C5;6D)4.UPN-#M:/%$V*S%/4BLW3THI(5A- M)EY 5"$@*$T^7TA$)UI03BLQ3U M(# B*S=/6BD*32%?758A+DQ77U*2%?759>14(I6R57(S4X1T4T*$T^(2@O(U]( M13Y?2$PG*3];7T(P/BE;)50%=;7B G-"U"45LN*%A$/D,A2%$*35 E(TLA*T-? M7U4A.$(^43U0538I634A,$)16BPF2$4^7RA-/B$@+#Y#(4HI-T];7SU/6TA* M3UT^+S @( I-/3 W7SU/4TLA*T-?7U4A.$(^43U0538I63]=5B$O758A2T E M("4B6" P(3!:+BP@0%PP*$(^43U0538I"DU9-2!14"4A,%]7."8T+UU6(B]= M5B$K0",@)2)8(# A,%HH+"! 7# P0C0[7D)4.UY"/E$]4%4V*5DU(BL*33% M,BDQ3UM?/4 Z(S% ."$V6$@G+"XR*S= ,B@A6"TF(2 F."(\(50@3D]$0E0[ M7D(^43U0538I634C)PI-,4]8(" O758A*"TF(2 E.T) /%!9*4 I4"7T!97R@O759?3UTN"DU?14 I4"

0B,@ M/U]#"DTW4T3"HU53TR-"A',"H]*U<*35Q81R5=7B4_*CP^(U1 (BE5 M2$3D].(2 [6E%:6"E13TLF.T!>)EY, M-$XE-#M:4%Y8.R%/2R)+0B(F7DPE"DU.*40[6E B6R5 (3,T*T B("4C2"!0 M(TA17T$U0CXW)R%-.$,A("(K-T R*2=-0$-"55@H0C%;.BA833X*32%(1#Y7 M0BY852(M,$X@)" T*T A("M/-"A;1",@+%1 0CY1/5!0(" @(" @("!$($Q0 M("(@)# @/E A,PI-("I4(# @-"8@(R @7B Q(B A4"4Q0"!((318("0@-3(@ M(S E-2 @)"$\6"4@," C("A )3P@-CPA.RPE"DT@(" @(" @(#Q (" @)R@@ M*3