glib/tests/gdatetime.c

   1 /* gdatetime-tests.c
   2  *
   3  * Copyright (C) 2009-2010 Christian Hergert <chris@dronelabs.com>
   4  *
   5  * This 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  * This 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 License
  16  * along with this library; if not, see <http://www.gnu.org/licenses/>.
  17  */
  18
  19 #include "config.h"
  20
  21 #include <string.h>
  22 #include <time.h>
  23 #include <gi18n.h>
  24 #include <glib.h>
  25 #include <glib/gstdio.h>
  26 #include <locale.h>
  27
  28 #define ASSERT_DATE(dt,y,m,d) G_STMT_START { \
  29   g_assert_nonnull ((dt)); \
  30   g_assert_cmpint ((y), ==, g_date_time_get_year ((dt))); \
  31   g_assert_cmpint ((m), ==, g_date_time_get_month ((dt))); \
  32   g_assert_cmpint ((d), ==, g_date_time_get_day_of_month ((dt))); \
  33 } G_STMT_END
  34 #define ASSERT_TIME(dt,H,M,S,U) G_STMT_START { \
  35   g_assert_nonnull ((dt)); \
  36   g_assert_cmpint ((H), ==, g_date_time_get_hour ((dt))); \
  37   g_assert_cmpint ((M), ==, g_date_time_get_minute ((dt))); \
  38   g_assert_cmpint ((S), ==, g_date_time_get_second ((dt))); \
  39   g_assert_cmpint ((U), ==, g_date_time_get_microsecond ((dt))); \
  40 } G_STMT_END
  41
  42 static void
  43 get_localtime_tm (time_t     time_,
  44                   struct tm *retval)
  45 {
  46 #ifdef HAVE_LOCALTIME_R
  47   localtime_r (&time_, retval);
  48 #else
  49   {
  50     struct tm *ptm = localtime (&time_);
  51
  52     if (ptm == NULL)
  53       {
  54         /* Happens at least in Microsoft's C library if you pass a
  55          * negative time_t. Use 2000-01-01 as default date.
  56          */
  57 #ifndef G_DISABLE_CHECKS
  58         g_return_if_fail_warning (G_LOG_DOMAIN, G_STRFUNC, "ptm != NULL");
  59 #endif
  60
  61         retval->tm_mon = 0;
  62         retval->tm_mday = 1;
  63         retval->tm_year = 100;
  64       }
  65     else
  66       memcpy ((void *) retval, (void *) ptm, sizeof (struct tm));
  67   }
  68 #endif /* HAVE_LOCALTIME_R */
  69 }
  70
  71 static void
  72 test_GDateTime_now (void)
  73 {
  74   GDateTime *dt;
  75   struct tm tm;
  76   time_t before;
  77   time_t after;
  78
  79   /* before <= dt.to_unix() <= after, but the inequalities might not be
  80    * equality if we're close to the boundary between seconds.
  81    * We loop until before == after (and hence dt.to_unix() should equal both)
  82    * to guard against that. */
  83   do
  84     {
  85       before = g_get_real_time () / G_TIME_SPAN_SECOND;
  86
  87       memset (&tm, 0, sizeof (tm));
  88       get_localtime_tm (before, &tm);
  89
  90       dt = g_date_time_new_now_local ();
  91
  92       after = g_get_real_time () / G_TIME_SPAN_SECOND;
  93     }
  94   while (before != after);
  95
  96   g_assert_cmpint (g_date_time_get_year (dt), ==, 1900 + tm.tm_year);
  97   g_assert_cmpint (g_date_time_get_month (dt), ==, 1 + tm.tm_mon);
  98   g_assert_cmpint (g_date_time_get_day_of_month (dt), ==, tm.tm_mday);
  99   g_assert_cmpint (g_date_time_get_hour (dt), ==, tm.tm_hour);
 100   g_assert_cmpint (g_date_time_get_minute (dt), ==, tm.tm_min);
 101   g_assert_cmpint (g_date_time_get_second (dt), ==, tm.tm_sec);
 102
 103   g_date_time_unref (dt);
 104 }
 105
 106 static void
 107 test_GDateTime_new_from_unix (void)
 108 {
 109   GDateTime *dt;
 110   struct tm  tm;
 111   time_t     t;
 112
 113   memset (&tm, 0, sizeof (tm));
 114   t = time (NULL);
 115   get_localtime_tm (t, &tm);
 116
 117   dt = g_date_time_new_from_unix_local (t);
 118   g_assert_cmpint (g_date_time_get_year (dt), ==, 1900 + tm.tm_year);
 119   g_assert_cmpint (g_date_time_get_month (dt), ==, 1 + tm.tm_mon);
 120   g_assert_cmpint (g_date_time_get_day_of_month (dt), ==, tm.tm_mday);
 121   g_assert_cmpint (g_date_time_get_hour (dt), ==, tm.tm_hour);
 122   g_assert_cmpint (g_date_time_get_minute (dt), ==, tm.tm_min);
 123   g_assert_cmpint (g_date_time_get_second (dt), ==, tm.tm_sec);
 124   g_date_time_unref (dt);
 125
 126   /* Choose 1990-01-01 04:00:00 because no DST leaps happened then. The more
 127    * obvious 1990-01-01 00:00:00 was a DST leap in America/Lima (which has,
 128    * confusingly, since stopped using DST). */
 129   memset (&tm, 0, sizeof (tm));
 130   tm.tm_year = 90;
 131   tm.tm_mday = 1;
 132   tm.tm_mon = 0;
 133   tm.tm_hour = 4;
 134   tm.tm_min = 0;
 135   tm.tm_sec = 0;
 136   tm.tm_isdst = -1;
 137   t = mktime (&tm);
 138
 139   dt = g_date_time_new_from_unix_local (t);
 140   g_assert_cmpint (g_date_time_get_year (dt), ==, 1990);
 141   g_assert_cmpint (g_date_time_get_month (dt), ==, 1);
 142   g_assert_cmpint (g_date_time_get_day_of_month (dt), ==, 1);
 143   g_assert_cmpint (g_date_time_get_hour (dt), ==, 4);
 144   g_assert_cmpint (g_date_time_get_minute (dt), ==, 0);
 145   g_assert_cmpint (g_date_time_get_second (dt), ==, 0);
 146   g_date_time_unref (dt);
 147 }
 148
 149 /* Check that trying to create a #GDateTime too far in the future reliably
 150  * fails. Previously, the checks for this overflowed and it silently returned
 151  * an incorrect #GDateTime. */
 152 static void
 153 test_GDateTime_new_from_unix_overflow (void)
 154 {
 155   GDateTime *dt;
 156
 157   g_test_bug ("782089");
 158
 159   dt = g_date_time_new_from_unix_utc (G_MAXINT64);
 160   g_assert_null (dt);
 161
 162   dt = g_date_time_new_from_unix_local (G_MAXINT64);
 163   g_assert_null (dt);
 164 }
 165
 166 static void
 167 test_GDateTime_invalid (void)
 168 {
 169   GDateTime *dt;
 170
 171   g_test_bug ("702674");
 172
 173   dt = g_date_time_new_utc (2013, -2147483647, 31, 17, 15, 48);
 174   g_assert (dt == NULL);
 175 }
 176
 177 static void
 178 test_GDateTime_compare (void)
 179 {
 180   GDateTime *dt1, *dt2;
 181   gint       i;
 182
 183   dt1 = g_date_time_new_utc (2000, 1, 1, 0, 0, 0);
 184
 185   for (i = 1; i < 2000; i++)
 186     {
 187       dt2 = g_date_time_new_utc (i, 12, 31, 0, 0, 0);
 188       g_assert_cmpint (1, ==, g_date_time_compare (dt1, dt2));
 189       g_date_time_unref (dt2);
 190     }
 191
 192   dt2 = g_date_time_new_utc (1999, 12, 31, 23, 59, 59);
 193   g_assert_cmpint (1, ==, g_date_time_compare (dt1, dt2));
 194   g_date_time_unref (dt2);
 195
 196   dt2 = g_date_time_new_utc (2000, 1, 1, 0, 0, 1);
 197   g_assert_cmpint (-1, ==, g_date_time_compare (dt1, dt2));
 198   g_date_time_unref (dt2);
 199
 200   dt2 = g_date_time_new_utc (2000, 1, 1, 0, 0, 0);
 201   g_assert_cmpint (0, ==, g_date_time_compare (dt1, dt2));
 202   g_date_time_unref (dt2);
 203   g_date_time_unref (dt1);
 204 }
 205
 206 static void
 207 test_GDateTime_equal (void)
 208 {
 209   GDateTime *dt1, *dt2;
 210   GTimeZone *tz;
 211
 212   dt1 = g_date_time_new_local (2009, 10, 19, 0, 0, 0);
 213   dt2 = g_date_time_new_local (2009, 10, 19, 0, 0, 0);
 214   g_assert (g_date_time_equal (dt1, dt2));
 215   g_date_time_unref (dt1);
 216   g_date_time_unref (dt2);
 217
 218   dt1 = g_date_time_new_local (2009, 10, 18, 0, 0, 0);
 219   dt2 = g_date_time_new_local (2009, 10, 19, 0, 0, 0);
 220   g_assert (!g_date_time_equal (dt1, dt2));
 221   g_date_time_unref (dt1);
 222   g_date_time_unref (dt2);
 223
 224   /* UTC-0300 and not in DST */
 225   tz = g_time_zone_new ("-03:00");
 226   dt1 = g_date_time_new (tz, 2010, 5, 24,  8, 0, 0);
 227   g_time_zone_unref (tz);
 228   g_assert_cmpint (g_date_time_get_utc_offset (dt1) / G_USEC_PER_SEC, ==, (-3 * 3600));
 229   /* UTC */
 230   dt2 = g_date_time_new_utc (2010, 5, 24, 11, 0, 0);
 231   g_assert_cmpint (g_date_time_get_utc_offset (dt2), ==, 0);
 232
 233   g_assert (g_date_time_equal (dt1, dt2));
 234   g_date_time_unref (dt1);
 235
 236   /* America/Recife is in UTC-0300 */
 237 #ifdef G_OS_UNIX
 238   tz = g_time_zone_new ("America/Recife");
 239 #elif defined G_OS_WIN32
 240   tz = g_time_zone_new ("E. South America Standard Time");
 241 #endif
 242   dt1 = g_date_time_new (tz, 2010, 5, 24,  8, 0, 0);
 243   g_time_zone_unref (tz);
 244   g_assert_cmpint (g_date_time_get_utc_offset (dt1) / G_USEC_PER_SEC, ==, (-3 * 3600));
 245   g_assert (g_date_time_equal (dt1, dt2));
 246   g_date_time_unref (dt1);
 247   g_date_time_unref (dt2);
 248 }
 249
 250 static void
 251 test_GDateTime_get_day_of_week (void)
 252 {
 253   GDateTime *dt;
 254
 255   dt = g_date_time_new_local (2009, 10, 19, 0, 0, 0);
 256   g_assert_cmpint (1, ==, g_date_time_get_day_of_week (dt));
 257   g_date_time_unref (dt);
 258
 259   dt = g_date_time_new_local (2000, 10, 1, 0, 0, 0);
 260   g_assert_cmpint (7, ==, g_date_time_get_day_of_week (dt));
 261   g_date_time_unref (dt);
 262 }
 263
 264 static void
 265 test_GDateTime_get_day_of_month (void)
 266 {
 267   GDateTime *dt;
 268
 269   dt = g_date_time_new_local (2009, 10, 19, 0, 0, 0);
 270   g_assert_cmpint (g_date_time_get_day_of_month (dt), ==, 19);
 271   g_date_time_unref (dt);
 272
 273   dt = g_date_time_new_local (1400, 3, 12, 0, 0, 0);
 274   g_assert_cmpint (g_date_time_get_day_of_month (dt), ==, 12);
 275   g_date_time_unref (dt);
 276
 277   dt = g_date_time_new_local (1800, 12, 31, 0, 0, 0);
 278   g_assert_cmpint (g_date_time_get_day_of_month (dt), ==, 31);
 279   g_date_time_unref (dt);
 280
 281   dt = g_date_time_new_local (1000, 1, 1, 0, 0, 0);
 282   g_assert_cmpint (g_date_time_get_day_of_month (dt), ==, 1);
 283   g_date_time_unref (dt);
 284 }
 285
 286 static void
 287 test_GDateTime_get_hour (void)
 288 {
 289   GDateTime *dt;
 290
 291   dt = g_date_time_new_utc (2009, 10, 19, 15, 13, 11);
 292   g_assert_cmpint (15, ==, g_date_time_get_hour (dt));
 293   g_date_time_unref (dt);
 294
 295   dt = g_date_time_new_utc (100, 10, 19, 1, 0, 0);
 296   g_assert_cmpint (1, ==, g_date_time_get_hour (dt));
 297   g_date_time_unref (dt);
 298
 299   dt = g_date_time_new_utc (100, 10, 19, 0, 0, 0);
 300   g_assert_cmpint (0, ==, g_date_time_get_hour (dt));
 301   g_date_time_unref (dt);
 302
 303   dt = g_date_time_new_utc (100, 10, 1, 23, 59, 59);
 304   g_assert_cmpint (23, ==, g_date_time_get_hour (dt));
 305   g_date_time_unref (dt);
 306 }
 307
 308 static void
 309 test_GDateTime_get_microsecond (void)
 310 {
 311   GTimeVal   tv;
 312   GDateTime *dt;
 313
 314   g_get_current_time (&tv);
 315   dt = g_date_time_new_from_timeval_local (&tv);
 316   g_assert_cmpint (tv.tv_usec, ==, g_date_time_get_microsecond (dt));
 317   g_date_time_unref (dt);
 318 }
 319
 320 static void
 321 test_GDateTime_get_year (void)
 322 {
 323   GDateTime *dt;
 324
 325   dt = g_date_time_new_local (2009, 1, 1, 0, 0, 0);
 326   g_assert_cmpint (2009, ==, g_date_time_get_year (dt));
 327   g_date_time_unref (dt);
 328
 329   dt = g_date_time_new_local (1, 1, 1, 0, 0, 0);
 330   g_assert_cmpint (1, ==, g_date_time_get_year (dt));
 331   g_date_time_unref (dt);
 332
 333   dt = g_date_time_new_local (13, 1, 1, 0, 0, 0);
 334   g_assert_cmpint (13, ==, g_date_time_get_year (dt));
 335   g_date_time_unref (dt);
 336
 337   dt = g_date_time_new_local (3000, 1, 1, 0, 0, 0);
 338   g_assert_cmpint (3000, ==, g_date_time_get_year (dt));
 339   g_date_time_unref (dt);
 340 }
 341
 342 static void
 343 test_GDateTime_hash (void)
 344 {
 345   GHashTable *h;
 346
 347   h = g_hash_table_new_full (g_date_time_hash, g_date_time_equal,
 348                              (GDestroyNotify)g_date_time_unref,
 349                              NULL);
 350   g_hash_table_add (h, g_date_time_new_now_local ());
 351   g_hash_table_remove_all (h);
 352   g_hash_table_destroy (h);
 353 }
 354
 355 static void
 356 test_GDateTime_new_from_timeval (void)
 357 {
 358   GDateTime *dt;
 359   GTimeVal   tv, tv2;
 360
 361   g_get_current_time (&tv);
 362   dt = g_date_time_new_from_timeval_local (&tv);
 363
 364   if (g_test_verbose ())
 365     g_printerr ("\nDT%04d-%02d-%02dT%02d:%02d:%02d%s\n",
 366              g_date_time_get_year (dt),
 367              g_date_time_get_month (dt),
 368              g_date_time_get_day_of_month (dt),
 369              g_date_time_get_hour (dt),
 370              g_date_time_get_minute (dt),
 371              g_date_time_get_second (dt),
 372              g_date_time_get_timezone_abbreviation (dt));
 373
 374   g_date_time_to_timeval (dt, &tv2);
 375   g_assert_cmpint (tv.tv_sec, ==, tv2.tv_sec);
 376   g_assert_cmpint (tv.tv_usec, ==, tv2.tv_usec);
 377   g_date_time_unref (dt);
 378 }
 379
 380 static glong
 381 find_maximum_supported_tv_sec (void)
 382 {
 383   glong highest_success = 0, lowest_failure = G_MAXLONG;
 384   GTimeVal tv;
 385   GDateTime *dt = NULL;
 386
 387   tv.tv_usec = 0;
 388
 389   /* Corner case of all glong values being valid. */
 390   tv.tv_sec = G_MAXLONG;
 391   dt = g_date_time_new_from_timeval_utc (&tv);
 392   if (dt != NULL)
 393     {
 394       highest_success = tv.tv_sec;
 395       g_date_time_unref (dt);
 396     }
 397
 398   while (highest_success < lowest_failure - 1)
 399     {
 400       tv.tv_sec = highest_success + (lowest_failure - highest_success) / 2;
 401       dt = g_date_time_new_from_timeval_utc (&tv);
 402
 403       if (dt != NULL)
 404         {
 405           highest_success = tv.tv_sec;
 406           g_date_time_unref (dt);
 407         }
 408       else
 409         {
 410           lowest_failure = tv.tv_sec;
 411         }
 412     }
 413
 414   return highest_success;
 415 }
 416
 417 /* Check that trying to create a #GDateTime too far in the future reliably
 418  * fails. With a #GTimeVal, this is subtle, as the tv_usec are added into the
 419  * calculation part-way through.
 420  *
 421  * This varies a bit between 32- and 64-bit architectures, due to the
 422  * differences in the size of glong (tv.tv_sec). */
 423 static void
 424 test_GDateTime_new_from_timeval_overflow (void)
 425 {
 426   GDateTime *dt;
 427   GTimeVal tv;
 428
 429   g_test_bug ("782089");
 430
 431   tv.tv_sec = find_maximum_supported_tv_sec ();
 432   tv.tv_usec = G_USEC_PER_SEC - 1;
 433
 434   g_test_message ("Maximum supported GTimeVal.tv_sec = %lu", tv.tv_sec);
 435
 436   /* Sanity check: do we support the year 2000? */
 437   g_assert_cmpint (tv.tv_sec, >=, 946684800);
 438
 439   dt = g_date_time_new_from_timeval_utc (&tv);
 440   g_assert_nonnull (dt);
 441   g_date_time_unref (dt);
 442
 443   if (tv.tv_sec < G_MAXLONG)
 444     {
 445       tv.tv_sec++;
 446       tv.tv_usec = 0;
 447
 448       dt = g_date_time_new_from_timeval_utc (&tv);
 449       g_assert_null (dt);
 450     }
 451 }
 452
 453 static void
 454 test_GDateTime_new_from_timeval_utc (void)
 455 {
 456   GDateTime *dt;
 457   GTimeVal   tv, tv2;
 458
 459   g_get_current_time (&tv);
 460   dt = g_date_time_new_from_timeval_utc (&tv);
 461
 462   if (g_test_verbose ())
 463     g_printerr ("\nDT%04d-%02d-%02dT%02d:%02d:%02d%s\n",
 464              g_date_time_get_year (dt),
 465              g_date_time_get_month (dt),
 466              g_date_time_get_day_of_month (dt),
 467              g_date_time_get_hour (dt),
 468              g_date_time_get_minute (dt),
 469              g_date_time_get_second (dt),
 470              g_date_time_get_timezone_abbreviation (dt));
 471
 472   g_date_time_to_timeval (dt, &tv2);
 473   g_assert_cmpint (tv.tv_sec, ==, tv2.tv_sec);
 474   g_assert_cmpint (tv.tv_usec, ==, tv2.tv_usec);
 475   g_date_time_unref (dt);
 476 }
 477
 478 static void
 479 test_GDateTime_new_from_iso8601 (void)
 480 {
 481   GDateTime *dt;
 482   GTimeZone *tz;
 483
 484   /* Need non-empty string */
 485   dt = g_date_time_new_from_iso8601 ("", NULL);
 486   g_assert_null (dt);
 487
 488   /* Needs to be correctly formatted */
 489   dt = g_date_time_new_from_iso8601 ("not a date", NULL);
 490   g_assert_null (dt);
 491
 492   /* Check common case */
 493   dt = g_date_time_new_from_iso8601 ("2016-08-24T22:10:42Z", NULL);
 494   ASSERT_DATE (dt, 2016, 8, 24);
 495   ASSERT_TIME (dt, 22, 10, 42, 0);
 496   g_date_time_unref (dt);
 497
 498   /* Timezone is required in text or passed as arg */
 499   tz = g_time_zone_new_utc ();
 500   dt = g_date_time_new_from_iso8601 ("2016-08-24T22:10:42", tz);
 501   ASSERT_DATE (dt, 2016, 8, 24);
 502   g_date_time_unref (dt);
 503   g_time_zone_unref (tz);
 504   dt = g_date_time_new_from_iso8601 ("2016-08-24T22:10:42", NULL);
 505   g_assert_null (dt);
 506
 507   /* Can't have whitespace */
 508   dt = g_date_time_new_from_iso8601 ("2016 08 24T22:10:42Z", NULL);
 509   g_assert_null (dt);
 510   dt = g_date_time_new_from_iso8601 ("2016-08-24T22:10:42Z ", NULL);
 511   g_assert_null (dt);
 512   dt = g_date_time_new_from_iso8601 (" 2016-08-24T22:10:42Z", NULL);
 513   g_assert_null (dt);
 514
 515   /* Check lowercase time separator or space allowed */
 516   dt = g_date_time_new_from_iso8601 ("2016-08-24t22:10:42Z", NULL);
 517   ASSERT_DATE (dt, 2016, 8, 24);
 518   ASSERT_TIME (dt, 22, 10, 42, 0);
 519   g_date_time_unref (dt);
 520   dt = g_date_time_new_from_iso8601 ("2016-08-24 22:10:42Z", NULL);
 521   ASSERT_DATE (dt, 2016, 8, 24);
 522   ASSERT_TIME (dt, 22, 10, 42, 0);
 523   g_date_time_unref (dt);
 524
 525   /* Check dates without separators allowed */
 526   dt = g_date_time_new_from_iso8601 ("20160824T22:10:42Z", NULL);
 527   ASSERT_DATE (dt, 2016, 8, 24);
 528   ASSERT_TIME (dt, 22, 10, 42, 0);
 529   g_date_time_unref (dt);
 530
 531   /* Months are two digits */
 532   dt = g_date_time_new_from_iso8601 ("2016-1-01T22:10:42Z", NULL);
 533   g_assert_null (dt);
 534
 535   /* Days are two digits */
 536   dt = g_date_time_new_from_iso8601 ("2016-01-1T22:10:42Z", NULL);
 537   g_assert_null (dt);
 538
 539   /* Need consistent usage of separators */
 540   dt = g_date_time_new_from_iso8601 ("2016-0824T22:10:42Z", NULL);
 541   g_assert_null (dt);
 542   dt = g_date_time_new_from_iso8601 ("201608-24T22:10:42Z", NULL);
 543   g_assert_null (dt);
 544
 545   /* Check month within valid range */
 546   dt = g_date_time_new_from_iso8601 ("2016-00-13T22:10:42Z", NULL);
 547   g_assert_null (dt);
 548   dt = g_date_time_new_from_iso8601 ("2016-13-13T22:10:42Z", NULL);
 549   g_assert_null (dt);
 550
 551   /* Check day within valid range */
 552   dt = g_date_time_new_from_iso8601 ("2016-01-00T22:10:42Z", NULL);
 553   g_assert_null (dt);
 554   dt = g_date_time_new_from_iso8601 ("2016-01-31T22:10:42Z", NULL);
 555   ASSERT_DATE (dt, 2016, 1, 31);
 556   g_date_time_unref (dt);
 557   dt = g_date_time_new_from_iso8601 ("2016-01-32T22:10:42Z", NULL);
 558   g_assert_null (dt);
 559   dt = g_date_time_new_from_iso8601 ("2016-02-29T22:10:42Z", NULL);
 560   ASSERT_DATE (dt, 2016, 2, 29);
 561   g_date_time_unref (dt);
 562   dt = g_date_time_new_from_iso8601 ("2016-02-30T22:10:42Z", NULL);
 563   g_assert_null (dt);
 564   dt = g_date_time_new_from_iso8601 ("2017-02-28T22:10:42Z", NULL);
 565   ASSERT_DATE (dt, 2017, 2, 28);
 566   g_date_time_unref (dt);
 567   dt = g_date_time_new_from_iso8601 ("2017-02-29T22:10:42Z", NULL);
 568   g_assert_null (dt);
 569   dt = g_date_time_new_from_iso8601 ("2016-03-31T22:10:42Z", NULL);
 570   ASSERT_DATE (dt, 2016, 3, 31);
 571   g_date_time_unref (dt);
 572   dt = g_date_time_new_from_iso8601 ("2016-03-32T22:10:42Z", NULL);
 573   g_assert_null (dt);
 574   dt = g_date_time_new_from_iso8601 ("2016-04-30T22:10:42Z", NULL);
 575   ASSERT_DATE (dt, 2016, 4, 30);
 576   g_date_time_unref (dt);
 577   dt = g_date_time_new_from_iso8601 ("2016-04-31T22:10:42Z", NULL);
 578   g_assert_null (dt);
 579   dt = g_date_time_new_from_iso8601 ("2016-05-31T22:10:42Z", NULL);
 580   ASSERT_DATE (dt, 2016, 5, 31);
 581   g_date_time_unref (dt);
 582   dt = g_date_time_new_from_iso8601 ("2016-05-32T22:10:42Z", NULL);
 583   g_assert_null (dt);
 584   dt = g_date_time_new_from_iso8601 ("2016-06-30T22:10:42Z", NULL);
 585   ASSERT_DATE (dt, 2016, 6, 30);
 586   g_date_time_unref (dt);
 587   dt = g_date_time_new_from_iso8601 ("2016-06-31T22:10:42Z", NULL);
 588   g_assert_null (dt);
 589   dt = g_date_time_new_from_iso8601 ("2016-07-31T22:10:42Z", NULL);
 590   ASSERT_DATE (dt, 2016, 7, 31);
 591   g_date_time_unref (dt);
 592   dt = g_date_time_new_from_iso8601 ("2016-07-32T22:10:42Z", NULL);
 593   g_assert_null (dt);
 594   dt = g_date_time_new_from_iso8601 ("2016-08-31T22:10:42Z", NULL);
 595   ASSERT_DATE (dt, 2016, 8, 31);
 596   g_date_time_unref (dt);
 597   dt = g_date_time_new_from_iso8601 ("2016-08-32T22:10:42Z", NULL);
 598   g_assert_null (dt);
 599   dt = g_date_time_new_from_iso8601 ("2016-09-30T22:10:42Z", NULL);
 600   ASSERT_DATE (dt, 2016, 9, 30);
 601   g_date_time_unref (dt);
 602   dt = g_date_time_new_from_iso8601 ("2016-09-31T22:10:42Z", NULL);
 603   g_assert_null (dt);
 604   dt = g_date_time_new_from_iso8601 ("2016-10-31T22:10:42Z", NULL);
 605   ASSERT_DATE (dt, 2016, 10, 31);
 606   g_date_time_unref (dt);
 607   dt = g_date_time_new_from_iso8601 ("2016-10-32T22:10:42Z", NULL);
 608   g_assert_null (dt);
 609   dt = g_date_time_new_from_iso8601 ("2016-11-30T22:10:42Z", NULL);
 610   ASSERT_DATE (dt, 2016, 11, 30);
 611   g_date_time_unref (dt);
 612   dt = g_date_time_new_from_iso8601 ("2016-11-31T22:10:42Z", NULL);
 613   g_assert_null (dt);
 614   dt = g_date_time_new_from_iso8601 ("2016-12-31T22:10:42Z", NULL);
 615   ASSERT_DATE (dt, 2016, 12, 31);
 616   g_date_time_unref (dt);
 617   dt = g_date_time_new_from_iso8601 ("2016-12-32T22:10:42Z", NULL);
 618   g_assert_null (dt);
 619
 620   /* Check ordinal days work */
 621   dt = g_date_time_new_from_iso8601 ("2016-237T22:10:42Z", NULL);
 622   ASSERT_DATE (dt, 2016, 8, 24);
 623   ASSERT_TIME (dt, 22, 10, 42, 0);
 624   g_date_time_unref (dt);
 625   dt = g_date_time_new_from_iso8601 ("2016237T22:10:42Z", NULL);
 626   ASSERT_DATE (dt, 2016, 8, 24);
 627   ASSERT_TIME (dt, 22, 10, 42, 0);
 628   g_date_time_unref (dt);
 629
 630   /* Check ordinal leap days */
 631   dt = g_date_time_new_from_iso8601 ("2016-366T22:10:42Z", NULL);
 632   ASSERT_DATE (dt, 2016, 12, 31);
 633   ASSERT_TIME (dt, 22, 10, 42, 0);
 634   g_date_time_unref (dt);
 635   dt = g_date_time_new_from_iso8601 ("2017-365T22:10:42Z", NULL);
 636   ASSERT_DATE (dt, 2017, 12, 31);
 637   ASSERT_TIME (dt, 22, 10, 42, 0);
 638   g_date_time_unref (dt);
 639   dt = g_date_time_new_from_iso8601 ("2017-366T22:10:42Z", NULL);
 640   g_assert_null (dt);
 641
 642   /* Days start at 1 */
 643   dt = g_date_time_new_from_iso8601 ("2016-000T22:10:42Z", NULL);
 644   g_assert_null (dt);
 645
 646   /* Limited to number of days in the year (2016 is a leap year) */
 647   dt = g_date_time_new_from_iso8601 ("2016-367T22:10:42Z", NULL);
 648   g_assert_null (dt);
 649
 650   /* Days are two digits */
 651   dt = g_date_time_new_from_iso8601 ("2016-1T22:10:42Z", NULL);
 652   g_assert_null (dt);
 653   dt = g_date_time_new_from_iso8601 ("2016-12T22:10:42Z", NULL);
 654   g_assert_null (dt);
 655
 656   /* Check week days work */
 657   dt = g_date_time_new_from_iso8601 ("2016-W34-3T22:10:42Z", NULL);
 658   ASSERT_DATE (dt, 2016, 8, 24);
 659   ASSERT_TIME (dt, 22, 10, 42, 0);
 660   g_date_time_unref (dt);
 661   dt = g_date_time_new_from_iso8601 ("2016W343T22:10:42Z", NULL);
 662   ASSERT_DATE (dt, 2016, 8, 24);
 663   ASSERT_TIME (dt, 22, 10, 42, 0);
 664   g_date_time_unref (dt);
 665
 666   /* We don't support weeks without weekdays (valid ISO 8601) */
 667   dt = g_date_time_new_from_iso8601 ("2016-W34T22:10:42Z", NULL);
 668   g_assert_null (dt);
 669   dt = g_date_time_new_from_iso8601 ("2016W34T22:10:42Z", NULL);
 670   g_assert_null (dt);
 671
 672   /* Weeks are two digits */
 673   dt = g_date_time_new_from_iso8601 ("2016-W3-1T22:10:42Z", NULL);
 674   g_assert_null (dt);
 675
 676   /* Weeks start at 1 */
 677   dt = g_date_time_new_from_iso8601 ("2016-W00-1T22:10:42Z", NULL);
 678   g_assert_null (dt);
 679
 680   /* Week one might be in the previous year */
 681   dt = g_date_time_new_from_iso8601 ("2015-W01-1T22:10:42Z", NULL);
 682   ASSERT_DATE (dt, 2014, 12, 29);
 683   g_date_time_unref (dt);
 684
 685   /* Last week might be in next year */
 686   dt = g_date_time_new_from_iso8601 ("2015-W53-7T22:10:42Z", NULL);
 687   ASSERT_DATE (dt, 2016, 1, 3);
 688   g_date_time_unref (dt);
 689
 690   /* Week 53 doesn't always exist */
 691   dt = g_date_time_new_from_iso8601 ("2016-W53-1T22:10:42Z", NULL);
 692   g_assert_null (dt);
 693
 694   /* Limited to number of days in the week */
 695   dt = g_date_time_new_from_iso8601 ("2016-W34-0T22:10:42Z", NULL);
 696   g_assert_null (dt);
 697   dt = g_date_time_new_from_iso8601 ("2016-W34-8T22:10:42Z", NULL);
 698   g_assert_null (dt);
 699
 700   /* Days are one digit */
 701   dt = g_date_time_new_from_iso8601 ("2016-W34-99T22:10:42Z", NULL);
 702   g_assert_null (dt);
 703
 704   /* Check week day changes depending on year */
 705   dt = g_date_time_new_from_iso8601 ("2017-W34-1T22:10:42Z", NULL);
 706   ASSERT_DATE (dt, 2017, 8, 21);
 707   g_date_time_unref (dt);
 708
 709   /* Check week day changes depending on leap years */
 710   dt = g_date_time_new_from_iso8601 ("1900-W01-1T22:10:42Z", NULL);
 711   ASSERT_DATE (dt, 1900, 1, 1);
 712   g_date_time_unref (dt);
 713
 714   /* YYYY-MM not allowed (NOT valid ISO 8601) */
 715   dt = g_date_time_new_from_iso8601 ("2016-08T22:10:42Z", NULL);
 716   g_assert_null (dt);
 717
 718   /* We don't support omitted year (valid ISO 8601) */
 719   dt = g_date_time_new_from_iso8601 ("--08-24T22:10:42Z", NULL);
 720   g_assert_null (dt);
 721   dt = g_date_time_new_from_iso8601 ("--0824T22:10:42Z", NULL);
 722   g_assert_null (dt);
 723
 724   /* Check subseconds work */
 725   dt = g_date_time_new_from_iso8601 ("2016-08-24T22:10:42.123456Z", NULL);
 726   ASSERT_DATE (dt, 2016, 8, 24);
 727   ASSERT_TIME (dt, 22, 10, 42, 123456);
 728   g_date_time_unref (dt);
 729   dt = g_date_time_new_from_iso8601 ("2016-08-24T22:10:42,123456Z", NULL);
 730   ASSERT_DATE (dt, 2016, 8, 24);
 731   ASSERT_TIME (dt, 22, 10, 42, 123456);
 732   g_date_time_unref (dt);
 733   dt = g_date_time_new_from_iso8601 ("2016-08-24T22:10:42.Z", NULL);
 734   g_assert_null (dt);
 735   dt = g_date_time_new_from_iso8601 ("2016-08-24T221042.123456Z", NULL);
 736   ASSERT_DATE (dt, 2016, 8, 24);
 737   ASSERT_TIME (dt, 22, 10, 42, 123456);
 738   g_date_time_unref (dt);
 739
 740   /* We don't support times without minutes / seconds (valid ISO 8601) */
 741   dt = g_date_time_new_from_iso8601 ("2016-08-24T22Z", NULL);
 742   g_assert_null (dt);
 743   dt = g_date_time_new_from_iso8601 ("2016-08-24T22:10Z", NULL);
 744   g_assert_null (dt);
 745   dt = g_date_time_new_from_iso8601 ("2016-08-24T2210Z", NULL);
 746   g_assert_null (dt);
 747
 748   /* UTC time uses 'Z' */
 749   dt = g_date_time_new_from_iso8601 ("2016-08-24T22:10:42Z", NULL);
 750   ASSERT_DATE (dt, 2016, 8, 24);
 751   ASSERT_TIME (dt, 22, 10, 42, 0);
 752   g_assert_cmpint (g_date_time_get_utc_offset (dt), ==, 0);
 753   g_date_time_unref (dt);
 754
 755   /* Check timezone works */
 756   dt = g_date_time_new_from_iso8601 ("2016-08-24T22:10:42+12:00", NULL);
 757   ASSERT_DATE (dt, 2016, 8, 24);
 758   ASSERT_TIME (dt, 22, 10, 42, 0);
 759   g_assert_cmpint (g_date_time_get_utc_offset (dt), ==, 12 * G_TIME_SPAN_HOUR);
 760   g_date_time_unref (dt);
 761   dt = g_date_time_new_from_iso8601 ("2016-08-24T22:10:42+12", NULL);
 762   ASSERT_DATE (dt, 2016, 8, 24);
 763   ASSERT_TIME (dt, 22, 10, 42, 0);
 764   g_assert_cmpint (g_date_time_get_utc_offset (dt), ==, 12 * G_TIME_SPAN_HOUR);
 765   g_date_time_unref (dt);
 766   dt = g_date_time_new_from_iso8601 ("2016-08-24T22:10:42-02", NULL);
 767   ASSERT_DATE (dt, 2016, 8, 24);
 768   ASSERT_TIME (dt, 22, 10, 42, 0);
 769   g_assert_cmpint (g_date_time_get_utc_offset (dt), ==, -2 * G_TIME_SPAN_HOUR);
 770   g_date_time_unref (dt);
 771
 772   /* Timezone seconds not allowed */
 773   dt = g_date_time_new_from_iso8601 ("2016-08-24T22-12:00:00", NULL);
 774   g_assert_null (dt);
 775   dt = g_date_time_new_from_iso8601 ("2016-08-24T22-12:00:00.000", NULL);
 776   g_assert_null (dt);
 777
 778   /* Timezone hours two digits */
 779   dt = g_date_time_new_from_iso8601 ("2016-08-24T22-2Z", NULL);
 780   g_assert_null (dt);
 781 }
 782
 783 static void
 784 test_GDateTime_to_unix (void)
 785 {
 786   GDateTime *dt;
 787   time_t     t;
 788
 789   t = time (NULL);
 790   dt = g_date_time_new_from_unix_local (t);
 791   g_assert_cmpint (g_date_time_to_unix (dt), ==, t);
 792   g_date_time_unref (dt);
 793 }
 794
 795 static void
 796 test_GDateTime_add_years (void)
 797 {
 798   GDateTime *dt, *dt2;
 799
 800   dt = g_date_time_new_local (2009, 10, 19, 0, 0, 0);
 801   dt2 = g_date_time_add_years (dt, 1);
 802   g_assert_cmpint (2010, ==, g_date_time_get_year (dt2));
 803   g_date_time_unref (dt);
 804   g_date_time_unref (dt2);
 805 }
 806
 807 static void
 808 test_GDateTime_add_months (void)
 809 {
 810 #define TEST_ADD_MONTHS(y,m,d,a,ny,nm,nd) G_STMT_START { \
 811   GDateTime *dt, *dt2; \
 812   dt = g_date_time_new_utc (y, m, d, 0, 0, 0); \
 813   dt2 = g_date_time_add_months (dt, a); \
 814   ASSERT_DATE (dt2, ny, nm, nd); \
 815   g_date_time_unref (dt); \
 816   g_date_time_unref (dt2); \
 817 } G_STMT_END
 818
 819   TEST_ADD_MONTHS (2009, 12, 31,    1, 2010, 1, 31);
 820   TEST_ADD_MONTHS (2009, 12, 31,    1, 2010, 1, 31);
 821   TEST_ADD_MONTHS (2009,  6, 15,    1, 2009, 7, 15);
 822   TEST_ADD_MONTHS (1400,  3,  1,    1, 1400, 4,  1);
 823   TEST_ADD_MONTHS (1400,  1, 31,    1, 1400, 2, 28);
 824   TEST_ADD_MONTHS (1400,  1, 31, 7200, 2000, 1, 31);
 825   TEST_ADD_MONTHS (2008,  2, 29,   12, 2009, 2, 28);
 826   TEST_ADD_MONTHS (2000,  8, 16,   -5, 2000, 3, 16);
 827   TEST_ADD_MONTHS (2000,  8, 16,  -12, 1999, 8, 16);
 828   TEST_ADD_MONTHS (2011,  2,  1,  -13, 2010, 1,  1);
 829   TEST_ADD_MONTHS (1776,  7,  4, 1200, 1876, 7,  4);
 830 }
 831
 832 static void
 833 test_GDateTime_add_days (void)
 834 {
 835 #define TEST_ADD_DAYS(y,m,d,a,ny,nm,nd) G_STMT_START { \
 836   GDateTime *dt, *dt2; \
 837   dt = g_date_time_new_local (y, m, d, 0, 0, 0); \
 838   dt2 = g_date_time_add_days (dt, a); \
 839   g_assert_cmpint (ny, ==, g_date_time_get_year (dt2)); \
 840   g_assert_cmpint (nm, ==, g_date_time_get_month (dt2)); \
 841   g_assert_cmpint (nd, ==, g_date_time_get_day_of_month (dt2)); \
 842   g_date_time_unref (dt); \
 843   g_date_time_unref (dt2); \
 844 } G_STMT_END
 845
 846   TEST_ADD_DAYS (2009, 1, 31, 1, 2009, 2, 1);
 847   TEST_ADD_DAYS (2009, 2, 1, -1, 2009, 1, 31);
 848   TEST_ADD_DAYS (2008, 2, 28, 1, 2008, 2, 29);
 849   TEST_ADD_DAYS (2008, 12, 31, 1, 2009, 1, 1);
 850   TEST_ADD_DAYS (1, 1, 1, 1, 1, 1, 2);
 851   TEST_ADD_DAYS (1955, 5, 24, 10, 1955, 6, 3);
 852   TEST_ADD_DAYS (1955, 5, 24, -10, 1955, 5, 14);
 853 }
 854
 855 static void
 856 test_GDateTime_add_weeks (void)
 857 {
 858 #define TEST_ADD_WEEKS(y,m,d,a,ny,nm,nd) G_STMT_START { \
 859   GDateTime *dt, *dt2; \
 860   dt = g_date_time_new_local (y, m, d, 0, 0, 0); \
 861   dt2 = g_date_time_add_weeks (dt, a); \
 862   g_assert_cmpint (ny, ==, g_date_time_get_year (dt2)); \
 863   g_assert_cmpint (nm, ==, g_date_time_get_month (dt2)); \
 864   g_assert_cmpint (nd, ==, g_date_time_get_day_of_month (dt2)); \
 865   g_date_time_unref (dt); \
 866   g_date_time_unref (dt2); \
 867 } G_STMT_END
 868
 869   TEST_ADD_WEEKS (2009, 1, 1, 1, 2009, 1, 8);
 870   TEST_ADD_WEEKS (2009, 8, 30, 1, 2009, 9, 6);
 871   TEST_ADD_WEEKS (2009, 12, 31, 1, 2010, 1, 7);
 872   TEST_ADD_WEEKS (2009, 1, 1, -1, 2008, 12, 25);
 873 }
 874
 875 static void
 876 test_GDateTime_add_hours (void)
 877 {
 878 #define TEST_ADD_HOURS(y,m,d,h,mi,s,a,ny,nm,nd,nh,nmi,ns) G_STMT_START { \
 879   GDateTime *dt, *dt2; \
 880   dt = g_date_time_new_utc (y, m, d, h, mi, s); \
 881   dt2 = g_date_time_add_hours (dt, a); \
 882   g_assert_cmpint (ny, ==, g_date_time_get_year (dt2)); \
 883   g_assert_cmpint (nm, ==, g_date_time_get_month (dt2)); \
 884   g_assert_cmpint (nd, ==, g_date_time_get_day_of_month (dt2)); \
 885   g_assert_cmpint (nh, ==, g_date_time_get_hour (dt2)); \
 886   g_assert_cmpint (nmi, ==, g_date_time_get_minute (dt2)); \
 887   g_assert_cmpint (ns, ==, g_date_time_get_second (dt2)); \
 888   g_date_time_unref (dt); \
 889   g_date_time_unref (dt2); \
 890 } G_STMT_END
 891
 892   TEST_ADD_HOURS (2009,  1,  1,  0, 0, 0, 1, 2009, 1, 1, 1, 0, 0);
 893   TEST_ADD_HOURS (2008, 12, 31, 23, 0, 0, 1, 2009, 1, 1, 0, 0, 0);
 894 }
 895
 896 static void
 897 test_GDateTime_add_full (void)
 898 {
 899 #define TEST_ADD_FULL(y,m,d,h,mi,s,ay,am,ad,ah,ami,as,ny,nm,nd,nh,nmi,ns) G_STMT_START { \
 900   GDateTime *dt, *dt2; \
 901   dt = g_date_time_new_utc (y, m, d, h, mi, s); \
 902   dt2 = g_date_time_add_full (dt, ay, am, ad, ah, ami, as); \
 903   g_assert_cmpint (ny, ==, g_date_time_get_year (dt2)); \
 904   g_assert_cmpint (nm, ==, g_date_time_get_month (dt2)); \
 905   g_assert_cmpint (nd, ==, g_date_time_get_day_of_month (dt2)); \
 906   g_assert_cmpint (nh, ==, g_date_time_get_hour (dt2)); \
 907   g_assert_cmpint (nmi, ==, g_date_time_get_minute (dt2)); \
 908   g_assert_cmpint (ns, ==, g_date_time_get_second (dt2)); \
 909   g_date_time_unref (dt); \
 910   g_date_time_unref (dt2); \
 911 } G_STMT_END
 912
 913   TEST_ADD_FULL (2009, 10, 21,  0,  0, 0,
 914                     1,  1,  1,  1,  1, 1,
 915                  2010, 11, 22,  1,  1, 1);
 916   TEST_ADD_FULL (2000,  1,  1,  1,  1, 1,
 917                     0,  1,  0,  0,  0, 0,
 918                  2000,  2,  1,  1,  1, 1);
 919   TEST_ADD_FULL (2000,  1,  1,  0,  0, 0,
 920                    -1,  1,  0,  0,  0, 0,
 921                  1999,  2,  1,  0,  0, 0);
 922   TEST_ADD_FULL (2010, 10, 31,  0,  0, 0,
 923                     0,  4,  0,  0,  0, 0,
 924                  2011,  2, 28,  0,  0, 0);
 925   TEST_ADD_FULL (2010,  8, 25, 22, 45, 0,
 926                     0,  1,  6,  1, 25, 0,
 927                  2010, 10,  2,  0, 10, 0);
 928 }
 929
 930 static void
 931 test_GDateTime_add_minutes (void)
 932 {
 933 #define TEST_ADD_MINUTES(i,o) G_STMT_START { \
 934   GDateTime *dt, *dt2; \
 935   dt = g_date_time_new_local (2000, 1, 1, 0, 0, 0); \
 936   dt2 = g_date_time_add_minutes (dt, i); \
 937   g_assert_cmpint (o, ==, g_date_time_get_minute (dt2)); \
 938   g_date_time_unref (dt); \
 939   g_date_time_unref (dt2); \
 940 } G_STMT_END
 941
 942   TEST_ADD_MINUTES (60, 0);
 943   TEST_ADD_MINUTES (100, 40);
 944   TEST_ADD_MINUTES (5, 5);
 945   TEST_ADD_MINUTES (1441, 1);
 946   TEST_ADD_MINUTES (-1441, 59);
 947 }
 948
 949 static void
 950 test_GDateTime_add_seconds (void)
 951 {
 952 #define TEST_ADD_SECONDS(i,o) G_STMT_START { \
 953   GDateTime *dt, *dt2; \
 954   dt = g_date_time_new_local (2000, 1, 1, 0, 0, 0); \
 955   dt2 = g_date_time_add_seconds (dt, i); \
 956   g_assert_cmpint (o, ==, g_date_time_get_second (dt2)); \
 957   g_date_time_unref (dt); \
 958   g_date_time_unref (dt2); \
 959 } G_STMT_END
 960
 961   TEST_ADD_SECONDS (1, 1);
 962   TEST_ADD_SECONDS (60, 0);
 963   TEST_ADD_SECONDS (61, 1);
 964   TEST_ADD_SECONDS (120, 0);
 965   TEST_ADD_SECONDS (-61, 59);
 966   TEST_ADD_SECONDS (86401, 1);
 967   TEST_ADD_SECONDS (-86401, 59);
 968   TEST_ADD_SECONDS (-31, 29);
 969   TEST_ADD_SECONDS (13, 13);
 970 }
 971
 972 static void
 973 test_GDateTime_diff (void)
 974 {
 975 #define TEST_DIFF(y,m,d,y2,m2,d2,u) G_STMT_START { \
 976   GDateTime *dt1, *dt2; \
 977   GTimeSpan  ts = 0; \
 978   dt1 = g_date_time_new_utc (y, m, d, 0, 0, 0); \
 979   dt2 = g_date_time_new_utc (y2, m2, d2, 0, 0, 0); \
 980   ts = g_date_time_difference (dt2, dt1); \
 981   g_assert_cmpint (ts, ==, u); \
 982   g_date_time_unref (dt1); \
 983   g_date_time_unref (dt2); \
 984 } G_STMT_END
 985
 986   TEST_DIFF (2009, 1, 1, 2009, 2, 1, G_TIME_SPAN_DAY * 31);
 987   TEST_DIFF (2009, 1, 1, 2010, 1, 1, G_TIME_SPAN_DAY * 365);
 988   TEST_DIFF (2008, 2, 28, 2008, 2, 29, G_TIME_SPAN_DAY);
 989   TEST_DIFF (2008, 2, 29, 2008, 2, 28, -G_TIME_SPAN_DAY);
 990
 991   /* TODO: Add usec tests */
 992 }
 993
 994 static void
 995 test_GDateTime_get_minute (void)
 996 {
 997   GDateTime *dt;
 998
 999   dt = g_date_time_new_utc (2009, 12, 1, 1, 31, 0);
1000   g_assert_cmpint (31, ==, g_date_time_get_minute (dt));
1001   g_date_time_unref (dt);
1002 }
1003
1004 static void
1005 test_GDateTime_get_month (void)
1006 {
1007   GDateTime *dt;
1008
1009   dt = g_date_time_new_utc (2009, 12, 1, 1, 31, 0);
1010   g_assert_cmpint (12, ==, g_date_time_get_month (dt));
1011   g_date_time_unref (dt);
1012 }
1013
1014 static void
1015 test_GDateTime_get_second (void)
1016 {
1017   GDateTime *dt;
1018
1019   dt = g_date_time_new_utc (2009, 12, 1, 1, 31, 44);
1020   g_assert_cmpint (44, ==, g_date_time_get_second (dt));
1021   g_date_time_unref (dt);
1022 }
1023
1024 static void
1025 test_GDateTime_new_full (void)
1026 {
1027   GTimeZone *tz;
1028   GDateTime *dt;
1029
1030   dt = g_date_time_new_utc (2009, 12, 11, 12, 11, 10);
1031   g_assert_cmpint (2009, ==, g_date_time_get_year (dt));
1032   g_assert_cmpint (12, ==, g_date_time_get_month (dt));
1033   g_assert_cmpint (11, ==, g_date_time_get_day_of_month (dt));
1034   g_assert_cmpint (12, ==, g_date_time_get_hour (dt));
1035   g_assert_cmpint (11, ==, g_date_time_get_minute (dt));
1036   g_assert_cmpint (10, ==, g_date_time_get_second (dt));
1037   g_date_time_unref (dt);
1038
1039 #ifdef G_OS_UNIX
1040   tz = g_time_zone_new ("America/Tijuana");
1041 #elif defined G_OS_WIN32
1042   tz = g_time_zone_new ("Pacific Standard Time");
1043 #endif
1044   dt = g_date_time_new (tz, 2010, 11, 24, 8, 4, 0);
1045   g_time_zone_unref (tz);
1046   g_assert_cmpint (2010, ==, g_date_time_get_year (dt));
1047   g_assert_cmpint (11, ==, g_date_time_get_month (dt));
1048   g_assert_cmpint (24, ==, g_date_time_get_day_of_month (dt));
1049   g_assert_cmpint (8, ==, g_date_time_get_hour (dt));
1050   g_assert_cmpint (4, ==, g_date_time_get_minute (dt));
1051   g_assert_cmpint (0, ==, g_date_time_get_second (dt));
1052 #ifdef G_OS_UNIX
1053   g_assert_cmpstr ("PST", ==, g_date_time_get_timezone_abbreviation (dt));
1054 #elif defined G_OS_WIN32
1055   g_assert_cmpstr ("Pacific Standard Time", ==,
1056                     g_date_time_get_timezone_abbreviation (dt));
1057 #endif
1058   g_assert (!g_date_time_is_daylight_savings (dt));
1059   g_date_time_unref (dt);
1060
1061   /* Check month limits */
1062   dt = g_date_time_new_utc (2016, 1, 31, 22, 10, 42);
1063   ASSERT_DATE (dt, 2016, 1, 31);
1064   g_date_time_unref (dt);
1065   dt = g_date_time_new_utc (2016, 1, 32, 22, 10, 42);
1066   g_assert_null (dt);
1067   dt = g_date_time_new_utc (2016, 2, 29, 22, 10, 42);
1068   ASSERT_DATE (dt, 2016, 2, 29);
1069   g_date_time_unref (dt);
1070   dt = g_date_time_new_utc (2016, 2, 30, 22, 10, 42);
1071   g_assert_null (dt);
1072   dt = g_date_time_new_utc (2017, 2, 28, 22, 10, 42);
1073   ASSERT_DATE (dt, 2017, 2, 28);
1074   g_date_time_unref (dt);
1075   dt = g_date_time_new_utc (2017, 2, 29, 22, 10, 42);
1076   g_assert_null (dt);
1077   dt = g_date_time_new_utc (2016, 3, 31, 22, 10, 42);
1078   ASSERT_DATE (dt, 2016, 3, 31);
1079   g_date_time_unref (dt);
1080   dt = g_date_time_new_utc (2016, 3, 32, 22, 10, 42);
1081   g_assert_null (dt);
1082   dt = g_date_time_new_utc (2016, 4, 30, 22, 10, 42);
1083   ASSERT_DATE (dt, 2016, 4, 30);
1084   g_date_time_unref (dt);
1085   dt = g_date_time_new_utc (2016, 4, 31, 22, 10, 42);
1086   g_assert_null (dt);
1087   dt = g_date_time_new_utc (2016, 5, 31, 22, 10, 42);
1088   ASSERT_DATE (dt, 2016, 5, 31);
1089   g_date_time_unref (dt);
1090   dt = g_date_time_new_utc (2016, 5, 32, 22, 10, 42);
1091   g_assert_null (dt);
1092   dt = g_date_time_new_utc (2016, 6, 30, 22, 10, 42);
1093   ASSERT_DATE (dt, 2016, 6, 30);
1094   g_date_time_unref (dt);
1095   dt = g_date_time_new_utc (2016, 6, 31, 22, 10, 42);
1096   g_assert_null (dt);
1097   dt = g_date_time_new_utc (2016, 7, 31, 22, 10, 42);
1098   ASSERT_DATE (dt, 2016, 7, 31);
1099   g_date_time_unref (dt);
1100   dt = g_date_time_new_utc (2016, 7, 32, 22, 10, 42);
1101   g_assert_null (dt);
1102   dt = g_date_time_new_utc (2016, 8, 31, 22, 10, 42);
1103   ASSERT_DATE (dt, 2016, 8, 31);
1104   g_date_time_unref (dt);
1105   dt = g_date_time_new_utc (2016, 8, 32, 22, 10, 42);
1106   g_assert_null (dt);
1107   dt = g_date_time_new_utc (2016, 9, 30, 22, 10, 42);
1108   ASSERT_DATE (dt, 2016, 9, 30);
1109   g_date_time_unref (dt);
1110   dt = g_date_time_new_utc (2016, 9, 31, 22, 10, 42);
1111   g_assert_null (dt);
1112   dt = g_date_time_new_utc (2016, 10, 31, 22, 10, 42);
1113   ASSERT_DATE (dt, 2016, 10, 31);
1114   g_date_time_unref (dt);
1115   dt = g_date_time_new_utc (2016, 10, 32, 22, 10, 42);
1116   g_assert_null (dt);
1117   dt = g_date_time_new_utc (2016, 11, 30, 22, 10, 42);
1118   ASSERT_DATE (dt, 2016, 11, 30);
1119   g_date_time_unref (dt);
1120   dt = g_date_time_new_utc (2016, 11, 31, 22, 10, 42);
1121   g_assert_null (dt);
1122   dt = g_date_time_new_utc (2016, 12, 31, 22, 10, 42);
1123   ASSERT_DATE (dt, 2016, 12, 31);
1124   g_date_time_unref (dt);
1125   dt = g_date_time_new_utc (2016, 12, 32, 22, 10, 42);
1126   g_assert_null (dt);
1127 }
1128
1129 static void
1130 test_GDateTime_now_utc (void)
1131 {
1132   GDateTime *dt;
1133   struct tm  tm;
1134   time_t     t;
1135   time_t     after;
1136
1137   /* t <= dt.to_unix() <= after, but the inequalities might not be
1138    * equality if we're close to the boundary between seconds.
1139    * We loop until t == after (and hence dt.to_unix() should equal both)
1140    * to guard against that. */
1141   do
1142     {
1143       t = g_get_real_time () / G_TIME_SPAN_SECOND;
1144 #ifdef HAVE_GMTIME_R
1145       gmtime_r (&t, &tm);
1146 #else
1147       {
1148         struct tm *tmp = gmtime (&t);
1149         /* Assume gmtime() can't fail as we got t from time(NULL). (Note
1150          * that on Windows, gmtime() *is* MT-safe, it uses a thread-local
1151          * buffer.)
1152          */
1153         memcpy (&tm, tmp, sizeof (struct tm));
1154       }
1155 #endif
1156       dt = g_date_time_new_now_utc ();
1157
1158       after = g_get_real_time () / G_TIME_SPAN_SECOND;
1159     }
1160   while (t != after);
1161
1162   g_assert_cmpint (tm.tm_year + 1900, ==, g_date_time_get_year (dt));
1163   g_assert_cmpint (tm.tm_mon + 1, ==, g_date_time_get_month (dt));
1164   g_assert_cmpint (tm.tm_mday, ==, g_date_time_get_day_of_month (dt));
1165   g_assert_cmpint (tm.tm_hour, ==, g_date_time_get_hour (dt));
1166   g_assert_cmpint (tm.tm_min, ==, g_date_time_get_minute (dt));
1167   g_assert_cmpint (tm.tm_sec, ==, g_date_time_get_second (dt));
1168   g_date_time_unref (dt);
1169 }
1170
1171 static void
1172 test_GDateTime_new_from_unix_utc (void)
1173 {
1174   GDateTime *dt;
1175   gint64 t;
1176
1177   t = g_get_real_time ();
1178
1179 #if 0
1180   dt = g_date_time_new_from_unix_utc (t);
1181   g_assert (dt == NULL);
1182 #endif
1183
1184   t = t / 1e6;  /* oops, this was microseconds */
1185
1186   dt = g_date_time_new_from_unix_utc (t);
1187   g_assert (dt != NULL);
1188
1189   g_assert (dt == g_date_time_ref (dt));
1190   g_date_time_unref (dt);
1191   g_assert_cmpint (g_date_time_to_unix (dt), ==, t);
1192   g_date_time_unref (dt);
1193 }
1194
1195 static void
1196 test_GDateTime_get_utc_offset (void)
1197 {
1198 #if defined (HAVE_STRUCT_TM_TM_GMTOFF) || defined (HAVE_STRUCT_TM___TM_GMTOFF)
1199   GDateTime *dt;
1200   GTimeSpan ts;
1201   struct tm tm;
1202
1203   memset (&tm, 0, sizeof (tm));
1204   get_localtime_tm (g_get_real_time () / G_TIME_SPAN_SECOND, &tm);
1205
1206   dt = g_date_time_new_now_local ();
1207   ts = g_date_time_get_utc_offset (dt);
1208 #ifdef HAVE_STRUCT_TM_TM_GMTOFF
1209   g_assert_cmpint (ts, ==, (tm.tm_gmtoff * G_TIME_SPAN_SECOND));
1210 #endif
1211 #ifdef HAVE_STRUCT_TM___TM_GMTOFF
1212   g_assert_cmpint (ts, ==, (tm.__tm_gmtoff * G_TIME_SPAN_SECOND));
1213 #endif
1214   g_date_time_unref (dt);
1215 #endif
1216 }
1217
1218 static void
1219 test_GDateTime_to_timeval (void)
1220 {
1221   GTimeVal tv1, tv2;
1222   GDateTime *dt;
1223
1224   memset (&tv1, 0, sizeof (tv1));
1225   memset (&tv2, 0, sizeof (tv2));
1226
1227   g_get_current_time (&tv1);
1228   dt = g_date_time_new_from_timeval_local (&tv1);
1229   g_date_time_to_timeval (dt, &tv2);
1230   g_assert_cmpint (tv1.tv_sec, ==, tv2.tv_sec);
1231   g_assert_cmpint (tv1.tv_usec, ==, tv2.tv_usec);
1232   g_date_time_unref (dt);
1233 }
1234
1235 static void
1236 test_GDateTime_to_local (void)
1237 {
1238   GDateTime *utc = NULL, *now = NULL, *dt;
1239   time_t before, after;
1240
1241   /* before <= utc.to_unix() <= now.to_unix() <= after, but the inequalities
1242    * might not be equality if we're close to the boundary between seconds.
1243    * We loop until before == after (and hence the GDateTimes should match)
1244    * to guard against that. */
1245   do
1246     {
1247       before = g_get_real_time () / G_TIME_SPAN_SECOND;
1248       g_clear_pointer (&utc, g_date_time_unref);
1249       g_clear_pointer (&now, g_date_time_unref);
1250       utc = g_date_time_new_now_utc ();
1251       now = g_date_time_new_now_local ();
1252       after = g_get_real_time () / G_TIME_SPAN_SECOND;
1253     }
1254   while (before != after);
1255
1256   dt = g_date_time_to_local (utc);
1257
1258   g_assert_cmpint (g_date_time_get_year (now), ==, g_date_time_get_year (dt));
1259   g_assert_cmpint (g_date_time_get_month (now), ==, g_date_time_get_month (dt));
1260   g_assert_cmpint (g_date_time_get_day_of_month (now), ==, g_date_time_get_day_of_month (dt));
1261   g_assert_cmpint (g_date_time_get_hour (now), ==, g_date_time_get_hour (dt));
1262   g_assert_cmpint (g_date_time_get_minute (now), ==, g_date_time_get_minute (dt));
1263   g_assert_cmpint (g_date_time_get_second (now), ==, g_date_time_get_second (dt));
1264
1265   g_date_time_unref (now);
1266   g_date_time_unref (utc);
1267   g_date_time_unref (dt);
1268 }
1269
1270 static void
1271 test_GDateTime_to_utc (void)
1272 {
1273   GDateTime *dt, *dt2;
1274   time_t     t;
1275   struct tm  tm;
1276
1277   t = time (NULL);
1278 #ifdef HAVE_GMTIME_R
1279   gmtime_r (&t, &tm);
1280 #else
1281   {
1282     struct tm *tmp = gmtime (&t);
1283     memcpy (&tm, tmp, sizeof (struct tm));
1284   }
1285 #endif
1286   dt2 = g_date_time_new_from_unix_local (t);
1287   dt = g_date_time_to_utc (dt2);
1288   g_assert_cmpint (tm.tm_year + 1900, ==, g_date_time_get_year (dt));
1289   g_assert_cmpint (tm.tm_mon + 1, ==, g_date_time_get_month (dt));
1290   g_assert_cmpint (tm.tm_mday, ==, g_date_time_get_day_of_month (dt));
1291   g_assert_cmpint (tm.tm_hour, ==, g_date_time_get_hour (dt));
1292   g_assert_cmpint (tm.tm_min, ==, g_date_time_get_minute (dt));
1293   g_assert_cmpint (tm.tm_sec, ==, g_date_time_get_second (dt));
1294   g_date_time_unref (dt);
1295   g_date_time_unref (dt2);
1296 }
1297
1298 static void
1299 test_GDateTime_get_day_of_year (void)
1300 {
1301 #define TEST_DAY_OF_YEAR(y,m,d,o)                       G_STMT_START {  \
1302   GDateTime *__dt = g_date_time_new_local ((y), (m), (d), 0, 0, 0);     \
1303   g_assert_cmpint ((o), ==, g_date_time_get_day_of_year (__dt));        \
1304   g_date_time_unref (__dt);                             } G_STMT_END
1305
1306   TEST_DAY_OF_YEAR (2009, 1, 1, 1);
1307   TEST_DAY_OF_YEAR (2009, 2, 1, 32);
1308   TEST_DAY_OF_YEAR (2009, 8, 16, 228);
1309   TEST_DAY_OF_YEAR (2008, 8, 16, 229);
1310 }
1311
1312 static void
1313 test_GDateTime_printf (void)
1314 {
1315 /* 64 seems big, but one zoneinfo file, Factory, has an abbreviation
1316  * that long, and it will cause the test to fail if dst isn't big
1317  * enough.
1318  */
1319   gchar dst[64];
1320   struct tm tt;
1321   time_t t;
1322
1323 #define TEST_PRINTF(f,o)                        G_STMT_START {  \
1324 GDateTime *__dt = g_date_time_new_local (2009, 10, 24, 0, 0, 0);\
1325   gchar *__p = g_date_time_format (__dt, (f));                  \
1326   g_assert_cmpstr (__p, ==, (o));                               \
1327   g_date_time_unref (__dt);                                     \
1328   g_free (__p);                                 } G_STMT_END
1329
1330 #define TEST_PRINTF_DATE(y,m,d,f,o)             G_STMT_START {  \
1331   GDateTime *dt = g_date_time_new_local (y, m, d, 0, 0, 0);     \
1332   gchar *p = g_date_time_format (dt, (f));                      \
1333   gchar *o_casefold = g_utf8_casefold (o, -1);                  \
1334   gchar *p_casefold = g_utf8_casefold (p, -1);                  \
1335   g_assert_cmpstr (p_casefold, ==, (o_casefold));               \
1336   g_date_time_unref (dt);                                       \
1337   g_free (p_casefold);                                          \
1338   g_free (o_casefold);                                          \
1339   g_free (p);                                   } G_STMT_END
1340
1341 #define TEST_PRINTF_TIME(h,m,s,f,o)             G_STMT_START { \
1342   GDateTime *dt = g_date_time_new_local (2009, 10, 24, (h), (m), (s)); \
1343   gchar *p = g_date_time_format (dt, (f));                      \
1344   g_assert_cmpstr (p, ==, (o));                                 \
1345   g_date_time_unref (dt);                                       \
1346   g_free (p);                                   } G_STMT_END
1347
1348   /*
1349    * This is a little helper to make sure we can compare timezones to
1350    * that of the generated timezone.
1351    */
1352   t = time (NULL);
1353   memset (&tt, 0, sizeof(tt));
1354   get_localtime_tm (t, &tt);
1355   tt.tm_year = 2009 - 1900;
1356   tt.tm_mon = 9; /* 0 indexed */
1357   tt.tm_mday = 24;
1358   t = mktime (&tt);
1359   memset (&tt, 0, sizeof(tt));
1360   get_localtime_tm (t, &tt);
1361   strftime (dst, sizeof(dst), "%Z", &tt);
1362
1363   /* get current time_t for 20090924 in the local timezone */
1364   tt.tm_sec = 0;
1365   tt.tm_min = 0;
1366   tt.tm_hour = 0;
1367   t = mktime (&tt);
1368
1369   TEST_PRINTF ("%a", "Sat");
1370   TEST_PRINTF ("%A", "Saturday");
1371   TEST_PRINTF ("%b", "Oct");
1372   TEST_PRINTF ("%B", "October");
1373   TEST_PRINTF ("%d", "24");
1374   TEST_PRINTF_DATE (2009, 1, 1, "%d", "01");
1375   TEST_PRINTF ("%e", "24"); // fixme
1376   TEST_PRINTF ("%h", "Oct");
1377   TEST_PRINTF ("%H", "00");
1378   TEST_PRINTF_TIME (15, 0, 0, "%H", "15");
1379   TEST_PRINTF ("%I", "12");
1380   TEST_PRINTF_TIME (12, 0, 0, "%I", "12");
1381   TEST_PRINTF_TIME (15, 0, 0, "%I", "03");
1382   TEST_PRINTF ("%j", "297");
1383   TEST_PRINTF ("%k", " 0");
1384   TEST_PRINTF_TIME (13, 13, 13, "%k", "13");
1385   TEST_PRINTF ("%l", "12");
1386   TEST_PRINTF_TIME (12, 0, 0, "%I", "12");
1387   TEST_PRINTF_TIME (13, 13, 13, "%l", " 1");
1388   TEST_PRINTF_TIME (10, 13, 13, "%l", "10");
1389   TEST_PRINTF ("%m", "10");
1390   TEST_PRINTF ("%M", "00");
1391   TEST_PRINTF ("%p", "AM");
1392   TEST_PRINTF_TIME (13, 13, 13, "%p", "PM");
1393   TEST_PRINTF ("%P", "am");
1394   TEST_PRINTF_TIME (13, 13, 13, "%P", "pm");
1395   TEST_PRINTF ("%r", "12:00:00 AM");
1396   TEST_PRINTF_TIME (13, 13, 13, "%r", "01:13:13 PM");
1397   TEST_PRINTF ("%R", "00:00");
1398   TEST_PRINTF_TIME (13, 13, 31, "%R", "13:13");
1399   TEST_PRINTF ("%S", "00");
1400   TEST_PRINTF ("%t", "  ");
1401   TEST_PRINTF ("%u", "6");
1402   TEST_PRINTF ("%x", "10/24/09");
1403   TEST_PRINTF ("%X", "00:00:00");
1404   TEST_PRINTF_TIME (13, 14, 15, "%X", "13:14:15");
1405   TEST_PRINTF ("%y", "09");
1406   TEST_PRINTF ("%Y", "2009");
1407   TEST_PRINTF ("%%", "%");
1408   TEST_PRINTF ("%", "");
1409   TEST_PRINTF ("%9", NULL);
1410 #ifdef G_OS_UNIX
1411   TEST_PRINTF ("%Z", dst);
1412 #elif defined G_OS_WIN32
1413   TEST_PRINTF ("%Z", "Pacific Standard Time");
1414 #endif
1415 }
1416
1417 static void
1418 test_non_utf8_printf (void)
1419 {
1420   gchar *oldlocale;
1421
1422   oldlocale = g_strdup (setlocale (LC_ALL, NULL));
1423   setlocale (LC_ALL, "ja_JP.eucjp");
1424   if (strstr (setlocale (LC_ALL, NULL), "ja_JP") == NULL)
1425     {
1426       g_test_skip ("locale ja_JP.eucjp not available, skipping non-UTF8 tests");
1427       g_free (oldlocale);
1428       return;
1429     }
1430   if (g_get_charset (NULL))
1431     {
1432       g_test_skip ("locale ja_JP.eucjp may be available, but glib seems to think that it's equivalent to UTF-8, skipping non-UTF-8 tests. This is a known issue on Darwin");
1433       setlocale (LC_ALL, oldlocale);
1434       g_free (oldlocale);
1435       return;
1436     }
1437
1438   /* These are the outputs that ja_JP.UTF-8 generates; if everything
1439    * is working then ja_JP.eucjp should generate the same.
1440    */
1441   TEST_PRINTF ("%a", "\345\234\237");
1442   TEST_PRINTF ("%A", "\345\234\237\346\233\234\346\227\245");
1443 #ifndef __APPLE__ /* OSX just returns the number */
1444   TEST_PRINTF ("%b", "10\346\234\210");
1445 #endif
1446   TEST_PRINTF ("%B", "10\346\234\210");
1447   TEST_PRINTF ("%d", "24");
1448   TEST_PRINTF_DATE (2009, 1, 1, "%d", "01");
1449   TEST_PRINTF ("%e", "24"); // fixme
1450 #ifndef __APPLE__ /* OSX just returns the number */
1451   TEST_PRINTF ("%h", "10\346\234\210");
1452 #endif
1453   TEST_PRINTF ("%H", "00");
1454   TEST_PRINTF_TIME (15, 0, 0, "%H", "15");
1455   TEST_PRINTF ("%I", "12");
1456   TEST_PRINTF_TIME (12, 0, 0, "%I", "12");
1457   TEST_PRINTF_TIME (15, 0, 0, "%I", "03");
1458   TEST_PRINTF ("%j", "297");
1459   TEST_PRINTF ("%k", " 0");
1460   TEST_PRINTF_TIME (13, 13, 13, "%k", "13");
1461   TEST_PRINTF ("%l", "12");
1462   TEST_PRINTF_TIME (12, 0, 0, "%I", "12");
1463   TEST_PRINTF_TIME (13, 13, 13, "%l", " 1");
1464   TEST_PRINTF_TIME (10, 13, 13, "%l", "10");
1465   TEST_PRINTF ("%m", "10");
1466   TEST_PRINTF ("%M", "00");
1467 #ifndef __APPLE__ /* OSX returns latin "AM", not japanese */
1468   TEST_PRINTF ("%p", "\345\215\210\345\211\215");
1469   TEST_PRINTF_TIME (13, 13, 13, "%p", "\345\215\210\345\276\214");
1470   TEST_PRINTF ("%P", "\345\215\210\345\211\215");
1471   TEST_PRINTF_TIME (13, 13, 13, "%P", "\345\215\210\345\276\214");
1472   TEST_PRINTF ("%r", "\345\215\210\345\211\21512\346\231\20200\345\210\20600\347\247\222");
1473   TEST_PRINTF_TIME (13, 13, 13, "%r", "\345\215\210\345\276\21401\346\231\20213\345\210\20613\347\247\222");
1474 #endif
1475   TEST_PRINTF ("%R", "00:00");
1476   TEST_PRINTF_TIME (13, 13, 31, "%R", "13:13");
1477   TEST_PRINTF ("%S", "00");
1478   TEST_PRINTF ("%t", "  ");
1479   TEST_PRINTF ("%u", "6");
1480 #ifndef __APPLE__ /* OSX returns YYYY/MM/DD in ASCII */
1481   TEST_PRINTF ("%x", "2009\345\271\26410\346\234\21024\346\227\245");
1482 #endif
1483   TEST_PRINTF ("%X", "00\346\231\20200\345\210\20600\347\247\222");
1484   TEST_PRINTF_TIME (13, 14, 15, "%X", "13\346\231\20214\345\210\20615\347\247\222");
1485   TEST_PRINTF ("%y", "09");
1486   TEST_PRINTF ("%Y", "2009");
1487   TEST_PRINTF ("%%", "%");
1488   TEST_PRINTF ("%", "");
1489   TEST_PRINTF ("%9", NULL);
1490
1491   setlocale (LC_ALL, oldlocale);
1492   g_free (oldlocale);
1493 }
1494
1495 static void
1496 test_modifiers (void)
1497 {
1498   gchar *oldlocale;
1499
1500   TEST_PRINTF_DATE (2009, 1,  1,  "%d", "01");
1501   TEST_PRINTF_DATE (2009, 1,  1, "%_d", " 1");
1502   TEST_PRINTF_DATE (2009, 1,  1, "%-d", "1");
1503   TEST_PRINTF_DATE (2009, 1,  1, "%0d", "01");
1504   TEST_PRINTF_DATE (2009, 1, 21,  "%d", "21");
1505   TEST_PRINTF_DATE (2009, 1, 21, "%_d", "21");
1506   TEST_PRINTF_DATE (2009, 1, 21, "%-d", "21");
1507   TEST_PRINTF_DATE (2009, 1, 21, "%0d", "21");
1508
1509   TEST_PRINTF_DATE (2009, 1,  1,  "%e", " 1");
1510   TEST_PRINTF_DATE (2009, 1,  1, "%_e", " 1");
1511   TEST_PRINTF_DATE (2009, 1,  1, "%-e", "1");
1512   TEST_PRINTF_DATE (2009, 1,  1, "%0e", "01");
1513   TEST_PRINTF_DATE (2009, 1, 21,  "%e", "21");
1514   TEST_PRINTF_DATE (2009, 1, 21, "%_e", "21");
1515   TEST_PRINTF_DATE (2009, 1, 21, "%-e", "21");
1516   TEST_PRINTF_DATE (2009, 1, 21, "%0e", "21");
1517
1518   TEST_PRINTF_TIME ( 1, 0, 0,  "%H", "01");
1519   TEST_PRINTF_TIME ( 1, 0, 0, "%_H", " 1");
1520   TEST_PRINTF_TIME ( 1, 0, 0, "%-H", "1");
1521   TEST_PRINTF_TIME ( 1, 0, 0, "%0H", "01");
1522   TEST_PRINTF_TIME (21, 0, 0,  "%H", "21");
1523   TEST_PRINTF_TIME (21, 0, 0, "%_H", "21");
1524   TEST_PRINTF_TIME (21, 0, 0, "%-H", "21");
1525   TEST_PRINTF_TIME (21, 0, 0, "%0H", "21");
1526
1527   TEST_PRINTF_TIME ( 1, 0, 0,  "%I", "01");
1528   TEST_PRINTF_TIME ( 1, 0, 0, "%_I", " 1");
1529   TEST_PRINTF_TIME ( 1, 0, 0, "%-I", "1");
1530   TEST_PRINTF_TIME ( 1, 0, 0, "%0I", "01");
1531   TEST_PRINTF_TIME (23, 0, 0,  "%I", "11");
1532   TEST_PRINTF_TIME (23, 0, 0, "%_I", "11");
1533   TEST_PRINTF_TIME (23, 0, 0, "%-I", "11");
1534   TEST_PRINTF_TIME (23, 0, 0, "%0I", "11");
1535
1536   TEST_PRINTF_TIME ( 1, 0, 0,  "%k", " 1");
1537   TEST_PRINTF_TIME ( 1, 0, 0, "%_k", " 1");
1538   TEST_PRINTF_TIME ( 1, 0, 0, "%-k", "1");
1539   TEST_PRINTF_TIME ( 1, 0, 0, "%0k", "01");
1540
1541   oldlocale = g_strdup (setlocale (LC_ALL, NULL));
1542   setlocale (LC_ALL, "fa_IR.utf-8");
1543   if (strstr (setlocale (LC_ALL, NULL), "fa_IR") != NULL)
1544     {
1545       TEST_PRINTF_TIME (23, 0, 0, "%OH", "\333\262\333\263");    /* '23' */
1546       TEST_PRINTF_TIME (23, 0, 0, "%OI", "\333\261\333\261");    /* '11' */
1547       TEST_PRINTF_TIME (23, 0, 0, "%OM", "\333\260\333\260");    /* '00' */
1548
1549       TEST_PRINTF_DATE (2011, 7, 1, "%Om", "\333\260\333\267");  /* '07' */
1550       TEST_PRINTF_DATE (2011, 7, 1, "%0Om", "\333\260\333\267"); /* '07' */
1551       TEST_PRINTF_DATE (2011, 7, 1, "%-Om", "\333\267");         /* '7' */
1552       TEST_PRINTF_DATE (2011, 7, 1, "%_Om", " \333\267");        /* ' 7' */
1553     }
1554   else
1555     g_test_skip ("locale fa_IR not available, skipping O modifier tests");
1556   setlocale (LC_ALL, oldlocale);
1557   g_free (oldlocale);
1558 }
1559
1560 /* Test that the `O` modifier for g_date_time_format() works with %B, %b and %h;
1561  * i.e. whether genitive month names are supported. */
1562 static void
1563 test_month_names (void)
1564 {
1565   gchar *oldlocale;
1566
1567   g_test_bug ("749206");
1568
1569   /* If running uninstalled (G_TEST_BUILDDIR is set), skip this test, since we
1570    * need the translations to be installed. We can’t mess around with
1571    * bindtextdomain() here, as the compiled .gmo files in po/ are not in the
1572    * right installed directory hierarchy to be successfully loaded by gettext. */
1573   if (g_getenv ("G_TEST_BUILDDIR") != NULL)
1574     {
1575       g_test_skip ("Skipping due to running uninstalled. "
1576                    "This test can only be run when the translations are installed.");
1577       return;
1578     }
1579
1580   oldlocale = g_strdup (setlocale (LC_ALL, NULL));
1581
1582   /* Make sure that nothing has been changed in western European languages.  */
1583   setlocale (LC_ALL, "en_GB.utf-8");
1584   if (strstr (setlocale (LC_ALL, NULL), "en_GB") != NULL)
1585     {
1586       TEST_PRINTF_DATE (2018,  1,  1,  "%B", "January");
1587       TEST_PRINTF_DATE (2018,  2,  1, "%OB", "February");
1588       TEST_PRINTF_DATE (2018,  3,  1,  "%b", "Mar");
1589       TEST_PRINTF_DATE (2018,  4,  1, "%Ob", "Apr");
1590       TEST_PRINTF_DATE (2018,  5,  1,  "%h", "May");
1591       TEST_PRINTF_DATE (2018,  6,  1, "%Oh", "Jun");
1592     }
1593   else
1594     g_test_skip ("locale en_GB not available, skipping English month names test");
1595
1596   setlocale (LC_ALL, "de_DE.utf-8");
1597   if (strstr (setlocale (LC_ALL, NULL), "de_DE") != NULL)
1598     {
1599       TEST_PRINTF_DATE (2018,  7,  1,  "%B", "Juli");
1600       TEST_PRINTF_DATE (2018,  8,  1, "%OB", "August");
1601       TEST_PRINTF_DATE (2018,  9,  1,  "%b", "Sep");
1602       TEST_PRINTF_DATE (2018, 10,  1, "%Ob", "Okt");
1603       TEST_PRINTF_DATE (2018, 11,  1,  "%h", "Nov");
1604       TEST_PRINTF_DATE (2018, 12,  1, "%Oh", "Dez");
1605     }
1606   else
1607     g_test_skip ("locale de_DE not available, skipping German month names test");
1608
1609   setlocale (LC_ALL, "es_ES.utf-8");
1610   if (strstr (setlocale (LC_ALL, NULL), "es_ES") != NULL)
1611     {
1612       TEST_PRINTF_DATE (2018,  1,  1,  "%B", "enero");
1613       TEST_PRINTF_DATE (2018,  2,  1, "%OB", "febrero");
1614       TEST_PRINTF_DATE (2018,  3,  1,  "%b", "mar");
1615       TEST_PRINTF_DATE (2018,  4,  1, "%Ob", "abr");
1616       TEST_PRINTF_DATE (2018,  5,  1,  "%h", "may");
1617       TEST_PRINTF_DATE (2018,  6,  1, "%Oh", "jun");
1618     }
1619   else
1620     g_test_skip ("locale es_ES not available, skipping Spanish month names test");
1621
1622   setlocale (LC_ALL, "fr_FR.utf-8");
1623   if (strstr (setlocale (LC_ALL, NULL), "fr_FR") != NULL)
1624     {
1625       TEST_PRINTF_DATE (2018,  7,  1,  "%B", "juillet");
1626       TEST_PRINTF_DATE (2018,  8,  1, "%OB", "août");
1627       TEST_PRINTF_DATE (2018,  9,  1,  "%b", "sept.");
1628       TEST_PRINTF_DATE (2018, 10,  1, "%Ob", "oct.");
1629       TEST_PRINTF_DATE (2018, 11,  1,  "%h", "nov.");
1630       TEST_PRINTF_DATE (2018, 12,  1, "%Oh", "déc.");
1631     }
1632   else
1633     g_test_skip ("locale fr_FR not available, skipping French month names test");
1634
1635   /* Make sure that there are visible changes in some European languages.  */
1636   setlocale (LC_ALL, "el_GR.utf-8");
1637   if (strstr (setlocale (LC_ALL, NULL), "el_GR") != NULL)
1638     {
1639       TEST_PRINTF_DATE (2018,  1,  1,  "%B", "Ιανουαρίου");
1640       TEST_PRINTF_DATE (2018,  2,  1,  "%B", "Φεβρουαρίου");
1641       TEST_PRINTF_DATE (2018,  3,  1,  "%B", "Μαρτίου");
1642       TEST_PRINTF_DATE (2018,  4,  1, "%OB", "Απρίλιος");
1643       TEST_PRINTF_DATE (2018,  5,  1, "%OB", "Μάιος");
1644       TEST_PRINTF_DATE (2018,  6,  1, "%OB", "Ιούνιος");
1645       TEST_PRINTF_DATE (2018,  7,  1,  "%b", "Ιουλ");
1646       TEST_PRINTF_DATE (2018,  8,  1, "%Ob", "Αύγ");
1647     }
1648   else
1649     g_test_skip ("locale el_GR not available, skipping Greek month names test");
1650
1651   setlocale (LC_ALL, "hr_HR.utf-8");
1652   if (strstr (setlocale (LC_ALL, NULL), "hr_HR") != NULL)
1653     {
1654       TEST_PRINTF_DATE (2018,  5,  1,  "%B", "svibnja");
1655       TEST_PRINTF_DATE (2018,  6,  1,  "%B", "lipnja");
1656       TEST_PRINTF_DATE (2018,  7,  1,  "%B", "srpnja");
1657       TEST_PRINTF_DATE (2018,  8,  1, "%OB", "Kolovoz");
1658       TEST_PRINTF_DATE (2018,  9,  1, "%OB", "Rujan");
1659       TEST_PRINTF_DATE (2018, 10,  1, "%OB", "Listopad");
1660       TEST_PRINTF_DATE (2018, 11,  1,  "%b", "Stu");
1661       TEST_PRINTF_DATE (2018, 12,  1, "%Ob", "Pro");
1662     }
1663   else
1664     g_test_skip ("locale hr_HR not available, skipping Croatian month names test");
1665
1666   setlocale (LC_ALL, "lt_LT.utf-8");
1667   if (strstr (setlocale (LC_ALL, NULL), "lt_LT") != NULL)
1668     {
1669       TEST_PRINTF_DATE (2018,  1,  1,  "%B", "sausio");
1670       TEST_PRINTF_DATE (2018,  2,  1,  "%B", "vasario");
1671       TEST_PRINTF_DATE (2018,  3,  1,  "%B", "kovo");
1672       TEST_PRINTF_DATE (2018,  4,  1, "%OB", "balandis");
1673       TEST_PRINTF_DATE (2018,  5,  1, "%OB", "gegužė");
1674       TEST_PRINTF_DATE (2018,  6,  1, "%OB", "birželis");
1675       TEST_PRINTF_DATE (2018,  7,  1,  "%b", "liep.");
1676       TEST_PRINTF_DATE (2018,  8,  1, "%Ob", "rugp.");
1677     }
1678   else
1679     g_test_skip ("locale lt_LT not available, skipping Lithuanian month names test");
1680
1681   setlocale (LC_ALL, "pl_PL.utf-8");
1682   if (strstr (setlocale (LC_ALL, NULL), "pl_PL") != NULL)
1683     {
1684       TEST_PRINTF_DATE (2018,  5,  1,  "%B", "maja");
1685       TEST_PRINTF_DATE (2018,  6,  1,  "%B", "czerwca");
1686       TEST_PRINTF_DATE (2018,  7,  1,  "%B", "lipca");
1687       TEST_PRINTF_DATE (2018,  8,  1, "%OB", "sierpień");
1688       TEST_PRINTF_DATE (2018,  9,  1, "%OB", "wrzesień");
1689       TEST_PRINTF_DATE (2018, 10,  1, "%OB", "październik");
1690       TEST_PRINTF_DATE (2018, 11,  1,  "%b", "lis");
1691       TEST_PRINTF_DATE (2018, 12,  1, "%Ob", "gru");
1692     }
1693   else
1694     g_test_skip ("locale pl_PL not available, skipping Polish month names test");
1695
1696   setlocale (LC_ALL, "ru_RU.utf-8");
1697   if (strstr (setlocale (LC_ALL, NULL), "ru_RU") != NULL)
1698     {
1699       TEST_PRINTF_DATE (2018,  1,  1,  "%B", "января");
1700       TEST_PRINTF_DATE (2018,  2,  1,  "%B", "февраля");
1701       TEST_PRINTF_DATE (2018,  3,  1,  "%B", "марта");
1702       TEST_PRINTF_DATE (2018,  4,  1, "%OB", "Апрель");
1703       TEST_PRINTF_DATE (2018,  5,  1, "%OB", "Май");
1704       TEST_PRINTF_DATE (2018,  6,  1, "%OB", "Июнь");
1705       TEST_PRINTF_DATE (2018,  7,  1,  "%b", "июл");
1706       TEST_PRINTF_DATE (2018,  8,  1, "%Ob", "авг");
1707       /* This difference is very important in Russian:  */
1708       TEST_PRINTF_DATE (2018,  5,  1,  "%b", "мая");
1709       TEST_PRINTF_DATE (2018,  5,  1, "%Ob", "май");
1710     }
1711   else
1712     g_test_skip ("locale ru_RU not available, skipping Russian month names test");
1713
1714   setlocale (LC_ALL, oldlocale);
1715   g_free (oldlocale);
1716 }
1717
1718 static void
1719 test_GDateTime_dst (void)
1720 {
1721   GDateTime *dt1, *dt2;
1722   GTimeZone *tz;
1723
1724   /* this date has the DST state set for Europe/London */
1725 #ifdef G_OS_UNIX
1726   tz = g_time_zone_new ("Europe/London");
1727 #elif defined G_OS_WIN32
1728   tz = g_time_zone_new ("GMT Standard Time");
1729 #endif
1730   dt1 = g_date_time_new (tz, 2009, 8, 15, 3, 0, 1);
1731   g_assert (g_date_time_is_daylight_savings (dt1));
1732   g_assert_cmpint (g_date_time_get_utc_offset (dt1) / G_USEC_PER_SEC, ==, 3600);
1733   g_assert_cmpint (g_date_time_get_hour (dt1), ==, 3);
1734
1735   /* add 6 months to clear the DST flag but keep the same time */
1736   dt2 = g_date_time_add_months (dt1, 6);
1737   g_assert (!g_date_time_is_daylight_savings (dt2));
1738   g_assert_cmpint (g_date_time_get_utc_offset (dt2) / G_USEC_PER_SEC, ==, 0);
1739   g_assert_cmpint (g_date_time_get_hour (dt2), ==, 3);
1740
1741   g_date_time_unref (dt2);
1742   g_date_time_unref (dt1);
1743
1744   /* now do the reverse: start with a non-DST state and move to DST */
1745   dt1 = g_date_time_new (tz, 2009, 2, 15, 2, 0, 1);
1746   g_assert (!g_date_time_is_daylight_savings (dt1));
1747   g_assert_cmpint (g_date_time_get_hour (dt1), ==, 2);
1748
1749   dt2 = g_date_time_add_months (dt1, 6);
1750   g_assert (g_date_time_is_daylight_savings (dt2));
1751   g_assert_cmpint (g_date_time_get_hour (dt2), ==, 2);
1752
1753   g_date_time_unref (dt2);
1754   g_date_time_unref (dt1);
1755   g_time_zone_unref (tz);
1756 }
1757
1758 static inline gboolean
1759 is_leap_year (gint year)
1760 {
1761   g_assert (1 <= year && year <= 9999);
1762
1763   return year % 400 == 0 || (year % 4 == 0 && year % 100 != 0);
1764 }
1765
1766 static inline gint
1767 days_in_month (gint year, gint month)
1768 {
1769   const gint table[2][13] = {
1770     {0, 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31},
1771     {0, 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31}
1772   };
1773
1774   g_assert (1 <= month && month <= 12);
1775
1776   return table[is_leap_year (year)][month];
1777 }
1778
1779 static void
1780 test_all_dates (void)
1781 {
1782   gint year, month, day;
1783   GTimeZone *timezone;
1784   gint64 unix_time;
1785   gint day_of_year;
1786   gint week_year;
1787   gint week_num;
1788   gint weekday;
1789
1790   /* save some time by hanging on to this. */
1791   timezone = g_time_zone_new_utc ();
1792
1793   unix_time = G_GINT64_CONSTANT(-62135596800);
1794
1795   /* 0001-01-01 is 0001-W01-1 */
1796   week_year = 1;
1797   week_num = 1;
1798   weekday = 1;
1799
1800
1801   /* The calendar makes a full cycle every 400 years, so we could
1802    * theoretically just test years 1 through 400.  That assumes that our
1803    * software has no bugs, so probably we should just test them all. :)
1804    */
1805   for (year = 1; year <= 9999; year++)
1806     {
1807       day_of_year = 1;
1808
1809       for (month = 1; month <= 12; month++)
1810         for (day = 1; day <= days_in_month (year, month); day++)
1811           {
1812             GDateTime *dt;
1813
1814             dt = g_date_time_new (timezone, year, month, day, 0, 0, 0);
1815
1816 #if 0
1817             g_printerr ("%04d-%02d-%02d = %04d-W%02d-%d = %04d-%03d\n",
1818                      year, month, day,
1819                      week_year, week_num, weekday,
1820                      year, day_of_year);
1821 #endif
1822
1823             /* sanity check */
1824             if G_UNLIKELY (g_date_time_get_year (dt) != year ||
1825                            g_date_time_get_month (dt) != month ||
1826                            g_date_time_get_day_of_month (dt) != day)
1827               g_error ("%04d-%02d-%02d comes out as %04d-%02d-%02d",
1828                        year, month, day,
1829                        g_date_time_get_year (dt),
1830                        g_date_time_get_month (dt),
1831                        g_date_time_get_day_of_month (dt));
1832
1833             if G_UNLIKELY (g_date_time_get_week_numbering_year (dt) != week_year ||
1834                            g_date_time_get_week_of_year (dt) != week_num ||
1835                            g_date_time_get_day_of_week (dt) != weekday)
1836               g_error ("%04d-%02d-%02d should be %04d-W%02d-%d but "
1837                        "comes out as %04d-W%02d-%d", year, month, day,
1838                        week_year, week_num, weekday,
1839                        g_date_time_get_week_numbering_year (dt),
1840                        g_date_time_get_week_of_year (dt),
1841                        g_date_time_get_day_of_week (dt));
1842
1843             if G_UNLIKELY (g_date_time_to_unix (dt) != unix_time)
1844               g_error ("%04d-%02d-%02d 00:00:00 UTC should have unix time %"
1845                        G_GINT64_FORMAT " but comes out as %"G_GINT64_FORMAT,
1846                        year, month, day, unix_time, g_date_time_to_unix (dt));
1847
1848             if G_UNLIKELY (g_date_time_get_day_of_year (dt) != day_of_year)
1849               g_error ("%04d-%02d-%02d should be day of year %d"
1850                        " but comes out as %d", year, month, day,
1851                        day_of_year, g_date_time_get_day_of_year (dt));
1852
1853             if G_UNLIKELY (g_date_time_get_hour (dt) != 0 ||
1854                            g_date_time_get_minute (dt) != 0 ||
1855                            g_date_time_get_seconds (dt) != 0)
1856               g_error ("%04d-%02d-%02d 00:00:00 UTC comes out "
1857                        "as %02d:%02d:%02.6f", year, month, day,
1858                        g_date_time_get_hour (dt),
1859                        g_date_time_get_minute (dt),
1860                        g_date_time_get_seconds (dt));
1861             /* done */
1862
1863             /* add 24 hours to unix time */
1864             unix_time += 24 * 60 * 60;
1865
1866             /* move day of year forward */
1867             day_of_year++;
1868
1869             /* move the week date forward */
1870             if (++weekday == 8)
1871               {
1872                 weekday = 1; /* Sunday -> Monday */
1873
1874                 /* NOTE: year/month/day is the final day of the week we
1875                  * just finished.
1876                  *
1877                  * If we just finished the last week of last year then
1878                  * we are definitely starting the first week of this
1879                  * year.
1880                  *
1881                  * Otherwise, if we're still in this year, but Sunday
1882                  * fell on or after December 28 then December 29, 30, 31
1883                  * could be days within the next year's first year.
1884                  */
1885                 if (year != week_year || (month == 12 && day >= 28))
1886                   {
1887                     /* first week of the new year */
1888                     week_num = 1;
1889                     week_year++;
1890                   }
1891                 else
1892                   week_num++;
1893               }
1894
1895             g_date_time_unref (dt);
1896           }
1897     }
1898
1899   g_time_zone_unref (timezone);
1900 }
1901
1902 static void
1903 test_z (void)
1904 {
1905   GTimeZone *tz;
1906   GDateTime *dt;
1907   gchar *p;
1908
1909   g_test_bug ("642935");
1910
1911   tz = g_time_zone_new ("-08:00");
1912   dt = g_date_time_new (tz, 1, 1, 1, 0, 0, 0);
1913
1914   p = g_date_time_format (dt, "%z");
1915   g_assert_cmpstr (p, ==, "-0800");
1916   g_free (p);
1917
1918   p = g_date_time_format (dt, "%:z");
1919   g_assert_cmpstr (p, ==, "-08:00");
1920   g_free (p);
1921
1922   p = g_date_time_format (dt, "%::z");
1923   g_assert_cmpstr (p, ==, "-08:00:00");
1924   g_free (p);
1925
1926   p = g_date_time_format (dt, "%:::z");
1927   g_assert_cmpstr (p, ==, "-08");
1928   g_free (p);
1929
1930   g_date_time_unref (dt);
1931   g_time_zone_unref (tz);
1932
1933   tz = g_time_zone_new ("+00:00");
1934   dt = g_date_time_new (tz, 1, 1, 1, 0, 0, 0);
1935   p = g_date_time_format (dt, "%:::z");
1936   g_assert_cmpstr (p, ==, "+00");
1937   g_free (p);
1938   g_date_time_unref (dt);
1939   g_time_zone_unref (tz);
1940
1941   tz = g_time_zone_new ("+08:23");
1942   dt = g_date_time_new (tz, 1, 1, 1, 0, 0, 0);
1943   p = g_date_time_format (dt, "%:::z");
1944   g_assert_cmpstr (p, ==, "+08:23");
1945   g_free (p);
1946   g_date_time_unref (dt);
1947   g_time_zone_unref (tz);
1948
1949   tz = g_time_zone_new ("+08:23:45");
1950   dt = g_date_time_new (tz, 1, 1, 1, 0, 0, 0);
1951   p = g_date_time_format (dt, "%:::z");
1952   g_assert_cmpstr (p, ==, "+08:23:45");
1953   g_free (p);
1954   g_date_time_unref (dt);
1955   g_time_zone_unref (tz);
1956 }
1957
1958 #pragma GCC diagnostic push
1959 #pragma GCC diagnostic ignored "-Wformat-y2k"
1960 static void
1961 test_strftime (void)
1962 {
1963 #ifdef __linux__
1964 #define TEST_FORMAT \
1965   "a%a A%A b%b B%B c%c C%C d%d e%e F%F g%g G%G h%h H%H I%I j%j m%m M%M " \
1966   "n%n p%p r%r R%R S%S t%t T%T u%u V%V w%w x%x X%X y%y Y%Y z%z Z%Z %%"
1967   time_t t;
1968
1969   /* 127997 is prime, 1315005118 is now */
1970   for (t = 0; t < 1315005118; t += 127997)
1971     {
1972       GDateTime *date_time;
1973       gchar c_str[1000];
1974       gchar *dt_str;
1975
1976       date_time = g_date_time_new_from_unix_local (t);
1977       dt_str = g_date_time_format (date_time, TEST_FORMAT);
1978       strftime (c_str, sizeof c_str, TEST_FORMAT, localtime (&t));
1979       g_assert_cmpstr (c_str, ==, dt_str);
1980       g_date_time_unref (date_time);
1981       g_free (dt_str);
1982     }
1983 #endif
1984 }
1985 #pragma GCC diagnostic pop
1986
1987 /* Check that g_date_time_format() correctly returns %NULL for format
1988  * placeholders which are not supported in the current locale. */
1989 static void
1990 test_GDateTime_strftime_error_handling (void)
1991 {
1992   gchar *oldlocale;
1993
1994   oldlocale = g_strdup (setlocale (LC_ALL, NULL));
1995   setlocale (LC_ALL, "de_DE.utf-8");
1996   if (strstr (setlocale (LC_ALL, NULL), "de_DE") != NULL)
1997     {
1998       /* de_DE doesn’t ever write time in 12-hour notation, so %r is
1999        * unsupported for it. */
2000       TEST_PRINTF_TIME (23, 0, 0, "%r", NULL);
2001     }
2002   else
2003     g_test_skip ("locale de_DE not available, skipping error handling tests");
2004   setlocale (LC_ALL, oldlocale);
2005   g_free (oldlocale);
2006 }
2007
2008 static void
2009 test_find_interval (void)
2010 {
2011   GTimeZone *tz;
2012   GDateTime *dt;
2013   gint64 u;
2014   gint i1, i2;
2015
2016 #ifdef G_OS_UNIX
2017   tz = g_time_zone_new ("America/Toronto");
2018 #elif defined G_OS_WIN32
2019   tz = g_time_zone_new ("Eastern Standard Time");
2020 #endif
2021   dt = g_date_time_new_utc (2010, 11, 7, 1, 30, 0);
2022   u = g_date_time_to_unix (dt);
2023
2024   i1 = g_time_zone_find_interval (tz, G_TIME_TYPE_STANDARD, u);
2025   i2 = g_time_zone_find_interval (tz, G_TIME_TYPE_DAYLIGHT, u);
2026
2027   g_assert_cmpint (i1, !=, i2);
2028
2029   g_date_time_unref (dt);
2030
2031   dt = g_date_time_new_utc (2010, 3, 14, 2, 0, 0);
2032   u = g_date_time_to_unix (dt);
2033
2034   i1 = g_time_zone_find_interval (tz, G_TIME_TYPE_STANDARD, u);
2035   g_assert_cmpint (i1, ==, -1);
2036
2037   g_date_time_unref (dt);
2038   g_time_zone_unref (tz);
2039 }
2040
2041 static void
2042 test_adjust_time (void)
2043 {
2044   GTimeZone *tz;
2045   GDateTime *dt;
2046   gint64 u, u2;
2047   gint i1, i2;
2048
2049 #ifdef G_OS_UNIX
2050   tz = g_time_zone_new ("America/Toronto");
2051 #elif defined G_OS_WIN32
2052   tz = g_time_zone_new ("Eastern Standard Time");
2053 #endif
2054   dt = g_date_time_new_utc (2010, 11, 7, 1, 30, 0);
2055   u = g_date_time_to_unix (dt);
2056   u2 = u;
2057
2058   i1 = g_time_zone_find_interval (tz, G_TIME_TYPE_DAYLIGHT, u);
2059   i2 = g_time_zone_adjust_time (tz, G_TIME_TYPE_DAYLIGHT, &u2);
2060
2061   g_assert_cmpint (i1, ==, i2);
2062   g_assert (u == u2);
2063
2064   g_date_time_unref (dt);
2065
2066   dt = g_date_time_new_utc (2010, 3, 14, 2, 30, 0);
2067   u2 = g_date_time_to_unix (dt);
2068   g_date_time_unref (dt);
2069
2070   dt = g_date_time_new_utc (2010, 3, 14, 3, 0, 0);
2071   u = g_date_time_to_unix (dt);
2072   g_date_time_unref (dt);
2073
2074   i1 = g_time_zone_adjust_time (tz, G_TIME_TYPE_DAYLIGHT, &u2);
2075   g_assert (u == u2);
2076
2077   g_time_zone_unref (tz);
2078 }
2079
2080 static void
2081 test_no_header (void)
2082 {
2083   GTimeZone *tz;
2084
2085   tz = g_time_zone_new ("blabla");
2086
2087   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 0), ==, "UTC");
2088   g_assert_cmpint (g_time_zone_get_offset (tz, 0), ==, 0);
2089   g_assert (!g_time_zone_is_dst (tz, 0));
2090
2091   g_time_zone_unref (tz);
2092 }
2093
2094 static void
2095 test_posix_parse (void)
2096 {
2097   GTimeZone *tz;
2098   GDateTime *gdt1, *gdt2;
2099
2100   tz = g_time_zone_new ("PST");
2101   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 0), ==, "UTC");
2102   g_assert_cmpint (g_time_zone_get_offset (tz, 0), ==, 0);
2103   g_assert (!g_time_zone_is_dst (tz, 0));
2104   g_time_zone_unref (tz);
2105
2106   tz = g_time_zone_new ("PST8");
2107   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 0), ==, "PST");
2108   g_assert_cmpint (g_time_zone_get_offset (tz, 0), ==, - 8 * 3600);
2109   g_assert (!g_time_zone_is_dst (tz, 0));
2110   g_time_zone_unref (tz);
2111
2112 /* This fails rules_from_identifier on Unix (though not on Windows)
2113  * but passes anyway because PST8PDT is a zone name.
2114  */
2115   tz = g_time_zone_new ("PST8PDT");
2116   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 0), ==, "PST");
2117   g_assert_cmpint (g_time_zone_get_offset (tz, 0), ==, - 8 * 3600);
2118   g_assert (!g_time_zone_is_dst (tz, 0));
2119   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 1), ==, "PDT");
2120   g_assert_cmpint (g_time_zone_get_offset (tz, 1), ==,- 7 * 3600);
2121   g_assert (g_time_zone_is_dst (tz, 1));
2122   g_time_zone_unref (tz);
2123
2124   tz = g_time_zone_new ("PST8PDT6:32:15");
2125 #ifdef G_OS_WIN32
2126   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 0), ==, "PST");
2127   g_assert_cmpint (g_time_zone_get_offset (tz, 0), ==, - 8 * 3600);
2128   g_assert (!g_time_zone_is_dst (tz, 0));
2129   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 1), ==, "PDT");
2130   g_assert_cmpint (g_time_zone_get_offset (tz, 1), ==, - 6 * 3600 - 32 *60 - 15);
2131   g_assert (g_time_zone_is_dst (tz, 1));
2132   gdt1 = g_date_time_new (tz, 2012, 12, 6, 11, 15, 23.0);
2133   gdt2 = g_date_time_new (tz, 2012, 6, 6, 11, 15, 23.0);
2134   g_assert (!g_date_time_is_daylight_savings (gdt1));
2135   g_assert_cmpint (g_date_time_get_utc_offset (gdt1) /  1000000, ==, -28800);
2136   g_assert (g_date_time_is_daylight_savings (gdt2));
2137   g_assert_cmpint (g_date_time_get_utc_offset (gdt2) / 1000000, ==, -23535);
2138   g_date_time_unref (gdt1);
2139   g_date_time_unref (gdt2);
2140 #else
2141   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 0), ==, "UTC");
2142   g_assert_cmpint (g_time_zone_get_offset (tz, 0), ==, 0);
2143   g_assert (!g_time_zone_is_dst (tz, 0));
2144 #endif
2145   g_time_zone_unref (tz);
2146
2147   tz = g_time_zone_new ("NZST-12:00:00NZDT-13:00:00,M10.1.0,M3.3.0");
2148   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 0), ==, "NZST");
2149   g_assert_cmpint (g_time_zone_get_offset (tz, 0), ==, 12 * 3600);
2150   g_assert (!g_time_zone_is_dst (tz, 0));
2151   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 1), ==, "NZDT");
2152   g_assert_cmpint (g_time_zone_get_offset (tz, 1), ==, 13 * 3600);
2153   g_assert (g_time_zone_is_dst (tz, 1));
2154   gdt1 = g_date_time_new (tz, 2012, 3, 18, 0, 15, 23.0);
2155   gdt2 = g_date_time_new (tz, 2012, 3, 18, 3, 15, 23.0);
2156   g_assert (g_date_time_is_daylight_savings (gdt1));
2157   g_assert_cmpint (g_date_time_get_utc_offset (gdt1) / 1000000, ==, 46800);
2158   g_assert (!g_date_time_is_daylight_savings (gdt2));
2159   g_assert_cmpint (g_date_time_get_utc_offset (gdt2) / 1000000, ==, 43200);
2160   g_date_time_unref (gdt1);
2161   g_date_time_unref (gdt2);
2162   gdt1 = g_date_time_new (tz, 2012, 10, 7, 3, 15, 23.0);
2163   gdt2 = g_date_time_new (tz, 2012, 10, 7, 1, 15, 23.0);
2164   g_assert (g_date_time_is_daylight_savings (gdt1));
2165   g_assert_cmpint (g_date_time_get_utc_offset (gdt1) / 1000000, ==, 46800);
2166   g_assert (!g_date_time_is_daylight_savings (gdt2));
2167   g_assert_cmpint (g_date_time_get_utc_offset (gdt2) / 1000000, ==, 43200);
2168   g_date_time_unref (gdt1);
2169   g_date_time_unref (gdt2);
2170   g_time_zone_unref (tz);
2171
2172   tz = g_time_zone_new ("NZST-12:00:00NZDT-13:00:00,280,77");
2173   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 0), ==, "NZST");
2174   g_assert_cmpint (g_time_zone_get_offset (tz, 0), ==, 12 * 3600);
2175   g_assert (!g_time_zone_is_dst (tz, 0));
2176   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 1), ==, "NZDT");
2177   g_assert_cmpint (g_time_zone_get_offset (tz, 1), ==, 13 * 3600);
2178   g_assert (g_time_zone_is_dst (tz, 1));
2179   gdt1 = g_date_time_new (tz, 2012, 3, 18, 0, 15, 23.0);
2180   gdt2 = g_date_time_new (tz, 2012, 3, 18, 3, 15, 23.0);
2181   g_assert (g_date_time_is_daylight_savings (gdt1));
2182   g_assert_cmpint (g_date_time_get_utc_offset (gdt1) / 1000000, ==, 46800);
2183   g_assert (!g_date_time_is_daylight_savings (gdt2));
2184   g_assert_cmpint (g_date_time_get_utc_offset (gdt2) / 1000000, ==, 43200);
2185   g_date_time_unref (gdt1);
2186   g_date_time_unref (gdt2);
2187   gdt1 = g_date_time_new (tz, 2012, 10, 7, 3, 15, 23.0);
2188   gdt2 = g_date_time_new (tz, 2012, 10, 7, 1, 15, 23.0);
2189   g_assert (g_date_time_is_daylight_savings (gdt1));
2190   g_assert_cmpint (g_date_time_get_utc_offset (gdt1) / 1000000, ==, 46800);
2191   g_assert (!g_date_time_is_daylight_savings (gdt2));
2192   g_assert_cmpint (g_date_time_get_utc_offset (gdt2) / 1000000, ==, 43200);
2193   g_date_time_unref (gdt1);
2194   g_date_time_unref (gdt2);
2195   g_time_zone_unref (tz);
2196
2197   tz = g_time_zone_new ("NZST-12:00:00NZDT-13:00:00,J279,J76");
2198   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 0), ==, "NZST");
2199   g_assert_cmpint (g_time_zone_get_offset (tz, 0), ==, 12 * 3600);
2200   g_assert (!g_time_zone_is_dst (tz, 0));
2201   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 1), ==, "NZDT");
2202   g_assert_cmpint (g_time_zone_get_offset (tz, 1), ==, 13 * 3600);
2203   g_assert (g_time_zone_is_dst (tz, 1));
2204   gdt1 = g_date_time_new (tz, 2012, 3, 18, 0, 15, 23.0);
2205   gdt2 = g_date_time_new (tz, 2012, 3, 18, 3, 15, 23.0);
2206   g_assert (g_date_time_is_daylight_savings (gdt1));
2207   g_assert_cmpint (g_date_time_get_utc_offset (gdt1) / 1000000, ==, 46800);
2208   g_assert (!g_date_time_is_daylight_savings (gdt2));
2209   g_assert_cmpint (g_date_time_get_utc_offset (gdt2) / 1000000, ==, 43200);
2210   g_date_time_unref (gdt1);
2211   g_date_time_unref (gdt2);
2212   gdt1 = g_date_time_new (tz, 2012, 10, 7, 3, 15, 23.0);
2213   gdt2 = g_date_time_new (tz, 2012, 10, 7, 1, 15, 23.0);
2214   g_assert (g_date_time_is_daylight_savings (gdt1));
2215   g_assert_cmpint (g_date_time_get_utc_offset (gdt1) / 1000000, ==, 46800);
2216   g_assert (!g_date_time_is_daylight_savings (gdt2));
2217   g_assert_cmpint (g_date_time_get_utc_offset (gdt2) / 1000000, ==, 43200);
2218   g_date_time_unref (gdt1);
2219   g_date_time_unref (gdt2);
2220   g_time_zone_unref (tz);
2221
2222   tz = g_time_zone_new ("NZST-12:00:00NZDT-13:00:00,M10.1.0/07:00,M3.3.0/07:00");
2223   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 0), ==, "NZST");
2224   g_assert_cmpint (g_time_zone_get_offset (tz, 0), ==, 12 * 3600);
2225   g_assert (!g_time_zone_is_dst (tz, 0));
2226   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 1), ==, "NZDT");
2227   g_assert_cmpint (g_time_zone_get_offset (tz, 1), ==, 13 * 3600);
2228   g_assert (g_time_zone_is_dst (tz, 1));
2229   gdt1 = g_date_time_new (tz, 2012, 3, 18, 5, 15, 23.0);
2230   gdt2 = g_date_time_new (tz, 2012, 3, 18, 8, 15, 23.0);
2231   g_assert (g_date_time_is_daylight_savings (gdt1));
2232   g_assert_cmpint (g_date_time_get_utc_offset (gdt1) / 1000000, ==, 46800);
2233   g_assert (!g_date_time_is_daylight_savings (gdt2));
2234   g_assert_cmpint (g_date_time_get_utc_offset (gdt2) / 1000000, ==, 43200);
2235   g_date_time_unref (gdt1);
2236   g_date_time_unref (gdt2);
2237   gdt1 = g_date_time_new (tz, 2012, 10, 7, 8, 15, 23.0);
2238   gdt2 = g_date_time_new (tz, 2012, 10, 7, 6, 15, 23.0);
2239   g_assert (g_date_time_is_daylight_savings (gdt1));
2240   g_assert_cmpint (g_date_time_get_utc_offset (gdt1) / 1000000, ==, 46800);
2241   g_assert (!g_date_time_is_daylight_savings (gdt2));
2242   g_assert_cmpint (g_date_time_get_utc_offset (gdt2) / 1000000, ==, 43200);
2243   g_date_time_unref (gdt1);
2244   g_date_time_unref (gdt2);
2245   gdt1 = g_date_time_new (tz, 1902, 10, 7, 8, 15, 23.0);
2246   gdt2 = g_date_time_new (tz, 1902, 10, 7, 6, 15, 23.0);
2247   g_assert (!g_date_time_is_daylight_savings (gdt1));
2248   g_assert_cmpint (g_date_time_get_utc_offset (gdt1) / 1000000, ==, 43200);
2249   g_assert (!g_date_time_is_daylight_savings (gdt2));
2250   g_assert_cmpint (g_date_time_get_utc_offset (gdt2) / 1000000, ==, 43200);
2251   g_date_time_unref (gdt1);
2252   g_date_time_unref (gdt2);
2253   gdt1 = g_date_time_new (tz, 2142, 10, 7, 8, 15, 23.0);
2254   gdt2 = g_date_time_new (tz, 2142, 10, 7, 6, 15, 23.0);
2255   g_assert (g_date_time_is_daylight_savings (gdt1));
2256   g_assert_cmpint (g_date_time_get_utc_offset (gdt1) / 1000000, ==, 46800);
2257   g_assert (!g_date_time_is_daylight_savings (gdt2));
2258   g_assert_cmpint (g_date_time_get_utc_offset (gdt2) / 1000000, ==, 43200);
2259   g_date_time_unref (gdt1);
2260   g_date_time_unref (gdt2);
2261   gdt1 = g_date_time_new (tz, 3212, 10, 7, 8, 15, 23.0);
2262   gdt2 = g_date_time_new (tz, 3212, 10, 7, 6, 15, 23.0);
2263   g_assert (!g_date_time_is_daylight_savings (gdt1));
2264   g_assert_cmpint (g_date_time_get_utc_offset (gdt1) / 1000000, ==, 43200);
2265   g_assert (!g_date_time_is_daylight_savings (gdt2));
2266   g_assert_cmpint (g_date_time_get_utc_offset (gdt2) / 1000000, ==, 43200);
2267   g_date_time_unref (gdt1);
2268   g_date_time_unref (gdt2);
2269   g_time_zone_unref (tz);
2270 }
2271
2272 static void
2273 test_GDateTime_floating_point (void)
2274 {
2275   GDateTime *dt;
2276   GTimeZone *tz;
2277
2278   g_test_bug ("697715");
2279
2280   tz = g_time_zone_new ("-03:00");
2281   dt = g_date_time_new (tz, 2010, 5, 24,  8, 0, 1.000001);
2282   g_time_zone_unref (tz);
2283   g_assert_cmpint (g_date_time_get_microsecond (dt), ==, 1);
2284   g_date_time_unref (dt);
2285 }
2286
2287 gint
2288 main (gint   argc,
2289       gchar *argv[])
2290 {
2291   g_test_init (&argc, &argv, NULL);
2292   g_test_bug_base ("http://bugzilla.gnome.org/");
2293
2294   /* GDateTime Tests */
2295   bind_textdomain_codeset ("glib20", "UTF-8");
2296
2297   g_test_add_func ("/GDateTime/invalid", test_GDateTime_invalid);
2298   g_test_add_func ("/GDateTime/add_days", test_GDateTime_add_days);
2299   g_test_add_func ("/GDateTime/add_full", test_GDateTime_add_full);
2300   g_test_add_func ("/GDateTime/add_hours", test_GDateTime_add_hours);
2301   g_test_add_func ("/GDateTime/add_minutes", test_GDateTime_add_minutes);
2302   g_test_add_func ("/GDateTime/add_months", test_GDateTime_add_months);
2303   g_test_add_func ("/GDateTime/add_seconds", test_GDateTime_add_seconds);
2304   g_test_add_func ("/GDateTime/add_weeks", test_GDateTime_add_weeks);
2305   g_test_add_func ("/GDateTime/add_years", test_GDateTime_add_years);
2306   g_test_add_func ("/GDateTime/compare", test_GDateTime_compare);
2307   g_test_add_func ("/GDateTime/diff", test_GDateTime_diff);
2308   g_test_add_func ("/GDateTime/equal", test_GDateTime_equal);
2309   g_test_add_func ("/GDateTime/get_day_of_week", test_GDateTime_get_day_of_week);
2310   g_test_add_func ("/GDateTime/get_day_of_month", test_GDateTime_get_day_of_month);
2311   g_test_add_func ("/GDateTime/get_day_of_year", test_GDateTime_get_day_of_year);
2312   g_test_add_func ("/GDateTime/get_hour", test_GDateTime_get_hour);
2313   g_test_add_func ("/GDateTime/get_microsecond", test_GDateTime_get_microsecond);
2314   g_test_add_func ("/GDateTime/get_minute", test_GDateTime_get_minute);
2315   g_test_add_func ("/GDateTime/get_month", test_GDateTime_get_month);
2316   g_test_add_func ("/GDateTime/get_second", test_GDateTime_get_second);
2317   g_test_add_func ("/GDateTime/get_utc_offset", test_GDateTime_get_utc_offset);
2318   g_test_add_func ("/GDateTime/get_year", test_GDateTime_get_year);
2319   g_test_add_func ("/GDateTime/hash", test_GDateTime_hash);
2320   g_test_add_func ("/GDateTime/new_from_unix", test_GDateTime_new_from_unix);
2321   g_test_add_func ("/GDateTime/new_from_unix_utc", test_GDateTime_new_from_unix_utc);
2322   g_test_add_func ("/GDateTime/new_from_unix/overflow", test_GDateTime_new_from_unix_overflow);
2323   g_test_add_func ("/GDateTime/new_from_timeval", test_GDateTime_new_from_timeval);
2324   g_test_add_func ("/GDateTime/new_from_timeval_utc", test_GDateTime_new_from_timeval_utc);
2325   g_test_add_func ("/GDateTime/new_from_timeval/overflow", test_GDateTime_new_from_timeval_overflow);
2326   g_test_add_func ("/GDateTime/new_from_iso8601", test_GDateTime_new_from_iso8601);
2327   g_test_add_func ("/GDateTime/new_full", test_GDateTime_new_full);
2328   g_test_add_func ("/GDateTime/now", test_GDateTime_now);
2329   g_test_add_func ("/GDateTime/printf", test_GDateTime_printf);
2330   g_test_add_func ("/GDateTime/non_utf8_printf", test_non_utf8_printf);
2331   g_test_add_func ("/GDateTime/strftime", test_strftime);
2332   g_test_add_func ("/GDateTime/strftime/error_handling", test_GDateTime_strftime_error_handling);
2333   g_test_add_func ("/GDateTime/modifiers", test_modifiers);
2334   g_test_add_func ("/GDateTime/month_names", test_month_names);
2335   g_test_add_func ("/GDateTime/to_local", test_GDateTime_to_local);
2336   g_test_add_func ("/GDateTime/to_unix", test_GDateTime_to_unix);
2337   g_test_add_func ("/GDateTime/to_timeval", test_GDateTime_to_timeval);
2338   g_test_add_func ("/GDateTime/to_utc", test_GDateTime_to_utc);
2339   g_test_add_func ("/GDateTime/now_utc", test_GDateTime_now_utc);
2340   g_test_add_func ("/GDateTime/dst", test_GDateTime_dst);
2341   g_test_add_func ("/GDateTime/test_z", test_z);
2342   g_test_add_func ("/GDateTime/test-all-dates", test_all_dates);
2343   g_test_add_func ("/GTimeZone/find-interval", test_find_interval);
2344   g_test_add_func ("/GTimeZone/adjust-time", test_adjust_time);
2345   g_test_add_func ("/GTimeZone/no-header", test_no_header);
2346   g_test_add_func ("/GTimeZone/posix-parse", test_posix_parse);
2347   g_test_add_func ("/GTimeZone/floating-point", test_GDateTime_floating_point);
2348
2349   return g_test_run ();
2350 }