Remove sys/segments.h dependency
[kopensolaris-gnu/glibc.git] / 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 }