BZ#11261 fixed by previous commit.
[glibc.git] / stdio-common / tstdiomisc.c
blobd24c55f53c19e31bae4714391e5c2a9cdce016d4
1 #include <float.h>
2 #include <math.h>
3 #include <stdio.h>
4 #include <string.h>
5 #include <wchar.h>
7 static int
8 t1 (void)
10 int n = -1;
11 sscanf ("abc ", "abc %n", &n);
12 printf ("t1: count=%d\n", n);
14 return n != 5;
17 static int
18 t2 (void)
20 int result = 0;
21 int n;
22 long N;
23 int retval;
24 #define SCAN(INPUT, FORMAT, VAR, EXP_RES, EXP_VAL) \
25 VAR = -1; \
26 retval = sscanf (INPUT, FORMAT, &VAR); \
27 printf ("sscanf (\"%s\", \"%s\", &x) => %d, x = %ld\n", \
28 INPUT, FORMAT, retval, (long int) VAR); \
29 result |= retval != EXP_RES || VAR != EXP_VAL
31 SCAN ("12345", "%ld", N, 1, 12345);
32 SCAN ("12345", "%llllld", N, 0, -1);
33 SCAN ("12345", "%LLLLLd", N, 0, -1);
34 SCAN ("test ", "%*s%n", n, 0, 4);
35 SCAN ("test ", "%2*s%n", n, 0, -1);
36 SCAN ("12 ", "%l2d", n, 0, -1);
37 SCAN ("12 ", "%2ld", N, 1, 12);
39 n = -1;
40 N = -1;
41 retval = sscanf ("1 1", "%d %Z", &n, &N);
42 printf ("sscanf (\"1 1\", \"%%d %%Z\", &n, &N) => %d, n = %d, N = %ld\n", \
43 retval, n, N); \
44 result |= retval != 1 || n != 1 || N != -1;
46 return result;
49 volatile double qnanval;
50 volatile double infval;
51 volatile long double lqnanval;
52 volatile long double linfval;
55 static int
56 F (void)
58 char buf[80];
59 wchar_t wbuf[40];
60 int result;
62 qnanval = NAN;
64 snprintf (buf, sizeof buf, "%a %A %e %E %f %F %g %G",
65 qnanval, qnanval, qnanval, qnanval,
66 qnanval, qnanval, qnanval, qnanval);
67 result = strcmp (buf, "nan NAN nan NAN nan NAN nan NAN") != 0;
68 printf ("expected \"nan NAN nan NAN nan NAN nan NAN\", got \"%s\"\n", buf);
70 snprintf (buf, sizeof buf, "%a %A %e %E %f %F %g %G",
71 -qnanval, -qnanval, -qnanval, -qnanval,
72 -qnanval, -qnanval, -qnanval, -qnanval);
73 result = strcmp (buf, "-nan -NAN -nan -NAN -nan -NAN -nan -NAN") != 0;
74 printf ("expected \"-nan -NAN -nan -NAN -nan -NAN -nan -NAN\", got \"%s\"\n",
75 buf);
77 infval = DBL_MAX * DBL_MAX;
79 snprintf (buf, sizeof buf, "%a %A %e %E %f %F %g %G",
80 infval, infval, infval, infval, infval, infval, infval, infval);
81 result |= strcmp (buf, "inf INF inf INF inf INF inf INF") != 0;
82 printf ("expected \"inf INF inf INF inf INF inf INF\", got \"%s\"\n", buf);
84 snprintf (buf, sizeof buf, "%a %A %e %E %f %F %g %G",
85 -infval, -infval, -infval, -infval,
86 -infval, -infval, -infval, -infval);
87 result |= strcmp (buf, "-inf -INF -inf -INF -inf -INF -inf -INF") != 0;
88 printf ("expected \"-inf -INF -inf -INF -inf -INF -inf -INF\", got \"%s\"\n",
89 buf);
91 swprintf (wbuf, sizeof wbuf / sizeof (wbuf[0]), L"%a %A %e %E %f %F %g %G",
92 qnanval, qnanval, qnanval, qnanval,
93 qnanval, qnanval, qnanval, qnanval);
94 result |= wcscmp (wbuf, L"nan NAN nan NAN nan NAN nan NAN") != 0;
95 printf ("expected L\"nan NAN nan NAN nan NAN nan NAN\", got L\"%S\"\n", wbuf);
97 swprintf (wbuf, sizeof wbuf / sizeof (wbuf[0]), L"%a %A %e %E %f %F %g %G",
98 -qnanval, -qnanval, -qnanval, -qnanval,
99 -qnanval, -qnanval, -qnanval, -qnanval);
100 result |= wcscmp (wbuf, L"-nan -NAN -nan -NAN -nan -NAN -nan -NAN") != 0;
101 printf ("expected L\"-nan -NAN -nan -NAN -nan -NAN -nan -NAN\", got L\"%S\"\n",
102 wbuf);
104 swprintf (wbuf, sizeof wbuf / sizeof (wbuf[0]), L"%a %A %e %E %f %F %g %G",
105 infval, infval, infval, infval, infval, infval, infval, infval);
106 result |= wcscmp (wbuf, L"inf INF inf INF inf INF inf INF") != 0;
107 printf ("expected L\"inf INF inf INF inf INF inf INF\", got L\"%S\"\n", wbuf);
109 swprintf (wbuf, sizeof wbuf / sizeof (wbuf[0]), L"%a %A %e %E %f %F %g %G",
110 -infval, -infval, -infval, -infval,
111 -infval, -infval, -infval, -infval);
112 result |= wcscmp (wbuf, L"-inf -INF -inf -INF -inf -INF -inf -INF") != 0;
113 printf ("expected L\"-inf -INF -inf -INF -inf -INF -inf -INF\", got L\"%S\"\n",
114 wbuf);
116 lqnanval = NAN;
118 snprintf (buf, sizeof buf, "%La %LA %Le %LE %Lf %LF %Lg %LG",
119 lqnanval, lqnanval, lqnanval, lqnanval,
120 lqnanval, lqnanval, lqnanval, lqnanval);
121 result = strcmp (buf, "nan NAN nan NAN nan NAN nan NAN") != 0;
122 printf ("expected \"nan NAN nan NAN nan NAN nan NAN\", got \"%s\"\n", buf);
124 snprintf (buf, sizeof buf, "%La %LA %Le %LE %Lf %LF %Lg %LG",
125 -lqnanval, -lqnanval, -lqnanval, -lqnanval,
126 -lqnanval, -lqnanval, -lqnanval, -lqnanval);
127 result = strcmp (buf, "-nan -NAN -nan -NAN -nan -NAN -nan -NAN") != 0;
128 printf ("expected \"-nan -NAN -nan -NAN -nan -NAN -nan -NAN\", got \"%s\"\n",
129 buf);
131 linfval = LDBL_MAX * LDBL_MAX;
133 snprintf (buf, sizeof buf, "%La %LA %Le %LE %Lf %LF %Lg %LG",
134 linfval, linfval, linfval, linfval,
135 linfval, linfval, linfval, linfval);
136 result |= strcmp (buf, "inf INF inf INF inf INF inf INF") != 0;
137 printf ("expected \"inf INF inf INF inf INF inf INF\", got \"%s\"\n", buf);
139 snprintf (buf, sizeof buf, "%La %LA %Le %LE %Lf %LF %Lg %LG",
140 -linfval, -linfval, -linfval, -linfval,
141 -linfval, -linfval, -linfval, -linfval);
142 result |= strcmp (buf, "-inf -INF -inf -INF -inf -INF -inf -INF") != 0;
143 printf ("expected \"-inf -INF -inf -INF -inf -INF -inf -INF\", got \"%s\"\n",
144 buf);
146 swprintf (wbuf, sizeof wbuf / sizeof (wbuf[0]),
147 L"%La %LA %Le %LE %Lf %LF %Lg %LG",
148 lqnanval, lqnanval, lqnanval, lqnanval,
149 lqnanval, lqnanval, lqnanval, lqnanval);
150 result |= wcscmp (wbuf, L"nan NAN nan NAN nan NAN nan NAN") != 0;
151 printf ("expected L\"nan NAN nan NAN nan NAN nan NAN\", got L\"%S\"\n", wbuf);
153 swprintf (wbuf, sizeof wbuf / sizeof (wbuf[0]),
154 L"%La %LA %Le %LE %Lf %LF %Lg %LG",
155 -lqnanval, -lqnanval, -lqnanval, -lqnanval,
156 -lqnanval, -lqnanval, -lqnanval, -lqnanval);
157 result |= wcscmp (wbuf, L"-nan -NAN -nan -NAN -nan -NAN -nan -NAN") != 0;
158 printf ("expected L\"-nan -NAN -nan -NAN -nan -NAN -nan -NAN\", got L\"%S\"\n",
159 wbuf);
161 swprintf (wbuf, sizeof wbuf / sizeof (wbuf[0]),
162 L"%La %LA %Le %LE %Lf %LF %Lg %LG",
163 linfval, linfval, linfval, linfval,
164 linfval, linfval, linfval, linfval);
165 result |= wcscmp (wbuf, L"inf INF inf INF inf INF inf INF") != 0;
166 printf ("expected L\"inf INF inf INF inf INF inf INF\", got L\"%S\"\n", wbuf);
168 swprintf (wbuf, sizeof wbuf / sizeof (wbuf[0]),
169 L"%La %LA %Le %LE %Lf %LF %Lg %LG",
170 -linfval, -linfval, -linfval, -linfval,
171 -linfval, -linfval, -linfval, -linfval);
172 result |= wcscmp (wbuf, L"-inf -INF -inf -INF -inf -INF -inf -INF") != 0;
173 printf ("expected L\"-inf -INF -inf -INF -inf -INF -inf -INF\", got L\"%S\"\n",
174 wbuf);
176 return result;
180 main (int argc, char *argv[])
182 int result = 0;
184 result |= t1 ();
185 result |= t2 ();
186 result |= F ();
188 result |= fflush (stdout) == EOF;
190 return result;