Path: utzoo!attcan!uunet!munnari.oz.au!bruce!cechew
From: cechew@bruce.cs.monash.OZ.AU (Earl Chew)
Newsgroups: comp.os.minix
Subject: shutdown -- sh-umount using sed
Message-ID: <2591@bruce.cs.monash.OZ.AU>
Date: 3 Jul 90 22:27:26 GMT
Organization: Monash Uni. Computer Science, Australia
Lines: 51

Here is a diff for sh-umount.sh which was posted as part of the recent shutdown
program. It relied on [g]awk to edit and reverse the list of mounted file
systems. I have altered it to provide exactly the same functionality (edit
*and* reverse) using sed, thus making it more useful for PC users who live with
poor man's awk (aka sed).

Earl

-------------------------------------------------------------------------------
begin 600 sh-umount.cdiff
M*BHJ('-H+75M;W5N="YS:`E4=64@2G5L("`S(#(Q.C0Y.C(U(#$Y.3`*+2TM
M('-H+75M;W5N=`E4=64@2G5L("`S(#(R.C0T.C`P(#$Y.3`**BHJ*BHJ*BHJ
M*BHJ*BHJ"BHJ*B`S+#(S("HJ*BH*("`C($UO=6YT(&5C:&]S("]E=&,O;71A
M8B!W:&EC:"!C;VYT86EN<R!L:6YE<R!O9B!T:&4@9F]R;0H@(",@/&1E=CX@
M:7,@;6]U;G1E9"!O;B`\9&ER/BP@86YD"B`@(R`\9&5V/B!I<R!R;V]T(&1E
M=FEC90HA(",@=&AE(&%W:R!S8W)I<'0@<V5L96-T<R!A;&P@;&EN97,@8V]N
M=&%I;FEN9R!T:&4@<W1R:6YG(")I<R!M;W5N=&5D(B!A;F0*("`C('!R;V1U
M8V5S(&$@<VAE;&P@<V-R:7!T('=H:6-H('5M;W5N=',@=&AE;2X@0F5C875S
M92!M;W5N="!A<'!E;F1S(&QI;F5S"B`@(R!T;R`O971C+VUT86(L(&1E=FEC
M97,@96%R;&EE<B!I;B!T:&4@;&ES="!M87D@=V5L;"!H879E(&QA=&5R(&1E
M=FEC97,*("`C(&UO=6YT960@;VX@=&AE;2`M('-O('=E('5M;W5N="!I;B!R
M979E<G-E(&]R9&5R(&]F(&%P<&5A<F%N8V4N"B`@(PHA(&1O:70]8"]E=&,O
M;6]U;G0@?`HA("]U<W(O;&]C86PO8FEN+V=A=VL@7`HA("="14=)3@D)>R!I
M(#T@,"!](%P*(2`O:7,@;6]U;G1E9"\)>R!A<EMI*RM=(#T@)#$@?2`@7`HA
M($5.1`D)>R!W:&EL92`H:2`A/2`P*2!P<FEN="`B+V5T8R]U;6]U;G0@(B!A
M<ELM+6E=(")<.R)])R`M8`HA(`HA(",@06X@86QT97)N871I=F4@<V-R:7!T
M(&EF('EO=2!C86XG="!G970@87=K("AO<B!B87=K('1O(&1O(&ET*2`M(&1O
M97-N)W0@<V]R=`HA("-D;VET/6`O971C+VUO=6YT('P*(2`C<V5D"2UE("<O
M7BXJ<F]O="!D979I8V4O9"<@7`HA(",)+64@)W,E7EPH+BI<*2!I<R!M;W5N
M=&5D+BHD)2]E=&,O=6UO=6YT(%PQ.R4G"B$@"B$@979A;"`D9&]I=`H@(&5X
M:70@,`HM+2T@,RPR,B`M+2TM"B`@(R!-;W5N="!E8VAO<R`O971C+VUT86(@
M=VAI8V@@8V]N=&%I;G,@;&EN97,@;V8@=&AE(&9O<FT*("`C(#QD978^(&ES
M(&UO=6YT960@;VX@/&1I<CXL(&%N9`H@(",@/&1E=CX@:7,@<F]O="!D979I
M8V4*(2`C('1H92!S960@<V-R:7!T('-E;&5C=',@86QL(&QI;F5S(&-O;G1A
M:6YI;F<@=&AE('-T<FEN9R`B:7,@;6]U;G1E9"(@86YD"B`@(R!P<F]D=6-E
M<R!A('-H96QL('-C<FEP="!W:&EC:"!U;6]U;G1S('1H96TN($)E8V%U<V4@
M;6]U;G0@87!P96YD<R!L:6YE<PH@(",@=&\@+V5T8R]M=&%B+"!D979I8V5S
M(&5A<FQI97(@:6X@=&AE(&QI<W0@;6%Y('=E;&P@:&%V92!L871E<B!D979I
M8V5S"B`@(R!M;W5N=&5D(&]N('1H96T@+2!S;R!W92!U;6]U;G0@:6X@<F5V
M97)S92!O<F1E<B!O9B!A<'!E87)A;F-E+@H@(",*(2!U;FUO=6YT/6`O971C
M+VUO=6YT('P@<V5D("UE("<O7BXJ<F]O="!D979I8V4O9`HA(',E7EPH+BI<
M*2!I<R!M;W5N=&5D+BHD)2]E=&,O=6UO=6YT(%PQ.R4*(2!'"B$@:`HA("1[
M"B$@9PHA('$*(2!]"B$@9"=@"B$@"B$@979A;"`D=6YM;W5N=`H@(&5X:70@
",`H@
`
end
-------------------------------------------------------------------------------
-- 
Earl Chew, Dept of Computer Science, Monash University, Australia 3168
ARPA: cechew%bruce.cs.monash.oz.au@uunet.uu.net  ACS : cechew@bruce.oz
----------------------------------------------------------------------