wcsmbs/tst-mbrtowc2.c

   1 /* Derived from the test case in
   2    https://sourceware.org/bugzilla/show_bug.cgi?id=714  */
   3 #include <locale.h>
   4 #include <stdio.h>
   5 #include <string.h>
   6 #include <wchar.h>
   7
   8
   9 static struct
  10 {
  11   const char *chp;
  12   size_t nchp;
  13   const char *loc;
  14 } tests[] =
  15 {
  16   { (const char[]) { 0x8F, 0xA2, 0xAF }, 3, "ja_JP.EUC-JP" },
  17   { (const char[]) { 0xD1, 0xA5 }, 2, "ja_JP.EUC-JP" },
  18   { (const char[]) { 0x8E, 0xA5 }, 2, "ja_JP.EUC-JP" },
  19   { (const char[]) { 0x8E, 0xA2, 0xA1, 0xA1 }, 4, "zh_TW.EUC-TW" },
  20   { (const char[]) { 0xA1, 0xA1 }, 2, "zh_TW.EUC-TW" },
  21   { (const char[]) { 0xE3, 0x80, 0x80 }, 3, "de_DE.UTF-8" },
  22   { (const char[]) { 0xC3, 0xA4 }, 2, "de_DE.UTF-8" }
  23 };
  24 #define ntests (sizeof (tests) / sizeof (tests[0]))
  25
  26
  27 static int t (const char *ch, size_t nch, const char *loc);
  28
  29 static int
  30 do_test (void)
  31 {
  32   int r = 0;
  33   for (int i = 0; i < ntests; ++i)
  34     r |= t (tests[i].chp, tests[i].nchp, tests[i].loc);
  35   return r;
  36 }
  37
  38 static int
  39 t (const char *ch, size_t nch, const char *loc)
  40 {
  41   int i;
  42   wchar_t wch;
  43   wchar_t wch2;
  44   mbstate_t mbs;
  45   int n = 0;
  46
  47   setlocale (LC_ALL, loc);
  48
  49   memset (&mbs, '\0', sizeof (mbstate_t));
  50   for (i = 0; i < nch; i++)
  51     {
  52       n = mbrtowc (&wch, ch + i, 1, &mbs);
  53       if (n >= 0)
  54         break;
  55     }
  56   printf ("n = %d, count = %d, wch = %08lX\n", n, i, (unsigned long int) wch);
  57
  58   memset (&mbs, '\0', sizeof (mbstate_t));
  59   n = mbrtowc (&wch2, ch, nch, &mbs);
  60   printf ("n = %d, wch = %08lX\n", n, (unsigned long int) wch2);
  61
  62   int ret = n != nch || i + 1 != nch || n != nch || wch != wch2;
  63   puts (ret ? "FAIL\n" : "OK\n");
  64   return ret;
  65 }
  66
  67 #include <support/test-driver.c>