?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
mlang/tests: Add tests for IMultiLanguage2_GetRfc1766Info.
[wine/multimedia.git] / dlls / mlang / tests / mlang.c
blob08be7a8c6d3e8366eeeb6b559532405416971dc9
1 /*
2 * Unit test suite for MLANG APIs.
3 *
4 * Copyright 2004 Dmitry Timoshkov
5 * Copyright 2009 Detlef Riekenberg
6 *
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
11 *
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
16 *
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20 */
21
22 #define COBJMACROS
23
24 #include <stdarg.h>
25
26 #include "windef.h"
27 #include "winbase.h"
28 #include "winerror.h"
29 #include "initguid.h"
30 #include "mlang.h"
31
32 #include "wine/test.h"
33
34 #ifndef CP_UNICODE
35 #define CP_UNICODE 1200
36 #endif
37
38 #if 0
39 #define DUMP_CP_INFO
40 #define DUMP_SCRIPT_INFO
41
42 #if defined DUMP_CP_INFO || defined DUMP_SCRIPT_INFO
43 #include "wine/debug.h"
44 #endif
45 #endif /* 0 */
46
47 static BOOL (WINAPI *pGetCPInfoExA)(UINT, DWORD, LPCPINFOEXA);
48 static HRESULT (WINAPI *pConvertINetMultiByteToUnicode)(LPDWORD, DWORD, LPCSTR,
49 LPINT, LPWSTR, LPINT);
50 static HRESULT (WINAPI *pConvertINetUnicodeToMultiByte)(LPDWORD, DWORD, LPCWSTR,
51 LPINT, LPSTR, LPINT);
52 typedef struct lcid_tag_table {
53 LPCSTR rfc1766;
54 LCID lcid;
55 HRESULT hr;
56 LCID broken_lcid;
57 LPCSTR broken_rfc;
58 } lcid_table_entry;
59
60 /* en, ar and zh use SUBLANG_NEUTRAL for the rfc1766 name without the country
61 all others suppress the country with SUBLANG_DEFAULT.
62 For 3 letter language codes, the rfc1766 is to small for the country */
63
64 static const lcid_table_entry lcid_table[] = {
65 {"e", -1, E_FAIL},
66 {"", -1, E_FAIL},
67 {"-", -1, E_FAIL},
68 {"e-", -1, E_FAIL},
69
70 {"ar", 1, S_OK},
71 {"zh", 4, S_OK},
72
73 {"de", 0x0407, S_OK},
74 {"de-ch", 0x0807, S_OK},
75 {"de-at", 0x0c07, S_OK},
76 {"de-lu", 0x1007, S_OK},
77 {"de-li", 0x1407, S_OK},
78
79 {"en", 9, S_OK},
80 {"en-gb", 0x809, S_OK},
81 {"en-GB", 0x809, S_OK},
82 {"EN-GB", 0x809, S_OK},
83 {"en-US", 0x409, S_OK},
84 {"en-us", 0x409, S_OK},
85
86 {"fr", 0x040c, S_OK},
87 {"fr-be", 0x080c, S_OK},
88 {"fr-ca", 0x0c0c, S_OK},
89 {"fr-ch", 0x100c, S_OK},
90 {"fr-lu", 0x140c, S_OK},
91 {"fr-mc", 0x180c, S_OK, 0x040c},
92
93 {"it", 0x0410, S_OK},
94 {"it-ch", 0x0810, S_OK},
95
96 {"nl", 0x0413, S_OK},
97 {"nl-be", 0x0813, S_OK},
98 {"pl", 0x0415, S_OK},
99 {"ru", 0x0419, S_OK},
100
101 {"kok", 0x0457, S_OK, 0x0412, "x-kok"}
102
103 };
104
105 #define TODO_NAME 1
106
107 typedef struct info_table_tag {
108 LCID lcid;
109 LANGID lang;
110 DWORD todo;
111 LPCSTR rfc1766;
112 LPCSTR localename;
113 LPCSTR broken_name;
114 } info_table_entry;
115
116 static const CHAR fr_enus[] = {'A','n','g','l','a','i','s',' ',
117 '(',0xC3, 0x89, 't','a','t','s','-','U','n','i','s',')',0};
118
119 static const info_table_entry info_table[] = {
120 {MAKELANGID(LANG_ENGLISH, SUBLANG_NEUTRAL), MAKELANGID(LANG_ENGLISH, SUBLANG_NEUTRAL),
121 0, "en", "English"},
122 {MAKELANGID(LANG_ENGLISH, SUBLANG_DEFAULT), MAKELANGID(LANG_ENGLISH, SUBLANG_NEUTRAL),
123 0, "en-us", "English (United States)"},
124 {MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_UK), MAKELANGID(LANG_ENGLISH, SUBLANG_NEUTRAL),
125 0, "en-gb", "English (United Kingdom)"},
126 {MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US), MAKELANGID(LANG_ENGLISH, SUBLANG_NEUTRAL),
127 0, "en-us", "English (United States)"},
128 {MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_CAN), MAKELANGID(LANG_ENGLISH, SUBLANG_NEUTRAL),
129 0, "en-ca", "English (Canada)"},
130
131 {MAKELANGID(LANG_GERMAN, SUBLANG_DEFAULT), MAKELANGID(LANG_ENGLISH, SUBLANG_NEUTRAL),
132 0, "de", "German (Germany)"},
133 {MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN), MAKELANGID(LANG_ENGLISH, SUBLANG_NEUTRAL),
134 0, "de", "German (Germany)"},
135 {MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN_SWISS), MAKELANGID(LANG_ENGLISH, SUBLANG_NEUTRAL),
136 0, "de-ch", "German (Switzerland)"},
137 {MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN_AUSTRIAN), MAKELANGID(LANG_ENGLISH, SUBLANG_NEUTRAL),
138 0, "de-at", "German (Austria)"},
139
140 {MAKELANGID(LANG_ENGLISH, SUBLANG_NEUTRAL), MAKELANGID(LANG_GERMAN, SUBLANG_DEFAULT),
141 TODO_NAME, "en", "Englisch"},
142 {MAKELANGID(LANG_ENGLISH, SUBLANG_DEFAULT), MAKELANGID(LANG_GERMAN, SUBLANG_DEFAULT),
143 TODO_NAME, "en-us", "Englisch (USA)"},
144 {MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_UK), MAKELANGID(LANG_GERMAN, SUBLANG_DEFAULT),
145 TODO_NAME, "en-gb", "Englisch (Großbritannien)", "Englisch (Vereinigtes Königreic" },
146 {MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US), MAKELANGID(LANG_GERMAN, SUBLANG_DEFAULT),
147 TODO_NAME, "en-us", "Englisch (USA)"},
148 {MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_CAN), MAKELANGID(LANG_GERMAN, SUBLANG_DEFAULT),
149 TODO_NAME, "en-ca", "Englisch (Kanada)"},
150
151 {MAKELANGID(LANG_GERMAN, SUBLANG_DEFAULT), MAKELANGID(LANG_GERMAN, SUBLANG_DEFAULT),
152 TODO_NAME, "de", "Deutsch (Deutschland)"},
153 {MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN), MAKELANGID(LANG_GERMAN, SUBLANG_DEFAULT),
154 TODO_NAME, "de", "Deutsch (Deutschland)"},
155 {MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN_SWISS), MAKELANGID(LANG_GERMAN, SUBLANG_DEFAULT),
156 TODO_NAME, "de-ch", "Deutsch (Schweiz)"},
157 {MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN_AUSTRIAN), MAKELANGID(LANG_GERMAN, SUBLANG_DEFAULT),
158 TODO_NAME, "de-at", "Deutsch (Österreich)"},
159
160 {MAKELANGID(LANG_ENGLISH, SUBLANG_NEUTRAL), MAKELANGID(LANG_FRENCH, SUBLANG_DEFAULT),
161 TODO_NAME, "en", "Anglais"},
162 {MAKELANGID(LANG_ENGLISH, SUBLANG_DEFAULT), MAKELANGID(LANG_FRENCH, SUBLANG_DEFAULT),
163 TODO_NAME, "en-us", fr_enus, "Anglais (U.S.)"},
164 {MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_UK), MAKELANGID(LANG_FRENCH, SUBLANG_DEFAULT),
165 TODO_NAME, "en-gb", "Anglais (Royaume-Uni)"},
166 {MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US), MAKELANGID(LANG_FRENCH, SUBLANG_DEFAULT),
167 TODO_NAME, "en-us", fr_enus, "Anglais (U.S.)"},
168 {MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_CAN), MAKELANGID(LANG_FRENCH, SUBLANG_DEFAULT),
169 TODO_NAME, "en-ca", "Anglais (Canada)"},
170
171 {MAKELANGID(LANG_GERMAN, SUBLANG_DEFAULT), MAKELANGID(LANG_FRENCH, SUBLANG_DEFAULT),
172 TODO_NAME, "de", "Allemand (Allemagne)", "Allemand (Standard)"},
173 {MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN), MAKELANGID(LANG_FRENCH, SUBLANG_DEFAULT),
174 TODO_NAME, "de", "Allemand (Allemagne)", "Allemand (Standard)"},
175 {MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN_SWISS), MAKELANGID(LANG_FRENCH, SUBLANG_DEFAULT),
176 TODO_NAME, "de-ch", "Allemand (Suisse)"},
177 {MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN_AUSTRIAN), MAKELANGID(LANG_FRENCH, SUBLANG_DEFAULT),
178 TODO_NAME, "de-at", "Allemand (Autriche)"}
179
180 };
181
182 static BOOL init_function_ptrs(void)
183 {
184 HMODULE hMlang;
185
186 hMlang = LoadLibraryA("mlang.dll");
187 if (!hMlang)
188 {
189 skip("mlang not available\n");
190 return FALSE;
191 }
192
193 pConvertINetMultiByteToUnicode = (void *)GetProcAddress(hMlang, "ConvertINetMultiByteToUnicode");
194 pConvertINetUnicodeToMultiByte = (void *)GetProcAddress(hMlang, "ConvertINetUnicodeToMultiByte");
195
196 pGetCPInfoExA = (void *)GetProcAddress(GetModuleHandleA("kernel32.dll"), "GetCPInfoExA");
197
198 return TRUE;
199 }
200
201 #define ok_w2(format, szString1, szString2) \
202 \
203 if (lstrcmpW((szString1), (szString2)) != 0) \
204 { \
205 CHAR string1[256], string2[256]; \
206 WideCharToMultiByte(CP_ACP, 0, (szString1), -1, string1, 256, NULL, NULL); \
207 WideCharToMultiByte(CP_ACP, 0, (szString2), -1, string2, 256, NULL, NULL); \
208 ok(0, (format), string1, string2); \
209 }
210
211 static void test_multibyte_to_unicode_translations(IMultiLanguage2 *iML2)
212 {
213 /* these APIs are broken regarding constness of the input buffer */
214 char stringA[] = "Just a test string\0"; /* double 0 for CP_UNICODE tests */
215 WCHAR stringW[] = {'J','u','s','t',' ','a',' ','t','e','s','t',' ','s','t','r','i','n','g',0};
216 char bufA[256];
217 WCHAR bufW[256];
218 UINT lenA, lenW, expected_len;
219 HRESULT ret;
220
221 /* IMultiLanguage2_ConvertStringToUnicode tests */
222
223 memset(bufW, 'x', sizeof(bufW));
224 lenA = 0;
225 lenW = sizeof(bufW)/sizeof(bufW[0]);
226 ret = IMultiLanguage2_ConvertStringToUnicode(iML2, NULL, 1252, stringA, &lenA, bufW, &lenW);
227 ok(ret == S_OK, "IMultiLanguage2_ConvertStringToUnicode failed: %08x\n", ret);
228 ok(lenA == 0, "expected lenA 0, got %u\n", lenA);
229 ok(lenW == 0, "expected lenW 0, got %u\n", lenW);
230
231 memset(bufW, 'x', sizeof(bufW));
232 lenA = -1;
233 lenW = sizeof(bufW)/sizeof(bufW[0]);
234 ret = IMultiLanguage2_ConvertStringToUnicode(iML2, NULL, 1252, stringA, &lenA, bufW, &lenW);
235 ok(ret == S_OK, "IMultiLanguage2_ConvertStringToUnicode failed: %08x\n", ret);
236 ok(lenA == lstrlenA(stringA), "expected lenA %u, got %u\n", lstrlenA(stringA), lenA);
237 ok(lenW == lstrlenW(stringW), "expected lenW %u, got %u\n", lstrlenW(stringW), lenW);
238 if (lenW < sizeof(bufW)/sizeof(bufW[0])) {
239 /* can only happen if the convert call fails */
240 ok(bufW[lenW] != 0, "buf should not be 0 terminated\n");
241 bufW[lenW] = 0; /* -1 doesn't include 0 terminator */
242 }
243 ok(!lstrcmpW(bufW, stringW), "bufW/stringW mismatch\n");
244
245 memset(bufW, 'x', sizeof(bufW));
246 lenA = -1;
247 lenW = 5;
248 ret = IMultiLanguage2_ConvertStringToUnicode(iML2, NULL, 1252, stringA, &lenA, bufW, &lenW);
249 ok(ret == E_FAIL, "IMultiLanguage2_ConvertStringToUnicode should fail: %08x\n", ret);
250 ok(lenW == 0, "expected lenW 0, got %u\n", lenW);
251 /* still has to do partial conversion */
252 ok(!memcmp(bufW, stringW, 5 * sizeof(WCHAR)), "bufW/stringW mismatch\n");
253
254 memset(bufW, 'x', sizeof(bufW));
255 lenA = -1;
256 lenW = sizeof(bufW)/sizeof(bufW[0]);
257 ret = IMultiLanguage2_ConvertStringToUnicode(iML2, NULL, CP_UNICODE, stringA, &lenA, bufW, &lenW);
258 ok(ret == S_OK, "IMultiLanguage2_ConvertStringToUnicode failed: %08x\n", ret);
259 ok(lenA == lstrlenA(stringA), "expected lenA %u, got %u\n", lstrlenA(stringA), lenA);
260 ok(lenW == lstrlenW(stringW)/(int)sizeof(WCHAR), "wrong lenW %u\n", lenW);
261 ok(bufW[lenW] != 0, "buf should not be 0 terminated\n");
262 bufW[lenW] = 0; /* -1 doesn't include 0 terminator */
263 ok(!lstrcmpA((LPCSTR)bufW, stringA), "bufW/stringA mismatch\n");
264
265 memset(bufW, 'x', sizeof(bufW));
266 lenA = lstrlenA(stringA);
267 lenW = 0;
268 ret = IMultiLanguage2_ConvertStringToUnicode(iML2, NULL, 1252, stringA, &lenA, NULL, &lenW);
269 ok(ret == S_OK, "IMultiLanguage2_ConvertStringToUnicode failed: %08x\n", ret);
270 ok(lenA == lstrlenA(stringA), "expected lenA %u, got %u\n", lstrlenA(stringA), lenA);
271 expected_len = MultiByteToWideChar(1252, 0, stringA, lenA, NULL, 0);
272 ok(lenW == expected_len, "expected lenW %u, got %u\n", expected_len, lenW);
273
274 memset(bufW, 'x', sizeof(bufW));
275 lenA = lstrlenA(stringA);
276 lenW = sizeof(bufW)/sizeof(bufW[0]);
277 ret = pConvertINetMultiByteToUnicode(NULL, 1252, stringA, (INT *)&lenA, NULL, (INT *)&lenW);
278 ok(ret == S_OK, "ConvertINetMultiByteToUnicode failed: %08x\n", ret);
279 ok(lenA == lstrlenA(stringA), "expected lenA %u, got %u\n", lstrlenA(stringA), lenA);
280 expected_len = MultiByteToWideChar(1252, 0, stringA, lenA, NULL, 0);
281 ok(lenW == expected_len, "expected lenW %u, got %u\n", expected_len, lenW);
282
283 memset(bufW, 'x', sizeof(bufW));
284 lenA = lstrlenA(stringA);
285 lenW = 0;
286 ret = pConvertINetMultiByteToUnicode(NULL, 1252, stringA, (INT *)&lenA, NULL, (INT *)&lenW);
287 ok(ret == S_OK, "ConvertINetMultiByteToUnicode failed: %08x\n", ret);
288 ok(lenA == lstrlenA(stringA), "expected lenA %u, got %u\n", lstrlenA(stringA), lenA);
289 expected_len = MultiByteToWideChar(1252, 0, stringA, lenA, NULL, 0);
290 ok(lenW == expected_len, "expected lenW %u, got %u\n", expected_len, lenW);
291
292 /* IMultiLanguage2_ConvertStringFromUnicode tests */
293
294 memset(bufA, 'x', sizeof(bufA));
295 lenW = 0;
296 lenA = sizeof(bufA);
297 ret = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, stringW, &lenW, bufA, &lenA);
298 ok(ret == S_OK, "IMultiLanguage2_ConvertStringFromUnicode failed: %08x\n", ret);
299 ok(lenA == 0, "expected lenA 0, got %u\n", lenA);
300 ok(lenW == 0, "expected lenW 0, got %u\n", lenW);
301
302 memset(bufA, 'x', sizeof(bufA));
303 lenW = -1;
304 lenA = sizeof(bufA);
305 ret = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, stringW, &lenW, bufA, &lenA);
306 ok(ret == S_OK, "IMultiLanguage2_ConvertStringFromUnicode failed: %08x\n", ret);
307 ok(lenA == lstrlenA(stringA), "expected lenA %u, got %u\n", lstrlenA(stringA), lenA);
308 ok(lenW == lstrlenW(stringW), "expected lenW %u, got %u\n", lstrlenW(stringW), lenW);
309 ok(bufA[lenA] != 0, "buf should not be 0 terminated\n");
310 bufA[lenA] = 0; /* -1 doesn't include 0 terminator */
311 ok(!lstrcmpA(bufA, stringA), "bufA/stringA mismatch\n");
312
313 memset(bufA, 'x', sizeof(bufA));
314 lenW = -1;
315 lenA = 5;
316 ret = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, stringW, &lenW, bufA, &lenA);
317 ok(ret == E_FAIL, "IMultiLanguage2_ConvertStringFromUnicode should fail: %08x\n", ret);
318 ok(lenA == 0, "expected lenA 0, got %u\n", lenA);
319 /* still has to do partial conversion */
320 ok(!memcmp(bufA, stringA, 5), "bufW/stringW mismatch\n");
321
322 memset(bufA, 'x', sizeof(bufA));
323 lenW = -1;
324 lenA = sizeof(bufA);
325 ret = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, CP_UNICODE, stringW, &lenW, bufA, &lenA);
326 ok(ret == S_OK, "IMultiLanguage2_ConvertStringFromUnicode failed: %08x\n", ret);
327 ok(lenA == lstrlenA(stringA) * (int)sizeof(WCHAR), "wrong lenA %u\n", lenA);
328 ok(lenW == lstrlenW(stringW), "expected lenW %u, got %u\n", lstrlenW(stringW), lenW);
329 ok(bufA[lenA] != 0 && bufA[lenA+1] != 0, "buf should not be 0 terminated\n");
330 bufA[lenA] = 0; /* -1 doesn't include 0 terminator */
331 bufA[lenA+1] = 0; /* sizeof(WCHAR) */
332 ok(!lstrcmpW((LPCWSTR)bufA, stringW), "bufA/stringW mismatch\n");
333
334 memset(bufA, 'x', sizeof(bufA));
335 lenW = lstrlenW(stringW);
336 lenA = 0;
337 ret = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, stringW, &lenW, NULL, &lenA);
338 ok(ret == S_OK, "IMultiLanguage2_ConvertStringFromUnicode failed: %08x\n", ret);
339 ok(lenW == lstrlenW(stringW), "expected lenW %u, got %u\n", lstrlenW(stringW), lenW);
340 expected_len = WideCharToMultiByte(1252, 0, stringW, lenW, NULL, 0, NULL, NULL);
341 ok(lenA == expected_len, "expected lenA %u, got %u\n", expected_len, lenA);
342 }
343
344 static void cpinfo_cmp(MIMECPINFO *cpinfo1, MIMECPINFO *cpinfo2)
345 {
346 ok(cpinfo1->dwFlags == cpinfo2->dwFlags, "dwFlags mismatch: %08x != %08x\n", cpinfo1->dwFlags, cpinfo2->dwFlags);
347 ok(cpinfo1->uiCodePage == cpinfo2->uiCodePage, "uiCodePage mismatch: %u != %u\n", cpinfo1->uiCodePage, cpinfo2->uiCodePage);
348 ok(cpinfo1->uiFamilyCodePage == cpinfo2->uiFamilyCodePage, "uiFamilyCodePage mismatch: %u != %u\n", cpinfo1->uiFamilyCodePage, cpinfo2->uiFamilyCodePage);
349 ok(!lstrcmpW(cpinfo1->wszDescription, cpinfo2->wszDescription), "wszDescription mismatch\n");
350 ok(!lstrcmpW(cpinfo1->wszWebCharset, cpinfo2->wszWebCharset), "wszWebCharset mismatch\n");
351 ok(!lstrcmpW(cpinfo1->wszHeaderCharset, cpinfo2->wszHeaderCharset), "wszHeaderCharset mismatch\n");
352 ok(!lstrcmpW(cpinfo1->wszBodyCharset, cpinfo2->wszBodyCharset), "wszBodyCharset mismatch\n");
353 ok(!lstrcmpW(cpinfo1->wszFixedWidthFont, cpinfo2->wszFixedWidthFont), "wszFixedWidthFont mismatch\n");
354 ok(!lstrcmpW(cpinfo1->wszProportionalFont, cpinfo2->wszProportionalFont), "wszProportionalFont mismatch\n");
355 ok(cpinfo1->bGDICharset == cpinfo2->bGDICharset, "bGDICharset mismatch: %d != %d\n", cpinfo1->bGDICharset, cpinfo2->bGDICharset);
356 }
357
358 #ifdef DUMP_CP_INFO
359 static const char *dump_mime_flags(DWORD flags)
360 {
361 static char buf[1024];
362
363 buf[0] = 0;
364
365 if (flags & MIMECONTF_MAILNEWS) strcat(buf, " MIMECONTF_MAILNEWS");
366 if (flags & MIMECONTF_BROWSER) strcat(buf, " MIMECONTF_BROWSER");
367 if (flags & MIMECONTF_MINIMAL) strcat(buf, " MIMECONTF_MINIMAL");
368 if (flags & MIMECONTF_IMPORT) strcat(buf, " MIMECONTF_IMPORT");
369 if (flags & MIMECONTF_SAVABLE_MAILNEWS) strcat(buf, " MIMECONTF_SAVABLE_MAILNEWS");
370 if (flags & MIMECONTF_SAVABLE_BROWSER) strcat(buf, " MIMECONTF_SAVABLE_BROWSER");
371 if (flags & MIMECONTF_EXPORT) strcat(buf, " MIMECONTF_EXPORT");
372 if (flags & MIMECONTF_PRIVCONVERTER) strcat(buf, " MIMECONTF_PRIVCONVERTER");
373 if (flags & MIMECONTF_VALID) strcat(buf, " MIMECONTF_VALID");
374 if (flags & MIMECONTF_VALID_NLS) strcat(buf, " MIMECONTF_VALID_NLS");
375 if (flags & MIMECONTF_MIME_IE4) strcat(buf, " MIMECONTF_MIME_IE4");
376 if (flags & MIMECONTF_MIME_LATEST) strcat(buf, " MIMECONTF_MIME_LATEST");
377 if (flags & MIMECONTF_MIME_REGISTRY) strcat(buf, " MIMECONTF_MIME_REGISTRY");
378
379 return buf;
380 }
381 #endif
382
383 static HRESULT check_convertible(IMultiLanguage2 *iML2, UINT from, UINT to)
384 {
385 CHAR convert[MAX_PATH];
386 BYTE dest[MAX_PATH];
387 HRESULT hr;
388 UINT srcsz, destsz;
389
390 static WCHAR strW[] = {'a','b','c',0};
391
392 /* Check to see if the target codepage has these characters or not */
393 if (from != CP_UTF8)
394 {
395 BOOL fDefaultChar;
396 char ch[10];
397 int cb;
398 cb = WideCharToMultiByte( from, WC_NO_BEST_FIT_CHARS | WC_COMPOSITECHECK | WC_DEFAULTCHAR,
399 strW, 3, ch, sizeof(ch), NULL, &fDefaultChar);
400
401 if(cb == 0 || fDefaultChar)
402 {
403 trace("target codepage %i does not contain 'abc'\n",from);
404 return E_FAIL;
405 }
406 }
407
408 srcsz = lstrlenW(strW) + 1;
409 destsz = MAX_PATH;
410 hr = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, from, strW,
411 &srcsz, convert, &destsz);
412 if (hr != S_OK)
413 return S_FALSE;
414
415 srcsz = -1;
416 destsz = MAX_PATH;
417 hr = IMultiLanguage2_ConvertString(iML2, NULL, from, to, (BYTE *)convert,
418 &srcsz, dest, &destsz);
419 if (hr != S_OK)
420 return S_FALSE;
421
422 return S_OK;
423 }
424
425 static void test_EnumCodePages(IMultiLanguage2 *iML2, DWORD flags)
426 {
427 IEnumCodePage *iEnumCP = NULL;
428 MIMECPINFO *cpinfo;
429 MIMECPINFO cpinfo2;
430 HRESULT ret;
431 ULONG i, n;
432 UINT total;
433
434 total = 0;
435 ret = IMultiLanguage2_GetNumberOfCodePageInfo(iML2, &total);
436 ok(ret == S_OK && total != 0, "IMultiLanguage2_GetNumberOfCodePageInfo: expected S_OK/!0, got %08x/%u\n", ret, total);
437
438 trace("total mlang supported codepages %u\n", total);
439
440 ret = IMultiLanguage2_EnumCodePages(iML2, flags, LANG_NEUTRAL, &iEnumCP);
441 ok(ret == S_OK && iEnumCP, "IMultiLanguage2_EnumCodePages: expected S_OK/!NULL, got %08x/%p\n", ret, iEnumCP);
442
443 ret = IEnumCodePage_Reset(iEnumCP);
444 ok(ret == S_OK, "IEnumCodePage_Reset: expected S_OK, got %08x\n", ret);
445 n = 65536;
446 ret = IEnumCodePage_Next(iEnumCP, 0, NULL, &n);
447 if (ret == S_FALSE)
448 ok(n == 0 && ret == S_FALSE, "IEnumCodePage_Next: expected 0/S_FALSE, got %u/%08x\n", n, ret);
449 else if (ret == E_FAIL)
450 ok(n == 65536 && ret == E_FAIL, "IEnumCodePage_Next: expected 65536/E_FAIL, got %u/%08x\n", n, ret);
451 ret = IEnumCodePage_Next(iEnumCP, 0, NULL, NULL);
452 if (ret == S_FALSE)
453 ok(ret == S_FALSE, "IEnumCodePage_Next: expected S_FALSE, got %08x\n", ret);
454 else if (ret == E_FAIL)
455 ok(n == 65536 && ret == E_FAIL, "IEnumCodePage_Next: expected 65536/E_FAIL, got %u/%08x\n", n, ret);
456
457 cpinfo = HeapAlloc(GetProcessHeap(), 0, sizeof(*cpinfo) * total * 2);
458
459 n = total * 2;
460 ret = IEnumCodePage_Next(iEnumCP, 0, cpinfo, &n);
461 ok(ret == S_FALSE && n == 0, "IEnumCodePage_Next: expected S_FALSE/0, got %08x/%u\n", ret, n);
462
463 n = total * 2;
464 ret = IEnumCodePage_Next(iEnumCP, n, cpinfo, &n);
465 ok(ret == S_OK && n != 0, "IEnumCodePage_Next: expected S_OK/!0, got %08x/%u\n", ret, n);
466
467 trace("flags %08x, enumerated codepages %u\n", flags, n);
468
469 if (!flags)
470 {
471 ok(n == total, "IEnumCodePage_Next: expected %u, got %u\n", total, n);
472
473 flags = MIMECONTF_MIME_LATEST;
474 }
475
476 total = n;
477
478 for (i = 0; i < n; i++)
479 {
480 CHARSETINFO csi;
481 MIMECSETINFO mcsi;
482 HRESULT convertible = S_OK;
483 static const WCHAR autoW[] = {'_','a','u','t','o',0};
484 static const WCHAR feffW[] = {'u','n','i','c','o','d','e','F','E','F','F',0};
485
486 #ifdef DUMP_CP_INFO
487 trace("MIMECPINFO #%u:\n"
488 "dwFlags %08x %s\n"
489 "uiCodePage %u\n"
490 "uiFamilyCodePage %u\n"
491 "wszDescription %s\n"
492 "wszWebCharset %s\n"
493 "wszHeaderCharset %s\n"
494 "wszBodyCharset %s\n"
495 "wszFixedWidthFont %s\n"
496 "wszProportionalFont %s\n"
497 "bGDICharset %d\n\n",
498 i,
499 cpinfo[i].dwFlags, dump_mime_flags(cpinfo[i].dwFlags),
500 cpinfo[i].uiCodePage,
501 cpinfo[i].uiFamilyCodePage,
502 wine_dbgstr_w(cpinfo[i].wszDescription),
503 wine_dbgstr_w(cpinfo[i].wszWebCharset),
504 wine_dbgstr_w(cpinfo[i].wszHeaderCharset),
505 wine_dbgstr_w(cpinfo[i].wszBodyCharset),
506 wine_dbgstr_w(cpinfo[i].wszFixedWidthFont),
507 wine_dbgstr_w(cpinfo[i].wszProportionalFont),
508 cpinfo[i].bGDICharset);
509 #endif
510 ok(cpinfo[i].dwFlags & flags, "enumerated flags %08x do not include requested %08x\n", cpinfo[i].dwFlags, flags);
511
512 if (TranslateCharsetInfo((DWORD *)(INT_PTR)cpinfo[i].uiFamilyCodePage, &csi, TCI_SRCCODEPAGE))
513 ok(cpinfo[i].bGDICharset == csi.ciCharset, "%d != %d\n", cpinfo[i].bGDICharset, csi.ciCharset);
514 else
515 if (winetest_debug > 1)
516 trace("TranslateCharsetInfo failed for cp %u\n", cpinfo[i].uiFamilyCodePage);
517
518 #ifdef DUMP_CP_INFO
519 trace("%u: codepage %u family %u\n", i, cpinfo[i].uiCodePage, cpinfo[i].uiFamilyCodePage);
520 #endif
521 /* Win95 does not support UTF-7 */
522 if (cpinfo[i].uiCodePage == CP_UTF7) continue;
523
524 /* support files for some codepages might be not installed, or
525 * the codepage is just an alias.
526 */
527 if (IsValidCodePage(cpinfo[i].uiCodePage))
528 {
529 ret = IMultiLanguage2_IsConvertible(iML2, cpinfo[i].uiCodePage, CP_UNICODE);
530 ok(ret == S_OK, "IMultiLanguage2_IsConvertible(%u -> CP_UNICODE) = %08x\n", cpinfo[i].uiCodePage, ret);
531 ret = IMultiLanguage2_IsConvertible(iML2, CP_UNICODE, cpinfo[i].uiCodePage);
532 ok(ret == S_OK, "IMultiLanguage2_IsConvertible(CP_UNICODE -> %u) = %08x\n", cpinfo[i].uiCodePage, ret);
533
534 convertible = check_convertible(iML2, cpinfo[i].uiCodePage, CP_UTF8);
535 if (convertible != E_FAIL)
536 {
537 ret = IMultiLanguage2_IsConvertible(iML2, cpinfo[i].uiCodePage, CP_UTF8);
538 ok(ret == convertible, "IMultiLanguage2_IsConvertible(%u -> CP_UTF8) = %08x\n", cpinfo[i].uiCodePage, ret);
539 ret = IMultiLanguage2_IsConvertible(iML2, CP_UTF8, cpinfo[i].uiCodePage);
540 ok(ret == convertible, "IMultiLanguage2_IsConvertible(CP_UTF8 -> %u) = %08x\n", cpinfo[i].uiCodePage, ret);
541 }
542 }
543 else
544 if (winetest_debug > 1)
545 trace("IsValidCodePage failed for cp %u\n", cpinfo[i].uiCodePage);
546
547 if (memcmp(cpinfo[i].wszWebCharset,feffW,sizeof(WCHAR)*11)==0)
548 skip("Legacy windows bug returning invalid charset of unicodeFEFF\n");
549 else
550 {
551 ret = IMultiLanguage2_GetCharsetInfo(iML2, cpinfo[i].wszWebCharset, &mcsi);
552 /* _autoxxx charsets are a fake and GetCharsetInfo fails for them */
553 if (memcmp(cpinfo[i].wszWebCharset, autoW, 5 * sizeof(WCHAR)))
554 {
555 ok (ret == S_OK, "IMultiLanguage2_GetCharsetInfo failed: %08x\n", ret);
556 #ifdef DUMP_CP_INFO
557 trace("%s: %u %u %s\n", wine_dbgstr_w(cpinfo[i].wszWebCharset), mcsi.uiCodePage, mcsi.uiInternetEncoding, wine_dbgstr_w(mcsi.wszCharset));
558 #endif
559 ok(!lstrcmpiW(cpinfo[i].wszWebCharset, mcsi.wszCharset),
560 #ifdef DUMP_CP_INFO
561 "%s != %s\n",
562 wine_dbgstr_w(cpinfo[i].wszWebCharset), wine_dbgstr_w(mcsi.wszCharset));
563 #else
564 "wszWebCharset mismatch\n");
565 #endif
566
567 if (0)
568 {
569 /* native mlang returns completely messed up encodings in some cases */
570 ok(mcsi.uiInternetEncoding == cpinfo[i].uiCodePage || mcsi.uiInternetEncoding == cpinfo[i].uiFamilyCodePage,
571 "%u != %u || %u\n", mcsi.uiInternetEncoding, cpinfo[i].uiCodePage, cpinfo[i].uiFamilyCodePage);
572 ok(mcsi.uiCodePage == cpinfo[i].uiCodePage || mcsi.uiCodePage == cpinfo[i].uiFamilyCodePage,
573 "%u != %u || %u\n", mcsi.uiCodePage, cpinfo[i].uiCodePage, cpinfo[i].uiFamilyCodePage);
574 }
575 }
576 }
577
578 if (memcmp(cpinfo[i].wszHeaderCharset,feffW,sizeof(WCHAR)*11)==0)
579 skip("Legacy windows bug returning invalid charset of unicodeFEFF\n");
580 else
581 {
582 ret = IMultiLanguage2_GetCharsetInfo(iML2, cpinfo[i].wszHeaderCharset, &mcsi);
583 /* _autoxxx charsets are a fake and GetCharsetInfo fails for them */
584 if (memcmp(cpinfo[i].wszHeaderCharset, autoW, 5 * sizeof(WCHAR)))
585 {
586 ok (ret == S_OK, "IMultiLanguage2_GetCharsetInfo failed: %08x\n", ret);
587 #ifdef DUMP_CP_INFO
588 trace("%s: %u %u %s\n", wine_dbgstr_w(cpinfo[i].wszHeaderCharset), mcsi.uiCodePage, mcsi.uiInternetEncoding, wine_dbgstr_w(mcsi.wszCharset));
589 #endif
590 ok(!lstrcmpiW(cpinfo[i].wszHeaderCharset, mcsi.wszCharset),
591 #ifdef DUMP_CP_INFO
592 "%s != %s\n",
593 wine_dbgstr_w(cpinfo[i].wszHeaderCharset), wine_dbgstr_w(mcsi.wszCharset));
594 #else
595 "wszHeaderCharset mismatch\n");
596 #endif
597
598 if (0)
599 {
600 /* native mlang returns completely messed up encodings in some cases */
601 ok(mcsi.uiInternetEncoding == cpinfo[i].uiCodePage || mcsi.uiInternetEncoding == cpinfo[i].uiFamilyCodePage,
602 "%u != %u || %u\n", mcsi.uiInternetEncoding, cpinfo[i].uiCodePage, cpinfo[i].uiFamilyCodePage);
603 ok(mcsi.uiCodePage == cpinfo[i].uiCodePage || mcsi.uiCodePage == cpinfo[i].uiFamilyCodePage,
604 "%u != %u || %u\n", mcsi.uiCodePage, cpinfo[i].uiCodePage, cpinfo[i].uiFamilyCodePage);
605 }
606 }
607 }
608
609 if (memcmp(cpinfo[i].wszBodyCharset,feffW,sizeof(WCHAR)*11)==0)
610 skip("Legacy windows bug returning invalid charset of unicodeFEFF\n");
611 else
612 {
613 ret = IMultiLanguage2_GetCharsetInfo(iML2, cpinfo[i].wszBodyCharset, &mcsi);
614 /* _autoxxx charsets are a fake and GetCharsetInfo fails for them */
615 if (memcmp(cpinfo[i].wszBodyCharset, autoW, 5 * sizeof(WCHAR)))
616 {
617 ok (ret == S_OK, "IMultiLanguage2_GetCharsetInfo failed: %08x\n", ret);
618 #ifdef DUMP_CP_INFO
619 trace("%s: %u %u %s\n", wine_dbgstr_w(cpinfo[i].wszBodyCharset), mcsi.uiCodePage, mcsi.uiInternetEncoding, wine_dbgstr_w(mcsi.wszCharset));
620 #endif
621 ok(!lstrcmpiW(cpinfo[i].wszBodyCharset, mcsi.wszCharset),
622 #ifdef DUMP_CP_INFO
623 "%s != %s\n",
624 wine_dbgstr_w(cpinfo[i].wszBodyCharset), wine_dbgstr_w(mcsi.wszCharset));
625 #else
626 "wszBodyCharset mismatch\n");
627 #endif
628
629 if (0)
630 {
631 /* native mlang returns completely messed up encodings in some cases */
632 ok(mcsi.uiInternetEncoding == cpinfo[i].uiCodePage || mcsi.uiInternetEncoding == cpinfo[i].uiFamilyCodePage,
633 "%u != %u || %u\n", mcsi.uiInternetEncoding, cpinfo[i].uiCodePage, cpinfo[i].uiFamilyCodePage);
634 ok(mcsi.uiCodePage == cpinfo[i].uiCodePage || mcsi.uiCodePage == cpinfo[i].uiFamilyCodePage,
635 "%u != %u || %u\n", mcsi.uiCodePage, cpinfo[i].uiCodePage, cpinfo[i].uiFamilyCodePage);
636 }
637 }
638 }
639 }
640
641 /* now IEnumCodePage_Next should fail, since pointer is at the end */
642 n = 1;
643 ret = IEnumCodePage_Next(iEnumCP, 1, &cpinfo2, &n);
644 ok(ret == S_FALSE && n == 0, "IEnumCodePage_Next: expected S_FALSE/0, got %08x/%u\n", ret, n);
645
646 ret = IEnumCodePage_Reset(iEnumCP);
647 ok(ret == S_OK, "IEnumCodePage_Reset: expected S_OK, got %08x\n", ret);
648 n = 0;
649 ret = IEnumCodePage_Next(iEnumCP, 1, &cpinfo2, &n);
650 ok(n == 1 && ret == S_OK, "IEnumCodePage_Next: expected 1/S_OK, got %u/%08x\n", n, ret);
651 cpinfo_cmp(&cpinfo[0], &cpinfo2);
652
653 if (0)
654 {
655 /* Due to a bug in MS' implementation of IEnumCodePage_Skip
656 * it's not used here.
657 */
658 ret = IEnumCodePage_Skip(iEnumCP, 1);
659 ok(ret == S_OK, "IEnumCodePage_Skip: expected S_OK, got %08x\n", ret);
660 }
661 for (i = 0; i < total - 1; i++)
662 {
663 n = 0;
664 ret = IEnumCodePage_Next(iEnumCP, 1, &cpinfo2, &n);
665 ok(n == 1 && ret == S_OK, "IEnumCodePage_Next: expected 1/S_OK, got %u/%08x\n", n, ret);
666 cpinfo_cmp(&cpinfo[i + 1], &cpinfo2);
667 }
668
669 HeapFree(GetProcessHeap(), 0, cpinfo);
670 IEnumCodePage_Release(iEnumCP);
671 }
672
673 static void scriptinfo_cmp(SCRIPTINFO *sinfo1, SCRIPTINFO *sinfo2)
674 {
675 ok(sinfo1->ScriptId == sinfo2->ScriptId, "ScriptId mismatch: %d != %d\n", sinfo1->ScriptId, sinfo2->ScriptId);
676 ok(sinfo1->uiCodePage == sinfo2->uiCodePage, "uiCodePage mismatch: %u != %u\n", sinfo1->uiCodePage, sinfo2->uiCodePage);
677 ok(!lstrcmpW(sinfo1->wszDescription, sinfo2->wszDescription), "wszDescription mismatch\n");
678 ok(!lstrcmpW(sinfo1->wszFixedWidthFont, sinfo2->wszFixedWidthFont), "wszFixedWidthFont mismatch\n");
679 ok(!lstrcmpW(sinfo1->wszProportionalFont, sinfo2->wszProportionalFont), "wszProportionalFont mismatch\n");
680 }
681
682 static void test_EnumScripts(IMultiLanguage2 *iML2, DWORD flags)
683 {
684 IEnumScript *iEnumScript = NULL;
685 SCRIPTINFO *sinfo;
686 SCRIPTINFO sinfo2;
687 HRESULT ret;
688 ULONG i, n;
689 UINT total;
690
691 total = 0;
692 ret = IMultiLanguage2_GetNumberOfScripts(iML2, &total);
693 ok(ret == S_OK && total != 0, "IMultiLanguage2_GetNumberOfScripts: expected S_OK/!0, got %08x/%u\n", ret, total);
694
695 trace("total mlang supported scripts %u\n", total);
696
697 ret = IMultiLanguage2_EnumScripts(iML2, flags, LANG_NEUTRAL, &iEnumScript);
698 ok(ret == S_OK && iEnumScript, "IMultiLanguage2_EnumScripts: expected S_OK/!NULL, got %08x/%p\n", ret, iEnumScript);
699
700 ret = IEnumScript_Reset(iEnumScript);
701 ok(ret == S_OK, "IEnumScript_Reset: expected S_OK, got %08x\n", ret);
702 n = 65536;
703 ret = IEnumScript_Next(iEnumScript, 0, NULL, &n);
704 ok(n == 65536 && ret == E_FAIL, "IEnumScript_Next: expected 65536/E_FAIL, got %u/%08x\n", n, ret);
705 ret = IEnumScript_Next(iEnumScript, 0, NULL, NULL);
706 ok(ret == E_FAIL, "IEnumScript_Next: expected E_FAIL, got %08x\n", ret);
707
708 sinfo = HeapAlloc(GetProcessHeap(), 0, sizeof(*sinfo) * total * 2);
709
710 n = total * 2;
711 ret = IEnumScript_Next(iEnumScript, 0, sinfo, &n);
712 ok(ret == S_FALSE && n == 0, "IEnumScript_Next: expected S_FALSE/0, got %08x/%u\n", ret, n);
713
714 n = total * 2;
715 ret = IEnumScript_Next(iEnumScript, n, sinfo, &n);
716 ok(ret == S_OK && n != 0, "IEnumScript_Next: expected S_OK, got %08x/%u\n", ret, n);
717
718 trace("flags %08x, enumerated scripts %u\n", flags, n);
719
720 if (!flags)
721 {
722 ok(n == total, "IEnumScript_Next: expected %u, got %u\n", total, n);
723 flags = SCRIPTCONTF_SCRIPT_USER | SCRIPTCONTF_SCRIPT_HIDE | SCRIPTCONTF_SCRIPT_SYSTEM;
724 }
725
726 total = n;
727
728 for (i = 0; pGetCPInfoExA && i < n; i++)
729 {
730 #ifdef DUMP_SCRIPT_INFO
731 trace("SCRIPTINFO #%u:\n"
732 "ScriptId %08x\n"
733 "uiCodePage %u\n"
734 "wszDescription %s\n"
735 "wszFixedWidthFont %s\n"
736 "wszProportionalFont %s\n\n",
737 i,
738 sinfo[i].ScriptId,
739 sinfo[i].uiCodePage,
740 wine_dbgstr_w(sinfo[i].wszDescription),
741 wine_dbgstr_w(sinfo[i].wszFixedWidthFont),
742 wine_dbgstr_w(sinfo[i].wszProportionalFont));
743 trace("%u codepage %u\n", i, sinfo[i].uiCodePage);
744 #endif
745 }
746
747 /* now IEnumScript_Next should fail, since pointer is at the end */
748 n = 1;
749 ret = IEnumScript_Next(iEnumScript, 1, &sinfo2, &n);
750 ok(ret == S_FALSE && n == 0, "IEnumScript_Next: expected S_FALSE/0, got %08x/%u\n", ret, n);
751
752 ret = IEnumScript_Reset(iEnumScript);
753 ok(ret == S_OK, "IEnumScript_Reset: expected S_OK, got %08x\n", ret);
754 n = 0;
755 ret = IEnumScript_Next(iEnumScript, 1, &sinfo2, &n);
756 ok(n == 1 && ret == S_OK, "IEnumScript_Next: expected 1/S_OK, got %u/%08x\n", n, ret);
757 scriptinfo_cmp(&sinfo[0], &sinfo2);
758
759 if (0)
760 {
761 /* Due to a bug in MS' implementation of IEnumScript_Skip
762 * it's not used here.
763 */
764 ret = IEnumScript_Skip(iEnumScript, 1);
765 ok(ret == S_OK, "IEnumScript_Skip: expected S_OK, got %08x\n", ret);
766 }
767 for (i = 0; i < total - 1; i++)
768 {
769 n = 0;
770 ret = IEnumScript_Next(iEnumScript, 1, &sinfo2, &n);
771 ok(n == 1 && ret == S_OK, "IEnumScript_Next: expected 1/S_OK, got %u/%08x\n", n, ret);
772 scriptinfo_cmp(&sinfo[i + 1], &sinfo2);
773 }
774
775 HeapFree(GetProcessHeap(), 0, sinfo);
776 IEnumScript_Release(iEnumScript);
777 }
778
779 static void IMLangFontLink_Test(IMLangFontLink* iMLFL)
780 {
781 DWORD dwCodePages, dwManyCodePages;
782 DWORD dwCmpCodePages;
783 UINT CodePage;
784 static const WCHAR str[3] = { 'd', 0x0436, 0xff90 };
785 LONG processed;
786 HRESULT ret;
787
788 dwCodePages = ~0u;
789 ret = IMLangFontLink_CodePageToCodePages(iMLFL, -1, &dwCodePages);
790 ok(ret == E_FAIL, "IMLangFontLink_CodePageToCodePages should fail: %x\n", ret);
791 ok(dwCodePages == 0, "expected 0, got %u\n", dwCodePages);
792
793 dwCodePages = 0;
794 ret = IMLangFontLink_CodePageToCodePages(iMLFL, 932, &dwCodePages);
795 ok(ret == S_OK, "IMLangFontLink_CodePageToCodePages error %x\n", ret);
796 ok(dwCodePages == FS_JISJAPAN, "expected FS_JISJAPAN, got %08x\n", dwCodePages);
797 CodePage = 0;
798 ret = IMLangFontLink_CodePagesToCodePage(iMLFL, dwCodePages, 1035, &CodePage);
799 ok(ret == S_OK, "IMLangFontLink_CodePagesToCodePage error %x\n", ret);
800 ok(CodePage == 932, "Incorrect CodePage Returned (%i)\n",CodePage);
801
802 dwManyCodePages = 0;
803 ret = IMLangFontLink_CodePageToCodePages(iMLFL, 1252, &dwManyCodePages);
804 ok(ret == S_OK, "IMLangFontLink_CodePageToCodePages error %x\n", ret);
805 ok(dwManyCodePages == FS_LATIN1, "expected FS_LATIN1, got %08x\n", dwManyCodePages);
806 dwCodePages = 0;
807 ret = IMLangFontLink_CodePageToCodePages(iMLFL, 1256, &dwCodePages);
808 ok(ret == S_OK, "IMLangFontLink_CodePageToCodePages error %x\n", ret);
809 ok(dwCodePages == FS_ARABIC, "expected FS_ARABIC, got %08x\n", dwCodePages);
810 dwManyCodePages |= dwCodePages;
811 ret = IMLangFontLink_CodePageToCodePages(iMLFL, 874, &dwCodePages);
812 ok(ret == S_OK, "IMLangFontLink_CodePageToCodePages error %x\n", ret);
813 ok(dwCodePages == FS_THAI, "expected FS_THAI, got %08x\n", dwCodePages);
814 dwManyCodePages |= dwCodePages;
815
816 ret = IMLangFontLink_CodePagesToCodePage(iMLFL, dwManyCodePages, 1256, &CodePage);
817 ok(ret == S_OK, "IMLangFontLink_CodePagesToCodePage error %x\n", ret);
818 ok(CodePage == 1256, "Incorrect CodePage Returned (%i)\n",CodePage);
819
820 ret = IMLangFontLink_CodePagesToCodePage(iMLFL, dwManyCodePages, 936, &CodePage);
821 ok(ret == S_OK, "IMLangFontLink_CodePagesToCodePage error %x\n", ret);
822 ok(CodePage == 1252, "Incorrect CodePage Returned (%i)\n",CodePage);
823
824 /* Tests for GetCharCodePages */
825
826 /* Latin 1 */
827 dwCmpCodePages = FS_LATIN1 | FS_LATIN2 | FS_CYRILLIC | FS_GREEK | FS_TURKISH
828 | FS_HEBREW | FS_ARABIC | FS_BALTIC | FS_VIETNAMESE | FS_THAI
829 | FS_JISJAPAN | FS_CHINESESIMP | FS_WANSUNG | FS_CHINESETRAD;
830 ret = IMLangFontLink_GetCharCodePages(iMLFL, 'd', &dwCodePages);
831 ok(ret == S_OK, "IMLangFontLink_GetCharCodePages error %x\n", ret);
832 ok(dwCodePages == dwCmpCodePages, "expected %x, got %x\n", dwCmpCodePages, dwCodePages);
833
834 dwCodePages = 0;
835 processed = 0;
836 ret = IMLangFontLink_GetStrCodePages(iMLFL, &str[0], 1, 0, &dwCodePages, &processed);
837 ok(ret == S_OK, "IMLangFontLink_GetStrCodePages error %x\n", ret);
838 ok(dwCodePages == dwCmpCodePages, "expected %x, got %x\n", dwCmpCodePages, dwCodePages);
839 ok(processed == 1, "expected 1, got %d\n", processed);
840
841 /* Cyrillic */
842 dwCmpCodePages = FS_CYRILLIC | FS_JISJAPAN | FS_CHINESESIMP | FS_WANSUNG;
843 ret = IMLangFontLink_GetCharCodePages(iMLFL, 0x0436, &dwCodePages);
844 ok(ret == S_OK, "IMLangFontLink_GetCharCodePages error %x\n", ret);
845 ok(dwCodePages == dwCmpCodePages, "expected %x, got %x\n", dwCmpCodePages, dwCodePages);
846
847 dwCodePages = 0;
848 processed = 0;
849 ret = IMLangFontLink_GetStrCodePages(iMLFL, &str[1], 1, 0, &dwCodePages, &processed);
850 ok(ret == S_OK, "IMLangFontLink_GetStrCodePages error %x\n", ret);
851 ok(dwCodePages == dwCmpCodePages, "expected %x, got %x\n", dwCmpCodePages, dwCodePages);
852 ok(processed == 1, "expected 1, got %d\n", processed);
853
854 /* Japanese */
855 dwCmpCodePages = FS_JISJAPAN;
856 ret = IMLangFontLink_GetCharCodePages(iMLFL, 0xff90, &dwCodePages);
857 ok(ret == S_OK, "IMLangFontLink_GetCharCodePages error %x\n", ret);
858 ok(dwCodePages == dwCmpCodePages, "expected %x, got %x\n", dwCmpCodePages, dwCodePages);
859
860 dwCodePages = 0;
861 processed = 0;
862 ret = IMLangFontLink_GetStrCodePages(iMLFL, &str[2], 1, 0, &dwCodePages, &processed);
863 ok(ret == S_OK, "IMLangFontLink_GetStrCodePages error %x\n", ret);
864 ok(dwCodePages == dwCmpCodePages, "expected %x, got %x\n", dwCmpCodePages, dwCodePages);
865 ok(processed == 1, "expected 1, got %d\n", processed);
866
867 dwCmpCodePages = FS_CYRILLIC | FS_JISJAPAN | FS_CHINESESIMP | FS_WANSUNG;
868 dwCodePages = 0;
869 processed = 0;
870 ret = IMLangFontLink_GetStrCodePages(iMLFL, str, 2, 0, &dwCodePages, &processed);
871 ok(ret == S_OK, "IMLangFontLink_GetStrCodePages error %x\n", ret);
872 ok(dwCodePages == dwCmpCodePages, "expected %x, got %x\n", dwCmpCodePages, dwCodePages);
873 ok(processed == 2, "expected 2, got %d\n", processed);
874
875 dwCmpCodePages = FS_JISJAPAN;
876 dwCodePages = 0;
877 processed = 0;
878 ret = IMLangFontLink_GetStrCodePages(iMLFL, str, 3, 0, &dwCodePages, &processed);
879 ok(ret == S_OK, "IMLangFontLink_GetStrCodePages error %x\n", ret);
880 ok(dwCodePages == dwCmpCodePages, "expected %x, got %x\n", dwCmpCodePages, dwCodePages);
881 ok(processed == 3, "expected 3, got %d\n", processed);
882
883 dwCodePages = 0xffff;
884 processed = -1;
885 ret = IMLangFontLink_GetStrCodePages(iMLFL, &str[2], 1, 0, &dwCodePages, &processed);
886 ok(ret == S_OK, "IMLangFontLink_GetStrCodePages error %x\n", ret);
887 ok(dwCodePages == dwCmpCodePages, "expected %x, got %x\n", dwCmpCodePages, dwCodePages);
888 ok(processed == 1, "expected 0, got %d\n", processed);
889
890 ret = IMLangFontLink_GetStrCodePages(iMLFL, &str[2], 1, 0, NULL, NULL);
891 ok(ret == S_OK, "IMLangFontLink_GetStrCodePages error %x\n", ret);
892
893 dwCodePages = 0xffff;
894 processed = -1;
895 ret = IMLangFontLink_GetStrCodePages(iMLFL, str, -1, 0, &dwCodePages, &processed);
896 ok(ret == E_INVALIDARG, "IMLangFontLink_GetStrCodePages should fail: %x\n", ret);
897 ok(dwCodePages == 0, "expected %x, got %x\n", dwCmpCodePages, dwCodePages);
898 ok(processed == 0, "expected 0, got %d\n", processed);
899
900 dwCodePages = 0xffff;
901 processed = -1;
902 ret = IMLangFontLink_GetStrCodePages(iMLFL, NULL, 1, 0, &dwCodePages, &processed);
903 ok(ret == E_INVALIDARG, "IMLangFontLink_GetStrCodePages should fail: %x\n", ret);
904 ok(dwCodePages == 0, "expected %x, got %x\n", dwCmpCodePages, dwCodePages);
905 ok(processed == 0, "expected 0, got %d\n", processed);
906
907 dwCodePages = 0xffff;
908 processed = -1;
909 ret = IMLangFontLink_GetStrCodePages(iMLFL, str, 0, 0, &dwCodePages, &processed);
910 ok(ret == E_INVALIDARG, "IMLangFontLink_GetStrCodePages should fail: %x\n", ret);
911 ok(dwCodePages == 0, "expected %x, got %x\n", dwCmpCodePages, dwCodePages);
912 ok(processed == 0, "expected 0, got %d\n", processed);
913 }
914
915 /* copied from libs/wine/string.c */
916 static WCHAR *strstrW(const WCHAR *str, const WCHAR *sub)
917 {
918 while (*str)
919 {
920 const WCHAR *p1 = str, *p2 = sub;
921 while (*p1 && *p2 && *p1 == *p2) { p1++; p2++; }
922 if (!*p2) return (WCHAR *)str;
923 str++;
924 }
925 return NULL;
926 }
927
928 static void test_rfc1766(IMultiLanguage2 *iML2)
929 {
930 IEnumRfc1766 *pEnumRfc1766;
931 RFC1766INFO info;
932 ULONG n;
933 HRESULT ret;
934 BSTR rfcstr;
935
936 ret = IMultiLanguage2_EnumRfc1766(iML2, LANG_NEUTRAL, &pEnumRfc1766);
937 ok(ret == S_OK, "IMultiLanguage2_EnumRfc1766 error %08x\n", ret);
938
939 while (1)
940 {
941 ret = IEnumRfc1766_Next(pEnumRfc1766, 1, &info, &n);
942 if (ret != S_OK) break;
943
944 #ifdef DUMP_CP_INFO
945 trace("lcid %04x rfc_name %s locale_name %s\n",
946 info.lcid, wine_dbgstr_w(info.wszRfc1766), wine_dbgstr_w(info.wszLocaleName));
947 #endif
948
949 ok(n == 1, "couldn't fetch 1 RFC1766INFO structure\n");
950
951 /* verify the Rfc1766 value */
952 ret = IMultiLanguage2_GetRfc1766FromLcid(iML2, info.lcid, &rfcstr);
953 ok(ret == S_OK, "Expected S_OK, got %08x\n", ret);
954
955 /* not an exact 1:1 correspondence between lcid and rfc1766 in the
956 * mlang database, e.g., nb-no -> 1044 -> no */
957 ok(strstrW(info.wszRfc1766, rfcstr) != NULL,
958 "Expected matching locale names\n");
959
960 SysFreeString(rfcstr);
961 }
962 IEnumRfc1766_Release(pEnumRfc1766);
963 }
964
965 static void test_GetLcidFromRfc1766(IMultiLanguage2 *iML2)
966 {
967 WCHAR rfc1766W[MAX_RFC1766_NAME + 1];
968 LCID lcid;
969 HRESULT ret;
970 DWORD i;
971
972 static WCHAR en[] = { 'e','n',0 };
973 static WCHAR en_them[] = { 'e','n','-','t','h','e','m',0 };
974 static WCHAR english[] = { 'e','n','g','l','i','s','h',0 };
975
976
977 for(i = 0; i < sizeof(lcid_table) / sizeof(lcid_table[0]); i++) {
978 lcid = -1;
979 MultiByteToWideChar(CP_ACP, 0, lcid_table[i].rfc1766, -1, rfc1766W, MAX_RFC1766_NAME);
980 ret = IMultiLanguage2_GetLcidFromRfc1766(iML2, &lcid, rfc1766W);
981
982 /* IE <6.0 guess 0x412 (ko) from "kok" */
983 ok((ret == lcid_table[i].hr) ||
984 broken(lcid_table[i].broken_lcid && (ret == S_FALSE)),
985 "#%02d: HRESULT 0x%x (expected 0x%x)\n", i, ret, lcid_table[i].hr);
986
987 ok((lcid == lcid_table[i].lcid) ||
988 broken(lcid == lcid_table[i].broken_lcid), /* IE <6.0 */
989 "#%02d: got LCID 0x%x (expected 0x%x)\n", i, lcid, lcid_table[i].lcid);
990 }
991
992
993 ret = IMultiLanguage2_GetLcidFromRfc1766(iML2, NULL, en);
994 ok(ret == E_INVALIDARG, "GetLcidFromRfc1766 returned: %08x\n", ret);
995
996 ret = IMultiLanguage2_GetLcidFromRfc1766(iML2, &lcid, NULL);
997 ok(ret == E_INVALIDARG, "GetLcidFromRfc1766 returned: %08x\n", ret);
998
999 ret = IMultiLanguage2_GetLcidFromRfc1766(iML2, &lcid, en_them);
1000 ok((ret == E_FAIL || ret == S_FALSE), "GetLcidFromRfc1766 returned: %08x\n", ret);
1001 if (ret == S_FALSE)
1002 {
1003 BSTR rfcstr;
1004 static WCHAR en[] = {'e','n',0};
1005
1006 ret = IMultiLanguage2_GetRfc1766FromLcid(iML2, lcid, &rfcstr);
1007 ok(ret == S_OK, "Expected S_OK, got %08x\n", ret);
1008 ok_w2("Expected \"%s\", got \"%s\"n", en, rfcstr);
1009 }
1010
1011 ret = IMultiLanguage2_GetLcidFromRfc1766(iML2, &lcid, english);
1012 ok((ret == E_FAIL || ret == S_FALSE), "GetLcidFromRfc1766 returned: %08x\n", ret);
1013 if (ret == S_FALSE)
1014 {
1015 BSTR rfcstr;
1016 static WCHAR en[] = {'e','n',0};
1017
1018 ret = IMultiLanguage2_GetRfc1766FromLcid(iML2, lcid, &rfcstr);
1019 ok(ret == S_OK, "Expected S_OK, got %08x\n", ret);
1020 ok_w2("Expected \"%s\", got \"%s\"n", en, rfcstr);
1021 }
1022
1023 }
1024
1025 static void test_Rfc1766ToLcid(void)
1026 {
1027 LCID lcid;
1028 HRESULT ret;
1029 DWORD i;
1030
1031 for(i = 0; i < sizeof(lcid_table) / sizeof(lcid_table[0]); i++) {
1032 lcid = -1;
1033 ret = Rfc1766ToLcidA(&lcid, lcid_table[i].rfc1766);
1034
1035 /* IE <6.0 guess 0x412 (ko) from "kok" */
1036 ok( (ret == lcid_table[i].hr) ||
1037 broken(lcid_table[i].broken_lcid && (ret == S_FALSE)),
1038 "#%02d: HRESULT 0x%x (expected 0x%x)\n", i, ret, lcid_table[i].hr);
1039
1040 ok( (lcid == lcid_table[i].lcid) ||
1041 broken(lcid == lcid_table[i].broken_lcid), /* IE <6.0 */
1042 "#%02d: got LCID 0x%x (expected 0x%x)\n", i, lcid, lcid_table[i].lcid);
1043
1044 }
1045
1046 ret = Rfc1766ToLcidA(&lcid, NULL);
1047 ok(ret == E_INVALIDARG, "got 0x%08x (expected E_INVALIDARG)\n", ret);
1048
1049 ret = Rfc1766ToLcidA(NULL, "en");
1050 ok(ret == E_INVALIDARG, "got 0x%08x (expected E_INVALIDARG)\n", ret);
1051
1052 }
1053
1054
1055 static void test_GetRfc1766FromLcid(IMultiLanguage2 *iML2)
1056 {
1057 CHAR expected[MAX_RFC1766_NAME];
1058 CHAR buffer[MAX_RFC1766_NAME + 1];
1059 DWORD i;
1060 HRESULT hr;
1061 BSTR rfcstr;
1062
1063 for(i = 0; i < sizeof(lcid_table) / sizeof(lcid_table[0]); i++) {
1064 buffer[0] = '\0';
1065
1066 rfcstr = NULL;
1067 hr = IMultiLanguage2_GetRfc1766FromLcid(iML2, lcid_table[i].lcid, &rfcstr);
1068 ok(hr == lcid_table[i].hr,
1069 "#%02d: HRESULT 0x%x (expected 0x%x)\n", i, hr, lcid_table[i].hr);
1070
1071 if (hr != S_OK)
1072 continue; /* no result-string created */
1073
1074 WideCharToMultiByte(CP_ACP, 0, rfcstr, -1, buffer, sizeof(buffer), NULL, NULL);
1075 LCMapStringA(LOCALE_USER_DEFAULT, LCMAP_LOWERCASE, lcid_table[i].rfc1766,
1076 lstrlenA(lcid_table[i].rfc1766) + 1, expected, MAX_RFC1766_NAME);
1077
1078 /* IE <6.0 return "x-kok" for LCID 0x457 ("kok") */
1079 ok( (!lstrcmpA(buffer, expected)) ||
1080 broken(!lstrcmpA(buffer, lcid_table[i].broken_rfc)),
1081 "#%02d: got '%s' (expected '%s')\n", i, buffer, expected);
1082
1083 SysFreeString(rfcstr);
1084 }
1085
1086 hr = IMultiLanguage2_GetRfc1766FromLcid(iML2, MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US), NULL);
1087 ok(hr == E_INVALIDARG, "got 0x%x (expected E_INVALIDARG)\n", hr);
1088 }
1089
1090 static void test_LcidToRfc1766(void)
1091 {
1092 CHAR expected[MAX_RFC1766_NAME];
1093 CHAR buffer[MAX_RFC1766_NAME * 2];
1094 HRESULT hr;
1095 DWORD i;
1096
1097 for(i = 0; i < sizeof(lcid_table) / sizeof(lcid_table[0]); i++) {
1098
1099 memset(buffer, '#', sizeof(buffer)-1);
1100 buffer[sizeof(buffer)-1] = '\0';
1101
1102 hr = LcidToRfc1766A(lcid_table[i].lcid, buffer, MAX_RFC1766_NAME);
1103
1104 /* IE <5.0 does not recognize 0x180c (fr-mc) and 0x457 (kok) */
1105 ok( (hr == lcid_table[i].hr) ||
1106 broken(lcid_table[i].broken_lcid && (hr == E_FAIL)),
1107 "#%02d: HRESULT 0x%x (expected 0x%x)\n", i, hr, lcid_table[i].hr);
1108
1109 if (hr != S_OK)
1110 continue;
1111
1112 LCMapStringA(LOCALE_USER_DEFAULT, LCMAP_LOWERCASE, lcid_table[i].rfc1766,
1113 lstrlenA(lcid_table[i].rfc1766) + 1, expected, MAX_RFC1766_NAME);
1114
1115 /* IE <6.0 return "x-kok" for LCID 0x457 ("kok") */
1116 ok( (!lstrcmpA(buffer, expected)) ||
1117 broken(!lstrcmpA(buffer, lcid_table[i].broken_rfc)),
1118 "#%02d: got '%s' (expected '%s')\n", i, buffer, expected);
1119
1120 }
1121
1122 memset(buffer, '#', sizeof(buffer)-1);
1123 buffer[sizeof(buffer)-1] = '\0';
1124 hr = LcidToRfc1766A(-1, buffer, MAX_RFC1766_NAME);
1125 ok(hr == E_FAIL, "got 0x%08x and '%s' (expected E_FAIL)\n", hr, buffer);
1126
1127 hr = LcidToRfc1766A(LANG_ENGLISH, NULL, MAX_RFC1766_NAME);
1128 ok(hr == E_INVALIDARG, "got 0x%08x (expected E_INVALIDARG)\n", hr);
1129
1130 memset(buffer, '#', sizeof(buffer)-1);
1131 buffer[sizeof(buffer)-1] = '\0';
1132 hr = LcidToRfc1766A(LANG_ENGLISH, buffer, -1);
1133 ok(hr == E_INVALIDARG, "got 0x%08x and '%s' (expected E_INVALIDARG)\n", hr, buffer);
1134
1135 memset(buffer, '#', sizeof(buffer)-1);
1136 buffer[sizeof(buffer)-1] = '\0';
1137 hr = LcidToRfc1766A(LANG_ENGLISH, buffer, 0);
1138 ok(hr == E_INVALIDARG, "got 0x%08x and '%s' (expected E_INVALIDARG)\n", hr, buffer);
1139
1140 }
1141
1142 static void test_GetRfc1766Info(IMultiLanguage2 *iML2)
1143 {
1144 CHAR rfc1766A[MAX_RFC1766_NAME + 1];
1145 CHAR localenameA[MAX_LOCALE_NAME * 3];
1146 BYTE buffer[sizeof(RFC1766INFO) + 4];
1147 PRFC1766INFO prfc = (RFC1766INFO *) buffer;
1148 HRESULT ret;
1149 DWORD i;
1150
1151 for(i = 0; i < sizeof(info_table) / sizeof(info_table[0]); i++) {
1152 memset(buffer, 'x', sizeof(RFC1766INFO) + 2);
1153 buffer[sizeof(buffer) -1] = 0;
1154 buffer[sizeof(buffer) -2] = 0;
1155
1156 ret = IMultiLanguage2_GetRfc1766Info(iML2, info_table[i].lcid, info_table[i].lang, prfc);
1157 WideCharToMultiByte(CP_ACP, 0, prfc->wszRfc1766, -1, rfc1766A, MAX_RFC1766_NAME, NULL, NULL);
1158 WideCharToMultiByte(CP_UTF8, 0, prfc->wszLocaleName, -1, localenameA, MAX_LOCALE_NAME * 3, NULL, NULL);
1159 ok(ret == S_OK, "#%02d: got 0x%x (expected S_OK)\n", i, ret);
1160 ok(prfc->lcid == info_table[i].lcid,
1161 "#%02d: got 0x%04x (expected 0x%04x)\n", i, prfc->lcid, info_table[i].lcid);
1162
1163 ok(!lstrcmpA(rfc1766A, info_table[i].rfc1766),
1164 "#%02d: got '%s' (expected '%s')\n", i, rfc1766A, info_table[i].rfc1766);
1165
1166 if (info_table[i].todo & TODO_NAME) {
1167 todo_wine
1168 ok( (!lstrcmpA(localenameA, info_table[i].localename)) ||
1169 broken(!lstrcmpA(localenameA, info_table[i].broken_name)), /* IE < 6.0 */
1170 "#%02d: got '%s' (expected '%s')\n", i, localenameA, info_table[i].localename);
1171 }
1172 else
1173 ok( (!lstrcmpA(localenameA, info_table[i].localename)) ||
1174 broken(!lstrcmpA(localenameA, info_table[i].broken_name)), /* IE < 6.0 */
1175 "#%02d: got '%s' (expected '%s')\n", i, localenameA, info_table[i].localename);
1176
1177 }
1178
1179 /* SUBLANG_NEUTRAL only allowed for english, arabic, chinese */
1180 ret = IMultiLanguage2_GetRfc1766Info(iML2, MAKELANGID(LANG_GERMAN, SUBLANG_NEUTRAL), LANG_ENGLISH, prfc);
1181 ok(ret == E_FAIL, "got 0x%x (expected E_FAIL)\n", ret);
1182
1183 ret = IMultiLanguage2_GetRfc1766Info(iML2, MAKELANGID(LANG_ITALIAN, SUBLANG_NEUTRAL), LANG_ENGLISH, prfc);
1184 ok(ret == E_FAIL, "got 0x%x (expected E_FAIL)\n", ret);
1185
1186 /* NULL not allowed */
1187 ret = IMultiLanguage2_GetRfc1766Info(iML2, 0, LANG_ENGLISH, prfc);
1188 ok(ret == E_FAIL, "got 0x%x (expected E_FAIL)\n", ret);
1189
1190 ret = IMultiLanguage2_GetRfc1766Info(iML2, LANG_ENGLISH, LANG_ENGLISH, NULL);
1191 ok(ret == E_INVALIDARG, "got 0x%x (expected E_INVALIDARG)\n", ret);
1192 }
1193
1194 static void test_IMultiLanguage2_ConvertStringFromUnicode(IMultiLanguage2 *iML2)
1195 {
1196 CHAR dest[MAX_PATH];
1197 CHAR invariate[MAX_PATH];
1198 UINT srcsz, destsz;
1199 HRESULT hr;
1200
1201 static WCHAR src[] = {'a','b','c',0};
1202
1203 memset(invariate, 'x', sizeof(invariate));
1204
1205 /* pSrcStr NULL */
1206 memset(dest, 'x', sizeof(dest));
1207 srcsz = lstrlenW(src) + 1;
1208 destsz = sizeof(dest);
1209 hr = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, NULL,
1210 &srcsz, dest, &destsz);
1211 ok(hr == S_OK || hr == E_FAIL,"expected S_OK or E_FAIL, got %08x\n",hr);
1212 if (hr == S_OK)
1213 {
1214 ok(srcsz == lstrlenW(src) + 1,
1215 "Expected %u, got %u\n", lstrlenW(src) + 1, srcsz);
1216 }
1217 else if (hr == E_FAIL)
1218 {
1219 ok(srcsz == 0,
1220 "Expected %u, got %u\n", 0, srcsz);
1221 }
1222
1223 ok(!memcmp(dest, invariate, sizeof(dest)),
1224 "Expected dest to be unchanged, got %s\n", dest);
1225 ok(destsz == 0, "Expected 0, got %u\n", destsz);
1226
1227 /* pcSrcSize NULL */
1228 memset(dest, 'x', sizeof(dest));
1229 destsz = sizeof(dest);
1230 hr = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, src,
1231 NULL, dest, &destsz);
1232 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1233 ok(!strncmp(dest, "abc", 3),
1234 "Expected first three chars to be \"abc\"\n");
1235 ok(!memcmp(&dest[3], invariate, sizeof(dest) - 3),
1236 "Expected rest of dest to be unchanged, got %s\n", dest);
1237 ok(destsz == lstrlenW(src),
1238 "Expected %u, got %u\n", lstrlenW(src), destsz);
1239
1240 /* both pSrcStr and pcSrcSize NULL */
1241 memset(dest, 'x', sizeof(dest));
1242 destsz = sizeof(dest);
1243 hr = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, NULL,
1244 NULL, dest, &destsz);
1245 ok(hr == S_OK || hr == E_FAIL, "Expected S_OK or E_FAIL, got %08x\n", hr);
1246 ok(!memcmp(dest, invariate, sizeof(dest)),
1247 "Expected dest to be unchanged, got %s\n", dest);
1248 ok(destsz == 0, "Expected 0, got %u\n", destsz);
1249
1250 /* pDstStr NULL */
1251 memset(dest, 'x', sizeof(dest));
1252 srcsz = lstrlenW(src) + 1;
1253 destsz = sizeof(dest);
1254 hr = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, src,
1255 &srcsz, NULL, &destsz);
1256 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1257 ok(srcsz == lstrlenW(src) + 1,
1258 "Expected %u, got %u\n", lstrlenW(src) + 1, srcsz);
1259 ok(destsz == lstrlenW(src) + 1,
1260 "Expected %u, got %u\n", lstrlenW(src) + 1, srcsz);
1261
1262 /* pcDstSize NULL */
1263 memset(dest, 'x', sizeof(dest));
1264 hr = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, src,
1265 &srcsz, dest, NULL);
1266 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1267 ok(srcsz == lstrlenW(src) + 1,
1268 "Expected %u, got %u\n", lstrlenW(src) + 1, srcsz);
1269 ok(!memcmp(dest, invariate, sizeof(dest)),
1270 "Expected dest to be unchanged, got %s\n", dest);
1271
1272 /* pcSrcSize is 0 */
1273 memset(dest, 'x', sizeof(dest));
1274 srcsz = 0;
1275 destsz = sizeof(dest);
1276 hr = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, src,
1277 &srcsz, dest, &destsz);
1278 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1279 ok(srcsz == 0, "Expected 0, got %u\n", srcsz);
1280 ok(!memcmp(dest, invariate, sizeof(dest)),
1281 "Expected dest to be unchanged, got %s\n", dest);
1282 ok(destsz == 0, "Expected 0, got %u\n", destsz);
1283
1284 /* pcSrcSize does not include NULL terminator */
1285 memset(dest, 'x', sizeof(dest));
1286 srcsz = lstrlenW(src);
1287 destsz = sizeof(dest);
1288 hr = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, src,
1289 &srcsz, dest, &destsz);
1290 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1291 ok(srcsz == lstrlenW(src),
1292 "Expected %u, got %u\n", lstrlenW(src), srcsz);
1293 ok(!strncmp(dest, "abc", 3), "Expected first three chars to be \"abc\"\n");
1294 ok(!memcmp(&dest[3], invariate, sizeof(dest) - 3),
1295 "Expected rest of dest to be unchanged, got %s\n", dest);
1296 ok(destsz == lstrlenW(src),
1297 "Expected %u, got %u\n", lstrlenW(src), destsz);
1298
1299 /* pcSrcSize includes NULL terminator */
1300 memset(dest, 'x', sizeof(dest));
1301 srcsz = lstrlenW(src) + 1;
1302 destsz = sizeof(dest);
1303 hr = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, src,
1304 &srcsz, dest, &destsz);
1305 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1306 ok(srcsz == lstrlenW(src) + 1, "Expected 3, got %u\n", srcsz);
1307 ok(!lstrcmpA(dest, "abc"), "Expected \"abc\", got \"%s\"\n", dest);
1308 ok(destsz == lstrlenW(src) + 1,
1309 "Expected %u, got %u\n", lstrlenW(src) + 1, destsz);
1310
1311 /* pcSrcSize is -1 */
1312 memset(dest, 'x', sizeof(dest));
1313 srcsz = -1;
1314 destsz = sizeof(dest);
1315 hr = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, src,
1316 &srcsz, dest, &destsz);
1317 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1318 ok(srcsz == lstrlenW(src),
1319 "Expected %u, got %u\n", lstrlenW(src), srcsz);
1320 ok(!strncmp(dest, "abc", 3), "Expected first three chars to be \"abc\"\n");
1321 ok(!memcmp(&dest[3], invariate, sizeof(dest) - 3),
1322 "Expected rest of dest to be unchanged, got %s\n", dest);
1323 ok(destsz == lstrlenW(src),
1324 "Expected %u, got %u\n", lstrlenW(src), destsz);
1325
1326 /* pcDstSize is 0 */
1327 memset(dest, 'x', sizeof(dest));
1328 srcsz = lstrlenW(src) + 1;
1329 destsz = 0;
1330 hr = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, src,
1331 &srcsz, dest, &destsz);
1332 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1333 ok(srcsz == lstrlenW(src) + 1,
1334 "Expected %u, got %u\n", lstrlenW(src) + 1, srcsz);
1335 ok(!memcmp(dest, invariate, sizeof(dest)),
1336 "Expected dest to be unchanged, got %s\n", dest);
1337 ok(destsz == lstrlenW(src) + 1,
1338 "Expected %u, got %u\n", lstrlenW(src) + 1, destsz);
1339
1340 /* pcDstSize is not large enough */
1341 memset(dest, 'x', sizeof(dest));
1342 srcsz = lstrlenW(src) + 1;
1343 destsz = lstrlenW(src);
1344 hr = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, src,
1345 &srcsz, dest, &destsz);
1346 ok(hr == E_FAIL, "Expected E_FAIL, got %08x\n", hr);
1347 ok(srcsz == 0, "Expected 0, got %u\n", srcsz);
1348 ok(!strncmp(dest, "abc", 3), "Expected first three chars to be \"abc\"\n");
1349 ok(!memcmp(&dest[3], invariate, sizeof(dest) - 3),
1350 "Expected rest of dest to be unchanged, got %s\n", dest);
1351 ok(destsz == 0, "Expected 0, got %u\n", srcsz);
1352
1353 /* pcDstSize (bytes) does not leave room for NULL terminator */
1354 memset(dest, 'x', sizeof(dest));
1355 srcsz = lstrlenW(src) + 1;
1356 destsz = lstrlenW(src) * sizeof(WCHAR);
1357 hr = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, src,
1358 &srcsz, dest, &destsz);
1359 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1360 ok(srcsz == lstrlenW(src) + 1,
1361 "Expected %u, got %u\n", lstrlenW(src) + 1, srcsz);
1362 ok(!lstrcmpA(dest, "abc"), "Expected \"abc\", got \"%s\"\n", dest);
1363 ok(destsz == lstrlenW(src) + 1,
1364 "Expected %u, got %u\n", lstrlenW(src) + 1, destsz);
1365 }
1366
1367 static void test_ConvertINetUnicodeToMultiByte(void)
1368 {
1369 CHAR dest[MAX_PATH];
1370 CHAR invariate[MAX_PATH];
1371 INT srcsz, destsz;
1372 HRESULT hr;
1373
1374 static WCHAR src[] = {'a','b','c',0};
1375
1376 memset(invariate, 'x', sizeof(invariate));
1377
1378 /* lpSrcStr NULL */
1379 memset(dest, 'x', sizeof(dest));
1380 srcsz = lstrlenW(src) + 1;
1381 destsz = sizeof(dest);
1382 hr = pConvertINetUnicodeToMultiByte(NULL, 1252, NULL, &srcsz, dest, &destsz);
1383 ok(hr == S_OK || hr == E_FAIL, "Expected S_OK or E_FAIL, got %08x\n", hr);
1384 if (hr == S_OK)
1385 ok(srcsz == lstrlenW(src) + 1,
1386 "Expected %u, got %u\n", lstrlenW(src) + 1, srcsz);
1387 else if (hr == E_FAIL)
1388 ok(srcsz == 0,
1389 "Expected %u, got %u\n", 0, srcsz);
1390 ok(!memcmp(dest, invariate, sizeof(dest)),
1391 "Expected dest to be unchanged, got %s\n", dest);
1392 ok(destsz == 0, "Expected 0, got %u\n", destsz);
1393
1394 /* lpnWideCharCount NULL */
1395 memset(dest, 'x', sizeof(dest));
1396 destsz = sizeof(dest);
1397 hr = pConvertINetUnicodeToMultiByte(NULL, 1252, src, NULL, dest, &destsz);
1398 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1399 ok(!strncmp(dest, "abc", 3),
1400 "Expected first three chars to be \"abc\"\n");
1401 ok(!memcmp(&dest[3], invariate, sizeof(dest) - 3),
1402 "Expected rest of dest to be unchanged, got %s\n", dest);
1403 ok(destsz == lstrlenW(src),
1404 "Expected %u, got %u\n", lstrlenW(src), destsz);
1405
1406 /* both lpSrcStr and lpnWideCharCount NULL */
1407 memset(dest, 'x', sizeof(dest));
1408 destsz = sizeof(dest);
1409 hr = pConvertINetUnicodeToMultiByte(NULL, 1252, NULL, NULL, dest, &destsz);
1410 ok(hr == S_OK || hr == E_FAIL, "Expected S_OK or E_FAIL, got %08x\n", hr);
1411 ok(!memcmp(dest, invariate, sizeof(dest)),
1412 "Expected dest to be unchanged, got %s\n", dest);
1413 ok(destsz == 0, "Expected 0, got %u\n", destsz);
1414
1415 /* lpDstStr NULL */
1416 memset(dest, 'x', sizeof(dest));
1417 srcsz = lstrlenW(src) + 1;
1418 destsz = sizeof(dest);
1419 hr = pConvertINetUnicodeToMultiByte(NULL, 1252, src, &srcsz, NULL, &destsz);
1420 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1421 ok(srcsz == lstrlenW(src) + 1,
1422 "Expected %u, got %u\n", lstrlenW(src) + 1, srcsz);
1423 ok(destsz == lstrlenW(src) + 1,
1424 "Expected %u, got %u\n", lstrlenW(src) + 1, srcsz);
1425
1426 /* lpnMultiCharCount NULL */
1427 memset(dest, 'x', sizeof(dest));
1428 hr = pConvertINetUnicodeToMultiByte(NULL, 1252, src, &srcsz, dest, NULL);
1429 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1430 ok(srcsz == lstrlenW(src) + 1,
1431 "Expected %u, got %u\n", lstrlenW(src) + 1, srcsz);
1432 ok(!memcmp(dest, invariate, sizeof(dest)),
1433 "Expected dest to be unchanged, got %s\n", dest);
1434
1435 /* lpnWideCharCount is 0 */
1436 memset(dest, 'x', sizeof(dest));
1437 srcsz = 0;
1438 destsz = sizeof(dest);
1439 hr = pConvertINetUnicodeToMultiByte(NULL, 1252, src, &srcsz, dest, &destsz);
1440 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1441 ok(srcsz == 0, "Expected 0, got %u\n", srcsz);
1442 ok(!memcmp(dest, invariate, sizeof(dest)),
1443 "Expected dest to be unchanged, got %s\n", dest);
1444 ok(destsz == 0, "Expected 0, got %u\n", destsz);
1445
1446 /* lpnWideCharCount does not include NULL terminator */
1447 memset(dest, 'x', sizeof(dest));
1448 srcsz = lstrlenW(src);
1449 destsz = sizeof(dest);
1450 hr = pConvertINetUnicodeToMultiByte(NULL, 1252, src, &srcsz, dest, &destsz);
1451 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1452 ok(srcsz == lstrlenW(src),
1453 "Expected %u, got %u\n", lstrlenW(src), srcsz);
1454 ok(!strncmp(dest, "abc", 3), "Expected first three chars to be \"abc\"\n");
1455 ok(!memcmp(&dest[3], invariate, sizeof(dest) - 3),
1456 "Expected rest of dest to be unchanged, got %s\n", dest);
1457 ok(destsz == lstrlenW(src),
1458 "Expected %u, got %u\n", lstrlenW(src), destsz);
1459
1460 /* lpnWideCharCount includes NULL terminator */
1461 memset(dest, 'x', sizeof(dest));
1462 srcsz = lstrlenW(src) + 1;
1463 destsz = sizeof(dest);
1464 hr = pConvertINetUnicodeToMultiByte(NULL, 1252, src, &srcsz, dest, &destsz);
1465 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1466 ok(srcsz == lstrlenW(src) + 1, "Expected 3, got %u\n", srcsz);
1467 ok(!lstrcmpA(dest, "abc"), "Expected \"abc\", got \"%s\"\n", dest);
1468 ok(destsz == lstrlenW(src) + 1,
1469 "Expected %u, got %u\n", lstrlenW(src) + 1, destsz);
1470
1471 /* lpnWideCharCount is -1 */
1472 memset(dest, 'x', sizeof(dest));
1473 srcsz = -1;
1474 destsz = sizeof(dest);
1475 hr = pConvertINetUnicodeToMultiByte(NULL, 1252, src, &srcsz, dest, &destsz);
1476 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1477 ok(srcsz == lstrlenW(src),
1478 "Expected %u, got %u\n", lstrlenW(src), srcsz);
1479 ok(!strncmp(dest, "abc", 3), "Expected first three chars to be \"abc\"\n");
1480 ok(!memcmp(&dest[3], invariate, sizeof(dest) - 3),
1481 "Expected rest of dest to be unchanged, got %s\n", dest);
1482 ok(destsz == lstrlenW(src),
1483 "Expected %u, got %u\n", lstrlenW(src), destsz);
1484
1485 /* lpnMultiCharCount is 0 */
1486 memset(dest, 'x', sizeof(dest));
1487 srcsz = lstrlenW(src) + 1;
1488 destsz = 0;
1489 hr = pConvertINetUnicodeToMultiByte(NULL, 1252, src, &srcsz, dest, &destsz);
1490 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1491 ok(srcsz == lstrlenW(src) + 1,
1492 "Expected %u, got %u\n", lstrlenW(src) + 1, srcsz);
1493 ok(!memcmp(dest, invariate, sizeof(dest)),
1494 "Expected dest to be unchanged, got %s\n", dest);
1495 ok(destsz == lstrlenW(src) + 1,
1496 "Expected %u, got %u\n", lstrlenW(src) + 1, destsz);
1497
1498 /* lpnMultiCharCount is not large enough */
1499 memset(dest, 'x', sizeof(dest));
1500 srcsz = lstrlenW(src) + 1;
1501 destsz = lstrlenW(src);
1502 hr = pConvertINetUnicodeToMultiByte(NULL, 1252, src, &srcsz, dest, &destsz);
1503 ok(hr == E_FAIL, "Expected E_FAIL, got %08x\n", hr);
1504 ok(srcsz == 0, "Expected 0, got %u\n", srcsz);
1505 ok(!strncmp(dest, "abc", 3), "Expected first three chars to be \"abc\"\n");
1506 ok(!memcmp(&dest[3], invariate, sizeof(dest) - 3),
1507 "Expected rest of dest to be unchanged, got %s\n", dest);
1508 ok(destsz == 0, "Expected 0, got %u\n", srcsz);
1509
1510 /* lpnMultiCharCount (bytes) does not leave room for NULL terminator */
1511 memset(dest, 'x', sizeof(dest));
1512 srcsz = lstrlenW(src) + 1;
1513 destsz = lstrlenW(src) * sizeof(WCHAR);
1514 hr = pConvertINetUnicodeToMultiByte(NULL, 1252, src, &srcsz, dest, &destsz);
1515 ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
1516 ok(srcsz == lstrlenW(src) + 1,
1517 "Expected %u, got %u\n", lstrlenW(src) + 1, srcsz);
1518 ok(!lstrcmpA(dest, "abc"), "Expected \"abc\", got \"%s\"\n", dest);
1519 ok(destsz == lstrlenW(src) + 1,
1520 "Expected %u, got %u\n", lstrlenW(src) + 1, destsz);
1521 }
1522
1523 static void test_JapaneseConversion(void)
1524 {
1525 /* Data */
1526 static WCHAR unc_jp[9][12] = {
1527 {9,0x31,0x20,0x3042,0x3044,0x3046,0x3048,0x304a,0x000d,0x000a},
1528 {9,0x31,0x20,0x30a2,0x30a4,0x30a6,0x30a8,0x30aa,0x000d,0x000a},
1529 {9,0x31,0x20,0xff71,0xff72,0xff73,0xff74,0xff75,0x000d,0x000a},
1530 {9,0x31,0x20,0x3041,0x3043,0x3045,0x3047,0x3049,0x000d,0x000a},
1531 {9,0x31,0x20,0x30a1,0x30a3,0x30a5,0x30a7,0x30a9,0x000d,0x000a},
1532 {9,0x31,0x20,0xff67,0xff68,0xff69,0xff6a,0xff6b,0x000d,0x000a},
1533 {9,0x31,0x20,0x300c,0x65e5,0x672c,0x8a9e,0x300d,0x000d,0x000a},
1534 {7,0x31,0x20,0x25c7,0x25c7,0x3012,0x000d,0x000a},
1535 {11,0x31,0x20,0x203b,0x3010,0x0074,0x0065,0x0073,0x0074,0x3011,0x000d,0x000a}
1536 };
1537 static CHAR jis_jp[9][27] = {
1538 {20,0x31,0x20,0x1b,0x24,0x42,0x24,0x22,0x24,0x24,0x24,0x26,0x24,0x28,
1539 0x24,0x2a,0x1b,0x28,0x42,0x0d,0x0a},
1540 {20,0x31,0x20,0x1b,0x24,0x42,0x25,0x22,0x25,0x24,0x25,0x26,0x25,0x28,
1541 0x25,0x2a,0x1b,0x28,0x42,0x0d,0x0a},
1542 {20,0x31,0x20,0x1b,0x24,0x42,0x25,0x22,0x25,0x24,0x25,0x26,0x25,0x28,
1543 0x25,0x2a,0x1b,0x28,0x42,0x0d,0x0a},
1544 {20,0x31,0x20,0x1b,0x24,0x42,0x24,0x21,0x24,0x23,0x24,0x25,0x24,0x27,
1545 0x24,0x29,0x1b,0x28,0x42,0x0d,0x0a},
1546 {20,0x31,0x20,0x1b,0x24,0x42,0x25,0x21,0x25,0x23,0x25,0x25,0x25,0x27,
1547 0x25,0x29,0x1b,0x28,0x42,0x0d,0x0a},
1548 {20,0x31,0x20,0x1b,0x24,0x42,0x25,0x21,0x25,0x23,0x25,0x25,0x25,0x27,
1549 0x25,0x29,0x1b,0x28,0x42,0x0d,0x0a},
1550 {20,0x31,0x20,0x1b,0x24,0x42,0x21,0x56,0x46,0x7c,0x4b,0x5c,0x38,0x6c,
1551 0x21,0x57,0x1b,0x28,0x42,0x0d,0x0a},
1552 {16,0x31,0x20,0x1b,0x24,0x42,0x21,0x7e,0x21,0x7e,0x22,0x29,0x1b,0x28,
1553 0x42,0x0d,0x0a},
1554 {26,0x31,0x20,0x1b,0x24,0x42,0x22,0x28,0x21,0x5a,0x1b,0x28,0x42,0x74,
1555 0x65,0x73,0x74,0x1b,0x24,0x42,0x21,0x5b,0x1b,0x28,0x42,0x0d,0x0a}
1556 };
1557 static CHAR sjis_jp[9][15] = {
1558 {14,0x31,0x20,0x82,0xa0,0x82,0xa2,0x82,0xa4,0x82,0xa6,0x82,0xa8,0x0d,0x0a},
1559 {14,0x31,0x20,0x83,0x41,0x83,0x43,0x83,0x45,0x83,0x47,0x83,0x49,0x0d,0x0a},
1560 {9,0x31,0x20,0xb1,0xb2,0xb3,0xb4,0xb5,0x0d,0x0a},
1561 {14,0x31,0x20,0x82,0x9f,0x82,0xa1,0x82,0xa3,0x82,0xa5,0x82,0xa7,0x0d,0x0a},
1562 {14,0x31,0x20,0x83,0x40,0x83,0x42,0x83,0x44,0x83,0x46,0x83,0x48,0x0d,0x0a},
1563 {9,0x31,0x20,0xa7,0xa8,0xa9,0xaa,0xab,0x0d,0x0a},
1564 {14,0x31,0x20,0x81,0x75,0x93,0xfa,0x96,0x7b,0x8c,0xea,0x81,0x76,0x0d,0x0a},
1565 {10,0x31,0x20,0x81,0x9e,0x81,0x9e,0x81,0xa7,0x0d,0x0a},
1566 {14,0x31,0x20,0x81,0xa6,0x81,0x79,0x74,0x65,0x73,0x74,0x81,0x7a,0x0d,0x0a}
1567 };
1568 static CHAR euc_jp[9][15] = {
1569 {14,0x31,0x20,0xa4,0xa2,0xa4,0xa4,0xa4,0xa6,0xa4,0xa8,0xa4,0xaa,0x0d,0x0a},
1570 {14,0x31,0x20,0xa5,0xa2,0xa5,0xa4,0xa5,0xa6,0xa5,0xa8,0xa5,0xaa,0x0d,0x0a},
1571 {14,0x31,0x20,0x8e,0xb1,0x8e,0xb2,0x8e,0xb3,0x8e,0xb4,0x8e,0xb5,0x0d,0x0a},
1572 {14,0x31,0x20,0xa4,0xa1,0xa4,0xa3,0xa4,0xa5,0xa4,0xa7,0xa4,0xa9,0x0d,0x0a},
1573 {14,0x31,0x20,0xa5,0xa1,0xa5,0xa3,0xa5,0xa5,0xa5,0xa7,0xa5,0xa9,0x0d,0x0a},
1574 {14,0x31,0x20,0x8e,0xa7,0x8e,0xa8,0x8e,0xa9,0x8e,0xaa,0x8e,0xab,0x0d,0x0a},
1575 {14,0x31,0x20,0xa1,0xd6,0xc6,0xfc,0xcb,0xdc,0xb8,0xec,0xa1,0xd7,0x0d,0x0a},
1576 {10,0x31,0x20,0xa1,0xfe,0xa1,0xfe,0xa2,0xa9,0x0d,0x0a},
1577 {14,0x31,0x20,0xa2,0xa8,0xa1,0xda,0x74,0x65,0x73,0x74,0xa1,0xdb,0x0d,0x0a}
1578 };
1579
1580 INT srcsz, destsz;
1581 INT i;
1582 HRESULT hr;
1583 CHAR output[30];
1584 WCHAR outputW[30];
1585 int outlen;
1586
1587 /* test unc->jis */
1588 for (i = 0; i < 9; i++)
1589 {
1590 int j;
1591 destsz = 30;
1592 outlen = jis_jp[i][0];
1593 srcsz = unc_jp[i][0];
1594 hr = pConvertINetUnicodeToMultiByte(NULL, 50220, &unc_jp[i][1], &srcsz, output, &destsz);
1595 if (hr == S_FALSE)
1596 {
1597 skip("Code page identifier 50220 is not supported\n");
1598 break;
1599 }
1600 ok(hr == S_OK,"(%i) Expected S_OK, got %08x\n", i, hr);
1601 ok(destsz == outlen, "(%i) Expected %i, got %i\n",i,outlen,destsz);
1602 ok(srcsz == unc_jp[i][0],"(%i) Expected %i, got %i\n",i,unc_jp[i][0],srcsz);
1603 ok(memcmp(output,&jis_jp[i][1],destsz)==0,"(%i) Strings do not match\n",i);
1604
1605 /* and back */
1606 srcsz = outlen;
1607 destsz = 30;
1608 hr = pConvertINetMultiByteToUnicode(NULL, 50220, output, &srcsz, outputW,&destsz);
1609
1610 /*
1611 * JIS does not have hankata so it get automatically converted to
1612 * zenkata. this means that strings 1 and 2 are identical as well as
1613 * strings 4 and 5.
1614 */
1615 j = i;
1616 if (i == 2) j = 1;
1617 if (i == 5) j = 4;
1618
1619 ok(hr == S_OK,"(%i) Expected S_OK, got %08x\n",i, hr);
1620 ok(destsz == unc_jp[j][0],"(%i) Expected %i, got %i\n",i,unc_jp[j][0],destsz);
1621 ok(srcsz == outlen,"(%i) Expected %i, got %i\n",i,outlen,srcsz);
1622 ok(memcmp(outputW,&unc_jp[j][1],destsz)==0,"(%i) Strings do not match\n",i);
1623 }
1624
1625 /* test unc->sjis */
1626 for (i = 0; i < 9; i++)
1627 {
1628 destsz = 30;
1629 outlen = sjis_jp[i][0];
1630 srcsz = unc_jp[i][0];
1631
1632 hr = pConvertINetUnicodeToMultiByte(NULL, 932, &unc_jp[i][1], &srcsz, output, &destsz);
1633 if (hr == S_FALSE)
1634 {
1635 skip("Code page identifier 932 is not supported\n");
1636 break;
1637 }
1638 ok(hr == S_OK,"(%i) Expected S_OK, got %08x\n",i,hr);
1639 ok(destsz == outlen,"(%i) Expected %i, got %i\n",i,outlen,destsz);
1640 ok(srcsz == unc_jp[i][0],"(%i) Expected %i, got %i\n",i,unc_jp[i][0],srcsz);
1641 ok(memcmp(output,&sjis_jp[i][1],outlen)==0,"(%i) Strings do not match\n",i);
1642
1643 srcsz = outlen;
1644 destsz = 30;
1645 hr = pConvertINetMultiByteToUnicode(NULL, 932, output, &srcsz, outputW,&destsz);
1646
1647 ok(hr == S_OK,"(%i) Expected S_OK, got %08x\n", i, hr);
1648 ok(destsz == unc_jp[i][0],"(%i) Expected %i, got %i\n",i,unc_jp[i][0],destsz);
1649 ok(srcsz == outlen,"(%i) Expected %i, got %i\n",i,outlen,srcsz);
1650 ok(memcmp(outputW,&unc_jp[i][1],destsz)==0,"(%i) Strings do not match\n",i);
1651 }
1652
1653 /* test unc->euc */
1654 for (i = 0; i < 9; i++)
1655 {
1656 destsz = 30;
1657 outlen = euc_jp[i][0];
1658 srcsz = unc_jp[i][0];
1659
1660 hr = pConvertINetUnicodeToMultiByte(NULL, 51932, &unc_jp[i][1], &srcsz, output, &destsz);
1661 if (hr == S_FALSE)
1662 {
1663 skip("Code page identifier 51932 is not supported\n");
1664 break;
1665 }
1666 ok(hr == S_OK, "(%i) Expected S_OK, got %08x\n",i,hr);
1667 ok(destsz == outlen, "(%i) Expected %i, got %i\n",i,outlen,destsz);
1668 ok(srcsz == unc_jp[i][0],"(%i) Expected %i, got %i\n",i,unc_jp[i][0],destsz);
1669 ok(memcmp(output,&euc_jp[i][1],outlen)==0,"(%i) Strings do not match\n",i);
1670
1671 srcsz = outlen;
1672 destsz = 30;
1673 hr = pConvertINetMultiByteToUnicode(NULL, 51932, output, &srcsz, outputW,&destsz);
1674
1675 ok(hr == S_OK,"(%i) Expected S_OK, got %08x\n",i,hr);
1676 ok(destsz == unc_jp[i][0],"(%i) Expected %i, got %i\n",i,unc_jp[i][0],destsz);
1677 ok(srcsz == outlen,"(%i) Expected %i, got %i\n",i,outlen,srcsz);
1678 ok(memcmp(outputW,&unc_jp[i][1],destsz)==0,"(%i) Strings do not match\n",i);
1679 }
1680
1681 /* Japanese autodetect */
1682 i = 0;
1683 destsz = 30;
1684 srcsz = jis_jp[i][0];
1685 hr = pConvertINetMultiByteToUnicode(NULL, 50932, &jis_jp[i][1], &srcsz, outputW, &destsz);
1686 if (hr == S_FALSE)
1687 {
1688 skip("Code page identifier 50932 is not supported\n");
1689 return;
1690 }
1691 ok(hr == S_OK,"(%i) Expected S_OK, got %08x\n",i,hr);
1692 ok(destsz == unc_jp[i][0],"(%i) Expected %i, got %i\n",i,unc_jp[i][0],destsz);
1693 ok(srcsz == jis_jp[i][0],"(%i) Expected %i, got %i\n",i,jis_jp[i][0],srcsz);
1694 ok(memcmp(outputW,&unc_jp[i][1],destsz)==0,"(%i) Strings do not match\n",i);
1695
1696 i = 1;
1697 destsz = 30;
1698 srcsz = sjis_jp[i][0];
1699 hr = pConvertINetMultiByteToUnicode(NULL, 50932, &sjis_jp[i][1], &srcsz, outputW, &destsz);
1700 ok(hr == S_OK,"(%i) Expected S_OK, got %08x\n",i,hr);
1701 ok(destsz == unc_jp[i][0],"(%i) Expected %i, got %i\n",i,unc_jp[i][0],destsz);
1702 ok(srcsz == sjis_jp[i][0],"(%i) Expected %i, got %i\n",i,sjis_jp[i][0],srcsz);
1703 ok(memcmp(outputW,&unc_jp[i][1],destsz)==0,"(%i) Strings do not match\n",i);
1704 }
1705
1706 static void test_GetScriptFontInfo(IMLangFontLink2 *font_link)
1707 {
1708 HRESULT hr;
1709 UINT nfonts;
1710 SCRIPTFONTINFO sfi[1];
1711
1712 nfonts = 0;
1713 hr = IMLangFontLink2_GetScriptFontInfo(font_link, sidLatin, 0, &nfonts, NULL);
1714 ok(hr == S_OK, "GetScriptFontInfo failed %u\n", GetLastError());
1715 ok(nfonts, "unexpected result\n");
1716
1717 nfonts = 0;
1718 hr = IMLangFontLink2_GetScriptFontInfo(font_link, sidLatin, SCRIPTCONTF_FIXED_FONT, &nfonts, NULL);
1719 ok(hr == S_OK, "GetScriptFontInfo failed %u\n", GetLastError());
1720 ok(nfonts, "unexpected result\n");
1721
1722 nfonts = 0;
1723 hr = IMLangFontLink2_GetScriptFontInfo(font_link, sidLatin, SCRIPTCONTF_PROPORTIONAL_FONT, &nfonts, NULL);
1724 ok(hr == S_OK, "GetScriptFontInfo failed %u\n", GetLastError());
1725 ok(nfonts, "unexpected result\n");
1726
1727 nfonts = 1;
1728 memset(sfi, 0, sizeof(sfi));
1729 hr = IMLangFontLink2_GetScriptFontInfo(font_link, sidLatin, SCRIPTCONTF_FIXED_FONT, &nfonts, sfi);
1730 ok(hr == S_OK, "GetScriptFontInfo failed %u\n", GetLastError());
1731 ok(nfonts == 1, "got %u, expected 1\n", nfonts);
1732 ok(sfi[0].scripts != 0, "unexpected result\n");
1733 ok(sfi[0].wszFont[0], "unexpected result\n");
1734
1735 nfonts = 1;
1736 memset(sfi, 0, sizeof(sfi));
1737 hr = IMLangFontLink2_GetScriptFontInfo(font_link, sidLatin, SCRIPTCONTF_PROPORTIONAL_FONT, &nfonts, sfi);
1738 ok(hr == S_OK, "GetScriptFontInfo failed %u\n", GetLastError());
1739 ok(nfonts == 1, "got %u, expected 1\n", nfonts);
1740 ok(sfi[0].scripts != 0, "unexpected result\n");
1741 ok(sfi[0].wszFont[0], "unexpected result\n");
1742 }
1743
1744 START_TEST(mlang)
1745 {
1746 IMultiLanguage2 *iML2 = NULL;
1747 IMLangFontLink *iMLFL = NULL;
1748 IMLangFontLink2 *iMLFL2 = NULL;
1749 HRESULT ret;
1750
1751 if (!init_function_ptrs())
1752 return;
1753
1754 CoInitialize(NULL);
1755 test_Rfc1766ToLcid();
1756 test_LcidToRfc1766();
1757
1758 ret = CoCreateInstance(&CLSID_CMultiLanguage, NULL, CLSCTX_INPROC_SERVER,
1759 &IID_IMultiLanguage2, (void **)&iML2);
1760 if (ret != S_OK || !iML2) return;
1761
1762 test_rfc1766(iML2);
1763 test_GetLcidFromRfc1766(iML2);
1764 test_GetRfc1766FromLcid(iML2);
1765 test_GetRfc1766Info(iML2);
1766
1767 test_EnumCodePages(iML2, 0);
1768 test_EnumCodePages(iML2, MIMECONTF_MIME_LATEST);
1769 test_EnumCodePages(iML2, MIMECONTF_BROWSER);
1770 test_EnumCodePages(iML2, MIMECONTF_MINIMAL);
1771 test_EnumCodePages(iML2, MIMECONTF_VALID);
1772 /* FIXME: why MIMECONTF_MIME_REGISTRY returns 0 of supported codepages? */
1773 /*test_EnumCodePages(iML2, MIMECONTF_MIME_REGISTRY);*/
1774
1775 test_EnumScripts(iML2, 0);
1776 test_EnumScripts(iML2, SCRIPTCONTF_SCRIPT_USER);
1777 test_EnumScripts(iML2, SCRIPTCONTF_SCRIPT_USER | SCRIPTCONTF_SCRIPT_HIDE | SCRIPTCONTF_SCRIPT_SYSTEM);
1778
1779 ret = IMultiLanguage2_IsConvertible(iML2, CP_UTF8, CP_UNICODE);
1780 ok(ret == S_OK, "IMultiLanguage2_IsConvertible(CP_UTF8 -> CP_UNICODE) = %08x\n", ret);
1781 ret = IMultiLanguage2_IsConvertible(iML2, CP_UNICODE, CP_UTF8);
1782 ok(ret == S_OK, "IMultiLanguage2_IsConvertible(CP_UNICODE -> CP_UTF8) = %08x\n", ret);
1783
1784 test_multibyte_to_unicode_translations(iML2);
1785 test_IMultiLanguage2_ConvertStringFromUnicode(iML2);
1786
1787 IMultiLanguage2_Release(iML2);
1788
1789 test_ConvertINetUnicodeToMultiByte();
1790
1791 test_JapaneseConversion();
1792
1793 ret = CoCreateInstance(&CLSID_CMultiLanguage, NULL, CLSCTX_INPROC_SERVER,
1794 &IID_IMLangFontLink, (void **)&iMLFL);
1795 if (ret != S_OK || !iMLFL) return;
1796
1797 IMLangFontLink_Test(iMLFL);
1798 IMLangFontLink_Release(iMLFL);
1799
1800 ret = CoCreateInstance(&CLSID_CMultiLanguage, NULL, CLSCTX_INPROC_SERVER,
1801 &IID_IMLangFontLink2, (void **)&iMLFL2);
1802 if (ret != S_OK || !iMLFL2) return;
1803
1804 test_GetScriptFontInfo(iMLFL2);
1805 IMLangFontLink2_Release(iMLFL2);
1806
1807 CoUninitialize();
1808 }
Maarten's multimedia branch