[comp.binaries.amiga] v90i078: find 3.9c - search recursively for a file matching a pattern, Part01/01

Amiga-Request@cs.odu.edu (Amiga Sources/Binaries Moderator) (02/21/90)

Submitted-by: olch@geocub.greco-prog.fr (Olivier Charrier)
Posting-number: Volume 90, Issue 078
Archive-name: unix/find-3.9c

[ this is the same as what appeared in comp.sys.amiga.tech.  ...tad ]

It's an Amiga find utility, a simplified version of the Unix'
one, but only 3000 bytes long, allowing wildcards # ? and *, including
five options.

  Cedric BEUST         olch@geocub.greco-prog.fr
                       gnu@cerisi.cerisi.fr

# This is a shell archive.
# Remove anything above and including the cut line.
# Then run the rest of the file through 'sh'.
# Unpacked files will be owned by you and have default permissions.
#----cut here-----cut here-----cut here-----cut here----#
#!/bin/sh
# shar: SHell ARchive
# Run the following text through 'sh' to create:
#	find3.9c.zuu01
# This archive created: Tue Feb 20 20:49:34 1990
echo "extracting find3.9c.zuu01"
sed 's/^X//' << \SHAR_EOF > find3.9c.zuu01
Xbegin 644 find3.9c.zoo
XM6D]/(#(N,#`@07)C:&EV92X:``#<I\3]*@```-;___\"``$J```````!W*?$X
XM_0(!C@@``'$````U%%-2G=NL"P``'0@```$```````````!&:6YD`'-E96LNA
XM8P!D"@!_WU8`````````````0"DC*````0`8,$^@08$!#BH$(""9P`'I!#8<)
XM@4Q@`F0C@%ED-H,?@(0`$D#K^-$B-9(&$UA#:5$:BSP&"0S19T`:'``L\``@2
XMX,15/VP9+0([(]"1"B`L]"20T_,?L:`AB3G118#8S`1Z&$0Z:$:@@C``"F@#%
XM(Q#+3`3VM'(5B`!L`6)@A`31AT`<`P@`?IS!<!?`B#,2^JHXPZ`O`*(`#$A!1
XM!,8NWL,(6(:DA@0FPKD)-+Q`,!6`!2A/1.A!0"_GSI[^Q(#0D<"*DSI.JOPC(
XMA>3<`Q@@>"`D($+W0],\7?W3L0+(;!$O``":$F1<(,S,0@#"`,`,A;,6I@X@1
XMM3J!A:0(2#6%@QP`'Q(Y_JGW!UY24U;%_^$SH^$L`.UX1"S1+F?F`7_:J4&6M
XM``"(T()\)!Q("GAB-*6)@0@J")X435$2'S]$!<`,"&W,!@(*.ZGQD0D<SA8$Z
XM.@`@<!8H$F"C!`KJF8$/$J-10N,!RDP5@#Z@,2`18ICX*%!7`,`C1"Y>N2#"D
XM&^9-)8`\2YKW0@(Z<H+%$U,`P4`,`.@@T!D(0*#;"]I1($*'I`P1$6>Z"(",/
XMF``HH!T`2EB6`#9$,E"G28AQLF=(UB`F`PA,\B$"`NBI]P][>AR@R7LBX-0H/
XM)$T)$FE2!QC2E"F$-DD5%Q#B@RE3PIE2WG+-!<)`(`>U0<-<"+`A`AS4Y;;;C
XM"P$`UY22%YREAP@Q8,`/ICAL*L('!+`J$`%@$`.6/S"(H,,!D&#JP7AD^:/+^
XMJ<PY!RL1(;0B'W4P3"O!&29P&PB<(#B)0A3)_&//F;.IF:*.V,QD@"`Z0G-3H
XMIWP,T<X_J$@`B6%G*(:$%$F`(<\423`009>$2?RE``Q+P`L`+Y1(RHDI9GSPK
XM8PE+L7##\H"0'"!4`)%<$`.CLME4_7@"6K8@A)J4`708BZ:M'Q&@JW`N,/$-Z
XM`_`XT<5KG1*@!`9F\#,%$I&\LQ,(G-51&Q``J)QBI`(D='1"0+R!``,);<&&$
XM`"`$8#1#K]4&0K&R\4,"DQR8P"0(-_4F$`PXZ12</\X(`,C?U0ED"@I*,$#!?
XMER`X[I<9%C#`0EX?F>$`!ANK``(3)D.`2N;X2,$$&-HP(`$`*IBA@A2-3_"EX
XM!2\L\(*<NORC"6A2+"'D866!08[J7PKD!%D`2$'\"&9@`#L$$D@P06=,*%$=+
XM`;V#`0_L9/TC!_$_F*'G!&>@`'OV`/P#!O32=T:"]=8I<2X"YR_1/1(W@6$`"
XM'`*`(0`<`5":T3C`$ZV=@VM_$HD9#""+PY``#)JYCR[\P8XK)0=74_&'.,I#\
XM`-`T$$QO^U\`ZQ#"F\3M'#?Y5\2H`[S$2`$08*`'"/1`@'DA*@$FD!0!T-$4E
XM:+S-`:_)X0P)P(U#D2`!22$`-'IXPIM,0"-A\<!<`*`!$B!@B-M"@!UR14-7R
XM]/"'KQ'($#FE`P*8HC-!PDL+B&2*OB@`,9Y83!'T00!&$$`2!@E`7\)@!@5(,
XM)@'4$%Y?QM#'/T(##-3HRQD*Z1&0J*19?;$#(TL2$FF`@19]F<,D'8D-,)#"#
XMC8@Q1%]`8(;^`0("$)B9+LP#@B_(D8X6N&,>NX>&46KNE038"1X1`@9VO&8F7
XMN1PE8OB"ES<*1`<MFN,`N"%+7HIC*O\PAL8$,I,!U!(O(!@F*`4"/6PH4Q;-J
XM_$ACIGF?.CQ1(`7PP$P``(X,"@(".O`'.3*HBW5BPPGZ\$=_]`$`;610#3,)V
XM`)M2$U`>9%`+`55#!J404*9,4`D!?=0$A1!06V10!P'UYP1E,!,!#%0%'45!_
XM!D70439D4`.O"0,,)I&,H?E#&R(``@A2``!6E`,0,9WI3FX:T\V`A1^H:*4$@
XM@)&E%D4!&?_@QVM$@(3-6$P'9U"`Q0[C`89I;Q;(.(,%:@,`8*`R.3]%Q)6,G
XM-@``0``88#!'*U]#AC?,P05L2(,8Y!`&.<#D"7"@0QK>X`80="T-9W##&^10(
XM!C(H($X@`($1TN`&,GS(#C-P00[&D`(0M``$&]C"#-H@A3*,H0YRF$,:[%`&D
XM$,RA#'4=`QH(9092IH$-99A#9F'0AL-V#01#>`,<\B`'P**!#B`8`PABD`,<0
XMY`"SFMWL$`K;6^$*H0A5F`(5,CN#&+3!LNU*PA"*\"$CT-4-8RA#"A1PV,S2<
XMH`U5F$,8SE`&'<SVNF9@K&-;L(4PC.$,<[!#%W(SAS>`-KP@($,:Y."#W,`AS
XM#'2@0QGDX`8?V%8!B4TL7O7*USGH@+RWC;"&(]R",.@@L43@ZPF`.P<ZZ!8$A
XM"'9M:('[AC%\EK#@+<-A-TQCRX[APR`(L1M&#`+`"I:PP0W#:6=<8PVWX`PX\
XM'@(:PN`&]H+`Q`$>L&=-;%=2^K>Q1"YR8EM@X<1.P<1P0/$<3/L&OHJ9S&TH=
XM`QW0P-@S]'C,9KBR8<6HY2W;`<=$2,,<X,"&,.3!M*B5@VI-JV`XS.'!(+C"B
XM:\DPAKJ2H<L_^!"3_ZS:NMI7P7)(`0M`,((/"=8-I1TLH$E+5S8\.0UIGD-E`
XMF>Q8SZ%@TFMN\WB[1H4WH%@,@R5QH%6[:3KD`0ZE'0(53->"(6`X"6Z80QW,5
XM$-\QI*$,;@!NFMLPV#S8-L^$'0.5_RQ&P0(WSG7`,@"2P`;8GB$,ICYP@A?L0
XM!MNZX-VV78B\YTWO>MO[WOC.M[U!0DE]^_O?`/=W`3)QBRL8I``!3[C"%\[P[
XMACO\X1"/.+T'P`Z#5$#>!&*+01X#`!9VS2`@$H@0#&(%@]`"(1O[B$<88@")C
XM/(8`@EB6/]`I!72*`9UR0&?,P[)+`UQ.(0.01T``W*?$_0(!WQH``-4(```UJ
XM%->$KA?G(0``"A(```$```````````!&:6YD+F1O8P`N8P!D"@!_'4(`````;
XM````````0"DC*```G01I4D0!B(,($X(PD\8-&1`HZ*!),P<$F3=C%KZ1`\+.>
XM#!<YQJ10H&!*%B=/H$Q),L6@0H4,'8)HL27,F#-S['0!P4/.FS=T+*:1XX,G;
XMG#!TZ)21X\8'22-5G`RADN2)$Y<O$4XI$T;.&#1E*H81*J?,&#H;\X`((S,-H
XMG8ISZH@A,]0L6CEIPFKD*+$,B*-)E[HAF<0)E"I46F9-2-,F3IT*G\"AD^:-X
XMFXHHYI3Q*Z8,FS=W1BY&V/-G4+I$$09QH]9.&#9I'@9ID^9,&")O*J*VFQ:$0
XMFS!MRF!=S`.P4J9%54.TLS1/"A!EY]#!>[;,P[)GZK#I"J(,'CC1YU0>K$!*^
XMD2E5F"0>GI4(13C;\U3LZQMXF<S/S;RI(],R".ELD='50_O1`4<==+"PEDQMF
XMA)%'9R"TL9%PHQU$1AEPE.%00V>`X!]];TPV7D4-V?'&&M:1M`1*5S@!@A!5R
XM'*%8A5>XA8:'(OK7PAD*T@?>&VU,9M$;8;EQ0E":E=$&"&B!`&$=<`BHU$-IB
XMF`%"'ONQ]U)7?M4AGAL=#F%9@VYXR-$54X#%!ALN@(`$:&4P)T>/8)4%`D6^2
XMO?&73V*PH20(=]BHI4(`.C0@"$Z4<8>890;J$&ASD"3II(-6:&E"1C1$1J67&
XM7MK"IRV0Y,0;S+71V9P@R!"#="#$D`,..70J:U9!((C&1CJ`,(1UU+U81!53A
XM4$&2"B`$L9"B(,#FAEY-7CC'&'A!>.L==P9UQT9K1`KJMMQVZ^VWW)*44!)E;
XMFF%3@B`D(=1#;:C5&:MSZ"D14A&J-0:09#YTD5YN`.7;9@^QE8<"%XU11W!NX
XMT('4>$SJ^:1F9+1)Q40DZE:'7TW29^Y93*)!K[IB`%6G=6LE"Y0"=X!5IKK3R
XMY?50DPU*MU3'?@W!A+KZ\0760D.Q2EEP_S4TAE_]#FDPP@I3YA]2"KS&!J!AY
XMB.5:&MOUZ1>]$N'YLU\HU'$&&B&`P,1/V2:;!HI[ED'Q76ED%,8998200IOJW
XM$O&$`E0@4=@2'=,K,`CWMI'O?[=J]Q"$FK%A1@O>P<<64FFU*:;@;UQDYX]G'
XMR`%<<'+,P0+!>F)9!PA@<1?<#^*JMB9TM:&!KKISA!$;H!X'I:['+[^A8+S)_
XMED''"14%CK&>;KF0^D$3^]606VF\=N>%8]T1=<.DA\%<R56XD08>+<"&=DP/%
XM!3ZX?[/5%H;$%"O@<47+RNGD9F7&!0=\+CNIUN026GZU3+=;?S4;TI,/H"QS]
XMH;(\)&5Y,)X4S*(A.K`A#PI2UX7&$!N2S<MVU3L@`9=",@WMYVL+>@CL%":'G
XM*>WI#9G;'(<44#P0)`\Z8=%.4/!D+HZ8P2=+\I@=.+26U=$G>]L[`<]D`H?<+
XMB$<,5&->6!0D!@0I0"(?1(."W$(ZSV2(75<S65!0(+``*@B(>!"B9?RROI)]$
XM)BAOL)(9N$*'.D2'=FU#@P+Z%3(RJ*5],_-26"2'K\I-"'@>6I98*G('S[!AP
XM;L<[2!*L)#HFY2%#(#@!^(08*(GD*6M@6DM0G*:@C0#*1H#R22:/HKG@'*<B]
XM&T$9*,=R@A^<0$&B.\'JX!84C;UA3:#AH;+TPL7Y^00/:6B04AZ8`AVD+E,R1
XM08%'0"*2F8!@@0;K7!JNIYFN?,5#:J1:6%PB)CCD`2]?"\JNR-`K(?PJ6,YTT
XM0A*&4`2(&$%S;AC:2!10A=C!+5?@FTE-;@(9'L3+C4,C2U&*@Y3C-"61DE':Q
XM98S)*82T(`RY`@%NC(0DM,!!DSSK'!K'$$T-#:VA!VG!&"(ZT2/=Z0S]LM,8;
XMHD8A2^THHD/P&)B&1Q;>R$$M^N'/ICPUAXA.P:)K@<M/RC2]>)ER(IFDX7X<$
XM`M*9V(&D[XG/?[CBE1O)#`Z1,DB-V$"&E<J!##T%P0\@\K>O=.5<2TF!@D8`;
XMD7XMRTQ3E9/SMC:'YP0(!,3B(FLP>0;14$%/80A9":=J32DZ$I)3D0(36C"$U
XM1*9K#A3MX=,N.%7%,>X[V_G-7?(PUB"()4(%G5D:%W*N*<YP#FT2`H*NY+O/7
XMJ2M0JPL#&0)V+&KQ%;62(M84\I"P,.!!`=]*70M<N+,0*32K+YF"GFI()PZN.
XMQ4X,N9YQ1\30ESS4F*-I`E<NTS=KJ:QD#/'3G2J24X<H*)_[@JQ)I1.B$((`2
XM11A"Y6!&4\VJ\I`_E'D:%<M8WZ^0S&DTJ^E9-I(7U!(73Q3AE![-H)T[,7(_!
XM[^V7;6L7X-\`K9%<(JQ],TF;<+Y/(SKE5$/BNA3G[6;`>-DCHIY`A2+D*FNH9
XMS%&9\!0&!`%I82M=DUHT,T,S<*J1>BR9<02#/K^4)6K^06"ZUM4Q!,,EF/`IU
XM0ZZJ=*4LC2;(8QDR4YI;ID:N-++#?%K*?%>G`#-$H_4!V@4Y!=NGA6%^5!UOA
XM@,=8Y=%E^#,GXF'.X-HO.K1I-0\1'9OWP]7(>@]C.\-<*:G'WHMBC6)_>4-#8
XMT'4MP]49==8=*:>$H)8+F4N&Y]74)U=7FY3ZQ4^!X<A*-3-%%Y3!>)W*IQK0I
XM`(,7AX4.;*;:T\I@HYD)\YI'NK4043#:>[E1,W)3T`FH(&QEM_BGKW0O[RP#%
XMZ\74R)+T$>E"MM,ARW32#0^,I%*D0TE=?[B\$=/22SDU,1JRT8W*JTA8,D1!]
XMIZEEP0T>\;/P,AD#)R$H#4+19X=`!.KUA5/H%O!FT4=C7-YA/GJZR'^`1&8>G
XM9FQG%O8+NCD5!C,<IUK5JTAG-`3B9.[9.\")LH(LXAG?\=`M<P.!$3S9D$(-*
XM[7-7_E*'J%C)&V6;O-P&'*$?\B,RU"&@8X%-4L0[!S4];=]I$-*:1]-AU[$<3
XMU?^;[,YJ1S(7F$LZJ.F83[Q6N*"(CB,>^ZI0YK"&:F?E"#^A$O2FJ-X9T@'39
XM"FG!4]D-::5RY.S=R4,9`!GEJ,$[;/^.$`?#39<Y.$Z`]!D-IT[,-KU0$4_/D
XM8HOV,MGS!=W)(0U<F']&O)$"4H^6".'XC*&'S0!/I,155<MHZ=/X-6C8OP_1W
XM:\#8P+LF_>AZG*+LY0EIR"'Q,&7T:F3C["(WMSNTIWS'$YUS-C3RBKI)C5Z+O
XMQV<6^80@O&=!R7C)R<#$1T9-Y[3[V']D1]LU4FN78@D9<]J4!0@?)->KBTM98
XMPOT&,:C!+MW59#&F4')F0#K%%M8"2MDV%MXW&F/$1*LE099A4IAD>[QS5_US?
XM/6-Q!G$'0TA6+IYT06W2@(LQ!5!21)I19U"3,-1S!WBA%"4#=5)'81>"=6+A?
XM0SOC=5%#!V''*?X!>&FG+Q1A>Q&Q,Q4T%GC29Q'2$)RQ6N-$'<!#?TND>B(C[
XM6LL2<_4W.E@62?FT(R`P:[4&`CH(=D,A1'=55$,55")V6N,'2Q!6@[ZC/)LDG
XM$XV$9W#0)D^P!*FU6O*#@G[12-+#@B`0?!'7<C"89:'%%"ZPB#+G22@7)'ZB)
XM(`!&'RX@!F'0=L2E(6XX.CKD%_<W&DU"?1IW?7J2?1WW<5QQ31C14?$DAR!`?
XM2P8V,4@!2,@7%"28%3^'(P287GA8)B`R/[GA%F6P.R>8&XA&+V+0:67P:6R0C
XM(-\G$XU6$4'`!%<0!%DP!4$U<4M#(D$!/D)U5!PBB=!8C)H1?",C9VRABPP33
XMBAL14%34)/>2,`UQ,6VR54^#80#D(/.!5&M`B"`09#"FCDGV77BV!GKF28B8Q
XM:FXP5A((9OR8+OC')B"@7$L&'LO(?9`6+VR`(.-A/%@Q7"_T3U[A%ZC!*:/R5
XM+Q:D)RXHC":328%5(-WU9ZS!<CL44.+79D.B('%"<K>X)65R`N=7:B=`,G2&2
XM`F"H`PI"!F90:PK2+JB!E%^(!C*@`[`A!CI)!V.PB"X0<^U&2+K&*1!"'S[AJ
XM+Y27%N+X$/F$DWT1/U\F6=6B&W6!8@6F>@\1%W,1EY6'6Q^9B7^1B/.U&(G7F
XM(.Z21>(!B41C'W"5D`;%<!6A92#H<)$R&N5C&[@Q!Y3$:VH7C\PACY81?S`)8
XM8[G"5G<U5AEF$T,S&=;A?`JA+J_!.[]700%&++#558>2,G&$CO_!6Y:1!Q+B]
XM)7L!`B/P`VU23RV%B\4E2"IHD6O$$2C01%L$`G8E$WSP7$3C+X(W0X:)-*F9#
XM+CXV&HV41DI1)@`)%BDX1I[3.P#G%VL@81,7@.JRGJ#A8-5"BQLA$1PW6Q8'_
XM%FT0<T@P/0)#9Y]YCCO)$7KT,CO#5F:E.=7!$3W'*495<9GD&2DX+S_I2F-%Z
XMD4H6,GW!H`H(:7TF>@M9+*SA19PB06910;GS'Y0Q!K;7)%3T)0&5!"?P$(=6$
XM+T(G.'?5))WXEISB..Y(5#,Y4@H7.6+C.X"4)."%+(\89:AD)8[)*;^&5&=09
XM7:,1!C^0$2'5`LD16&[#46O155K94&$P`F*`I9^RI6Y3IFLA!FH:6&R:E8LHJ
XMIL'I`AEQI@=Q/FX3.TI)IVNQ%'0:IA6B`BY0$5F:'.V".8,JAN3U$RZ`C2A`3
XM9=HV7?ZAA&W$%$3I!O.4%5DX567`D++T=$#5>7V1@DOJ)R(7@2>P)'%0!RP9Z
XMCPQQ(2PX=2_1+GVID*"%E5(*'07"A*,F9M@B=')0%F<1;CLY8[ZX,]>B48.R"
XM:KS4&;"QDXH702=P/>-F0E2TJBPY%DA$!\TGHGG@14NV<5D1H.JG.?MW;RGX$
XMH'S5';QWC,?J%^:Y9&K@);B6%<X"+6G0&>GF$L:26(LU!*`UF/\(,1CU-UM#5
XM/2\Y6/V%!G3S/F:W'Y\Z1`::8&N$%/`VL,O88&-6+J*&)PVT%/E)DA@B$4U:P
XM9QQ1EC?E7FZA/O[)!D=F1Z\X32372/0A?H#H7`5YD'(0`KD%`D_P5MOA,U(*R
XM7.#2+:D#:`(82"*K&7+`')_E>"?J/&:%FAP!HZZ8A/X2.[,S8O2A)G"@``@S6
XM.BA`1Y6C%GB2(7*P1F<1-JIU&A,8%/BZHFF@!_#*$3(:6[,%<B.V+'B`:W(BL
XM'IU93/(YH!(K=(836?GT-^'E%U$:LK5J4*:E2OFG(;15%I5:)O=R(:U7`Q`QW
XM?"53C5+@(IE;!ES9=Q6!;_HU&#+X%M0#G]2RL85+0\O3="33>6Y!2-B2*P#6K
XM2#O:+,03*2X:3QNIN:R4!$8``J#K(E.P!$D`!2!0!$Y0<$7`!%-0!%IIAFV1D
XM@*NCA':X%P/JD0J@`RT@&LAK2&$S-B=2$37Z6CYQB$Y"11)B)Q2:?A@$163G`
XM9R(::*VEMY$R%O'R$Z5X*X,E/@$2-LEC)S@)(3]BB7TB>QO:$4L!N)>1E!A"S
XMN3QD&4^T,W%Q!G`C'2.R9,`!6II;A$[VFUGP!%70K6V[9&WY&B^K%IJW5!]%0
XM61OJ%SBYP($5;A`R%E>`+9T13S?RMPPS>Y#&8/%$@%QT:`K0!#8!2&,4<RL<.
XMD&IYB8Q[=#<2OS;\J[[K7CAY(1G2'^\Z1P=S*JU7%JMZ:Q6A+L+*:QH8,JM5\
XM/$=;6WWC!F73))-XG'J1,GKBM20#-%#F$]0*:00L$V<X6W.$+)(ZP>[5(`WQI
XM0`PU7$_8-HBR%">3$$?@1J/S(T2\$5'$)+?&0SF:@U_'@T.Q%O,#&RM%@(H&<
XM',`%`DJP78R5=J8*`G!'%QHR'%-`;\VC=6Q1QWL<3&'C!%5"!VKAF+?Z%3PT&
XM=I2Q+`JB!$/`L\,%!7D1K'X1!%\51SL$&[B<=G#0`I5D0AO<P<?5RD(@!T?GT
XM%TR`(6@['$'`!G#@,4SD.V&@(+:!HPJBE>Y5A7*P(V51!FO0/;YS2A`L39WI]
XMR3(C!\/A+'#`DA/1!JV,!!J2LDK`1VPZ'#.'=F<KK)7AF[)5DT96!K9QS9GD[
XM(S@D)$W4(:*Z,UZ8R(XU*PE1!&Z@!F^0!SQ+$IO:EIK!('^X'U7K->+\P1='_
XM8[,5'E2:$.8$+%1P$)$\!H,B`E"`0V2V&2*@`#@``\5B!VUB="\B:;I1,WE0@
XMPX,"`S8``V2-*.M4$*-A!%(0!%*!U@C!;!*9`S,``CE@`R!0UC(P`Y*2/.6)P
XMG'=V-IZA%O`H4W`#@6CT5D3\)_3B)SM(.$.7+#NH`/A%-?]Q,)S3*CF0`U:-'
XM`A9)02D(>(RL7XO*$4.06N=$!9F:%2A5!T`P-'@A'G0*LK!]0XL1$2D;D-,''
XM?N3[$K?T%4``-Q@A%RZ0.6;Q!BV`J#=4*=L!;PDC`ZTMVVD0VZ\=W<F]&)U![
XMKT#0(%59!RY06%'G&5['$0@QMM;I.QYH5E:3C:RY)"NYS'VE``$!W*?$_0(`/
XM`````````````````````````````````````````````````````````````
X%````_(,`_
X``
Xend
Xsize 6935
SHAR_EOF
echo "End of archive"
exit
-- 
Mail submissions (sources or binaries) to <amiga@cs.odu.edu>.
Mail comments to the moderator at <amiga-request@cs.odu.edu>.
Post requests for sources, and general discussion to comp.sys.amiga.