Return to printenv.c CVS log

Up to [Research Unix] / researchv9 / cmd

Annotation of researchv9/cmd/printenv.c, revision 1.1

1.1     ! root        1: static char *sccsid = "@(#)printenv.c  4.1 (Berkeley) 10/2/80";
        !             2: /*
        !             3:  * printenv
        !             4:  *
        !             5:  * Bill Joy, UCB
        !             6:  * February, 1979
        !             7:  */
        !             8: 
        !             9: extern char **environ;
        !            10: 
        !            11: main(argc, argv)
        !            12:        int argc;
        !            13:        char *argv[];
        !            14: {
        !            15:        register char **ep;
        !            16:        int found = 0;
        !            17: 
        !            18:        argc--, argv++;
        !            19:        if (environ)
        !            20:                for (ep = environ; *ep; ep++)
        !            21:                        if (argc == 0 || prefix(argv[0], *ep)) {
        !            22:                                register char *cp = *ep;
        !            23: 
        !            24:                                found++;
        !            25:                                if (argc) {
        !            26:                                        while (*cp && *cp != '=')
        !            27:                                                cp++;
        !            28:                                        if (*cp == '=')
        !            29:                                                cp++;
        !            30:                                }
        !            31:                                printf("%s\n", cp);
        !            32:                        }
        !            33:        exit (!found);
        !            34: }
        !            35: 
        !            36: prefix(cp, dp)
        !            37:        char *cp, *dp;
        !            38: {
        !            39: 
        !            40:        while (*cp && *dp && *cp == *dp)
        !            41:                cp++, dp++;
        !            42:        if (*cp == 0)
        !            43:                return (*dp == '=');
        !            44:        return (0);
        !            45: }

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