]> pd.if.org Git - pdclib/blob - functions/stdio/vsnprintf.c
Merged branch stdio_rewrite back into trunk.
[pdclib] / functions / stdio / vsnprintf.c
1 /* $Id$ */
2
3 /* vsnprintf( char *, size_t, const char *, va_list ap )
4
5    This file is part of the Public Domain C Library (PDCLib).
6    Permission is granted to use, modify, and / or redistribute at will.
7 */
8
9 #include <stdio.h>
10 #include <stdarg.h>
11
12 #ifndef REGTEST
13
14 int vsnprintf( char * s, size_t n, const char * format, _PDCLIB_va_list arg )
15 {
16     /* TODO: This function should interpret format as multibyte characters.  */
17     /* Members: base, flags, n, i, this, s, width, prec, stream, arg         */
18     struct _PDCLIB_status_t status;
19     status.base = 0;
20     status.flags = 0;
21     status.n = n;
22     status.i = 0;
23     status.this = 0;
24     status.s = s;
25     status.width = 0;
26     status.prec = 0;
27     status.stream = NULL;
28     va_copy( status.arg, arg );
29     // = { 0, 0, n, 0, 0, s, 0, 0, NULL };
30     while ( *format != '\0' )
31     {
32         const char * rc;
33         if ( ( *format != '%' ) || ( ( rc = _PDCLIB_print( format, &status ) ) == format ) )
34         {
35             /* No conversion specifier, print verbatim */
36             s[ status.i++ ] = *(format++);
37         }
38         else
39         {
40             /* Continue parsing after conversion specifier */
41             format = rc;
42         }
43     }
44     s[ status.i ] = '\0';
45     va_end( status.arg );
46     return status.i;
47 }
48
49 #endif
50
51 #ifdef TEST
52 #include <_PDCLIB_test.h>
53
54 #include <limits.h>
55 #include <stdint.h>
56 #include <string.h>
57
58
59 static int testprintf( char * s, size_t n, const char * format, ... )
60 {
61     int i;
62     va_list arg;
63     va_start( arg, format );
64     i = vsnprintf( s, n, format, arg );
65     va_end( arg );
66     return i;
67 }
68
69 int main( void )
70 {
71     char buffer[100];
72     TESTCASE( testprintf( buffer, 100, "%hhd", CHAR_MIN ) == 4 );
73     TESTCASE( strcmp( buffer, "-128" ) == 0 );
74     TESTCASE( testprintf( buffer, 100, "%hhd", CHAR_MAX ) == 3 );
75     TESTCASE( strcmp( buffer, "127" ) == 0 );
76     TESTCASE( testprintf( buffer, 100, "%hhd", 0 ) == 1 );
77     TESTCASE( strcmp( buffer, "0" ) == 0 );
78     TESTCASE( testprintf( buffer, 100, "%hd", SHRT_MIN ) == 6 );
79     TESTCASE( strcmp( buffer, "-32768" ) == 0 );
80     TESTCASE( testprintf( buffer, 100, "%hd", SHRT_MAX ) == 5 );
81     TESTCASE( strcmp( buffer, "32767" ) == 0 );
82     TESTCASE( testprintf( buffer, 100, "%hd", 0 ) == 1 );
83     TESTCASE( strcmp( buffer, "0" ) == 0 );
84     TESTCASE( testprintf( buffer, 100, "%d", INT_MIN ) == 11 );
85     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
86     TESTCASE( testprintf( buffer, 100, "%d", INT_MAX ) == 10 );
87     TESTCASE( strcmp( buffer, "2147483647" ) == 0 );
88     TESTCASE( testprintf( buffer, 100, "%d", 0 ) == 1 );
89     TESTCASE( strcmp( buffer, "0" ) == 0 );
90     TESTCASE( testprintf( buffer, 100, "%ld", LONG_MIN ) == 11 );
91     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
92     TESTCASE( testprintf( buffer, 100, "%ld", LONG_MAX ) == 10 );
93     TESTCASE( strcmp( buffer, "2147483647" ) == 0 );
94     TESTCASE( testprintf( buffer, 100, "%ld", 0l ) == 1 );
95     TESTCASE( strcmp( buffer, "0" ) == 0 );
96     TESTCASE( testprintf( buffer, 100, "%lld", LLONG_MIN ) == 20 );
97     TESTCASE( strcmp( buffer, "-9223372036854775808" ) == 0 );
98     TESTCASE( testprintf( buffer, 100, "%lld", LLONG_MAX ) == 19 );
99     TESTCASE( strcmp( buffer, "9223372036854775807" ) == 0 );
100     TESTCASE( testprintf( buffer, 100, "%lld", 0ll ) );
101     TESTCASE( strcmp( buffer, "0" ) == 0 );
102     TESTCASE( testprintf( buffer, 100, "%hhu", UCHAR_MAX ) == 3 );
103     TESTCASE( strcmp( buffer, "255" ) == 0 );
104     TESTCASE( testprintf( buffer, 100, "%hhu", (unsigned char)-1 ) == 3 );
105     TESTCASE( strcmp( buffer, "255" ) == 0 );
106     TESTCASE( testprintf( buffer, 100, "%hu", USHRT_MAX ) == 5 );
107     TESTCASE( strcmp( buffer, "65535" ) == 0 );
108     TESTCASE( testprintf( buffer, 100, "%hu", (unsigned short)-1 ) == 5 );
109     TESTCASE( strcmp( buffer, "65535" ) == 0 );
110     TESTCASE( testprintf( buffer, 100, "%u", UINT_MAX ) == 10 );
111     TESTCASE( strcmp( buffer, "4294967295" ) == 0 );
112     TESTCASE( testprintf( buffer, 100, "%u", -1u ) == 10 );
113     TESTCASE( strcmp( buffer, "4294967295" ) == 0 );
114     TESTCASE( testprintf( buffer, 100, "%lu", ULONG_MAX ) == 10 );
115     TESTCASE( strcmp( buffer, "4294967295" ) == 0 );
116     TESTCASE( testprintf( buffer, 100, "%lu", -1ul ) == 10 );
117     TESTCASE( strcmp( buffer, "4294967295" ) == 0 );
118     TESTCASE( testprintf( buffer, 100, "%llu", ULLONG_MAX ) == 20 );
119     TESTCASE( strcmp( buffer, "18446744073709551615" ) == 0 );
120     TESTCASE( testprintf( buffer, 100, "%llu", -1ull ) == 20 );
121     TESTCASE( strcmp( buffer, "18446744073709551615" ) == 0 );
122     TESTCASE( testprintf( buffer, 100, "%X", UINT_MAX ) == 8 );
123     TESTCASE( strcmp( buffer, "FFFFFFFF" ) == 0 );
124     TESTCASE( testprintf( buffer, 100, "%#X", -1u ) == 10 );
125     TESTCASE( strcmp( buffer, "0XFFFFFFFF" ) == 0 );
126     TESTCASE( testprintf( buffer, 100, "%x", UINT_MAX ) == 8 );
127     TESTCASE( strcmp( buffer, "ffffffff" ) == 0 );
128     TESTCASE( testprintf( buffer, 100, "%#x", -1u ) == 10 );
129     TESTCASE( strcmp( buffer, "0xffffffff" ) == 0 );
130     TESTCASE( testprintf( buffer, 100, "%o", UINT_MAX ) == 11 );
131     TESTCASE( strcmp( buffer, "37777777777" ) == 0 );
132     TESTCASE( testprintf( buffer, 100, "%#o", -1u ) == 12 );
133     TESTCASE( strcmp( buffer, "037777777777" ) == 0 );
134     /* TODO: This test case is broken, doesn't test what it was intended to. */
135     TESTCASE( testprintf( buffer, 100, "%.0#o", 0 ) == 5 );
136     TESTCASE( strcmp( buffer, "%.0#o" ) == 0 );
137     TESTCASE( testprintf( buffer, 100, "%+d", INT_MIN ) == 11 );
138     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
139     TESTCASE( testprintf( buffer, 100, "%+d", INT_MAX ) == 11 );
140     TESTCASE( strcmp( buffer, "+2147483647" ) == 0 );
141     TESTCASE( testprintf( buffer, 100, "%+d", 0 ) == 2 );
142     TESTCASE( strcmp( buffer, "+0" ) == 0 );
143     TESTCASE( testprintf( buffer, 100, "%+u", UINT_MAX ) == 10 );
144     TESTCASE( strcmp( buffer, "4294967295" ) == 0 );
145     TESTCASE( testprintf( buffer, 100, "%+u", -1u ) == 10 );
146     TESTCASE( strcmp( buffer, "4294967295" ) == 0 );
147     TESTCASE( testprintf( buffer, 100, "% d", INT_MIN ) == 11 );
148     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
149     TESTCASE( testprintf( buffer, 100, "% d", INT_MAX ) == 11 );
150     TESTCASE( strcmp( buffer, " 2147483647" ) == 0 );
151     TESTCASE( testprintf( buffer, 100, "% d", 0 ) == 2 );
152     TESTCASE( strcmp( buffer, " 0" ) == 0 );
153     TESTCASE( testprintf( buffer, 100, "% u", UINT_MAX ) == 10 );
154     TESTCASE( strcmp( buffer, "4294967295" ) == 0 );
155     TESTCASE( testprintf( buffer, 100, "% u", -1u ) == 10 );
156     TESTCASE( strcmp( buffer, "4294967295" ) == 0 );
157     TESTCASE( testprintf( buffer, 100, "%9d", INT_MIN ) == 11 );
158     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
159     TESTCASE( testprintf( buffer, 100, "%9d", INT_MAX ) == 10 );
160     TESTCASE( strcmp( buffer, "2147483647" ) == 0 );
161     TESTCASE( testprintf( buffer, 100, "%10d", INT_MIN ) == 11 );
162     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
163     TESTCASE( testprintf( buffer, 100, "%10d", INT_MAX ) == 10 );
164     TESTCASE( strcmp( buffer, "2147483647" ) == 0 );
165     TESTCASE( testprintf( buffer, 100, "%11d", INT_MIN ) == 11 );
166     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
167     TESTCASE( testprintf( buffer, 100, "%11d", INT_MAX ) == 11 );
168     TESTCASE( strcmp( buffer, " 2147483647" ) == 0 );
169     TESTCASE( testprintf( buffer, 100, "%12d", INT_MIN ) == 12 );
170     TESTCASE( strcmp( buffer, " -2147483648" ) == 0 );
171     TESTCASE( testprintf( buffer, 100, "%12d", INT_MAX ) == 12 );
172     TESTCASE( strcmp( buffer, "  2147483647" ) == 0 );
173     TESTCASE( testprintf( buffer, 100, "%-9d", INT_MIN ) == 11 );
174     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
175     TESTCASE( testprintf( buffer, 100, "%-9d", INT_MAX ) == 10 );
176     TESTCASE( strcmp( buffer, "2147483647" ) == 0 );
177     TESTCASE( testprintf( buffer, 100, "%-10d", INT_MIN ) == 11 );
178     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
179     TESTCASE( testprintf( buffer, 100, "%-10d", INT_MAX ) == 10 );
180     TESTCASE( strcmp( buffer, "2147483647" ) == 0 );
181     TESTCASE( testprintf( buffer, 100, "%-11d", INT_MIN ) == 11 );
182     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
183     TESTCASE( testprintf( buffer, 100, "%-11d", INT_MAX ) == 11 );
184     TESTCASE( strcmp( buffer, "2147483647 " ) == 0 );
185     TESTCASE( testprintf( buffer, 100, "%-12d", INT_MIN ) == 12 );
186     TESTCASE( strcmp( buffer, "-2147483648 " ) == 0 );
187     TESTCASE( testprintf( buffer, 100, "%-12d", INT_MAX ) == 12 );
188     TESTCASE( strcmp( buffer, "2147483647  " ) == 0 );
189     TESTCASE( testprintf( buffer, 100, "%09d", INT_MIN ) == 11 );
190     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
191     TESTCASE( testprintf( buffer, 100, "%09d", INT_MAX ) == 10 );
192     TESTCASE( strcmp( buffer, "2147483647" ) == 0 );
193     TESTCASE( testprintf( buffer, 100, "%010d", INT_MIN ) == 11 );
194     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
195     TESTCASE( testprintf( buffer, 100, "%010d", INT_MAX ) == 10 );
196     TESTCASE( strcmp( buffer, "2147483647" ) == 0 );
197     TESTCASE( testprintf( buffer, 100, "%011d", INT_MIN ) == 11 );
198     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
199     TESTCASE( testprintf( buffer, 100, "%011d", INT_MAX ) == 11 );
200     TESTCASE( strcmp( buffer, "02147483647" ) == 0 );
201     TESTCASE( testprintf( buffer, 100, "%012d", INT_MIN ) == 12 );
202     TESTCASE( strcmp( buffer, "-02147483648" ) == 0 );
203     TESTCASE( testprintf( buffer, 100, "%012d", INT_MAX ) == 12 );
204     TESTCASE( strcmp( buffer, "002147483647" ) == 0 );
205     TESTCASE( testprintf( buffer, 100, "%-09d", INT_MIN ) == 11 );
206     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
207     TESTCASE( testprintf( buffer, 100, "%-09d", INT_MAX ) == 10 );
208     TESTCASE( strcmp( buffer, "2147483647" ) == 0 );
209     TESTCASE( testprintf( buffer, 100, "%-010d", INT_MIN ) == 11 );
210     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
211     TESTCASE( testprintf( buffer, 100, "%-010d", INT_MAX ) == 10 );
212     TESTCASE( strcmp( buffer, "2147483647" ) == 0 );
213     TESTCASE( testprintf( buffer, 100, "%-011d", INT_MIN ) == 11 );
214     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
215     TESTCASE( testprintf( buffer, 100, "%-011d", INT_MAX ) == 11 );
216     TESTCASE( strcmp( buffer, "2147483647 " ) == 0 );
217     TESTCASE( testprintf( buffer, 100, "%-012d", INT_MIN ) == 12 );
218     TESTCASE( strcmp( buffer, "-2147483648 " ) == 0 );
219     TESTCASE( testprintf( buffer, 100, "%-012d", INT_MAX ) == 12 );
220     TESTCASE( strcmp( buffer, "2147483647  " ) == 0 );
221     TESTCASE( testprintf( buffer, 8, "%9d", INT_MAX ) == 10 );
222     TESTCASE( strcmp( buffer, "2147483" ) == 0 );
223     TESTCASE( testprintf( buffer, 8, "%9d", INT_MIN ) == 11 );
224     TESTCASE( strcmp( buffer, "-214748" ) == 0 );
225     TESTCASE( testprintf( buffer, 9, "%9d", INT_MAX ) == 10 );
226     TESTCASE( strcmp( buffer, "21474836" ) == 0 );
227     TESTCASE( testprintf( buffer, 9, "%9d", INT_MIN ) == 11 );
228     TESTCASE( strcmp( buffer, "-2147483" ) == 0 );
229     TESTCASE( testprintf( buffer, 10, "%9d", INT_MAX ) == 10 );
230     TESTCASE( strcmp( buffer, "214748364" ) == 0 );
231     TESTCASE( testprintf( buffer, 10, "%9d", INT_MIN ) == 11 );
232     TESTCASE( strcmp( buffer, "-21474836" ) == 0 );
233     TESTCASE( testprintf( buffer, 9, "%10d", INT_MAX ) == 10 );
234     TESTCASE( strcmp( buffer, "21474836" ) == 0 );
235     TESTCASE( testprintf( buffer, 9, "%10d", INT_MIN ) == 11 );
236     TESTCASE( strcmp( buffer, "-2147483" ) == 0 );
237     TESTCASE( testprintf( buffer, 10, "%10d", INT_MAX ) == 10 );
238     TESTCASE( strcmp( buffer, "214748364" ) == 0 );
239     TESTCASE( testprintf( buffer, 10, "%10d", INT_MIN ) == 11 );
240     TESTCASE( strcmp( buffer, "-21474836" ) == 0 );
241     TESTCASE( testprintf( buffer, 11, "%10d", INT_MAX ) == 10 );
242     TESTCASE( strcmp( buffer, "2147483647" ) == 0 );
243     TESTCASE( testprintf( buffer, 11, "%10d", INT_MIN ) == 11 );
244     TESTCASE( strcmp( buffer, "-214748364" ) == 0 );
245     TESTCASE( testprintf( buffer, 10, "%11d", INT_MAX ) == 11 );
246     TESTCASE( strcmp( buffer, " 21474836" ) == 0 );
247     TESTCASE( testprintf( buffer, 10, "%11d", INT_MIN ) == 11 );
248     TESTCASE( strcmp( buffer, "-21474836" ) == 0 );
249     TESTCASE( testprintf( buffer, 11, "%11d", INT_MAX ) == 11 );
250     TESTCASE( strcmp( buffer, " 214748364" ) == 0 );
251     TESTCASE( testprintf( buffer, 11, "%11d", INT_MIN ) == 11 );
252     TESTCASE( strcmp( buffer, "-214748364" ) == 0 );
253     TESTCASE( testprintf( buffer, 12, "%11d", INT_MAX ) == 11 );
254     TESTCASE( strcmp( buffer, " 2147483647" ) == 0 );
255     TESTCASE( testprintf( buffer, 12, "%11d", INT_MIN ) == 11 );
256     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
257     TESTCASE( testprintf( buffer, 11, "%12d", INT_MAX ) == 12 );
258     TESTCASE( strcmp( buffer, "  21474836" ) == 0 );
259     TESTCASE( testprintf( buffer, 11, "%12d", INT_MIN ) == 12 );
260     TESTCASE( strcmp( buffer, " -21474836" ) == 0 );
261     TESTCASE( testprintf( buffer, 12, "%12d", INT_MAX ) == 12 );
262     TESTCASE( strcmp( buffer, "  214748364" ) == 0 );
263     TESTCASE( testprintf( buffer, 12, "%12d", INT_MIN ) == 12 );
264     TESTCASE( strcmp( buffer, " -214748364" ) == 0 );
265     TESTCASE( testprintf( buffer, 13, "%12d", INT_MAX ) == 12 );
266     TESTCASE( strcmp( buffer, "  2147483647" ) == 0 );
267     TESTCASE( testprintf( buffer, 13, "%12d", INT_MIN ) == 12 );
268     TESTCASE( strcmp( buffer, " -2147483648" ) == 0 );
269     TESTCASE( testprintf( buffer, 100, "%030.20d", INT_MAX ) == 30 );
270     TESTCASE( strcmp( buffer, "          00000000002147483647" ) == 0 );
271     TESTCASE( testprintf( buffer, 100, "%.6x", UINT_MAX ) == 8 );
272     TESTCASE( strcmp( buffer, "ffffffff" ) == 0 );
273     TESTCASE( testprintf( buffer, 100, "%#6.3x", UINT_MAX ) == 10 );
274     TESTCASE( strcmp( buffer, "0xffffffff" ) == 0 );
275     TESTCASE( testprintf( buffer, 100, "%#3.6x", UINT_MAX ) == 10 );
276     TESTCASE( strcmp( buffer, "0xffffffff" ) == 0 );
277     TESTCASE( testprintf( buffer, 100, "%.6d", INT_MIN ) == 11 );
278     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
279     TESTCASE( testprintf( buffer, 100, "%6.3d", INT_MIN ) == 11 );
280     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
281     TESTCASE( testprintf( buffer, 100, "%3.6d", INT_MIN ) == 11 );
282     TESTCASE( strcmp( buffer, "-2147483648" ) == 0 );
283     TESTCASE( testprintf( buffer, 100, "%#0.6x", UINT_MAX ) == 10 );
284     TESTCASE( strcmp( buffer, "0xffffffff" ) == 0 );
285     TESTCASE( testprintf( buffer, 100, "%#06.3x", UINT_MAX ) == 10 );
286     TESTCASE( strcmp( buffer, "0xffffffff" ) == 0 );
287     TESTCASE( testprintf( buffer, 100, "%#03.6x", UINT_MAX ) == 10 );
288     TESTCASE( strcmp( buffer, "0xffffffff" ) == 0 );
289     TESTCASE( testprintf( buffer, 100, "%#0.6d", INT_MAX ) == 10 );
290     TESTCASE( strcmp( buffer, "2147483647" ) == 0 );
291     TESTCASE( testprintf( buffer, 100, "%#06.3d", INT_MAX ) == 10 );
292     TESTCASE( strcmp( buffer, "2147483647" ) == 0 );
293     TESTCASE( testprintf( buffer, 100, "%#03.6d", INT_MAX ) == 10 );
294     TESTCASE( strcmp( buffer, "2147483647" ) == 0 );
295     TESTCASE( testprintf( buffer, 100, "%#+.6d", INT_MAX ) == 11 );
296     TESTCASE( strcmp( buffer, "+2147483647" ) == 0 );
297     TESTCASE( testprintf( buffer, 100, "%#+6.3d", INT_MAX ) == 11 );
298     TESTCASE( strcmp( buffer, "+2147483647" ) == 0 );
299     TESTCASE( testprintf( buffer, 100, "%#+3.6d", INT_MAX ) == 11 );
300     TESTCASE( strcmp( buffer, "+2147483647" ) == 0 );
301     TESTCASE( testprintf( buffer, 100, "%+0.6d", INT_MAX ) == 11 );
302     TESTCASE( strcmp( buffer, "+2147483647" ) == 0 );
303     TESTCASE( testprintf( buffer, 100, "%+06.3d", INT_MAX ) == 11 );
304     TESTCASE( strcmp( buffer, "+2147483647" ) == 0 );
305     TESTCASE( testprintf( buffer, 100, "%+03.6d", INT_MAX ) == 11 );
306     TESTCASE( strcmp( buffer, "+2147483647" ) == 0 );
307     TESTCASE( testprintf( buffer, 100, "- %d", INT_MAX ) == 12 );
308     TESTCASE( strcmp( buffer, "- 2147483647" ) == 0 );
309     TESTCASE( testprintf( buffer, 100, "- %d %% %d", INT_MAX, INT_MIN ) == 26 );
310     TESTCASE( strcmp( buffer, "- 2147483647 % -2147483648" ) == 0 );
311     TESTCASE( testprintf( buffer, 100, "%c", 'x' ) == 1 );
312     TESTCASE( strcmp( buffer, "x" ) == 0 );
313     TESTCASE( testprintf( buffer, 100, "%s", "abcdef" ) == 6 );
314     TESTCASE( strcmp( buffer, "abcdef" ) == 0 );
315     TESTCASE( testprintf( buffer, 100, "%p", (void *)0xdeadbeef ) == 10 );
316     TESTCASE( strcmp( buffer, "0xdeadbeef" ) == 0 );
317     {
318         int val1, val2;
319         TESTCASE( testprintf( buffer, 100, "123456%n789%n", &val1, &val2 ) == 9 );
320         TESTCASE( strcmp( buffer, "123456789" ) == 0 );
321         TESTCASE( val1 == 6 );
322         TESTCASE( val2 == 9 );
323     }
324     return TEST_RESULTS;
325 }
326
327 #endif
328