1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
|
#define USE_STB 1
#if USE_STB
# include "stb_sprintf.h"
# define SPRINTF stbsp_sprintf
# define SNPRINTF stbsp_snprintf
#else
# include <locale.h>
# define SPRINTF sprintf
# define SNPRINTF snprintf
#endif
#include <assert.h>
#include <math.h> // for INFINITY, NAN
#include <stddef.h> // for ptrdiff_t
#include <stdio.h> // for printf
#include <string.h> // for strcmp, strncmp, strlen
#if _MSC_VER && _MSC_VER <= 1600
typedef int intmax_t;
typedef ptrdiff_t ssize_t;
#else
#include <stdint.h> // for intmax_t, ssize_t
#endif
// stbsp_sprintf
#define CHECK_END(str) \
if (strcmp(buf, str) != 0 || (unsigned) ret != strlen(str)) { \
printf("< '%s'\n> '%s'\n", str, buf); \
assert(!"Fail"); \
}
#define CHECK9(str, v1, v2, v3, v4, v5, v6, v7, v8, v9) { int ret = SPRINTF(buf, v1, v2, v3, v4, v5, v6, v7, v8, v9); CHECK_END(str); }
#define CHECK8(str, v1, v2, v3, v4, v5, v6, v7, v8 ) { int ret = SPRINTF(buf, v1, v2, v3, v4, v5, v6, v7, v8 ); CHECK_END(str); }
#define CHECK7(str, v1, v2, v3, v4, v5, v6, v7 ) { int ret = SPRINTF(buf, v1, v2, v3, v4, v5, v6, v7 ); CHECK_END(str); }
#define CHECK6(str, v1, v2, v3, v4, v5, v6 ) { int ret = SPRINTF(buf, v1, v2, v3, v4, v5, v6 ); CHECK_END(str); }
#define CHECK5(str, v1, v2, v3, v4, v5 ) { int ret = SPRINTF(buf, v1, v2, v3, v4, v5 ); CHECK_END(str); }
#define CHECK4(str, v1, v2, v3, v4 ) { int ret = SPRINTF(buf, v1, v2, v3, v4 ); CHECK_END(str); }
#define CHECK3(str, v1, v2, v3 ) { int ret = SPRINTF(buf, v1, v2, v3 ); CHECK_END(str); }
#define CHECK2(str, v1, v2 ) { int ret = SPRINTF(buf, v1, v2 ); CHECK_END(str); }
#define CHECK1(str, v1 ) { int ret = SPRINTF(buf, v1 ); CHECK_END(str); }
#ifdef TEST_SPRINTF
int main()
{
char buf[1024];
int n = 0;
const double pow_2_75 = 37778931862957161709568.0;
const double pow_2_85 = 38685626227668133590597632.0;
// integers
CHECK4("a b 1", "%c %s %d", 'a', "b", 1);
CHECK2("abc ", "%-8.3s", "abcdefgh");
CHECK2("+5", "%+2d", 5);
CHECK2(" 6", "% 3i", 6);
CHECK2("-7 ", "%-4d", -7);
CHECK2("+0", "%+d", 0);
CHECK3(" 00003: 00004", "%10.5d:%10.5d", 3, 4);
CHECK2("-100006789", "%d", -100006789);
CHECK3("20 0020", "%u %04u", 20u, 20u);
CHECK4("12 1e 3C", "%o %x %X", 10u, 30u, 60u);
CHECK4(" 12 1e 3C ", "%3o %2x %-3X", 10u, 30u, 60u);
CHECK4("012 0x1e 0X3C", "%#o %#x %#X", 10u, 30u, 60u);
CHECK2("", "%.0x", 0);
#if USE_STB
CHECK2("0", "%.0d", 0); // stb_sprintf gives "0"
#else
CHECK2("", "%.0d", 0); // glibc gives "" as specified by C99(?)
#endif
CHECK3("33 555", "%hi %ld", (short)33, 555l);
#if !defined(_MSC_VER) || _MSC_VER >= 1600
CHECK2("9888777666", "%llu", 9888777666llu);
#endif
CHECK4("-1 2 -3", "%ji %zi %ti", (intmax_t)-1, (ssize_t)2, (ptrdiff_t)-3);
// floating-point numbers
CHECK2("-3.000000", "%f", -3.0);
CHECK2("-8.8888888800", "%.10f", -8.88888888);
CHECK2("880.0888888800", "%.10f", 880.08888888);
CHECK2("4.1", "%.1f", 4.1);
CHECK2(" 0", "% .0f", 0.1);
CHECK2("0.00", "%.2f", 1e-4);
CHECK2("-5.20", "%+4.2f", -5.2);
CHECK2("0.0 ", "%-10.1f", 0.);
CHECK2("-0.000000", "%f", -0.);
CHECK2("0.000001", "%f", 9.09834e-07);
#if USE_STB // rounding differences
CHECK2("38685626227668133600000000.0", "%.1f", pow_2_85);
CHECK2("0.000000499999999999999978", "%.24f", 5e-7);
#else
CHECK2("38685626227668133590597632.0", "%.1f", pow_2_85); // exact
CHECK2("0.000000499999999999999977", "%.24f", 5e-7);
#endif
CHECK2("0.000000000000000020000000", "%.24f", 2e-17);
CHECK3("0.0000000100 100000000", "%.10f %.0f", 1e-8, 1e+8);
CHECK2("100056789.0", "%.1f", 100056789.0);
CHECK4(" 1.23 %", "%*.*f %%", 5, 2, 1.23);
CHECK2("-3.000000e+00", "%e", -3.0);
CHECK2("4.1E+00", "%.1E", 4.1);
CHECK2("-5.20e+00", "%+4.2e", -5.2);
CHECK3("+0.3 -3", "%+g %+g", 0.3, -3.0);
CHECK2("4", "%.1G", 4.1);
CHECK2("-5.2", "%+4.2g", -5.2);
CHECK2("3e-300", "%g", 3e-300);
CHECK2("1", "%.0g", 1.2);
CHECK3(" 3.7 3.71", "% .3g %.3g", 3.704, 3.706);
CHECK3("2e-315:1e+308", "%g:%g", 2e-315, 1e+308);
#if __STDC_VERSION__ >= 199901L
#if USE_STB
CHECK4("Inf Inf NaN", "%g %G %f", INFINITY, INFINITY, NAN);
CHECK2("N", "%.1g", NAN);
#else
CHECK4("inf INF nan", "%g %G %f", INFINITY, INFINITY, NAN);
CHECK2("nan", "%.1g", NAN);
#endif
#endif
// %n
CHECK3("aaa ", "%.3s %n", "aaaaaaaaaaaaa", &n);
assert(n == 4);
#if __STDC_VERSION__ >= 199901L
// hex floats
CHECK2("0x1.fedcbap+98", "%a", 0x1.fedcbap+98);
CHECK2("0x1.999999999999a0p-4", "%.14a", 0.1);
CHECK2("0x1.0p-1022", "%.1a", 0x1.ffp-1023);
#if USE_STB // difference in default precision and x vs X for %A
CHECK2("0x1.009117p-1022", "%a", 2.23e-308);
CHECK2("-0x1.AB0P-5", "%.3A", -0x1.abp-5);
#else
CHECK2("0x1.0091177587f83p-1022", "%a", 2.23e-308);
CHECK2("-0X1.AB0P-5", "%.3A", -0X1.abp-5);
#endif
#endif
// %p
#if USE_STB
CHECK2("0000000000000000", "%p", (void*) NULL);
#else
CHECK2("(nil)", "%p", (void*) NULL);
#endif
// snprintf
assert(SNPRINTF(buf, 100, " %s %d", "b", 123) == 10);
assert(strcmp(buf, " b 123") == 0);
assert(SNPRINTF(buf, 100, "%f", pow_2_75) == 30);
assert(strncmp(buf, "37778931862957161709568.000000", 17) == 0);
n = SNPRINTF(buf, 10, "number %f", 123.456789);
assert(strcmp(buf, "number 12") == 0);
assert(n == 17); // written vs would-be written bytes
n = SNPRINTF(buf, 0, "7 chars");
assert(n == 7);
// stb_sprintf uses internal buffer of 512 chars - test longer string
assert(SPRINTF(buf, "%d %600s", 3, "abc") == 603);
assert(strlen(buf) == 603);
SNPRINTF(buf, 550, "%d %600s", 3, "abc");
assert(strlen(buf) == 549);
assert(SNPRINTF(buf, 600, "%510s %c", "a", 'b') == 516);
// length check
assert(SNPRINTF(NULL, 0, " %s %d", "b", 123) == 10);
// ' modifier. Non-standard, but supported by glibc.
#if !USE_STB
setlocale(LC_NUMERIC, ""); // C locale does not group digits
#endif
CHECK2("1,200,000", "%'d", 1200000);
CHECK2("-100,006,789", "%'d", -100006789);
#if !defined(_MSC_VER) || _MSC_VER >= 1600
CHECK2("9,888,777,666", "%'lld", 9888777666ll);
#endif
CHECK2("200,000,000.000000", "%'18f", 2e8);
CHECK2("100,056,789", "%'.0f", 100056789.0);
CHECK2("100,056,789.0", "%'.1f", 100056789.0);
#if USE_STB // difference in leading zeros
CHECK2("000,001,200,000", "%'015d", 1200000);
#else
CHECK2("0000001,200,000", "%'015d", 1200000);
#endif
// things not supported by glibc
#if USE_STB
CHECK2("null", "%s", (char*) NULL);
CHECK2("123,4abc:", "%'x:", 0x1234ABC);
CHECK2("100000000", "%b", 256);
CHECK3("0b10 0B11", "%#b %#B", 2, 3);
#if !defined(_MSC_VER) || _MSC_VER >= 1600
CHECK4("2 3 4", "%I64d %I32d %Id", 2ll, 3, 4ll);
#endif
CHECK3("1k 2.54 M", "%$_d %$.2d", 1000, 2536000);
CHECK3("2.42 Mi 2.4 M", "%$$.2d %$$$d", 2536000, 2536000);
// different separators
stbsp_set_separators(' ', ',');
CHECK2("12 345,678900", "%'f", 12345.6789);
#endif
return 0;
}
#endif
|
