glib/tests/utils.c

   1 /* Unit tests for utilities
   2  * Copyright (C) 2010 Red Hat, Inc.
   3  *
   4  * This work is provided "as is"; redistribution and modification
   5  * in whole or in part, in any medium, physical or electronic is
   6  * permitted without restriction.
   7  *
   8  * This work is distributed in the hope that it will be useful,
   9  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  11  *
  12  * In no event shall the authors or contributors be liable for any
  13  * direct, indirect, incidental, special, exemplary, or consequential
  14  * damages (including, but not limited to, procurement of substitute
  15  * goods or services; loss of use, data, or profits; or business
  16  * interruption) however caused and on any theory of liability, whether
  17  * in contract, strict liability, or tort (including negligence or
  18  * otherwise) arising in any way out of the use of this software, even
  19  * if advised of the possibility of such damage.
  20  *
  21  * Author: Matthias Clasen
  22  */
  23
  24 #define GLIB_DISABLE_DEPRECATION_WARNINGS
  25
  26 #include "glib.h"
  27
  28 #include <stdlib.h>
  29 #include <string.h>
  30 #include <stdarg.h>
  31
  32 static gboolean
  33 strv_check (const gchar * const *strv, ...)
  34 {
  35   va_list args;
  36   gchar *s;
  37   gint i;
  38
  39   va_start (args, strv);
  40   for (i = 0; strv[i]; i++)
  41     {
  42       s = va_arg (args, gchar*);
  43       if (g_strcmp0 (strv[i], s) != 0)
  44         {
  45           va_end (args);
  46           return FALSE;
  47         }
  48     }
  49
  50   va_end (args);
  51
  52   return TRUE;
  53 }
  54
  55 static void
  56 test_language_names (void)
  57 {
  58   const gchar * const *names;
  59
  60   g_setenv ("LANGUAGE", "de:en_US", TRUE);
  61   names = g_get_language_names ();
  62   g_assert (strv_check (names, "de", "en_US", "en", "C", NULL));
  63
  64   g_setenv ("LANGUAGE", "tt_RU.UTF-8@iqtelif", TRUE);
  65   names = g_get_language_names ();
  66   g_assert (strv_check (names,
  67                         "tt_RU.UTF-8@iqtelif",
  68                         "tt_RU@iqtelif",
  69                         "tt.UTF-8@iqtelif",
  70                         "tt@iqtelif",
  71                         "tt_RU.UTF-8",
  72                         "tt_RU",
  73                         "tt.UTF-8",
  74                         "tt",
  75                         "C",
  76                         NULL));
  77 }
  78
  79 static void
  80 test_locale_variants (void)
  81 {
  82   char **v;
  83
  84   v = g_get_locale_variants ("fr_BE");
  85   g_assert (strv_check ((const gchar * const *) v, "fr_BE", "fr", NULL));
  86   g_strfreev (v);
  87
  88   v = g_get_locale_variants ("sr_SR@latin");
  89   g_assert (strv_check ((const gchar * const *) v, "sr_SR@latin", "sr@latin", "sr_SR", "sr", NULL));
  90   g_strfreev (v);
  91 }
  92
  93 static void
  94 test_version (void)
  95 {
  96   if (g_test_verbose ())
  97     g_print ("(header %d.%d.%d library %d.%d.%d) ",
  98               GLIB_MAJOR_VERSION, GLIB_MINOR_VERSION, GLIB_MICRO_VERSION,
  99               glib_major_version, glib_minor_version, glib_micro_version);
 100
 101   g_assert (glib_check_version (GLIB_MAJOR_VERSION,
 102                                 GLIB_MINOR_VERSION,
 103                                 GLIB_MICRO_VERSION) == NULL);
 104   g_assert (glib_check_version (GLIB_MAJOR_VERSION,
 105                                 GLIB_MINOR_VERSION,
 106                                 0) == NULL);
 107   g_assert (glib_check_version (GLIB_MAJOR_VERSION - 1,
 108                                 0,
 109                                 0) != NULL);
 110   g_assert (glib_check_version (GLIB_MAJOR_VERSION + 1,
 111                                 0,
 112                                 0) != NULL);
 113   g_assert (glib_check_version (GLIB_MAJOR_VERSION,
 114                                 GLIB_MINOR_VERSION + 1,
 115                                 0) != NULL);
 116   /* don't use + 1 here, since a +/-1 difference can
 117    * happen due to post-release version bumps in git
 118    */
 119   g_assert (glib_check_version (GLIB_MAJOR_VERSION,
 120                                 GLIB_MINOR_VERSION,
 121                                 GLIB_MICRO_VERSION + 3) != NULL);
 122 }
 123
 124 static const gchar *argv0;
 125
 126 static void
 127 test_appname (void)
 128 {
 129   const gchar *prgname;
 130   const gchar *appname;
 131
 132   prgname = g_get_prgname ();
 133   appname = g_get_application_name ();
 134   g_assert_cmpstr (prgname, ==, argv0);
 135   g_assert_cmpstr (appname, ==, prgname);
 136
 137   g_set_prgname ("prgname");
 138
 139   prgname = g_get_prgname ();
 140   appname = g_get_application_name ();
 141   g_assert_cmpstr (prgname, ==, "prgname");
 142   g_assert_cmpstr (appname, ==, "prgname");
 143
 144   g_set_application_name ("appname");
 145
 146   prgname = g_get_prgname ();
 147   appname = g_get_application_name ();
 148   g_assert_cmpstr (prgname, ==, "prgname");
 149   g_assert_cmpstr (appname, ==, "appname");
 150 }
 151
 152 static void
 153 test_tmpdir (void)
 154 {
 155   g_test_bug ("627969");
 156   g_assert_cmpstr (g_get_tmp_dir (), !=, "");
 157 }
 158
 159 static void
 160 test_bits (void)
 161 {
 162   gulong mask;
 163   gint max_bit;
 164   gint i, pos;
 165
 166   pos = g_bit_nth_lsf (0, -1);
 167   g_assert_cmpint (pos, ==, -1);
 168
 169   max_bit = sizeof (gulong) * 8;
 170   for (i = 0; i < max_bit; i++)
 171     {
 172       mask = 1UL << i;
 173
 174       pos = g_bit_nth_lsf (mask, -1);
 175       g_assert_cmpint (pos, ==, i);
 176
 177       pos = g_bit_nth_lsf (mask, i - 3);
 178       g_assert_cmpint (pos , ==, i);
 179
 180       pos = g_bit_nth_lsf (mask, i);
 181       g_assert_cmpint (pos , ==, -1);
 182
 183       pos = g_bit_nth_lsf (mask, i + 1);
 184       g_assert_cmpint (pos , ==, -1);
 185     }
 186
 187   pos = g_bit_nth_msf (0, -1);
 188   g_assert_cmpint (pos, ==, -1);
 189
 190   for (i = 0; i < max_bit; i++)
 191     {
 192       mask = 1UL << i;
 193
 194       pos = g_bit_nth_msf (mask, -1);
 195       g_assert_cmpint (pos, ==, i);
 196
 197       pos = g_bit_nth_msf (mask, i + 3);
 198       g_assert_cmpint (pos , ==, i);
 199
 200       pos = g_bit_nth_msf (mask, i);
 201       g_assert_cmpint (pos , ==, -1);
 202
 203       if (i > 0)
 204         {
 205           pos = g_bit_nth_msf (mask, i - 1);
 206           g_assert_cmpint (pos , ==, -1);
 207         }
 208     }
 209 }
 210
 211 static void
 212 test_swap (void)
 213 {
 214   guint16 a16, b16;
 215   guint32 a32, b32;
 216   guint64 a64, b64;
 217
 218   a16 = 0xaabb;
 219   b16 = 0xbbaa;
 220
 221   g_assert_cmpint (GUINT16_SWAP_LE_BE (a16), ==, b16);
 222
 223   a32 = 0xaaaabbbb;
 224   b32 = 0xbbbbaaaa;
 225
 226   g_assert_cmpint (GUINT32_SWAP_LE_BE (a32), ==, b32);
 227
 228   a64 = G_GUINT64_CONSTANT(0xaaaaaaaabbbbbbbb);
 229   b64 = G_GUINT64_CONSTANT(0xbbbbbbbbaaaaaaaa);
 230
 231   g_assert_cmpint (GUINT64_SWAP_LE_BE (a64), ==, b64);
 232 }
 233
 234 static void
 235 test_find_program (void)
 236 {
 237   gchar *res;
 238
 239 #ifdef G_OS_UNIX
 240   res = g_find_program_in_path ("sh");
 241   g_assert (res != NULL);
 242   g_free (res);
 243
 244   res = g_find_program_in_path ("/bin/sh");
 245   g_assert (res != NULL);
 246   g_free (res);
 247 #else
 248   /* There's not a lot we can search for that would reliably work both
 249    * on real Windows and mingw.
 250    */
 251 #endif
 252
 253   res = g_find_program_in_path ("this_program_does_not_exit");
 254   g_assert (res == NULL);
 255
 256   res = g_find_program_in_path ("/bin");
 257   g_assert (res == NULL);
 258
 259   res = g_find_program_in_path ("/etc/passwd");
 260   g_assert (res == NULL);
 261 }
 262
 263 static void
 264 test_debug (void)
 265 {
 266   GDebugKey keys[] = {
 267     { "key1", 1 },
 268     { "key2", 2 },
 269     { "key3", 4 },
 270   };
 271   guint res;
 272
 273   res = g_parse_debug_string (NULL, keys, G_N_ELEMENTS (keys));
 274   g_assert_cmpint (res, ==, 0);
 275
 276   res = g_parse_debug_string ("foobabla;#!%!$%112 223", keys, G_N_ELEMENTS (keys));
 277   g_assert_cmpint (res, ==, 0);
 278
 279   res = g_parse_debug_string ("key1:key2", keys, G_N_ELEMENTS (keys));
 280   g_assert_cmpint (res, ==, 3);
 281
 282   res = g_parse_debug_string ("key1;key2", keys, G_N_ELEMENTS (keys));
 283   g_assert_cmpint (res, ==, 3);
 284
 285   res = g_parse_debug_string ("key1,key2", keys, G_N_ELEMENTS (keys));
 286   g_assert_cmpint (res, ==, 3);
 287
 288   res = g_parse_debug_string ("key1   key2", keys, G_N_ELEMENTS (keys));
 289   g_assert_cmpint (res, ==, 3);
 290
 291   res = g_parse_debug_string ("key1\tkey2", keys, G_N_ELEMENTS (keys));
 292   g_assert_cmpint (res, ==, 3);
 293
 294   res = g_parse_debug_string ("all", keys, G_N_ELEMENTS (keys));
 295   g_assert_cmpint (res, ==, 7);
 296
 297   if (g_test_subprocess ())
 298     {
 299       res = g_parse_debug_string ("help", keys, G_N_ELEMENTS (keys));
 300       g_assert_cmpint (res, ==, 0);
 301       return;
 302     }
 303   g_test_trap_subprocess (NULL, 0, 0);
 304   g_test_trap_assert_passed ();
 305   g_test_trap_assert_stderr ("*Supported debug values: key1 key2 key3 all help*");
 306 }
 307
 308 static void
 309 test_codeset (void)
 310 {
 311   gchar *c;
 312   const gchar *c2;
 313
 314   c = g_get_codeset ();
 315   g_get_charset (&c2);
 316
 317   g_assert_cmpstr (c, ==, c2);
 318
 319   g_free (c);
 320 }
 321
 322 static void
 323 test_basename (void)
 324 {
 325   const gchar *path = "/path/to/a/file/deep/down.sh";
 326   const gchar *b;
 327
 328   b = g_basename (path);
 329
 330   g_assert_cmpstr (b, ==, "down.sh");
 331 }
 332
 333 extern const gchar *glib_pgettext (const gchar *msgidctxt, gsize msgidoffset);
 334
 335 static void
 336 test_gettext (void)
 337 {
 338   const gchar *am0, *am1, *am2, *am3;
 339
 340   am0 = glib_pgettext ("GDateTime\004AM", strlen ("GDateTime") + 1);
 341   am1 = g_dpgettext ("glib20", "GDateTime\004AM", strlen ("GDateTime") + 1);
 342   am2 = g_dpgettext ("glib20", "GDateTime|AM", 0);
 343   am3 = g_dpgettext2 ("glib20", "GDateTime", "AM");
 344
 345   g_assert_cmpstr (am0, ==, am1);
 346   g_assert_cmpstr (am1, ==, am2);
 347   g_assert_cmpstr (am2, ==, am3);
 348 }
 349
 350 static void
 351 test_username (void)
 352 {
 353   const gchar *name;
 354
 355   name = g_get_user_name ();
 356
 357   g_assert (name != NULL);
 358 }
 359
 360 static void
 361 test_realname (void)
 362 {
 363   const gchar *name;
 364
 365   name = g_get_real_name ();
 366
 367   g_assert (name != NULL);
 368 }
 369
 370 static void
 371 test_hostname (void)
 372 {
 373   const gchar *name;
 374
 375   name = g_get_host_name ();
 376
 377   g_assert (name != NULL);
 378 }
 379
 380 #ifdef G_OS_UNIX
 381 static void
 382 test_xdg_dirs (void)
 383 {
 384   gchar *xdg;
 385   const gchar *dir;
 386   const gchar * const *dirs;
 387   gchar *s;
 388
 389   xdg = g_strdup (g_getenv ("XDG_CONFIG_HOME"));
 390   if (!xdg)
 391     xdg = g_build_filename (g_get_home_dir (), ".config", NULL);
 392
 393   dir = g_get_user_config_dir ();
 394
 395   g_assert_cmpstr (dir, ==, xdg);
 396   g_free (xdg);
 397
 398   xdg = g_strdup (g_getenv ("XDG_DATA_HOME"));
 399   if (!xdg)
 400     xdg = g_build_filename (g_get_home_dir (), ".local", "share", NULL);
 401
 402   dir = g_get_user_data_dir ();
 403
 404   g_assert_cmpstr (dir, ==, xdg);
 405   g_free (xdg);
 406
 407   xdg = g_strdup (g_getenv ("XDG_CACHE_HOME"));
 408   if (!xdg)
 409     xdg = g_build_filename (g_get_home_dir (), ".cache", NULL);
 410
 411   dir = g_get_user_cache_dir ();
 412
 413   g_assert_cmpstr (dir, ==, xdg);
 414   g_free (xdg);
 415
 416   xdg = g_strdup (g_getenv ("XDG_RUNTIME_DIR"));
 417   if (!xdg)
 418     xdg = g_strdup (g_get_user_cache_dir ());
 419
 420   dir = g_get_user_runtime_dir ();
 421
 422   g_assert_cmpstr (dir, ==, xdg);
 423   g_free (xdg);
 424
 425   xdg = (gchar *)g_getenv ("XDG_CONFIG_DIRS");
 426   if (!xdg)
 427     xdg = "/etc/xdg";
 428
 429   dirs = g_get_system_config_dirs ();
 430
 431   s = g_strjoinv (":", (gchar **)dirs);
 432
 433   g_assert_cmpstr (s, ==, xdg);
 434
 435   g_free (s);
 436 }
 437 #endif
 438
 439 static void
 440 test_special_dir (void)
 441 {
 442   const gchar *dir, *dir2;
 443
 444   dir = g_get_user_special_dir (G_USER_DIRECTORY_DESKTOP);
 445   g_reload_user_special_dirs_cache ();
 446   dir2 = g_get_user_special_dir (G_USER_DIRECTORY_DESKTOP);
 447
 448   g_assert_cmpstr (dir, ==, dir2);
 449 }
 450
 451 static void
 452 test_desktop_special_dir (void)
 453 {
 454   const gchar *dir, *dir2;
 455
 456   dir = g_get_user_special_dir (G_USER_DIRECTORY_DESKTOP);
 457   g_assert (dir != NULL);
 458
 459   g_reload_user_special_dirs_cache ();
 460   dir2 = g_get_user_special_dir (G_USER_DIRECTORY_DESKTOP);
 461   g_assert (dir2 != NULL);
 462 }
 463
 464 static void
 465 test_clear_pointer (void)
 466 {
 467   gpointer a;
 468
 469   a = g_malloc (5);
 470   g_clear_pointer (&a, g_free);
 471   g_assert (a == NULL);
 472
 473   a = g_malloc (5);
 474   (g_clear_pointer) (&a, g_free);
 475   g_assert (a == NULL);
 476 }
 477
 478 static void
 479 test_misc_mem (void)
 480 {
 481   gpointer a;
 482
 483   a = g_try_malloc (0);
 484   g_assert (a == NULL);
 485
 486   a = g_try_malloc0 (0);
 487   g_assert (a == NULL);
 488
 489   a = g_malloc (16);
 490   a = g_try_realloc (a, 20);
 491   a = g_try_realloc (a, 0);
 492
 493   g_assert (a == NULL);
 494 }
 495
 496 static void
 497 test_nullify (void)
 498 {
 499   gpointer p = &test_nullify;
 500
 501   g_assert (p != NULL);
 502
 503   g_nullify_pointer (&p);
 504
 505   g_assert (p == NULL);
 506 }
 507
 508 static void
 509 atexit_func (void)
 510 {
 511   g_print ("atexit called");
 512 }
 513
 514 static void
 515 test_atexit (void)
 516 {
 517   if (g_test_subprocess ())
 518     {
 519       g_atexit (atexit_func);
 520       return;
 521     }
 522   g_test_trap_subprocess (NULL, 0, 0);
 523   g_test_trap_assert_passed ();
 524   g_test_trap_assert_stdout ("*atexit called*");
 525 }
 526
 527 int
 528 main (int   argc,
 529       char *argv[])
 530 {
 531   argv0 = argv[0];
 532
 533   /* for tmpdir test, need to do this early before g_get_any_init */
 534   g_setenv ("TMPDIR", "", TRUE);
 535   g_unsetenv ("TMP");
 536   g_unsetenv ("TEMP");
 537
 538   /* g_test_init() only calls g_set_prgname() if g_get_prgname()
 539    * returns %NULL, but g_get_prgname() on Windows never returns NULL.
 540    * So we need to do this by hand to make test_appname() work on
 541    * Windows.
 542    */
 543   g_set_prgname (argv[0]);
 544
 545   g_test_init (&argc, &argv, NULL);
 546   g_test_bug_base ("http://bugzilla.gnome.org/");
 547
 548   g_test_add_func ("/utils/language-names", test_language_names);
 549   g_test_add_func ("/utils/locale-variants", test_locale_variants);
 550   g_test_add_func ("/utils/version", test_version);
 551   g_test_add_func ("/utils/appname", test_appname);
 552   g_test_add_func ("/utils/tmpdir", test_tmpdir);
 553   g_test_add_func ("/utils/bits", test_bits);
 554   g_test_add_func ("/utils/swap", test_swap);
 555   g_test_add_func ("/utils/find-program", test_find_program);
 556   g_test_add_func ("/utils/debug", test_debug);
 557   g_test_add_func ("/utils/codeset", test_codeset);
 558   g_test_add_func ("/utils/basename", test_basename);
 559   g_test_add_func ("/utils/gettext", test_gettext);
 560   g_test_add_func ("/utils/username", test_username);
 561   g_test_add_func ("/utils/realname", test_realname);
 562   g_test_add_func ("/utils/hostname", test_hostname);
 563 #ifdef G_OS_UNIX
 564   g_test_add_func ("/utils/xdgdirs", test_xdg_dirs);
 565 #endif
 566   g_test_add_func ("/utils/specialdir", test_special_dir);
 567   g_test_add_func ("/utils/specialdir/desktop", test_desktop_special_dir);
 568   g_test_add_func ("/utils/clear-pointer", test_clear_pointer);
 569   g_test_add_func ("/utils/misc-mem", test_misc_mem);
 570   g_test_add_func ("/utils/nullify", test_nullify);
 571   g_test_add_func ("/utils/atexit", test_atexit);
 572
 573   return g_test_run ();
 574 }