[comp.os.minix] newgrp command

Stefan.Schroer@cyber.urz.uni-wuppertal.dbp.de (04/19/91)

Hi all,

I have missed the newgrp facility in Minix (1.5). The shell
didn't seem to do it right. So I wrote an externel newgrp
command.
Hope you like it, any comments are welcome.

Enjoy,
-Stefan.

---------------------- nibble here ---------------------------
table
 !"#$%&'()*+,-./0123456789:;<=>?
@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_
begin 644 newgrp.c
M+RH@;F5W9W)P+F,**BH**BH@5F5R<VEO;CH),2XP," **BH**BH@075T:&]Rz
M.@E3=&5F86X@4V-H<F]E<B **BH)"3QS=&5F86XN<V-H<F]E<D!C>6)E<BYUy
M<GHN=6YI+7=U<'!E<G1A;"YD8G N9&4^"BHJ"BHJ(&QA<W0@8VAA;F=E.@DPx
M-"Y!<'(N,3DY,2!C<F5A=&5D"BHJ"BHJ(%1H:7,@<')O9W)A;2!I<R!R96QEw
M87-E9"!T;R!T:&4@<'5B;&EC(&1O;6%I;BX**BH@1F5E;"!F<F5E('1O(&-Ov
M<'D@;W(@;6]D:69Y(&ET+"!B=70@;VYL>2!I9B!Y;W4@;&5A=F4@"BHJ('1Hu
M:7,@96YT:7)E(&-O<'ER:6=H="!N;W1I8V4@86YD(&-O;6UE;G0@=6YC:&%Nt
M9V5D+@HJ+PHO*@H*3D%-10H*(" @(&YE=V=R<" @+2 @8VAA;F=E('1O(&%Ns
M;W1H97(@9W)O=7 *"E-93D]04TE3"@H@(" @;F5W9W)P(%MG<F]U<&YA;65=r
M"@I$15-#4DE05$E/3@H*(" @(%1H92!N97=G<G @8V]M;6%N9"!C:&%N9V5Sq
M('EO=7(@9W)O=7 @869F:6QI871I;VX@=&\*(" @('1H92!G<F]U<"!G:79Ep
M;B!A<R!A<F=U;65N="X@268@;F5W9W)P(&ES(&-A;&QE9" *(" @('=I=&AOo
M=70@86X@87)G=6UE;G0L('1H92!N97<@9W)O=7 @:7,@>6]U<B!D969A=6QTn
M"B @("!O;F4@87,@:70G<R!G:79E;B!I;B!T:&4@+V5T8R]P87-S=V0@9FELm
M92X*"DE.4U1!3$Q!5$E/3@H*(" @0V]M<&EL92!T:&ES('-O=7)C92!C;V1El
M('=I=&@@>6]U<B!#(&-O;7!I;&5R+"!M;W9E"B @('1H92!B:6YA<GD@=&\@k
M+W5S<B]B:6XO;F5W9W)P(&%N9"!C:&%N9V4@=&AE('!E<FUI<W-I;VYS"B @j
M(&)Y('-E='1I;F<@=&AE(%-%5%5)1"!B:70@*&-H;6]D(#0W-34@;F5W9W)Pi
M*0H@("!296UO=F4@=&AE("=N97=G<G G(&5N=')Y(&EN(&-O;6UA;F1S+W-Hh
M+W-H,RYC(&%N9 H@("!R96-O;7!I;&4@>6]U<B!S:&5L;"!T;V\N"@H@("!)g
M(&AA=F4@=W)I='1E;B!A;F0@8V]M<&EL960@=&AI<R!P<F]G<F%M('5S:6YGf
M($)R=6-E($5V86YS)R *(" @0D-#(#,X-B!C;VUP:6QE<BX@22!D;VXG="!Ke
M;F]W(&EF('1H:7,@<')O9W)A;2!W:6QL('=O<FL@"B @('=I=&@@86YY(&]Td
M:&5R($UI;FEX('9E<G-I;VXN"B @($UA>6)E('EO=2=R92!R:6=H="P@=&AIc
M;FMI;F<@=&AI<R!C;V1E(&-A;B!B92!W<FET=&5N(&EN(&$*(" @8F5T=&5Rb
M('=A>2X@270@=V%S(&IU<W0@:&%C:V5D(&)E='=E96X@,R!!32!A;F0@9&%Wa
M;B!A;F0*(" @=&AE(&1E<V-R:7!T:6]N(&YE961E9"!M=6-H(&UO<F4@=&EMz
M92!T:&%N('1H92!C;V1E(#LM*0H@("!*=7-T('1R>2!I="X@66]U(&AA=F4@y
M=&AE('-O=7)C92X*( HJ+PH*(VEN8VQU9&4@/'-T9&EO+F@^"B-I;F-L=61Ex
M(#QS>7,O='EP97,N:#X*(VEN8VQU9&4@/&=R<"YH/@HC:6YC;'5D92 \<'=Dw
M+F@^"@IU:61?="!O;&1?=6ED.PD)"2\J('1H92!U<V5R)W,@54E$("HO"@IIv
M;G0@9&]N97=G<G @*'=H;RQG<FYA;64I"F-H87(@*G=H;RPJ9W)N86UE.PI[u
M"B @<W1R=6-T(&=R;W5P(&=R<"PJ=&=R<#L*("!C:&%R("HJ;65M.PD)"2\Jt
M(&UE;6)E<B!L:7-T(&]F('1H92!G<F]U<" J+PH*("!I9B H=&=R<#UG971Gs
M<FYA;2AG<FYA;64I*2!["@EB8V]P>2AT9W)P+"9G<G L<VEZ96]F*'-T<G5Cr
M="!G<F]U<"DI.PH);65M/6=R<"YG<E]M96T["@EI9B H;VQD7W5I9" ]/2 Pq
M*2!["2\J(&ES('1H92!S=7!E<G5S97(@8V%L;&EN9R _("HO"@D@("!S971Gp
M:60H9W)P+F=R7V=I9"D[( DO*B!B>2!Y;W5R(&-O;6UA;F0L(&)W86YA("HOo
M"@D@("!R971U<FX@,#L@"@E]"@EW:&EL92 H*FUE;2D@>PD)+RH@8VAE8VL@n
M;65M8F5R(&QI<W0@*B\*"0EI9B H(7-T<F-M<"@J;65M+'=H;RDI('L@+RH@m
M>65A:"X@9V]T('EO=2 J+PH)"2 @("!S971G:60H9W)P+F=R7V=I9"D["@D)l
M(" @(')E='5R;B@P*3L*"0E]"@D);65M*RL["0DO*B!T<GD@=&AE(&YE>'0@k
M96YT<GD@*B\*"7T*"69P<FEN=&8H<W1D97)R+")9;W4G<F4@;F]T(&$@;65Mj
M8F5R(&]F(&=R;W5P("<E<R=<;B(L9W)N86UE*3L*"7)E='5R;B@Q*3L*("!]i
M"B @9G!R:6YT9BAS=&1E<G(L(B<E<R<@:7,@;F]T(&$@9W)O=7!N86UE7&XBh
M+&=R;F%M92D["B @<F5T=7)N*#(I.PI]"@IM86EN("AA<F=C+&%R9W8L96YVg
M<"D*:6YT(&%R9V,["F-H87(@*F%R9W9;73L*8VAA<B J96YV<%M=.PI["B @f
M<W1R=6-T('!A<W-W9" J<'<["B @8VAA<B!U<V5R6S$T73L)"0DO*B!L;V-Ae
M;"!C;W!Y.B!U<V5R)W,@;F%M92 J+PH@(&-H87(@<VAE;&Q;-#!=.PD)"2\Jd
M(&QO8V%L(&-O<'DZ('5S97(G<R!S:&5L;" J+PH@(&=I9%]T(&]R:6=?9W)Pc
M.PH*("!P=R ](&=E='!W=6ED*&=E='5I9"@I*3L)"2\J(&=E="!T:&4@=7-Eb
M<B=S('!A<W-W9"!E;G1R>2 J+PH@(&EF("AP=R ]/2 H<W1R=6-T('!A<W-Wa
M9" J*4Y53$PI('L*( EF<')I;G1F*'-T9&5R<BP@(B5S.B!)(&1O(&YO="!Ez
M>&ES=#]<;B(L(&%R9W9;,%TI.PH)97AI="@M,2D["B @?0H@('-T<F-P>2AUy
M<V5R+"!P=RT^<'=?;F%M92D["0DO*B!C;W!Y('-O;64@=F%L=65S("HO"B @x
M<W1R8W!Y*'-H96QL+"!P=RT^<'=?<VAE;&PI.PH@(&]R:6=?9W)P(#T@<'<Mw
M/G!W7V=I9#L*"B @;VQD7W5I9" ](&=E='5I9"@I.PD)"2\J(&=E="!T:&4@v
M=7-E<B=S('5I9" J+PH*("!S971U:60H9V5T975I9"@I*3L)"0DO*B!/;FQYu
M(&$@4U5015)?55-%4B!M87D@8VAA;F=E(&=I9" J+PH*("!I9B H87)G8SP]t
M,2D@>PD)"2\J(&YO(&%R9W5M96YT.B!S970@=7-E<B=S(&=I9" J+PH)<V5Ts
M9VED*&]R:6=?9W)P*3L*("!]"B @96QS92!I9B H9&]N97=G<G H=7-E<BQAr
M<F=V6S%=*2D@( DO*B!I9B!A;GD@97)R;W(@;V-C=7)S+"!E>&ET("HO"@EEq
M>&ET*"TQ*3L*"B @<V5T=6ED*&]L9%]U:60I.PD)"2\J('1H870G<R!T:&4@p
M=7-E<B=S(&ED("HO"@H@(&5X96-L92 H<VAE;&PL('-H96QL+" H8VAA<B Jo
M*2 P+"!E;G9P*3L@+RH@<W1A<G0@=&AE('5S97(G<R!S:&5L;" J+PH@(&9Pn
M<FEN=&8H<W1D97)R+")#86XG="!C:&%N9V4@9W)O=7 N7&XB*3L@+RH@3V]Om
L<',L(&AO=R!G;W0@>6]U('-T87)T960@/R J+PH@(&5X:70H+3$I.PI]"@IOl
 k
end
----------------------THIS IS THE END-------------------------
_____________________________________________________________________
email:  <G=stefan;S=schroer;OU=cyber,urz;P=uni-wuppertal;A=dbp;C=de>
        stefan.schroer@cyber.urz.uni-wuppertal.dbp.de
uucp:   stefans@coduck.ruhr.sub.org
        ~!unido!uka!smurf!horga!xenox!coduck!stefans
---------------------------------------------------------------------