libio/tst-swscanf.c

   1 #include <locale.h>
   2 #include <stdio.h>
   3 #include <string.h>
   4 #include <wchar.h>
   5
   6
   7 static int do_test (const char *loc);
   8
   9
  10 int
  11 main (void)
  12 {
  13   int result;
  14
  15   result = do_test ("C");
  16   result |= do_test ("de_DE.ISO-8859-1");
  17   result |= do_test ("de_DE.UTF-8");
  18   result |= do_test ("ja_JP.EUC-JP");
  19
  20   return result;
  21 }
  22
  23
  24 static const struct
  25 {
  26   const wchar_t *fmt;
  27   const wchar_t *wfmt;
  28   const wchar_t *arg;
  29   int retval;
  30   const char *res;
  31   const wchar_t *wres;
  32   int only_C_locale;
  33 } tests[] =
  34   {
  35     { L"%[abc]", L"%l[abc]", L"aabbccddaabb", 1 ,"aabbcc", L"aabbcc", 0 },
  36     { L"%[^def]", L"%l[^def]", L"aabbccddaabb", 1, "aabbcc", L"aabbcc", 0 },
  37     { L"%[^abc]", L"%l[^abc]", L"aabbccddaabb", 0, "", L"", 0 },
  38     { L"%[a-c]", L"%l[a-c]", L"aabbccddaabb", 1, "aabbcc", L"aabbcc", 1 },
  39     { L"%[^d-f]", L"%l[^d-f]", L"aabbccddaabb", 1, "aabbcc", L"aabbcc", 1 },
  40     { L"%[^a-c]", L"%l[^a-c]", L"aabbccddaabb", 0, "", L"", 1 },
  41     { L"%[^a-c]", L"%l[^a-c]", L"bbccddaabb", 0, "", L"", 1 }
  42   };
  43
  44
  45 static int
  46 do_test (const char *loc)
  47 {
  48   size_t n;
  49   int result = 0;
  50
  51   if (setlocale (LC_ALL, loc) == NULL)
  52     {
  53       printf ("cannot set locale \"%s\": %m\n", loc);
  54       return 1;
  55     }
  56
  57   printf ("\nnew locale: \"%s\"\n", loc);
  58
  59   for (n = 0; n < sizeof (tests) / sizeof (tests[0]); ++n)
  60     {
  61       char buf[100];
  62       wchar_t wbuf[100];
  63
  64       if (tests[n].only_C_locale && strcmp (loc, "C") != 0)
  65         continue;
  66
  67       if (swscanf (tests[n].arg, tests[n].fmt, buf) != tests[n].retval)
  68         {
  69           printf ("swscanf (\"%S\", \"%S\", ...) failed\n",
  70                   tests[n].arg, tests[n].fmt);
  71           result = 1;
  72         }
  73       else if (tests[n].retval != 0 && strcmp (buf, tests[n].res) != 0)
  74         {
  75           printf ("swscanf (\"%S\", \"%S\", ...) return \"%s\", expected \"%s\"\n",
  76                   tests[n].arg, tests[n].fmt, buf, tests[n].res);
  77           result = 1;
  78         }
  79       else
  80         printf ("swscanf (\"%S\", \"%S\", ...) OK\n",
  81                 tests[n].arg, tests[n].fmt);
  82
  83       if (swscanf (tests[n].arg, tests[n].wfmt, wbuf) != tests[n].retval)
  84         {
  85           printf ("swscanf (\"%S\", \"%S\", ...) failed\n",
  86                   tests[n].arg, tests[n].wfmt);
  87           result = 1;
  88         }
  89       else if (tests[n].retval != 0 && wcscmp (wbuf, tests[n].wres) != 0)
  90         {
  91           printf ("swscanf (\"%S\", \"%S\", ...) return \"%S\", expected \"%S\"\n",
  92                   tests[n].arg, tests[n].wfmt, wbuf, tests[n].wres);
  93           result = 1;
  94         }
  95       else
  96         printf ("swscanf (\"%S\", \"%S\", ...) OK\n",
  97                 tests[n].arg, tests[n].wfmt);
  98     }
  99
 100   return result;
 101 }