Commit | Line | Data |
---|---|---|
c87ab46e BJ |
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 | } |