Annotation of 3BSD/cmd/printenv.c, revision 1.1.1.1

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

unix.superglobalmegacorp.com

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