msvcrt: Fixed floating point numbers printing when flags.Sign=' '.
[wine] / dlls / msvcrt / tests / printf.c
1 /*
2  * Conformance tests for *printf functions.
3  *
4  * Copyright 2002 Uwe Bonnes
5  * Copyright 2004 Aneurin Price
6  * Copyright 2005 Mike McCormack
7  *
8  * This library is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * This library is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with this library; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21  */
22
23 /* With Visual Studio >= 2005,  swprintf() takes an extra parameter unless
24  * the following macro is defined.
25  */
26 #define _CRT_NON_CONFORMING_SWPRINTFS
27  
28 #include <stdio.h>
29 #include <errno.h>
30
31 #include "windef.h"
32 #include "winbase.h"
33 #include "winnls.h"
34
35 #include "wine/test.h"
36
37 static int (__cdecl *p__vscprintf)(const char *format, __ms_va_list valist);
38 static int (__cdecl *p__vscwprintf)(const wchar_t *format, __ms_va_list valist);
39 static int (__cdecl *p__vsnwprintf_s)(wchar_t *str, size_t sizeOfBuffer,
40                                       size_t count, const wchar_t *format,
41                                       __ms_va_list valist);
42 static int (__cdecl *p__ecvt_s)(char *buffer, size_t length, double number,
43                                 int ndigits, int *decpt, int *sign);
44 static int (__cdecl *p__fcvt_s)(char *buffer, size_t length, double number,
45                                 int ndigits, int *decpt, int *sign);
46 static unsigned int (__cdecl *p__get_output_format)(void);
47 static int (__cdecl *p__vsprintf_p)(char*, size_t, const char*, __ms_va_list);
48 static int (__cdecl *p_vswprintf)(wchar_t *str, const wchar_t *format, __ms_va_list valist);
49 static int (__cdecl *p__vswprintf)(wchar_t *str, const wchar_t *format, __ms_va_list valist);
50 static int (__cdecl *p__vswprintf_l)(wchar_t *str, const wchar_t *format,
51                                      void *locale, __ms_va_list valist);
52 static int (__cdecl *p__vswprintf_c)(wchar_t *str, size_t size, const wchar_t *format,
53                                      __ms_va_list valist);
54 static int (__cdecl *p__vswprintf_c_l)(wchar_t *str, size_t size, const wchar_t *format,
55                                        void *locale, __ms_va_list valist);
56 static int (__cdecl *p__vswprintf_p_l)(wchar_t *str, size_t size, const wchar_t *format,
57                                        void *locale, __ms_va_list valist);
58
59 static void init( void )
60 {
61     HMODULE hmod = GetModuleHandleA("msvcrt.dll");
62
63     p__vscprintf = (void *)GetProcAddress(hmod, "_vscprintf");
64     p__vscwprintf = (void *)GetProcAddress(hmod, "_vscwprintf");
65     p__vsnwprintf_s = (void *)GetProcAddress(hmod, "_vsnwprintf_s");
66     p__ecvt_s = (void *)GetProcAddress(hmod, "_ecvt_s");
67     p__fcvt_s = (void *)GetProcAddress(hmod, "_fcvt_s");
68     p__get_output_format = (void *)GetProcAddress(hmod, "_get_output_format");
69     p__vsprintf_p = (void*)GetProcAddress(hmod, "_vsprintf_p");
70     p_vswprintf = (void*)GetProcAddress(hmod, "vswprintf");
71     p__vswprintf = (void*)GetProcAddress(hmod, "_vswprintf");
72     p__vswprintf_l = (void*)GetProcAddress(hmod, "_vswprintf_l");
73     p__vswprintf_c = (void*)GetProcAddress(hmod, "_vswprintf_c");
74     p__vswprintf_c_l = (void*)GetProcAddress(hmod, "_vswprintf_c_l");
75     p__vswprintf_p_l = (void*)GetProcAddress(hmod, "_vswprintf_p_l");
76 }
77
78 static void test_sprintf( void )
79 {
80     char buffer[100];
81     const char *format;
82     double pnumber=789456123;
83     int x, r;
84     WCHAR wide[] = { 'w','i','d','e',0};
85
86     format = "%+#23.15e";
87     r = sprintf(buffer,format,pnumber);
88     ok(!strcmp(buffer,"+7.894561230000000e+008"),"+#23.15e failed: '%s'\n", buffer);
89     ok( r==23, "return count wrong\n");
90
91     format = "%-#23.15e";
92     r = sprintf(buffer,format,pnumber);
93     ok(!strcmp(buffer,"7.894561230000000e+008 "),"-#23.15e failed: '%s'\n", buffer);
94     ok( r==23, "return count wrong\n");
95
96     format = "%#23.15e";
97     r = sprintf(buffer,format,pnumber);
98     ok(!strcmp(buffer," 7.894561230000000e+008"),"#23.15e failed: '%s'\n", buffer);
99     ok( r==23, "return count wrong\n");
100
101     format = "%#1.1g";
102     r = sprintf(buffer,format,pnumber);
103     ok(!strcmp(buffer,"8.e+008"),"#1.1g failed: '%s'\n", buffer);
104     ok( r==7, "return count wrong\n");
105
106     format = "%I64d";
107     r = sprintf(buffer,format,((ULONGLONG)0xffffffff)*0xffffffff);
108     ok(!strcmp(buffer,"-8589934591"),"Problem with long long\n");
109     ok( r==11, "return count wrong\n");
110
111     format = "%+8I64d";
112     r = sprintf(buffer,format,(LONGLONG)100);
113     ok(!strcmp(buffer,"    +100") && r==8,"+8I64d failed: '%s'\n", buffer);
114
115     format = "%+.8I64d";
116     r = sprintf(buffer,format,(LONGLONG)100);
117     ok(!strcmp(buffer,"+00000100") && r==9,"+.8I64d failed: '%s'\n", buffer);
118
119     format = "%+10.8I64d";
120     r = sprintf(buffer,format,(LONGLONG)100);
121     ok(!strcmp(buffer," +00000100") && r==10,"+10.8I64d failed: '%s'\n", buffer);
122     format = "%_1I64d";
123     r = sprintf(buffer,format,(LONGLONG)100);
124     ok(!strcmp(buffer,"_1I64d") && r==6,"_1I64d failed\n");
125
126     format = "%-1.5I64d";
127     r = sprintf(buffer,format,(LONGLONG)-100);
128     ok(!strcmp(buffer,"-00100") && r==6,"-1.5I64d failed: '%s'\n", buffer);
129
130     format = "%5I64d";
131     r = sprintf(buffer,format,(LONGLONG)100);
132     ok(!strcmp(buffer,"  100") && r==5,"5I64d failed: '%s'\n", buffer);
133
134     format = "%5I64d";
135     r = sprintf(buffer,format,(LONGLONG)-100);
136     ok(!strcmp(buffer," -100") && r==5,"5I64d failed: '%s'\n", buffer);
137
138     format = "%-5I64d";
139     r = sprintf(buffer,format,(LONGLONG)100);
140     ok(!strcmp(buffer,"100  ") && r==5,"-5I64d failed: '%s'\n", buffer);
141
142     format = "%-5I64d";
143     r = sprintf(buffer,format,(LONGLONG)-100);
144     ok(!strcmp(buffer,"-100 ") && r==5,"-5I64d failed: '%s'\n", buffer);
145
146     format = "%-.5I64d";
147     r = sprintf(buffer,format,(LONGLONG)100);
148     ok(!strcmp(buffer,"00100") && r==5,"-.5I64d failed: '%s'\n", buffer);
149
150     format = "%-.5I64d";
151     r = sprintf(buffer,format,(LONGLONG)-100);
152     ok(!strcmp(buffer,"-00100") && r==6,"-.5I64d failed: '%s'\n", buffer);
153
154     format = "%-8.5I64d";
155     r = sprintf(buffer,format,(LONGLONG)100);
156     ok(!strcmp(buffer,"00100   ") && r==8,"-8.5I64d failed: '%s'\n", buffer);
157
158     format = "%-8.5I64d";
159     r = sprintf(buffer,format,(LONGLONG)-100);
160     ok(!strcmp(buffer,"-00100  ") && r==8,"-8.5I64d failed: '%s'\n", buffer);
161
162     format = "%05I64d";
163     r = sprintf(buffer,format,(LONGLONG)100);
164     ok(!strcmp(buffer,"00100") && r==5,"05I64d failed: '%s'\n", buffer);
165
166     format = "%05I64d";
167     r = sprintf(buffer,format,(LONGLONG)-100);
168     ok(!strcmp(buffer,"-0100") && r==5,"05I64d failed: '%s'\n", buffer);
169
170     format = "% I64d";
171     r = sprintf(buffer,format,(LONGLONG)100);
172     ok(!strcmp(buffer," 100") && r==4,"' I64d' failed: '%s'\n", buffer);
173
174     format = "% I64d";
175     r = sprintf(buffer,format,(LONGLONG)-100);
176     ok(!strcmp(buffer,"-100") && r==4,"' I64d' failed: '%s'\n", buffer);
177
178     format = "% 5I64d";
179     r = sprintf(buffer,format,(LONGLONG)100);
180     ok(!strcmp(buffer,"  100") && r==5,"' 5I64d' failed: '%s'\n", buffer);
181
182     format = "% 5I64d";
183     r = sprintf(buffer,format,(LONGLONG)-100);
184     ok(!strcmp(buffer," -100") && r==5,"' 5I64d' failed: '%s'\n", buffer);
185
186     format = "% .5I64d";
187     r = sprintf(buffer,format,(LONGLONG)100);
188     ok(!strcmp(buffer," 00100") && r==6,"' .5I64d' failed: '%s'\n", buffer);
189
190     format = "% .5I64d";
191     r = sprintf(buffer,format,(LONGLONG)-100);
192     ok(!strcmp(buffer,"-00100") && r==6,"' .5I64d' failed: '%s'\n", buffer);
193
194     format = "% 8.5I64d";
195     r = sprintf(buffer,format,(LONGLONG)100);
196     ok(!strcmp(buffer,"   00100") && r==8,"' 8.5I64d' failed: '%s'\n", buffer);
197
198     format = "% 8.5I64d";
199     r = sprintf(buffer,format,(LONGLONG)-100);
200     ok(!strcmp(buffer,"  -00100") && r==8,"' 8.5I64d' failed: '%s'\n", buffer);
201
202     format = "%.0I64d";
203     r = sprintf(buffer,format,(LONGLONG)0);
204     ok(r==0,".0I64d failed: '%s'\n", buffer);
205
206     format = "%#+21.18I64x";
207     r = sprintf(buffer,format,(LONGLONG)-100);
208     ok(!strcmp(buffer," 0x00ffffffffffffff9c") && r==21,"#+21.18I64x failed: '%s'\n", buffer);
209
210     format = "%#.25I64o";
211     r = sprintf(buffer,format,(LONGLONG)-100);
212     ok(!strcmp(buffer,"0001777777777777777777634") && r==25,"#.25I64o failed: '%s'\n", buffer);
213
214     format = "%#+24.20I64o";
215     r = sprintf(buffer,format,(LONGLONG)-100);
216     ok(!strcmp(buffer," 01777777777777777777634") && r==24,"#+24.20I64o failed: '%s'\n", buffer);
217
218     format = "%#+18.21I64X";
219     r = sprintf(buffer,format,(LONGLONG)-100);
220     ok(!strcmp(buffer,"0X00000FFFFFFFFFFFFFF9C") && r==23,"#+18.21I64X failed: '%s '\n", buffer);
221
222     format = "%#+20.24I64o";
223     r = sprintf(buffer,format,(LONGLONG)-100);
224     ok(!strcmp(buffer,"001777777777777777777634") && r==24,"#+20.24I64o failed: '%s'\n", buffer);
225
226     format = "%#+25.22I64u";
227     r = sprintf(buffer,format,(LONGLONG)-1);
228     ok(!strcmp(buffer,"   0018446744073709551615") && r==25,"#+25.22I64u conversion failed: '%s'\n", buffer);
229
230     format = "%#+25.22I64u";
231     r = sprintf(buffer,format,(LONGLONG)-1);
232     ok(!strcmp(buffer,"   0018446744073709551615") && r==25,"#+25.22I64u failed: '%s'\n", buffer);
233
234     format = "%#+30.25I64u";
235     r = sprintf(buffer,format,(LONGLONG)-1);
236     ok(!strcmp(buffer,"     0000018446744073709551615") && r==30,"#+30.25I64u failed: '%s'\n", buffer);
237
238     format = "%+#25.22I64d";
239     r = sprintf(buffer,format,(LONGLONG)-1);
240     ok(!strcmp(buffer,"  -0000000000000000000001") && r==25,"+#25.22I64d failed: '%s'\n", buffer);
241
242     format = "%#-8.5I64o";
243     r = sprintf(buffer,format,(LONGLONG)100);
244     ok(!strcmp(buffer,"00144   ") && r==8,"-8.5I64o failed: '%s'\n", buffer);
245
246     format = "%#-+ 08.5I64d";
247     r = sprintf(buffer,format,(LONGLONG)100);
248     ok(!strcmp(buffer,"+00100  ") && r==8,"'#-+ 08.5I64d failed: '%s'\n", buffer);
249
250     format = "%#-+ 08.5I64d";
251     r = sprintf(buffer,format,(LONGLONG)100);
252     ok(!strcmp(buffer,"+00100  ") && r==8,"#-+ 08.5I64d failed: '%s'\n", buffer);
253
254     format = "%.80I64d";
255     r = sprintf(buffer,format,(LONGLONG)1);
256     ok(r==80,"%s format failed\n", format);
257
258     format = "% .80I64d";
259     r = sprintf(buffer,format,(LONGLONG)1);
260     ok(r==81,"%s format failed\n", format);
261
262     format = "% .80d";
263     r = sprintf(buffer,format,1);
264     ok(r==81,"%s format failed\n", format);
265
266     format = "%lld";
267     r = sprintf(buffer,format,((ULONGLONG)0xffffffff)*0xffffffff);
268     ok( r == 1 || r == 11, "return count wrong %d\n", r);
269     if (r == 11)  /* %ll works on Vista */
270         ok(!strcmp(buffer, "-8589934591"), "Problem with \"ll\" interpretation '%s'\n", buffer);
271     else
272         ok(!strcmp(buffer, "1"), "Problem with \"ll\" interpretation '%s'\n", buffer);
273
274     format = "%I";
275     r = sprintf(buffer,format,1);
276     ok(!strcmp(buffer, "I"), "Problem with \"I\" interpretation\n");
277     ok( r==1, "return count wrong\n");
278
279     format = "%I0d";
280     r = sprintf(buffer,format,1);
281     ok(!strcmp(buffer,"I0d"),"I0d failed\n");
282     ok( r==3, "return count wrong\n");
283
284     format = "%I32d";
285     r = sprintf(buffer,format,1);
286     if (r == 1)
287     {
288         ok(!strcmp(buffer,"1"),"I32d failed, got '%s'\n",buffer);
289     }
290     else
291     {
292         /* Older versions don't grok I32 format */
293         ok(r == 4 && !strcmp(buffer,"I32d"),"I32d failed, got '%s',%d\n",buffer,r);
294     }
295
296     format = "%I64D";
297     r = sprintf(buffer,format,(LONGLONG)-1);
298     ok(!strcmp(buffer,"D"),"I64D failed: %s\n",buffer);
299     ok( r==1, "return count wrong\n");
300
301     format = "% d";
302     r = sprintf(buffer,format,1);
303     ok(!strcmp(buffer, " 1"),"Problem with sign place-holder: '%s'\n",buffer);
304     ok( r==2, "return count wrong\n");
305
306     format = "%+ d";
307     r = sprintf(buffer,format,1);
308     ok(!strcmp(buffer, "+1"),"Problem with sign flags: '%s'\n",buffer);
309     ok( r==2, "return count wrong\n");
310
311     format = "%S";
312     r = sprintf(buffer,format,wide);
313     ok(!strcmp(buffer,"wide"),"Problem with wide string format\n");
314     ok( r==4, "return count wrong\n");
315
316     format = "%04c";
317     r = sprintf(buffer,format,'1');
318     ok(!strcmp(buffer,"0001"),"Character not zero-prefixed \"%s\"\n",buffer);
319     ok( r==4, "return count wrong\n");
320
321     format = "%-04c";
322     r = sprintf(buffer,format,'1');
323     ok(!strcmp(buffer,"1   "),"Character zero-padded and/or not left-adjusted \"%s\"\n",buffer);
324     ok( r==4, "return count wrong\n");
325
326     format = "%#012x";
327     r = sprintf(buffer,format,1);
328     ok(!strcmp(buffer,"0x0000000001"),"Hexadecimal zero-padded \"%s\"\n",buffer);
329
330     format = "%#04.8x";
331     r = sprintf(buffer,format,1);
332     ok(!strcmp(buffer,"0x00000001"), "Hexadecimal zero-padded precision \"%s\"\n",buffer);
333
334     format = "%#-08.2x";
335     r = sprintf(buffer,format,1);
336     ok(!strcmp(buffer,"0x01    "), "Hexadecimal zero-padded not left-adjusted \"%s\"\n",buffer);
337
338     format = "%#08o";
339     r = sprintf(buffer,format,1);
340     ok(!strcmp(buffer,"00000001"), "Octal zero-padded \"%s\"\n",buffer);
341
342     if (sizeof(void *) == 8)
343     {
344         format = "%p";
345         r = sprintf(buffer,format,(void *)57);
346         ok(!strcmp(buffer,"0000000000000039"),"Pointer formatted incorrectly \"%s\"\n",buffer);
347         ok( r==16, "return count wrong\n");
348
349         format = "%#020p";
350         r = sprintf(buffer,format,(void *)57);
351         ok(!strcmp(buffer,"  0X0000000000000039"),"Pointer formatted incorrectly\n");
352         ok( r==20, "return count wrong\n");
353
354         format = "%Fp";
355         r = sprintf(buffer,format,(void *)57);
356         ok(!strcmp(buffer,"0000000000000039"),"Pointer formatted incorrectly \"%s\"\n",buffer);
357         ok( r==16, "return count wrong\n");
358
359         format = "%#-020p";
360         r = sprintf(buffer,format,(void *)57);
361         ok(!strcmp(buffer,"0X0000000000000039  "),"Pointer formatted incorrectly\n");
362         ok( r==20, "return count wrong\n");
363     }
364     else
365     {
366         format = "%p";
367         r = sprintf(buffer,format,(void *)57);
368         ok(!strcmp(buffer,"00000039"),"Pointer formatted incorrectly \"%s\"\n",buffer);
369         ok( r==8, "return count wrong\n");
370
371         format = "%#012p";
372         r = sprintf(buffer,format,(void *)57);
373         ok(!strcmp(buffer,"  0X00000039"),"Pointer formatted incorrectly\n");
374         ok( r==12, "return count wrong\n");
375
376         format = "%Fp";
377         r = sprintf(buffer,format,(void *)57);
378         ok(!strcmp(buffer,"00000039"),"Pointer formatted incorrectly \"%s\"\n",buffer);
379         ok( r==8, "return count wrong\n");
380
381         format = "%#-012p";
382         r = sprintf(buffer,format,(void *)57);
383         ok(!strcmp(buffer,"0X00000039  "),"Pointer formatted incorrectly\n");
384         ok( r==12, "return count wrong\n");
385     }
386
387     format = "%04s";
388     r = sprintf(buffer,format,"foo");
389     ok(!strcmp(buffer,"0foo"),"String not zero-prefixed \"%s\"\n",buffer);
390     ok( r==4, "return count wrong\n");
391
392     format = "%.1s";
393     r = sprintf(buffer,format,"foo");
394     ok(!strcmp(buffer,"f"),"Precision ignored \"%s\"\n",buffer);
395     ok( r==1, "return count wrong\n");
396
397     format = "%.*s";
398     r = sprintf(buffer,format,1,"foo");
399     ok(!strcmp(buffer,"f"),"Precision ignored \"%s\"\n",buffer);
400     ok( r==1, "return count wrong\n");
401
402     format = "%*s";
403     r = sprintf(buffer,format,-5,"foo");
404     ok(!strcmp(buffer,"foo  "),"Negative field width ignored \"%s\"\n",buffer);
405     ok( r==5, "return count wrong\n");
406
407     format = "hello";
408     r = sprintf(buffer, format);
409     ok(!strcmp(buffer,"hello"), "failed\n");
410     ok( r==5, "return count wrong\n");
411
412     format = "%ws";
413     r = sprintf(buffer, format, wide);
414     ok(!strcmp(buffer,"wide"), "failed\n");
415     ok( r==4, "return count wrong\n");
416
417     format = "%-10ws";
418     r = sprintf(buffer, format, wide );
419     ok(!strcmp(buffer,"wide      "), "failed\n");
420     ok( r==10, "return count wrong\n");
421
422     format = "%10ws";
423     r = sprintf(buffer, format, wide );
424     ok(!strcmp(buffer,"      wide"), "failed\n");
425     ok( r==10, "return count wrong\n");
426
427     format = "%#+ -03whlls";
428     r = sprintf(buffer, format, wide );
429     ok(!strcmp(buffer,"wide"), "failed\n");
430     ok( r==4, "return count wrong\n");
431
432     format = "%w0s";
433     r = sprintf(buffer, format, wide );
434     ok(!strcmp(buffer,"0s"), "failed\n");
435     ok( r==2, "return count wrong\n");
436
437     format = "%w-s";
438     r = sprintf(buffer, format, wide );
439     ok(!strcmp(buffer,"-s"), "failed\n");
440     ok( r==2, "return count wrong\n");
441
442     format = "%ls";
443     r = sprintf(buffer, format, wide );
444     ok(!strcmp(buffer,"wide"), "failed\n");
445     ok( r==4, "return count wrong\n");
446
447     format = "%Ls";
448     r = sprintf(buffer, format, "not wide" );
449     ok(!strcmp(buffer,"not wide"), "failed\n");
450     ok( r==8, "return count wrong\n");
451
452     format = "%b";
453     r = sprintf(buffer, format);
454     ok(!strcmp(buffer,"b"), "failed\n");
455     ok( r==1, "return count wrong\n");
456
457     format = "%3c";
458     r = sprintf(buffer, format,'a');
459     ok(!strcmp(buffer,"  a"), "failed\n");
460     ok( r==3, "return count wrong\n");
461
462     format = "%3d";
463     r = sprintf(buffer, format,1234);
464     ok(!strcmp(buffer,"1234"), "failed\n");
465     ok( r==4, "return count wrong\n");
466
467     format = "%3h";
468     r = sprintf(buffer, format);
469     ok(!strcmp(buffer,""), "failed\n");
470     ok( r==0, "return count wrong\n");
471
472     format = "%j%k%m%q%r%t%v%y%z";
473     r = sprintf(buffer, format);
474     ok(!strcmp(buffer,"jkmqrtvyz"), "failed\n");
475     ok( r==9, "return count wrong\n");
476
477     format = "asdf%n";
478     x = 0;
479     r = sprintf(buffer, format, &x );
480     if (r == -1)
481     {
482         /* %n format is disabled by default on vista */
483         /* FIXME: should test with _set_printf_count_output */
484         ok(x == 0, "should not write to x: %d\n", x);
485     }
486     else
487     {
488         ok(x == 4, "should write to x: %d\n", x);
489         ok(!strcmp(buffer,"asdf"), "failed\n");
490         ok( r==4, "return count wrong: %d\n", r);
491     }
492
493     format = "%-1d";
494     r = sprintf(buffer, format,2);
495     ok(!strcmp(buffer,"2"), "failed\n");
496     ok( r==1, "return count wrong\n");
497
498     format = "%2.4f";
499     r = sprintf(buffer, format,8.6);
500     ok(!strcmp(buffer,"8.6000"), "failed\n");
501     ok( r==6, "return count wrong\n");
502
503     format = "%0f";
504     r = sprintf(buffer, format,0.6);
505     ok(!strcmp(buffer,"0.600000"), "failed\n");
506     ok( r==8, "return count wrong\n");
507
508     format = "%.0f";
509     r = sprintf(buffer, format,0.6);
510     ok(!strcmp(buffer,"1"), "failed\n");
511     ok( r==1, "return count wrong\n");
512
513     format = "%2.4e";
514     r = sprintf(buffer, format,8.6);
515     ok(!strcmp(buffer,"8.6000e+000"), "failed\n");
516     ok( r==11, "return count wrong\n");
517
518     format = "% 2.4e";
519     r = sprintf(buffer, format,8.6);
520     ok(!strcmp(buffer," 8.6000e+000"), "failed: %s\n", buffer);
521     ok( r==12, "return count wrong\n");
522
523     format = "% 014.4e";
524     r = sprintf(buffer, format,8.6);
525     ok(!strcmp(buffer," 008.6000e+000"), "failed: %s\n", buffer);
526     ok( r==14, "return count wrong\n");
527
528     format = "% 2.4e";
529     r = sprintf(buffer, format,-8.6);
530     ok(!strcmp(buffer,"-8.6000e+000"), "failed: %s\n", buffer);
531     ok( r==12, "return count wrong\n");
532
533     format = "%+2.4e";
534     r = sprintf(buffer, format,8.6);
535     ok(!strcmp(buffer,"+8.6000e+000"), "failed: %s\n", buffer);
536     ok( r==12, "return count wrong\n");
537
538     format = "%2.4g";
539     r = sprintf(buffer, format,8.6);
540     ok(!strcmp(buffer,"8.6"), "failed\n");
541     ok( r==3, "return count wrong\n");
542
543     format = "%-i";
544     r = sprintf(buffer, format,-1);
545     ok(!strcmp(buffer,"-1"), "failed\n");
546     ok( r==2, "return count wrong\n");
547
548     format = "%-i";
549     r = sprintf(buffer, format,1);
550     ok(!strcmp(buffer,"1"), "failed\n");
551     ok( r==1, "return count wrong\n");
552
553     format = "%+i";
554     r = sprintf(buffer, format,1);
555     ok(!strcmp(buffer,"+1"), "failed\n");
556     ok( r==2, "return count wrong\n");
557
558     format = "%o";
559     r = sprintf(buffer, format,10);
560     ok(!strcmp(buffer,"12"), "failed\n");
561     ok( r==2, "return count wrong\n");
562
563     format = "%p";
564     r = sprintf(buffer, format,0);
565     if (sizeof(void *) == 8)
566     {
567         ok(!strcmp(buffer,"0000000000000000"), "failed\n");
568         ok( r==16, "return count wrong\n");
569     }
570     else
571     {
572         ok(!strcmp(buffer,"00000000"), "failed\n");
573         ok( r==8, "return count wrong\n");
574     }
575
576     format = "%s";
577     r = sprintf(buffer, format,0);
578     ok(!strcmp(buffer,"(null)"), "failed\n");
579     ok( r==6, "return count wrong\n");
580
581     format = "%s";
582     r = sprintf(buffer, format,"%%%%");
583     ok(!strcmp(buffer,"%%%%"), "failed\n");
584     ok( r==4, "return count wrong\n");
585
586     format = "%u";
587     r = sprintf(buffer, format,-1);
588     ok(!strcmp(buffer,"4294967295"), "failed\n");
589     ok( r==10, "return count wrong\n");
590
591     format = "%w";
592     r = sprintf(buffer, format,-1);
593     ok(!strcmp(buffer,""), "failed\n");
594     ok( r==0, "return count wrong\n");
595
596     format = "%h";
597     r = sprintf(buffer, format,-1);
598     ok(!strcmp(buffer,""), "failed\n");
599     ok( r==0, "return count wrong\n");
600
601     format = "%z";
602     r = sprintf(buffer, format,-1);
603     ok(!strcmp(buffer,"z"), "failed\n");
604     ok( r==1, "return count wrong\n");
605
606     format = "%j";
607     r = sprintf(buffer, format,-1);
608     ok(!strcmp(buffer,"j"), "failed\n");
609     ok( r==1, "return count wrong\n");
610
611     format = "%F";
612     r = sprintf(buffer, format,-1);
613     ok(!strcmp(buffer,""), "failed\n");
614     ok( r==0, "return count wrong\n");
615
616     format = "%H";
617     r = sprintf(buffer, format,-1);
618     ok(!strcmp(buffer,"H"), "failed\n");
619     ok( r==1, "return count wrong\n");
620
621     format = "x%cx";
622     r = sprintf(buffer, format, 0x100+'X');
623     ok(!strcmp(buffer,"xXx"), "failed\n");
624     ok( r==3, "return count wrong\n");
625
626     format = "%%0";
627     r = sprintf(buffer, format);
628     ok(!strcmp(buffer,"%0"), "failed: \"%s\"\n", buffer);
629     ok( r==2, "return count wrong\n");
630
631     format = "%hx";
632     r = sprintf(buffer, format, 0x12345);
633     ok(!strcmp(buffer,"2345"), "failed \"%s\"\n", buffer);
634
635     format = "%hhx";
636     r = sprintf(buffer, format, 0x123);
637     ok(!strcmp(buffer,"123"), "failed: \"%s\"\n", buffer);
638     r = sprintf(buffer, format, 0x12345);
639     ok(!strcmp(buffer,"2345"), "failed \"%s\"\n", buffer);
640 }
641
642 static void test_swprintf( void )
643 {
644     wchar_t buffer[100];
645     const wchar_t I64d[] = {'%','I','6','4','d',0};
646     double pnumber=789456123;
647     const wchar_t TwentyThreePoint15e[]= {'%','+','#','2','3','.','1','5','e',0};
648     const wchar_t e008[] = {'e','+','0','0','8',0};
649     const wchar_t string_w[] = {'s','t','r','i','n','g',0};
650     const char string[] = "string";
651     const wchar_t S[]={'%','S',0};
652     const wchar_t hs[] = {'%', 'h', 's', 0};
653
654     swprintf(buffer,TwentyThreePoint15e,pnumber);
655     ok(wcsstr(buffer,e008) != 0,"Sprintf different\n");
656     swprintf(buffer,I64d,((ULONGLONG)0xffffffff)*0xffffffff);
657       ok(wcslen(buffer) == 11,"Problem with long long\n");
658     swprintf(buffer,S,string);
659       ok(wcslen(buffer) == 6,"Problem with \"%%S\" interpretation\n");
660    swprintf(buffer, hs, string);
661    ok( wcscmp(string_w,buffer) == 0, "swprintf failed with %%hs\n");
662 }
663
664 static void test_snprintf (void)
665 {
666     struct snprintf_test {
667         const char *format;
668         int expected;
669     };
670     /* Pre-2.1 libc behaviour, not C99 compliant. */
671     const struct snprintf_test tests[] = {{"short", 5},
672                                           {"justfit", 7},
673                                           {"justfits", 8},
674                                           {"muchlonger", -1}};
675     char buffer[8];
676     const int bufsiz = sizeof buffer;
677     unsigned int i;
678
679     for (i = 0; i < sizeof tests / sizeof tests[0]; i++) {
680         const char *fmt  = tests[i].format;
681         const int expect = tests[i].expected;
682         const int n      = _snprintf (buffer, bufsiz, fmt);
683         const int valid  = n < 0 ? bufsiz : (n == bufsiz ? n : n+1);
684
685         ok (n == expect, "\"%s\": expected %d, returned %d\n",
686             fmt, expect, n);
687         ok (!memcmp (fmt, buffer, valid),
688             "\"%s\": rendered \"%.*s\"\n", fmt, valid, buffer);
689     };
690 }
691
692 static void test_fprintf(void)
693 {
694     static char file_name[] = "fprintf.tst";
695     FILE *fp = fopen(file_name, "wb");
696     char buf[1024];
697     int ret;
698
699     ret = fprintf(fp, "simple test\n");
700     ok(ret == 12, "ret = %d\n", ret);
701     ret = ftell(fp);
702     ok(ret == 12, "ftell returned %d\n", ret);
703
704     ret = fprintf(fp, "contains%cnull\n", '\0');
705     ok(ret == 14, "ret = %d\n", ret);
706     ret = ftell(fp);
707     ok(ret == 26, "ftell returned %d\n", ret);
708
709     fclose(fp);
710
711     fp = fopen(file_name, "rb");
712     ret = fscanf(fp, "%[^\n] ", buf);
713     ok(ret == 1, "ret = %d\n", ret);
714     ret = ftell(fp);
715     ok(ret == 12, "ftell returned %d\n", ret);
716     ok(!strcmp(buf, "simple test"), "buf = %s\n", buf);
717
718     fgets(buf, sizeof(buf), fp);
719     ret = ftell(fp);
720     ok(ret == 26, "ret = %d\n", ret);
721     ok(!memcmp(buf, "contains\0null\n", 14), "buf = %s\n", buf);
722
723     fclose(fp);
724     unlink(file_name);
725 }
726
727 static void test_fcvt(void)
728 {
729     char *str;
730     int dec=100, sign=100;
731     
732     /* Numbers less than 1.0 with different precisions */
733     str = _fcvt(0.0001, 1, &dec, &sign );
734     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
735     ok( -3 == dec, "dec wrong %d\n", dec);
736     ok( 0 == sign, "sign wrong\n");
737
738     str = _fcvt(0.0001, -10, &dec, &sign );
739     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
740     ok( -3 == dec, "dec wrong %d\n", dec);
741     ok( 0 == sign, "sign wrong\n");
742
743     str = _fcvt(0.0001, 10, &dec, &sign );
744     ok( 0 == strcmp(str,"1000000"), "bad return '%s'\n", str);
745     ok( -3 == dec, "dec wrong %d\n", dec);
746     ok( 0 == sign, "sign wrong\n");
747
748     /* Basic sign test */
749     str = _fcvt(-111.0001, 5, &dec, &sign );
750     ok( 0 == strcmp(str,"11100010"), "bad return '%s'\n", str);
751     ok( 3 == dec, "dec wrong %d\n", dec);
752     ok( 1 == sign, "sign wrong\n");
753
754     str = _fcvt(111.0001, 5, &dec, &sign );
755     ok( 0 == strcmp(str,"11100010"), "bad return '%s'\n", str);
756     ok( 3 == dec, "dec wrong\n");
757     ok( 0 == sign, "sign wrong\n");
758
759     /* 0.0 with different precisions */
760     str = _fcvt(0.0, 5, &dec, &sign );
761     ok( 0 == strcmp(str,"00000"), "bad return '%s'\n", str);
762     ok( 0 == dec, "dec wrong %d\n", dec);
763     ok( 0 == sign, "sign wrong\n");
764
765     str = _fcvt(0.0, 0, &dec, &sign );
766     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
767     ok( 0 == dec, "dec wrong %d\n", dec);
768     ok( 0 == sign, "sign wrong\n");
769
770     str = _fcvt(0.0, -1, &dec, &sign );
771     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
772     ok( 0 == dec, "dec wrong %d\n", dec);
773     ok( 0 == sign, "sign wrong\n");
774
775     /* Numbers > 1.0 with 0 or -ve precision */
776     str = _fcvt(-123.0001, 0, &dec, &sign );
777     ok( 0 == strcmp(str,"123"), "bad return '%s'\n", str);
778     ok( 3 == dec, "dec wrong %d\n", dec);
779     ok( 1 == sign, "sign wrong\n");
780
781     str = _fcvt(-123.0001, -1, &dec, &sign );
782     ok( 0 == strcmp(str,"12"), "bad return '%s'\n", str);
783     ok( 3 == dec, "dec wrong %d\n", dec);
784     ok( 1 == sign, "sign wrong\n");
785
786     str = _fcvt(-123.0001, -2, &dec, &sign );
787     ok( 0 == strcmp(str,"1"), "bad return '%s'\n", str);
788     ok( 3 == dec, "dec wrong %d\n", dec);
789     ok( 1 == sign, "sign wrong\n");
790
791     str = _fcvt(-123.0001, -3, &dec, &sign );
792     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
793     ok( 3 == dec, "dec wrong %d\n", dec);
794     ok( 1 == sign, "sign wrong\n");
795
796     /* Numbers > 1.0, but with rounding at the point of precision */
797     str = _fcvt(99.99, 1, &dec, &sign );
798     ok( 0 == strcmp(str,"1000"), "bad return '%s'\n", str);
799     ok( 3 == dec, "dec wrong %d\n", dec);
800     ok( 0 == sign, "sign wrong\n");
801
802     /* Numbers < 1.0 where rounding occurs at the point of precision */
803     str = _fcvt(0.00636, 2, &dec, &sign );
804     ok( 0 == strcmp(str,"1"), "bad return '%s'\n", str);
805     ok( -1 == dec, "dec wrong %d\n", dec);
806     ok( 0 == sign, "sign wrong\n");
807
808     str = _fcvt(0.00636, 3, &dec, &sign );
809     ok( 0 == strcmp(str,"6"), "bad return '%s'\n", str);
810     ok( -2 == dec, "dec wrong %d\n", dec);
811     ok( 0 == sign, "sign wrong\n");
812
813     str = _fcvt(0.09999999996, 2, &dec, &sign );
814     ok( 0 == strcmp(str,"10"), "bad return '%s'\n", str);
815     ok( 0 == dec, "dec wrong %d\n", dec);
816     ok( 0 == sign, "sign wrong\n");
817
818     str = _fcvt(0.6, 0, &dec, &sign );
819     ok( 0 == strcmp(str,"1"), "bad return '%s'\n", str);
820     ok( 1 == dec, "dec wrong %d\n", dec);
821     ok( 0 == sign, "sign wrong\n");
822 }
823
824 /* Don't test nrdigits < 0, msvcrt on Win9x and NT4 will corrupt memory by
825  * writing outside allocated memory */
826 static struct {
827     double value;
828     int nrdigits;
829     const char *expstr_e;
830     const char *expstr_f;
831     int expdecpt_e;
832     int expdecpt_f;
833     int expsign;
834 } test_cvt_testcases[] = {
835     {          45.0,   2,        "45",           "4500",          2,      2,      0 },
836     /* Numbers less than 1.0 with different precisions */
837     {        0.0001,   1,         "1",               "",         -3,     -3,     0 },
838     {        0.0001,  10,"1000000000",        "1000000",         -3,     -3,     0 },
839     /* Basic sign test */
840     {     -111.0001,   5,     "11100",       "11100010",          3,      3,     1 },
841     {      111.0001,   5,     "11100",       "11100010",          3,      3,     0 },
842     /* big numbers with low precision */
843     {        3333.3,   2,        "33",         "333330",          4,      4,     0 },
844     {999999999999.9,   3,       "100","999999999999900",         13,     12,     0 },
845     /* 0.0 with different precisions */
846     {           0.0,   5,     "00000",          "00000",          0,      0,     0 },
847     {           0.0,   0,          "",               "",          0,      0,     0 },
848     {           0.0,  -1,          "",               "",          0,      0,     0 },
849     /* Numbers > 1.0 with 0 or -ve precision */
850     {     -123.0001,   0,          "",            "123",          3,      3,     1 },
851     {     -123.0001,  -1,          "",             "12",          3,      3,     1 },
852     {     -123.0001,  -2,          "",              "1",          3,      3,     1 },
853     {     -123.0001,  -3,          "",               "",          3,      3,     1 },
854     /* Numbers > 1.0, but with rounding at the point of precision */
855     {         99.99,   1,         "1",           "1000",          3,      3,     0 },
856     /* Numbers < 1.0 where rounding occurs at the point of precision */
857     {        0.0063,   2,        "63",              "1",         -2,     -1,     0 },
858     {        0.0063,   3,        "630",             "6",         -2,     -2,     0 },
859     { 0.09999999996,   2,        "10",             "10",          0,      0,     0 },
860     {           0.6,   1,         "6",              "6",          0,      0,     0 },
861     {           0.6,   0,          "",              "1",          1,      1,     0 },
862     {           0.4,   0,          "",               "",          0,      0,     0 },
863     {          0.49,   0,          "",               "",          0,      0,     0 },
864     {          0.51,   0,          "",              "1",          1,      1,     0 },
865     /* ask for ridiculous precision, ruin formatting this table */
866     {           1.0,  30, "100000000000000000000000000000",
867                       "1000000000000000000000000000000",          1,      1,      0},
868     {           123456789012345678901.0,  30, "123456789012345680000000000000",
869                       "123456789012345680000000000000000000000000000000000",         21,    21,      0},
870     /* end marker */
871     { 0, 0, "END"}
872 };
873
874 static void test_xcvt(void)
875 {
876     char *str;
877     int i, decpt, sign, err;
878
879     for( i = 0; strcmp( test_cvt_testcases[i].expstr_e, "END"); i++){
880         decpt = sign = 100;
881         str = _ecvt( test_cvt_testcases[i].value,
882                 test_cvt_testcases[i].nrdigits,
883                 &decpt,
884                 &sign);
885         ok( 0 == strncmp( str, test_cvt_testcases[i].expstr_e, 15),
886                "_ecvt() bad return, got \n'%s' expected \n'%s'\n", str,
887               test_cvt_testcases[i].expstr_e);
888         ok( decpt == test_cvt_testcases[i].expdecpt_e,
889                 "_ecvt() decimal point wrong, got %d expected %d\n", decpt,
890                 test_cvt_testcases[i].expdecpt_e);
891         ok( sign == test_cvt_testcases[i].expsign,
892                 "_ecvt() sign wrong, got %d expected %d\n", sign,
893                 test_cvt_testcases[i].expsign);
894     }
895     for( i = 0; strcmp( test_cvt_testcases[i].expstr_e, "END"); i++){
896         decpt = sign = 100;
897         str = _fcvt( test_cvt_testcases[i].value,
898                 test_cvt_testcases[i].nrdigits,
899                 &decpt,
900                 &sign);
901         ok( 0 == strncmp( str, test_cvt_testcases[i].expstr_f, 15),
902                "_fcvt() bad return, got \n'%s' expected \n'%s'\n", str,
903               test_cvt_testcases[i].expstr_f);
904         ok( decpt == test_cvt_testcases[i].expdecpt_f,
905                 "_fcvt() decimal point wrong, got %d expected %d\n", decpt,
906                 test_cvt_testcases[i].expdecpt_f);
907         ok( sign == test_cvt_testcases[i].expsign,
908                 "_fcvt() sign wrong, got %d expected %d\n", sign,
909                 test_cvt_testcases[i].expsign);
910     }
911
912     if (p__ecvt_s)
913     {
914         str = malloc(1024);
915         for( i = 0; strcmp( test_cvt_testcases[i].expstr_e, "END"); i++){
916             decpt = sign = 100;
917             err = p__ecvt_s(str, 1024, test_cvt_testcases[i].value, test_cvt_testcases[i].nrdigits, &decpt, &sign);
918             ok(err == 0, "_ecvt_s() failed with error code %d\n", err);
919             ok( 0 == strncmp( str, test_cvt_testcases[i].expstr_e, 15),
920                    "_ecvt_s() bad return, got \n'%s' expected \n'%s'\n", str,
921                   test_cvt_testcases[i].expstr_e);
922             ok( decpt == test_cvt_testcases[i].expdecpt_e,
923                     "_ecvt_s() decimal point wrong, got %d expected %d\n", decpt,
924                     test_cvt_testcases[i].expdecpt_e);
925             ok( sign == test_cvt_testcases[i].expsign,
926                     "_ecvt_s() sign wrong, got %d expected %d\n", sign,
927                     test_cvt_testcases[i].expsign);
928         }
929         free(str);
930     }
931     else
932         win_skip("_ecvt_s not available\n");
933
934     if (p__fcvt_s)
935     {
936         int i;
937
938         str = malloc(1024);
939
940         /* invalid arguments */
941         err = p__fcvt_s(NULL, 0, 0.0, 0, &i, &i);
942         ok(err == EINVAL, "got %d, expected EINVAL\n", err);
943
944         err = p__fcvt_s(str, 0, 0.0, 0, &i, &i);
945         ok(err == EINVAL, "got %d, expected EINVAL\n", err);
946
947         str[0] = ' ';
948         str[1] = 0;
949         err = p__fcvt_s(str, -1, 0.0, 0, &i, &i);
950         ok(err == 0, "got %d, expected 0\n", err);
951         ok(str[0] == 0, "got %c, expected 0\n", str[0]);
952         ok(str[1] == 0, "got %c, expected 0\n", str[1]);
953
954         err = p__fcvt_s(str, 1, 0.0, 0, NULL, &i);
955         ok(err == EINVAL, "got %d, expected EINVAL\n", err);
956
957         err = p__fcvt_s(str, 1, 0.0, 0, &i, NULL);
958         ok(err == EINVAL, "got %d, expected EINVAL\n", err);
959
960         for( i = 0; strcmp( test_cvt_testcases[i].expstr_e, "END"); i++){
961             decpt = sign = 100;
962             err = p__fcvt_s(str, 1024, test_cvt_testcases[i].value, test_cvt_testcases[i].nrdigits, &decpt, &sign);
963             ok(err == 0, "_fcvt_s() failed with error code %d\n", err);
964             ok( 0 == strncmp( str, test_cvt_testcases[i].expstr_f, 15),
965                    "_fcvt_s() bad return, got '%s' expected '%s'. test %d\n", str,
966                   test_cvt_testcases[i].expstr_f, i);
967             ok( decpt == test_cvt_testcases[i].expdecpt_f,
968                     "_fcvt_s() decimal point wrong, got %d expected %d\n", decpt,
969                     test_cvt_testcases[i].expdecpt_f);
970             ok( sign == test_cvt_testcases[i].expsign,
971                     "_fcvt_s() sign wrong, got %d expected %d\n", sign,
972                     test_cvt_testcases[i].expsign);
973         }
974         free(str);
975     }
976     else
977         win_skip("_fcvt_s not available\n");
978 }
979
980 static int __cdecl _vsnwprintf_wrapper(wchar_t *str, size_t len, const wchar_t *format, ...)
981 {
982     int ret;
983     __ms_va_list valist;
984     __ms_va_start(valist, format);
985     ret = _vsnwprintf(str, len, format, valist);
986     __ms_va_end(valist);
987     return ret;
988 }
989
990 static void test_vsnwprintf(void)
991 {
992     const wchar_t format[] = {'%','w','s','%','w','s','%','w','s',0};
993     const wchar_t one[]    = {'o','n','e',0};
994     const wchar_t two[]    = {'t','w','o',0};
995     const wchar_t three[]  = {'t','h','r','e','e',0};
996
997     int ret;
998     wchar_t str[32];
999     char buf[32];
1000
1001     ret = _vsnwprintf_wrapper( str, sizeof(str)/sizeof(str[0]), format, one, two, three );
1002
1003     ok( ret == 11, "got %d expected 11\n", ret );
1004     WideCharToMultiByte( CP_ACP, 0, str, -1, buf, sizeof(buf), NULL, NULL );
1005     ok( !strcmp(buf, "onetwothree"), "got %s expected 'onetwothree'\n", buf );
1006 }
1007
1008 static int __cdecl vswprintf_wrapper(wchar_t *str, const wchar_t *format, ...)
1009 {
1010     int ret;
1011     __ms_va_list valist;
1012     __ms_va_start(valist, format);
1013     ret = p_vswprintf(str, format, valist);
1014     __ms_va_end(valist);
1015     return ret;
1016 }
1017
1018 static int __cdecl _vswprintf_wrapper(wchar_t *str, const wchar_t *format, ...)
1019 {
1020     int ret;
1021     __ms_va_list valist;
1022     __ms_va_start(valist, format);
1023     ret = p__vswprintf(str, format, valist);
1024     __ms_va_end(valist);
1025     return ret;
1026 }
1027
1028 static int __cdecl _vswprintf_l_wrapper(wchar_t *str, const wchar_t *format, void *locale, ...)
1029 {
1030     int ret;
1031     __ms_va_list valist;
1032     __ms_va_start(valist, locale);
1033     ret = p__vswprintf_l(str, format, locale, valist);
1034     __ms_va_end(valist);
1035     return ret;
1036 }
1037
1038 static int __cdecl _vswprintf_c_wrapper(wchar_t *str, size_t size, const wchar_t *format, ...)
1039 {
1040     int ret;
1041     __ms_va_list valist;
1042     __ms_va_start(valist, format);
1043     ret = p__vswprintf_c(str, size, format, valist);
1044     __ms_va_end(valist);
1045     return ret;
1046 }
1047
1048 static int __cdecl _vswprintf_c_l_wrapper(wchar_t *str, size_t size, const wchar_t *format, void *locale, ...)
1049 {
1050     int ret;
1051     __ms_va_list valist;
1052     __ms_va_start(valist, locale);
1053     ret = p__vswprintf_c_l(str, size, format, locale, valist);
1054     __ms_va_end(valist);
1055     return ret;
1056 }
1057
1058 static int __cdecl _vswprintf_p_l_wrapper(wchar_t *str, size_t size, const wchar_t *format, void *locale, ...)
1059 {
1060     int ret;
1061     __ms_va_list valist;
1062     __ms_va_start(valist, locale);
1063     ret = p__vswprintf_p_l(str, size, format, locale, valist);
1064     __ms_va_end(valist);
1065     return ret;
1066 }
1067
1068 static void test_vswprintf(void)
1069 {
1070     const wchar_t format[] = {'%','s',' ','%','d',0};
1071     const wchar_t number[] = {'n','u','m','b','e','r',0};
1072     const wchar_t out[] = {'n','u','m','b','e','r',' ','1','2','3',0};
1073     wchar_t buf[20];
1074
1075     int ret;
1076
1077     if (!p_vswprintf || !p__vswprintf || !p__vswprintf_l ||!p__vswprintf_c
1078             || !p__vswprintf_c_l || !p__vswprintf_p_l)
1079     {
1080         win_skip("_vswprintf or vswprintf not available\n");
1081         return;
1082     }
1083
1084     ret = vswprintf_wrapper(buf, format, number, 123);
1085     ok(ret == 10, "got %d, expected 10\n", ret);
1086     ok(!memcmp(buf, out, sizeof(out)), "buf = %s\n", wine_dbgstr_w(buf));
1087
1088     memset(buf, 0, sizeof(buf));
1089     ret = _vswprintf_wrapper(buf, format, number, 123);
1090     ok(ret == 10, "got %d, expected 10\n", ret);
1091     ok(!memcmp(buf, out, sizeof(out)), "buf = %s\n", wine_dbgstr_w(buf));
1092
1093     memset(buf, 0, sizeof(buf));
1094     ret = _vswprintf_l_wrapper(buf, format, NULL, number, 123);
1095     ok(ret == 10, "got %d, expected 10\n", ret);
1096     ok(!memcmp(buf, out, sizeof(out)), "buf = %s\n", wine_dbgstr_w(buf));
1097
1098     memset(buf, 0, sizeof(buf));
1099     ret = _vswprintf_c_wrapper(buf, 20, format, number, 123);
1100     ok(ret == 10, "got %d, expected 10\n", ret);
1101     ok(!memcmp(buf, out, sizeof(out)), "buf = %s\n", wine_dbgstr_w(buf));
1102
1103     memset(buf, 0, sizeof(buf));
1104     ret = _vswprintf_c_l_wrapper(buf, 20, format, NULL, number, 123);
1105     ok(ret == 10, "got %d, expected 10\n", ret);
1106     ok(!memcmp(buf, out, sizeof(out)), "buf = %s\n", wine_dbgstr_w(buf));
1107
1108     memset(buf, 0, sizeof(buf));
1109     ret = _vswprintf_p_l_wrapper(buf, 20, format, NULL, number, 123);
1110     ok(ret == 10, "got %d, expected 10\n", ret);
1111     ok(!memcmp(buf, out, sizeof(out)), "buf = %s\n", wine_dbgstr_w(buf));
1112 }
1113
1114 static int __cdecl _vscprintf_wrapper(const char *format, ...)
1115 {
1116     int ret;
1117     __ms_va_list valist;
1118     __ms_va_start(valist, format);
1119     ret = p__vscprintf(format, valist);
1120     __ms_va_end(valist);
1121     return ret;
1122 }
1123
1124 static void test_vscprintf(void)
1125 {
1126     int ret;
1127
1128     if (!p__vscprintf)
1129     {
1130        win_skip("_vscprintf not available\n");
1131        return;
1132     }
1133
1134     ret = _vscprintf_wrapper( "%s %d", "number", 1 );
1135     ok( ret == 8, "got %d expected 8\n", ret );
1136 }
1137
1138 static int __cdecl _vscwprintf_wrapper(const wchar_t *format, ...)
1139 {
1140     int ret;
1141     __ms_va_list valist;
1142     __ms_va_start(valist, format);
1143     ret = p__vscwprintf(format, valist);
1144     __ms_va_end(valist);
1145     return ret;
1146 }
1147
1148 static void test_vscwprintf(void)
1149 {
1150     const wchar_t format[] = {'%','s',' ','%','d',0};
1151     const wchar_t number[] = {'n','u','m','b','e','r',0};
1152
1153     int ret;
1154
1155     if (!p__vscwprintf)
1156     {
1157         win_skip("_vscwprintf not available\n");
1158         return;
1159     }
1160
1161     ret = _vscwprintf_wrapper( format, number, 1 );
1162     ok( ret == 8, "got %d expected 8\n", ret );
1163 }
1164
1165 static int __cdecl _vsnwprintf_s_wrapper(wchar_t *str, size_t sizeOfBuffer,
1166                                  size_t count, const wchar_t *format, ...)
1167 {
1168     int ret;
1169     __ms_va_list valist;
1170     __ms_va_start(valist, format);
1171     ret = p__vsnwprintf_s(str, sizeOfBuffer, count, format, valist);
1172     __ms_va_end(valist);
1173     return ret;
1174 }
1175
1176 static void test_vsnwprintf_s(void)
1177 {
1178     const wchar_t format[] = { 'A','B','%','u','C',0 };
1179     const wchar_t out7[] = { 'A','B','1','2','3','C',0 };
1180     const wchar_t out6[] = { 'A','B','1','2','3',0 };
1181     const wchar_t out2[] = { 'A',0 };
1182     const wchar_t out1[] = { 0 };
1183     wchar_t buffer[14] = { 0 };
1184     int exp, got;
1185
1186     if (!p__vsnwprintf_s)
1187     {
1188         win_skip("_vsnwprintf_s not available\n");
1189         return;
1190     }
1191
1192     /* Enough room. */
1193     exp = wcslen(out7);
1194
1195     got = _vsnwprintf_s_wrapper(buffer, 14, _TRUNCATE, format, 123);
1196     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
1197     ok( !wcscmp(out7, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
1198
1199     got = _vsnwprintf_s_wrapper(buffer, 12, _TRUNCATE, format, 123);
1200     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
1201     ok( !wcscmp(out7, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
1202
1203     got = _vsnwprintf_s_wrapper(buffer, 7, _TRUNCATE, format, 123);
1204     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
1205     ok( !wcscmp(out7, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
1206
1207     /* Not enough room. */
1208     exp = -1;
1209
1210     got = _vsnwprintf_s_wrapper(buffer, 6, _TRUNCATE, format, 123);
1211     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
1212     ok( !wcscmp(out6, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
1213
1214     got = _vsnwprintf_s_wrapper(buffer, 2, _TRUNCATE, format, 123);
1215     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
1216     ok( !wcscmp(out2, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
1217
1218     got = _vsnwprintf_s_wrapper(buffer, 1, _TRUNCATE, format, 123);
1219     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
1220     ok( !wcscmp(out1, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
1221 }
1222
1223 static int __cdecl _vsprintf_p_wrapper(char *str, size_t sizeOfBuffer,
1224                                  const char *format, ...)
1225 {
1226     int ret;
1227     __ms_va_list valist;
1228     __ms_va_start(valist, format);
1229     ret = p__vsprintf_p(str, sizeOfBuffer, format, valist);
1230     __ms_va_end(valist);
1231     return ret;
1232 }
1233
1234 static void test_vsprintf_p(void)
1235 {
1236     char buf[1024];
1237     int ret;
1238
1239     if(!p__vsprintf_p) {
1240         win_skip("vsprintf_p not available\n");
1241         return;
1242     }
1243
1244     ret = _vsprintf_p_wrapper(buf, sizeof(buf), "%s %d", "test", 1234);
1245     ok(ret == 9, "ret = %d\n", ret);
1246     ok(!memcmp(buf, "test 1234", 10), "buf = %s\n", buf);
1247
1248     ret = _vsprintf_p_wrapper(buf, sizeof(buf), "%1$d", 1234, "additional param");
1249     ok(ret == 4, "ret = %d\n", ret);
1250     ok(!memcmp(buf, "1234", 5), "buf = %s\n", buf);
1251
1252     ret = _vsprintf_p_wrapper(buf, sizeof(buf), "%2$s %1$d", 1234, "test");
1253     ok(ret == 9, "ret = %d\n", ret);
1254     ok(!memcmp(buf, "test 1234", 10), "buf = %s\n", buf);
1255
1256     ret = _vsprintf_p_wrapper(buf, sizeof(buf), "%2$*3$s %2$.*1$s", 2, "test", 3);
1257     ok(ret == 7, "ret = %d\n", ret);
1258     ok(!memcmp(buf, "test te", 8), "buf = %s\n", buf);
1259
1260     /* Following test invokes invalid parameter handler */
1261     /* ret = _vsprintf_p_wrapper(buf, sizeof(buf), "%d %1$d", 1234); */
1262 }
1263
1264 static void test__get_output_format(void)
1265 {
1266     unsigned int ret;
1267
1268     if (!p__get_output_format)
1269     {
1270         win_skip("_get_output_format not available\n");
1271         return;
1272     }
1273
1274     ret = p__get_output_format();
1275     ok(ret == 0, "got %d\n", ret);
1276 }
1277
1278 START_TEST(printf)
1279 {
1280     init();
1281
1282     test_sprintf();
1283     test_swprintf();
1284     test_snprintf();
1285     test_fprintf();
1286     test_fcvt();
1287     test_xcvt();
1288     test_vsnwprintf();
1289     test_vscprintf();
1290     test_vscwprintf();
1291     test_vswprintf();
1292     test_vsnwprintf_s();
1293     test_vsprintf_p();
1294     test__get_output_format();
1295 }