msvcrt/tests: Add _ecvt_s tests.
[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
30 #include "windef.h"
31 #include "winbase.h"
32 #include "winnls.h"
33
34 #include "wine/test.h"
35
36 static int (__cdecl *p__vscprintf)(const char *format, __ms_va_list valist);
37 static int (__cdecl *p__vscwprintf)(const wchar_t *format, __ms_va_list valist);
38 static int (__cdecl *p__vsnwprintf_s)(wchar_t *str, size_t sizeOfBuffer,
39                                       size_t count, const wchar_t *format,
40                                       __ms_va_list valist);
41 static int (__cdecl *p__ecvt_s)(char *buffer, size_t length, double number,
42                                 int ndigits, int *decpt, int *sign);
43
44 static void init( void )
45 {
46     HMODULE hmod = GetModuleHandleA("msvcrt.dll");
47
48     p__vscprintf = (void *)GetProcAddress(hmod, "_vscprintf");
49     p__vscwprintf = (void *)GetProcAddress(hmod, "_vscwprintf");
50     p__vsnwprintf_s = (void *)GetProcAddress(hmod, "_vsnwprintf_s");
51     p__ecvt_s = (void *)GetProcAddress(hmod, "_ecvt_s");
52 }
53
54 static void test_sprintf( void )
55 {
56     char buffer[100];
57     const char *format;
58     double pnumber=789456123;
59     int x, r;
60     WCHAR wide[] = { 'w','i','d','e',0};
61
62     format = "%+#23.15e";
63     r = sprintf(buffer,format,pnumber);
64     ok(!strcmp(buffer,"+7.894561230000000e+008"),"+#23.15e failed: '%s'\n", buffer);
65     ok( r==23, "return count wrong\n");
66
67     format = "%-#23.15e";
68     r = sprintf(buffer,format,pnumber);
69     ok(!strcmp(buffer,"7.894561230000000e+008 "),"-#23.15e failed: '%s'\n", buffer);
70     ok( r==23, "return count wrong\n");
71
72     format = "%#23.15e";
73     r = sprintf(buffer,format,pnumber);
74     ok(!strcmp(buffer," 7.894561230000000e+008"),"#23.15e failed: '%s'\n", buffer);
75     ok( r==23, "return count wrong\n");
76
77     format = "%#1.1g";
78     r = sprintf(buffer,format,pnumber);
79     ok(!strcmp(buffer,"8.e+008"),"#1.1g failed: '%s'\n", buffer);
80     ok( r==7, "return count wrong\n");
81
82     format = "%I64d";
83     r = sprintf(buffer,format,((ULONGLONG)0xffffffff)*0xffffffff);
84     ok(!strcmp(buffer,"-8589934591"),"Problem with long long\n");
85     ok( r==11, "return count wrong\n");
86
87     format = "%+8I64d";
88     r = sprintf(buffer,format,(LONGLONG)100);
89     ok(!strcmp(buffer,"    +100") && r==8,"+8I64d failed: '%s'\n", buffer);
90
91     format = "%+.8I64d";
92     r = sprintf(buffer,format,(LONGLONG)100);
93     ok(!strcmp(buffer,"+00000100") && r==9,"+.8I64d failed: '%s'\n", buffer);
94
95     format = "%+10.8I64d";
96     r = sprintf(buffer,format,(LONGLONG)100);
97     ok(!strcmp(buffer," +00000100") && r==10,"+10.8I64d failed: '%s'\n", buffer);
98     format = "%_1I64d";
99     r = sprintf(buffer,format,(LONGLONG)100);
100     ok(!strcmp(buffer,"_1I64d") && r==6,"_1I64d failed\n");
101
102     format = "%-1.5I64d";
103     r = sprintf(buffer,format,(LONGLONG)-100);
104     ok(!strcmp(buffer,"-00100") && r==6,"-1.5I64d failed: '%s'\n", buffer);
105
106     format = "%5I64d";
107     r = sprintf(buffer,format,(LONGLONG)100);
108     ok(!strcmp(buffer,"  100") && r==5,"5I64d failed: '%s'\n", buffer);
109
110     format = "%5I64d";
111     r = sprintf(buffer,format,(LONGLONG)-100);
112     ok(!strcmp(buffer," -100") && r==5,"5I64d failed: '%s'\n", buffer);
113
114     format = "%-5I64d";
115     r = sprintf(buffer,format,(LONGLONG)100);
116     ok(!strcmp(buffer,"100  ") && r==5,"-5I64d failed: '%s'\n", buffer);
117
118     format = "%-5I64d";
119     r = sprintf(buffer,format,(LONGLONG)-100);
120     ok(!strcmp(buffer,"-100 ") && r==5,"-5I64d failed: '%s'\n", buffer);
121
122     format = "%-.5I64d";
123     r = sprintf(buffer,format,(LONGLONG)100);
124     ok(!strcmp(buffer,"00100") && r==5,"-.5I64d failed: '%s'\n", buffer);
125
126     format = "%-.5I64d";
127     r = sprintf(buffer,format,(LONGLONG)-100);
128     ok(!strcmp(buffer,"-00100") && r==6,"-.5I64d failed: '%s'\n", buffer);
129
130     format = "%-8.5I64d";
131     r = sprintf(buffer,format,(LONGLONG)100);
132     ok(!strcmp(buffer,"00100   ") && r==8,"-8.5I64d failed: '%s'\n", buffer);
133
134     format = "%-8.5I64d";
135     r = sprintf(buffer,format,(LONGLONG)-100);
136     ok(!strcmp(buffer,"-00100  ") && r==8,"-8.5I64d failed: '%s'\n", buffer);
137
138     format = "%05I64d";
139     r = sprintf(buffer,format,(LONGLONG)100);
140     ok(!strcmp(buffer,"00100") && r==5,"05I64d failed: '%s'\n", buffer);
141
142     format = "%05I64d";
143     r = sprintf(buffer,format,(LONGLONG)-100);
144     ok(!strcmp(buffer,"-0100") && r==5,"05I64d failed: '%s'\n", buffer);
145
146     format = "% I64d";
147     r = sprintf(buffer,format,(LONGLONG)100);
148     ok(!strcmp(buffer," 100") && r==4,"' I64d' failed: '%s'\n", buffer);
149
150     format = "% I64d";
151     r = sprintf(buffer,format,(LONGLONG)-100);
152     ok(!strcmp(buffer,"-100") && r==4,"' I64d' failed: '%s'\n", buffer);
153
154     format = "% 5I64d";
155     r = sprintf(buffer,format,(LONGLONG)100);
156     ok(!strcmp(buffer,"  100") && r==5,"' 5I64d' failed: '%s'\n", buffer);
157
158     format = "% 5I64d";
159     r = sprintf(buffer,format,(LONGLONG)-100);
160     ok(!strcmp(buffer," -100") && r==5,"' 5I64d' failed: '%s'\n", buffer);
161
162     format = "% .5I64d";
163     r = sprintf(buffer,format,(LONGLONG)100);
164     ok(!strcmp(buffer," 00100") && r==6,"' .5I64d' failed: '%s'\n", buffer);
165
166     format = "% .5I64d";
167     r = sprintf(buffer,format,(LONGLONG)-100);
168     ok(!strcmp(buffer,"-00100") && r==6,"' .5I64d' failed: '%s'\n", buffer);
169
170     format = "% 8.5I64d";
171     r = sprintf(buffer,format,(LONGLONG)100);
172     ok(!strcmp(buffer,"   00100") && r==8,"' 8.5I64d' failed: '%s'\n", buffer);
173
174     format = "% 8.5I64d";
175     r = sprintf(buffer,format,(LONGLONG)-100);
176     ok(!strcmp(buffer,"  -00100") && r==8,"' 8.5I64d' failed: '%s'\n", buffer);
177
178     format = "%.0I64d";
179     r = sprintf(buffer,format,(LONGLONG)0);
180     ok(r==0,".0I64d failed: '%s'\n", buffer);
181
182     format = "%#+21.18I64x";
183     r = sprintf(buffer,format,(LONGLONG)-100);
184     ok(!strcmp(buffer," 0x00ffffffffffffff9c") && r==21,"#+21.18I64x failed: '%s'\n", buffer);
185
186     format = "%#.25I64o";
187     r = sprintf(buffer,format,(LONGLONG)-100);
188     ok(!strcmp(buffer,"0001777777777777777777634") && r==25,"#.25I64o failed: '%s'\n", buffer);
189
190     format = "%#+24.20I64o";
191     r = sprintf(buffer,format,(LONGLONG)-100);
192     ok(!strcmp(buffer," 01777777777777777777634") && r==24,"#+24.20I64o failed: '%s'\n", buffer);
193
194     format = "%#+18.21I64X";
195     r = sprintf(buffer,format,(LONGLONG)-100);
196     ok(!strcmp(buffer,"0X00000FFFFFFFFFFFFFF9C") && r==23,"#+18.21I64X failed: '%s '\n", buffer);
197
198     format = "%#+20.24I64o";
199     r = sprintf(buffer,format,(LONGLONG)-100);
200     ok(!strcmp(buffer,"001777777777777777777634") && r==24,"#+20.24I64o failed: '%s'\n", buffer);
201
202     format = "%#+25.22I64u";
203     r = sprintf(buffer,format,(LONGLONG)-1);
204     ok(!strcmp(buffer,"   0018446744073709551615") && r==25,"#+25.22I64u conversion failed: '%s'\n", buffer);
205
206     format = "%#+25.22I64u";
207     r = sprintf(buffer,format,(LONGLONG)-1);
208     ok(!strcmp(buffer,"   0018446744073709551615") && r==25,"#+25.22I64u failed: '%s'\n", buffer);
209
210     format = "%#+30.25I64u";
211     r = sprintf(buffer,format,(LONGLONG)-1);
212     ok(!strcmp(buffer,"     0000018446744073709551615") && r==30,"#+30.25I64u failed: '%s'\n", buffer);
213
214     format = "%+#25.22I64d";
215     r = sprintf(buffer,format,(LONGLONG)-1);
216     ok(!strcmp(buffer,"  -0000000000000000000001") && r==25,"+#25.22I64d failed: '%s'\n", buffer);
217
218     format = "%#-8.5I64o";
219     r = sprintf(buffer,format,(LONGLONG)100);
220     ok(!strcmp(buffer,"00144   ") && r==8,"-8.5I64o failed: '%s'\n", buffer);
221
222     format = "%#-+ 08.5I64d";
223     r = sprintf(buffer,format,(LONGLONG)100);
224     ok(!strcmp(buffer,"+00100  ") && r==8,"'#-+ 08.5I64d failed: '%s'\n", buffer);
225
226     format = "%#-+ 08.5I64d";
227     r = sprintf(buffer,format,(LONGLONG)100);
228     ok(!strcmp(buffer,"+00100  ") && r==8,"#-+ 08.5I64d failed: '%s'\n", buffer);
229
230     format = "%.80I64d";
231     r = sprintf(buffer,format,(LONGLONG)1);
232     ok(r==80,"%s format failed\n", format);
233
234     format = "% .80I64d";
235     r = sprintf(buffer,format,(LONGLONG)1);
236     ok(r==81,"%s format failed\n", format);
237
238     format = "% .80d";
239     r = sprintf(buffer,format,1);
240     ok(r==81,"%s format failed\n", format);
241
242     format = "%lld";
243     r = sprintf(buffer,format,((ULONGLONG)0xffffffff)*0xffffffff);
244     ok( r == 1 || r == 11, "return count wrong %d\n", r);
245     if (r == 11)  /* %ll works on Vista */
246         ok(!strcmp(buffer, "-8589934591"), "Problem with \"ll\" interpretation '%s'\n", buffer);
247     else
248         ok(!strcmp(buffer, "1"), "Problem with \"ll\" interpretation '%s'\n", buffer);
249
250     format = "%I";
251     r = sprintf(buffer,format,1);
252     ok(!strcmp(buffer, "I"), "Problem with \"I\" interpretation\n");
253     ok( r==1, "return count wrong\n");
254
255     format = "%I0d";
256     r = sprintf(buffer,format,1);
257     ok(!strcmp(buffer,"I0d"),"I0d failed\n");
258     ok( r==3, "return count wrong\n");
259
260     format = "%I32d";
261     r = sprintf(buffer,format,1);
262     if (r == 1)
263     {
264         ok(!strcmp(buffer,"1"),"I32d failed, got '%s'\n",buffer);
265     }
266     else
267     {
268         /* Older versions don't grok I32 format */
269         ok(r == 4 && !strcmp(buffer,"I32d"),"I32d failed, got '%s',%d\n",buffer,r);
270     }
271
272     format = "%I64D";
273     r = sprintf(buffer,format,(LONGLONG)-1);
274     ok(!strcmp(buffer,"D"),"I64D failed: %s\n",buffer);
275     ok( r==1, "return count wrong\n");
276
277     format = "% d";
278     r = sprintf(buffer,format,1);
279     ok(!strcmp(buffer, " 1"),"Problem with sign place-holder: '%s'\n",buffer);
280     ok( r==2, "return count wrong\n");
281
282     format = "%+ d";
283     r = sprintf(buffer,format,1);
284     ok(!strcmp(buffer, "+1"),"Problem with sign flags: '%s'\n",buffer);
285     ok( r==2, "return count wrong\n");
286
287     format = "%S";
288     r = sprintf(buffer,format,wide);
289     ok(!strcmp(buffer,"wide"),"Problem with wide string format\n");
290     ok( r==4, "return count wrong\n");
291
292     format = "%04c";
293     r = sprintf(buffer,format,'1');
294     ok(!strcmp(buffer,"0001"),"Character not zero-prefixed \"%s\"\n",buffer);
295     ok( r==4, "return count wrong\n");
296
297     format = "%-04c";
298     r = sprintf(buffer,format,'1');
299     ok(!strcmp(buffer,"1   "),"Character zero-padded and/or not left-adjusted \"%s\"\n",buffer);
300     ok( r==4, "return count wrong\n");
301
302     if (sizeof(void *) == 8)
303     {
304         format = "%p";
305         r = sprintf(buffer,format,(void *)57);
306         ok(!strcmp(buffer,"0000000000000039"),"Pointer formatted incorrectly \"%s\"\n",buffer);
307         ok( r==16, "return count wrong\n");
308
309         format = "%#020p";
310         r = sprintf(buffer,format,(void *)57);
311         ok(!strcmp(buffer,"  0X0000000000000039"),"Pointer formatted incorrectly\n");
312         ok( r==20, "return count wrong\n");
313
314         format = "%Fp";
315         r = sprintf(buffer,format,(void *)57);
316         ok(!strcmp(buffer,"0000000000000039"),"Pointer formatted incorrectly \"%s\"\n",buffer);
317         ok( r==16, "return count wrong\n");
318
319         format = "%#-020p";
320         r = sprintf(buffer,format,(void *)57);
321         ok(!strcmp(buffer,"0X0000000000000039  "),"Pointer formatted incorrectly\n");
322         ok( r==20, "return count wrong\n");
323     }
324     else
325     {
326         format = "%p";
327         r = sprintf(buffer,format,(void *)57);
328         ok(!strcmp(buffer,"00000039"),"Pointer formatted incorrectly \"%s\"\n",buffer);
329         ok( r==8, "return count wrong\n");
330
331         format = "%#012p";
332         r = sprintf(buffer,format,(void *)57);
333         ok(!strcmp(buffer,"  0X00000039"),"Pointer formatted incorrectly\n");
334         ok( r==12, "return count wrong\n");
335
336         format = "%Fp";
337         r = sprintf(buffer,format,(void *)57);
338         ok(!strcmp(buffer,"00000039"),"Pointer formatted incorrectly \"%s\"\n",buffer);
339         ok( r==8, "return count wrong\n");
340
341         format = "%#-012p";
342         r = sprintf(buffer,format,(void *)57);
343         ok(!strcmp(buffer,"0X00000039  "),"Pointer formatted incorrectly\n");
344         ok( r==12, "return count wrong\n");
345     }
346
347     format = "%04s";
348     r = sprintf(buffer,format,"foo");
349     ok(!strcmp(buffer,"0foo"),"String not zero-prefixed \"%s\"\n",buffer);
350     ok( r==4, "return count wrong\n");
351
352     format = "%.1s";
353     r = sprintf(buffer,format,"foo");
354     ok(!strcmp(buffer,"f"),"Precision ignored \"%s\"\n",buffer);
355     ok( r==1, "return count wrong\n");
356
357     format = "%.*s";
358     r = sprintf(buffer,format,1,"foo");
359     ok(!strcmp(buffer,"f"),"Precision ignored \"%s\"\n",buffer);
360     ok( r==1, "return count wrong\n");
361
362     format = "%*s";
363     r = sprintf(buffer,format,-5,"foo");
364     ok(!strcmp(buffer,"foo  "),"Negative field width ignored \"%s\"\n",buffer);
365     ok( r==5, "return count wrong\n");
366
367     format = "hello";
368     r = sprintf(buffer, format);
369     ok(!strcmp(buffer,"hello"), "failed\n");
370     ok( r==5, "return count wrong\n");
371
372     format = "%ws";
373     r = sprintf(buffer, format, wide);
374     ok(!strcmp(buffer,"wide"), "failed\n");
375     ok( r==4, "return count wrong\n");
376
377     format = "%-10ws";
378     r = sprintf(buffer, format, wide );
379     ok(!strcmp(buffer,"wide      "), "failed\n");
380     ok( r==10, "return count wrong\n");
381
382     format = "%10ws";
383     r = sprintf(buffer, format, wide );
384     ok(!strcmp(buffer,"      wide"), "failed\n");
385     ok( r==10, "return count wrong\n");
386
387     format = "%#+ -03whlls";
388     r = sprintf(buffer, format, wide );
389     ok(!strcmp(buffer,"wide"), "failed\n");
390     ok( r==4, "return count wrong\n");
391
392     format = "%w0s";
393     r = sprintf(buffer, format, wide );
394     ok(!strcmp(buffer,"0s"), "failed\n");
395     ok( r==2, "return count wrong\n");
396
397     format = "%w-s";
398     r = sprintf(buffer, format, wide );
399     ok(!strcmp(buffer,"-s"), "failed\n");
400     ok( r==2, "return count wrong\n");
401
402     format = "%ls";
403     r = sprintf(buffer, format, wide );
404     ok(!strcmp(buffer,"wide"), "failed\n");
405     ok( r==4, "return count wrong\n");
406
407     format = "%Ls";
408     r = sprintf(buffer, format, "not wide" );
409     ok(!strcmp(buffer,"not wide"), "failed\n");
410     ok( r==8, "return count wrong\n");
411
412     format = "%b";
413     r = sprintf(buffer, format);
414     ok(!strcmp(buffer,"b"), "failed\n");
415     ok( r==1, "return count wrong\n");
416
417     format = "%3c";
418     r = sprintf(buffer, format,'a');
419     ok(!strcmp(buffer,"  a"), "failed\n");
420     ok( r==3, "return count wrong\n");
421
422     format = "%3d";
423     r = sprintf(buffer, format,1234);
424     ok(!strcmp(buffer,"1234"), "failed\n");
425     ok( r==4, "return count wrong\n");
426
427     format = "%3h";
428     r = sprintf(buffer, format);
429     ok(!strcmp(buffer,""), "failed\n");
430     ok( r==0, "return count wrong\n");
431
432     format = "%j%k%m%q%r%t%v%y%z";
433     r = sprintf(buffer, format);
434     ok(!strcmp(buffer,"jkmqrtvyz"), "failed\n");
435     ok( r==9, "return count wrong\n");
436
437     format = "asdf%n";
438     x = 0;
439     r = sprintf(buffer, format, &x );
440     if (r == -1)
441     {
442         /* %n format is disabled by default on vista */
443         /* FIXME: should test with _set_printf_count_output */
444         ok(x == 0, "should not write to x: %d\n", x);
445     }
446     else
447     {
448         ok(x == 4, "should write to x: %d\n", x);
449         ok(!strcmp(buffer,"asdf"), "failed\n");
450         ok( r==4, "return count wrong: %d\n", r);
451     }
452
453     format = "%-1d";
454     r = sprintf(buffer, format,2);
455     ok(!strcmp(buffer,"2"), "failed\n");
456     ok( r==1, "return count wrong\n");
457
458     format = "%2.4f";
459     r = sprintf(buffer, format,8.6);
460     ok(!strcmp(buffer,"8.6000"), "failed\n");
461     ok( r==6, "return count wrong\n");
462
463     format = "%0f";
464     r = sprintf(buffer, format,0.6);
465     ok(!strcmp(buffer,"0.600000"), "failed\n");
466     ok( r==8, "return count wrong\n");
467
468     format = "%.0f";
469     r = sprintf(buffer, format,0.6);
470     ok(!strcmp(buffer,"1"), "failed\n");
471     ok( r==1, "return count wrong\n");
472
473     format = "%2.4e";
474     r = sprintf(buffer, format,8.6);
475     ok(!strcmp(buffer,"8.6000e+000"), "failed\n");
476     ok( r==11, "return count wrong\n");
477
478     format = "%2.4g";
479     r = sprintf(buffer, format,8.6);
480     ok(!strcmp(buffer,"8.6"), "failed\n");
481     ok( r==3, "return count wrong\n");
482
483     format = "%-i";
484     r = sprintf(buffer, format,-1);
485     ok(!strcmp(buffer,"-1"), "failed\n");
486     ok( r==2, "return count wrong\n");
487
488     format = "%-i";
489     r = sprintf(buffer, format,1);
490     ok(!strcmp(buffer,"1"), "failed\n");
491     ok( r==1, "return count wrong\n");
492
493     format = "%+i";
494     r = sprintf(buffer, format,1);
495     ok(!strcmp(buffer,"+1"), "failed\n");
496     ok( r==2, "return count wrong\n");
497
498     format = "%o";
499     r = sprintf(buffer, format,10);
500     ok(!strcmp(buffer,"12"), "failed\n");
501     ok( r==2, "return count wrong\n");
502
503     format = "%p";
504     r = sprintf(buffer, format,0);
505     if (sizeof(void *) == 8)
506     {
507         ok(!strcmp(buffer,"0000000000000000"), "failed\n");
508         ok( r==16, "return count wrong\n");
509     }
510     else
511     {
512         ok(!strcmp(buffer,"00000000"), "failed\n");
513         ok( r==8, "return count wrong\n");
514     }
515
516     format = "%s";
517     r = sprintf(buffer, format,0);
518     ok(!strcmp(buffer,"(null)"), "failed\n");
519     ok( r==6, "return count wrong\n");
520
521     format = "%s";
522     r = sprintf(buffer, format,"%%%%");
523     ok(!strcmp(buffer,"%%%%"), "failed\n");
524     ok( r==4, "return count wrong\n");
525
526     format = "%u";
527     r = sprintf(buffer, format,-1);
528     ok(!strcmp(buffer,"4294967295"), "failed\n");
529     ok( r==10, "return count wrong\n");
530
531     format = "%w";
532     r = sprintf(buffer, format,-1);
533     ok(!strcmp(buffer,""), "failed\n");
534     ok( r==0, "return count wrong\n");
535
536     format = "%h";
537     r = sprintf(buffer, format,-1);
538     ok(!strcmp(buffer,""), "failed\n");
539     ok( r==0, "return count wrong\n");
540
541     format = "%z";
542     r = sprintf(buffer, format,-1);
543     ok(!strcmp(buffer,"z"), "failed\n");
544     ok( r==1, "return count wrong\n");
545
546     format = "%j";
547     r = sprintf(buffer, format,-1);
548     ok(!strcmp(buffer,"j"), "failed\n");
549     ok( r==1, "return count wrong\n");
550
551     format = "%F";
552     r = sprintf(buffer, format,-1);
553     ok(!strcmp(buffer,""), "failed\n");
554     ok( r==0, "return count wrong\n");
555
556     format = "%H";
557     r = sprintf(buffer, format,-1);
558     ok(!strcmp(buffer,"H"), "failed\n");
559     ok( r==1, "return count wrong\n");
560
561     format = "x%cx";
562     r = sprintf(buffer, format, 0x100+'X');
563     ok(!strcmp(buffer,"xXx"), "failed\n");
564     ok( r==3, "return count wrong\n");
565
566     format = "%%0";
567     r = sprintf(buffer, format);
568     ok(!strcmp(buffer,"%0"), "failed: \"%s\"\n", buffer);
569     ok( r==2, "return count wrong\n");
570 }
571
572 static void test_swprintf( void )
573 {
574     wchar_t buffer[100];
575     const wchar_t I64d[] = {'%','I','6','4','d',0};
576     double pnumber=789456123;
577     const wchar_t TwentyThreePoint15e[]= {'%','+','#','2','3','.','1','5','e',0};
578     const wchar_t e008[] = {'e','+','0','0','8',0};
579     const wchar_t string_w[] = {'s','t','r','i','n','g',0};
580     const char string[] = "string";
581     const wchar_t S[]={'%','S',0};
582     const wchar_t hs[] = {'%', 'h', 's', 0};
583
584     swprintf(buffer,TwentyThreePoint15e,pnumber);
585     ok(wcsstr(buffer,e008) != 0,"Sprintf different\n");
586     swprintf(buffer,I64d,((ULONGLONG)0xffffffff)*0xffffffff);
587       ok(wcslen(buffer) == 11,"Problem with long long\n");
588     swprintf(buffer,S,string);
589       ok(wcslen(buffer) == 6,"Problem with \"%%S\" interpretation\n");
590    swprintf(buffer, hs, string);
591    ok( wcscmp(string_w,buffer) == 0, "swprintf failed with %%hs\n");
592 }
593
594 static void test_snprintf (void)
595 {
596     struct snprintf_test {
597         const char *format;
598         int expected;
599     };
600     /* Pre-2.1 libc behaviour, not C99 compliant. */
601     const struct snprintf_test tests[] = {{"short", 5},
602                                           {"justfit", 7},
603                                           {"justfits", 8},
604                                           {"muchlonger", -1}};
605     char buffer[8];
606     const int bufsiz = sizeof buffer;
607     unsigned int i;
608
609     for (i = 0; i < sizeof tests / sizeof tests[0]; i++) {
610         const char *fmt  = tests[i].format;
611         const int expect = tests[i].expected;
612         const int n      = _snprintf (buffer, bufsiz, fmt);
613         const int valid  = n < 0 ? bufsiz : (n == bufsiz ? n : n+1);
614
615         ok (n == expect, "\"%s\": expected %d, returned %d\n",
616             fmt, expect, n);
617         ok (!memcmp (fmt, buffer, valid),
618             "\"%s\": rendered \"%.*s\"\n", fmt, valid, buffer);
619     };
620 }
621
622 static void test_fcvt(void)
623 {
624     char *str;
625     int dec=100, sign=100;
626     
627     /* Numbers less than 1.0 with different precisions */
628     str = _fcvt(0.0001, 1, &dec, &sign );
629     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
630     ok( -3 == dec, "dec wrong %d\n", dec);
631     ok( 0 == sign, "sign wrong\n");
632
633     str = _fcvt(0.0001, -10, &dec, &sign );
634     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
635     ok( -3 == dec, "dec wrong %d\n", dec);
636     ok( 0 == sign, "sign wrong\n");
637
638     str = _fcvt(0.0001, 10, &dec, &sign );
639     ok( 0 == strcmp(str,"1000000"), "bad return '%s'\n", str);
640     ok( -3 == dec, "dec wrong %d\n", dec);
641     ok( 0 == sign, "sign wrong\n");
642
643     /* Basic sign test */
644     str = _fcvt(-111.0001, 5, &dec, &sign );
645     ok( 0 == strcmp(str,"11100010"), "bad return '%s'\n", str);
646     ok( 3 == dec, "dec wrong %d\n", dec);
647     ok( 1 == sign, "sign wrong\n");
648
649     str = _fcvt(111.0001, 5, &dec, &sign );
650     ok( 0 == strcmp(str,"11100010"), "bad return '%s'\n", str);
651     ok( 3 == dec, "dec wrong\n");
652     ok( 0 == sign, "sign wrong\n");
653
654     /* 0.0 with different precisions */
655     str = _fcvt(0.0, 5, &dec, &sign );
656     ok( 0 == strcmp(str,"00000"), "bad return '%s'\n", str);
657     ok( 0 == dec, "dec wrong %d\n", dec);
658     ok( 0 == sign, "sign wrong\n");
659
660     str = _fcvt(0.0, 0, &dec, &sign );
661     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
662     ok( 0 == dec, "dec wrong %d\n", dec);
663     ok( 0 == sign, "sign wrong\n");
664
665     str = _fcvt(0.0, -1, &dec, &sign );
666     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
667     ok( 0 == dec, "dec wrong %d\n", dec);
668     ok( 0 == sign, "sign wrong\n");
669
670     /* Numbers > 1.0 with 0 or -ve precision */
671     str = _fcvt(-123.0001, 0, &dec, &sign );
672     ok( 0 == strcmp(str,"123"), "bad return '%s'\n", str);
673     ok( 3 == dec, "dec wrong %d\n", dec);
674     ok( 1 == sign, "sign wrong\n");
675
676     str = _fcvt(-123.0001, -1, &dec, &sign );
677     ok( 0 == strcmp(str,"12"), "bad return '%s'\n", str);
678     ok( 3 == dec, "dec wrong %d\n", dec);
679     ok( 1 == sign, "sign wrong\n");
680
681     str = _fcvt(-123.0001, -2, &dec, &sign );
682     ok( 0 == strcmp(str,"1"), "bad return '%s'\n", str);
683     ok( 3 == dec, "dec wrong %d\n", dec);
684     ok( 1 == sign, "sign wrong\n");
685
686     str = _fcvt(-123.0001, -3, &dec, &sign );
687     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
688     ok( 3 == dec, "dec wrong %d\n", dec);
689     ok( 1 == sign, "sign wrong\n");
690
691     /* Numbers > 1.0, but with rounding at the point of precision */
692     str = _fcvt(99.99, 1, &dec, &sign );
693     ok( 0 == strcmp(str,"1000"), "bad return '%s'\n", str);
694     ok( 3 == dec, "dec wrong %d\n", dec);
695     ok( 0 == sign, "sign wrong\n");
696
697     /* Numbers < 1.0 where rounding occurs at the point of precision */
698     str = _fcvt(0.00636, 2, &dec, &sign );
699     ok( 0 == strcmp(str,"1"), "bad return '%s'\n", str);
700     ok( -1 == dec, "dec wrong %d\n", dec);
701     ok( 0 == sign, "sign wrong\n");
702
703     str = _fcvt(0.00636, 3, &dec, &sign );
704     ok( 0 == strcmp(str,"6"), "bad return '%s'\n", str);
705     ok( -2 == dec, "dec wrong %d\n", dec);
706     ok( 0 == sign, "sign wrong\n");
707
708     str = _fcvt(0.09999999996, 2, &dec, &sign );
709     ok( 0 == strcmp(str,"10"), "bad return '%s'\n", str);
710     ok( 0 == dec, "dec wrong %d\n", dec);
711     ok( 0 == sign, "sign wrong\n");
712
713     str = _fcvt(0.6, 0, &dec, &sign );
714     ok( 0 == strcmp(str,"1"), "bad return '%s'\n", str);
715     ok( 1 == dec, "dec wrong %d\n", dec);
716     ok( 0 == sign, "sign wrong\n");
717 }
718
719 /* Don't test nrdigits < 0, msvcrt on Win9x and NT4 will corrupt memory by
720  * writing outside allocated memory */
721 static struct {
722     double value;
723     int nrdigits;
724     const char *expstr_e;
725     const char *expstr_f;
726     int expdecpt_e;
727     int expdecpt_f;
728     int expsign;
729 } test_cvt_testcases[] = {
730     {          45.0,   2,        "45",           "4500",          2,      2,      0 },
731     /* Numbers less than 1.0 with different precisions */
732     {        0.0001,   1,         "1",               "",         -3,     -3,     0 },
733     {        0.0001,  10,"1000000000",        "1000000",         -3,     -3,     0 },
734     /* Basic sign test */
735     {     -111.0001,   5,     "11100",       "11100010",          3,      3,     1 },
736     {      111.0001,   5,     "11100",       "11100010",          3,      3,     0 },
737     /* big numbers with low precision */
738     {        3333.3,   2,        "33",         "333330",          4,      4,     0 },
739     {999999999999.9,   3,       "100","999999999999900",         13,     12,     0 },
740     /* 0.0 with different precisions */
741     {           0.0,   5,     "00000",          "00000",          0,      0,     0 },
742     {           0.0,   0,          "",               "",          0,      0,     0 },
743     {           0.0,  -1,          "",               "",          0,      0,     0 },
744     /* Numbers > 1.0 with 0 or -ve precision */
745     {     -123.0001,   0,          "",            "123",          3,      3,     1 },
746     {     -123.0001,  -1,          "",             "12",          3,      3,     1 },
747     {     -123.0001,  -2,          "",              "1",          3,      3,     1 },
748     {     -123.0001,  -3,          "",               "",          3,      3,     1 },
749     /* Numbers > 1.0, but with rounding at the point of precision */
750     {         99.99,   1,         "1",           "1000",          3,      3,     0 },
751     /* Numbers < 1.0 where rounding occurs at the point of precision */
752     {        0.0063,   2,        "63",              "1",         -2,     -1,     0 },
753     {        0.0063,   3,        "630",             "6",         -2,     -2,     0 },
754     { 0.09999999996,   2,        "10",             "10",          0,      0,     0 },
755     {           0.6,   1,         "6",              "6",          0,      0,     0 },
756     {           0.6,   0,          "",              "1",          1,      1,     0 },
757     {           0.4,   0,          "",               "",          0,      0,     0 },
758     {          0.49,   0,          "",               "",          0,      0,     0 },
759     {          0.51,   0,          "",              "1",          1,      1,     0 },
760     /* ask ridiculous amunt of precision, ruin formatting this table */
761     {           1.0,  30, "100000000000000000000000000000",
762                       "1000000000000000000000000000000",          1,      1,      0},
763     {           123456789012345678901.0,  30, "123456789012345680000000000000",
764                       "123456789012345680000000000000000000000000000000000",         21,    21,      0},
765     /* end marker */
766     { 0, 0, "END"}
767 };
768
769 static void test_xcvt(void)
770 {
771     char *str;
772     int i, decpt, sign, err;
773     for( i = 0; strcmp( test_cvt_testcases[i].expstr_e, "END"); i++){
774         decpt = sign = 100;
775         str = _ecvt( test_cvt_testcases[i].value,
776                 test_cvt_testcases[i].nrdigits,
777                 &decpt,
778                 &sign);
779         ok( 0 == strncmp( str, test_cvt_testcases[i].expstr_e, 15),
780                "_ecvt() bad return, got \n'%s' expected \n'%s'\n", str,
781               test_cvt_testcases[i].expstr_e);
782         ok( decpt == test_cvt_testcases[i].expdecpt_e,
783                 "_ecvt() decimal point wrong, got %d expected %d\n", decpt,
784                 test_cvt_testcases[i].expdecpt_e);
785         ok( sign == test_cvt_testcases[i].expsign,
786                 "_ecvt() sign wrong, got %d expected %d\n", sign,
787                 test_cvt_testcases[i].expsign);
788     }
789     for( i = 0; strcmp( test_cvt_testcases[i].expstr_e, "END"); i++){
790         decpt = sign = 100;
791         str = _fcvt( test_cvt_testcases[i].value,
792                 test_cvt_testcases[i].nrdigits,
793                 &decpt,
794                 &sign);
795         ok( 0 == strncmp( str, test_cvt_testcases[i].expstr_f, 15),
796                "_fcvt() bad return, got \n'%s' expected \n'%s'\n", str,
797               test_cvt_testcases[i].expstr_f);
798         ok( decpt == test_cvt_testcases[i].expdecpt_f,
799                 "_fcvt() decimal point wrong, got %d expected %d\n", decpt,
800                 test_cvt_testcases[i].expdecpt_f);
801         ok( sign == test_cvt_testcases[i].expsign,
802                 "_ecvt() sign wrong, got %d expected %d\n", sign,
803                 test_cvt_testcases[i].expsign);
804     }
805
806     if (p__ecvt_s)
807     {
808         str = malloc(1024);
809         for( i = 0; strcmp( test_cvt_testcases[i].expstr_e, "END"); i++){
810             decpt = sign = 100;
811             err = p__ecvt_s(str, 1024, test_cvt_testcases[i].value, test_cvt_testcases[i].nrdigits, &decpt, &sign);
812             ok(err == 0, "_ecvt_s() failed with error code %d", err);
813             ok( 0 == strncmp( str, test_cvt_testcases[i].expstr_e, 15),
814                    "_ecvt_s() bad return, got \n'%s' expected \n'%s'\n", str,
815                   test_cvt_testcases[i].expstr_e);
816             ok( decpt == test_cvt_testcases[i].expdecpt_e,
817                     "_ecvt_s() decimal point wrong, got %d expected %d\n", decpt,
818                     test_cvt_testcases[i].expdecpt_e);
819             ok( sign == test_cvt_testcases[i].expsign,
820                     "_ecvt_s() sign wrong, got %d expected %d\n", sign,
821                     test_cvt_testcases[i].expsign);
822         }
823         free(str);
824     }
825     else
826        win_skip("_ecvt_s not available\n");
827 }
828
829 static int __cdecl _vsnwprintf_wrapper(wchar_t *str, size_t len, const wchar_t *format, ...)
830 {
831     int ret;
832     __ms_va_list valist;
833     __ms_va_start(valist, format);
834     ret = _vsnwprintf(str, len, format, valist);
835     __ms_va_end(valist);
836     return ret;
837 }
838
839 static void test_vsnwprintf(void)
840 {
841     const wchar_t format[] = {'%','w','s','%','w','s','%','w','s',0};
842     const wchar_t one[]    = {'o','n','e',0};
843     const wchar_t two[]    = {'t','w','o',0};
844     const wchar_t three[]  = {'t','h','r','e','e',0};
845
846     int ret;
847     wchar_t str[32];
848     char buf[32];
849
850     ret = _vsnwprintf_wrapper( str, sizeof(str)/sizeof(str[0]), format, one, two, three );
851
852     ok( ret == 11, "got %d expected 11\n", ret );
853     WideCharToMultiByte( CP_ACP, 0, str, -1, buf, sizeof(buf), NULL, NULL );
854     ok( !strcmp(buf, "onetwothree"), "got %s expected 'onetwothree'\n", buf );
855 }
856
857 static int __cdecl _vscprintf_wrapper(const char *format, ...)
858 {
859     int ret;
860     __ms_va_list valist;
861     __ms_va_start(valist, format);
862     ret = p__vscprintf(format, valist);
863     __ms_va_end(valist);
864     return ret;
865 }
866
867 static void test_vscprintf(void)
868 {
869     int ret;
870
871     if (!p__vscprintf)
872     {
873        win_skip("_vscprintf not available\n");
874        return;
875     }
876
877     ret = _vscprintf_wrapper( "%s %d", "number", 1 );
878     ok( ret == 8, "got %d expected 8\n", ret );
879 }
880
881 static int __cdecl _vscwprintf_wrapper(const wchar_t *format, ...)
882 {
883     int ret;
884     __ms_va_list valist;
885     __ms_va_start(valist, format);
886     ret = p__vscwprintf(format, valist);
887     __ms_va_end(valist);
888     return ret;
889 }
890
891 static void test_vscwprintf(void)
892 {
893     const wchar_t format[] = {'%','s',' ','%','d',0};
894     const wchar_t number[] = {'n','u','m','b','e','r',0};
895
896     int ret;
897
898     if (!p__vscwprintf)
899     {
900         win_skip("_vscwprintf not available\n");
901         return;
902     }
903
904     ret = _vscwprintf_wrapper( format, number, 1 );
905     ok( ret == 8, "got %d expected 8\n", ret );
906 }
907
908 static int __cdecl _vsnwprintf_s_wrapper(wchar_t *str, size_t sizeOfBuffer,
909                                  size_t count, const wchar_t *format, ...)
910 {
911     int ret;
912     __ms_va_list valist;
913     __ms_va_start(valist, format);
914     ret = p__vsnwprintf_s(str, sizeOfBuffer, count, format, valist);
915     __ms_va_end(valist);
916     return ret;
917 }
918
919 static void test_vsnwprintf_s(void)
920 {
921     const wchar_t format[] = { 'A','B','%','u','C',0 };
922     const wchar_t out7[] = { 'A','B','1','2','3','C',0 };
923     const wchar_t out6[] = { 'A','B','1','2','3',0 };
924     const wchar_t out2[] = { 'A',0 };
925     const wchar_t out1[] = { 0 };
926     wchar_t buffer[14] = { 0 };
927     int exp, got;
928
929     if (!p__vsnwprintf_s)
930     {
931         win_skip("_vsnwprintf_s not available\n");
932         return;
933     }
934
935     /* Enough room. */
936     exp = wcslen(out7);
937
938     got = _vsnwprintf_s_wrapper(buffer, 14, _TRUNCATE, format, 123);
939     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
940     ok( !wcscmp(out7, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
941
942     got = _vsnwprintf_s_wrapper(buffer, 12, _TRUNCATE, format, 123);
943     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
944     ok( !wcscmp(out7, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
945
946     got = _vsnwprintf_s_wrapper(buffer, 7, _TRUNCATE, format, 123);
947     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
948     ok( !wcscmp(out7, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
949
950     /* Not enough room. */
951     exp = -1;
952
953     got = _vsnwprintf_s_wrapper(buffer, 6, _TRUNCATE, format, 123);
954     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
955     ok( !wcscmp(out6, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
956
957     got = _vsnwprintf_s_wrapper(buffer, 2, _TRUNCATE, format, 123);
958     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
959     ok( !wcscmp(out2, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
960
961     got = _vsnwprintf_s_wrapper(buffer, 1, _TRUNCATE, format, 123);
962     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
963     ok( !wcscmp(out1, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
964 }
965
966 START_TEST(printf)
967 {
968     init();
969
970     test_sprintf();
971     test_swprintf();
972     test_snprintf();
973     test_fcvt();
974     test_xcvt();
975     test_vsnwprintf();
976     test_vscprintf();
977     test_vscwprintf();
978     test_vsnwprintf_s();
979 }