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