|
|
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: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.