1 #include <locale.h>
2 #include <stdio.h>
3 #include <stdlib.h>
4 #include <string.h>
5 #include <wchar.h>
6 
7 int
main(void)8 main (void)
9 {
10   char *sp1, *sp2, *sp3, *sp4;
11   wchar_t *lsp1, *lsp2, *lsp3, *lsp4;
12   int result = 0;
13   char buf[2048+64];
14   size_t i;
15 
16 #define FAIL() \
17   do {							\
18     result = 1;						\
19     printf ("test at line %d failed\n", __LINE__);	\
20   } while (0)
21 
22   setlocale (LC_ALL, "de_DE.UTF-8");
23   if (sscanf ("A  \xc3\x84-\t\t\xc3\x84-abcdefbcd\t\xc3\x84-B",
24 	      "A%ms%10ms%4m[bcd]%4mcB", &sp1, &sp2, &sp3, &sp4) != 4)
25     FAIL ();
26   else
27     {
28       if (strcmp (sp1, "\xc3\x84-") != 0)
29 	FAIL ();
30       free (sp1);
31       if (strcmp (sp2, "\xc3\x84-abcdefb") != 0)
32 	FAIL ();
33       free (sp2);
34       if (strcmp (sp3, "cd") != 0)
35 	FAIL ();
36       free (sp3);
37       if (memcmp (sp4, "\t\xc3\x84-", 4) != 0)
38 	FAIL ();
39       free (sp4);
40     }
41 
42   if (sscanf ("A  \xc3\x84-\t\t\xc3\x84-abcdefbcd\t\xc3\x84-BB",
43 	      "A%mS%10mls%4ml[bcd]%4mCB", &lsp1, &lsp2, &lsp3, &lsp4) != 4)
44     FAIL ();
45   else
46     {
47       if (wcscmp (lsp1, L"\xc4-") != 0)
48 	FAIL ();
49       free (lsp1);
50       if (wcscmp (lsp2, L"\xc4-abcdefbc") != 0)
51 	FAIL ();
52       free (lsp2);
53       if (wcscmp (lsp3, L"d") != 0)
54 	FAIL ();
55       free (lsp3);
56       if (memcmp (lsp4, L"\t\xc4-B", 4 * sizeof (wchar_t)) != 0)
57 	FAIL ();
58       free (lsp4);
59     }
60 
61   memset (buf, '/', sizeof (buf));
62   buf[0] = '\t';
63   buf[1] = ' ';
64   buf[2] = 0xc3;
65   buf[3] = 0x84;
66   buf[2048] = 0xc3;
67   buf[2049] = 0x84;
68   buf[2058] = '\t';
69   buf[2059] = 'a';
70   if (sscanf (buf, "%ms%mc", &sp1, &sp2) != 2)
71     FAIL ();
72   else
73     {
74       if (sp1[0] != '\xc3' || sp1[1] != '\x84'
75 	  || sp1[2046] != '\xc3' || sp1[2047] != '\x84'
76 	  || sp1[2056] != '\0')
77 	FAIL ();
78       sp1[2046] = '/';
79       sp1[2047] = '/';
80       for (i = 2; i < 2056; i++)
81 	if (sp1[i] != '/')
82 	  FAIL ();
83       free (sp1);
84       if (sp2[0] != '\t')
85 	FAIL ();
86       free (sp2);
87     }
88   if (sscanf (buf, "%2048ms%mc", &sp3, &sp4) != 2)
89     FAIL ();
90   else
91     {
92       if (sp3[0] != '\xc3' || sp3[1] != '\x84'
93 	  || sp3[2046] != '\xc3' || sp3[2047] != '\x84'
94 	  || sp3[2048] != '\0')
95 	FAIL ();
96       for (i = 2; i < 2046; i++)
97 	if (sp3[i] != '/')
98 	  FAIL ();
99       free (sp3);
100       if (sp4[0] != '/')
101 	FAIL ();
102       free (sp4);
103     }
104   if (sscanf (buf, "%4mc%1500m[dr/]%548m[abc/d]%3mc", &sp1, &sp2, &sp3, &sp4)
105       != 4)
106     FAIL ();
107   else
108     {
109       if (memcmp (sp1, "\t \xc3\x84", 4) != 0)
110 	FAIL ();
111       free (sp1);
112       for (i = 0; i < 1500; i++)
113 	if (sp2[i] != '/')
114 	  FAIL ();
115       if (sp2[1500] != '\0')
116 	FAIL ();
117       free (sp2);
118       for (i = 0; i < 544; i++)
119 	if (sp3[i] != '/')
120 	  FAIL ();
121       if (sp3[544] != '\0')
122 	FAIL ();
123       free (sp3);
124       if (memcmp (sp4, "\xc3\x84/", 3) != 0)
125 	FAIL ();
126       free (sp4);
127     }
128   if (sscanf (buf, "%mS%mC", &lsp1, &lsp2) != 2)
129     FAIL ();
130   else
131     {
132       if (lsp1[0] != L'\xc4' || lsp1[2045] != L'\xc4'
133 	  || lsp1[2054] != L'\0')
134 	FAIL ();
135       lsp1[2045] = L'/';
136       for (i = 1; i < 2054; i++)
137 	if (lsp1[i] != L'/')
138 	  FAIL ();
139       free (lsp1);
140       if (lsp2[0] != L'\t')
141 	FAIL ();
142       free (lsp2);
143     }
144   if (sscanf (buf, "%2048mls%mlc", &lsp3, &lsp4) != 2)
145     FAIL ();
146   else
147     {
148       if (lsp3[0] != L'\xc4' || lsp3[2045] != L'\xc4'
149 	  || lsp3[2048] != L'\0')
150 	FAIL ();
151       lsp3[2045] = L'/';
152       for (i = 1; i < 2048; i++)
153 	if (lsp3[i] != L'/')
154 	  FAIL ();
155       free (lsp3);
156       if (lsp4[0] != L'/')
157 	FAIL ();
158       free (lsp4);
159     }
160   if (sscanf (buf, "%4mC%1500ml[dr/]%548ml[abc/d]%3mlc",
161 	      &lsp1, &lsp2, &lsp3, &lsp4) != 4)
162     FAIL ();
163   else
164     {
165       if (memcmp (lsp1, L"\t \xc4/", 4 * sizeof (wchar_t)) != 0)
166 	FAIL ();
167       free (lsp1);
168       for (i = 0; i < 1500; i++)
169 	if (lsp2[i] != L'/')
170 	  FAIL ();
171       if (lsp2[1500] != L'\0')
172 	FAIL ();
173       free (lsp2);
174       for (i = 0; i < 543; i++)
175 	if (lsp3[i] != L'/')
176 	  FAIL ();
177       if (lsp3[543] != L'\0')
178 	FAIL ();
179       free (lsp3);
180       if (memcmp (lsp4, L"\xc4//", 3 * sizeof (wchar_t)) != 0)
181 	FAIL ();
182       free (lsp4);
183     }
184 
185   return result;
186 }
187