1 /* Copyright (C) 1998, 1999, 2000, 2005 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3    Contributed by Andreas Jaeger <aj@suse.de>, 1998.
4 
5    The GNU C Library is free software; you can redistribute it and/or
6    modify it under the terms of the GNU Lesser General Public
7    License as published by the Free Software Foundation; either
8    version 2.1 of the License, or (at your option) any later version.
9 
10    The GNU C Library is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13    Lesser General Public License for more details.
14 
15    You should have received a copy of the GNU Lesser General Public
16    License along with the GNU C Library; if not, see
17    <http://www.gnu.org/licenses/>.  */
18 
19 #include <time.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22 #include <string.h>
23 #include <unistd.h>
24 
25 int failed = 0;
26 
27 struct test_times
28 {
29   const char *name;
30   int daylight;
31   int timezone;
32   const char *tzname[2];
33 };
34 
35 static const struct test_times tests[] =
36 {
37   { "Europe/Amsterdam", 1, -3600, { "CET", "CEST" }},
38   { "Europe/Berlin", 1, -3600, { "CET", "CEST" }},
39   { "Europe/London", 1, 0, { "GMT", "BST" }},
40   { "Universal", 0, 0, {"UTC", "UTC" }},
41   { "Australia/Melbourne", 1, -36000, { "EST", "EST" }},
42   { "America/Sao_Paulo", 1, 10800, {"BRT", "BRST" }},
43   { "America/Chicago", 1, 21600, {"CST", "CDT" }},
44   { "America/Indiana/Indianapolis", 1, 18000, {"EST", "EDT" }},
45   { "America/Los_Angeles", 1, 28800, {"PST", "PDT" }},
46   { "Asia/Tokyo", 1, -32400, {"JST", "JDT" }},
47   { "Pacific/Auckland", 1, -43200, { "NZST", "NZDT" }},
48   { NULL, 0, 0 }
49 };
50 
51 /* This string will be used for `putenv' calls.  */
52 char envstring[100];
53 
54 static void
print_tzvars(void)55 print_tzvars (void)
56 {
57   printf ("tzname[0]: %s\n", tzname[0]);
58   printf ("tzname[1]: %s\n", tzname[1]);
59   printf ("daylight: %d\n", daylight);
60   printf ("timezone: %ld\n", timezone);
61 }
62 
63 
64 static void
check_tzvars(const char * name,int dayl,int timez,const char * const tznam[])65 check_tzvars (const char *name, int dayl, int timez, const char *const tznam[])
66 {
67   int i;
68 
69   if (daylight != dayl)
70     {
71       printf ("*** Timezone: %s, daylight is: %d but should be: %d\n",
72 	      name, daylight, dayl);
73       ++failed;
74     }
75   if (timezone != timez)
76     {
77       printf ("*** Timezone: %s, timezone is: %ld but should be: %d\n",
78 	      name, timezone, timez);
79       ++failed;
80     }
81   for (i = 0; i <= 1; ++i)
82     if (strcmp (tzname[i], tznam[i]) != 0)
83       {
84 	printf ("*** Timezone: %s, tzname[%d] is: %s but should be: %s\n",
85 		name, i, tzname[i], tznam[i]);
86 	++failed;
87       }
88 }
89 
90 
91 int
main(int argc,char ** argv)92 main (int argc, char ** argv)
93 {
94   time_t t;
95   const struct test_times *pt;
96   char buf[BUFSIZ];
97 
98   /* This should be: Fri May 15 01:02:16 1998 (UTC).  */
99   t = 895194136;
100   printf ("We use this date: %s\n", asctime (gmtime (&t)));
101 
102   for (pt = tests; pt->name != NULL; ++pt)
103     {
104       /* Start with a known state */
105       printf ("Checking timezone %s\n", pt->name);
106       sprintf (buf, "TZ=%s", pt->name);
107       if (putenv (buf))
108 	{
109 	  puts ("putenv failed.");
110 	  failed = 1;
111 	}
112       tzset ();
113       print_tzvars ();
114       check_tzvars (pt->name, pt->daylight, pt->timezone, pt->tzname);
115 
116       /* calling localtime shouldn't make a difference */
117       localtime (&t);
118       print_tzvars ();
119       check_tzvars (pt->name, pt->daylight, pt->timezone, pt->tzname);
120     }
121 
122   /* From a post of Scott Harrington <seh4@ix.netcom.com> to the timezone
123      mailing list.  */
124   {
125     struct tm tmBuf = {0, 0, 0, 10, 3, 98, 0, 0, -1};
126     char buf[200];
127     strcpy (envstring, "TZ=Europe/London");
128     putenv (envstring);
129     t = mktime (&tmBuf);
130     snprintf (buf, sizeof (buf), "TZ=%s %ld %d %d %d %d %d %d %d %d %d",
131 	      getenv ("TZ"), t,
132 	      tmBuf.tm_sec, tmBuf.tm_min, tmBuf.tm_hour,
133 	      tmBuf.tm_mday, tmBuf.tm_mon, tmBuf.tm_year,
134 	      tmBuf.tm_wday, tmBuf.tm_yday, tmBuf.tm_isdst);
135     fputs (buf, stdout);
136     puts (" should be");
137     puts ("TZ=Europe/London 892162800 0 0 0 10 3 98 5 99 1");
138     if (strcmp (buf, "TZ=Europe/London 892162800 0 0 0 10 3 98 5 99 1") != 0)
139       {
140 	failed = 1;
141 	fputs (" FAILED ***", stdout);
142       }
143   }
144 
145   printf("\n");
146 
147   {
148     struct tm tmBuf = {0, 0, 0, 10, 3, 98, 0, 0, -1};
149     char buf[200];
150     strcpy (envstring, "TZ=GMT");
151     /* No putenv call needed!  */
152     t = mktime (&tmBuf);
153     snprintf (buf, sizeof (buf), "TZ=%s %ld %d %d %d %d %d %d %d %d %d",
154 	      getenv ("TZ"), t,
155 	      tmBuf.tm_sec, tmBuf.tm_min, tmBuf.tm_hour,
156 	      tmBuf.tm_mday, tmBuf.tm_mon, tmBuf.tm_year,
157 	      tmBuf.tm_wday, tmBuf.tm_yday, tmBuf.tm_isdst);
158     fputs (buf, stdout);
159     puts (" should be");
160     puts ("TZ=GMT 892166400 0 0 0 10 3 98 5 99 0");
161     if (strcmp (buf, "TZ=GMT 892166400 0 0 0 10 3 98 5 99 0") != 0)
162       {
163 	failed = 1;
164 	fputs (" FAILED ***", stdout);
165       }
166   }
167 
168   return failed ? EXIT_FAILURE : EXIT_SUCCESS;
169 }
170