![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to zdump.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDTahoe / etc / tzone|
Return to zdump.c CVS log | Up to [CSRG BSD Unix] / 43BSDTahoe / etc / tzone |
1.1 root 1: #ifndef lint
2: static char sccsid[] = "@(#)zdump.c 1.2 (Berkeley) 10/22/87";
3: #endif
4:
5: #include "stdio.h"
6:
7: #include "sys/types.h"
8: #include "tzfile.h"
9: #include "time.h"
10:
11: #ifndef TRUE
12: #define TRUE 1
13: #define FALSE 0
14: #endif
15:
16: extern char * asctime();
17: extern char ** environ;
18: extern struct tm * gmtime();
19: extern char * imalloc();
20: extern char * optarg;
21: extern int optind;
22: extern long time();
23: extern char * tzname[2];
24: extern void tzset();
25:
26: /*
27: ** For the benefit of cyntax...
28: */
29:
30: static long tzdecode();
31: static readerr();
32: static show();
33:
34: static int longest;
35:
36: static long
37: tzdecode(codep)
38: char * codep;
39: {
40: register int i;
41: register long result;
42:
43: result = 0;
44: for (i = 0; i < 4; ++i)
45: result = (result << 8) | (codep[i] & 0xff);
46: return result;
47: }
48:
49: main(argc, argv)
50: int argc;
51: char * argv[];
52: {
53: register FILE * fp;
54: register int i, j, c;
55: register int vflag;
56: register char * cutoff;
57: register int cutyear;
58: register long cuttime;
59: time_t now;
60: time_t t;
61: long timecnt;
62: char buf[BUFSIZ];
63:
64: vflag = 0;
65: cutoff = NULL;
66: while ((c = getopt(argc, argv, "c:v")) == 'c' || c == 'v')
67: if (c == 'v')
68: vflag = 1;
69: else cutoff = optarg;
70: if (c != EOF || optind == argc - 1 && strcmp(argv[optind], "=") == 0) {
71: (void) fprintf(stderr, "%s: usage is %s [ -v ] zonename ...\n",
72: argv[0], argv[0]);
73: exit(1);
74: }
75: if (cutoff != NULL)
76: cutyear = atoi(cutoff);
77: /*
78: ** VERY approximate.
79: */
80: cuttime = (long) (cutyear - EPOCH_YEAR) *
81: SECS_PER_HOUR * HOURS_PER_DAY * DAYS_PER_NYEAR;
82: (void) time(&now);
83: longest = 0;
84: for (i = optind; i < argc; ++i)
85: if (strlen(argv[i]) > longest)
86: longest = strlen(argv[i]);
87: for (i = optind; i < argc; ++i) {
88: register char ** saveenv;
89: char * tzequals;
90: char * fakeenv[2];
91:
92: tzequals = imalloc(strlen(argv[i]) + 4);
93: if (tzequals == NULL) {
94: (void) fprintf(stderr, "%s: can't allocate memory\n",
95: argv[0]);
96: exit(1);
97: }
98: (void) sprintf(tzequals, "TZ=%s", argv[i]);
99: fakeenv[0] = tzequals;
100: fakeenv[1] = NULL;
101: saveenv = environ;
102: environ = fakeenv;
103: (void) tzset();
104: environ = saveenv;
105: show(argv[i], now, FALSE);
106: if (!vflag)
107: continue;
108: if (argv[i][0] == '/')
109: fp = fopen(argv[i], "r");
110: else {
111: j = strlen(TZDIR) + 1 + strlen(argv[i]) + 1;
112: if (j > sizeof buf) {
113: (void) fprintf(stderr,
114: "%s: timezone name %s/%s is too long\n",
115: argv[0], TZDIR, argv[i]);
116: exit(1);
117: }
118: (void) sprintf(buf, "%s/%s", TZDIR, argv[i]);
119: fp = fopen(buf, "r");
120: }
121: if (fp == NULL) {
122: (void) fprintf(stderr, "%s: Can't open ", argv[0]);
123: perror(argv[i]);
124: exit(1);
125: }
126: {
127: char code[4];
128:
129: (void) fseek(fp, (long) sizeof ((struct tzhead *) 0)->tzh_reserved, 0);
130: if (fread((char *) code, sizeof code, 1, fp) != 1)
131: readerr(fp, argv[0], argv[i]);
132: timecnt = tzdecode(code);
133: (void) fseek(fp, (long) (2 * sizeof code), 1);
134: }
135: t = 0x80000000;
136: if (t > 0) /* time_t is unsigned */
137: t = 0;
138: show(argv[i], t, TRUE);
139: t += SECS_PER_HOUR * HOURS_PER_DAY;
140: show(argv[i], t, TRUE);
141: while (timecnt-- > 0) {
142: char code[4];
143:
144: if (fread((char *) code, sizeof code, 1, fp) != 1)
145: readerr(fp, argv[0], argv[i]);
146: t = tzdecode(code);
147: if (cutoff != NULL && t > cuttime)
148: break;
149: show(argv[i], t - 1, TRUE);
150: show(argv[i], t, TRUE);
151: }
152: if (fclose(fp)) {
153: (void) fprintf(stderr, "%s: Error closing ", argv[0]);
154: perror(argv[i]);
155: exit(1);
156: }
157: t = 0xffffffff;
158: if (t < 0) /* time_t is signed */
159: t = 0x7fffffff ;
160: t -= SECS_PER_HOUR * HOURS_PER_DAY;
161: show(argv[i], t, TRUE);
162: t += SECS_PER_HOUR * HOURS_PER_DAY;
163: show(argv[i], t, TRUE);
164: free(tzequals);
165: }
166: if (fflush(stdout) || ferror(stdout)) {
167: (void) fprintf(stderr, "%s: Error writing standard output ",
168: argv[0]);
169: perror("standard output");
170: exit(1);
171: }
172: return 0;
173: }
174:
175: static
176: show(zone, t, v)
177: char * zone;
178: time_t t;
179: {
180: struct tm * tmp;
181: extern struct tm * localtime();
182:
183: (void) printf("%-*s ", longest, zone);
184: if (v)
185: (void) printf("%.24s GMT = ", asctime(gmtime(&t)));
186: tmp = localtime(&t);
187: (void) printf("%.24s", asctime(tmp));
188: if (*tzname[tmp->tm_isdst] != '\0')
189: (void) printf(" %s", tzname[tmp->tm_isdst]);
190: if (v) {
191: (void) printf(" isdst=%d", tmp->tm_isdst);
192: (void) printf(" gmtoff=%ld", tmp->tm_gmtoff);
193: }
194: (void) printf("\n");
195: }
196:
197: static
198: readerr(fp, progname, filename)
199: FILE * fp;
200: char * progname;
201: char * filename;
202: {
203: (void) fprintf(stderr, "%s: Error reading ", progname);
204: if (ferror(fp))
205: perror(filename);
206: else (void) fprintf(stderr, "%s: Premature EOF\n", filename);
207: exit(1);
208: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.