git.oblomov.eu Git - wine/blob - 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.4g";
 519     r = sprintf(buffer, format,8.6);
 520     ok(!strcmp(buffer,"8.6"), "failed\n");
 521     ok( r==3, "return count wrong\n");
 522
 523     format = "%-i";
 524     r = sprintf(buffer, format,-1);
 525     ok(!strcmp(buffer,"-1"), "failed\n");
 526     ok( r==2, "return count wrong\n");
 527
 528     format = "%-i";
 529     r = sprintf(buffer, format,1);
 530     ok(!strcmp(buffer,"1"), "failed\n");
 531     ok( r==1, "return count wrong\n");
 532
 533     format = "%+i";
 534     r = sprintf(buffer, format,1);
 535     ok(!strcmp(buffer,"+1"), "failed\n");
 536     ok( r==2, "return count wrong\n");
 537
 538     format = "%o";
 539     r = sprintf(buffer, format,10);
 540     ok(!strcmp(buffer,"12"), "failed\n");
 541     ok( r==2, "return count wrong\n");
 542
 543     format = "%p";
 544     r = sprintf(buffer, format,0);
 545     if (sizeof(void *) == 8)
 546     {
 547         ok(!strcmp(buffer,"0000000000000000"), "failed\n");
 548         ok( r==16, "return count wrong\n");
 549     }
 550     else
 551     {
 552         ok(!strcmp(buffer,"00000000"), "failed\n");
 553         ok( r==8, "return count wrong\n");
 554     }
 555
 556     format = "%s";
 557     r = sprintf(buffer, format,0);
 558     ok(!strcmp(buffer,"(null)"), "failed\n");
 559     ok( r==6, "return count wrong\n");
 560
 561     format = "%s";
 562     r = sprintf(buffer, format,"%%%%");
 563     ok(!strcmp(buffer,"%%%%"), "failed\n");
 564     ok( r==4, "return count wrong\n");
 565
 566     format = "%u";
 567     r = sprintf(buffer, format,-1);
 568     ok(!strcmp(buffer,"4294967295"), "failed\n");
 569     ok( r==10, "return count wrong\n");
 570
 571     format = "%w";
 572     r = sprintf(buffer, format,-1);
 573     ok(!strcmp(buffer,""), "failed\n");
 574     ok( r==0, "return count wrong\n");
 575
 576     format = "%h";
 577     r = sprintf(buffer, format,-1);
 578     ok(!strcmp(buffer,""), "failed\n");
 579     ok( r==0, "return count wrong\n");
 580
 581     format = "%z";
 582     r = sprintf(buffer, format,-1);
 583     ok(!strcmp(buffer,"z"), "failed\n");
 584     ok( r==1, "return count wrong\n");
 585
 586     format = "%j";
 587     r = sprintf(buffer, format,-1);
 588     ok(!strcmp(buffer,"j"), "failed\n");
 589     ok( r==1, "return count wrong\n");
 590
 591     format = "%F";
 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,"H"), "failed\n");
 599     ok( r==1, "return count wrong\n");
 600
 601     format = "x%cx";
 602     r = sprintf(buffer, format, 0x100+'X');
 603     ok(!strcmp(buffer,"xXx"), "failed\n");
 604     ok( r==3, "return count wrong\n");
 605
 606     format = "%%0";
 607     r = sprintf(buffer, format);
 608     ok(!strcmp(buffer,"%0"), "failed: \"%s\"\n", buffer);
 609     ok( r==2, "return count wrong\n");
 610 }
 611
 612 static void test_swprintf( void )
 613 {
 614     wchar_t buffer[100];
 615     const wchar_t I64d[] = {'%','I','6','4','d',0};
 616     double pnumber=789456123;
 617     const wchar_t TwentyThreePoint15e[]= {'%','+','#','2','3','.','1','5','e',0};
 618     const wchar_t e008[] = {'e','+','0','0','8',0};
 619     const wchar_t string_w[] = {'s','t','r','i','n','g',0};
 620     const char string[] = "string";
 621     const wchar_t S[]={'%','S',0};
 622     const wchar_t hs[] = {'%', 'h', 's', 0};
 623
 624     swprintf(buffer,TwentyThreePoint15e,pnumber);
 625     ok(wcsstr(buffer,e008) != 0,"Sprintf different\n");
 626     swprintf(buffer,I64d,((ULONGLONG)0xffffffff)*0xffffffff);
 627       ok(wcslen(buffer) == 11,"Problem with long long\n");
 628     swprintf(buffer,S,string);
 629       ok(wcslen(buffer) == 6,"Problem with \"%%S\" interpretation\n");
 630    swprintf(buffer, hs, string);
 631    ok( wcscmp(string_w,buffer) == 0, "swprintf failed with %%hs\n");
 632 }
 633
 634 static void test_snprintf (void)
 635 {
 636     struct snprintf_test {
 637         const char *format;
 638         int expected;
 639     };
 640     /* Pre-2.1 libc behaviour, not C99 compliant. */
 641     const struct snprintf_test tests[] = {{"short", 5},
 642                                           {"justfit", 7},
 643                                           {"justfits", 8},
 644                                           {"muchlonger", -1}};
 645     char buffer[8];
 646     const int bufsiz = sizeof buffer;
 647     unsigned int i;
 648
 649     for (i = 0; i < sizeof tests / sizeof tests[0]; i++) {
 650         const char *fmt  = tests[i].format;
 651         const int expect = tests[i].expected;
 652         const int n      = _snprintf (buffer, bufsiz, fmt);
 653         const int valid  = n < 0 ? bufsiz : (n == bufsiz ? n : n+1);
 654
 655         ok (n == expect, "\"%s\": expected %d, returned %d\n",
 656             fmt, expect, n);
 657         ok (!memcmp (fmt, buffer, valid),
 658             "\"%s\": rendered \"%.*s\"\n", fmt, valid, buffer);
 659     };
 660 }
 661
 662 static void test_fprintf(void)
 663 {
 664     static char file_name[] = "fprintf.tst";
 665     FILE *fp = fopen(file_name, "wb");
 666     char buf[1024];
 667     int ret;
 668
 669     ret = fprintf(fp, "simple test\n");
 670     ok(ret == 12, "ret = %d\n", ret);
 671     ret = ftell(fp);
 672     ok(ret == 12, "ftell returned %d\n", ret);
 673
 674     ret = fprintf(fp, "contains%cnull\n", '\0');
 675     ok(ret == 14, "ret = %d\n", ret);
 676     ret = ftell(fp);
 677     ok(ret == 26, "ftell returned %d\n", ret);
 678
 679     fclose(fp);
 680
 681     fp = fopen(file_name, "rb");
 682     ret = fscanf(fp, "%[^\n] ", buf);
 683     ok(ret == 1, "ret = %d\n", ret);
 684     ret = ftell(fp);
 685     ok(ret == 12, "ftell returned %d\n", ret);
 686     ok(!strcmp(buf, "simple test"), "buf = %s\n", buf);
 687
 688     fgets(buf, sizeof(buf), fp);
 689     ret = ftell(fp);
 690     ok(ret == 26, "ret = %d\n", ret);
 691     ok(!memcmp(buf, "contains\0null\n", 14), "buf = %s\n", buf);
 692
 693     fclose(fp);
 694     unlink(file_name);
 695 }
 696
 697 static void test_fcvt(void)
 698 {
 699     char *str;
 700     int dec=100, sign=100;
 701
 702     /* Numbers less than 1.0 with different precisions */
 703     str = _fcvt(0.0001, 1, &dec, &sign );
 704     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
 705     ok( -3 == dec, "dec wrong %d\n", dec);
 706     ok( 0 == sign, "sign wrong\n");
 707
 708     str = _fcvt(0.0001, -10, &dec, &sign );
 709     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
 710     ok( -3 == dec, "dec wrong %d\n", dec);
 711     ok( 0 == sign, "sign wrong\n");
 712
 713     str = _fcvt(0.0001, 10, &dec, &sign );
 714     ok( 0 == strcmp(str,"1000000"), "bad return '%s'\n", str);
 715     ok( -3 == dec, "dec wrong %d\n", dec);
 716     ok( 0 == sign, "sign wrong\n");
 717
 718     /* Basic sign test */
 719     str = _fcvt(-111.0001, 5, &dec, &sign );
 720     ok( 0 == strcmp(str,"11100010"), "bad return '%s'\n", str);
 721     ok( 3 == dec, "dec wrong %d\n", dec);
 722     ok( 1 == sign, "sign wrong\n");
 723
 724     str = _fcvt(111.0001, 5, &dec, &sign );
 725     ok( 0 == strcmp(str,"11100010"), "bad return '%s'\n", str);
 726     ok( 3 == dec, "dec wrong\n");
 727     ok( 0 == sign, "sign wrong\n");
 728
 729     /* 0.0 with different precisions */
 730     str = _fcvt(0.0, 5, &dec, &sign );
 731     ok( 0 == strcmp(str,"00000"), "bad return '%s'\n", str);
 732     ok( 0 == dec, "dec wrong %d\n", dec);
 733     ok( 0 == sign, "sign wrong\n");
 734
 735     str = _fcvt(0.0, 0, &dec, &sign );
 736     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
 737     ok( 0 == dec, "dec wrong %d\n", dec);
 738     ok( 0 == sign, "sign wrong\n");
 739
 740     str = _fcvt(0.0, -1, &dec, &sign );
 741     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
 742     ok( 0 == dec, "dec wrong %d\n", dec);
 743     ok( 0 == sign, "sign wrong\n");
 744
 745     /* Numbers > 1.0 with 0 or -ve precision */
 746     str = _fcvt(-123.0001, 0, &dec, &sign );
 747     ok( 0 == strcmp(str,"123"), "bad return '%s'\n", str);
 748     ok( 3 == dec, "dec wrong %d\n", dec);
 749     ok( 1 == sign, "sign wrong\n");
 750
 751     str = _fcvt(-123.0001, -1, &dec, &sign );
 752     ok( 0 == strcmp(str,"12"), "bad return '%s'\n", str);
 753     ok( 3 == dec, "dec wrong %d\n", dec);
 754     ok( 1 == sign, "sign wrong\n");
 755
 756     str = _fcvt(-123.0001, -2, &dec, &sign );
 757     ok( 0 == strcmp(str,"1"), "bad return '%s'\n", str);
 758     ok( 3 == dec, "dec wrong %d\n", dec);
 759     ok( 1 == sign, "sign wrong\n");
 760
 761     str = _fcvt(-123.0001, -3, &dec, &sign );
 762     ok( 0 == strcmp(str,""), "bad return '%s'\n", str);
 763     ok( 3 == dec, "dec wrong %d\n", dec);
 764     ok( 1 == sign, "sign wrong\n");
 765
 766     /* Numbers > 1.0, but with rounding at the point of precision */
 767     str = _fcvt(99.99, 1, &dec, &sign );
 768     ok( 0 == strcmp(str,"1000"), "bad return '%s'\n", str);
 769     ok( 3 == dec, "dec wrong %d\n", dec);
 770     ok( 0 == sign, "sign wrong\n");
 771
 772     /* Numbers < 1.0 where rounding occurs at the point of precision */
 773     str = _fcvt(0.00636, 2, &dec, &sign );
 774     ok( 0 == strcmp(str,"1"), "bad return '%s'\n", str);
 775     ok( -1 == dec, "dec wrong %d\n", dec);
 776     ok( 0 == sign, "sign wrong\n");
 777
 778     str = _fcvt(0.00636, 3, &dec, &sign );
 779     ok( 0 == strcmp(str,"6"), "bad return '%s'\n", str);
 780     ok( -2 == dec, "dec wrong %d\n", dec);
 781     ok( 0 == sign, "sign wrong\n");
 782
 783     str = _fcvt(0.09999999996, 2, &dec, &sign );
 784     ok( 0 == strcmp(str,"10"), "bad return '%s'\n", str);
 785     ok( 0 == dec, "dec wrong %d\n", dec);
 786     ok( 0 == sign, "sign wrong\n");
 787
 788     str = _fcvt(0.6, 0, &dec, &sign );
 789     ok( 0 == strcmp(str,"1"), "bad return '%s'\n", str);
 790     ok( 1 == dec, "dec wrong %d\n", dec);
 791     ok( 0 == sign, "sign wrong\n");
 792 }
 793
 794 /* Don't test nrdigits < 0, msvcrt on Win9x and NT4 will corrupt memory by
 795  * writing outside allocated memory */
 796 static struct {
 797     double value;
 798     int nrdigits;
 799     const char *expstr_e;
 800     const char *expstr_f;
 801     int expdecpt_e;
 802     int expdecpt_f;
 803     int expsign;
 804 } test_cvt_testcases[] = {
 805     {          45.0,   2,        "45",           "4500",          2,      2,      0 },
 806     /* Numbers less than 1.0 with different precisions */
 807     {        0.0001,   1,         "1",               "",         -3,     -3,     0 },
 808     {        0.0001,  10,"1000000000",        "1000000",         -3,     -3,     0 },
 809     /* Basic sign test */
 810     {     -111.0001,   5,     "11100",       "11100010",          3,      3,     1 },
 811     {      111.0001,   5,     "11100",       "11100010",          3,      3,     0 },
 812     /* big numbers with low precision */
 813     {        3333.3,   2,        "33",         "333330",          4,      4,     0 },
 814     {999999999999.9,   3,       "100","999999999999900",         13,     12,     0 },
 815     /* 0.0 with different precisions */
 816     {           0.0,   5,     "00000",          "00000",          0,      0,     0 },
 817     {           0.0,   0,          "",               "",          0,      0,     0 },
 818     {           0.0,  -1,          "",               "",          0,      0,     0 },
 819     /* Numbers > 1.0 with 0 or -ve precision */
 820     {     -123.0001,   0,          "",            "123",          3,      3,     1 },
 821     {     -123.0001,  -1,          "",             "12",          3,      3,     1 },
 822     {     -123.0001,  -2,          "",              "1",          3,      3,     1 },
 823     {     -123.0001,  -3,          "",               "",          3,      3,     1 },
 824     /* Numbers > 1.0, but with rounding at the point of precision */
 825     {         99.99,   1,         "1",           "1000",          3,      3,     0 },
 826     /* Numbers < 1.0 where rounding occurs at the point of precision */
 827     {        0.0063,   2,        "63",              "1",         -2,     -1,     0 },
 828     {        0.0063,   3,        "630",             "6",         -2,     -2,     0 },
 829     { 0.09999999996,   2,        "10",             "10",          0,      0,     0 },
 830     {           0.6,   1,         "6",              "6",          0,      0,     0 },
 831     {           0.6,   0,          "",              "1",          1,      1,     0 },
 832     {           0.4,   0,          "",               "",          0,      0,     0 },
 833     {          0.49,   0,          "",               "",          0,      0,     0 },
 834     {          0.51,   0,          "",              "1",          1,      1,     0 },
 835     /* ask for ridiculous precision, ruin formatting this table */
 836     {           1.0,  30, "100000000000000000000000000000",
 837                       "1000000000000000000000000000000",          1,      1,      0},
 838     {           123456789012345678901.0,  30, "123456789012345680000000000000",
 839                       "123456789012345680000000000000000000000000000000000",         21,    21,      0},
 840     /* end marker */
 841     { 0, 0, "END"}
 842 };
 843
 844 static void test_xcvt(void)
 845 {
 846     char *str;
 847     int i, decpt, sign, err;
 848
 849     for( i = 0; strcmp( test_cvt_testcases[i].expstr_e, "END"); i++){
 850         decpt = sign = 100;
 851         str = _ecvt( test_cvt_testcases[i].value,
 852                 test_cvt_testcases[i].nrdigits,
 853                 &decpt,
 854                 &sign);
 855         ok( 0 == strncmp( str, test_cvt_testcases[i].expstr_e, 15),
 856                "_ecvt() bad return, got \n'%s' expected \n'%s'\n", str,
 857               test_cvt_testcases[i].expstr_e);
 858         ok( decpt == test_cvt_testcases[i].expdecpt_e,
 859                 "_ecvt() decimal point wrong, got %d expected %d\n", decpt,
 860                 test_cvt_testcases[i].expdecpt_e);
 861         ok( sign == test_cvt_testcases[i].expsign,
 862                 "_ecvt() sign wrong, got %d expected %d\n", sign,
 863                 test_cvt_testcases[i].expsign);
 864     }
 865     for( i = 0; strcmp( test_cvt_testcases[i].expstr_e, "END"); i++){
 866         decpt = sign = 100;
 867         str = _fcvt( test_cvt_testcases[i].value,
 868                 test_cvt_testcases[i].nrdigits,
 869                 &decpt,
 870                 &sign);
 871         ok( 0 == strncmp( str, test_cvt_testcases[i].expstr_f, 15),
 872                "_fcvt() bad return, got \n'%s' expected \n'%s'\n", str,
 873               test_cvt_testcases[i].expstr_f);
 874         ok( decpt == test_cvt_testcases[i].expdecpt_f,
 875                 "_fcvt() decimal point wrong, got %d expected %d\n", decpt,
 876                 test_cvt_testcases[i].expdecpt_f);
 877         ok( sign == test_cvt_testcases[i].expsign,
 878                 "_fcvt() sign wrong, got %d expected %d\n", sign,
 879                 test_cvt_testcases[i].expsign);
 880     }
 881
 882     if (p__ecvt_s)
 883     {
 884         str = malloc(1024);
 885         for( i = 0; strcmp( test_cvt_testcases[i].expstr_e, "END"); i++){
 886             decpt = sign = 100;
 887             err = p__ecvt_s(str, 1024, test_cvt_testcases[i].value, test_cvt_testcases[i].nrdigits, &decpt, &sign);
 888             ok(err == 0, "_ecvt_s() failed with error code %d\n", err);
 889             ok( 0 == strncmp( str, test_cvt_testcases[i].expstr_e, 15),
 890                    "_ecvt_s() bad return, got \n'%s' expected \n'%s'\n", str,
 891                   test_cvt_testcases[i].expstr_e);
 892             ok( decpt == test_cvt_testcases[i].expdecpt_e,
 893                     "_ecvt_s() decimal point wrong, got %d expected %d\n", decpt,
 894                     test_cvt_testcases[i].expdecpt_e);
 895             ok( sign == test_cvt_testcases[i].expsign,
 896                     "_ecvt_s() sign wrong, got %d expected %d\n", sign,
 897                     test_cvt_testcases[i].expsign);
 898         }
 899         free(str);
 900     }
 901     else
 902         win_skip("_ecvt_s not available\n");
 903
 904     if (p__fcvt_s)
 905     {
 906         int i;
 907
 908         str = malloc(1024);
 909
 910         /* invalid arguments */
 911         err = p__fcvt_s(NULL, 0, 0.0, 0, &i, &i);
 912         ok(err == EINVAL, "got %d, expected EINVAL\n", err);
 913
 914         err = p__fcvt_s(str, 0, 0.0, 0, &i, &i);
 915         ok(err == EINVAL, "got %d, expected EINVAL\n", err);
 916
 917         str[0] = ' ';
 918         str[1] = 0;
 919         err = p__fcvt_s(str, -1, 0.0, 0, &i, &i);
 920         ok(err == 0, "got %d, expected 0\n", err);
 921         ok(str[0] == 0, "got %c, expected 0\n", str[0]);
 922         ok(str[1] == 0, "got %c, expected 0\n", str[1]);
 923
 924         err = p__fcvt_s(str, 1, 0.0, 0, NULL, &i);
 925         ok(err == EINVAL, "got %d, expected EINVAL\n", err);
 926
 927         err = p__fcvt_s(str, 1, 0.0, 0, &i, NULL);
 928         ok(err == EINVAL, "got %d, expected EINVAL\n", err);
 929
 930         for( i = 0; strcmp( test_cvt_testcases[i].expstr_e, "END"); i++){
 931             decpt = sign = 100;
 932             err = p__fcvt_s(str, 1024, test_cvt_testcases[i].value, test_cvt_testcases[i].nrdigits, &decpt, &sign);
 933             ok(err == 0, "_fcvt_s() failed with error code %d\n", err);
 934             ok( 0 == strncmp( str, test_cvt_testcases[i].expstr_f, 15),
 935                    "_fcvt_s() bad return, got '%s' expected '%s'. test %d\n", str,
 936                   test_cvt_testcases[i].expstr_f, i);
 937             ok( decpt == test_cvt_testcases[i].expdecpt_f,
 938                     "_fcvt_s() decimal point wrong, got %d expected %d\n", decpt,
 939                     test_cvt_testcases[i].expdecpt_f);
 940             ok( sign == test_cvt_testcases[i].expsign,
 941                     "_fcvt_s() sign wrong, got %d expected %d\n", sign,
 942                     test_cvt_testcases[i].expsign);
 943         }
 944         free(str);
 945     }
 946     else
 947         win_skip("_fcvt_s not available\n");
 948 }
 949
 950 static int __cdecl _vsnwprintf_wrapper(wchar_t *str, size_t len, const wchar_t *format, ...)
 951 {
 952     int ret;
 953     __ms_va_list valist;
 954     __ms_va_start(valist, format);
 955     ret = _vsnwprintf(str, len, format, valist);
 956     __ms_va_end(valist);
 957     return ret;
 958 }
 959
 960 static void test_vsnwprintf(void)
 961 {
 962     const wchar_t format[] = {'%','w','s','%','w','s','%','w','s',0};
 963     const wchar_t one[]    = {'o','n','e',0};
 964     const wchar_t two[]    = {'t','w','o',0};
 965     const wchar_t three[]  = {'t','h','r','e','e',0};
 966
 967     int ret;
 968     wchar_t str[32];
 969     char buf[32];
 970
 971     ret = _vsnwprintf_wrapper( str, sizeof(str)/sizeof(str[0]), format, one, two, three );
 972
 973     ok( ret == 11, "got %d expected 11\n", ret );
 974     WideCharToMultiByte( CP_ACP, 0, str, -1, buf, sizeof(buf), NULL, NULL );
 975     ok( !strcmp(buf, "onetwothree"), "got %s expected 'onetwothree'\n", buf );
 976 }
 977
 978 static int __cdecl vswprintf_wrapper(wchar_t *str, const wchar_t *format, ...)
 979 {
 980     int ret;
 981     __ms_va_list valist;
 982     __ms_va_start(valist, format);
 983     ret = p_vswprintf(str, format, valist);
 984     __ms_va_end(valist);
 985     return ret;
 986 }
 987
 988 static int __cdecl _vswprintf_wrapper(wchar_t *str, const wchar_t *format, ...)
 989 {
 990     int ret;
 991     __ms_va_list valist;
 992     __ms_va_start(valist, format);
 993     ret = p__vswprintf(str, format, valist);
 994     __ms_va_end(valist);
 995     return ret;
 996 }
 997
 998 static int __cdecl _vswprintf_l_wrapper(wchar_t *str, const wchar_t *format, void *locale, ...)
 999 {
1000     int ret;
1001     __ms_va_list valist;
1002     __ms_va_start(valist, locale);
1003     ret = p__vswprintf_l(str, format, locale, valist);
1004     __ms_va_end(valist);
1005     return ret;
1006 }
1007
1008 static int __cdecl _vswprintf_c_wrapper(wchar_t *str, size_t size, const wchar_t *format, ...)
1009 {
1010     int ret;
1011     __ms_va_list valist;
1012     __ms_va_start(valist, format);
1013     ret = p__vswprintf_c(str, size, format, valist);
1014     __ms_va_end(valist);
1015     return ret;
1016 }
1017
1018 static int __cdecl _vswprintf_c_l_wrapper(wchar_t *str, size_t size, const wchar_t *format, void *locale, ...)
1019 {
1020     int ret;
1021     __ms_va_list valist;
1022     __ms_va_start(valist, locale);
1023     ret = p__vswprintf_c_l(str, size, format, locale, valist);
1024     __ms_va_end(valist);
1025     return ret;
1026 }
1027
1028 static int __cdecl _vswprintf_p_l_wrapper(wchar_t *str, size_t size, 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_p_l(str, size, format, locale, valist);
1034     __ms_va_end(valist);
1035     return ret;
1036 }
1037
1038 static void test_vswprintf(void)
1039 {
1040     const wchar_t format[] = {'%','s',' ','%','d',0};
1041     const wchar_t number[] = {'n','u','m','b','e','r',0};
1042     const wchar_t out[] = {'n','u','m','b','e','r',' ','1','2','3',0};
1043     wchar_t buf[20];
1044
1045     int ret;
1046
1047     if (!p_vswprintf || !p__vswprintf || !p__vswprintf_l ||!p__vswprintf_c
1048             || !p__vswprintf_c_l || !p__vswprintf_p_l)
1049     {
1050         win_skip("_vswprintf or vswprintf not available\n");
1051         return;
1052     }
1053
1054     ret = vswprintf_wrapper(buf, format, number, 123);
1055     ok(ret == 10, "got %d, expected 10\n", ret);
1056     ok(!memcmp(buf, out, sizeof(out)), "buf = %s\n", wine_dbgstr_w(buf));
1057
1058     memset(buf, 0, sizeof(buf));
1059     ret = _vswprintf_wrapper(buf, format, number, 123);
1060     ok(ret == 10, "got %d, expected 10\n", ret);
1061     ok(!memcmp(buf, out, sizeof(out)), "buf = %s\n", wine_dbgstr_w(buf));
1062
1063     memset(buf, 0, sizeof(buf));
1064     ret = _vswprintf_l_wrapper(buf, format, NULL, number, 123);
1065     ok(ret == 10, "got %d, expected 10\n", ret);
1066     ok(!memcmp(buf, out, sizeof(out)), "buf = %s\n", wine_dbgstr_w(buf));
1067
1068     memset(buf, 0, sizeof(buf));
1069     ret = _vswprintf_c_wrapper(buf, 20, format, number, 123);
1070     ok(ret == 10, "got %d, expected 10\n", ret);
1071     ok(!memcmp(buf, out, sizeof(out)), "buf = %s\n", wine_dbgstr_w(buf));
1072
1073     memset(buf, 0, sizeof(buf));
1074     ret = _vswprintf_c_l_wrapper(buf, 20, format, NULL, number, 123);
1075     ok(ret == 10, "got %d, expected 10\n", ret);
1076     ok(!memcmp(buf, out, sizeof(out)), "buf = %s\n", wine_dbgstr_w(buf));
1077
1078     memset(buf, 0, sizeof(buf));
1079     ret = _vswprintf_p_l_wrapper(buf, 20, format, NULL, number, 123);
1080     ok(ret == 10, "got %d, expected 10\n", ret);
1081     ok(!memcmp(buf, out, sizeof(out)), "buf = %s\n", wine_dbgstr_w(buf));
1082 }
1083
1084 static int __cdecl _vscprintf_wrapper(const char *format, ...)
1085 {
1086     int ret;
1087     __ms_va_list valist;
1088     __ms_va_start(valist, format);
1089     ret = p__vscprintf(format, valist);
1090     __ms_va_end(valist);
1091     return ret;
1092 }
1093
1094 static void test_vscprintf(void)
1095 {
1096     int ret;
1097
1098     if (!p__vscprintf)
1099     {
1100        win_skip("_vscprintf not available\n");
1101        return;
1102     }
1103
1104     ret = _vscprintf_wrapper( "%s %d", "number", 1 );
1105     ok( ret == 8, "got %d expected 8\n", ret );
1106 }
1107
1108 static int __cdecl _vscwprintf_wrapper(const wchar_t *format, ...)
1109 {
1110     int ret;
1111     __ms_va_list valist;
1112     __ms_va_start(valist, format);
1113     ret = p__vscwprintf(format, valist);
1114     __ms_va_end(valist);
1115     return ret;
1116 }
1117
1118 static void test_vscwprintf(void)
1119 {
1120     const wchar_t format[] = {'%','s',' ','%','d',0};
1121     const wchar_t number[] = {'n','u','m','b','e','r',0};
1122
1123     int ret;
1124
1125     if (!p__vscwprintf)
1126     {
1127         win_skip("_vscwprintf not available\n");
1128         return;
1129     }
1130
1131     ret = _vscwprintf_wrapper( format, number, 1 );
1132     ok( ret == 8, "got %d expected 8\n", ret );
1133 }
1134
1135 static int __cdecl _vsnwprintf_s_wrapper(wchar_t *str, size_t sizeOfBuffer,
1136                                  size_t count, const wchar_t *format, ...)
1137 {
1138     int ret;
1139     __ms_va_list valist;
1140     __ms_va_start(valist, format);
1141     ret = p__vsnwprintf_s(str, sizeOfBuffer, count, format, valist);
1142     __ms_va_end(valist);
1143     return ret;
1144 }
1145
1146 static void test_vsnwprintf_s(void)
1147 {
1148     const wchar_t format[] = { 'A','B','%','u','C',0 };
1149     const wchar_t out7[] = { 'A','B','1','2','3','C',0 };
1150     const wchar_t out6[] = { 'A','B','1','2','3',0 };
1151     const wchar_t out2[] = { 'A',0 };
1152     const wchar_t out1[] = { 0 };
1153     wchar_t buffer[14] = { 0 };
1154     int exp, got;
1155
1156     if (!p__vsnwprintf_s)
1157     {
1158         win_skip("_vsnwprintf_s not available\n");
1159         return;
1160     }
1161
1162     /* Enough room. */
1163     exp = wcslen(out7);
1164
1165     got = _vsnwprintf_s_wrapper(buffer, 14, _TRUNCATE, format, 123);
1166     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
1167     ok( !wcscmp(out7, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
1168
1169     got = _vsnwprintf_s_wrapper(buffer, 12, _TRUNCATE, format, 123);
1170     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
1171     ok( !wcscmp(out7, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
1172
1173     got = _vsnwprintf_s_wrapper(buffer, 7, _TRUNCATE, format, 123);
1174     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
1175     ok( !wcscmp(out7, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
1176
1177     /* Not enough room. */
1178     exp = -1;
1179
1180     got = _vsnwprintf_s_wrapper(buffer, 6, _TRUNCATE, format, 123);
1181     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
1182     ok( !wcscmp(out6, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
1183
1184     got = _vsnwprintf_s_wrapper(buffer, 2, _TRUNCATE, format, 123);
1185     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
1186     ok( !wcscmp(out2, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
1187
1188     got = _vsnwprintf_s_wrapper(buffer, 1, _TRUNCATE, format, 123);
1189     ok( exp == got, "length wrong, expect=%d, got=%d\n", exp, got);
1190     ok( !wcscmp(out1, buffer), "buffer wrong, got=%s\n", wine_dbgstr_w(buffer));
1191 }
1192
1193 static int __cdecl _vsprintf_p_wrapper(char *str, size_t sizeOfBuffer,
1194                                  const char *format, ...)
1195 {
1196     int ret;
1197     __ms_va_list valist;
1198     __ms_va_start(valist, format);
1199     ret = p__vsprintf_p(str, sizeOfBuffer, format, valist);
1200     __ms_va_end(valist);
1201     return ret;
1202 }
1203
1204 static void test_vsprintf_p(void)
1205 {
1206     char buf[1024];
1207     int ret;
1208
1209     if(!p__vsprintf_p) {
1210         win_skip("vsprintf_p not available\n");
1211         return;
1212     }
1213
1214     ret = _vsprintf_p_wrapper(buf, sizeof(buf), "%s %d", "test", 1234);
1215     ok(ret == 9, "ret = %d\n", ret);
1216     ok(!memcmp(buf, "test 1234", 10), "buf = %s\n", buf);
1217
1218     ret = _vsprintf_p_wrapper(buf, sizeof(buf), "%1$d", 1234, "additional param");
1219     ok(ret == 4, "ret = %d\n", ret);
1220     ok(!memcmp(buf, "1234", 5), "buf = %s\n", buf);
1221
1222     ret = _vsprintf_p_wrapper(buf, sizeof(buf), "%2$s %1$d", 1234, "test");
1223     ok(ret == 9, "ret = %d\n", ret);
1224     ok(!memcmp(buf, "test 1234", 10), "buf = %s\n", buf);
1225
1226     ret = _vsprintf_p_wrapper(buf, sizeof(buf), "%2$*3$s %2$.*1$s", 2, "test", 3);
1227     ok(ret == 7, "ret = %d\n", ret);
1228     ok(!memcmp(buf, "test te", 8), "buf = %s\n", buf);
1229
1230     /* Following test invokes invalid parameter handler */
1231     /* ret = _vsprintf_p_wrapper(buf, sizeof(buf), "%d %1$d", 1234); */
1232 }
1233
1234 static void test__get_output_format(void)
1235 {
1236     unsigned int ret;
1237
1238     if (!p__get_output_format)
1239     {
1240         win_skip("_get_output_format not available\n");
1241         return;
1242     }
1243
1244     ret = p__get_output_format();
1245     ok(ret == 0, "got %d\n", ret);
1246 }
1247
1248 START_TEST(printf)
1249 {
1250     init();
1251
1252     test_sprintf();
1253     test_swprintf();
1254     test_snprintf();
1255     test_fprintf();
1256     test_fcvt();
1257     test_xcvt();
1258     test_vsnwprintf();
1259     test_vscprintf();
1260     test_vscwprintf();
1261     test_vswprintf();
1262     test_vsnwprintf_s();
1263     test_vsprintf_p();
1264     test__get_output_format();
1265 }