[comp.sys.ibm.pc] Keeping MSDOS environments full-size

bsrdp@daisy.warwick.ac.uk (Mr H Boothroyd) (06/09/88)

A recent query raised the problem of not being able to preserve big
environments for children. The rest of this file is a UUENCODED ARC of a
utility, ENV.COM, that I wrote for myself about 6 months ago.

ENV.COM is used
   to add up to 100 dummy variables to fill any unused space in the
     environment, so that the environment will be copied full-size when
     an application is called,
   to delete additional variables from the newly copied environment.

ENV.DOC illustrates the use of ENV.COM, and also illustrates how to
tackle the related problem that
  PATH has its results recorded in the environment,
  APPEND does not.

ENV.CMP is source of ENV.COM written as a DEBUG command file. It is
needed only if you wish to re-compile ENV.COM. To do so simply type

                             DEBUG < ENV.CMP

The ARC should show

Name          Length    Stowage    SF   Size now  Date       Time    CRC
============  ========  ========  ====  ========  =========  ======  ====
ENV.CMP           3987  Crunched   47%      2134  27 Jan 88  10:05a  9647
ENV.COM            768  Crunched   18%       636  27 Jan 88  10:06a  A718
ENV.DOC           5325  Crunched   48%      2774   9 Jun 88   1:36a  B369
        ====  ========            ====  ========
Total      3     10080             45%      5544


