7857d530142b6c561b4010cac56feb23e8207415
[kopensolaris-gnu/glibc.git] / time / test_time.c
1 /* Copyright (C) 1991 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Library General Public License as
6 published by the Free Software Foundation; either version 2 of the
7 License, or (at your option) any later version.
8
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12 Library General Public License for more details.
13
14 You should have received a copy of the GNU Library General Public
15 License along with the GNU C Library; see the file COPYING.LIB.  If
16 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
17 Cambridge, MA 02139, USA.  */
18
19 #include <ansidecl.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22 #include <time.h>
23
24
25 int
26 DEFUN(main, (argc, argv), int argc AND char **argv)
27 {
28   time_t t;
29   register struct tm *tp;
30   struct tm tbuf;
31   int lose = 0;
32
33   --argc;
34   ++argv;
35
36   do
37     {
38       char buf[BUFSIZ];
39       if (argc > 0)
40         {
41           static char buf[BUFSIZ];
42           sprintf(buf, "TZ=%s", *argv);
43           if (putenv(buf))
44             {
45               puts("putenv() failed.");
46               lose = 1;
47             }
48         }
49       tzset();
50       tbuf.tm_year = 72;
51       tbuf.tm_mon = 0;
52       tbuf.tm_mday = 31;
53       tbuf.tm_hour = 6;
54       tbuf.tm_min = 14;
55       tbuf.tm_sec = 50;
56     doit:;
57       t = mktime(&tbuf);
58       if (t == (time_t) -1)
59         {
60           puts("mktime() failed?");
61           lose = 1;
62         }
63       tp = localtime(&t);
64       if (tp == NULL)
65         {
66           puts("localtime() failed.");
67           lose = 1;
68         }
69       else if (strftime(buf, sizeof(buf), "%a %b %d %X %Z %Y", tp) == 0)
70         {
71           puts("strftime() failed.");
72           lose = 1;
73         }
74       else
75         puts(buf);
76       if (tbuf.tm_year == 101)
77         {
78           tbuf.tm_year = 97;
79           tbuf.tm_mon = 0;
80           goto doit;
81         }
82       ++argv;
83     } while (--argc > 0);
84
85   {
86 #define SIZE    256
87     char buffer[SIZE];
88     time_t curtime;
89     struct tm *loctime;
90
91     curtime = time (NULL);
92
93     loctime = localtime (&curtime);
94
95     fputs (asctime (loctime), stdout);
96
97     strftime (buffer, SIZE, "Today is %A, %B %d.\n", loctime);
98     fputs (buffer, stdout);
99     strftime (buffer, SIZE, "The time is %I:%M %p.\n", loctime);
100     fputs (buffer, stdout);
101   }
102
103   exit(lose ? EXIT_FAILURE : EXIT_SUCCESS);
104 }