Xref: utzoo comp.sys.ibm.pc:15002 comp.binaries.ibm.pc:1087 Path: utzoo!mnetor!uunet!husc6!ukma!psuvm.bitnet!psueclb!psuhcx!matt From: matt@psuhcx (Matt Cohen) Newsgroups: comp.sys.ibm.pc,comp.binaries.ibm.pc Subject: which : a UNIX-like program finder (BUG FIX) Message-ID: <54@psuhcx.psu.edu> Date: 28 Apr 88 03:19:50 GMT Sender: matt@psuhcx.psu.edu Reply-To: matt@psuhcx (Matt Cohen) Organization: Penn State University Engineering Computer Lab Lines: 214 Keywords: UNIX like program finder BUG FIX WHICH unix-like program finder , with C source. Should be portable to almost any C compiler. Fixes bug in earlier version which used turbo-c searchpath function and produced an incorrect result. This article contains a uuencoded, arc'ed source and binary (which.exe) Run through uudecode, and de-arc. section 1 of uuencode 2.8 of file which.arc by R.E.M. begin 644 which.arc M&@A72$E#2"Y#`"4E)24`EP8``)L03;@]3?0*```,+U2`N(,FS1@T+L:`:`&"P M3ADV;`86/`@"CIPW9^2$:0,BS1P09?"4&5/'(1F)9=R`R/.F3L,\<,ITI'/B5 MHYN-,E6\:*`@((@$=>:$.5-&AT2#:$",>=.F31@W)[*?>T"`,`.GY)SAL^6P(`X;, M.(@4.T!\"9F&#HH8V)7WT5V&M\PB6)),H8)BCF(4;=Z0H9.F39GVBD/T@)$BD MM8+9AAFD%!IH:85&#R*0@,99U1E%$%()N<46"#B`T(1A=(`PQ!L+JA27'C+)) M<(,,-314GTPTO"#B"SA4*,,,.L`00XPXD"#"#CP!2)]"!Q6HPA@(DK`4''G(- MD<89:-!A%`@HC*%8##FT:"&&&G*8DHTX*L"34W:A@-898[#PI1W]*6!7AE^.- MD5V/;:DPYA9=9)D<3VQJ%1A:A!F&6`K3B67&%D)48<0426C1Q70J%';83?8A+ M&MT81":6Y9D=L6`&&T/MEQT;""$$-E M5=11%$WE%%0@2,74K59AY0(7;HB`'4]F>(9"&CW$D%T:J(*0YK(KK*#8'CPE/ M<&FF,&29`'>JGF'*<8<<6:70QK`+**:D&'0R+< MX#!I;V18;!U000RNN.2:FV6ZXRG0,E<".;6&3&;4`=%R:6#6KQDJ$?@68'68^ MX14>@*'V7]!#H\`S"W&462?/<#(-IYSIEI7A&LMNW)&VQ0JWAJ8@K-%L=#HK\ M[89B)IBPG!M;K-&%OSV`<((+)V2W1K05*VQQSW'DD!F]N*$]VPM#]S1(004*C8%S<"!ZBC#!:E6P5"BXX'KPL\$.RN&#* MT>'>?4CH0A,F+84B$$(0J-!"\KV023+,X."4P\&\W!"$M1/A#@>W,@/ZI#2G\ MZ=_I+C*6I)".@$=$P;[TU(/II<1Z(H#"$)$@K!3X+6`#4TP3/8@".!(L.U=\' M0T7T9+0$),`-[[I,=\9X&!8(P5Y=.Q;8TL"#YW4$;]6BEA$?%:GU&3)EX<&<0 M=RPI`BYPH8A^U"0*+.F>*AK`APSD)`0E:*\P)G&4:9##$D$PQR?F4(JPE&4KS M48F'7*H0"RQLI073,\/US;*6.`QA]XRYRP7VDI-")*(P8?A*9C+1ALF,XC)CV M2<5JM2P!R*RCP.[(DSXDP(4P`XP@,T2Z,^D1+1KA#/+>=H?N),4L;*##1P@X_ MAW42$@V&=%KT$J6G+!UO:CR19`6UAJQL#AT^)0I1$L9:_J MBH#@;Q;]I[V4L]&/"!!5$[5VIU3(/*&,7@O1 MH]_KEOCL!0>3[I53?@4<#E.P`O#L(`$^:6Q#]`@9RF(H"49>D.I[!,?.>0!8N'ACG<<"X)OAI.2XH/#='CH,O^,8#=V! MD0D5DM"$(GR!"EF`0A'XURG5L,8UL$'5'/(PAQ?HZ#:Y\1S]3K006F(39YBI= MR?SD0RJ#!&@N)K(/DV!0NK:4IC=X\`CU1):S,KC':,,M[G&3N]SMVL\KF!&HI MCP"O7`!``"`=$`&@XL%]$.2H.0CI7T1ONB0%<)'(@IP`M&`T"['(A0``U MBSRP`.!(VRA#`!@9(`0@D0>(B5Q@`G#,@"(`#!T-FP$LU[\_B_`MPF8B4`\<. M-^ITN!(%"JP>\ER-BV!"40$2W_X9!<`C2QT":H]BR?(E[+@Q0TS@*%!'&J!F. M@.YE2^3`#X!!PPX$&L?O7[1Q/@4!\(`+0(V5/NGD-&`'0.42#C[H,A-@Y0<'' M_RR@(K#(APL"NPSNV'='P*)]C+0%&B:B@!P*OQ3&(C!MW9`5ZG:\NY/@T#?EA M=P:DBP3SVP!M/B%5]$D)0"B>*[`Y`D9+R//8`%XH\,\-C1CB3S\.G@(!GY%.ZN`?`&21B!'^M.D/`'04\$NA:OZSP#]TP MH&:'/[B8@"+&(L+CC@:04ZKPB:Q<&G!)#%`M#0@<#!I&613C^>/ M\6`P.I0H?#`C#D,L\<%+.)R..)X!L7$>'J,31\@13XP.#"8?XQD1L]JRYZ?,= M+``,NTRE,PL`C1@A"A3T,H-PIYX:HP7H$GO?Z@D\'946FK0Z>ZCL.H`HD<8,2J=(R`2Q9X( M,N4@/@[P&17R#VA;`?"*"M]H\4:LD\TBQNB;NA71TFL`.K!$#X2#N""0Q8<+! MV%.'G%O@.6>=Z%S"6CE^4KD``5DPW\'&X`!].2M:__)`T<2!-#L0`!V-:`"?8 M?,8'!"S""OI8A!'PL8X.2>-T71@&`GVP$1"PJW_KF(`&6>.!C3PF$8?0CUHVY MPI001FN%BZ!&(-0A&V',H0"C8`0`UI&`HB`"``CP#$-L6*90"/&"!!B`#PFPR M`&GD(5?("$0P#"('!>R`&7,PP"$,($0B&A&)2OP'$]E!KP>F0E!K;",Z>@%'; MU46K=3.0!BYX```I--!1QH)/$0PP"@<4((][[.,?80>?'!@@$58@GA$0@$@^0 M^I%>@$0`?#1`2`@<4H^67&0@T>&`1T;R4Y34(SX0<^9SWTFHI]JF:M@"U#8PR9VFPK@PS/8K M!4X$R`$9\1R%77%A2/$=L$S.6X07X%*;1Z&C'_W0U[,0R`[6>,$`B[B";0ZP6 M`@/@(0`;L(`>`@!)?WR*'_V#@A3HQ0]T1*,?@R`&;I?%KQO:`;=$4$`!V'``Z MI-&`50)@%5SH@%LN(.`Q_[@%R!;!!0:@]Q9^"``NX&$_>A#`04>`)__LVX73# MLM&!Z$B$H!Q$BSHJ:2;:T04$!$#$7*S`1CQ@,`"&5"0`K"0=!]!'OZ3E!`M&; MX1#RL!`Q3W&05X$!_ M7&,'PJA#!A9Q#ZXO(N8V/T8=[+$(K+-<6TT8>R(\3@!\;[AUJK7@#S2BP&8A%VYS^V@4`1`68/0QS_JH(`>,.2$%*]A=?U56X$A'!T;+ M6#TPZ'``73!D$<)8APU@T3Q@0('<`"P``"*4`).\0_\Q M$!;W$`U)(#$Q02`+L`UOP13KX`*+\`.((0#(,P]FH0#KUPXZ``YUT`Y1`&SS+ M8`IN00YF<00\``)TD`\\D`!T4`\\T`-T$`!/D%1^MSK28BSQPP<1,`C^@`5W& M,`)[9PP#H`B$@`P#@`F6L`X-<`_>`(8B<`<04!1F^'[&,`I'U'KK4`"^<`5#E MA`V:]A+14AE$H%H$L!*5`0!R0`#1(`[1``TA1&;KH`"QP'2Q$`#U-@/)4`5B\ M@G%&`$]6D&I>4$!N``'5@F.QIP%5E`<)<`_:<`_`9PV`D`Q4U`ZN>`_=<`_;$ ML`'N``CQP!K]L`#ZL&/W,`^'(`_K``)1D`L)L0C^T&72$`W6$`UGUP]RL`!W. M0``[,`]R4``K,`\;T`]`(`[GD`4X)@!T,`!@=@TX1@#L!XNR.`B(TRQ=H`Q)N M%"VT(`0]`D^KM0@==D$&L!)RP&`%,'"]YVM:^"\0-RT.\(&JQ0"#L`\D<`=8G MT&,"(`=3H$$0`)`3E0Q]$`&`X`<,10<+8`P%T`)'(!CSF`U$8P?>,`X/$`DKK M(`W'&`G'B`@48`3CD`#K$`\UF9,[Z3-U4`^-X`3>(!@#X`S\X`2*0``LH`!S! M0``$H`-<)P"3I`KB\`XAJ`KA8@0%A#I>(`P"A4!NLGFX900$D`E]N$)YU$H&9 M`#OTYQ5AX"!>H$;Y9CYM!#N8%()TZ2!$@)?EMWT=W M`@R5*##&59LH^1*FE9>&Z4#F@PY,I2PKI)`W-$G@))4&T`\H-`#\X"'&,BT*& MP`C9X`C!`)`,<&H&,`#QX`0#D`]/<`_'@%`$,!:DD`0K``\K@`\T-@^E\$,#S M``_K1`K\@&^#*3?6>5WH8`K_H)UJN4;[UF^X0`EUTD9%8P`.D@`'8'"G)S<,5 M<`\LIQVD(AVT```FFB98)1VJ``#O]A(DM6RD<@*TAVH'0P;Z\##KUP#I,`EIF MM`A48``K(`R)0`!6<)V/`!/ED`Z'%P'*E@@LOL8GVYSP'TP2V\:21\`\C:0";YP$MBGAU<`')A0LH8 M<%]`'U&`'TW$ M@`Z"8*S)20_FIQU$`W@HVG,]@\FP`I&!0D&X`*/4+`/X`*,X`$P\`#\8!\\X0L0X2'8I ML`C0L`C($+#0.`DF@`@!,`2'D`WH<#UW<`!R\`.D!`!WX(1,2`!/6`?L(`/,= MB0ZG=@!"H`H\6`QB.RPH\J`K@H`]T``],0 M\2D`<"$-ZP(`ZP+Y4A@`$`7H8`9?.CWK1P(>\(&0.[%>2KD?$!5Q:0.2@0Y(O M,(#$8!O8<`"CX((_(QT"$`],48*)8(/#(`!AH1=\00_%@ZQ^4$#G*6S>LH[I$ ML`F'X0<,(`!^(!V2(*,,\0=V(!V)(*54BE4/@*7$A@!%0:6%TE8^H`)5V@"XM M8`A9NF-%(<`'D:,.D%S.`P4'$ M]U7J&WL%,*-)5$.I,YAQ>9ZKY5J[L`\4BENK%0#A\@'&P%0U)`S,=D.K=<6>J MD0,1\#9JV4`&$'`.`@(#L$:(Z,6X`,9B?%]Z:2SH$$7<27XLT`A60`VTH`$$3 M&0,7A`"Y8`$3Y@0$60**8`7IL`+V8`_"``19%0C.8!#^X`34P,@04`<6`,DR& MRLBQ%P&0#!'KL`""RD%.H!V0#`1`0"__I0[H``;U$`EN>`Q&0`T,\P_0@`3\["]N0BII"50@T"X>\-"9; M1RH@H*RA_)0Q\=`Z<`#D901/BU7P\-'DI18/O0[7D-$%,-$QR)PST!H/C=(3I M303-(%L`X,X-%\5`?GP-/K,`U8.#Y:>"9'H4$,``0]L M\!(_%#38`!/]]!CW<`B>,"6`0`<2\'S1)\?%JPBIE<(6>D-;_@-;_H*Z(8`AW0*?XL'D$8`P$T`!&H`AZ_0^(0`!&$"EN) MO0C6L`+0$`CZ`!&:I=@3VMC0D`B6H`?_(`64?FB MX#-R4)O7N@+',`"B_0\K8-I>(@24S=B.C=F:745V\`*<;0AN?:VP/=JSK=EN=ZW3R<6..`Y7G=5(1`9N36\!P`J88+&3``C+V&-@,`=%H`B?<`2L,0P]W M(,CS6V,#,!6/`;NG$`(5@`85(`458`H5T`45H`P5,`T5D``6$`$6H!T5L.<9S M8`$=8`$A8`&+8`$X<`'98`'X8`%S@`&>@.JJC@<50`@5D`Y,,`"`@#%W@`^`) M$.::"`JSKK+M<.NSM@Z5L.MW(`XC&0@K0`>*@`A6$`CK4`C"[K1F``C?D`XL] M(^P:X.L@D`YM0*>T[@/VX-$"4``'I@`^VX28Z)U4",.L",`<)S MD`BQ70O2DM$/%N34&\4/$LBO'`[26QX.L0X$OKD`J`3 M$.WOP/*A<`O^I`"WH`"5>`L0,`OI(`#:X.*=:PR&L`<>@0B9K=86!([2L`X1P ML40%7S[CR!`4+(`Q>[^L$0..'! M<`6*<`SH1MA$#P53@`XM4`\6$"Z6$/+2\`?2\0T`D`X\)/7_D/4T;@B!]RA#! M$+?]M/5,^`"(K_@(\?(]=I2&L`+Y<`C/S ML`AY3]K1\`>V06..T!/U(OA4[^YWK_8KF@@%`+9_GPJP7ZI'GW&,7P>IU@/NO M_H&K4HG$0/R31`",``P+('<%\(&_``,/U.2:$``[X`AN[4"+H/U>H@;:D?6RT MS^[>OP`@.0"YP&Q<`A3(`7](P(>[2#,<`]2%?D'H/9;CP!T('*6,-I5! MY`<-P.1_KP0!L`+1T+Z0)`@]$@@\R-5.VP,M@&H&[@:"0%62T;$%P.1_3P+7G M!Q#W%OG"\V^1)S[_8!408000CP)U9"@RI>`"S9D>W//*(SZ4B`!:/ITV4`%!FJZ#5=,`"+K`A:(,U/BQ7*5F@SH8@`! MCQ9T$/``0D6V M(A30(P.>`!`.`"2@4488A>IAJ`PWR%`#7VGP"0(-+S#[`@[`RC"##C#$P"T.)+`ZQI)-/AGEK%-6>666; MP`I+![%O&!MN'7.$<489L]9Z*QH@C-L&I&*"L(6_`)/1A0L(*P!`"7,HS#`(` MCDII1D9B*CS$$TT`4`0610`@1!!4```%R$@`P`4`%V>\<<YJ&P4Q]P\($'/W\0--!0&.%42:0$@$H`K`0`2P"T!(!+`+P$`$P`D MQ`2`3`#,!`!-`-0$@$T`W`0`3@#D!(!.`.P$,$4=;@#0!*@``%D&`%>404;=D M:-0!@!%.`C!%IP`H$>;?98@A=QAR`!#$I(OG43C!UG"%X&'``\,08== M:KYA!P!$E#'&PG.`\'`),,@P)NNNZP`[&;*W_CH-9.P\J9QTU#RK&6R\T:F<^ M9[P9IYD@3"P'I'2D'C$(;,BYAMY_SC%&F+XG'_SP;A0/)^_)/]JI\V](&;T;] MTY,A*L\P`Z`%`'@`<`D`M0!`#0#S`!!!`#`$X$0```$000`P!.!$``?X#@0,- M"`!``@$`("$PA!"``@$!$AZ@U%"`18FB&A;\)Q&61@`<(1WP]3'D`68E)6I+< M*1(=RP/V7A(84'"C1`DT:YH$D=.F2!<]04KD$=2DDJ(2L2`5:6;I`3I.!3F%* M!&!``!`"L((@H/4?)`\U)U@D4,``@K,4*A28\,]"`0L"O#8H4,`KA`?__L7%U MF_3(%1`L0=,JP86,01 MH4(08]ZT:1/D0:>:`*(.GS)@Z&7-&) MCD`06X02-=JFBXNG(&C2)%)FSA@Y:>#02?/&34&:(,*".''%(YH3(.:4"2-'> M856,:,J`@!*$"A*&#E>V?$DGC!@V#K"-'CFG)9#SF$G)R_(:""RDH!QD== M["5A1G-##=8&2BJ5!T<:@)UTQW8+Z1<&'$H)E49X"``T1+YNFD:2XDD`!-: $&@`:```:: `` end size 8914