=====uudecode=====
begin 644 env.arc
M&@A%3E8N0TU0``0```3?5@@``#L0N5!'EI,/```,;D`4<6+%Q9`F4$"8>2,'
M1)@Y<\JT$<,F#P@Q%D$0*2*DRA$0/`02-(BP@8*`4.K(@?,FH@X0<,*0>5''
M34PR(.B@*0.BC!L[:>2\<=/&)QT0=]+H%&G%C9L>)@/ZM.-BS)LV)LV`B`$#
M!H@:74&,F6%2SA@\)F=T-6DRS-:U"G9PA6$2A)HV<$#(&$,W+M<9/7\Z)$-&
M3AF(=<F(`0$B;-@39<J<,"D7QHW`=N:DT5,F\>(3$"?[A9$#,YTW<#R#.$&'
MCNC*BZ?"H2-']0DX<%YSQ=GF#4Z9A0_/40T"A]?';=KHAC0`IDR:-F6JABLW
MAHR<A^FP2>.FLP(0BE?7O'FB<=_J.!2^J4EF>M^V6V7TA5EG#AKPP_W*B)$`
M$@$SW.%T6EY#/-%$$T$X081!!M;5FQT.X<'"%C'8T(6#;T!(QAPLA('6=V/@
MA11#OTE(H85UJ=%=?#%09MT8_?T7(`A*S0%"&V%PAUE00Q7E!AV)E3%&A!AJ
MR*&'=0$WHAPE3CC#A=]Q-R22WSV(7X<?WICADCB)8>*318K%!@LTU&4?&Q=)
M.`8;=4E)Y'<LY;5AF!22U@4+7M+)U0UW>IE``COHQ!,;/IVQE(X8T7&8GC#4
M<*>'?^X0T1E34>;&&W>`@$88=O`T%0B3OO"&&3:&<52=CNI0YY,@U$6HC62D
M,>%?4&H)X5FS6E:KE1ZR<%X,-=B@I6$@&`9'&:;F5VP9<*PXQQ@/B1'DD&>9
M">T<TGZG(D_`"LNH&'=6^QT90H*7!J,YW!EK788!J0!\,=SPJ[R@TL;=&3<^
MI&A#"S5DE!QYV#:0%3#$T$,88HQ!KAEGE'<<6PJX%8-QK?IE7(R=RI&&&1;-
M05L=8]"ADG>V,H;K?$J*.:%QM:K!$W,Q*-;?`#O$48=2-&IU:4XYLOG=JXS%
MFBL9M:8LM+@E1\B"?&;2T=YWQO+T;+0IOCQ`S&+,7//-1VWL$!MHSA'3&"2[
M*5:65IK+`@XM@LC&T\L>"^JUV=+HQI!GAPG"%BRSL&:DA+IAZ'VCYJ1Q<F7@
MY+'&@D\;]+E5;KGW;NJF$2E+<P14.(!R>"S6IK5%#N'7$\9:*T,@,!?&F$R+
MSAB%S#V*)B0&[&"854R"L'E0GA/:6AFA@_"VC:#*6B?1>HL!!PLQQ$`6B"*J
M_+Q=5L<P5O++Q\!<72'FI7(-*:ZXE6(NCL48&V^@YJIOV+9Y]^/NXZU\7:BK
MSOI\W3.V^H3*UXH^:MRZGK;$AS6]]2I>\TG;\1Z%-LGM#W8#J-6:QI"BZ,6,
M@GX)SZ6.\H8U-`V#<B'#D,J`!Z6PJPSN@A<9S."B%3I'<66PF5'2L+J*($4I
M]QE8P5C`%!C(@(<UH4,:T&2&.H"->S74"USL,B28B1")8-.+#<KVOD3QA$(W
MH($$163%R67Q3C,(0_BXM<+X720/BO(BF%RW/[7HZ8L=\IE=1!0S%KXK8DH\
MCWR\`B`W*&XS/"D<'`P3D1\%AC8!<QO<@*:V!4:JCS@)W.!TIQ4F(&$*>L/5
MNEQ'NAG`S5C.HIN9ZK`8M2%-*`U16]O`4RYS)4]"F]S!?F00(U`ARRSW$=2.
MA$(4HZBG(3BBPQC0D$D3<25=KMH08S0S-/\=YG&Y6J/=\*89RNQ'*\)+7U[Z
ME2\=120,N'1<\=:WH;J!4FJBA%-][H,T.*QSG.JTCRLYB:L\08U9/.E>^^"$
MFGG"I)_5Y&=>D*:&L^A!+S6PHUU6=$UKSB`&R[SE,'\9&+A9B9F;+)F7_-9`
M"/5J/N><&]6^,P=2IHFC=<'#,/&%4<B)90XOX94Q[33*Q?3*GB]]B9)Z903'
M42FG8A%1G?B$I13A308V$&,\[[,H@09-6>3"6T;-=DIF,>9!^V2E5%TZ!IB6
MK$[I8D%&)UA![R%5J;),:%W<*<^NKK6?^#$@+%V:,IYR+WI#9:`UDUJQ9:40
MCTCUCBRG.!B<="=3_THD4*VT)A;T%$1>'5[QFAFFC58U+UBM6U3]:26P5NZ$
M?W6+#(QC38J-1SILG"F?*BLADL4*0A0QXT\[VSRBKJZT0SIM)+4)133M<:WO
M=.M27_I6[\W)J3U1EHJ.FH,;E)4Q,A!#VV397#-V$8M:O&M>KALO+;(@C&/4
M"\*LB\8KQDN:O!J3&UV'7=E9<[SC*A=WX]4RAN(`A-%=9;L@)EJ^6),OJ6,`
M@I+@!!!`00I/.((4@G"@(NBM3F8(EXUVT)O?$(:0-N(F$X@PA1<PH0A3$$L-
ME06M*%K'*[3;`20Q(X:'\"0,?L2,9CC3VZU0+,7#%-(:0&"'U:4A5G2P2.$J
M_,M@AN^H9$M=[;RV01[[&"<NV)ZVHB>#,J"X=E%N#@EQ!A2WS"$//_(0"%``
MO(:,(`8I^._+%J!=_8V)7O[9`9/?<)2;@"#+X=4+&2Z3XBR#X`QT?@,(=%OC
M.BIY!W;&\Y3-2@:W])DY#HGQEMTERSVG;@$[(#2(DCA:/3;ZTCN8-`B>L(0Q
MEQD$(X!!FCFY/T]C,&EA0`.9FD@`2=$!QHW.G:C-()0VP$0H9Y!#&!#G/CKL
MAS*I>\!`B#!J(X!@P`4^<((7W&#^ZL7*!I1U:2!1`$0S[BA?#C,>(HV32>N-
M#!)2RWRX<Q2]K#)M^UOE71C=Q`)86]V4P?>X%@,#M\``)R>8`IAOC8>7?.HF
M?-"MPW#2;[V4:=^K0<$04K"5'.`@/4C(`QM.$Q`AI$\G0LD#&7A8!3>D(6.:
M"3(E07`%<"9E#&L@@</\#;?PG"`E*VE)&5YB9UU.A4>]-&12EC(PISA98PA[
M%0M.T/!_VP9UY/+=BZ-8](#T&.D4>>9#2EH4`0G:8^`\RM!S2)""R1QB=S!)
M'"`&&@A%3E8N0T]-``,```3??`(``#L0SU`8IP`#```,Z7H%``"@3)DY<^C0
M@0,'$(`V;0#4<0,G#!F"PR`=\!#*`@!'V'88\%BG'A*0`PP,```$Y"(/*V,1
MF#8.R(=$'A($P'D@P*@"`8CY&!!@D8.>N`C*<Y7$51U]B1PL"/`DD0^=&1<4
M<6(%1HP>8<2,(5/&S!F,N0@*<."0CA2A#0($>(8+!(!^\US1(1+D5R``_/(&
M0<060%4?<1458`!"5(0`Q6S$[34A`*!\`^@@Z/7X<H$Z&%@=*<)8AQ$`X>S5
M88`+CL^XH![C6Q<@7\8!Z#P`D(,/W2$`_@S0L>QCN(XZ[8+/"0`+AJCAZ\3=
MY@=W9SY8/9:F>!;M6=5]1G5&CBN4J!$GK)9&L7(E4;9YIKYXR3(.1AUWB?PE
M6I84@/9EA]SC0B@ZI8"-"P4\```2+N1@0$]R:&#`!T\$,0\I3[A@E4ZS+>#`
M3?@D"("#/65$@`NQ/.#">#LM<^%A6(72TRX.`&#//$"(<D$`Z,3QCP,?'C"'
M`.MH$-QP@!07P'$)*,><<\/YX\".=6R3T0.,./``CUGX@XXM_@RYC@0\P%%'
M`>@H\,\ZN)GR#RP`T,)$,R'0DH`N``Q`)RP!K!-/1A4HT,`4>;A!1QAXZ`!"
M&6[8`4)%9/`Q$:0-*$`""D.D`$(,.>"``PA(Y,$&'6^X`8(0;[Q!!QIRO)$'
M&2R`4(4;:=A1AAQSI$%''B"\808(5X0AQQUIC+$&"8)"48<<<+PQ1QF*0@K"
MJF4LVF@:K;K1!J-T@$#LJB!L984;IMHA;!IAL7$0"X*^(0<(9*E+1[5AL,%&
MN%R1"X*Y<J`KAKIS@!`&0G5L2\:T;X"0D+#=?HL&OEW%0$)&10`:"$5.5BY$
M3T,`!```!-_6"@``R1"2#&FSS10```Q%G%AQ0>3)D`8*$$ZITJ1)$"E9$/:`
M=``A%31E0)A)PR9CP(%#GC0!<2?,'))RTM"A4\:-QC=R0-29D_&.2C1I7+H0
M$H2*1HYE3M9Q0Z9,S"93"DX!,<.%#!@@$+YQ&<8E%I]CV$PMXP)$$CH@T)@$
M00>-G#(99P;5$36A`A"0!H1)`>(C""A!B,`=L)$-FY-ET[I12P;$'#AAQF3,
M218CB#%UY)QU`[:EG31RIK9I"18A7`AGY"0N8Z:.WSP@&,>@T4),'I8@Q&@=
ML^:DS;(@[(1)&49V4,^0*'R$$:-'[S%%S9P!+EP@#!G&Q2`GO?QM\.$SHD]7
M#MP"6Q!LX^H`/D`,7;M5G.#5>[;-&SM!ZSJ/P4*^E>?U7<35F+E-XXR02<89
M")9AIAEG]0$'`0ITO$$23F.@\1]J8L$'@ALPM1'&:;&AY=(8NZ541F&N@5!5
M6W!%$`8<<+"1!HATI#'58QNRD0)Y8YPG$`@\5/4:3FZ<0>!?9?@``AEI',9&
M&'F<%$9L(IIA6!Z4A8$'".WE5)0<+@#7@$6.(2;:9BS)X>19--+40DXTN3&'
M2FG`UZ5;'[D0TDAWP%1;;*C1(=H8.0DI1F)K-)99'6=(N)E[<J!VV9-BQ@C9
MDC&YQM))C`765H1A,/:&E%!,`<4)3A+U'X%N7):9&YM1!IA88,%QEF)%_>??
M4#&RD1I8&Q%5:EL%KMHJ6'=`*&&2IV[56!C$<J2K&`"&F,:(,L%1DAQD8$J5
M2PBMV.*+S,KX88U=`1<!0G7>&=98&((%;4MD!<528;=)^$9@,<%GIK@G?0H"
M4DIU]950-)%T4UN!^5<4'"UEBVJ,9[&!VHS%EH'OOR]F-L>G8(EUDH8YT=&I
M&]0^.<94;\[!$F5M)9<3G#/ZJZE:(/AK:7R,A3IJJ84%>Z"KY;I5Q11%@/"$
M$?;9*9)$D#B`T!48;6LBBR["*&YJ)X'HUXCU`?S$4B!*-JU0UN[FL,^L<F:;
ML6U-)?&Z%JHQ4V48(BHA36<,"YB#:+S!1F&:ZL:;;VN_*&&%&;WK$DV=*8!"
M587!\<8<;\J&FLEOP#&QE)JJG%*0-/H5Z*G>5AWN5"D$K5#?<H#E[UDMW)%2
MC*!KJD)<6IWQXNT#U"REUU/4IZG;J)74IX-A-]I6'65C^RO:P_I^ZIMZ9,1X
M:BZ%Y(0121SAPA19+%6BIB^4P=8<MT78MI3`33`%$D4PP40//)"1$GP^\(!8
M63[<Z9`31%#:2,JG`S=`@@`(H4D9VK"W#I'%02JK@QFDI!*-F(8-(0`!""["
M+*P]J(/I$LF1WA"4.2&D"F[H".5`D(<W1.8QD9D,W53U,[`@:T-G"0,94%,:
MO]2GA76@T>+0<BK2F*$,8VB<OT(X$GVAI@PFX0AJ&(.D68'%/;4:7Q[@,+KV
M$8T*[;/+>KQ8!#!:9P+H44]>R.B3KD#"`PA)@DN,B$0;VO`D;VI#BRY'E3HT
M2$/SRHU1WA0S,[#1/C"`@7:2PYSP$"`\!AB/`N18,VP9Y8$CW-5)U/`&,>QJ
M70WTTVAB0ZC4;$UW,0)D&=YFAMT8RH6):LNB8'*\GYA*4]`;4%DZ:!._.#!Y
MTRH,\Z[EL!*=J%M4`U>,IB(PL`3&)56LX]M&I))7=3"7+,/;L%0W29D4C(G8
M,Y$OVX":0=%!?7V)C]Q4UB$SP"0CD`/!.L$2!C.4Z50@XY8"2J?,JVGM+UVY
M2$;<Z9<WV*1V9B%B5=K%+&J9031Y4QL(=&<A32'D#"TQRH924Y0P",PEFGIH
M&"+J*J]X,R,\`(&1&H0]),$H(T7IR#+=)#T-<3(F")'-&VC3+RF=K`T:\M6#
M)@=3BW7J+R9"4[NPM,HRZ(9E+"T+LMI5AOK$$R$=T>'H3J85FJ)`!W1Q9TPP
M)`<-Z0IXCWD#4`?D(I+-@9L:C$%7@E`%*CRA"%@HPA!VTA//`*<`/"C";MX6
MJ9Y.3V2M:P'SL.1"VA4).`;`"Q60`((AZ(`+2MF!93'[-2X\X0I.L.L3F#`%
MS5Y6*5P0+6E-RP4A),$)._BK#L9P63$PYF158I,X=:4I<Z(3*"<1:^C:*B1^
M6@UED!5C7E`$"<`.H4:&M2E,-C@%*4SM6\?UJG#+@(<PZ+$C=QF":J>0`A\D
M=T?I&:-U`"L%>4DO#'XD(1Z0Z`)SFM<M<"G`5SRXL<V`P#V400,><Z(8D[))
M9%L#'$YX9B)G.B:5&?'77V55!C&-3JHGH:I)0>2&$X"E/0N$5DPJ=C$,DV0L
MC#G+85"6D;^R-(>\%4T=-%3)!UD,(S&I8$F<),^YM:!!K2E#"^90SZ**C"/A
M_.N!:W1AQRSI4F"!@GB?,-HI9!`AG@&!#.;JA"`<00I!:`)??=*"E\3D"D^0
M`A%(92(WC'1,MMP26TQ\0ZHD,[O,+<!#U?H@PUFP=3B^KNEFFK6%WNN7-1I1
M,R^$%@4;A33OS#/Q_AN&-60D,WP6;C5724$*WM%W1SQ+89[40XD-F0X2/&)A
M_HI-.L"UN3PXV1S(]**P0!%)09K#??.;1O7F5[)(Z,%FT:SFV*XW"%"`0D"(
M(.S+$IL(?TT"TII;@A@`H0<]`$)EG9UF(G`A"%W^<IBCC30G/,$GU;YVMK?-
MA6=_.]Q@'DFUL8Q?IG1E"4600A.20(4QU\=$8GA/3=A6&D!?TKBGHRF'.V15
M4W$,7G_=356'R[4VTXMM^(*T4AO=0,2L<)AF,U%LTB"DEL!20JQ.E8'21IE7
M%T"@:*JSB<B`I)EN5%:=[(A_6`JM(T&1#<TJ2U>:D+')<0P$';%GGI&M;`#6
MS(_2PZ7*A34@S]4AB9'A"@BFX*`-E>7D/C\R4B6\WOT)V#`6X]-=>D)9B9LH
MOH`$%X=4W"!1F\B>![<S=A.>YW\*+TS,.OOU2L3T92<U(TNE^SN%F<*@G$0%
M25!!)O_:WQN/KC>-M557N&[27BGXFDYDM,IZ`UZ$SS3/)!O1'-A";[@HX,5(
MA$EAJGG=AIVZH1:/ER]I'R&.V*\E";+.ZQU$89K(H:*.\9;M1P\;?]'>H"X1
MTX#BJ?B8N[HMT09I\MW`4$*;E,(K^SQ8\*UO?H\Y]^3?=[_Q6K2%4YYAE3:S
MK6C"!OB<I/6PEC6MQV!K'1IEUP>D`Q$#1073.8A18'=0!B=@(8HS47'2$G_5
M:VMD'8]4?$9A(4\R*[(G/<7202X4$]+',JGG,#.!263@()I&!W_U14;#!$10
M>`#4`R4`@T10`L!1@2IV@?#$5">#+1P(*R11$\[":"7C!JC1>W\S&2;H(//$
M7(^D0=`B5AD1&!023X-"&Y@T$RM81B!`@SU`@^R6?OS&6JX%6S>H`R?X2<+U
M@?1G?WT&7@DH1'\U@\FV;#:X7L#6;*WU6JPEAE3`6IFU6:@U7H#869\56E2V
M6IME;'#Q2!$T0:A"0RP'%H<Q2K=E$C61$8CS&#B1A!"X7LJE%Y!@`F?(&9>D
M*?DD:/TT%7^U67[(!7X(`M4FBS(@BS,@BS1PAA4R.F>!:G)`,H6Q9SN7?'>6
M</6A(9;&6'P656FP0]42@>BE1M!&@0(H+Y'&$GC`*T`!`F877-/U@=PH<2R#
M`C\55)$3>+8QA#UWAAH$7W\4+O^$&M5'+26"5A6C?<CB6Q*23K:4)!@Q!S>R
M7B4P6B]8AP!TAXVH`T7@<%+BA^?W.+>$8QJGB5982BP5@G00D`C1`DV#+@R9
(-`5Q$&X!&@!T
`
end

-----------------------
Hylton Boothroyd         Janet:  h.boothroyd@uk.ac.warwick.cu
Warwick Business School  Darpa:  h.boothroyd%cu.warwick.ac.uk@cunyvm.cuny.edu
University of Warwick    Uucp:   h.boothroyd%sol@warwick.uucp
COVENTRY                 Earn/Bitnet: <Janet address>@UKACRL
England  CV4 7AL         Phone:  +44 203 523523  Extension 2428
-----------------------