time/test_time.c

   1 /* Copyright (C) 1991, 1992, 1994, 1997 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 not,
  16    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17    Boston, MA 02111-1307, USA.  */
  18
  19 #include <stdio.h>
  20 #include <stdlib.h>
  21 #include <time.h>
  22
  23
  24 int
  25 main (argc, argv)
  26      int argc;
  27      char **argv;
  28 {
  29   time_t t;
  30   register struct tm *tp;
  31   struct tm tbuf;
  32   int lose = 0;
  33
  34   --argc;
  35   ++argv;
  36
  37   do
  38     {
  39       char buf[BUFSIZ];
  40       if (argc > 0)
  41         {
  42           static char buf[BUFSIZ];
  43           sprintf(buf, "TZ=%s", *argv);
  44           if (putenv(buf))
  45             {
  46               puts("putenv failed.");
  47               lose = 1;
  48             }
  49           else
  50             puts (buf);
  51         }
  52       tzset();
  53       tbuf.tm_year = 72;
  54       tbuf.tm_mon = 0;
  55       tbuf.tm_mday = 31;
  56       tbuf.tm_hour = 6;
  57       tbuf.tm_min = 14;
  58       tbuf.tm_sec = 50;
  59       tbuf.tm_isdst = -1;
  60     doit:;
  61       t = mktime(&tbuf);
  62       if (t == (time_t) -1)
  63         {
  64           puts("mktime() failed?");
  65           lose = 1;
  66         }
  67       tp = localtime(&t);
  68       if (tp == NULL)
  69         {
  70           puts("localtime() failed.");
  71           lose = 1;
  72         }
  73       else if (strftime(buf, sizeof(buf), "%a %b %d %X %Z %Y", tp) == 0)
  74         {
  75           puts("strftime() failed.");
  76           lose = 1;
  77         }
  78       else
  79         puts(buf);
  80       if (tbuf.tm_year == 101)
  81         {
  82           tbuf.tm_year = 97;
  83           tbuf.tm_mon = 0;
  84           goto doit;
  85         }
  86       ++argv;
  87     } while (--argc > 0);
  88
  89   {
  90 #define SIZE    256
  91     char buffer[SIZE];
  92     time_t curtime;
  93     struct tm *loctime;
  94
  95     curtime = time (NULL);
  96
  97     loctime = localtime (&curtime);
  98
  99     fputs (asctime (loctime), stdout);
 100
 101     strftime (buffer, SIZE, "Today is %A, %B %d.\n", loctime);
 102     fputs (buffer, stdout);
 103     strftime (buffer, SIZE, "The time is %I:%M %p.\n", loctime);
 104     fputs (buffer, stdout);
 105
 106     loctime->tm_year = 72;
 107     loctime->tm_mon = 8;
 108     loctime->tm_mday = 12;
 109     loctime->tm_hour = 20;
 110     loctime->tm_min = 49;
 111     loctime->tm_sec = 05;
 112     curtime = mktime (loctime);
 113     strftime (buffer, SIZE, "%D %T was %w the %jth.\n", loctime);
 114     fputs (buffer, stdout);
 115   }
 116
 117   return (lose ? EXIT_FAILURE : EXIT_SUCCESS);
 118 }