Return to newgrp.c CVS log

Up to [MW Coherent from dump] / coherent / d / bin

Annotation of coherent/d/bin/newgrp.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * newgrp groupname
        !             3:  * this is exec'd by the shell
        !             4:  * to make it work:
        !             5:  *                     chmod u+s /bin/newgrp
        !             6:  */
        !             7: #include <stdio.h>
        !             8: #include <grp.h>
        !             9: 
        !            10: extern char **environ;
        !            11: 
        !            12: main(argc,argv,envp)
        !            13: char **argv,**envp;
        !            14: {
        !            15:        register char *unam;
        !            16:        register int *flag;
        !            17:        register struct group *grp;
        !            18:        char *cp;
        !            19:        char *crypt(),*getpass(),*getlogin();
        !            20:        int namect=0,inflg=0,outflg=0;
        !            21: 
        !            22:        environ=envp;
        !            23:        if (argc<2)
        !            24:                perrx("Usage: newgrp groupname");
        !            25:        if ((grp=getgrnam(argv[1]))==NULL)
        !            26:                perrx("non-existent group");
        !            27:        unam=getlogin();
        !            28:        while (*grp->gr_mem!=NULL) {
        !            29:                if (**grp->gr_mem=='!') {
        !            30:                        ++*grp->gr_mem;
        !            31:                        flag=&outflg;
        !            32:                } else {
        !            33:                        flag=&inflg;
        !            34:                        ++namect;
        !            35:                }
        !            36:                if (strcmp(*grp->gr_mem,unam)==0)
        !            37:                        ++*flag;
        !            38:                ++grp->gr_mem;
        !            39:        }
        !            40:        if (outflg)
        !            41:                perrx("access explicitly denied");
        !            42:        if (!inflg && *grp->gr_passwd=='\0' && namect)
        !            43:                perrx("not in access list");
        !            44:        if (!inflg && *grp->gr_passwd!='\0') {
        !            45:                if ((cp=getpass("Password:"))==NULL || *cp=='\0')
        !            46:                        perrx("no");
        !            47:                cp=crypt(cp,grp->gr_passwd);
        !            48:                if (strcmp(cp,grp->gr_passwd)!=0)
        !            49:                        perrx("no");
        !            50:        }
        !            51:        setgid(grp->gr_gid);
        !            52:        setuid(getuid());
        !            53:        execle("/bin/sh","-",NULL,environ);
        !            54: }
        !            55: 
        !            56: perrx(s)
        !            57: char *s;
        !            58: {
        !            59:        fprintf(stderr,"%s\n",s);
        !            60:        setuid(getuid());
        !            61:        execle("/bin/sh","-",NULL,environ);
        !            62: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.