dlls/kernel32/tests/format_msg.c

   1 /* Unit test suite for FormatMessageA/W
   2  *
   3  * Copyright 2002 Mike McCormack for CodeWeavers
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  18  */
  19
  20 #include <stdarg.h>
  21
  22 #include "wine/test.h"
  23 #include "windef.h"
  24 #include "winbase.h"
  25 #include "winnls.h"
  26
  27 /* #define ok(cond,failstr) if(!(cond)) {printf("line %d : %s\n",__LINE__,failstr);exit(1);} */
  28
  29 static DWORD __cdecl doit(DWORD flags, LPCVOID src, DWORD msg_id, DWORD lang_id,
  30                           LPSTR out, DWORD outsize, ... )
  31 {
  32     __ms_va_list list;
  33     DWORD r;
  34
  35     __ms_va_start(list, outsize);
  36     r = FormatMessageA(flags, src, msg_id,
  37         lang_id, out, outsize, &list);
  38     __ms_va_end(list);
  39     return r;
  40 }
  41
  42 static DWORD __cdecl doitW(DWORD flags, LPCVOID src, DWORD msg_id, DWORD lang_id,
  43                            LPWSTR out, DWORD outsize, ... )
  44 {
  45     __ms_va_list list;
  46     DWORD r;
  47
  48     __ms_va_start(list, outsize);
  49     r = FormatMessageW(flags, src, msg_id,
  50         lang_id, out, outsize, &list);
  51     __ms_va_end(list);
  52     return r;
  53 }
  54
  55 static void test_message_from_string_wide(void)
  56 {
  57     static const WCHAR test[]        = {'t','e','s','t',0};
  58     static const WCHAR te[]          = {'t','e',0};
  59     static const WCHAR st[]          = {'s','t',0};
  60     static const WCHAR t[]           = {'t',0};
  61     static const WCHAR e[]           = {'e',0};
  62     static const WCHAR s[]           = {'s',0};
  63     static const WCHAR fmt_1[]       = {'%','1',0};
  64     static const WCHAR fmt_12[]      = {'%','1','%','2',0};
  65     static const WCHAR fmt_123[]     = {'%','1','%','3','%','2','%','1',0};
  66     static const WCHAR fmt_123c[]    = {'%','1','!','c','!','%','2','!','c','!','%','3','!','c','!','%','1','!','c','!',0};
  67     static const WCHAR fmt_123lc[]   = {'%','1','!','l','c','!','%','2','!','l','c','!','%','3','!','l','c','!','%','1','!','l','c','!',0};
  68     static const WCHAR fmt_123wc[]   = {'%','1','!','w','c','!','%','2','!','w','c','!','%','3','!','w','c','!','%','1','!','w','c','!',0};
  69     static const WCHAR fmt_123C[]    = {'%','1','!','C','!','%','2','!','C','!','%','3','!','C','!','%','1','!','C','!',0};
  70     static const WCHAR fmt_123d[]    = {'%','1','!','d','!','%','2','!','d','!','%','3','!','d','!',0};
  71     static const WCHAR fmt_1s[]      = {'%','1','!','s','!',0};
  72     static const WCHAR fmt_s[]       = {'%','!','s','!',0};
  73     static const WCHAR fmt_ls[]      = {'%','!','l','s','!',0};
  74     static const WCHAR fmt_ws[]      = {'%','!','w','s','!',0};
  75     static const WCHAR fmt_S[]       = {'%','!','S','!',0};
  76     static const WCHAR fmt_14d[]     = {'%','1','!','4','d','!',0};
  77     static const WCHAR fmt_14x[]     = {'%','1','!','4','x','!',0};
  78     static const WCHAR fmt_14X[]     = {'%','1','!','4','X','!',0};
  79     static const WCHAR fmt_1_4X[]    = {'%','1','!','-','4','X','!',0};
  80     static const WCHAR fmt_1_4d[]    = {'%','1','!','-','4','d','!',0};
  81     static const WCHAR fmt_2pct[]    = {' ','%','%','%','%',' ',0};
  82     static const WCHAR fmt_2dot1d[]  = {' ', '%','.','%','.',' ',' ','%','1','!','d','!',0};
  83     static const WCHAR fmt_t0t[]     = {'t','e','s','t','%','0','t','e','s','t',0};
  84     static const WCHAR fmt_yah[]     = {'y','a','h','%','!','%','0',' ',' ',' ',0};
  85     static const WCHAR fmt_space[]   = {'%',' ','%',' ',' ',' ',0};
  86     static const WCHAR fmt_hi_lf[]   = {'h','i','\n',0};
  87     static const WCHAR fmt_hi_crlf[] = {'h','i','\r','\n',0};
  88     static const WCHAR fmt_cr[]      = {'\r',0};
  89     static const WCHAR fmt_crcrlf[]  = {'\r','\r','\n',0};
  90     static const WCHAR fmt_13s[]     = {'%','1','!','3','s','!',0};
  91     static const WCHAR fmt_1os[]     = {'%','1','!','*','s','!',0};
  92     static const WCHAR fmt_142u[]    = {'%','1','!','4','.','2','u','!',0};
  93     static const WCHAR fmt_1oou[]    = {'%','1','!','*','.','*','u','!',0};
  94     static const WCHAR fmt_1oou1oou[] = {'%','1','!','*','.','*','u','!',',','%','1','!','*','.','*','u','!',0};
  95     static const WCHAR fmt_1oou3oou[] = {'%','1','!','*','.','*','u','!',',','%','3','!','*','.','*','u','!',0};
  96     static const WCHAR fmt_1oou4oou[] = {'%','1','!','*','.','*','u','!',',','%','4','!','*','.','*','u','!',0};
  97
  98     static const WCHAR s_123d[]      = {'1','2','3',0};
  99     static const WCHAR s_14d[]       = {' ',' ',' ','1',0};
 100     static const WCHAR s_14x[]       = {' ',' ',' ','b',0};
 101     static const WCHAR s_14X[]       = {' ',' ',' ','B',0};
 102     static const WCHAR s_1_4X[]      = {'B',' ',' ',' ',0};
 103     static const WCHAR s_14d2[]      = {' ',' ','1','1',0};
 104     static const WCHAR s_1_4d[]      = {'1',' ',' ',' ',0};
 105     static const WCHAR s_1AB[]       = {' ','1','A','B',0};
 106     static const WCHAR s_2pct[]      = {' ','%','%',' ',0};
 107     static const WCHAR s_2dot147[]   = {' ','.','.',' ',' ','4','2','7',0};
 108     static const WCHAR s_yah[]       = {'y','a','h','!',0};
 109     static const WCHAR s_space[]     = {' ',' ',' ',' ',0};
 110     static const WCHAR s_hi_crlf[]   = {'h','i','\r','\n',0};
 111     static const WCHAR s_crlf[]      = {'\r','\n',0};
 112     static const WCHAR s_crlfcrlf[]  = {'\r','\n','\r','\n',0};
 113     static const WCHAR s_hi_sp[]     = {'h','i',' ',0};
 114     static const WCHAR s_sp[]        = {' ',0};
 115     static const WCHAR s_2sp[]       = {' ',' ',0};
 116     static const WCHAR s_spt[]       = {' ',' ','t',0};
 117     static const WCHAR s_sp3t[]      = {' ',' ',' ','t',0};
 118     static const WCHAR s_sp03[]      = {' ',' ','0','3',0};
 119     static const WCHAR s_sp001[]     = {' ',' ','0','0','1',0};
 120     static const WCHAR s_sp001002[]  = {' ',' ','0','0','1',',',' ','0','0','0','2',0};
 121     static const WCHAR s_sp001sp002[] = {' ',' ','0','0','1',',',' ',' ','0','0','0','2',0};
 122     static const WCHAR s_sp002sp001[] = {' ',' ','0','0','0','2',',',' ',' ','0','0','1',0};
 123     static const WCHAR s_sp002sp003[] = {' ',' ','0','0','0','2',',',' ','0','0','0','0','3',0};
 124
 125     WCHAR out[0x100] = {0};
 126     DWORD r, error;
 127
 128     SetLastError(0xdeadbeef);
 129     r = FormatMessageW(FORMAT_MESSAGE_FROM_STRING, NULL, 0, 0, NULL, 0, NULL);
 130     error = GetLastError();
 131     if (!r && error == ERROR_CALL_NOT_IMPLEMENTED)
 132     {
 133         win_skip("FormatMessageW is not implemented\n");
 134         return;
 135     }
 136
 137     /* the basics */
 138     r = FormatMessageW(FORMAT_MESSAGE_FROM_STRING, test, 0,
 139         0, out, sizeof(out)/sizeof(WCHAR), NULL);
 140     ok(!lstrcmpW(test, out), "failed out=%s\n", wine_dbgstr_w(out));
 141     ok(r==4, "failed: r=%d\n", r);
 142
 143     /* using the format feature */
 144     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_1s, 0,
 145         0, out, sizeof(out)/sizeof(WCHAR), test);
 146     ok(!lstrcmpW(test, out), "failed out=%s\n", wine_dbgstr_w(out));
 147     ok(r==4,"failed: r=%d\n", r);
 148
 149     /* no format */
 150     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_1, 0,
 151         0, out, sizeof(out)/sizeof(WCHAR), test);
 152     ok(!lstrcmpW(test, out), "failed out=%s\n", wine_dbgstr_w(out));
 153     ok(r==4,"failed: r=%d\n", r);
 154
 155     /* two pieces */
 156     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_12, 0,
 157         0, out, sizeof(out)/sizeof(WCHAR), te, st);
 158     ok(!lstrcmpW(test, out), "failed out=%s\n", wine_dbgstr_w(out));
 159     ok(r==4,"failed: r=%d\n", r);
 160
 161     /* three pieces */
 162     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_123, 0,
 163         0, out, sizeof(out)/sizeof(WCHAR), t, s, e);
 164     ok(!lstrcmpW(test, out), "failed out=%s\n", wine_dbgstr_w(out));
 165     ok(r==4,"failed: r=%d\n", r);
 166
 167     /* s doesn't seem to work in format strings */
 168     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_s, 0,
 169         0, out, sizeof(out)/sizeof(WCHAR), test);
 170     ok(!lstrcmpW(&fmt_s[1], out), "failed out=%s\n", wine_dbgstr_w(out));
 171     ok(r==3, "failed: r=%d\n", r);
 172
 173     /* nor ls */
 174     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_ls, 0,
 175         0, out, sizeof(out)/sizeof(WCHAR), test);
 176     ok(!lstrcmpW(&fmt_ls[1], out), "failed out=%s\n", wine_dbgstr_w(out));
 177     ok(r==4, "failed: r=%d\n", r);
 178
 179     /* nor S */
 180     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_S, 0,
 181         0, out, sizeof(out)/sizeof(WCHAR), test);
 182     ok(!lstrcmpW(&fmt_S[1], out), "failed out=%s\n", wine_dbgstr_w(out));
 183     ok(r==3, "failed: r=%d\n", r);
 184
 185     /* nor ws */
 186     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_ws, 0,
 187         0, out, sizeof(out)/sizeof(WCHAR), test);
 188     ok(!lstrcmpW(&fmt_ws[1], out), "failed out=%s\n", wine_dbgstr_w(out));
 189     ok(r==4, "failed: r=%d\n", r);
 190
 191     /* as characters */
 192     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_123c, 0,
 193         0, out, sizeof(out)/sizeof(WCHAR), 't', 'e', 's');
 194     ok(!lstrcmpW(test, out), "failed out=%s\n", wine_dbgstr_w(out));
 195     ok(r==4,"failed: r=%d\n", r);
 196
 197     /* lc is unicode */
 198     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_123lc, 0,
 199         0, out, sizeof(out)/sizeof(WCHAR), 't', 'e', 's');
 200     ok(!lstrcmpW(test, out), "failed out=%s\n", wine_dbgstr_w(out));
 201     ok(r==4,"failed: r=%d\n", r);
 202
 203     /* wc is unicode */
 204     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_123wc, 0,
 205         0, out, sizeof(out)/sizeof(WCHAR), 't', 'e', 's');
 206     ok(!lstrcmpW(test, out), "failed out=%s\n", wine_dbgstr_w(out));
 207     ok(r==4,"failed: r=%d\n", r);
 208
 209     /* C is unicode */
 210     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_123C, 0,
 211         0, out, sizeof(out)/sizeof(WCHAR), 't', 'e', 's');
 212     ok(!lstrcmpW(test, out), "failed out=%s\n", wine_dbgstr_w(out));
 213     ok(r==4,"failed: r=%d\n", r);
 214
 215     /* some numbers */
 216     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_123d, 0,
 217         0, out, sizeof(out)/sizeof(WCHAR), 1, 2, 3);
 218     ok(!lstrcmpW(s_123d, out), "failed out=%s\n", wine_dbgstr_w(out));
 219     ok(r==3,"failed: r=%d\n", r);
 220
 221     /* a single digit with some spacing */
 222     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_14d, 0,
 223         0, out, sizeof(out)/sizeof(WCHAR), 1);
 224     ok(!lstrcmpW(s_14d, out), "failed out=%s\n", wine_dbgstr_w(out));
 225
 226     /* a single digit, left justified */
 227     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_1_4d, 0,
 228         0, out, sizeof(out)/sizeof(CHAR), 1);
 229     ok(!lstrcmpW(s_1_4d, out), "failed out=%s\n", wine_dbgstr_w(out));
 230     ok(r==4,"failed: r=%d\n", r);
 231
 232     /* two digit decimal number */
 233     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_14d, 0,
 234         0, out, sizeof(out)/sizeof(WCHAR), 11);
 235     ok(!lstrcmpW(s_14d2, out), "failed out=%s\n", wine_dbgstr_w(out));
 236     ok(r==4,"failed: r=%d\n", r);
 237
 238     /* a hex number */
 239     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_14x, 0,
 240         0, out, sizeof(out)/sizeof(WCHAR), 11);
 241     ok(!lstrcmpW(s_14x, out), "failed out=%s\n", wine_dbgstr_w(out));
 242     ok(r==4,"failed: r=%d\n", r);
 243
 244     /* a hex number, upper case */
 245     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_14X, 0,
 246         0, out, sizeof(out)/sizeof(WCHAR), 11);
 247     ok(!lstrcmpW(s_14X, out), "failed out=%s\n", wine_dbgstr_w(out));
 248     ok(r==4,"failed: r=%d\n", r);
 249
 250     /* a hex number, upper case, left justified */
 251     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_1_4X, 0,
 252         0, out, sizeof(out)/sizeof(WCHAR), 11);
 253     ok(!lstrcmpW(s_1_4X, out), "failed out=%s\n", wine_dbgstr_w(out));
 254     ok(r==4,"failed: r=%d\n", r);
 255
 256     /* a long hex number, upper case */
 257     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_14X, 0,
 258         0, out, sizeof(out)/sizeof(WCHAR), 0x1ab);
 259     ok(!lstrcmpW(s_1AB, out), "failed out=%s\n", wine_dbgstr_w(out));
 260     ok(r==4,"failed: r=%d\n", r);
 261
 262     /* two percent... */
 263     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_2pct, 0,
 264         0, out, sizeof(out)/sizeof(WCHAR));
 265     ok(!lstrcmpW(s_2pct, out), "failed out=%s\n", wine_dbgstr_w(out));
 266     ok(r==4,"failed: r=%d\n", r);
 267
 268     /* periods are special cases */
 269     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_2dot1d, 0,
 270         0, out, sizeof(out)/sizeof(WCHAR), 0x1ab);
 271     ok(!lstrcmpW(s_2dot147, out), "failed out=%s\n", wine_dbgstr_w(out));
 272     ok(r==8,"failed: r=%d\n", r);
 273
 274     /* %0 ends the line */
 275     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_t0t, 0,
 276         0, out, sizeof(out)/sizeof(WCHAR));
 277     ok(!lstrcmpW(test, out), "failed out=%s\n", wine_dbgstr_w(out));
 278     ok(r==4,"failed: r=%d\n", r);
 279
 280     /* %! prints an exclamation */
 281     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_yah, 0,
 282         0, out, sizeof(out)/sizeof(WCHAR));
 283     ok(!lstrcmpW(s_yah, out), "failed out=%s\n", wine_dbgstr_w(out));
 284     ok(r==4,"failed: r=%d\n", r);
 285
 286     /* %space */
 287     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_space, 0,
 288         0, out, sizeof(out)/sizeof(WCHAR));
 289     ok(!lstrcmpW(s_space, out), "failed out=%s\n", wine_dbgstr_w(out));
 290     ok(r==4,"failed: r=%d\n", r);
 291
 292     /* line feed */
 293     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_hi_lf, 0,
 294         0, out, sizeof(out)/sizeof(WCHAR));
 295     ok(!lstrcmpW(s_hi_crlf, out), "failed out=%s\n", wine_dbgstr_w(out));
 296     ok(r==4,"failed: r=%d\n", r);
 297
 298     /* carriage return line feed */
 299     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_hi_crlf, 0,
 300         0, out, sizeof(out)/sizeof(WCHAR));
 301     ok(!lstrcmpW(s_hi_crlf, out), "failed out=%s\n", wine_dbgstr_w(out));
 302     ok(r==4,"failed: r=%d\n", r);
 303
 304     /* carriage return */
 305     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_cr, 0,
 306         0, out, sizeof(out)/sizeof(WCHAR));
 307     ok(!lstrcmpW(s_crlf, out), "failed out=%s\n", wine_dbgstr_w(out));
 308     ok(r==2,"failed: r=%d\n", r);
 309
 310     /* double carriage return line feed */
 311     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_crcrlf, 0,
 312         0, out, sizeof(out)/sizeof(WCHAR));
 313     ok(!lstrcmpW(s_crlfcrlf, out), "failed out=%s\n", wine_dbgstr_w(out));
 314     ok(r==4,"failed: r=%d\n", r);
 315
 316     /* precision and width */
 317
 318     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_13s,
 319               0, 0, out, sizeof(out)/sizeof(WCHAR), t );
 320     ok(!lstrcmpW(s_spt, out),"failed out=[%s]\n", wine_dbgstr_w(out));
 321     ok(r==3, "failed: r=%d\n",r);
 322     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_1os,
 323               0, 0, out, sizeof(out)/sizeof(WCHAR), 4, t );
 324     ok(!lstrcmpW( s_sp3t, out),"failed out=[%s]\n", wine_dbgstr_w(out));
 325     ok(r==4,"failed: r=%d\n",r);
 326     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_142u,
 327               0, 0, out, sizeof(out)/sizeof(WCHAR), 3 );
 328     ok(!lstrcmpW( s_sp03, out),"failed out=[%s]\n", wine_dbgstr_w(out));
 329     ok(r==4,"failed: r=%d\n",r);
 330     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_1oou,
 331               0, 0, out, sizeof(out)/sizeof(WCHAR), 5, 3, 1 );
 332     ok(!lstrcmpW( s_sp001, out),"failed out=[%s]\n", wine_dbgstr_w(out));
 333     ok(r==5,"failed: r=%d\n",r);
 334     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_1oou1oou,
 335               0, 0, out, sizeof(out)/sizeof(WCHAR), 5, 3, 1, 4, 2 );
 336     ok(!lstrcmpW( s_sp001002, out),"failed out=[%s]\n", wine_dbgstr_w(out));
 337     ok(r==11,"failed: r=%d\n",r);
 338     r = doitW(FORMAT_MESSAGE_FROM_STRING, fmt_1oou3oou,
 339               0, 0, out, sizeof(out)/sizeof(WCHAR), 5, 3, 1, 6, 4, 2 );
 340     ok(!lstrcmpW( s_sp001sp002, out),"failed out=[%s]\n", wine_dbgstr_w(out));
 341     ok(r==12,"failed: r=%d\n",r);
 342     /* args are not counted the same way with an argument array */
 343     {
 344         ULONG_PTR args[] = { 6, 4, 2, 5, 3, 1 };
 345         r = FormatMessageW(FORMAT_MESSAGE_FROM_STRING | FORMAT_MESSAGE_ARGUMENT_ARRAY, fmt_1oou1oou,
 346                            0, 0, out, sizeof(out)/sizeof(WCHAR), (__ms_va_list *)args );
 347         ok(!lstrcmpW(s_sp002sp003, out),"failed out=[%s]\n", wine_dbgstr_w(out));
 348         ok(r==13,"failed: r=%d\n",r);
 349         r = FormatMessageW(FORMAT_MESSAGE_FROM_STRING | FORMAT_MESSAGE_ARGUMENT_ARRAY, fmt_1oou4oou,
 350                            0, 0, out, sizeof(out)/sizeof(WCHAR), (__ms_va_list *)args );
 351         ok(!lstrcmpW(s_sp002sp001, out),"failed out=[%s]\n", wine_dbgstr_w(out));
 352         ok(r==12,"failed: r=%d\n",r);
 353     }
 354
 355     /* change of pace... test the low byte of dwflags */
 356
 357     /* line feed */
 358     r = doitW(FORMAT_MESSAGE_FROM_STRING | FORMAT_MESSAGE_MAX_WIDTH_MASK, fmt_hi_lf, 0,
 359         0, out, sizeof(out)/sizeof(WCHAR));
 360     ok(!lstrcmpW(s_hi_sp, out) || !lstrcmpW(s_hi_crlf, out), "failed out=%s\n", wine_dbgstr_w(out));
 361     ok(r==3 || r==4,"failed: r=%d\n", r);
 362
 363     /* carriage return line feed */
 364     r = doitW(FORMAT_MESSAGE_FROM_STRING | FORMAT_MESSAGE_MAX_WIDTH_MASK, fmt_hi_crlf, 0,
 365         0, out, sizeof(out)/sizeof(WCHAR));
 366     ok(!lstrcmpW(s_hi_sp, out), "failed out=%s\n", wine_dbgstr_w(out));
 367     ok(r==3,"failed: r=%d\n", r);
 368
 369     /* carriage return */
 370     r = doitW(FORMAT_MESSAGE_FROM_STRING | FORMAT_MESSAGE_MAX_WIDTH_MASK, fmt_cr, 0,
 371         0, out, sizeof(out)/sizeof(WCHAR));
 372     ok(!lstrcmpW(s_sp, out), "failed out=%s\n", wine_dbgstr_w(out));
 373     ok(r==1,"failed: r=%d\n", r);
 374
 375     /* double carriage return line feed */
 376     r = doitW(FORMAT_MESSAGE_FROM_STRING | FORMAT_MESSAGE_MAX_WIDTH_MASK, fmt_crcrlf, 0,
 377         0, out, sizeof(out)/sizeof(WCHAR));
 378     ok(!lstrcmpW(s_2sp, out), "failed out=%s\n", wine_dbgstr_w(out));
 379     ok(r==2,"failed: r=%d\n", r);
 380 }
 381
 382 static void test_message_from_string(void)
 383 {
 384     CHAR out[0x100] = {0};
 385     DWORD r;
 386     static const WCHAR szwTest[] = { 't','e','s','t',0};
 387
 388     /* the basics */
 389     r = FormatMessageA(FORMAT_MESSAGE_FROM_STRING, "test", 0,
 390         0, out, sizeof(out)/sizeof(CHAR),NULL);
 391     ok(!strcmp("test", out),"failed out=[%s]\n",out);
 392     ok(r==4,"failed: r=%d\n",r);
 393
 394     /* using the format feature */
 395     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!s!", 0,
 396         0, out, sizeof(out)/sizeof(CHAR), "test");
 397     ok(!strcmp("test", out),"failed out=[%s]\n",out);
 398     ok(r==4,"failed: r=%d\n",r);
 399
 400     /* no format */
 401     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1", 0,
 402         0, out, sizeof(out)/sizeof(CHAR), "test");
 403     ok(!strcmp("test", out),"failed out=[%s]\n",out);
 404     ok(r==4,"failed: r=%d\n",r);
 405
 406     /* two pieces */
 407     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1%2", 0,
 408         0, out, sizeof(out)/sizeof(CHAR), "te","st");
 409     ok(!strcmp("test", out),"failed out=[%s]\n",out);
 410     ok(r==4,"failed: r=%d\n",r);
 411
 412     /* three pieces */
 413     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1%3%2%1", 0,
 414         0, out, sizeof(out)/sizeof(CHAR), "t","s","e");
 415     ok(!strcmp("test", out),"failed out=[%s]\n",out);
 416     ok(r==4,"failed: r=%d\n",r);
 417
 418     /* s doesn't seem to work in format strings */
 419     r = doit(FORMAT_MESSAGE_FROM_STRING, "%!s!", 0,
 420         0, out, sizeof(out)/sizeof(CHAR), "test");
 421     ok(!strcmp("!s!", out),"failed out=[%s]\n",out);
 422     ok(r==3,"failed: r=%d\n",r);
 423
 424     /* ls is unicode */
 425     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!ls!", 0,
 426         0, out, sizeof(out)/sizeof(CHAR), szwTest);
 427     ok(!strcmp("test", out),"failed out=[%s]\n",out);
 428     ok(r==4,"failed: r=%d\n",r);
 429
 430     /* S is unicode */
 431     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!S!", 0,
 432         0, out, sizeof(out)/sizeof(CHAR), szwTest);
 433     ok(!strcmp("test", out),"failed out=[%s]\n",out);
 434     ok(r==4,"failed: r=%d\n",r);
 435
 436     /* ws is unicode */
 437     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!ws!", 0,
 438         0, out, sizeof(out)/sizeof(CHAR), szwTest);
 439     ok(!strcmp("test", out),"failed out=[%s]\n",out);
 440     ok(r==4,"failed: r=%d\n",r);
 441
 442     /* as characters */
 443     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!c!%2!c!%3!c!%1!c!", 0,
 444         0, out, sizeof(out)/sizeof(CHAR), 't','e','s');
 445     ok(!strcmp("test", out),"failed out=[%s]\n",out);
 446     ok(r==4,"failed: r=%d\n",r);
 447
 448     /* lc is unicode */
 449     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!lc!%2!lc!%3!lc!%1!lc!", 0,
 450         0, out, sizeof(out)/sizeof(CHAR), 't','e','s');
 451     ok(!strcmp("test", out),"failed out=[%s]\n",out);
 452     ok(r==4,"failed: r=%d\n",r);
 453
 454     /* wc is unicode */
 455     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!wc!%2!wc!%3!wc!%1!wc!", 0,
 456         0, out, sizeof(out)/sizeof(CHAR), 't','e','s');
 457     ok(!strcmp("test", out),"failed out=[%s]\n",out);
 458     ok(r==4,"failed: r=%d\n",r);
 459
 460     /* C is unicode */
 461     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!C!%2!C!%3!C!%1!C!", 0,
 462         0, out, sizeof(out)/sizeof(CHAR), 't','e','s');
 463     ok(!strcmp("test", out),"failed out=[%s]\n",out);
 464     ok(r==4,"failed: r=%d\n",r);
 465
 466     /* some numbers */
 467     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!d!%2!d!%3!d!", 0,
 468         0, out, sizeof(out)/sizeof(CHAR), 1,2,3);
 469     ok(!strcmp("123", out),"failed out=[%s]\n",out);
 470     ok(r==3,"failed: r=%d\n",r);
 471
 472     /* a single digit with some spacing */
 473     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!4d!", 0,
 474         0, out, sizeof(out)/sizeof(CHAR), 1);
 475     ok(!strcmp("   1", out),"failed out=[%s]\n",out);
 476     ok(r==4,"failed: r=%d\n",r);
 477
 478     /* a single digit, left justified */
 479     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!-4d!", 0,
 480         0, out, sizeof(out)/sizeof(CHAR), 1);
 481     ok(!strcmp("1   ", out),"failed out=[%s]\n",out);
 482     ok(r==4,"failed: r=%d\n",r);
 483
 484     /* two digit decimal number */
 485     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!4d!", 0,
 486         0, out, sizeof(out)/sizeof(CHAR), 11);
 487     ok(!strcmp("  11", out),"failed out=[%s]\n",out);
 488     ok(r==4,"failed: r=%d\n",r);
 489
 490     /* a hex number */
 491     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!4x!", 0,
 492         0, out, sizeof(out)/sizeof(CHAR), 11);
 493     ok(!strcmp("   b", out),"failed out=[%s]\n",out);
 494     ok(r==4,"failed: r=%d\n",r);
 495
 496     /* a hex number, upper case */
 497     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!4X!", 0,
 498         0, out, sizeof(out)/sizeof(CHAR), 11);
 499     ok(!strcmp("   B", out),"failed out=[%s]\n",out);
 500     ok(r==4,"failed: r=%d\n",r);
 501
 502     /* a hex number, upper case, left justified */
 503     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!-4X!", 0,
 504         0, out, sizeof(out)/sizeof(CHAR), 11);
 505     ok(!strcmp("B   ", out),"failed out=[%s]\n",out);
 506     ok(r==4,"failed: r=%d\n",r);
 507
 508     /* a long hex number, upper case */
 509     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!4X!", 0,
 510         0, out, sizeof(out)/sizeof(CHAR), 0x1ab);
 511     ok(!strcmp(" 1AB", out),"failed out=[%s]\n",out);
 512     ok(r==4,"failed: r=%d\n",r);
 513
 514     /* two percent... */
 515     r = doit(FORMAT_MESSAGE_FROM_STRING, " %%%% ", 0,
 516         0, out, sizeof(out)/sizeof(CHAR));
 517     ok(!strcmp(" %% ", out),"failed out=[%s]\n",out);
 518     ok(r==4,"failed: r=%d\n",r);
 519
 520     /* periods are special cases */
 521     r = doit(FORMAT_MESSAGE_FROM_STRING, " %.%. %1!d!", 0,
 522         0, out, sizeof(out)/sizeof(CHAR), 0x1ab);
 523     ok(!strcmp(" .. 427", out),"failed out=[%s]\n",out);
 524     ok(r==7,"failed: r=%d\n",r);
 525
 526     /* %0 ends the line */
 527     r = doit(FORMAT_MESSAGE_FROM_STRING, "test%0test", 0,
 528         0, out, sizeof(out)/sizeof(CHAR));
 529     ok(!strcmp("test", out),"failed out=[%s]\n",out);
 530     ok(r==4,"failed: r=%d\n",r);
 531
 532     /* %! prints an exclamation */
 533     r = doit(FORMAT_MESSAGE_FROM_STRING, "yah%!%0   ", 0,
 534         0, out, sizeof(out)/sizeof(CHAR));
 535     ok(!strcmp("yah!", out),"failed out=[%s]\n",out);
 536     ok(r==4,"failed: r=%d\n",r);
 537
 538     /* %space */
 539     r = doit(FORMAT_MESSAGE_FROM_STRING, "% %   ", 0,
 540         0, out, sizeof(out)/sizeof(CHAR));
 541     ok(!strcmp("    ", out),"failed out=[%s]\n",out);
 542     ok(r==4,"failed: r=%d\n",r);
 543
 544     /* line feed */
 545     r = doit(FORMAT_MESSAGE_FROM_STRING, "hi\n", 0,
 546         0, out, sizeof(out)/sizeof(CHAR));
 547     ok(!strcmp("hi\r\n", out),"failed out=[%s]\n",out);
 548     ok(r==4,"failed: r=%d\n",r);
 549
 550     /* carriage return line feed */
 551     r = doit(FORMAT_MESSAGE_FROM_STRING, "hi\r\n", 0,
 552         0, out, sizeof(out)/sizeof(CHAR));
 553     ok(!strcmp("hi\r\n", out),"failed out=[%s]\n",out);
 554     ok(r==4,"failed: r=%d\n",r);
 555
 556     /* carriage return */
 557     r = doit(FORMAT_MESSAGE_FROM_STRING, "\r", 0,
 558         0, out, sizeof(out)/sizeof(CHAR));
 559     ok(!strcmp("\r\n", out),"failed out=[%s]\n",out);
 560     ok(r==2,"failed: r=%d\n",r);
 561
 562     /* double carriage return line feed */
 563     r = doit(FORMAT_MESSAGE_FROM_STRING, "\r\r\n", 0,
 564         0, out, sizeof(out)/sizeof(CHAR));
 565     ok(!strcmp("\r\n\r\n", out),"failed out=[%s]\n",out);
 566     ok(r==4,"failed: r=%d\n",r);
 567
 568     /* precision and width */
 569
 570     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!3s!",
 571              0, 0, out, sizeof(out), "t" );
 572     ok(!strcmp("  t", out),"failed out=[%s]\n",out);
 573     ok(r==3, "failed: r=%d\n",r);
 574     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!*s!",
 575              0, 0, out, sizeof(out), 4, "t");
 576     ok(!strcmp( "   t", out),"failed out=[%s]\n",out);
 577     ok(r==4,"failed: r=%d\n",r);
 578     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!4.2u!",
 579              0, 0, out, sizeof(out), 3 );
 580     ok(!strcmp( "  03", out),"failed out=[%s]\n",out);
 581     ok(r==4,"failed: r=%d\n",r);
 582     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!*.*u!",
 583              0, 0, out, sizeof(out), 5, 3, 1 );
 584     ok(!strcmp( "  001", out),"failed out=[%s]\n",out);
 585     ok(r==5,"failed: r=%d\n",r);
 586     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!*.*u!,%1!*.*u!",
 587              0, 0, out, sizeof(out), 5, 3, 1, 4, 2 );
 588     ok(!strcmp( "  001, 0002", out),"failed out=[%s]\n",out);
 589     ok(r==11,"failed: r=%d\n",r);
 590     r = doit(FORMAT_MESSAGE_FROM_STRING, "%1!*.*u!,%3!*.*u!",
 591              0, 0, out, sizeof(out), 5, 3, 1, 6, 4, 2 );
 592     ok(!strcmp( "  001,  0002", out),"failed out=[%s]\n",out);
 593     ok(r==12,"failed: r=%d\n",r);
 594     /* args are not counted the same way with an argument array */
 595     {
 596         ULONG_PTR args[] = { 6, 4, 2, 5, 3, 1 };
 597         r = FormatMessageA(FORMAT_MESSAGE_FROM_STRING | FORMAT_MESSAGE_ARGUMENT_ARRAY,
 598                            "%1!*.*u!,%1!*.*u!", 0, 0, out, sizeof(out), (__ms_va_list *)args );
 599         ok(!strcmp("  0002, 00003", out),"failed out=[%s]\n",out);
 600         ok(r==13,"failed: r=%d\n",r);
 601         r = FormatMessageA(FORMAT_MESSAGE_FROM_STRING | FORMAT_MESSAGE_ARGUMENT_ARRAY,
 602                            "%1!*.*u!,%4!*.*u!", 0, 0, out, sizeof(out), (__ms_va_list *)args );
 603         ok(!strcmp("  0002,  001", out),"failed out=[%s]\n",out);
 604         ok(r==12,"failed: r=%d\n",r);
 605     }
 606
 607     /* change of pace... test the low byte of dwflags */
 608
 609     /* line feed */
 610     r = doit(FORMAT_MESSAGE_FROM_STRING | FORMAT_MESSAGE_MAX_WIDTH_MASK, "hi\n", 0,
 611         0, out, sizeof(out)/sizeof(CHAR));
 612     ok(!strcmp("hi ", out) || !strcmp("hi\r\n", out),"failed out=[%s]\n",out);
 613     ok(r==3 || r==4,"failed: r=%d\n",r);
 614
 615     /* carriage return line feed */
 616     r = doit(FORMAT_MESSAGE_FROM_STRING | FORMAT_MESSAGE_MAX_WIDTH_MASK, "hi\r\n", 0,
 617         0, out, sizeof(out)/sizeof(CHAR));
 618     ok(!strcmp("hi ", out),"failed out=[%s]\n",out);
 619     ok(r==3,"failed: r=%d\n",r);
 620
 621     /* carriage return */
 622     r = doit(FORMAT_MESSAGE_FROM_STRING | FORMAT_MESSAGE_MAX_WIDTH_MASK, "\r", 0,
 623         0, out, sizeof(out)/sizeof(CHAR));
 624     ok(!strcmp(" ", out),"failed out=[%s]\n",out);
 625     ok(r==1,"failed: r=%d\n",r);
 626
 627     /* double carriage return line feed */
 628     r = doit(FORMAT_MESSAGE_FROM_STRING | FORMAT_MESSAGE_MAX_WIDTH_MASK, "\r\r\n", 0,
 629         0, out, sizeof(out)/sizeof(CHAR));
 630     ok(!strcmp("  ", out),"failed out=[%s]\n",out);
 631     ok(r==2,"failed: r=%d\n",r);
 632 }
 633
 634 static void test_message_null_buffer(void)
 635 {
 636     DWORD ret, error;
 637
 638     SetLastError(0xdeadbeef);
 639     ret = FormatMessageA(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_ALLOCATE_BUFFER, NULL, 0, 0, NULL, 0, NULL);
 640     error = GetLastError();
 641     ok(!ret, "FormatMessageA returned %u\n", ret);
 642     ok(error == ERROR_NOT_ENOUGH_MEMORY ||
 643        error == ERROR_INVALID_PARAMETER, /* win9x */
 644        "last error %u\n", error);
 645
 646     SetLastError(0xdeadbeef);
 647     ret = FormatMessageW(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_ALLOCATE_BUFFER, NULL, 0, 0, NULL, 0, NULL);
 648     error = GetLastError();
 649     if (!ret && error == ERROR_CALL_NOT_IMPLEMENTED)
 650     {
 651         win_skip("FormatMessageW is not implemented\n");
 652         return;
 653     }
 654
 655     ok(!ret, "FormatMessageW returned %u\n", ret);
 656     ok(error == ERROR_INVALID_PARAMETER, "last error %u\n", error);
 657 }
 658
 659 static void test_message_from_hmodule(void)
 660 {
 661     DWORD ret, error;
 662     HMODULE h;
 663     CHAR out[0x100] = {0};
 664
 665     h = GetModuleHandle("kernel32.dll");
 666     ok(h != 0, "GetModuleHandle failed\n");
 667
 668     /*Test existing messageID; as the message strings from wine's kernel32 differ from windows' kernel32 we don't compare
 669     the strings but only test that FormatMessage doesn't return 0*/
 670     ret = FormatMessageA(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_FROM_HMODULE, h, 7/*=ERROR_ARENA_TRASHED*/,
 671                          MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), out, sizeof(out)/sizeof(CHAR), NULL);
 672     ok(ret != 0, "FormatMessageA returned 0\n");
 673
 674     /*Test non existing messageID with varying language ID's Note: FormatMessageW behaves the same*/
 675     SetLastError(0xdeadbeef);
 676     ret = FormatMessageA(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_FROM_HMODULE, h, 3044,
 677                          MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), out, sizeof(out)/sizeof(CHAR), NULL);
 678     error = GetLastError();
 679     ok(ret == 0, "FormatMessageA returned %u instead of 0\n", ret);
 680     ok(error == ERROR_MR_MID_NOT_FOUND, "last error %u\n", error);
 681
 682     SetLastError(0xdeadbeef);
 683     ret = FormatMessageA(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_FROM_HMODULE, h, 3044,
 684                          MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), out, sizeof(out)/sizeof(CHAR), NULL);
 685     error = GetLastError();
 686     ok(ret == 0, "FormatMessageA returned %u instead of 0\n", ret);
 687     ok(error == ERROR_MR_MID_NOT_FOUND, "last error %u\n", error);
 688
 689     SetLastError(0xdeadbeef);
 690     ret = FormatMessageA(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_FROM_HMODULE, h, 3044,
 691                          MAKELANGID(LANG_NEUTRAL, SUBLANG_SYS_DEFAULT), out, sizeof(out)/sizeof(CHAR), NULL);
 692     error = GetLastError();
 693     ok(ret == 0, "FormatMessageA returned %u instead of 0\n", ret);
 694     ok(error == ERROR_MR_MID_NOT_FOUND, "last error %u\n", error);
 695
 696     SetLastError(0xdeadbeef);
 697     ret = FormatMessageA(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_FROM_HMODULE, h, 3044,
 698                          MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US), out, sizeof(out)/sizeof(CHAR), NULL);
 699     error = GetLastError();
 700     ok(ret == 0, "FormatMessageA returned %u instead of 0\n", ret);
 701     ok(error == ERROR_MR_MID_NOT_FOUND, "last error %u\n", error);
 702
 703     SetLastError(0xdeadbeef);
 704     ret = FormatMessageA(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_FROM_HMODULE, h, 3044,
 705                          MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_UK), out, sizeof(out)/sizeof(CHAR), NULL);
 706     error = GetLastError();
 707     ok(ret == 0, "FormatMessageA returned %u instead of 0\n", ret);
 708     ok(error == ERROR_RESOURCE_LANG_NOT_FOUND, "last error %u\n", error);
 709 }
 710
 711 START_TEST(format_msg)
 712 {
 713     test_message_from_string();
 714     test_message_from_string_wide();
 715     test_message_null_buffer();
 716     test_message_from_hmodule();
 717 }