2 * Copyright (c) 2002, 2005 David Schultz <das@FreeBSD.org>
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28 * Test for printf() floating point formats.
31 #include <sys/cdefs.h>
32 __FBSDID("$FreeBSD$");
46 #define testfmt(result, fmt, ...) \
47 _testfmt((result), __LINE__, #__VA_ARGS__, fmt, __VA_ARGS__)
48 void _testfmt(const char *, int, const char *, const char *, ...);
49 void smash_stack(void);
52 main(int argc, char *argv[])
56 assert(setlocale(LC_NUMERIC, ""));
59 * Basic tests of decimal output functionality.
61 testfmt(" 1.000000E+00", "%13E", 1.0);
62 testfmt(" 1.000000", "%13f", 1.0);
63 testfmt(" 1", "%13G", 1.0);
64 testfmt(" 1.000000E+00", "%13LE", 1.0L);
65 testfmt(" 1.000000", "%13Lf", 1.0L);
66 testfmt(" 1", "%13LG", 1.0L);
68 testfmt("2.718282", "%.*f", -2, 2.7182818);
70 testfmt("1.234568e+06", "%e", 1234567.8);
71 testfmt("1234567.800000", "%f", 1234567.8);
72 testfmt("1.23457E+06", "%G", 1234567.8);
73 testfmt("1.234568e+06", "%Le", 1234567.8L);
74 testfmt("1234567.800000", "%Lf", 1234567.8L);
75 testfmt("1.23457E+06", "%LG", 1234567.8L);
77 #if (LDBL_MANT_DIG > DBL_MANT_DIG) && !defined(__i386__)
78 testfmt("123456789.864210", "%Lf", 123456789.8642097531L);
79 testfmt("-1.23457E+08", "%LG", -123456789.8642097531L);
80 testfmt("123456789.8642097531", "%.10Lf", 123456789.8642097531L);
81 testfmt(" 3.141592653589793238e-4000", "%L27.18Le",
82 3.14159265358979323846e-4000L);
85 printf("ok 1 - printfloat\n");
90 testfmt("nan", "%e", NAN);
91 testfmt("NAN", "%F", NAN);
92 testfmt("nan", "%g", NAN);
93 testfmt("NAN", "%LE", (long double)NAN);
95 testfmt("INF", "%E", HUGE_VAL);
96 testfmt("-inf", "%f", -HUGE_VAL);
97 testfmt("+inf", "%+g", HUGE_VAL);
98 testfmt(" inf", "%4.2Le", HUGE_VALL);
99 testfmt("-inf", "%Lf", -HUGE_VALL);
101 printf("ok 2 - printfloat\n");
106 testfmt("0.000000e+00", "%e", 0.0);
107 testfmt("0.000000", "%F", (double)0.0);
108 testfmt("0", "%G", 0.0);
109 testfmt(" 0", "%3.0Lg", 0.0L);
110 testfmt(" 0", "%5.0f", 0.001);
111 printf("ok 3 - printfloat\n");
114 * Precision specifiers
116 testfmt("1.0123e+00", "%.4e", 1.0123456789);
117 testfmt("1.0123", "%.4f", 1.0123456789);
118 testfmt("1.012", "%.4g", 1.0123456789);
119 testfmt("1.2346e-02", "%.4e", 0.0123456789);
120 testfmt("0.0123", "%.4f", 0.0123456789);
121 testfmt("0.01235", "%.4g", 0.0123456789);
122 printf("ok 4 - printfloat\n");
125 * Thousands' separators and other locale fun
127 testfmt("12345678.0625", "%'.04f", 12345678.0625);
128 testfmt("0012345678.0625", "%'015.4F", 12345678.0625);
130 assert(setlocale(LC_NUMERIC, "hi_IN.ISCII-DEV")); /* grouping == 2;3 */
131 testfmt("123,456,78.0625", "%'.4f", 12345678.0625);
132 testfmt("00123,456,78.0625", "%'017.4F", 12345678.0625);
133 testfmt(" 90,00", "%'6.0f", 9000.0);
134 testfmt("90,00.0", "%'.1f", 9000.0);
136 assert(setlocale(LC_NUMERIC, "ru_RU.ISO8859-5")); /* decimalpoint==, */
137 testfmt("3,1415", "%g", 3.1415);
139 /* thousands=. decimalpoint=, grouping=3;3 */
140 assert(setlocale(LC_NUMERIC, "el_GR.ISO8859-7")); /* decimalpoint==, */
141 testfmt("1.234,00", "%'.2f", 1234.00);
142 testfmt("123.456,789", "%'.3f", 123456.789);
144 assert(setlocale(LC_NUMERIC, ""));
145 testfmt("12345678.062500", "%'f", 12345678.0625);
146 testfmt("9000.000000", "%'f", 9000.0);
148 printf("ok 5 - printfloat\n");
153 testfmt("+2.500000e-01", "%+e", 0.25);
154 testfmt("+0.000000", "%+F", 0.0);
155 testfmt("-1", "%+g", -1.0);
157 testfmt("-1.000000e+00", "% e", -1.0);
158 testfmt("+1.000000", "% +f", 1.0);
159 testfmt(" 1", "% g", 1.0);
160 testfmt(" 0", "% g", 0.0);
162 printf("ok 6 - printfloat\n");
167 testfmt("1.250e+00", "%#.3e", 1.25);
168 testfmt("123.000000", "%#f", 123.0);
169 testfmt(" 12345.", "%#7.5g", 12345.0);
170 testfmt(" 1.00000", "%#8g", 1.0);
171 testfmt("0.0", "%#.2g", 0.0);
172 printf("ok 7 - printfloat\n");
175 * Padding and decimal point placement
177 testfmt("03.2E+00", "%08.1E", 3.25);
178 testfmt("003.25", "%06.2F", 3.25);
179 testfmt("0003.25", "%07.4G", 3.25);
181 testfmt("3.14159e-05", "%g", 3.14159e-5);
182 testfmt("0.000314159", "%g", 3.14159e-4);
183 testfmt("3.14159e+06", "%g", 3.14159e6);
184 testfmt("314159", "%g", 3.14159e5);
185 testfmt("314159.", "%#g", 3.14159e5);
187 testfmt(" 9.000000e+03", "%13e", 9000.0);
188 testfmt(" 9000.000000", "%12f", 9000.0);
189 testfmt(" 9000", "%5g", 9000.0);
190 testfmt(" 900000.", "%#8g", 900000.0);
191 testfmt(" 9e+06", "%6g", 9000000.0);
192 testfmt(" 9.000000e-04", "%13e", 0.0009);
193 testfmt(" 0.000900", "%9f", 0.0009);
194 testfmt(" 0.0009", "%7g", 0.0009);
195 testfmt(" 9e-05", "%6g", 0.00009);
196 testfmt(" 9.00000e-05", "%#12g", 0.00009);
197 testfmt(" 9.e-05", "%#7.1g", 0.00009);
199 testfmt(" 0.0", "%4.1f", 0.0);
200 testfmt("90.0", "%4.1f", 90.0);
201 testfmt(" 100", "%4.0f", 100.0);
202 testfmt("9.0e+01", "%4.1e", 90.0);
203 testfmt("1e+02", "%4.0e", 100.0);
205 printf("ok 8 - printfloat\n");
210 fesetround(FE_DOWNWARD);
211 testfmt("4.437", "%.3f", 4.4375);
212 testfmt("-4.438", "%.3f", -4.4375);
214 fesetround(FE_UPWARD);
215 testfmt("4.438", "%.3f", 4.4375);
216 testfmt("-4.437", "%.3f", -4.4375);
218 fesetround(FE_TOWARDZERO);
219 testfmt("4.437", "%.3f", 4.4375);
220 testfmt("-4.437", "%.3f", -4.4375);
222 fesetround(FE_TONEAREST);
223 testfmt("4.438", "%.3f", 4.4375);
224 testfmt("-4.438", "%.3f", -4.4375);
226 printf("ok 9 - printfloat\n");
229 * Hexadecimal floating point (%a, %A) tests. Some of these
230 * are only valid if the implementation converts to hex digits
231 * on nibble boundaries.
233 testfmt("0x0p+0", "%a", 0x0.0p0);
234 testfmt("0X0.P+0", "%#LA", 0x0.0p0L);
235 testfmt("inf", "%La", (long double)INFINITY);
236 testfmt("+INF", "%+A", INFINITY);
237 testfmt("nan", "%La", (long double)NAN);
238 testfmt("NAN", "%A", NAN);
240 testfmt(" 0x1.23p+0", "%10a", 0x1.23p0);
241 testfmt(" 0x1.23p-500", "%12a", 0x1.23p-500);
242 testfmt(" 0x1.2p+40", "%10.1a", 0x1.23p40);
243 testfmt(" 0X1.230000000000000000000000P-4", "%32.24A", 0x1.23p-4);
244 testfmt("0x1p-1074", "%a", 0x1p-1074);
245 testfmt("0x1.2345p-1024", "%a", 0x1.2345p-1024);
247 #if (LDBL_MANT_DIG == 64) && !defined(__i386__)
248 testfmt("0xc.90fdaa22168c234p-2", "%La", 0x3.243f6a8885a308dp0L);
249 testfmt("0x8p-16448", "%La", 0x1p-16445L);
250 testfmt("0x9.8765p-16384", "%La", 0x9.8765p-16384L);
251 #elif (LDBL_MANT_DIG == 113)
252 testfmt("0x1.921fb54442d18469898cc51701b8p+1", "%La",
253 0x3.243f6a8885a308d313198a2e037p0L);
254 testfmt("0x1p-16494", "%La", 0x1p-16494L);
255 testfmt("0x1.2345p-16384", "%La", 0x1.2345p-16384L);
257 testfmt("0xc.90fdaa22168cp-2", "%La", 0x3.243f6a8885a31p0L);
258 testfmt("0x8p-1077", "%La", 0x1p-1074L);
259 testfmt("0x9.8765p-1024", "%La", 0x9.8765p-1024L);
262 printf("ok 10 - printfloat\n");
265 * Hexadecimal rounding
267 fesetround(FE_TOWARDZERO);
268 testfmt("0X1.23456789ABCP+0", "%.11A", 0x1.23456789abcdep0);
269 testfmt("-0x1.23456p+0", "%.5a", -0x1.23456789abcdep0);
270 testfmt("0x1.23456p+0", "%.5a", 0x1.23456789abcdep0);
271 testfmt("0x1.234567p+0", "%.6a", 0x1.23456789abcdep0);
272 testfmt("-0x1.234566p+0", "%.6a", -0x1.23456689abcdep0);
274 fesetround(FE_DOWNWARD);
275 testfmt("0X1.23456789ABCP+0", "%.11A", 0x1.23456789abcdep0);
276 testfmt("-0x1.23457p+0", "%.5a", -0x1.23456789abcdep0);
277 testfmt("0x1.23456p+0", "%.5a", 0x1.23456789abcdep0);
278 testfmt("0x1.234567p+0", "%.6a", 0x1.23456789abcdep0);
279 testfmt("-0x1.234567p+0", "%.6a", -0x1.23456689abcdep0);
281 fesetround(FE_UPWARD);
282 testfmt("0X1.23456789ABDP+0", "%.11A", 0x1.23456789abcdep0);
283 testfmt("-0x1.23456p+0", "%.5a", -0x1.23456789abcdep0);
284 testfmt("0x1.23457p+0", "%.5a", 0x1.23456789abcdep0);
285 testfmt("0x1.234568p+0", "%.6a", 0x1.23456789abcdep0);
286 testfmt("-0x1.234566p+0", "%.6a", -0x1.23456689abcdep0);
288 fesetround(FE_TONEAREST);
289 testfmt("0x1.23456789abcdep+4", "%a", 0x1.23456789abcdep4);
290 testfmt("0X1.23456789ABDP+0", "%.11A", 0x1.23456789abcdep0);
291 testfmt("-0x1.23456p+0", "%.5a", -0x1.23456789abcdep0);
292 testfmt("0x1.23456p+0", "%.5a", 0x1.23456789abcdep0);
293 testfmt("0x1.234568p+0", "%.6a", 0x1.23456789abcdep0);
294 testfmt("-0x1.234566p+0", "%.6a", -0x1.23456689abcdep0);
295 testfmt("0x2.00p-1030", "%.2a", 0x1.fffp-1030);
296 testfmt("0x2.00p-1027", "%.2a", 0xf.fffp-1030);
298 printf("ok 11 - printfloat\n");
306 static uint32_t junk = 0xdeadbeef;
310 for (i = 0; i < sizeof(buf) / sizeof(buf[0]); i++)
315 _testfmt(const char *result, int line, const char *argstr, const char *fmt,...)
322 vsnprintf(s, sizeof(s), fmt, ap);
323 if (strcmp(result, s) != 0) {
325 "%d: printf(\"%s\", %s) ==> [%s], expected [%s]\n",
326 line, fmt, argstr, s, result);