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
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  18  */
  19
  20 #include "config.h"
  21
  22 #include <string.h>
  23 #include <time.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_cmpint ((y), ==, g_date_time_get_year ((dt))); \
  30   g_assert_cmpint ((m), ==, g_date_time_get_month ((dt))); \
  31   g_assert_cmpint ((d), ==, g_date_time_get_day_of_month ((dt))); \
  32 } G_STMT_END
  33 #define ASSERT_TIME(dt,H,M,S) G_STMT_START { \
  34   g_assert_cmpint ((H), ==, g_date_time_get_hour ((dt))); \
  35   g_assert_cmpint ((M), ==, g_date_time_get_minute ((dt))); \
  36   g_assert_cmpint ((S), ==, g_date_time_get_second ((dt))); \
  37 } G_STMT_END
  38
  39 static void
  40 get_localtime_tm (time_t     time_,
  41                   struct tm *retval)
  42 {
  43 #ifdef HAVE_LOCALTIME_R
  44   localtime_r (&time_, retval);
  45 #else
  46   {
  47     struct tm *ptm = localtime (&time_);
  48
  49     if (ptm == NULL)
  50       {
  51         /* Happens at least in Microsoft's C library if you pass a
  52          * negative time_t. Use 2000-01-01 as default date.
  53          */
  54 #ifndef G_DISABLE_CHECKS
  55         g_return_if_fail_warning (G_LOG_DOMAIN, G_STRFUNC, "ptm != NULL");
  56 #endif
  57
  58         retval->tm_mon = 0;
  59         retval->tm_mday = 1;
  60         retval->tm_year = 100;
  61       }
  62     else
  63       memcpy ((void *) retval, (void *) ptm, sizeof (struct tm));
  64   }
  65 #endif /* HAVE_LOCALTIME_R */
  66 }
  67
  68 static void
  69 test_GDateTime_now (void)
  70 {
  71   GDateTime *dt;
  72   struct tm tm;
  73
  74   memset (&tm, 0, sizeof (tm));
  75   get_localtime_tm (time (NULL), &tm);
  76
  77   dt = g_date_time_new_now_local ();
  78
  79   g_assert_cmpint (g_date_time_get_year (dt), ==, 1900 + tm.tm_year);
  80   g_assert_cmpint (g_date_time_get_month (dt), ==, 1 + tm.tm_mon);
  81   g_assert_cmpint (g_date_time_get_day_of_month (dt), ==, tm.tm_mday);
  82   g_assert_cmpint (g_date_time_get_hour (dt), ==, tm.tm_hour);
  83   g_assert_cmpint (g_date_time_get_minute (dt), ==, tm.tm_min);
  84   /* XXX we need some fuzzyness here */
  85   g_assert_cmpint (g_date_time_get_second (dt), >=, tm.tm_sec);
  86
  87   g_date_time_unref (dt);
  88 }
  89
  90 static void
  91 test_GDateTime_new_from_unix (void)
  92 {
  93   GDateTime *dt;
  94   struct tm  tm;
  95   time_t     t;
  96
  97   memset (&tm, 0, sizeof (tm));
  98   t = time (NULL);
  99   get_localtime_tm (t, &tm);
 100
 101   dt = g_date_time_new_from_unix_local (t);
 102   g_assert_cmpint (g_date_time_get_year (dt), ==, 1900 + tm.tm_year);
 103   g_assert_cmpint (g_date_time_get_month (dt), ==, 1 + tm.tm_mon);
 104   g_assert_cmpint (g_date_time_get_day_of_month (dt), ==, tm.tm_mday);
 105   g_assert_cmpint (g_date_time_get_hour (dt), ==, tm.tm_hour);
 106   g_assert_cmpint (g_date_time_get_minute (dt), ==, tm.tm_min);
 107   g_assert_cmpint (g_date_time_get_second (dt), ==, tm.tm_sec);
 108   g_date_time_unref (dt);
 109
 110   memset (&tm, 0, sizeof (tm));
 111   tm.tm_year = 90;
 112   tm.tm_mday = 1;
 113   tm.tm_mon = 0;
 114   tm.tm_hour = 0;
 115   tm.tm_min = 0;
 116   tm.tm_sec = 0;
 117   tm.tm_isdst = -1;
 118   t = mktime (&tm);
 119
 120   dt = g_date_time_new_from_unix_local (t);
 121   g_assert_cmpint (g_date_time_get_year (dt), ==, 1990);
 122   g_assert_cmpint (g_date_time_get_month (dt), ==, 1);
 123   g_assert_cmpint (g_date_time_get_day_of_month (dt), ==, 1);
 124   g_assert_cmpint (g_date_time_get_hour (dt), ==, 0);
 125   g_assert_cmpint (g_date_time_get_minute (dt), ==, 0);
 126   g_assert_cmpint (g_date_time_get_second (dt), ==, 0);
 127   g_date_time_unref (dt);
 128 }
 129
 130 static void
 131 test_GDateTime_compare (void)
 132 {
 133   GDateTime *dt1, *dt2;
 134   gint       i;
 135
 136   dt1 = g_date_time_new_utc (2000, 1, 1, 0, 0, 0);
 137
 138   for (i = 1; i < 2000; i++)
 139     {
 140       dt2 = g_date_time_new_utc (i, 12, 31, 0, 0, 0);
 141       g_assert_cmpint (1, ==, g_date_time_compare (dt1, dt2));
 142       g_date_time_unref (dt2);
 143     }
 144
 145   dt2 = g_date_time_new_utc (1999, 12, 31, 23, 59, 59);
 146   g_assert_cmpint (1, ==, g_date_time_compare (dt1, dt2));
 147   g_date_time_unref (dt2);
 148
 149   dt2 = g_date_time_new_utc (2000, 1, 1, 0, 0, 1);
 150   g_assert_cmpint (-1, ==, g_date_time_compare (dt1, dt2));
 151   g_date_time_unref (dt2);
 152
 153   dt2 = g_date_time_new_utc (2000, 1, 1, 0, 0, 0);
 154   g_assert_cmpint (0, ==, g_date_time_compare (dt1, dt2));
 155   g_date_time_unref (dt2);
 156   g_date_time_unref (dt1);
 157 }
 158
 159 static void
 160 test_GDateTime_equal (void)
 161 {
 162   GDateTime *dt1, *dt2;
 163   GTimeZone *tz;
 164
 165   dt1 = g_date_time_new_local (2009, 10, 19, 0, 0, 0);
 166   dt2 = g_date_time_new_local (2009, 10, 19, 0, 0, 0);
 167   g_assert (g_date_time_equal (dt1, dt2));
 168   g_date_time_unref (dt1);
 169   g_date_time_unref (dt2);
 170
 171   dt1 = g_date_time_new_local (2009, 10, 18, 0, 0, 0);
 172   dt2 = g_date_time_new_local (2009, 10, 19, 0, 0, 0);
 173   g_assert (!g_date_time_equal (dt1, dt2));
 174   g_date_time_unref (dt1);
 175   g_date_time_unref (dt2);
 176
 177   /* UTC-0300 and not in DST */
 178   tz = g_time_zone_new ("-03:00");
 179   dt1 = g_date_time_new (tz, 2010, 5, 24,  8, 0, 0);
 180   g_time_zone_unref (tz);
 181   g_assert_cmpint (g_date_time_get_utc_offset (dt1) / G_USEC_PER_SEC, ==, (-3 * 3600));
 182   /* UTC */
 183   dt2 = g_date_time_new_utc (2010, 5, 24, 11, 0, 0);
 184   g_assert_cmpint (g_date_time_get_utc_offset (dt2), ==, 0);
 185
 186   g_assert (g_date_time_equal (dt1, dt2));
 187   g_date_time_unref (dt1);
 188
 189   /* America/Recife is in UTC-0300 */
 190 #ifdef G_OS_UNIX
 191   tz = g_time_zone_new ("America/Recife");
 192 #elif defined G_OS_WIN32
 193   tz = g_time_zone_new ("E. South America Standard Time");
 194 #endif
 195   dt1 = g_date_time_new (tz, 2010, 5, 24,  8, 0, 0);
 196   g_time_zone_unref (tz);
 197   g_assert_cmpint (g_date_time_get_utc_offset (dt1) / G_USEC_PER_SEC, ==, (-3 * 3600));
 198   g_assert (g_date_time_equal (dt1, dt2));
 199   g_date_time_unref (dt1);
 200   g_date_time_unref (dt2);
 201 }
 202
 203 static void
 204 test_GDateTime_get_day_of_week (void)
 205 {
 206   GDateTime *dt;
 207
 208   dt = g_date_time_new_local (2009, 10, 19, 0, 0, 0);
 209   g_assert_cmpint (1, ==, g_date_time_get_day_of_week (dt));
 210   g_date_time_unref (dt);
 211
 212   dt = g_date_time_new_local (2000, 10, 1, 0, 0, 0);
 213   g_assert_cmpint (7, ==, g_date_time_get_day_of_week (dt));
 214   g_date_time_unref (dt);
 215 }
 216
 217 static void
 218 test_GDateTime_get_day_of_month (void)
 219 {
 220   GDateTime *dt;
 221
 222   dt = g_date_time_new_local (2009, 10, 19, 0, 0, 0);
 223   g_assert_cmpint (g_date_time_get_day_of_month (dt), ==, 19);
 224   g_date_time_unref (dt);
 225
 226   dt = g_date_time_new_local (1400, 3, 12, 0, 0, 0);
 227   g_assert_cmpint (g_date_time_get_day_of_month (dt), ==, 12);
 228   g_date_time_unref (dt);
 229
 230   dt = g_date_time_new_local (1800, 12, 31, 0, 0, 0);
 231   g_assert_cmpint (g_date_time_get_day_of_month (dt), ==, 31);
 232   g_date_time_unref (dt);
 233
 234   dt = g_date_time_new_local (1000, 1, 1, 0, 0, 0);
 235   g_assert_cmpint (g_date_time_get_day_of_month (dt), ==, 1);
 236   g_date_time_unref (dt);
 237 }
 238
 239 static void
 240 test_GDateTime_get_hour (void)
 241 {
 242   GDateTime *dt;
 243
 244   dt = g_date_time_new_utc (2009, 10, 19, 15, 13, 11);
 245   g_assert_cmpint (15, ==, g_date_time_get_hour (dt));
 246   g_date_time_unref (dt);
 247
 248   dt = g_date_time_new_utc (100, 10, 19, 1, 0, 0);
 249   g_assert_cmpint (1, ==, g_date_time_get_hour (dt));
 250   g_date_time_unref (dt);
 251
 252   dt = g_date_time_new_utc (100, 10, 19, 0, 0, 0);
 253   g_assert_cmpint (0, ==, g_date_time_get_hour (dt));
 254   g_date_time_unref (dt);
 255
 256   dt = g_date_time_new_utc (100, 10, 1, 23, 59, 59);
 257   g_assert_cmpint (23, ==, g_date_time_get_hour (dt));
 258   g_date_time_unref (dt);
 259 }
 260
 261 static void
 262 test_GDateTime_get_microsecond (void)
 263 {
 264   GTimeVal   tv;
 265   GDateTime *dt;
 266
 267   g_get_current_time (&tv);
 268   dt = g_date_time_new_from_timeval_local (&tv);
 269   g_assert_cmpint (tv.tv_usec, ==, g_date_time_get_microsecond (dt));
 270   g_date_time_unref (dt);
 271 }
 272
 273 static void
 274 test_GDateTime_get_year (void)
 275 {
 276   GDateTime *dt;
 277
 278   dt = g_date_time_new_local (2009, 1, 1, 0, 0, 0);
 279   g_assert_cmpint (2009, ==, g_date_time_get_year (dt));
 280   g_date_time_unref (dt);
 281
 282   dt = g_date_time_new_local (1, 1, 1, 0, 0, 0);
 283   g_assert_cmpint (1, ==, g_date_time_get_year (dt));
 284   g_date_time_unref (dt);
 285
 286   dt = g_date_time_new_local (13, 1, 1, 0, 0, 0);
 287   g_assert_cmpint (13, ==, g_date_time_get_year (dt));
 288   g_date_time_unref (dt);
 289
 290   dt = g_date_time_new_local (3000, 1, 1, 0, 0, 0);
 291   g_assert_cmpint (3000, ==, g_date_time_get_year (dt));
 292   g_date_time_unref (dt);
 293 }
 294
 295 static void
 296 test_GDateTime_hash (void)
 297 {
 298   GHashTable *h;
 299
 300   h = g_hash_table_new_full (g_date_time_hash, g_date_time_equal,
 301                              (GDestroyNotify)g_date_time_unref,
 302                              NULL);
 303   g_hash_table_insert (h, g_date_time_new_now_local (), NULL);
 304   g_hash_table_remove_all (h);
 305   g_hash_table_destroy (h);
 306 }
 307
 308 static void
 309 test_GDateTime_new_from_timeval (void)
 310 {
 311   GDateTime *dt;
 312   GTimeVal   tv, tv2;
 313
 314   g_get_current_time (&tv);
 315   dt = g_date_time_new_from_timeval_local (&tv);
 316
 317   if (g_test_verbose ())
 318     g_print ("\nDT%04d-%02d-%02dT%02d:%02d:%02d%s\n",
 319              g_date_time_get_year (dt),
 320              g_date_time_get_month (dt),
 321              g_date_time_get_day_of_month (dt),
 322              g_date_time_get_hour (dt),
 323              g_date_time_get_minute (dt),
 324              g_date_time_get_second (dt),
 325              g_date_time_get_timezone_abbreviation (dt));
 326
 327   g_date_time_to_timeval (dt, &tv2);
 328   g_assert_cmpint (tv.tv_sec, ==, tv2.tv_sec);
 329   g_assert_cmpint (tv.tv_usec, ==, tv2.tv_usec);
 330   g_date_time_unref (dt);
 331 }
 332
 333 static void
 334 test_GDateTime_new_from_timeval_utc (void)
 335 {
 336   GDateTime *dt;
 337   GTimeVal   tv, tv2;
 338
 339   g_get_current_time (&tv);
 340   dt = g_date_time_new_from_timeval_utc (&tv);
 341
 342   if (g_test_verbose ())
 343     g_print ("\nDT%04d-%02d-%02dT%02d:%02d:%02d%s\n",
 344              g_date_time_get_year (dt),
 345              g_date_time_get_month (dt),
 346              g_date_time_get_day_of_month (dt),
 347              g_date_time_get_hour (dt),
 348              g_date_time_get_minute (dt),
 349              g_date_time_get_second (dt),
 350              g_date_time_get_timezone_abbreviation (dt));
 351
 352   g_date_time_to_timeval (dt, &tv2);
 353   g_assert_cmpint (tv.tv_sec, ==, tv2.tv_sec);
 354   g_assert_cmpint (tv.tv_usec, ==, tv2.tv_usec);
 355   g_date_time_unref (dt);
 356 }
 357
 358 static void
 359 test_GDateTime_to_unix (void)
 360 {
 361   GDateTime *dt;
 362   time_t     t;
 363
 364   t = time (NULL);
 365   dt = g_date_time_new_from_unix_local (t);
 366   g_assert_cmpint (g_date_time_to_unix (dt), ==, t);
 367   g_date_time_unref (dt);
 368 }
 369
 370 static void
 371 test_GDateTime_add_years (void)
 372 {
 373   GDateTime *dt, *dt2;
 374
 375   dt = g_date_time_new_local (2009, 10, 19, 0, 0, 0);
 376   dt2 = g_date_time_add_years (dt, 1);
 377   g_assert_cmpint (2010, ==, g_date_time_get_year (dt2));
 378   g_date_time_unref (dt);
 379   g_date_time_unref (dt2);
 380 }
 381
 382 static void
 383 test_GDateTime_add_months (void)
 384 {
 385 #define TEST_ADD_MONTHS(y,m,d,a,ny,nm,nd) G_STMT_START { \
 386   GDateTime *dt, *dt2; \
 387   dt = g_date_time_new_utc (y, m, d, 0, 0, 0); \
 388   dt2 = g_date_time_add_months (dt, a); \
 389   ASSERT_DATE (dt2, ny, nm, nd); \
 390   g_date_time_unref (dt); \
 391   g_date_time_unref (dt2); \
 392 } G_STMT_END
 393
 394   TEST_ADD_MONTHS (2009, 12, 31,    1, 2010, 1, 31);
 395   TEST_ADD_MONTHS (2009, 12, 31,    1, 2010, 1, 31);
 396   TEST_ADD_MONTHS (2009,  6, 15,    1, 2009, 7, 15);
 397   TEST_ADD_MONTHS (1400,  3,  1,    1, 1400, 4,  1);
 398   TEST_ADD_MONTHS (1400,  1, 31,    1, 1400, 2, 28);
 399   TEST_ADD_MONTHS (1400,  1, 31, 7200, 2000, 1, 31);
 400   TEST_ADD_MONTHS (2008,  2, 29,   12, 2009, 2, 28);
 401   TEST_ADD_MONTHS (2000,  8, 16,   -5, 2000, 3, 16);
 402   TEST_ADD_MONTHS (2000,  8, 16,  -12, 1999, 8, 16);
 403   TEST_ADD_MONTHS (2011,  2,  1,  -13, 2010, 1,  1);
 404   TEST_ADD_MONTHS (1776,  7,  4, 1200, 1876, 7,  4);
 405 }
 406
 407 static void
 408 test_GDateTime_add_days (void)
 409 {
 410 #define TEST_ADD_DAYS(y,m,d,a,ny,nm,nd) G_STMT_START { \
 411   GDateTime *dt, *dt2; \
 412   dt = g_date_time_new_local (y, m, d, 0, 0, 0); \
 413   dt2 = g_date_time_add_days (dt, a); \
 414   g_assert_cmpint (ny, ==, g_date_time_get_year (dt2)); \
 415   g_assert_cmpint (nm, ==, g_date_time_get_month (dt2)); \
 416   g_assert_cmpint (nd, ==, g_date_time_get_day_of_month (dt2)); \
 417   g_date_time_unref (dt); \
 418   g_date_time_unref (dt2); \
 419 } G_STMT_END
 420
 421   TEST_ADD_DAYS (2009, 1, 31, 1, 2009, 2, 1);
 422   TEST_ADD_DAYS (2009, 2, 1, -1, 2009, 1, 31);
 423   TEST_ADD_DAYS (2008, 2, 28, 1, 2008, 2, 29);
 424   TEST_ADD_DAYS (2008, 12, 31, 1, 2009, 1, 1);
 425   TEST_ADD_DAYS (1, 1, 1, 1, 1, 1, 2);
 426   TEST_ADD_DAYS (1955, 5, 24, 10, 1955, 6, 3);
 427   TEST_ADD_DAYS (1955, 5, 24, -10, 1955, 5, 14);
 428 }
 429
 430 static void
 431 test_GDateTime_add_weeks (void)
 432 {
 433 #define TEST_ADD_WEEKS(y,m,d,a,ny,nm,nd) G_STMT_START { \
 434   GDateTime *dt, *dt2; \
 435   dt = g_date_time_new_local (y, m, d, 0, 0, 0); \
 436   dt2 = g_date_time_add_weeks (dt, a); \
 437   g_assert_cmpint (ny, ==, g_date_time_get_year (dt2)); \
 438   g_assert_cmpint (nm, ==, g_date_time_get_month (dt2)); \
 439   g_assert_cmpint (nd, ==, g_date_time_get_day_of_month (dt2)); \
 440   g_date_time_unref (dt); \
 441   g_date_time_unref (dt2); \
 442 } G_STMT_END
 443
 444   TEST_ADD_WEEKS (2009, 1, 1, 1, 2009, 1, 8);
 445   TEST_ADD_WEEKS (2009, 8, 30, 1, 2009, 9, 6);
 446   TEST_ADD_WEEKS (2009, 12, 31, 1, 2010, 1, 7);
 447   TEST_ADD_WEEKS (2009, 1, 1, -1, 2008, 12, 25);
 448 }
 449
 450 static void
 451 test_GDateTime_add_hours (void)
 452 {
 453 #define TEST_ADD_HOURS(y,m,d,h,mi,s,a,ny,nm,nd,nh,nmi,ns) G_STMT_START { \
 454   GDateTime *dt, *dt2; \
 455   dt = g_date_time_new_utc (y, m, d, h, mi, s); \
 456   dt2 = g_date_time_add_hours (dt, a); \
 457   g_assert_cmpint (ny, ==, g_date_time_get_year (dt2)); \
 458   g_assert_cmpint (nm, ==, g_date_time_get_month (dt2)); \
 459   g_assert_cmpint (nd, ==, g_date_time_get_day_of_month (dt2)); \
 460   g_assert_cmpint (nh, ==, g_date_time_get_hour (dt2)); \
 461   g_assert_cmpint (nmi, ==, g_date_time_get_minute (dt2)); \
 462   g_assert_cmpint (ns, ==, g_date_time_get_second (dt2)); \
 463   g_date_time_unref (dt); \
 464   g_date_time_unref (dt2); \
 465 } G_STMT_END
 466
 467   TEST_ADD_HOURS (2009,  1,  1,  0, 0, 0, 1, 2009, 1, 1, 1, 0, 0);
 468   TEST_ADD_HOURS (2008, 12, 31, 23, 0, 0, 1, 2009, 1, 1, 0, 0, 0);
 469 }
 470
 471 static void
 472 test_GDateTime_add_full (void)
 473 {
 474 #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 { \
 475   GDateTime *dt, *dt2; \
 476   dt = g_date_time_new_utc (y, m, d, h, mi, s); \
 477   dt2 = g_date_time_add_full (dt, ay, am, ad, ah, ami, as); \
 478   g_assert_cmpint (ny, ==, g_date_time_get_year (dt2)); \
 479   g_assert_cmpint (nm, ==, g_date_time_get_month (dt2)); \
 480   g_assert_cmpint (nd, ==, g_date_time_get_day_of_month (dt2)); \
 481   g_assert_cmpint (nh, ==, g_date_time_get_hour (dt2)); \
 482   g_assert_cmpint (nmi, ==, g_date_time_get_minute (dt2)); \
 483   g_assert_cmpint (ns, ==, g_date_time_get_second (dt2)); \
 484   g_date_time_unref (dt); \
 485   g_date_time_unref (dt2); \
 486 } G_STMT_END
 487
 488   TEST_ADD_FULL (2009, 10, 21,  0,  0, 0,
 489                     1,  1,  1,  1,  1, 1,
 490                  2010, 11, 22,  1,  1, 1);
 491   TEST_ADD_FULL (2000,  1,  1,  1,  1, 1,
 492                     0,  1,  0,  0,  0, 0,
 493                  2000,  2,  1,  1,  1, 1);
 494   TEST_ADD_FULL (2000,  1,  1,  0,  0, 0,
 495                    -1,  1,  0,  0,  0, 0,
 496                  1999,  2,  1,  0,  0, 0);
 497   TEST_ADD_FULL (2010, 10, 31,  0,  0, 0,
 498                     0,  4,  0,  0,  0, 0,
 499                  2011,  2, 28,  0,  0, 0);
 500   TEST_ADD_FULL (2010,  8, 25, 22, 45, 0,
 501                     0,  1,  6,  1, 25, 0,
 502                  2010, 10,  2,  0, 10, 0);
 503 }
 504
 505 static void
 506 test_GDateTime_add_minutes (void)
 507 {
 508 #define TEST_ADD_MINUTES(i,o) G_STMT_START { \
 509   GDateTime *dt, *dt2; \
 510   dt = g_date_time_new_local (2000, 1, 1, 0, 0, 0); \
 511   dt2 = g_date_time_add_minutes (dt, i); \
 512   g_assert_cmpint (o, ==, g_date_time_get_minute (dt2)); \
 513   g_date_time_unref (dt); \
 514   g_date_time_unref (dt2); \
 515 } G_STMT_END
 516
 517   TEST_ADD_MINUTES (60, 0);
 518   TEST_ADD_MINUTES (100, 40);
 519   TEST_ADD_MINUTES (5, 5);
 520   TEST_ADD_MINUTES (1441, 1);
 521   TEST_ADD_MINUTES (-1441, 59);
 522 }
 523
 524 static void
 525 test_GDateTime_add_seconds (void)
 526 {
 527 #define TEST_ADD_SECONDS(i,o) G_STMT_START { \
 528   GDateTime *dt, *dt2; \
 529   dt = g_date_time_new_local (2000, 1, 1, 0, 0, 0); \
 530   dt2 = g_date_time_add_seconds (dt, i); \
 531   g_assert_cmpint (o, ==, g_date_time_get_second (dt2)); \
 532   g_date_time_unref (dt); \
 533   g_date_time_unref (dt2); \
 534 } G_STMT_END
 535
 536   TEST_ADD_SECONDS (1, 1);
 537   TEST_ADD_SECONDS (60, 0);
 538   TEST_ADD_SECONDS (61, 1);
 539   TEST_ADD_SECONDS (120, 0);
 540   TEST_ADD_SECONDS (-61, 59);
 541   TEST_ADD_SECONDS (86401, 1);
 542   TEST_ADD_SECONDS (-86401, 59);
 543   TEST_ADD_SECONDS (-31, 29);
 544   TEST_ADD_SECONDS (13, 13);
 545 }
 546
 547 static void
 548 test_GDateTime_diff (void)
 549 {
 550 #define TEST_DIFF(y,m,d,y2,m2,d2,u) G_STMT_START { \
 551   GDateTime *dt1, *dt2; \
 552   GTimeSpan  ts = 0; \
 553   dt1 = g_date_time_new_local (y, m, d, 0, 0, 0); \
 554   dt2 = g_date_time_new_local (y2, m2, d2, 0, 0, 0); \
 555   ts = g_date_time_difference (dt2, dt1); \
 556   g_assert_cmpint (ts, ==, u); \
 557   g_date_time_unref (dt1); \
 558   g_date_time_unref (dt2); \
 559 } G_STMT_END
 560
 561   TEST_DIFF (2009, 1, 1, 2009, 2, 1, G_TIME_SPAN_DAY * 31);
 562   TEST_DIFF (2009, 1, 1, 2010, 1, 1, G_TIME_SPAN_DAY * 365);
 563   TEST_DIFF (2008, 2, 28, 2008, 2, 29, G_TIME_SPAN_DAY);
 564   TEST_DIFF (2008, 2, 29, 2008, 2, 28, -G_TIME_SPAN_DAY);
 565
 566   /* TODO: Add usec tests */
 567 }
 568
 569 static void
 570 test_GDateTime_get_minute (void)
 571 {
 572   GDateTime *dt;
 573
 574   dt = g_date_time_new_utc (2009, 12, 1, 1, 31, 0);
 575   g_assert_cmpint (31, ==, g_date_time_get_minute (dt));
 576   g_date_time_unref (dt);
 577 }
 578
 579 static void
 580 test_GDateTime_get_month (void)
 581 {
 582   GDateTime *dt;
 583
 584   dt = g_date_time_new_utc (2009, 12, 1, 1, 31, 0);
 585   g_assert_cmpint (12, ==, g_date_time_get_month (dt));
 586   g_date_time_unref (dt);
 587 }
 588
 589 static void
 590 test_GDateTime_get_second (void)
 591 {
 592   GDateTime *dt;
 593
 594   dt = g_date_time_new_utc (2009, 12, 1, 1, 31, 44);
 595   g_assert_cmpint (44, ==, g_date_time_get_second (dt));
 596   g_date_time_unref (dt);
 597 }
 598
 599 static void
 600 test_GDateTime_new_full (void)
 601 {
 602   GTimeZone *tz;
 603   GDateTime *dt;
 604
 605   dt = g_date_time_new_utc (2009, 12, 11, 12, 11, 10);
 606   g_assert_cmpint (2009, ==, g_date_time_get_year (dt));
 607   g_assert_cmpint (12, ==, g_date_time_get_month (dt));
 608   g_assert_cmpint (11, ==, g_date_time_get_day_of_month (dt));
 609   g_assert_cmpint (12, ==, g_date_time_get_hour (dt));
 610   g_assert_cmpint (11, ==, g_date_time_get_minute (dt));
 611   g_assert_cmpint (10, ==, g_date_time_get_second (dt));
 612   g_date_time_unref (dt);
 613
 614 #ifdef G_OS_UNIX
 615   tz = g_time_zone_new ("America/Recife");
 616 #elif defined G_OS_WIN32
 617   tz = g_time_zone_new ("E. South America Standard Time");
 618 #endif
 619   dt = g_date_time_new (tz, 2010, 5, 24, 8, 4, 0);
 620   g_time_zone_unref (tz);
 621   g_assert_cmpint (2010, ==, g_date_time_get_year (dt));
 622   g_assert_cmpint (5, ==, g_date_time_get_month (dt));
 623   g_assert_cmpint (24, ==, g_date_time_get_day_of_month (dt));
 624   g_assert_cmpint (8, ==, g_date_time_get_hour (dt));
 625   g_assert_cmpint (4, ==, g_date_time_get_minute (dt));
 626   g_assert_cmpint (0, ==, g_date_time_get_second (dt));
 627   g_assert_cmpstr ("BRT", ==, g_date_time_get_timezone_abbreviation (dt));
 628   g_assert (!g_date_time_is_daylight_savings (dt));
 629   g_date_time_unref (dt);
 630 }
 631
 632 static void
 633 test_GDateTime_now_utc (void)
 634 {
 635   GDateTime *dt;
 636   time_t     t;
 637   struct tm  tm;
 638
 639   t = time (NULL);
 640 #ifdef HAVE_GMTIME_R
 641   gmtime_r (&t, &tm);
 642 #else
 643   {
 644     struct tm *tmp = gmtime (&t);
 645     /* Assume gmtime() can't fail as we got t from time(NULL). (Note
 646      * that on Windows, gmtime() *is* MT-safe, it uses a thread-local
 647      * buffer.)
 648      */
 649     memcpy (&tm, tmp, sizeof (struct tm));
 650   }
 651 #endif
 652   dt = g_date_time_new_now_utc ();
 653   g_assert_cmpint (tm.tm_year + 1900, ==, g_date_time_get_year (dt));
 654   g_assert_cmpint (tm.tm_mon + 1, ==, g_date_time_get_month (dt));
 655   g_assert_cmpint (tm.tm_mday, ==, g_date_time_get_day_of_month (dt));
 656   g_assert_cmpint (tm.tm_hour, ==, g_date_time_get_hour (dt));
 657   g_assert_cmpint (tm.tm_min, ==, g_date_time_get_minute (dt));
 658   g_assert_cmpint (tm.tm_sec, ==, g_date_time_get_second (dt));
 659   g_date_time_unref (dt);
 660 }
 661
 662 static void
 663 test_GDateTime_new_from_unix_utc (void)
 664 {
 665   GDateTime *dt;
 666   gint64 t;
 667
 668   t = g_get_real_time ();
 669
 670 #if 0
 671   dt = g_date_time_new_from_unix_utc (t);
 672   g_assert (dt == NULL);
 673 #endif
 674
 675   t = t / 1e6;  /* oops, this was microseconds */
 676
 677   dt = g_date_time_new_from_unix_utc (t);
 678   g_assert (dt != NULL);
 679
 680   g_assert (dt == g_date_time_ref (dt));
 681   g_date_time_unref (dt);
 682   g_assert_cmpint (g_date_time_to_unix (dt), ==, t);
 683   g_date_time_unref (dt);
 684 }
 685
 686 static void
 687 test_GDateTime_get_utc_offset (void)
 688 {
 689 #if defined (HAVE_STRUCT_TM_TM_GMTOFF) || defined (HAVE_STRUCT_TM___TM_GMTOFF)
 690   GDateTime *dt;
 691   GTimeSpan ts;
 692   struct tm tm;
 693
 694   memset (&tm, 0, sizeof (tm));
 695   get_localtime_tm (time (NULL), &tm);
 696
 697   dt = g_date_time_new_now_local ();
 698   ts = g_date_time_get_utc_offset (dt);
 699 #ifdef HAVE_STRUCT_TM_TM_GMTOFF
 700   g_assert_cmpint (ts, ==, (tm.tm_gmtoff * G_TIME_SPAN_SECOND));
 701 #endif
 702 #ifdef HAVE_STRUCT_TM___TM_GMTOFF
 703   g_assert_cmpint (ts, ==, (tm.__tm_gmtoff * G_TIME_SPAN_SECOND));
 704 #endif
 705   g_date_time_unref (dt);
 706 #endif
 707 }
 708
 709 static void
 710 test_GDateTime_to_timeval (void)
 711 {
 712   GTimeVal tv1, tv2;
 713   GDateTime *dt;
 714
 715   memset (&tv1, 0, sizeof (tv1));
 716   memset (&tv2, 0, sizeof (tv2));
 717
 718   g_get_current_time (&tv1);
 719   dt = g_date_time_new_from_timeval_local (&tv1);
 720   g_date_time_to_timeval (dt, &tv2);
 721   g_assert_cmpint (tv1.tv_sec, ==, tv2.tv_sec);
 722   g_assert_cmpint (tv1.tv_usec, ==, tv2.tv_usec);
 723   g_date_time_unref (dt);
 724 }
 725
 726 static void
 727 test_GDateTime_to_local (void)
 728 {
 729   GDateTime *utc, *now, *dt;
 730
 731   utc = g_date_time_new_now_utc ();
 732   now = g_date_time_new_now_local ();
 733   dt = g_date_time_to_local (utc);
 734
 735   g_assert_cmpint (g_date_time_get_year (now), ==, g_date_time_get_year (dt));
 736   g_assert_cmpint (g_date_time_get_month (now), ==, g_date_time_get_month (dt));
 737   g_assert_cmpint (g_date_time_get_day_of_month (now), ==, g_date_time_get_day_of_month (dt));
 738   g_assert_cmpint (g_date_time_get_hour (now), ==, g_date_time_get_hour (dt));
 739   g_assert_cmpint (g_date_time_get_minute (now), ==, g_date_time_get_minute (dt));
 740   g_assert_cmpint (g_date_time_get_second (now), ==, g_date_time_get_second (dt));
 741
 742   g_date_time_unref (now);
 743   g_date_time_unref (utc);
 744   g_date_time_unref (dt);
 745 }
 746
 747 static void
 748 test_GDateTime_to_utc (void)
 749 {
 750   GDateTime *dt, *dt2;
 751   time_t     t;
 752   struct tm  tm;
 753
 754   t = time (NULL);
 755 #ifdef HAVE_GMTIME_R
 756   gmtime_r (&t, &tm);
 757 #else
 758   {
 759     struct tm *tmp = gmtime (&t);
 760     memcpy (&tm, tmp, sizeof (struct tm));
 761   }
 762 #endif
 763   dt2 = g_date_time_new_from_unix_local (t);
 764   dt = g_date_time_to_utc (dt2);
 765   g_assert_cmpint (tm.tm_year + 1900, ==, g_date_time_get_year (dt));
 766   g_assert_cmpint (tm.tm_mon + 1, ==, g_date_time_get_month (dt));
 767   g_assert_cmpint (tm.tm_mday, ==, g_date_time_get_day_of_month (dt));
 768   g_assert_cmpint (tm.tm_hour, ==, g_date_time_get_hour (dt));
 769   g_assert_cmpint (tm.tm_min, ==, g_date_time_get_minute (dt));
 770   g_assert_cmpint (tm.tm_sec, ==, g_date_time_get_second (dt));
 771   g_date_time_unref (dt);
 772   g_date_time_unref (dt2);
 773 }
 774
 775 static void
 776 test_GDateTime_get_day_of_year (void)
 777 {
 778 #define TEST_DAY_OF_YEAR(y,m,d,o)                       G_STMT_START {  \
 779   GDateTime *__dt = g_date_time_new_local ((y), (m), (d), 0, 0, 0);     \
 780   g_assert_cmpint ((o), ==, g_date_time_get_day_of_year (__dt));        \
 781   g_date_time_unref (__dt);                             } G_STMT_END
 782
 783   TEST_DAY_OF_YEAR (2009, 1, 1, 1);
 784   TEST_DAY_OF_YEAR (2009, 2, 1, 32);
 785   TEST_DAY_OF_YEAR (2009, 8, 16, 228);
 786   TEST_DAY_OF_YEAR (2008, 8, 16, 229);
 787 }
 788
 789 static void
 790 test_GDateTime_printf (void)
 791 {
 792   gchar dst[16];
 793   struct tm tt;
 794   time_t t;
 795   gchar t_str[16];
 796
 797 #define TEST_PRINTF(f,o)                        G_STMT_START {  \
 798 GDateTime *__dt = g_date_time_new_local (2009, 10, 24, 0, 0, 0);\
 799   gchar *__p = g_date_time_format (__dt, (f));                  \
 800   g_assert_cmpstr (__p, ==, (o));                               \
 801   g_date_time_unref (__dt);                                     \
 802   g_free (__p);                                 } G_STMT_END
 803
 804 #define TEST_PRINTF_DATE(y,m,d,f,o)             G_STMT_START {  \
 805   GDateTime *dt = g_date_time_new_local (y, m, d, 0, 0, 0);     \
 806   gchar *p = g_date_time_format (dt, (f));                      \
 807   g_assert_cmpstr (p, ==, (o));                                 \
 808   g_date_time_unref (dt);                                       \
 809   g_free (p);                                   } G_STMT_END
 810
 811 #define TEST_PRINTF_TIME(h,m,s,f,o)             G_STMT_START { \
 812   GDateTime *dt = g_date_time_new_local (2009, 10, 24, (h), (m), (s)); \
 813   gchar *p = g_date_time_format (dt, (f));                      \
 814   g_assert_cmpstr (p, ==, (o));                                 \
 815   g_date_time_unref (dt);                                       \
 816   g_free (p);                                   } G_STMT_END
 817
 818   /*
 819    * This is a little helper to make sure we can compare timezones to
 820    * that of the generated timezone.
 821    */
 822   t = time (NULL);
 823   memset (&tt, 0, sizeof(tt));
 824   get_localtime_tm (t, &tt);
 825   tt.tm_year = 2009 - 1900;
 826   tt.tm_mon = 9; /* 0 indexed */
 827   tt.tm_mday = 24;
 828   t = mktime (&tt);
 829   memset (&tt, 0, sizeof(tt));
 830   get_localtime_tm (t, &tt);
 831   strftime (dst, sizeof(dst), "%Z", &tt);
 832
 833   /* get current time_t for 20090924 in the local timezone */
 834   tt.tm_sec = 0;
 835   tt.tm_min = 0;
 836   tt.tm_hour = 0;
 837   t = mktime (&tt);
 838   g_sprintf (t_str, "%ld", t);
 839
 840   TEST_PRINTF ("%a", "Sat");
 841   TEST_PRINTF ("%A", "Saturday");
 842   TEST_PRINTF ("%b", "Oct");
 843   TEST_PRINTF ("%B", "October");
 844   TEST_PRINTF ("%d", "24");
 845   TEST_PRINTF_DATE (2009, 1, 1, "%d", "01");
 846   TEST_PRINTF ("%e", "24"); // fixme
 847   TEST_PRINTF ("%h", "Oct");
 848   TEST_PRINTF ("%H", "00");
 849   TEST_PRINTF_TIME (15, 0, 0, "%H", "15");
 850   TEST_PRINTF ("%I", "12");
 851   TEST_PRINTF_TIME (12, 0, 0, "%I", "12");
 852   TEST_PRINTF_TIME (15, 0, 0, "%I", "03");
 853   TEST_PRINTF ("%j", "297");
 854   TEST_PRINTF ("%k", " 0");
 855   TEST_PRINTF_TIME (13, 13, 13, "%k", "13");
 856   TEST_PRINTF ("%l", "12");
 857   TEST_PRINTF_TIME (12, 0, 0, "%I", "12");
 858   TEST_PRINTF_TIME (13, 13, 13, "%l", " 1");
 859   TEST_PRINTF_TIME (10, 13, 13, "%l", "10");
 860   TEST_PRINTF ("%m", "10");
 861   TEST_PRINTF ("%M", "00");
 862   TEST_PRINTF ("%p", "AM");
 863   TEST_PRINTF_TIME (13, 13, 13, "%p", "PM");
 864   TEST_PRINTF ("%P", "am");
 865   TEST_PRINTF_TIME (13, 13, 13, "%P", "pm");
 866   TEST_PRINTF ("%r", "12:00:00 AM");
 867   TEST_PRINTF_TIME (13, 13, 13, "%r", "01:13:13 PM");
 868   TEST_PRINTF ("%R", "00:00");
 869   TEST_PRINTF_TIME (13, 13, 31, "%R", "13:13");
 870   //TEST_PRINTF ("%s", t_str);
 871   TEST_PRINTF ("%S", "00");
 872   TEST_PRINTF ("%t", "  ");
 873   TEST_PRINTF ("%u", "6");
 874   TEST_PRINTF ("%x", "10/24/09");
 875   TEST_PRINTF ("%X", "00:00:00");
 876   TEST_PRINTF_TIME (13, 14, 15, "%X", "13:14:15");
 877   TEST_PRINTF ("%y", "09");
 878   TEST_PRINTF ("%Y", "2009");
 879   TEST_PRINTF ("%%", "%");
 880   TEST_PRINTF ("%", "");
 881   TEST_PRINTF ("%9", NULL);
 882   TEST_PRINTF ("%Z", dst);
 883 }
 884
 885 static void
 886 test_non_utf8_printf (void)
 887 {
 888   gchar *oldlocale;
 889
 890   oldlocale = g_strdup (setlocale (LC_ALL, NULL));
 891   setlocale (LC_ALL, "ja_JP.eucjp");
 892   if (strstr (setlocale (LC_ALL, NULL), "ja_JP") == NULL)
 893     {
 894       g_test_message ("locale ja_JP.eucjp not available, skipping non-UTF8 tests");
 895       g_free (oldlocale);
 896       return;
 897     }
 898   if (g_get_charset (NULL))
 899     {
 900       g_test_message ("locale ja_JP.eucjp may be available, but glib seems to think that it's equivalent to UTF-8, skipping non-UTF-8 tests.");
 901       g_test_message ("This is a known issue on Darwin");
 902       setlocale (LC_ALL, oldlocale);
 903       g_free (oldlocale);
 904       return;
 905     }
 906
 907   /* These are the outputs that ja_JP.UTF-8 generates; if everything
 908    * is working then ja_JP.eucjp should generate the same.
 909    */
 910   TEST_PRINTF ("%a", "\345\234\237");
 911   TEST_PRINTF ("%A", "\345\234\237\346\233\234\346\227\245");
 912 #ifndef HAVE_CARBON /* OSX just returns the number */
 913   TEST_PRINTF ("%b", "10\346\234\210");
 914 #endif
 915   TEST_PRINTF ("%B", "10\346\234\210");
 916   TEST_PRINTF ("%d", "24");
 917   TEST_PRINTF_DATE (2009, 1, 1, "%d", "01");
 918   TEST_PRINTF ("%e", "24"); // fixme
 919 #ifndef HAVE_CARBON /* OSX just returns the number */
 920   TEST_PRINTF ("%h", "10\346\234\210");
 921 #endif
 922   TEST_PRINTF ("%H", "00");
 923   TEST_PRINTF_TIME (15, 0, 0, "%H", "15");
 924   TEST_PRINTF ("%I", "12");
 925   TEST_PRINTF_TIME (12, 0, 0, "%I", "12");
 926   TEST_PRINTF_TIME (15, 0, 0, "%I", "03");
 927   TEST_PRINTF ("%j", "297");
 928   TEST_PRINTF ("%k", " 0");
 929   TEST_PRINTF_TIME (13, 13, 13, "%k", "13");
 930   TEST_PRINTF ("%l", "12");
 931   TEST_PRINTF_TIME (12, 0, 0, "%I", "12");
 932   TEST_PRINTF_TIME (13, 13, 13, "%l", " 1");
 933   TEST_PRINTF_TIME (10, 13, 13, "%l", "10");
 934   TEST_PRINTF ("%m", "10");
 935   TEST_PRINTF ("%M", "00");
 936 #ifndef HAVE_CARBON /* OSX returns latin "AM", not japanese */
 937   TEST_PRINTF ("%p", "\345\215\210\345\211\215");
 938   TEST_PRINTF_TIME (13, 13, 13, "%p", "\345\215\210\345\276\214");
 939   TEST_PRINTF ("%P", "\345\215\210\345\211\215");
 940   TEST_PRINTF_TIME (13, 13, 13, "%P", "\345\215\210\345\276\214");
 941   TEST_PRINTF ("%r", "\345\215\210\345\211\21512\346\231\20200\345\210\20600\347\247\222");
 942   TEST_PRINTF_TIME (13, 13, 13, "%r", "\345\215\210\345\276\21401\346\231\20213\345\210\20613\347\247\222");
 943 #endif
 944   TEST_PRINTF ("%R", "00:00");
 945   TEST_PRINTF_TIME (13, 13, 31, "%R", "13:13");
 946   TEST_PRINTF ("%S", "00");
 947   TEST_PRINTF ("%t", "  ");
 948   TEST_PRINTF ("%u", "6");
 949 #ifndef HAVE_CARBON /* OSX returns YYYY/MM/DD in ASCII */
 950   TEST_PRINTF ("%x", "2009\345\271\26410\346\234\21024\346\227\245");
 951 #endif
 952   TEST_PRINTF ("%X", "00\346\231\20200\345\210\20600\347\247\222");
 953   TEST_PRINTF_TIME (13, 14, 15, "%X", "13\346\231\20214\345\210\20615\347\247\222");
 954   TEST_PRINTF ("%y", "09");
 955   TEST_PRINTF ("%Y", "2009");
 956   TEST_PRINTF ("%%", "%");
 957   TEST_PRINTF ("%", "");
 958   TEST_PRINTF ("%9", NULL);
 959
 960   setlocale (LC_ALL, oldlocale);
 961   g_free (oldlocale);
 962 }
 963
 964 static void
 965 test_modifiers (void)
 966 {
 967   gchar *oldlocale;
 968
 969   TEST_PRINTF_DATE (2009, 1,  1,  "%d", "01");
 970   TEST_PRINTF_DATE (2009, 1,  1, "%_d", " 1");
 971   TEST_PRINTF_DATE (2009, 1,  1, "%-d", "1");
 972   TEST_PRINTF_DATE (2009, 1,  1, "%0d", "01");
 973   TEST_PRINTF_DATE (2009, 1, 21,  "%d", "21");
 974   TEST_PRINTF_DATE (2009, 1, 21, "%_d", "21");
 975   TEST_PRINTF_DATE (2009, 1, 21, "%-d", "21");
 976   TEST_PRINTF_DATE (2009, 1, 21, "%0d", "21");
 977
 978   TEST_PRINTF_DATE (2009, 1,  1,  "%e", " 1");
 979   TEST_PRINTF_DATE (2009, 1,  1, "%_e", " 1");
 980   TEST_PRINTF_DATE (2009, 1,  1, "%-e", "1");
 981   TEST_PRINTF_DATE (2009, 1,  1, "%0e", "01");
 982   TEST_PRINTF_DATE (2009, 1, 21,  "%e", "21");
 983   TEST_PRINTF_DATE (2009, 1, 21, "%_e", "21");
 984   TEST_PRINTF_DATE (2009, 1, 21, "%-e", "21");
 985   TEST_PRINTF_DATE (2009, 1, 21, "%0e", "21");
 986
 987   TEST_PRINTF_TIME ( 1, 0, 0,  "%H", "01");
 988   TEST_PRINTF_TIME ( 1, 0, 0, "%_H", " 1");
 989   TEST_PRINTF_TIME ( 1, 0, 0, "%-H", "1");
 990   TEST_PRINTF_TIME ( 1, 0, 0, "%0H", "01");
 991   TEST_PRINTF_TIME (21, 0, 0,  "%H", "21");
 992   TEST_PRINTF_TIME (21, 0, 0, "%_H", "21");
 993   TEST_PRINTF_TIME (21, 0, 0, "%-H", "21");
 994   TEST_PRINTF_TIME (21, 0, 0, "%0H", "21");
 995
 996   TEST_PRINTF_TIME ( 1, 0, 0,  "%I", "01");
 997   TEST_PRINTF_TIME ( 1, 0, 0, "%_I", " 1");
 998   TEST_PRINTF_TIME ( 1, 0, 0, "%-I", "1");
 999   TEST_PRINTF_TIME ( 1, 0, 0, "%0I", "01");
1000   TEST_PRINTF_TIME (23, 0, 0,  "%I", "11");
1001   TEST_PRINTF_TIME (23, 0, 0, "%_I", "11");
1002   TEST_PRINTF_TIME (23, 0, 0, "%-I", "11");
1003   TEST_PRINTF_TIME (23, 0, 0, "%0I", "11");
1004
1005   TEST_PRINTF_TIME ( 1, 0, 0,  "%k", " 1");
1006   TEST_PRINTF_TIME ( 1, 0, 0, "%_k", " 1");
1007   TEST_PRINTF_TIME ( 1, 0, 0, "%-k", "1");
1008   TEST_PRINTF_TIME ( 1, 0, 0, "%0k", "01");
1009
1010   oldlocale = g_strdup (setlocale (LC_ALL, NULL));
1011   setlocale (LC_ALL, "fa_IR.utf-8");
1012   if (strstr (setlocale (LC_ALL, NULL), "fa_IR") != NULL)
1013     {
1014       TEST_PRINTF_TIME (23, 0, 0, "%OH", "\333\262\333\263");    /* '23' */
1015       TEST_PRINTF_TIME (23, 0, 0, "%OI", "\333\261\333\261");    /* '11' */
1016       TEST_PRINTF_TIME (23, 0, 0, "%OM", "\333\260\333\260");    /* '00' */
1017
1018       TEST_PRINTF_DATE (2011, 7, 1, "%Om", "\333\260\333\267");  /* '07' */
1019       TEST_PRINTF_DATE (2011, 7, 1, "%0Om", "\333\260\333\267"); /* '07' */
1020       TEST_PRINTF_DATE (2011, 7, 1, "%-Om", "\333\267");         /* '7' */
1021       TEST_PRINTF_DATE (2011, 7, 1, "%_Om", " \333\267");        /* ' 7' */
1022     }
1023   else
1024     g_test_message ("locale fa_IR not available, skipping O modifier tests");
1025   setlocale (LC_ALL, oldlocale);
1026   g_free (oldlocale);
1027 }
1028
1029 static void
1030 test_GDateTime_dst (void)
1031 {
1032   GDateTime *dt1, *dt2;
1033   GTimeZone *tz;
1034
1035   /* this date has the DST state set for Europe/London */
1036 #ifdef G_OS_UNIX
1037   tz = g_time_zone_new ("Europe/London");
1038 #elif defined G_OS_WIN32
1039   tz = g_time_zone_new ("GMT Standard Time");
1040 #endif
1041   dt1 = g_date_time_new (tz, 2009, 8, 15, 3, 0, 1);
1042   g_assert (g_date_time_is_daylight_savings (dt1));
1043   g_assert_cmpint (g_date_time_get_utc_offset (dt1) / G_USEC_PER_SEC, ==, 3600);
1044   g_assert_cmpint (g_date_time_get_hour (dt1), ==, 3);
1045
1046   /* add 6 months to clear the DST flag but keep the same time */
1047   dt2 = g_date_time_add_months (dt1, 6);
1048   g_assert (!g_date_time_is_daylight_savings (dt2));
1049   g_assert_cmpint (g_date_time_get_utc_offset (dt2) / G_USEC_PER_SEC, ==, 0);
1050   g_assert_cmpint (g_date_time_get_hour (dt2), ==, 3);
1051
1052   g_date_time_unref (dt2);
1053   g_date_time_unref (dt1);
1054
1055   /* now do the reverse: start with a non-DST state and move to DST */
1056   dt1 = g_date_time_new (tz, 2009, 2, 15, 2, 0, 1);
1057   g_assert (!g_date_time_is_daylight_savings (dt1));
1058   g_assert_cmpint (g_date_time_get_hour (dt1), ==, 2);
1059
1060   dt2 = g_date_time_add_months (dt1, 6);
1061   g_assert (g_date_time_is_daylight_savings (dt2));
1062   g_assert_cmpint (g_date_time_get_hour (dt2), ==, 2);
1063
1064   g_date_time_unref (dt2);
1065   g_date_time_unref (dt1);
1066   g_time_zone_unref (tz);
1067 }
1068
1069 static inline gboolean
1070 is_leap_year (gint year)
1071 {
1072   g_assert (1 <= year && year <= 9999);
1073
1074   return year % 400 == 0 || (year % 4 == 0 && year % 100 != 0);
1075 }
1076
1077 static inline gint
1078 days_in_month (gint year, gint month)
1079 {
1080   const gint table[2][13] = {
1081     {0, 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31},
1082     {0, 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31}
1083   };
1084
1085   g_assert (1 <= month && month <= 12);
1086
1087   return table[is_leap_year (year)][month];
1088 }
1089
1090 static void
1091 test_all_dates (void)
1092 {
1093   gint year, month, day;
1094   GTimeZone *timezone;
1095   gint64 unix_time;
1096   gint day_of_year;
1097   gint week_year;
1098   gint week_num;
1099   gint weekday;
1100
1101   /* save some time by hanging on to this. */
1102   timezone = g_time_zone_new_utc ();
1103
1104   unix_time = G_GINT64_CONSTANT(-62135596800);
1105
1106   /* 0001-01-01 is 0001-W01-1 */
1107   week_year = 1;
1108   week_num = 1;
1109   weekday = 1;
1110
1111
1112   /* The calendar makes a full cycle every 400 years, so we could
1113    * theoretically just test years 1 through 400.  That assumes that our
1114    * software has no bugs, so probably we should just test them all. :)
1115    */
1116   for (year = 1; year <= 9999; year++)
1117     {
1118       day_of_year = 1;
1119
1120       for (month = 1; month <= 12; month++)
1121         for (day = 1; day <= days_in_month (year, month); day++)
1122           {
1123             GDateTime *dt;
1124
1125             dt = g_date_time_new (timezone, year, month, day, 0, 0, 0);
1126
1127 #if 0
1128             g_print ("%04d-%02d-%02d = %04d-W%02d-%d = %04d-%03d\n",
1129                      year, month, day,
1130                      week_year, week_num, weekday,
1131                      year, day_of_year);
1132 #endif
1133
1134             /* sanity check */
1135             if G_UNLIKELY (g_date_time_get_year (dt) != year ||
1136                            g_date_time_get_month (dt) != month ||
1137                            g_date_time_get_day_of_month (dt) != day)
1138               g_error ("%04d-%02d-%02d comes out as %04d-%02d-%02d",
1139                        year, month, day,
1140                        g_date_time_get_year (dt),
1141                        g_date_time_get_month (dt),
1142                        g_date_time_get_day_of_month (dt));
1143
1144             if G_UNLIKELY (g_date_time_get_week_numbering_year (dt) != week_year ||
1145                            g_date_time_get_week_of_year (dt) != week_num ||
1146                            g_date_time_get_day_of_week (dt) != weekday)
1147               g_error ("%04d-%02d-%02d should be %04d-W%02d-%d but "
1148                        "comes out as %04d-W%02d-%d", year, month, day,
1149                        week_year, week_num, weekday,
1150                        g_date_time_get_week_numbering_year (dt),
1151                        g_date_time_get_week_of_year (dt),
1152                        g_date_time_get_day_of_week (dt));
1153
1154             if G_UNLIKELY (g_date_time_to_unix (dt) != unix_time)
1155               g_error ("%04d-%02d-%02d 00:00:00 UTC should have unix time %"
1156                        G_GINT64_FORMAT " but comes out as %"G_GINT64_FORMAT,
1157                        year, month, day, unix_time, g_date_time_to_unix (dt));
1158
1159             if G_UNLIKELY (g_date_time_get_day_of_year (dt) != day_of_year)
1160               g_error ("%04d-%02d-%02d should be day of year %d"
1161                        " but comes out as %d", year, month, day,
1162                        day_of_year, g_date_time_get_day_of_year (dt));
1163
1164             if G_UNLIKELY (g_date_time_get_hour (dt) != 0 ||
1165                            g_date_time_get_minute (dt) != 0 ||
1166                            g_date_time_get_seconds (dt) != 0)
1167               g_error ("%04d-%02d-%02d 00:00:00 UTC comes out "
1168                        "as %02d:%02d:%02.6f", year, month, day,
1169                        g_date_time_get_hour (dt),
1170                        g_date_time_get_minute (dt),
1171                        g_date_time_get_seconds (dt));
1172             /* done */
1173
1174             /* add 24 hours to unix time */
1175             unix_time += 24 * 60 * 60;
1176
1177             /* move day of year forward */
1178             day_of_year++;
1179
1180             /* move the week date forward */
1181             if (++weekday == 8)
1182               {
1183                 weekday = 1; /* Sunday -> Monday */
1184
1185                 /* NOTE: year/month/day is the final day of the week we
1186                  * just finished.
1187                  *
1188                  * If we just finished the last week of last year then
1189                  * we are definitely starting the first week of this
1190                  * year.
1191                  *
1192                  * Otherwise, if we're still in this year, but Sunday
1193                  * fell on or after December 28 then December 29, 30, 31
1194                  * could be days within the next year's first year.
1195                  */
1196                 if (year != week_year || (month == 12 && day >= 28))
1197                   {
1198                     /* first week of the new year */
1199                     week_num = 1;
1200                     week_year++;
1201                   }
1202                 else
1203                   week_num++;
1204               }
1205
1206             g_date_time_unref (dt);
1207           }
1208     }
1209
1210   g_time_zone_unref (timezone);
1211 }
1212
1213 static void
1214 test_z (void)
1215 {
1216   GTimeZone *tz;
1217   GDateTime *dt;
1218   gchar *p;
1219
1220   g_test_bug ("642935");
1221
1222   tz = g_time_zone_new ("-08:00");
1223   dt = g_date_time_new (tz, 0, 0, 0, 0, 0, 0);
1224   p = g_date_time_format (dt, "%z");
1225   g_assert_cmpstr (p, ==, "-0800");
1226   g_date_time_unref (dt);
1227   g_time_zone_unref (tz);
1228   g_free (p);
1229 }
1230
1231 static void
1232 test_strftime (void)
1233 {
1234 #ifdef __linux__
1235 #define TEST_FORMAT \
1236   "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 " \
1237   "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 %%"
1238   time_t t;
1239
1240   /* 127997 is prime, 1315005118 is now */
1241   for (t = 0; t < 1315005118; t += 127997)
1242     {
1243       GDateTime *date_time;
1244       gchar c_str[1000];
1245       gchar *dt_str;
1246
1247       date_time = g_date_time_new_from_unix_local (t);
1248       dt_str = g_date_time_format (date_time, TEST_FORMAT);
1249       strftime (c_str, sizeof c_str, TEST_FORMAT, localtime (&t));
1250       g_assert_cmpstr (c_str, ==, dt_str);
1251       g_date_time_unref (date_time);
1252       g_free (dt_str);
1253     }
1254 #endif
1255 }
1256
1257 static void
1258 test_find_interval (void)
1259 {
1260   GTimeZone *tz;
1261   GDateTime *dt;
1262   gint64 u;
1263   gint i1, i2;
1264
1265 #ifdef G_OS_UNIX
1266   tz = g_time_zone_new ("Canada/Eastern");
1267 #elif defined G_OS_WIN32
1268   tz = g_time_zone_new ("Eastern Standard Time");
1269 #endif
1270   dt = g_date_time_new_utc (2010, 11, 7, 1, 30, 0);
1271   u = g_date_time_to_unix (dt);
1272
1273   i1 = g_time_zone_find_interval (tz, G_TIME_TYPE_STANDARD, u);
1274   i2 = g_time_zone_find_interval (tz, G_TIME_TYPE_DAYLIGHT, u);
1275
1276   g_assert_cmpint (i1, !=, i2);
1277
1278   g_date_time_unref (dt);
1279
1280   dt = g_date_time_new_utc (2010, 3, 14, 2, 0, 0);
1281   u = g_date_time_to_unix (dt);
1282
1283   i1 = g_time_zone_find_interval (tz, G_TIME_TYPE_STANDARD, u);
1284   g_assert_cmpint (i1, ==, -1);
1285
1286   g_date_time_unref (dt);
1287   g_time_zone_unref (tz);
1288 }
1289
1290 static void
1291 test_adjust_time (void)
1292 {
1293   GTimeZone *tz;
1294   GDateTime *dt;
1295   gint64 u, u2;
1296   gint i1, i2;
1297
1298 #ifdef G_OS_UNIX
1299   tz = g_time_zone_new ("Canada/Eastern");
1300 #elif defined G_OS_WIN32
1301   tz = g_time_zone_new ("Eastern Standard Time");
1302 #endif
1303   dt = g_date_time_new_utc (2010, 11, 7, 1, 30, 0);
1304   u = g_date_time_to_unix (dt);
1305   u2 = u;
1306
1307   i1 = g_time_zone_find_interval (tz, G_TIME_TYPE_DAYLIGHT, u);
1308   i2 = g_time_zone_adjust_time (tz, G_TIME_TYPE_DAYLIGHT, &u2);
1309
1310   g_assert_cmpint (i1, ==, i2);
1311   g_assert (u == u2);
1312
1313   g_date_time_unref (dt);
1314
1315   dt = g_date_time_new_utc (2010, 3, 14, 2, 30, 0);
1316   u2 = g_date_time_to_unix (dt);
1317   g_date_time_unref (dt);
1318
1319   dt = g_date_time_new_utc (2010, 3, 14, 3, 0, 0);
1320   u = g_date_time_to_unix (dt);
1321   g_date_time_unref (dt);
1322
1323   i1 = g_time_zone_adjust_time (tz, G_TIME_TYPE_DAYLIGHT, &u2);
1324   g_assert (u == u2);
1325
1326   g_time_zone_unref (tz);
1327 }
1328
1329 static void
1330 test_no_header (void)
1331 {
1332   GTimeZone *tz;
1333
1334   tz = g_time_zone_new ("blabla");
1335
1336   g_assert_cmpstr (g_time_zone_get_abbreviation (tz, 0), ==, "UTC");
1337   g_assert_cmpint (g_time_zone_get_offset (tz, 0), ==, 0);
1338   g_assert (!g_time_zone_is_dst (tz, 0));
1339
1340   g_time_zone_unref (tz);
1341 }
1342
1343 gint
1344 main (gint   argc,
1345       gchar *argv[])
1346 {
1347   g_test_init (&argc, &argv, NULL);
1348   g_test_bug_base ("http://bugzilla.gnome.org/");
1349
1350   /* GDateTime Tests */
1351
1352   g_test_add_func ("/GDateTime/add_days", test_GDateTime_add_days);
1353   g_test_add_func ("/GDateTime/add_full", test_GDateTime_add_full);
1354   g_test_add_func ("/GDateTime/add_hours", test_GDateTime_add_hours);
1355   g_test_add_func ("/GDateTime/add_minutes", test_GDateTime_add_minutes);
1356   g_test_add_func ("/GDateTime/add_months", test_GDateTime_add_months);
1357   g_test_add_func ("/GDateTime/add_seconds", test_GDateTime_add_seconds);
1358   g_test_add_func ("/GDateTime/add_weeks", test_GDateTime_add_weeks);
1359   g_test_add_func ("/GDateTime/add_years", test_GDateTime_add_years);
1360   g_test_add_func ("/GDateTime/compare", test_GDateTime_compare);
1361   g_test_add_func ("/GDateTime/diff", test_GDateTime_diff);
1362   g_test_add_func ("/GDateTime/equal", test_GDateTime_equal);
1363   g_test_add_func ("/GDateTime/get_day_of_week", test_GDateTime_get_day_of_week);
1364   g_test_add_func ("/GDateTime/get_day_of_month", test_GDateTime_get_day_of_month);
1365   g_test_add_func ("/GDateTime/get_day_of_year", test_GDateTime_get_day_of_year);
1366   g_test_add_func ("/GDateTime/get_hour", test_GDateTime_get_hour);
1367   g_test_add_func ("/GDateTime/get_microsecond", test_GDateTime_get_microsecond);
1368   g_test_add_func ("/GDateTime/get_minute", test_GDateTime_get_minute);
1369   g_test_add_func ("/GDateTime/get_month", test_GDateTime_get_month);
1370   g_test_add_func ("/GDateTime/get_second", test_GDateTime_get_second);
1371   g_test_add_func ("/GDateTime/get_utc_offset", test_GDateTime_get_utc_offset);
1372   g_test_add_func ("/GDateTime/get_year", test_GDateTime_get_year);
1373   g_test_add_func ("/GDateTime/hash", test_GDateTime_hash);
1374   g_test_add_func ("/GDateTime/new_from_unix", test_GDateTime_new_from_unix);
1375   g_test_add_func ("/GDateTime/new_from_unix_utc", test_GDateTime_new_from_unix_utc);
1376   g_test_add_func ("/GDateTime/new_from_timeval", test_GDateTime_new_from_timeval);
1377   g_test_add_func ("/GDateTime/new_from_timeval_utc", test_GDateTime_new_from_timeval_utc);
1378   g_test_add_func ("/GDateTime/new_full", test_GDateTime_new_full);
1379   g_test_add_func ("/GDateTime/now", test_GDateTime_now);
1380   g_test_add_func ("/GDateTime/printf", test_GDateTime_printf);
1381   g_test_add_func ("/GDateTime/non_utf8_printf", test_non_utf8_printf);
1382   g_test_add_func ("/GDateTime/strftime", test_strftime);
1383   g_test_add_func ("/GDateTime/modifiers", test_modifiers);
1384   g_test_add_func ("/GDateTime/to_local", test_GDateTime_to_local);
1385   g_test_add_func ("/GDateTime/to_unix", test_GDateTime_to_unix);
1386   g_test_add_func ("/GDateTime/to_timeval", test_GDateTime_to_timeval);
1387   g_test_add_func ("/GDateTime/to_utc", test_GDateTime_to_utc);
1388   g_test_add_func ("/GDateTime/now_utc", test_GDateTime_now_utc);
1389   g_test_add_func ("/GDateTime/dst", test_GDateTime_dst);
1390   g_test_add_func ("/GDateTime/test_z", test_z);
1391   g_test_add_func ("/GDateTime/test-all-dates", test_all_dates);
1392   g_test_add_func ("/GTimeZone/find-interval", test_find_interval);
1393   g_test_add_func ("/GTimeZone/adjust-time", test_adjust_time);
1394   g_test_add_func ("/GTimeZone/no-header", test_no_header);
1395
1396   return g_test_run ();
1397 }