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