diff options
Diffstat (limited to 'src/regress/lib/libc/wprintf/wfp.c')
-rw-r--r-- | src/regress/lib/libc/wprintf/wfp.c | 218 |
1 files changed, 0 insertions, 218 deletions
diff --git a/src/regress/lib/libc/wprintf/wfp.c b/src/regress/lib/libc/wprintf/wfp.c deleted file mode 100644 index fc3120b53c..0000000000 --- a/src/regress/lib/libc/wprintf/wfp.c +++ /dev/null | |||
@@ -1,218 +0,0 @@ | |||
1 | /* $OpenBSD: wfp.c,v 1.1 2011/04/24 08:00:22 stsp Exp $ */ | ||
2 | /*- | ||
3 | * Copyright (c) 2002, 2005 David Schultz <das@FreeBSD.org> | ||
4 | * All rights reserved. | ||
5 | * | ||
6 | * Redistribution and use in source and binary forms, with or without | ||
7 | * modification, are permitted provided that the following conditions | ||
8 | * are met: | ||
9 | * 1. Redistributions of source code must retain the above copyright | ||
10 | * notice, this list of conditions and the following disclaimer. | ||
11 | * 2. Redistributions in binary form must reproduce the above copyright | ||
12 | * notice, this list of conditions and the following disclaimer in the | ||
13 | * documentation and/or other materials provided with the distribution. | ||
14 | * | ||
15 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND | ||
16 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
17 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||
18 | * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE | ||
19 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | ||
20 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | ||
21 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
22 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | ||
23 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | ||
24 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | ||
25 | * SUCH DAMAGE. | ||
26 | */ | ||
27 | |||
28 | /* | ||
29 | * Test for wprintf() floating point formats. | ||
30 | */ | ||
31 | |||
32 | #include <assert.h> | ||
33 | #include <err.h> | ||
34 | #include <float.h> | ||
35 | #include <math.h> | ||
36 | #include <stdio.h> | ||
37 | #include <stdarg.h> | ||
38 | #include <stdint.h> | ||
39 | #include <stdlib.h> | ||
40 | #include <string.h> | ||
41 | #include <wchar.h> | ||
42 | |||
43 | #define testfmt(result, fmt, ...) \ | ||
44 | _testfmt((result), __LINE__, #__VA_ARGS__, fmt, __VA_ARGS__) | ||
45 | void _testfmt(const wchar_t *, int, const char *, const wchar_t *, ...); | ||
46 | void smash_stack(void); | ||
47 | |||
48 | int | ||
49 | main(int argc, char *argv[]) | ||
50 | { | ||
51 | /* | ||
52 | * Basic tests of decimal output functionality. | ||
53 | */ | ||
54 | testfmt(L" 1.000000E+00", L"%13E", 1.0); | ||
55 | testfmt(L" 1.000000", L"%13f", 1.0); | ||
56 | testfmt(L" 1", L"%13G", 1.0); | ||
57 | testfmt(L" 1.000000E+00", L"%13LE", 1.0L); | ||
58 | testfmt(L" 1.000000", L"%13Lf", 1.0L); | ||
59 | testfmt(L" 1", L"%13LG", 1.0L); | ||
60 | |||
61 | testfmt(L"2.718282", L"%.*f", -2, 2.7182818); | ||
62 | |||
63 | testfmt(L"1.234568e+06", L"%e", 1234567.8); | ||
64 | testfmt(L"1234567.800000", L"%f", 1234567.8); | ||
65 | testfmt(L"1.23457E+06", L"%G", 1234567.8); | ||
66 | testfmt(L"1.234568e+06", L"%Le", 1234567.8L); | ||
67 | testfmt(L"1234567.800000", L"%Lf", 1234567.8L); | ||
68 | testfmt(L"1.23457E+06", L"%LG", 1234567.8L); | ||
69 | |||
70 | #if (LDBL_MANT_DIG > DBL_MANT_DIG) && !defined(__i386__) | ||
71 | testfmt(L"123456789.864210", L"%Lf", 123456789.8642097531L); | ||
72 | testfmt(L"-1.23457E+08", L"%LG", -123456789.8642097531L); | ||
73 | testfmt(L"123456789.8642097531", L"%.10Lf", 123456789.8642097531L); | ||
74 | testfmt(L" 3.141592653589793238e-4000", L"%L27.18Le", | ||
75 | 3.14159265358979323846e-4000L); | ||
76 | #endif /* (LDBL_MANT_DIG > DBL_MANT_DIG) && !defined(__i386__) */ | ||
77 | |||
78 | /* | ||
79 | * Infinities and NaNs | ||
80 | */ | ||
81 | #ifdef NAN | ||
82 | testfmt(L"nan", L"%e", NAN); | ||
83 | testfmt(L"NAN", L"%F", NAN); | ||
84 | testfmt(L"nan", L"%g", NAN); | ||
85 | testfmt(L"NAN", L"%LE", (long double)NAN); | ||
86 | testfmt(L" nan", L"%05e", NAN); | ||
87 | #endif /* NAN */ | ||
88 | |||
89 | testfmt(L"INF", L"%E", HUGE_VAL); | ||
90 | testfmt(L"-inf", L"%f", -HUGE_VAL); | ||
91 | testfmt(L"+inf", L"%+g", HUGE_VAL); | ||
92 | testfmt(L" inf", L"%4.2Le", HUGE_VALL); | ||
93 | testfmt(L"-inf", L"%Lf", -HUGE_VALL); | ||
94 | testfmt(L" inf", L"%05e", HUGE_VAL); | ||
95 | testfmt(L" -inf", L"%05e", -HUGE_VAL); | ||
96 | |||
97 | /* | ||
98 | * Padding | ||
99 | */ | ||
100 | testfmt(L"0.000000e+00", L"%e", 0.0); | ||
101 | testfmt(L"0.000000", L"%F", (double)0.0); | ||
102 | testfmt(L"0", L"%G", 0.0); | ||
103 | testfmt(L" 0", L"%3.0Lg", 0.0L); | ||
104 | testfmt(L" 0", L"%5.0f", 0.001); | ||
105 | |||
106 | /* | ||
107 | * Precision specifiers | ||
108 | */ | ||
109 | testfmt(L"1.0123e+00", L"%.4e", 1.0123456789); | ||
110 | testfmt(L"1.0123", L"%.4f", 1.0123456789); | ||
111 | testfmt(L"1.012", L"%.4g", 1.0123456789); | ||
112 | testfmt(L"1.2346e-02", L"%.4e", 0.0123456789); | ||
113 | testfmt(L"0.0123", L"%.4f", 0.0123456789); | ||
114 | testfmt(L"0.01235", L"%.4g", 0.0123456789); | ||
115 | |||
116 | /* | ||
117 | * Signed conversions | ||
118 | */ | ||
119 | testfmt(L"+2.500000e-01", L"%+e", 0.25); | ||
120 | testfmt(L"+0.000000", L"%+F", 0.0); | ||
121 | testfmt(L"-1", L"%+g", -1.0); | ||
122 | |||
123 | testfmt(L"-1.000000e+00", L"% e", -1.0); | ||
124 | testfmt(L"+1.000000", L"% +f", 1.0); | ||
125 | testfmt(L" 1", L"% g", 1.0); | ||
126 | testfmt(L" 0", L"% g", 0.0); | ||
127 | |||
128 | /* | ||
129 | * ``Alternate form'' | ||
130 | */ | ||
131 | testfmt(L"1.250e+00", L"%#.3e", 1.25); | ||
132 | testfmt(L"123.000000", L"%#f", 123.0); | ||
133 | testfmt(L" 12345.", L"%#7.5g", 12345.0); | ||
134 | testfmt(L" 1.00000", L"%#8g", 1.0); | ||
135 | testfmt(L"0.0", L"%#.2g", 0.0); | ||
136 | |||
137 | /* | ||
138 | * Padding and decimal point placement | ||
139 | */ | ||
140 | testfmt(L"03.2E+00", L"%08.1E", 3.25); | ||
141 | testfmt(L"003.25", L"%06.2F", 3.25); | ||
142 | testfmt(L"0003.25", L"%07.4G", 3.25); | ||
143 | |||
144 | testfmt(L"3.14159e-05", L"%g", 3.14159e-5); | ||
145 | testfmt(L"0.000314159", L"%g", 3.14159e-4); | ||
146 | testfmt(L"3.14159e+06", L"%g", 3.14159e6); | ||
147 | testfmt(L"314159", L"%g", 3.14159e5); | ||
148 | testfmt(L"314159.", L"%#g", 3.14159e5); | ||
149 | |||
150 | testfmt(L" 9.000000e+03", L"%13e", 9000.0); | ||
151 | testfmt(L" 9000.000000", L"%12f", 9000.0); | ||
152 | testfmt(L" 9000", L"%5g", 9000.0); | ||
153 | testfmt(L" 900000.", L"%#8g", 900000.0); | ||
154 | testfmt(L" 9e+06", L"%6g", 9000000.0); | ||
155 | testfmt(L" 9.000000e-04", L"%13e", 0.0009); | ||
156 | testfmt(L" 0.000900", L"%9f", 0.0009); | ||
157 | testfmt(L" 0.0009", L"%7g", 0.0009); | ||
158 | testfmt(L" 9e-05", L"%6g", 0.00009); | ||
159 | testfmt(L" 9.00000e-05", L"%#12g", 0.00009); | ||
160 | testfmt(L" 9.e-05", L"%#7.1g", 0.00009); | ||
161 | |||
162 | testfmt(L" 0.0", L"%4.1f", 0.0); | ||
163 | testfmt(L"90.0", L"%4.1f", 90.0); | ||
164 | testfmt(L" 100", L"%4.0f", 100.0); | ||
165 | testfmt(L"9.0e+01", L"%4.1e", 90.0); | ||
166 | testfmt(L"1e+02", L"%4.0e", 100.0); | ||
167 | |||
168 | /* | ||
169 | * Hexadecimal floating point (%a, %A) tests. Some of these | ||
170 | * are only valid if the implementation converts to hex digits | ||
171 | * on nibble boundaries. | ||
172 | */ | ||
173 | testfmt(L"0x0p+0", L"%a", 0x0.0p0); | ||
174 | testfmt(L"0X0.P+0", L"%#LA", 0x0.0p0L); | ||
175 | #ifdef NAN | ||
176 | testfmt(L"inf", L"%La", (long double)INFINITY); | ||
177 | testfmt(L"+INF", L"%+A", INFINITY); | ||
178 | testfmt(L"nan", L"%La", (long double)NAN); | ||
179 | testfmt(L"NAN", L"%A", NAN); | ||
180 | #endif /* NAN */ | ||
181 | |||
182 | testfmt(L" 0x1.23p+0", L"%10a", 0x1.23p0); | ||
183 | testfmt(L" 0x1.23p-500", L"%12a", 0x1.23p-500); | ||
184 | testfmt(L" 0x1.2p+40", L"%10.1a", 0x1.23p40); | ||
185 | testfmt(L" 0X1.230000000000000000000000P-4", L"%32.24A", 0x1.23p-4); | ||
186 | testfmt(L"0x1p-1074", L"%a", 0x1p-1074); | ||
187 | testfmt(L"0x1.2345p-1024", L"%a", 0x1.2345p-1024); | ||
188 | |||
189 | return (0); | ||
190 | } | ||
191 | |||
192 | void | ||
193 | smash_stack(void) | ||
194 | { | ||
195 | static uint32_t junk = 0xdeadbeef; | ||
196 | uint32_t buf[512]; | ||
197 | int i; | ||
198 | |||
199 | for (i = 0; i < sizeof(buf) / sizeof(buf[0]); i++) | ||
200 | buf[i] = junk; | ||
201 | } | ||
202 | |||
203 | void | ||
204 | _testfmt(const wchar_t *result, int line, const char *argstr, const wchar_t *fmt,...) | ||
205 | { | ||
206 | wchar_t s[100]; | ||
207 | va_list ap; | ||
208 | |||
209 | va_start(ap, fmt); | ||
210 | smash_stack(); | ||
211 | vswprintf(s, sizeof(s), fmt, ap); | ||
212 | if (wcscmp(result, s) != 0) { | ||
213 | fprintf(stderr, | ||
214 | "%d: printf(\"%s\", %s) ==> [%s], expected [%s]\n", | ||
215 | line, (char*)fmt, argstr, s, result); | ||
216 | abort(); | ||
217 | } | ||
218 | } | ||