| 1 | #serial 8
|
|---|
| 2 | dnl Copyright (C) 2002, 2003, 2005, 2006 Free Software Foundation, Inc.
|
|---|
| 3 | dnl This file is free software; the Free Software Foundation
|
|---|
| 4 | dnl gives unlimited permission to copy and/or distribute it,
|
|---|
| 5 | dnl with or without modifications, as long as this notice is preserved.
|
|---|
| 6 |
|
|---|
| 7 | dnl From Jim Meyering.
|
|---|
| 8 |
|
|---|
| 9 | # Redefine AC_FUNC_MKTIME, to fix a bug in Autoconf 2.60a and earlier.
|
|---|
| 10 | # This redefinition can be removed once a new version of Autoconf is assumed.
|
|---|
| 11 | # The redefinition is taken from
|
|---|
| 12 | # <http://cvs.sv.gnu.org/viewcvs/*checkout*/autoconf/lib/autoconf/functions.m4?rev=1.108&root=autoconf>.
|
|---|
| 13 | # AC_FUNC_MKTIME
|
|---|
| 14 | # --------------
|
|---|
| 15 | AC_DEFUN([AC_FUNC_MKTIME],
|
|---|
| 16 | [AC_REQUIRE([AC_HEADER_TIME])dnl
|
|---|
| 17 | AC_CHECK_HEADERS_ONCE(sys/time.h unistd.h)
|
|---|
| 18 | AC_CHECK_FUNCS_ONCE(alarm)
|
|---|
| 19 | AC_CACHE_CHECK([for working mktime], ac_cv_func_working_mktime,
|
|---|
| 20 | [AC_RUN_IFELSE([AC_LANG_SOURCE(
|
|---|
| 21 | [[/* Test program from Paul Eggert and Tony Leneis. */
|
|---|
| 22 | #ifdef TIME_WITH_SYS_TIME
|
|---|
| 23 | # include <sys/time.h>
|
|---|
| 24 | # include <time.h>
|
|---|
| 25 | #else
|
|---|
| 26 | # ifdef HAVE_SYS_TIME_H
|
|---|
| 27 | # include <sys/time.h>
|
|---|
| 28 | # else
|
|---|
| 29 | # include <time.h>
|
|---|
| 30 | # endif
|
|---|
| 31 | #endif
|
|---|
| 32 |
|
|---|
| 33 | #include <stdlib.h>
|
|---|
| 34 |
|
|---|
| 35 | #ifdef HAVE_UNISTD_H
|
|---|
| 36 | # include <unistd.h>
|
|---|
| 37 | #endif
|
|---|
| 38 |
|
|---|
| 39 | #ifndef HAVE_ALARM
|
|---|
| 40 | # define alarm(X) /* empty */
|
|---|
| 41 | #endif
|
|---|
| 42 |
|
|---|
| 43 | /* Work around redefinition to rpl_putenv by other config tests. */
|
|---|
| 44 | #undef putenv
|
|---|
| 45 |
|
|---|
| 46 | static time_t time_t_max;
|
|---|
| 47 | static time_t time_t_min;
|
|---|
| 48 |
|
|---|
| 49 | /* Values we'll use to set the TZ environment variable. */
|
|---|
| 50 | static char *tz_strings[] = {
|
|---|
| 51 | (char *) 0, "TZ=GMT0", "TZ=JST-9",
|
|---|
| 52 | "TZ=EST+3EDT+2,M10.1.0/00:00:00,M2.3.0/00:00:00"
|
|---|
| 53 | };
|
|---|
| 54 | #define N_STRINGS (sizeof (tz_strings) / sizeof (tz_strings[0]))
|
|---|
| 55 |
|
|---|
| 56 | /* Return 0 if mktime fails to convert a date in the spring-forward gap.
|
|---|
| 57 | Based on a problem report from Andreas Jaeger. */
|
|---|
| 58 | static int
|
|---|
| 59 | spring_forward_gap ()
|
|---|
| 60 | {
|
|---|
| 61 | /* glibc (up to about 1998-10-07) failed this test. */
|
|---|
| 62 | struct tm tm;
|
|---|
| 63 |
|
|---|
| 64 | /* Use the portable POSIX.1 specification "TZ=PST8PDT,M4.1.0,M10.5.0"
|
|---|
| 65 | instead of "TZ=America/Vancouver" in order to detect the bug even
|
|---|
| 66 | on systems that don't support the Olson extension, or don't have the
|
|---|
| 67 | full zoneinfo tables installed. */
|
|---|
| 68 | putenv ("TZ=PST8PDT,M4.1.0,M10.5.0");
|
|---|
| 69 |
|
|---|
| 70 | tm.tm_year = 98;
|
|---|
| 71 | tm.tm_mon = 3;
|
|---|
| 72 | tm.tm_mday = 5;
|
|---|
| 73 | tm.tm_hour = 2;
|
|---|
| 74 | tm.tm_min = 0;
|
|---|
| 75 | tm.tm_sec = 0;
|
|---|
| 76 | tm.tm_isdst = -1;
|
|---|
| 77 | return mktime (&tm) != (time_t) -1;
|
|---|
| 78 | }
|
|---|
| 79 |
|
|---|
| 80 | static int
|
|---|
| 81 | mktime_test1 (now)
|
|---|
| 82 | time_t now;
|
|---|
| 83 | {
|
|---|
| 84 | struct tm *lt;
|
|---|
| 85 | return ! (lt = localtime (&now)) || mktime (lt) == now;
|
|---|
| 86 | }
|
|---|
| 87 |
|
|---|
| 88 | static int
|
|---|
| 89 | mktime_test (now)
|
|---|
| 90 | time_t now;
|
|---|
| 91 | {
|
|---|
| 92 | return (mktime_test1 (now)
|
|---|
| 93 | && mktime_test1 ((time_t) (time_t_max - now))
|
|---|
| 94 | && mktime_test1 ((time_t) (time_t_min + now)));
|
|---|
| 95 | }
|
|---|
| 96 |
|
|---|
| 97 | static int
|
|---|
| 98 | irix_6_4_bug ()
|
|---|
| 99 | {
|
|---|
| 100 | /* Based on code from Ariel Faigon. */
|
|---|
| 101 | struct tm tm;
|
|---|
| 102 | tm.tm_year = 96;
|
|---|
| 103 | tm.tm_mon = 3;
|
|---|
| 104 | tm.tm_mday = 0;
|
|---|
| 105 | tm.tm_hour = 0;
|
|---|
| 106 | tm.tm_min = 0;
|
|---|
| 107 | tm.tm_sec = 0;
|
|---|
| 108 | tm.tm_isdst = -1;
|
|---|
| 109 | mktime (&tm);
|
|---|
| 110 | return tm.tm_mon == 2 && tm.tm_mday == 31;
|
|---|
| 111 | }
|
|---|
| 112 |
|
|---|
| 113 | static int
|
|---|
| 114 | bigtime_test (j)
|
|---|
| 115 | int j;
|
|---|
| 116 | {
|
|---|
| 117 | struct tm tm;
|
|---|
| 118 | time_t now;
|
|---|
| 119 | tm.tm_year = tm.tm_mon = tm.tm_mday = tm.tm_hour = tm.tm_min = tm.tm_sec = j;
|
|---|
| 120 | now = mktime (&tm);
|
|---|
| 121 | if (now != (time_t) -1)
|
|---|
| 122 | {
|
|---|
| 123 | struct tm *lt = localtime (&now);
|
|---|
| 124 | if (! (lt
|
|---|
| 125 | && lt->tm_year == tm.tm_year
|
|---|
| 126 | && lt->tm_mon == tm.tm_mon
|
|---|
| 127 | && lt->tm_mday == tm.tm_mday
|
|---|
| 128 | && lt->tm_hour == tm.tm_hour
|
|---|
| 129 | && lt->tm_min == tm.tm_min
|
|---|
| 130 | && lt->tm_sec == tm.tm_sec
|
|---|
| 131 | && lt->tm_yday == tm.tm_yday
|
|---|
| 132 | && lt->tm_wday == tm.tm_wday
|
|---|
| 133 | && ((lt->tm_isdst < 0 ? -1 : 0 < lt->tm_isdst)
|
|---|
| 134 | == (tm.tm_isdst < 0 ? -1 : 0 < tm.tm_isdst))))
|
|---|
| 135 | return 0;
|
|---|
| 136 | }
|
|---|
| 137 | return 1;
|
|---|
| 138 | }
|
|---|
| 139 |
|
|---|
| 140 | static int
|
|---|
| 141 | year_2050_test ()
|
|---|
| 142 | {
|
|---|
| 143 | /* The correct answer for 2050-02-01 00:00:00 in Pacific time,
|
|---|
| 144 | ignoring leap seconds. */
|
|---|
| 145 | unsigned long int answer = 2527315200UL;
|
|---|
| 146 |
|
|---|
| 147 | struct tm tm;
|
|---|
| 148 | time_t t;
|
|---|
| 149 | tm.tm_year = 2050 - 1900;
|
|---|
| 150 | tm.tm_mon = 2 - 1;
|
|---|
| 151 | tm.tm_mday = 1;
|
|---|
| 152 | tm.tm_hour = tm.tm_min = tm.tm_sec = 0;
|
|---|
| 153 | tm.tm_isdst = -1;
|
|---|
| 154 |
|
|---|
| 155 | /* Use the portable POSIX.1 specification "TZ=PST8PDT,M4.1.0,M10.5.0"
|
|---|
| 156 | instead of "TZ=America/Vancouver" in order to detect the bug even
|
|---|
| 157 | on systems that don't support the Olson extension, or don't have the
|
|---|
| 158 | full zoneinfo tables installed. */
|
|---|
| 159 | putenv ("TZ=PST8PDT,M4.1.0,M10.5.0");
|
|---|
| 160 |
|
|---|
| 161 | t = mktime (&tm);
|
|---|
| 162 |
|
|---|
| 163 | /* Check that the result is either a failure, or close enough
|
|---|
| 164 | to the correct answer that we can assume the discrepancy is
|
|---|
| 165 | due to leap seconds. */
|
|---|
| 166 | return (t == (time_t) -1
|
|---|
| 167 | || (0 < t && answer - 120 <= t && t <= answer + 120));
|
|---|
| 168 | }
|
|---|
| 169 |
|
|---|
| 170 | int
|
|---|
| 171 | main ()
|
|---|
| 172 | {
|
|---|
| 173 | time_t t, delta;
|
|---|
| 174 | int i, j;
|
|---|
| 175 |
|
|---|
| 176 | /* This test makes some buggy mktime implementations loop.
|
|---|
| 177 | Give up after 60 seconds; a mktime slower than that
|
|---|
| 178 | isn't worth using anyway. */
|
|---|
| 179 | alarm (60);
|
|---|
| 180 |
|
|---|
| 181 | for (time_t_max = 1; 0 < time_t_max; time_t_max *= 2)
|
|---|
| 182 | continue;
|
|---|
| 183 | time_t_max--;
|
|---|
| 184 | if ((time_t) -1 < 0)
|
|---|
| 185 | for (time_t_min = -1; (time_t) (time_t_min * 2) < 0; time_t_min *= 2)
|
|---|
| 186 | continue;
|
|---|
| 187 | delta = time_t_max / 997; /* a suitable prime number */
|
|---|
| 188 | for (i = 0; i < N_STRINGS; i++)
|
|---|
| 189 | {
|
|---|
| 190 | if (tz_strings[i])
|
|---|
| 191 | putenv (tz_strings[i]);
|
|---|
| 192 |
|
|---|
| 193 | for (t = 0; t <= time_t_max - delta; t += delta)
|
|---|
| 194 | if (! mktime_test (t))
|
|---|
| 195 | return 1;
|
|---|
| 196 | if (! (mktime_test ((time_t) 1)
|
|---|
| 197 | && mktime_test ((time_t) (60 * 60))
|
|---|
| 198 | && mktime_test ((time_t) (60 * 60 * 24))))
|
|---|
| 199 | return 1;
|
|---|
| 200 |
|
|---|
| 201 | for (j = 1; 0 < j; j *= 2)
|
|---|
| 202 | if (! bigtime_test (j))
|
|---|
| 203 | return 1;
|
|---|
| 204 | if (! bigtime_test (j - 1))
|
|---|
| 205 | return 1;
|
|---|
| 206 | }
|
|---|
| 207 | return ! (irix_6_4_bug () && spring_forward_gap () && year_2050_test ());
|
|---|
| 208 | }]])],
|
|---|
| 209 | [ac_cv_func_working_mktime=yes],
|
|---|
| 210 | [ac_cv_func_working_mktime=no],
|
|---|
| 211 | [ac_cv_func_working_mktime=no])])
|
|---|
| 212 | if test $ac_cv_func_working_mktime = no; then
|
|---|
| 213 | AC_LIBOBJ([mktime])
|
|---|
| 214 | fi
|
|---|
| 215 | ])# AC_FUNC_MKTIME
|
|---|
| 216 |
|
|---|
| 217 | AC_DEFUN([gl_FUNC_MKTIME],
|
|---|
| 218 | [
|
|---|
| 219 | AC_REQUIRE([AC_FUNC_MKTIME])
|
|---|
| 220 | if test $ac_cv_func_working_mktime = no; then
|
|---|
| 221 | AC_DEFINE(mktime, rpl_mktime,
|
|---|
| 222 | [Define to rpl_mktime if the replacement function should be used.])
|
|---|
| 223 | gl_PREREQ_MKTIME
|
|---|
| 224 | fi
|
|---|
| 225 | ])
|
|---|
| 226 |
|
|---|
| 227 | # Prerequisites of lib/mktime.c.
|
|---|
| 228 | AC_DEFUN([gl_PREREQ_MKTIME], [:])
|
|---|
