#include <locale.h>
#include <stdio.h>
#include <string.h>
#include <wchar.h>
static int do_test (const char *loc);
int
main (void)
{
int result;
result = do_test ("C");
result |= do_test ("de_DE.ISO-8859-1");
result |= do_test ("de_DE.UTF-8");
result |= do_test ("ja_JP.EUC-JP");
return result;
}
static const struct
{
const wchar_t *fmt;
const wchar_t *wfmt;
const wchar_t *arg;
int retval;
const char *res;
const wchar_t *wres;
int only_C_locale;
} tests[] =
{
{ L"%[abc]", L"%l[abc]", L"aabbccddaabb", 1 ,"aabbcc", L"aabbcc", 0 },
{ L"%[^def]", L"%l[^def]", L"aabbccddaabb", 1, "aabbcc", L"aabbcc", 0 },
{ L"%[^abc]", L"%l[^abc]", L"aabbccddaabb", 0, "", L"", 0 },
{ L"%[a-c]", L"%l[a-c]", L"aabbccddaabb", 1, "aabbcc", L"aabbcc", 1 },
{ L"%[^d-f]", L"%l[^d-f]", L"aabbccddaabb", 1, "aabbcc", L"aabbcc", 1 },
{ L"%[^a-c]", L"%l[^a-c]", L"aabbccddaabb", 0, "", L"", 1 },
{ L"%[^a-c]", L"%l[^a-c]", L"bbccddaabb", 0, "", L"", 1 }
};
static int
do_test (const char *loc)
{
size_t n;
int result = 0;
if (setlocale (LC_ALL, loc) == NULL)
{
printf ("cannot set locale \"%s\": %m\n", loc);
return 1;
}
printf ("\nnew locale: \"%s\"\n", loc);
for (n = 0; n < sizeof (tests) / sizeof (tests[0]); ++n)
{
char buf[100];
wchar_t wbuf[100];
if (tests[n].only_C_locale && strcmp (loc, "C") != 0)
continue;
if (swscanf (tests[n].arg, tests[n].fmt, buf) != tests[n].retval)
{
printf ("swscanf (\"%S\", \"%S\", ...) failed\n",
tests[n].arg, tests[n].fmt);
result = 1;
}
else if (tests[n].retval != 0 && strcmp (buf, tests[n].res) != 0)
{
printf ("swscanf (\"%S\", \"%S\", ...) return \"%s\", expected \"%s\"\n",
tests[n].arg, tests[n].fmt, buf, tests[n].res);
result = 1;
}
else
printf ("swscanf (\"%S\", \"%S\", ...) OK\n",
tests[n].arg, tests[n].fmt);
if (swscanf (tests[n].arg, tests[n].wfmt, wbuf) != tests[n].retval)
{
printf ("swscanf (\"%S\", \"%S\", ...) failed\n",
tests[n].arg, tests[n].wfmt);
result = 1;
}
else if (tests[n].retval != 0 && wcscmp (wbuf, tests[n].wres) != 0)
{
printf ("swscanf (\"%S\", \"%S\", ...) return \"%S\", expected \"%S\"\n",
tests[n].arg, tests[n].wfmt, wbuf, tests[n].wres);
result = 1;
}
else
printf ("swscanf (\"%S\", \"%S\", ...) OK\n",
tests[n].arg, tests[n].wfmt);
}
return result;
}