[comp.binaries.ibm.pc] v05i015: appenv, append text to env. variables

mlord@uunet.UU.NET (Mark Lord) (10/04/89)

Checksum: 3867078299  (Verify with "brik -cv")
Posting-number: Volume 05, Issue 015
Submitted-by: bnr-rsc!mlord@uunet.UU.NET (Mark Lord)
Archive-name: appenv/appenv.uue

APPENV is a utility I wrote to help the many users I see pleading for a
way to have a DOS PATH longer than ~122 characters.  It allows
appending data to the existing definition of any DOS environment
variable, including PATH.  Works under DOS 3.3 and 4.01, but not 3.20.

Source for Turbo-C 2.0 is included, along with a compiled .COM and
a .DOC user's guide.  Enjoy.

-Mark Lord   utgpu!bnr-vpa!bnr-fos!mlord%bnr-public


[
Checksums obtained with the 4.3BSD "sum" or System V "sum -r" command.

checksum     size (bytes)  file (between BEGIN--cut and END--cut lines)
   22076         9745      appenv.uue

checksum     size (bytes)  file
   24501         7051      appenv.zoo

-- R.D.
]

appenv part01/01
BEGIN--cut here--cut here
begin 644 appenv.zoo
M6D]/(#(N,#`@07)C:&EV92X:``#<I\3]*@```-;___\"``$````````!W*?$
M_0(!H0H``'$````)$VRU8YG/%```,`H```$```````````!A<'!E;G8N8P``
M````"@!_33H`````````````0"DC*```7ZAHH`"$"A`@@D"!4L2)%1`M$BXL
MXX8,"#IO0#2TDD;.&S=M*-)!V**%#!<P2B(<\@9.'CEISJ`9B6),"A!-PLA9
M`X+)&SED6("(D0-'#H(&D1X$8:1,&38@S,AQ>C'CF)9YA-:94P9$F(HO?H)H
M\X9,&C-Y+J)),R>JV*]IW7QL<;5-2#ECTH1AHQ0AG#IRX+SABF)."A<(H;`I
M$X8KB#5.X:AE"^*J2Y@R1Z)A3*:,'!!IW("`PR;,F#(NE/8%P;(-G#2+)[>M
M4]$S""I)G&096_8IB#=F;@,6\Z;%$!`G87BMJ)8BB*U=BV`I(D-([JJKK[JQ
MXWDDG<T@ILZIPX9.Z#,@7$@O4M5K^B%/FD2%C5KI"X($1X0>PZ9.9Q`\D#&8
M"VCXD-]^_?W'PQATY`$':@7BI\`8:.@$PF9LP$%'&7B,M$47(/2`E`A<R,&%
M&PHQY!!)$4D$!4468:210QU]%)(;(T'4HA6>S9'&1\BAI%Q--Q%E%`ABI)73
M3CW]1$:))YY(XHA4K-5676U\9=%>;+QQ1UMAP/%@1>>!0$88=(31WG==P?A;
M<%^!P"%;YKF!GIS;U0B22%"Z,65!(MBADUYB+";4>!1ZU18405"!!&(((53%
M'&&<488.D2*4XD8`"BJ'#ST$B&88/O3Y)P@B7+'95`CQX*D/H+7%)@ANA!'2
MF\WA:8>>-X[D*:&&(J1EJV>F"2ME;)K*Q8B"]M>5C&)TU9B/9[A11HP9I4$'
MI"`D$9RK.L$J8!EMR3727E.%049:<\Y!AU#:@G`';%!%J^R(8Z2[H47S?N=>
MLW5T!1R`Q9(JU&]LRC&O8Z(:*R^]2$HK)HS7KKG9O8".`=A4.((`L,#?O@JI
MM[1FU#"IL8)P1AK<N2$4FZ*!^^G#;-3;IAR-78LQJE*]T4:N%.WJT9XX<DMR
MPEU19BZ>;]0ADZZ\B@3"''"8UM5B9HQDQD\[BW"R#P?'.V_-$5\D!VUCH%GQ
ML&I&6P8<(=!L\]1-UV81D+-2S1AD<KC0)PDB[""A'6^D81&&DJ&0`D%[()5I
MI`*!\$0==/SE'7B(7\3AN<S-.5*_:&@DA11/2,%$$584P40/)QETGP*./_Z<
M&S^*)D411TP17AEGS"%X0;+OWCN!+H01>@\@Y/![\,+/X0(>+I"!1XA,0?'%
M$T88`0(*)B"^88<I+!]\:'0(V!;W4_4NE`GI&R:^[)YO+T/X!/4Q>.$691G:
M]HLKT#CPLB/?U-*@AS*\[W&TH9:U+`('J@G%#!92`1U<<\!,4<A"$/R,"H+V
MP`B6H8,:A(-0/"6&.IAA"S&`@0QHT`6AJ,`.OXO=XR+WA09*AC)-^PP4I@`%
M2!GA#37S4JY$4#6.T4$$(&!#:-;0%C&89@TR#!YMS`.5.W3%#*'9$@AV"`6W
M?`8^36A"$)Q`!!>`42AW6$NB*C2'*,I.3464FA+=P)/OH&DTA<,1F$:B+:ZP
MP0R(4<'KW.@7JE&OAE2K8*322)_MV1`$(4">"E`P0<D@KPE+^((1H(`"&[)`
M!O-+0?^8Q[Q'2K*2,03@#`_B!"%:ZG+2(@,9Q-.6@8%1C&0T8WQ.T):@1:UC
MA7K#&*"HRN#U[&=]W"(/`SG(8D8J:-3#I"8Y.<D$QF2!48E@"J2YR4XZD`8T
M2`$+8$`_V#D3(9$[0AE@B:0N#7.`!8R*1WXVJR8,00CR4F/HTF"7:^EE0VS(
M`R$S!8>IG.9:L@*/+X?6JW8*<PV0JA)E*`-'G50*9W`(W56FR(*!+E*?8]G*
M2*(5TO*D@31IJ%B2AF*#]KS2/4G:4&7JMBW728AY/HHG\F+0TH-,4H`9-,A-
MN,G)37YA"KA#0=!2T((8L&`&Y1QHY(3PQ/;D\#=W$`T7O7*&,(0&C:L2&&!F
M:I=AS;$,'O6+14.R(3F`B57N^LFU7N:9-H1&;199J9K2)@>85*HK4Z$#8-S`
MS)L&SY(XR60W$2G"&,@@!U$])P@BEX1JR36)G"D3U:QV/J2E;"MUX%):/B*P
MSY!E*N),ZW(LLC+NY`HZGYF#S[J2N;,TAU5*>\-WRO04QR"ML.9D'B-C@P(5
M6!)Y)P#!"6ZR@A7`09$(L2T*BGM<Y99HN2#@`Q^V9]P0(;<'R[U)YA272N9%
MKI5WH-NMZ`"38::EB#ZR4WLVAS,&Y>I782A45VIU*RVIM@QQ""U4%`@:'&6$
MA";\$+PL"Q/Y;O8T35RG%9TS*_ZB5;*1&M:L`"S@`59K9,'Q;&[E%."]>-AE
M*F/9LS:C6MBJE[9/N:$;W,49X`[4#M2K284T>!,3(-@,T,UG(Z?;W4A:5P[8
M-8$)ME=<'",/(W68F!RHVUQ10O*[X57MXZ3[PBLK5[G,70$,!\IE'!OY!.`5
M;XSY%V05--?)UH7!"<H;O,A52:QM3>(;6A*Q+J67*SJA$+F\N!PYX8%.O,T3
M0T6B6OSJ%U=YL]5^):TH>=$V#*[=WX\_9&/)#K<KQ5TJ"/ZGY4Q%KC5QK,S&
MI`9-1\<&=![320E/V(5.DS)X74%>T(+,/#CK6)L@\+&L3<CKX'V:R1MLKG<-
M8H<J!WO)318EG6]MZH,<;3-IR1(=!!V4F;KD-VRPR,<*+*--MW"UI98=S,ST
ME'4F36OS!)JB;2022#TA80O[8+H?1Q;70E-&@A'@'2N\.:@MNF.NOC"UF;>U
MSQ"\0Z!I*YIJAZNKZD\T76J)K1<>*>F&X(4W^1_'J7WL)BM;DF6H<K%'SN4R
MC'+D,$=(R5%0DIRZ_-G<#=K)#9+R%=Q$NSF7]KY)N<'M4.\$7)#SRA_7!SFQ
M@2M#%^Y:B$OS%MB\Q]`N>K-]7D[FV2^X=;9V<.1BIE')JS%X:NO:LF:;#9=X
MP-=\V69$8T6O3$6UXQ'38"HFH\XL1J:S2CA8TY`H*Y[`M>CB3%H$9*W48!@A
M]UY5O@\U6WG]A"=3N;CS$'*%2[M61E-I@;IB!)Z$JW;@"F7.P#8\;Z)]3EO[
MI$,MPQUK9PE%PW,__<280_#TCCL,;/^,MC8>P.!0U\M(1W+(#3OR4V.%5I(6
M"H=-K,#;JY[VXR9?1H)&?([[^H(\#O:/EYZIDFN=>B]T=G,YJ".;3YOCYQ5B
MF,9D$6NEMV`6:Y/J0PP>((I[+P'3?0LW<S5'0#>G9,BF<RN`?G#@;&=V74('
M=LUW$$4P8X"Q8OHG-/36,9114"WA&0&E.7)@5[6R+P_S'021``D0*71P!U;Q
M$5RA,>;A6@7D$9LG2,S'<>>'7$DW9T.G`B4!33RH=#FX<)05''6',Z+1-",Q
M,`_6%;(5$FGD&=)"'-Q!>;2A16X#!U&'$%P18!1Q&NVQ%]WQ6ESA<!4R$E&X
M3FLA7Y2!17.`!GD@@-0F738'(,A#3J/6A;+3<-MSA\@S`SNP/0580.&S?(\7
M<[(C6UFX/390`^1$?HJ($'X7!FF!`C80B7S(<7+!B,Q!7INX<)5XB9#8=9/(
M=))X:_&#`C%@BB/W=5Y7/Q*B`0$!W*?$_0(!MQ8``.@*```)$W6UUH$<#P``
MSPL```$```````````!A<'!E;G8N8V]M````"@!_NY0`````````````0"DC
M*```&2ESD<B"-0&T8#0+L<B%``"+/+``X$C;J&0*&!DXIB"1AV$=78Q3<,Q`
M,P7__J&;$("8CV`*%AU;A"W7OS\F`O7`<:-.!A.+J@@`I*]''0B`S'W[9U(!
M(']9ZA!@>E*>JW%AAIC`4:".-4#-`-W+EL@!S%P!`$P;-V@8@D'C\'DLEE';
M"G6+?"AS$.@?``%S#OSZFT@OWV,<(,A!,<`',@=R1,0B,.W=D1WOY&089!@`
MG0.<'P.HXV`P!,QW#BSJMVY`.@`!%GT;H,WCMHX>OBD(Q7$%-D?`:"FYLO#+
MM'/Z'$E;=&[?#&`N'!DX^,O:@UR)5SR;I\K!/PO0'J#;,P#=&`*T`#334/!9
M1P?14%J@]N"?C5\H;?3*OTL!NG(`0($."`-$Y\%!Z&P!@'<62//`(NS0PH0B
M1@BP4"X.``")+G\HD,XA`'B`"P`U+.31*AD9T(H"N!!08@@>O9)B+"P6\*)'
MLZ18"XL&W.C!+2GFPB(`)0A4D2XV6!C"!\.(2&0Q%J"XT`<B$E`"E#).*6(!
M5UJ0HY:X&-`ED%,.4]))``"PS#"T`+'+0PL-DXL'&NK2B`(&(IC./[@,$"`Z
M2O@%0!40#L(.!,88$4\"N#"S0")&V-.($?!`,6FEZ&1A0!99X/*0@$0(D,4B
MY70Q#*'L!,*.!`18<05O'1GBSC[K+$",)_#L`]0!B<BZSR*6S(J+!0`D8HD\
M^_2:*TV."+/K#K[6D<TBGLSJR#"[3`34!<\9:T^RAM#SJR??+G'M+GX"]<-D
MQRUB`4>X!%*L)?Z`RP^M4QER[ZWWF@#(#R#0(0^_NO[;`!T*$.SO#T:5%\0_
MC=@"`#_K&``(#P$'8(3"!M-Q`<'_Z*NK(@=@(B`8FR)"``]&97-Q#W24Q\`_
M1AA#``#I4`+`K>(R8H@^R7J"SSX13[S.SD+O$_+0)I"\B#=&Z'!`'05</%HZ
M5M<QQ=&W#KWTR*I!C<@!"@!3!SM=%_R#9RD<_00=&J3]==,'\*QTN+J.778=
MXZ2]\&C9V&V",0<`L,X$;M/A@-TAB_MW'>\(_J]GKGWQ#\<_-%"':WT`4#3%
M!32^SQ-/&T&RX'J;O4[B<7MR;\C]GNZ)N**;,#8/FO<]NZZ$`_"/(^(*WOL"
M-ZWPBY_K;("+(@((N$`!G?+P9RP#9('."@7@(L.?IE3_1!WBX)*6@$,`D,47
M7I!J*JI6+&('`0O8PP<%@_B#A1T#^')%L3:8X8`BA$"#`S!AB74TX![>J-\(
M[J".DO@O)8LPQBB6P:*4',T+71#&0TX%H77$Q`/,@,\X_G$)ZX0BA/]P0`@7
MH+KO"(-!Q&"0,;SS/G30@A]9,%6:=@@`%SS"`&\H@`L8X8$X%(`?TN&(+P`!
M`!F0PP2L``(CBG$(:TQB$3:`R2",(0"T```0/L#(`.00`>F`9!'^B,4?9``,
MJXS##H"(QQ\,)0#Q`6``PQA`,$K@CW\L@A\KP(<<P,`<1@##$=A@!#2`$X4D
MS(,4;%2%([IQ"'D<8EK#6`0TAH".#``@-7(``CHD\,E\8(P.",`='5:6@#J@
M@XWK(`<+/R,$5>PM`$,P!#C8F(]Q5(`526"!".CP``*(@`=<J,,!+B:".@@`
MF/$;1CHN@<,!#,0112R`1_HSA`%L8Q'T@-`*UB$'<Y`J$2[8SS@<D`@[`&`0
MQ1"`#5A1-G#H@P[PZ)81>O@/$P1Q$6910!30<80`C`H?LR2!!SQP`&R"9`;V
MX,<C/[`(?!C`/G1!1PH",`AB"(`F!Q@%?EBXN72H@!_/L<D_$O&#M@C`*EOI
M"CT2<0`.LH,S(00!U>RXC@HLP@@$B$@(HS&.1%2Q/@8(X7..MCX(N6H1?@AJ
M$0PP"@R<YAAU0$!)K)JF=4!@$5*)B%43<0<"A&*L1#``^IK*CJ=&]:<&2$$!
M%E&#`=P#KD!(!`$2P0<!A,("5ZV#`1)A`\"N`P%H'(`?!NO,"!;@9D=;JTW;
M!]092*,$*0F$.-(D!0'1PWRC@D?]_B&5I6+@KQ!(1*A^2H"\[K6P$$#M8PT'
M``Q.EK66Q>P_-,M9`=T"M(L0;1]+"XR>$E8#J84M:UWK6,C6EJUNA1]I";!4
M+<BD``L@$C[\B`_.('<T![@".D+QCRRL0PA8M&H$9QF#103U&H,0!@IV(`PY
M).`*5D!'`\IK7A*X=P?'D(,#\AL-J/PCJ,:8K5<700<#[,`&5JW#,\0K@O)&
MUK:H8NTBJ!$(=<"&OH$91344L-0%E(2""```+BP(`+9JV`H&&(`!1CP(:4`$
M&8$(!FQJ#(`%2*,."M@!,^9@@$/,6`&U.K$"4KSB?S#5IO^HX2<LW&*;LC83
MG46'+/Q8CB?OD`E,8-\5/&"`13C!`"X(A2400-(1X`((%`$&4#S`!@"@0P<`
M,,$*Z`R`>VP#%S?H\SAV@`P[>&`%R$CSFF>PC6LU[0+C>%`\%H$,$^C@`G4`
M@#CRL0AGB",>BD;``3ZP5B(081A3B((4#/#F..^BSG13Z:-U(`PZY,/2F!;`
MIL>2!$`#(!*6O0>H1['F6*=DUK7.QQ2DX.N3_0,+6M@"KC_C@A2N>1W;.(`6
MLK`%FQH*`9/"AX#X8+YP0R'*%ZUA`MY)#`,<37V3';/[$/`/&ORCP>X+:E"Y
M\%$F!)4*9>9#3%#Y@0-482%=X`0GK$!F1WA!'_-^!`$>D5;W&8#B"*"X`RC.
M@$&0@0$!X&M'`)X(?R>"WWK]0(.A("`;[`,+%X9NOAE!`$8P00",H$+-N6``
M#$-H$5X@`"ZZ00-=D'('TYB#!NXQ#YJ0(PRH&$!6&3``<X0!%K8PQQ`4,0QS
M"$$1Q_"ZJ9Y.`GY8W=M1)6WV+!@""J$'(MBPQR&>X0`$T($!;D]/`<#AY`2L
MXP!YIZT.>0@`*M1!#F)X0PN&`((6@&`(;X!#'N20AC.@@0X@0,$84@""&.0`
M!S@`@1#>(`<VA,$-9`!!$MQ`!S:X``!$2(,=TD"&,H"@#'*0`^D;H(`@B,$-
MI&]#&-@``CCH_@QR"$,;`H;[-J3!#6&@0QK>X`;>$_[ZV,^^]@F?F.Y#8/O@
M#[_XQT_^\IO__.A/O_K7S_[P\SX(+"^"$ZP`@L8['@3PAT(94!^P-X!`_E:0
M!KKG!FVP?YAG?_5G!;@W!]/G!B`@`RX``S"0>9O7>9^7`R`@!GD``DT0!G*P
M!B#`!*1'!KRG`%2`!FDP!R`P!F_0!L+'?\/'!F]P!RH8!G``!_M'!L]W!B!`
M!M$7!OT7,&A@>SD(`F]@!B!P>K>'!RDH?6[`@[?G!K,W@`7(>KQG!QZ8!F$@
M!FQ0!BP``G-0!V.`!DFH@E`0!%2`!"Y0?VQ8!7,0!F=0!CK`AO67?P`(`CR`
MA7+@`SW``SY(!V'@`[QW!4,H![:'AWKH`R"0@D)H>]!7@$:(A'0PA%$XA=17
MA9BGAUK(A5Y8?Z>7>GCXAX&XB"HXB65PA<-7![9'!_XG!K87!G/`@&?@!F60
M>JRXB'2PAO67!$B8AQZHB&3P!F6@@L"'><-GB&%`!AM8!DPX!W3PA6F`>7>0
M!FQ`?*[(>V.`C'10BR`PC9.8A""`A6R@BI$8BC_H`U]HA*8H!],X![;GA^?8
MC=1HC:]X@SG(C;=HBMAX>(;(>N&8BK9WA(CXB[K(BR``?.8(B(K(B&<@>_OW
MA:;H@+ZXA_)8C1E(A,GGCB2H`&:@>\MGBI4H@)=H@+JH>I)8B+;'B,48A6]0
M!Y87DE1H@&`(!V$P!K;7A6:`>6:P>PH`CPJ9CM%8D?08,')0!VXP!M''C9\(
MCJY8!G`0`D)YD6#8DJC'C=37B#-9!F&P!KCG`KQ'`H0W`0(@``10``:``&A)
M`150`!/P'040`0*0$G(YEW-9`*%#EW@YE_4Q`G%9'W+9EO\PE@7P`'&9$H")
MER,PEXG9E@#P`P7@F(ZY0]^7)G18F2%PF9=9F9JYF0$`!)[YF:`9FF,YFJ0I
M`*'IF120FJI)`*S9FJ[YFJ]YFA@PF[2)EK9YF[B9FZ`)`NW7F[[YF[\)"P(@
MG+?P$,!YG.$7$-RGQ/T"`5,;``#^%@``"1,HMQ2LAP8``%4$```!````````
M````87!P96YV+F1O8P````H`?S-@`````````````$`I(R@``!LH"`(%2A$G
M5D"T`$$02ADW9$#0>0/BH)4T<MZX:?.0#@B%+62X@-%B(8@A;^#DD9/F#!J/
M*,:D`-$DC)PU()B\D4.&!8@8.7#D$"C02)DR;$"8D7-4(L4Q*?/XK#.G#(@P
M$%_L!-'F#9DT9O)(1)-FCM*M6,6ZT=@":AN.<L:D"<-&()PZ<N"\J8IB3@H7
M'Z&P*1.F*H@U1^&,+0L"JDJ6+CVB(4RFC!P0:=R`@,,FS)@R+H@.+&BQ,580
M8JQ2+1-Q(H@W=BR[M4IG,@@B3Z;\E'&C,1J;GNE8;OSF+58R`MEDMJJ\31HZ
M8>BDT0CBSF3-5>E(=W,&Q$,[&#5R=./1CLVY8@:;G5-G#)JK9J$$H8(DM`*!
M4_*0#X-'QT>&I"$$`@_FR>%##SR0$5T8/HCVWX/_)6'&@`7ZX!T>9=%A5F9C
M6?5=>!MUY%.""UIX1QIL))7:57#`\5!EK;TA$(00/F?6&'@Q11X(YK%1!V@?
M24BA31:2\4899JWE41D8SD&'3\]5AZ**5HW!5'2LS4CC?R?6=A6/=/WXVH0D
M0N>#??CI!UU__S54&H%$]N#@EA]10=:-Q;5QG)0I>B='85:A4(<;V<T$IX%*
M9=1&A]ZY`5Y&(9*'I@)/:,;D<S[59E414DCQA!1,%&%%$4Q@MEX9'KD&`V83
MEA&;''G4EEEWC+VQ!F`@"*FI0'.DH8=5;TRH('1.H695&"V^R-J%G[%FEJ:)
M-C4'')X=:QZ*8:1G%8>[*O`AI.,]R>BP89@JD1R#CH%E3U=!Q"BGGH(J*JGF
M9E=L#).Z*:"ZFJVX6HROO3H;H[CI%@-OO@$WAG"7N:4G1,DM!T)SST4WG6;6
M/01"=MMU]ZUX'8')4K;J;=S>>X6!(!]]DQ:!1QAM<`;LA*M)*:MF051!Q1-%
M8%'$$"X(,9\.<VZ,JLKS(='#&#IP(49F.S#-A9%S[$!&T[+.P4597(3QQ:MY
M<-%KBF&SH=$9U-:F)8LN.HHT?3U$W31KSUG=-!P9.;Q#&5C?F38:6VM]!JH=
M<V$V=Y:MC6S;=KRMM-U<T#$&Y'2007EA;>S=]'&&GYVX`O^!Y6=&<@P66U(Q
M>.<>144X"F*XYDY$T1QZIAC"[:+9R1C>2*7AG!LVB?5JK]0QML9:=VCFVAT[
MX31H99<U,47!(,S@P@P^I7P'4G4ID#(40U!/PTCX?H3$&]N_"J5'QB.OF1-/
M4%$L\S>!\/QPTE-OO0PPL"#0GK])TAL\DAJ-"<=)R[K?9=+R&DU=9G@7,TNP
M;I.;2>EN0V:!G_S*184I2`%74]@)K*XBAC?4(56V<<$0GM"$C?DJ4'-03F38
M(!;U/.LWFJ'!$E+@/P6(X828\<@=4G8ELGFG,&)QC9$PHQDJX*6$+0#:1RK%
ME;U(QB81^<H<UC"']?&I>TZ:DE*BE!G7E*M7W!E,8WR$0#GX9`X4@5:O?@4"
M(R')#2?PB)ZT,QS9<>5DD])`0`#<I\3]`@``````````````````````````
?``````````````````````````````````````#\@P``
`
end
END--cut here--cut here