Add an implementation of mlang.dll
Mike McCormack
mike at codeweavers.com
Tue Aug 3 04:09:34 CDT 2004
This patch depends upon the previous mlang uuid patch. You will need to
run autoconf after applying the patch.
Mike
ChangeLog:
Dmitry Timoshkov <dmitry at codeweavers.com>
Mike McCormack <mike at codeweavers.com>
* Add an implementation of mlang.dll and test cases for it
-------------- next part --------------
Index: dlls/Makefile.in
===================================================================
RCS file: /home/wine/wine/dlls/Makefile.in,v
retrieving revision 1.221
diff -u -r1.221 Makefile.in
--- dlls/Makefile.in 13 Jul 2004 03:37:07 -0000 1.221
+++ dlls/Makefile.in 3 Aug 2004 07:46:57 -0000
@@ -66,6 +66,7 @@
kernel \
lzexpand \
mapi32 \
+ mlang \
mmdevldr.vxd \
monodebg.vxd \
mpr \
@@ -299,6 +300,7 @@
mciseq.drv.so \
mciwave.drv.so \
midimap.drv.so \
+ mlang.dll.so \
mmdevldr.vxd.so \
monodebg.vxd.so \
mpr.dll.so \
@@ -612,6 +614,9 @@
midimap.drv.so: winmm/midimap/midimap.drv.so
$(RM) $@ && $(LN_S) winmm/midimap/midimap.drv.so $@
+mlang.dll.so: mlang/mlang.dll.so
+ $(RM) $@ && $(LN_S) mlang/mlang.dll.so $@
+
mmdevldr.vxd.so: mmdevldr.vxd/mmdevldr.vxd.so
$(RM) $@ && $(LN_S) mmdevldr.vxd/mmdevldr.vxd.so $@
@@ -1006,6 +1011,7 @@
libkernel32 \
liblz32 \
libmapi32 \
+ libmlang \
libmpr \
libmsacm32 \
libmsdmo \
@@ -1354,6 +1360,11 @@
libmapi32.a: mapi32/mapi32.spec.def
$(DLLTOOL) -k -l $@ -d mapi32/mapi32.spec.def
+libmlang.def: mlang/mlang.spec.def
+ $(RM) $@ && $(LN_S) mlang/mlang.spec.def $@
+libmlang.a: mlang/mlang.spec.def
+ $(DLLTOOL) -k -l $@ -d mlang/mlang.spec.def
+
libmpr.def: mpr/mpr.spec.def
$(RM) $@ && $(LN_S) mpr/mpr.spec.def $@
libmpr.a: mpr/mpr.spec.def
@@ -1748,6 +1759,7 @@
kernel/kernel32.spec.def: $(WINEBUILD)
lzexpand/lz32.spec.def: $(WINEBUILD)
mapi32/mapi32.spec.def: $(WINEBUILD)
+mlang/mlang.spec.def: $(WINEBUILD)
mpr/mpr.spec.def: $(WINEBUILD)
msacm/msacm32.spec.def: $(WINEBUILD)
msdmo/msdmo.spec.def: $(WINEBUILD)
@@ -1886,6 +1898,7 @@
winmm/mciseq/mciseq.drv.so: winmm/mciseq
winmm/mciwave/mciwave.drv.so: winmm/mciwave
winmm/midimap/midimap.drv.so: winmm/midimap
+mlang/mlang.dll.so: mlang
mmdevldr.vxd/mmdevldr.vxd.so: mmdevldr.vxd
monodebg.vxd/monodebg.vxd.so: monodebg.vxd
mpr/mpr.dll.so: mpr
Index: configure.ac
===================================================================
RCS file: /home/wine/wine/configure.ac,v
retrieving revision 1.292
diff -u -r1.292 configure.ac
--- configure.ac 30 Jul 2004 18:54:32 -0000 1.292
+++ configure.ac 3 Aug 2004 07:46:57 -0000
@@ -1584,6 +1584,8 @@
dlls/lzexpand/Makefile
dlls/mapi32/Makefile
dlls/mapi32/tests/Makefile
+dlls/mlang/Makefile
+dlls/mlang/tests/Makefile
dlls/mmdevldr.vxd/Makefile
dlls/monodebg.vxd/Makefile
dlls/mpr/Makefile
@@ -1626,6 +1628,7 @@
dlls/opengl32/Makefile
dlls/psapi/Makefile
dlls/psapi/tests/Makefile
+dlls/pstorec/Makefile
dlls/qcap/Makefile
dlls/quartz/Makefile
dlls/rasapi32/Makefile
--- /dev/null 1994-07-18 08:46:18.000000000 +0900
+++ dlls/mlang/Makefile.in 2004-08-03 17:49:22.000000000 +0900
@@ -0,0 +1,17 @@
+TOPSRCDIR = @top_srcdir@
+TOPOBJDIR = ../..
+SRCDIR = @srcdir@
+VPATH = @srcdir@
+MODULE = mlang.dll
+IMPORTS = gdi32 user32 ole32 advapi32 kernel32 ntdll
+EXTRALIBS = $(LIBUNICODE) -luuid
+EXTRADEFS = -DCOM_NO_WINDOWS_H
+
+C_SRCS = \
+ mlang.c
+
+SUBDIRS = tests
+
+ at MAKE_DLL_RULES@
+
+### Dependencies:
--- /dev/null 1994-07-18 08:46:18.000000000 +0900
+++ dlls/mlang/.cvsignore 2004-08-03 17:49:22.000000000 +0900
@@ -0,0 +1,3 @@
+Makefile
+mlang.dll.dbg.c
+mlang.spec.def
--- /dev/null 1994-07-18 08:46:18.000000000 +0900
+++ dlls/mlang/mlang.c 2004-08-03 17:51:57.000000000 +0900
@@ -0,0 +1,1607 @@
+/*
+ * MLANG Class Factory
+ *
+ * Copyright 2002 Lionel Ulmer
+ * Copyright 2003,2004 Mike McCormack
+ * Copyright 2004 Dmitry Timoshkov
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ */
+
+#include "config.h"
+
+#include <stdarg.h>
+#include <stdio.h>
+
+#include "windef.h"
+#include "winbase.h"
+#include "wingdi.h"
+#include "winuser.h"
+#include "winnls.h"
+#include "winreg.h"
+#include "ole2.h"
+#include "mlang.h"
+
+#include "uuids.h"
+
+#include "wine/unicode.h"
+#include "wine/debug.h"
+
+WINE_DEFAULT_DEBUG_CHANNEL(mlang);
+
+#include "initguid.h"
+
+#define CP_UNICODE 1200
+
+static HRESULT MultiLanguage_create(IUnknown *pUnkOuter, LPVOID *ppObj);
+
+/* FIXME:
+ * Under what circumstances HKEY_CLASSES_ROOT\MIME\Database\Codepage and
+ * HKEY_CLASSES_ROOT\MIME\Database\Charset are used?
+ */
+
+typedef struct
+{
+ UINT cp;
+ DWORD flags;
+ const char *web_charset;
+ const char *header_charset;
+ const char *body_charset;
+} MIME_CP_INFO;
+
+/* These data are based on the codepage info in libs/unicode/cpmap.pl */
+/* FIXME: Add 28604 (Celtic), 28606 (Balkan) */
+
+static const MIME_CP_INFO arabic_cp[] =
+{
+ { 864, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "ibm864", "ibm864", "ibm864" },
+ { 1006, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "ibm1006", "ibm1006", "ibm1006" },
+ { 1256, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_MAILNEWS | MIMECONTF_SAVABLE_BROWSER |
+ MIMECONTF_EXPORT | MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "windows-1256", "windows-1256", "windows-1256" },
+ { 28596, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_MINIMAL |
+ MIMECONTF_IMPORT | MIMECONTF_SAVABLE_MAILNEWS |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_IE4 | MIMECONTF_MIME_LATEST,
+ "iso-8859-6", "iso-8859-6", "iso-8859-6" }
+};
+static const MIME_CP_INFO baltic_cp[] =
+{
+ { 775, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "ibm775", "ibm775", "ibm775" },
+ { 1257, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_MINIMAL |
+ MIMECONTF_IMPORT | MIMECONTF_SAVABLE_MAILNEWS |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "windows-1257", "windows-1257", "windows-1257" },
+ { 28594, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_MAILNEWS | MIMECONTF_SAVABLE_BROWSER |
+ MIMECONTF_EXPORT | MIMECONTF_VALID | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "iso-8859-4", "iso-8859-4", "iso-8859-4" },
+ { 28603, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "iso-8859-13", "iso-8859-13", "iso-8859-13" }
+};
+static const MIME_CP_INFO chinese_simplified_cp[] =
+{
+ { 936, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_MINIMAL |
+ MIMECONTF_IMPORT | MIMECONTF_SAVABLE_MAILNEWS |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_IE4 | MIMECONTF_MIME_LATEST,
+ "gb2312", "gb2312", "gb2312" }
+};
+static const MIME_CP_INFO chinese_traditional_cp[] =
+{
+ { 950, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_MINIMAL |
+ MIMECONTF_IMPORT | MIMECONTF_SAVABLE_MAILNEWS |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_IE4 | MIMECONTF_MIME_LATEST,
+ "big5", "big5", "big5" }
+};
+static const MIME_CP_INFO central_european_cp[] =
+{
+ { 852, MIMECONTF_BROWSER | MIMECONTF_IMPORT | MIMECONTF_SAVABLE_BROWSER |
+ MIMECONTF_EXPORT | MIMECONTF_VALID | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_IE4 | MIMECONTF_MIME_LATEST,
+ "ibm852", "ibm852", "ibm852" },
+ { 1250, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_MAILNEWS | MIMECONTF_SAVABLE_BROWSER |
+ MIMECONTF_EXPORT | MIMECONTF_VALID | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "windows-1250", "windows-1250", "windows-1250" },
+ { 10029, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "x-mac-ce", "x-mac-ce", "x-mac-ce" },
+ { 28592, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_MINIMAL |
+ MIMECONTF_IMPORT | MIMECONTF_SAVABLE_MAILNEWS |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_IE4 | MIMECONTF_MIME_LATEST,
+ "iso-8859-2", "iso-8859-2", "iso-8859-2" }
+};
+static const MIME_CP_INFO cyrillic_cp[] =
+{
+ { 855, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "ibm855", "ibm855", "ibm855" },
+ { 866, MIMECONTF_BROWSER | MIMECONTF_IMPORT | MIMECONTF_SAVABLE_BROWSER |
+ MIMECONTF_EXPORT | MIMECONTF_VALID_NLS | MIMECONTF_MIME_IE4 |
+ MIMECONTF_MIME_LATEST,
+ "cp866", "cp866", "cp866" },
+ { 878, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "koi8-r", "koi8-r", "koi8-r" },
+ { 1251, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_MAILNEWS | MIMECONTF_SAVABLE_BROWSER |
+ MIMECONTF_EXPORT | MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "windows-1251", "windows-1251", "windows-1251" },
+ { 10007, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "x-mac-cyrillic", "x-mac-cyrillic", "x-mac-cyrillic" },
+ { 20866, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_MINIMAL |
+ MIMECONTF_IMPORT | MIMECONTF_SAVABLE_MAILNEWS |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_IE4 | MIMECONTF_MIME_LATEST,
+ "koi8-r", "koi8-r", "koi8-r" },
+ { 28595, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_MINIMAL |
+ MIMECONTF_IMPORT | MIMECONTF_SAVABLE_MAILNEWS |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_IE4 | MIMECONTF_MIME_LATEST,
+ "iso-8859-5", "iso-8859-5", "iso-8859-5" }
+};
+static const MIME_CP_INFO greek_cp[] =
+{
+ { 737, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "ibm737", "ibm737", "ibm737" },
+ { 869, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "ibm869", "ibm869", "ibm869" },
+ { 875, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "cp875", "cp875", "cp875" },
+ { 1253, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_MAILNEWS | MIMECONTF_SAVABLE_BROWSER |
+ MIMECONTF_EXPORT | MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "windows-1253", "windows-1253", "windows-1253" },
+ { 10006, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "x-mac-greek", "x-mac-greek", "x-mac-greek" },
+ { 28597, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_MINIMAL |
+ MIMECONTF_IMPORT | MIMECONTF_SAVABLE_MAILNEWS |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_IE4 | MIMECONTF_MIME_LATEST,
+ "iso-8859-7", "iso-8859-7", "iso-8859-7" }
+};
+static const MIME_CP_INFO hebrew_cp[] =
+{
+ { 424, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "ibm424", "ibm424", "ibm424" },
+ { 856, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "cp856", "cp856", "cp856" },
+ { 862, MIMECONTF_BROWSER | MIMECONTF_MINIMAL | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "dos-862", "dos-862", "dos-862" },
+ { 1255, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_MAILNEWS | MIMECONTF_SAVABLE_BROWSER |
+ MIMECONTF_EXPORT | MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "windows-1255", "windows-1255", "windows-1255" },
+ { 28598, MIMECONTF_BROWSER | MIMECONTF_MINIMAL | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_IE4 | MIMECONTF_MIME_LATEST,
+ "iso-8859-8", "iso-8859-8", "iso-8859-8" }
+};
+static const MIME_CP_INFO japanese_cp[] =
+{
+ { 932, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_MINIMAL |
+ MIMECONTF_IMPORT | MIMECONTF_SAVABLE_MAILNEWS |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_IE4 | MIMECONTF_MIME_LATEST,
+ "shift_jis", "iso-2022-jp", "iso-2022-jp" },
+ { 20932, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "euc-jp", "euc-jp", "euc-jp" }
+};
+static const MIME_CP_INFO korean_cp[] =
+{
+ { 949, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_MINIMAL |
+ MIMECONTF_IMPORT | MIMECONTF_SAVABLE_MAILNEWS |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "ks_c_5601-1987", "ks_c_5601-1987", "ks_c_5601-1987" }
+};
+static const MIME_CP_INFO thai_cp[] =
+{
+ { 874, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_MIME_LATEST,
+ "ibm-thai", "ibm-thai", "ibm-thai" }
+};
+static const MIME_CP_INFO turkish_cp[] =
+{
+ { 857, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "ibm857", "ibm857", "ibm857" },
+ { 1026, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "ibm1026", "ibm1026", "ibm1026" },
+ { 1254, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_MINIMAL |
+ MIMECONTF_IMPORT | MIMECONTF_SAVABLE_MAILNEWS |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "windows-1254", "windows-1254", "windows-1254" },
+ { 10081, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "x-mac-turkish", "x-mac-turkish", "x-mac-turkish" },
+ { 28593, MIMECONTF_MAILNEWS | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_MAILNEWS | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_IE4 | MIMECONTF_MIME_LATEST,
+ "iso-8859-3", "iso-8859-3", "iso-8859-3" },
+ { 28599, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_MINIMAL |
+ MIMECONTF_IMPORT | MIMECONTF_SAVABLE_MAILNEWS |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "iso-8859-9", "iso-8859-9", "iso-8859-9" }
+};
+static const MIME_CP_INFO vietnamese_cp[] =
+{
+ { 1258, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_MAILNEWS | MIMECONTF_SAVABLE_BROWSER |
+ MIMECONTF_EXPORT | MIMECONTF_VALID_NLS | MIMECONTF_MIME_IE4 |
+ MIMECONTF_MIME_LATEST,
+ "windows-1258", "windows-1258", "windows-1258" }
+};
+static const MIME_CP_INFO western_cp[] =
+{
+ { 37, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "ibm037", "ibm037", "ibm037" },
+ { 437, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "ibm437", "ibm437", "ibm437" },
+ { 500, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "ibm500", "ibm500", "ibm500" },
+ { 850, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "ibm850", "ibm850", "ibm850" },
+ { 860, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "ibm860", "ibm860", "ibm860" },
+ { 861, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "ibm861", "ibm861", "ibm861" },
+ { 863, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "ibm863", "ibm863", "ibm863" },
+ { 865, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "ibm865", "ibm865", "ibm865" },
+ { 1252, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_MINIMAL |
+ MIMECONTF_IMPORT | MIMECONTF_SAVABLE_MAILNEWS |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "windows-1252", "windows-1252", "iso-8859-1" },
+ { 10000, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "macintosh", "macintosh", "macintosh" },
+ { 10079, MIMECONTF_IMPORT | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_LATEST,
+ "x-mac-icelandic", "x-mac-icelandic", "x-mac-icelandic" },
+ { 28591, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_MAILNEWS | MIMECONTF_SAVABLE_BROWSER |
+ MIMECONTF_EXPORT | MIMECONTF_VALID | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "iso-8859-1", "iso-8859-1", "iso-8859-1" },
+ { 28605, MIMECONTF_MAILNEWS | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_MAILNEWS | MIMECONTF_SAVABLE_BROWSER |
+ MIMECONTF_EXPORT | MIMECONTF_VALID | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_LATEST,
+ "iso-8859-15", "iso-8859-15", "iso-8859-15" }
+};
+static const MIME_CP_INFO unicode_cp[] =
+{
+ { CP_UNICODE, MIMECONTF_MINIMAL | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_BROWSER | MIMECONTF_EXPORT |
+ MIMECONTF_VALID | MIMECONTF_VALID_NLS | MIMECONTF_MIME_IE4 |
+ MIMECONTF_MIME_LATEST,
+ "unicode", "unicode", "unicode" },
+ { CP_UTF7, MIMECONTF_MAILNEWS | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_MAILNEWS | MIMECONTF_EXPORT | MIMECONTF_VALID |
+ MIMECONTF_VALID_NLS | MIMECONTF_MIME_IE4 | MIMECONTF_MIME_LATEST,
+ "utf-7", "utf-7", "utf-7" },
+ { CP_UTF8, MIMECONTF_MAILNEWS | MIMECONTF_BROWSER | MIMECONTF_IMPORT |
+ MIMECONTF_SAVABLE_MAILNEWS | MIMECONTF_SAVABLE_BROWSER |
+ MIMECONTF_EXPORT | MIMECONTF_VALID | MIMECONTF_VALID_NLS |
+ MIMECONTF_MIME_IE4 | MIMECONTF_MIME_LATEST,
+ "utf-8", "utf-8", "utf-8" }
+};
+
+static const struct mlang_data
+{
+ LANGID langid;
+ UINT family_codepage;
+ UINT number_of_cp;
+ const MIME_CP_INFO *mime_cp_info;
+ const char *fixed_font; /* FIXME: Add */
+ const char *proportional_font; /* FIXME: Add */
+} mlang_data[] =
+{
+ { MAKELANGID(LANG_ARABIC,SUBLANG_DEFAULT),1256,sizeof(arabic_cp)/sizeof(arabic_cp[0]),arabic_cp },
+ /* FIXME */
+ { MAKELANGID(LANG_ENGLISH,SUBLANG_DEFAULT),1257,sizeof(baltic_cp)/sizeof(baltic_cp[0]),baltic_cp },
+ { MAKELANGID(LANG_CHINESE,SUBLANG_CHINESE_SIMPLIFIED),936,sizeof(chinese_simplified_cp)/sizeof(chinese_simplified_cp[0]),chinese_simplified_cp },
+ { MAKELANGID(LANG_CHINESE,SUBLANG_CHINESE_TRADITIONAL),950,sizeof(chinese_traditional_cp)/sizeof(chinese_traditional_cp[0]),chinese_traditional_cp },
+ /* FIXME */
+ { MAKELANGID(LANG_ENGLISH,SUBLANG_DEFAULT),1250,sizeof(central_european_cp)/sizeof(central_european_cp[0]),central_european_cp },
+ { MAKELANGID(LANG_RUSSIAN,SUBLANG_DEFAULT),1251,sizeof(cyrillic_cp)/sizeof(cyrillic_cp[0]),cyrillic_cp },
+ { MAKELANGID(LANG_GREEK,SUBLANG_DEFAULT),1253,sizeof(greek_cp)/sizeof(greek_cp[0]),greek_cp },
+ { MAKELANGID(LANG_HEBREW,SUBLANG_DEFAULT),1255,sizeof(hebrew_cp)/sizeof(hebrew_cp[0]),hebrew_cp },
+ { MAKELANGID(LANG_JAPANESE,SUBLANG_DEFAULT),932,sizeof(japanese_cp)/sizeof(japanese_cp[0]),japanese_cp },
+ { MAKELANGID(LANG_KOREAN,SUBLANG_DEFAULT),949,sizeof(korean_cp)/sizeof(korean_cp[0]),korean_cp },
+ { MAKELANGID(LANG_THAI,SUBLANG_DEFAULT),874,sizeof(thai_cp)/sizeof(thai_cp[0]),thai_cp },
+ { MAKELANGID(LANG_TURKISH,SUBLANG_DEFAULT),1254,sizeof(turkish_cp)/sizeof(turkish_cp[0]),turkish_cp },
+ { MAKELANGID(LANG_VIETNAMESE,SUBLANG_DEFAULT),1258,sizeof(vietnamese_cp)/sizeof(vietnamese_cp[0]),vietnamese_cp },
+ { MAKELANGID(LANG_ENGLISH,SUBLANG_DEFAULT),1252,sizeof(western_cp)/sizeof(western_cp[0]),western_cp },
+ /* FIXME */
+ { MAKELANGID(LANG_ENGLISH,SUBLANG_DEFAULT),CP_UNICODE,sizeof(unicode_cp)/sizeof(unicode_cp[0]),unicode_cp }
+};
+
+static void fill_cp_info(const struct mlang_data *ml_data, UINT index, MIMECPINFO *mime_cp_info);
+
+BOOL WINAPI DllMain(HINSTANCE hInstDLL, DWORD fdwReason, LPVOID lpv)
+{
+ switch(fdwReason) {
+ case DLL_PROCESS_ATTACH:
+ DisableThreadLibraryCalls(hInstDLL);
+ break;
+ case DLL_PROCESS_DETACH:
+ break;
+ }
+ return TRUE;
+}
+
+/******************************************************************************
+ * MLANG ClassFactory
+ */
+typedef struct {
+ IClassFactory ITF_IClassFactory;
+
+ DWORD ref;
+ HRESULT (*pfnCreateInstance)(IUnknown *pUnkOuter, LPVOID *ppObj);
+} IClassFactoryImpl;
+
+struct object_creation_info
+{
+ const CLSID *clsid;
+ LPCSTR szClassName;
+ HRESULT (*pfnCreateInstance)(IUnknown *pUnkOuter, LPVOID *ppObj);
+};
+
+static const struct object_creation_info object_creation[] =
+{
+ { &CLSID_CMultiLanguage, "CLSID_CMultiLanguage", MultiLanguage_create },
+};
+
+static HRESULT WINAPI
+MLANGCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj)
+{
+ ICOM_THIS(IClassFactoryImpl,iface);
+
+ TRACE("%s\n", debugstr_guid(riid) );
+
+ if (IsEqualGUID(riid, &IID_IUnknown)
+ || IsEqualGUID(riid, &IID_IClassFactory))
+ {
+ IClassFactory_AddRef(iface);
+ *ppobj = This;
+ return S_OK;
+ }
+
+ WARN("(%p)->(%s,%p),not found\n",This,debugstr_guid(riid),ppobj);
+ return E_NOINTERFACE;
+}
+
+static ULONG WINAPI MLANGCF_AddRef(LPCLASSFACTORY iface) {
+ ICOM_THIS(IClassFactoryImpl,iface);
+ return ++(This->ref);
+}
+
+static ULONG WINAPI MLANGCF_Release(LPCLASSFACTORY iface) {
+ ICOM_THIS(IClassFactoryImpl,iface);
+
+ ULONG ref = --This->ref;
+
+ if (ref == 0)
+ {
+ TRACE("Destroying %p\n", This);
+ HeapFree(GetProcessHeap(), 0, This);
+ }
+
+ return ref;
+}
+
+static HRESULT WINAPI MLANGCF_CreateInstance(LPCLASSFACTORY iface, LPUNKNOWN pOuter,
+ REFIID riid, LPVOID *ppobj) {
+ ICOM_THIS(IClassFactoryImpl,iface);
+ HRESULT hres;
+ LPUNKNOWN punk;
+
+ TRACE("(%p)->(%p,%s,%p)\n",This,pOuter,debugstr_guid(riid),ppobj);
+
+ hres = This->pfnCreateInstance(pOuter, (LPVOID *) &punk);
+ if (FAILED(hres)) {
+ *ppobj = NULL;
+ return hres;
+ }
+ hres = IUnknown_QueryInterface(punk, riid, ppobj);
+ if (FAILED(hres)) {
+ *ppobj = NULL;
+ return hres;
+ }
+ IUnknown_Release(punk);
+ TRACE("returning (%p) -> %lx\n", *ppobj, hres);
+ return hres;
+}
+
+static HRESULT WINAPI MLANGCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
+ ICOM_THIS(IClassFactoryImpl,iface);
+ FIXME("(%p)->(%d),stub!\n",This,dolock);
+ return S_OK;
+}
+
+static ICOM_VTABLE(IClassFactory) MLANGCF_Vtbl =
+{
+ ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
+ MLANGCF_QueryInterface,
+ MLANGCF_AddRef,
+ MLANGCF_Release,
+ MLANGCF_CreateInstance,
+ MLANGCF_LockServer
+};
+
+HRESULT WINAPI MLANG_DllGetClassObject(REFCLSID rclsid, REFIID iid, LPVOID *ppv)
+{
+ int i;
+ IClassFactoryImpl *factory;
+
+ TRACE("%s %s %p\n",debugstr_guid(rclsid), debugstr_guid(iid), ppv);
+
+ if ( !IsEqualGUID( &IID_IClassFactory, iid )
+ && ! IsEqualGUID( &IID_IUnknown, iid) )
+ return E_NOINTERFACE;
+
+ for (i=0; i < sizeof(object_creation)/sizeof(object_creation[0]); i++)
+ {
+ if (IsEqualGUID(object_creation[i].clsid, rclsid))
+ break;
+ }
+
+ if (i == sizeof(object_creation)/sizeof(object_creation[0]))
+ {
+ FIXME("%s: no class found.\n", debugstr_guid(rclsid));
+ return CLASS_E_CLASSNOTAVAILABLE;
+ }
+
+ TRACE("Creating a class factory for %s\n",object_creation[i].szClassName);
+
+ factory = HeapAlloc(GetProcessHeap(), 0, sizeof(*factory));
+ if (factory == NULL) return E_OUTOFMEMORY;
+
+ factory->ITF_IClassFactory.lpVtbl = &MLANGCF_Vtbl;
+ factory->ref = 1;
+
+ factory->pfnCreateInstance = object_creation[i].pfnCreateInstance;
+
+ *ppv = &(factory->ITF_IClassFactory);
+
+ TRACE("(%p) <- %p\n", ppv, &(factory->ITF_IClassFactory) );
+
+ return S_OK;
+}
+
+
+/******************************************************************************/
+
+typedef struct tagMLang_impl
+{
+ ICOM_VTABLE(IMLangFontLink) *vtbl_IMLangFontLink;
+ ICOM_VTABLE(IMultiLanguage) *vtbl_IMultiLanguage;
+ ICOM_VTABLE(IMultiLanguage2) *vtbl_IMultiLanguage2;
+ DWORD ref;
+ DWORD total;
+} MLang_impl;
+
+static ULONG WINAPI MLang_AddRef( MLang_impl* This)
+{
+ return ++(This->ref);
+}
+
+static ULONG WINAPI MLang_Release( MLang_impl* This )
+{
+ ULONG ref = --This->ref;
+
+ TRACE("%p ref = %ld\n", This, ref);
+ if (ref == 0)
+ {
+ TRACE("Destroying %p\n", This);
+ HeapFree(GetProcessHeap(), 0, This);
+ }
+
+ return ref;
+}
+
+static HRESULT WINAPI MLang_QueryInterface(
+ MLang_impl* This,
+ REFIID riid,
+ void** ppvObject)
+{
+ TRACE("%p -> %s\n", This, debugstr_guid(riid) );
+
+ if (IsEqualGUID(riid, &IID_IUnknown)
+ || IsEqualGUID(riid, &IID_IMLangCodePages)
+ || IsEqualGUID(riid, &IID_IMLangFontLink))
+ {
+ MLang_AddRef(This);
+ TRACE("Returning IID_IMLangFontLink %p ref = %ld\n", This, This->ref);
+ *ppvObject = &(This->vtbl_IMLangFontLink);
+ return S_OK;
+ }
+
+ if (IsEqualGUID(riid, &IID_IMultiLanguage) )
+ {
+ MLang_AddRef(This);
+ TRACE("Returning IID_IMultiLanguage %p ref = %ld\n", This, This->ref);
+ *ppvObject = &(This->vtbl_IMultiLanguage);
+ return S_OK;
+ }
+
+ if (IsEqualGUID(riid, &IID_IMultiLanguage2) )
+ {
+ MLang_AddRef(This);
+ *ppvObject = &(This->vtbl_IMultiLanguage2);
+ TRACE("Returning IID_IMultiLanguage2 %p ref = %ld\n", This, This->ref);
+ return S_OK;
+ }
+
+ WARN("(%p)->(%s,%p),not found\n",This,debugstr_guid(riid),ppvObject);
+ return E_NOINTERFACE;
+}
+
+/******************************************************************************/
+
+typedef struct tagEnumCodePage_impl
+{
+ ICOM_VTABLE(IEnumCodePage) *vtbl_IEnumCodePage;
+ DWORD ref;
+ MIMECPINFO *cpinfo;
+ DWORD total, pos;
+} EnumCodePage_impl;
+
+static HRESULT WINAPI fnIEnumCodePage_QueryInterface(
+ IEnumCodePage* iface,
+ REFIID riid,
+ void** ppvObject)
+{
+ ICOM_THIS_MULTI(EnumCodePage_impl, vtbl_IEnumCodePage, iface);
+
+ TRACE("%p -> %s\n", This, debugstr_guid(riid) );
+
+ if (IsEqualGUID(riid, &IID_IUnknown)
+ || IsEqualGUID(riid, &IID_IEnumCodePage))
+ {
+ IEnumCodePage_AddRef(iface);
+ TRACE("Returning IID_IEnumCodePage %p ref = %ld\n", This, This->ref);
+ *ppvObject = &(This->vtbl_IEnumCodePage);
+ return S_OK;
+ }
+
+ WARN("(%p)->(%s,%p),not found\n",This,debugstr_guid(riid),ppvObject);
+ return E_NOINTERFACE;
+}
+
+static ULONG WINAPI fnIEnumCodePage_AddRef(
+ IEnumCodePage* iface)
+{
+ ICOM_THIS_MULTI(EnumCodePage_impl, vtbl_IEnumCodePage, iface);
+ return ++(This->ref);
+}
+
+static ULONG WINAPI fnIEnumCodePage_Release(
+ IEnumCodePage* iface)
+{
+ ICOM_THIS_MULTI(EnumCodePage_impl, vtbl_IEnumCodePage, iface);
+ ULONG ref = --This->ref;
+
+ TRACE("%p ref = %ld\n", This, ref);
+ if (ref == 0)
+ {
+ TRACE("Destroying %p\n", This);
+ HeapFree(GetProcessHeap(), 0, This->cpinfo);
+ HeapFree(GetProcessHeap(), 0, This);
+ }
+
+ return ref;
+}
+
+static HRESULT WINAPI fnIEnumCodePage_Clone(
+ IEnumCodePage* iface,
+ IEnumCodePage** ppEnum)
+{
+ ICOM_THIS_MULTI(EnumCodePage_impl, vtbl_IEnumCodePage, iface);
+ FIXME("%p %p\n", This, ppEnum);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIEnumCodePage_Next(
+ IEnumCodePage* iface,
+ ULONG celt,
+ PMIMECPINFO rgelt,
+ ULONG* pceltFetched)
+{
+ ICOM_THIS_MULTI(EnumCodePage_impl, vtbl_IEnumCodePage, iface);
+ TRACE("%p %lu %p %p\n", This, celt, rgelt, pceltFetched);
+
+ if (!pceltFetched) return S_FALSE;
+ *pceltFetched = 0;
+
+ if (!rgelt) return S_FALSE;
+
+ if (This->pos + celt > This->total)
+ celt = This->total - This->pos;
+
+ if (!celt) return S_FALSE;
+
+ memcpy(rgelt, This->cpinfo + This->pos, celt * sizeof(MIMECPINFO));
+ *pceltFetched = celt;
+ This->pos += celt;
+
+ return S_OK;
+}
+
+static HRESULT WINAPI fnIEnumCodePage_Reset(
+ IEnumCodePage* iface)
+{
+ ICOM_THIS_MULTI(EnumCodePage_impl, vtbl_IEnumCodePage, iface);
+ TRACE("%p\n", This);
+
+ This->pos = 0;
+ return S_OK;
+}
+
+static HRESULT WINAPI fnIEnumCodePage_Skip(
+ IEnumCodePage* iface,
+ ULONG celt)
+{
+ ICOM_THIS_MULTI(EnumCodePage_impl, vtbl_IEnumCodePage, iface);
+ TRACE("%p %lu\n", This, celt);
+
+ if (celt >= This->total) return S_FALSE;
+
+ This->pos = celt; /* FIXME: should be += ?? */
+ return S_OK;
+}
+
+static ICOM_VTABLE(IEnumCodePage) IEnumCodePage_vtbl =
+{
+ ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
+ fnIEnumCodePage_QueryInterface,
+ fnIEnumCodePage_AddRef,
+ fnIEnumCodePage_Release,
+ fnIEnumCodePage_Clone,
+ fnIEnumCodePage_Next,
+ fnIEnumCodePage_Reset,
+ fnIEnumCodePage_Skip
+};
+
+static HRESULT EnumCodePage_create( MLang_impl* mlang, DWORD grfFlags,
+ LANGID LangId, IEnumCodePage** ppEnumCodePage )
+{
+ EnumCodePage_impl *ecp;
+ MIMECPINFO *cpinfo;
+ UINT i, n;
+
+ TRACE("%p, %08lx, %04x, %p\n", mlang, grfFlags, LangId, ppEnumCodePage);
+
+ if (!grfFlags) /* enumerate internal data base of encodings */
+ grfFlags = MIMECONTF_MIME_LATEST;
+
+ ecp = HeapAlloc( GetProcessHeap(), 0, sizeof (EnumCodePage_impl) );
+ ecp->vtbl_IEnumCodePage = &IEnumCodePage_vtbl;
+ ecp->ref = 1;
+ ecp->total = 0;
+ for (i = 0; i < sizeof(mlang_data)/sizeof(mlang_data[0]); i++)
+ {
+ for (n = 0; n < mlang_data[i].number_of_cp; n++)
+ {
+ if (mlang_data[i].mime_cp_info[n].flags & grfFlags)
+ ecp->total++;
+ }
+ }
+
+ ecp->cpinfo = HeapAlloc(GetProcessHeap(), 0,
+ sizeof(MIMECPINFO) * ecp->total);
+ cpinfo = ecp->cpinfo;
+
+ for (i = 0; i < sizeof(mlang_data)/sizeof(mlang_data[0]); i++)
+ {
+ for (n = 0; n < mlang_data[i].number_of_cp; n++)
+ {
+ if (mlang_data[i].mime_cp_info[n].flags & grfFlags)
+ fill_cp_info(&mlang_data[i], n, cpinfo++);
+ }
+ }
+
+ TRACE("enumerated %ld codepages with flags %08lx\n", ecp->total, grfFlags);
+
+ *ppEnumCodePage = (IEnumCodePage*) ecp;
+
+ return S_OK;
+}
+
+/******************************************************************************/
+
+static HRESULT WINAPI fnIMLangFontLink_QueryInterface(
+ IMLangFontLink* iface,
+ REFIID riid,
+ void** ppvObject)
+{
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMLangFontLink, iface);
+ return MLang_QueryInterface( This, riid, ppvObject );
+}
+
+static ULONG WINAPI fnIMLangFontLink_AddRef(
+ IMLangFontLink* iface)
+{
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMLangFontLink, iface);
+ return MLang_AddRef( This );
+}
+
+static ULONG WINAPI fnIMLangFontLink_Release(
+ IMLangFontLink* iface)
+{
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMLangFontLink, iface);
+ return MLang_Release( This );
+}
+
+static HRESULT WINAPI fnIMLangFontLink_GetCharCodePages(
+ IMLangFontLink* iface,
+ WCHAR chSrc,
+ DWORD* pdwCodePages)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMLangFontLink_GetStrCodePages(
+ IMLangFontLink* iface,
+ const WCHAR* pszSrc,
+ long cchSrc,
+ DWORD dwPriorityCodePages,
+ DWORD* pdwCodePages,
+ long* pcchCodePages)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMLangFontLink_CodePageToCodePages(
+ IMLangFontLink* iface,
+ UINT uCodePage,
+ DWORD* pdwCodePages)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMLangFontLink_CodePagesToCodePage(
+ IMLangFontLink* iface,
+ DWORD dwCodePages,
+ UINT uDefaultCodePage,
+ UINT* puCodePage)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMLangFontLink_GetFontCodePages(
+ IMLangFontLink* iface,
+ HDC hDC,
+ HFONT hFont,
+ DWORD* pdwCodePages)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMLangFontLink_MapFont(
+ IMLangFontLink* iface,
+ HDC hDC,
+ DWORD dwCodePages,
+ HFONT hSrcFont,
+ HFONT* phDestFont)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMLangFontLink_ReleaseFont(
+ IMLangFontLink* iface,
+ HFONT hFont)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMLangFontLink_ResetFontMapping(
+ IMLangFontLink* iface)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+
+static ICOM_VTABLE(IMLangFontLink) IMLangFontLink_vtbl =
+{
+ ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
+ fnIMLangFontLink_QueryInterface,
+ fnIMLangFontLink_AddRef,
+ fnIMLangFontLink_Release,
+ fnIMLangFontLink_GetCharCodePages,
+ fnIMLangFontLink_GetStrCodePages,
+ fnIMLangFontLink_CodePageToCodePages,
+ fnIMLangFontLink_CodePagesToCodePage,
+ fnIMLangFontLink_GetFontCodePages,
+ fnIMLangFontLink_MapFont,
+ fnIMLangFontLink_ReleaseFont,
+ fnIMLangFontLink_ResetFontMapping,
+};
+
+/******************************************************************************/
+
+static HRESULT WINAPI fnIMultiLanguage_QueryInterface(
+ IMultiLanguage* iface,
+ REFIID riid,
+ void** ppvObject)
+{
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage, iface);
+ return MLang_QueryInterface( This, riid, ppvObject );
+}
+
+static ULONG WINAPI fnIMultiLanguage_AddRef( IMultiLanguage* iface )
+{
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage, iface);
+ return IMLangFontLink_AddRef( ((IMLangFontLink*)This) );
+}
+
+static ULONG WINAPI fnIMultiLanguage_Release( IMultiLanguage* iface )
+{
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage, iface);
+ return IMLangFontLink_Release( ((IMLangFontLink*)This) );
+}
+
+static HRESULT WINAPI fnIMultiLanguage_GetNumberOfCodePageInfo(
+ IMultiLanguage* iface,
+ UINT* pcCodePage)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage_GetCodePageInfo(
+ IMultiLanguage* iface,
+ UINT uiCodePage,
+ PMIMECPINFO pCodePageInfo)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage_GetFamilyCodePage(
+ IMultiLanguage* iface,
+ UINT uiCodePage,
+ UINT* puiFamilyCodePage)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage_EnumCodePages(
+ IMultiLanguage* iface,
+ DWORD grfFlags,
+ IEnumCodePage** ppEnumCodePage)
+{
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage, iface);
+ TRACE("%p %08lx %p\n", This, grfFlags, ppEnumCodePage);
+
+ return EnumCodePage_create( This, grfFlags, 0, ppEnumCodePage );
+}
+
+static HRESULT WINAPI fnIMultiLanguage_GetCharsetInfo(
+ IMultiLanguage* iface,
+ BSTR Charset,
+ PMIMECSETINFO pCharsetInfo)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage_IsConvertible(
+ IMultiLanguage* iface,
+ DWORD dwSrcEncoding,
+ DWORD dwDstEncoding)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage_ConvertString(
+ IMultiLanguage* iface,
+ DWORD* pdwMode,
+ DWORD dwSrcEncoding,
+ DWORD dwDstEncoding,
+ BYTE* pSrcStr,
+ UINT* pcSrcSize,
+ BYTE* pDstStr,
+ UINT* pcDstSize)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage_ConvertStringToUnicode(
+ IMultiLanguage* iface,
+ DWORD* pdwMode,
+ DWORD dwEncoding,
+ CHAR* pSrcStr,
+ UINT* pcSrcSize,
+ WCHAR* pDstStr,
+ UINT* pcDstSize)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage_ConvertStringFromUnicode(
+ IMultiLanguage* iface,
+ DWORD* pdwMode,
+ DWORD dwEncoding,
+ WCHAR* pSrcStr,
+ UINT* pcSrcSize,
+ CHAR* pDstStr,
+ UINT* pcDstSize)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage_ConvertStringReset(
+ IMultiLanguage* iface)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage_GetRfc1766FromLcid(
+ IMultiLanguage* iface,
+ LCID Locale,
+ BSTR* pbstrRfc1766)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage_GetLcidFromRfc1766(
+ IMultiLanguage* iface,
+ LCID* pLocale,
+ BSTR bstrRfc1766)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage_EnumRfc1766(
+ IMultiLanguage* iface,
+ IEnumRfc1766** ppEnumRfc1766)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage_GetRfc1766Info(
+ IMultiLanguage* iface,
+ LCID Locale,
+ PRFC1766INFO pRfc1766Info)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage_CreateConvertCharset(
+ IMultiLanguage* iface,
+ UINT uiSrcCodePage,
+ UINT uiDstCodePage,
+ DWORD dwProperty,
+ IMLangConvertCharset** ppMLangConvertCharset)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static ICOM_VTABLE(IMultiLanguage) IMultiLanguage_vtbl =
+{
+ ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
+ fnIMultiLanguage_QueryInterface,
+ fnIMultiLanguage_AddRef,
+ fnIMultiLanguage_Release,
+ fnIMultiLanguage_GetNumberOfCodePageInfo,
+ fnIMultiLanguage_GetCodePageInfo,
+ fnIMultiLanguage_GetFamilyCodePage,
+ fnIMultiLanguage_EnumCodePages,
+ fnIMultiLanguage_GetCharsetInfo,
+ fnIMultiLanguage_IsConvertible,
+ fnIMultiLanguage_ConvertString,
+ fnIMultiLanguage_ConvertStringToUnicode,
+ fnIMultiLanguage_ConvertStringFromUnicode,
+ fnIMultiLanguage_ConvertStringReset,
+ fnIMultiLanguage_GetRfc1766FromLcid,
+ fnIMultiLanguage_GetLcidFromRfc1766,
+ fnIMultiLanguage_EnumRfc1766,
+ fnIMultiLanguage_GetRfc1766Info,
+ fnIMultiLanguage_CreateConvertCharset,
+};
+
+
+/******************************************************************************/
+
+static HRESULT WINAPI fnIMultiLanguage2_QueryInterface(
+ IMultiLanguage2* iface,
+ REFIID riid,
+ void** ppvObject)
+{
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage2, iface);
+ return MLang_QueryInterface( This, riid, ppvObject );
+}
+
+static ULONG WINAPI fnIMultiLanguage2_AddRef( IMultiLanguage2* iface )
+{
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage2, iface);
+ return MLang_AddRef( This );
+}
+
+static ULONG WINAPI fnIMultiLanguage2_Release( IMultiLanguage2* iface )
+{
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage2, iface);
+ return MLang_Release( This );
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_GetNumberOfCodePageInfo(
+ IMultiLanguage2* iface,
+ UINT* pcCodePage)
+{
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage2, iface);
+ TRACE("%p, %p\n", This, pcCodePage);
+
+ if (!pcCodePage) return S_FALSE;
+
+ *pcCodePage = This->total;
+ return S_OK;
+}
+
+static void fill_cp_info(const struct mlang_data *ml_data, UINT index, MIMECPINFO *mime_cp_info)
+{
+ CPINFOEXW cpinfo;
+ CHARSETINFO csi;
+ LOGFONTW lf;
+
+ if (TranslateCharsetInfo((DWORD *)ml_data->family_codepage, &csi, TCI_SRCCODEPAGE))
+ mime_cp_info->bGDICharset = csi.ciCharset;
+ else
+ mime_cp_info->bGDICharset = DEFAULT_CHARSET;
+
+ if (!GetCPInfoExW(ml_data->mime_cp_info[index].cp, 0, &cpinfo))
+ {
+ /* fall back to family codepage in the case of alias */
+ if (!GetCPInfoExW(ml_data->family_codepage, 0, &cpinfo))
+ cpinfo.CodePageName[0] = 0;
+ }
+
+ mime_cp_info->dwFlags = ml_data->mime_cp_info[index].flags;
+ mime_cp_info->uiCodePage = ml_data->mime_cp_info[index].cp;
+ mime_cp_info->uiFamilyCodePage = ml_data->family_codepage;
+ strcpyW(mime_cp_info->wszDescription, cpinfo.CodePageName);
+ MultiByteToWideChar(CP_ACP, 0, ml_data->mime_cp_info[index].web_charset, -1,
+ mime_cp_info->wszWebCharset, sizeof(mime_cp_info->wszWebCharset)/sizeof(WCHAR));
+ MultiByteToWideChar(CP_ACP, 0, ml_data->mime_cp_info[index].header_charset, -1,
+ mime_cp_info->wszHeaderCharset, sizeof(mime_cp_info->wszHeaderCharset)/sizeof(WCHAR));
+ MultiByteToWideChar(CP_ACP, 0, ml_data->mime_cp_info[index].body_charset, -1,
+ mime_cp_info->wszBodyCharset, sizeof(mime_cp_info->wszBodyCharset)/sizeof(WCHAR));
+
+ /* FIXME */
+ GetObjectW(GetStockObject(SYSTEM_FIXED_FONT), sizeof(lf), &lf);
+ strcpyW(mime_cp_info->wszFixedWidthFont, lf.lfFaceName);
+ /* FIXME */
+ GetObjectW(GetStockObject(DEFAULT_GUI_FONT), sizeof(lf), &lf);
+ strcpyW(mime_cp_info->wszProportionalFont, lf.lfFaceName);
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_GetCodePageInfo(
+ IMultiLanguage2* iface,
+ UINT uiCodePage,
+ LANGID LangId,
+ PMIMECPINFO pCodePageInfo)
+{
+ UINT i, n;
+
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage2, iface);
+ TRACE("%p, %u, %04x, %p\n", This, uiCodePage, LangId, pCodePageInfo);
+
+ for (i = 0; i < sizeof(mlang_data)/sizeof(mlang_data[0]); i++)
+ {
+ for (n = 0; n < mlang_data[i].number_of_cp; n++)
+ {
+ if (mlang_data[i].mime_cp_info[n].cp == uiCodePage)
+ {
+ fill_cp_info(&mlang_data[i], n, pCodePageInfo);
+ return S_OK;
+ }
+ }
+ }
+
+ return S_FALSE;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_GetFamilyCodePage(
+ IMultiLanguage2* iface,
+ UINT uiCodePage,
+ UINT* puiFamilyCodePage)
+{
+ UINT i, n;
+
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage2, iface);
+ TRACE("%p %d %p\n", This, uiCodePage, puiFamilyCodePage);
+
+ if (!puiFamilyCodePage) return S_FALSE;
+
+ for (i = 0; i < sizeof(mlang_data)/sizeof(mlang_data[0]); i++)
+ {
+ for (n = 0; n < mlang_data[i].number_of_cp; n++)
+ {
+ if (mlang_data[i].mime_cp_info[n].cp == uiCodePage)
+ {
+ *puiFamilyCodePage = mlang_data[i].family_codepage;
+ return S_OK;
+ }
+ }
+ }
+
+ return S_FALSE;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_EnumCodePages(
+ IMultiLanguage2* iface,
+ DWORD grfFlags,
+ LANGID LangId,
+ IEnumCodePage** ppEnumCodePage)
+{
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage2, iface);
+ TRACE("%p %08lx %04x %p\n", This, grfFlags, LangId, ppEnumCodePage);
+
+ return EnumCodePage_create( This, grfFlags, LangId, ppEnumCodePage );
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_GetCharsetInfo(
+ IMultiLanguage2* iface,
+ BSTR Charset,
+ PMIMECSETINFO pCharsetInfo)
+{
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage2, iface);
+ FIXME("%p %s %p\n", This, debugstr_w(Charset), pCharsetInfo);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_IsConvertible(
+ IMultiLanguage2* iface,
+ DWORD dwSrcEncoding,
+ DWORD dwDstEncoding)
+{
+ UINT src_family, dst_family;
+
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage2, iface);
+ TRACE("%p %ld %ld\n", This, dwSrcEncoding, dwDstEncoding);
+
+ if (fnIMultiLanguage2_GetFamilyCodePage(iface, dwSrcEncoding, &src_family) != S_OK ||
+ fnIMultiLanguage2_GetFamilyCodePage(iface, dwDstEncoding, &dst_family) != S_OK)
+ return S_FALSE;
+
+ if (src_family == dst_family) return S_OK;
+
+ /* we can convert any codepage to/from unicode */
+ if (src_family == CP_UNICODE || dst_family == CP_UNICODE) return S_OK;
+
+ return S_FALSE;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_ConvertString(
+ IMultiLanguage2* iface,
+ DWORD* pdwMode,
+ DWORD dwSrcEncoding,
+ DWORD dwDstEncoding,
+ BYTE* pSrcStr,
+ UINT* pcSrcSize,
+ BYTE* pDstStr,
+ UINT* pcDstSize)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_ConvertStringToUnicode(
+ IMultiLanguage2* iface,
+ DWORD* pdwMode,
+ DWORD dwEncoding,
+ CHAR* pSrcStr,
+ UINT* pcSrcSize,
+ WCHAR* pDstStr,
+ UINT* pcDstSize)
+{
+ INT src_len = -1;
+
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage2, iface);
+ TRACE("%p %p %ld %s %p %p %p\n", This, pdwMode, dwEncoding,
+ debugstr_a(pSrcStr), pcSrcSize, pDstStr, pcDstSize);
+
+ if (!pcDstSize)
+ return E_FAIL;
+
+ if (!pcSrcSize)
+ pcSrcSize = &src_len;
+
+ if (!*pcSrcSize)
+ {
+ *pcDstSize = 0;
+ return S_OK;
+ }
+
+ switch (dwEncoding)
+ {
+ case CP_UNICODE:
+ if (*pcSrcSize == -1)
+ *pcSrcSize = lstrlenW((LPCWSTR)pSrcStr);
+ *pcDstSize = min(*pcSrcSize, *pcDstSize);
+ *pcSrcSize *= sizeof(WCHAR);
+ memmove(pDstStr, pSrcStr, *pcDstSize * sizeof(WCHAR));
+ break;
+
+ default:
+ if (*pcSrcSize == -1)
+ *pcSrcSize = lstrlenA(pSrcStr);
+
+ *pcDstSize = MultiByteToWideChar(dwEncoding, 0, pSrcStr, *pcSrcSize, pDstStr, *pcDstSize);
+ break;
+ }
+
+ if (!*pcDstSize)
+ return E_FAIL;
+
+ return S_OK;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_ConvertStringFromUnicode(
+ IMultiLanguage2* iface,
+ DWORD* pdwMode,
+ DWORD dwEncoding,
+ WCHAR* pSrcStr,
+ UINT* pcSrcSize,
+ CHAR* pDstStr,
+ UINT* pcDstSize)
+{
+ INT src_len = -1;
+
+ ICOM_THIS_MULTI(MLang_impl, vtbl_IMultiLanguage2, iface);
+ TRACE("%p %p %ld %s %p %p %p\n", This, pdwMode, dwEncoding,
+ debugstr_w(pSrcStr), pcSrcSize, pDstStr, pcDstSize);
+
+ if (!pcDstSize)
+ return E_FAIL;
+
+ if (!pcSrcSize)
+ pcSrcSize = &src_len;
+
+ if (!*pcSrcSize)
+ {
+ *pcDstSize = 0;
+ return S_OK;
+ }
+
+ switch (dwEncoding)
+ {
+ case CP_UNICODE:
+ if (*pcSrcSize == -1)
+ *pcSrcSize = lstrlenW(pSrcStr);
+ *pcDstSize = min(*pcSrcSize * sizeof(WCHAR), *pcDstSize);
+ memmove(pDstStr, pSrcStr, *pcDstSize);
+ break;
+
+ default:
+ if (*pcSrcSize == -1)
+ *pcSrcSize = lstrlenW(pSrcStr);
+
+ *pcDstSize = WideCharToMultiByte(dwEncoding, 0, pSrcStr, *pcSrcSize, pDstStr, *pcDstSize, NULL, NULL);
+ break;
+ }
+
+
+ if (!*pcDstSize)
+ return E_FAIL;
+
+ return S_OK;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_ConvertStringReset(
+ IMultiLanguage2* iface)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_GetRfc1766FromLcid(
+ IMultiLanguage2* iface,
+ LCID Locale,
+ BSTR* pbstrRfc1766)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_GetLcidFromRfc1766(
+ IMultiLanguage2* iface,
+ LCID* pLocale,
+ BSTR bstrRfc1766)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_EnumRfc1766(
+ IMultiLanguage2* iface,
+ LANGID LangId,
+ IEnumRfc1766** ppEnumRfc1766)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_GetRfc1766Info(
+ IMultiLanguage2* iface,
+ LCID Locale,
+ LANGID LangId,
+ PRFC1766INFO pRfc1766Info)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_CreateConvertCharset(
+ IMultiLanguage2* iface,
+ UINT uiSrcCodePage,
+ UINT uiDstCodePage,
+ DWORD dwProperty,
+ IMLangConvertCharset** ppMLangConvertCharset)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_ConvertStringInIStream(
+ IMultiLanguage2* iface,
+ DWORD* pdwMode,
+ DWORD dwFlag,
+ WCHAR* lpFallBack,
+ DWORD dwSrcEncoding,
+ DWORD dwDstEncoding,
+ IStream* pstmIn,
+ IStream* pstmOut)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_ConvertStringToUnicodeEx(
+ IMultiLanguage2* iface,
+ DWORD* pdwMode,
+ DWORD dwEncoding,
+ CHAR* pSrcStr,
+ UINT* pcSrcSize,
+ WCHAR* pDstStr,
+ UINT* pcDstSize,
+ DWORD dwFlag,
+ WCHAR* lpFallBack)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_DetectCodepageInIStream(
+ IMultiLanguage2* iface,
+ DWORD dwFlag,
+ DWORD dwPrefWinCodePage,
+ IStream* pstmIn,
+ DetectEncodingInfo* lpEncoding,
+ INT* pnScores)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_DetectInputCodepage(
+ IMultiLanguage2* iface,
+ DWORD dwFlag,
+ DWORD dwPrefWinCodePage,
+ CHAR* pSrcStr,
+ INT* pcSrcSize,
+ DetectEncodingInfo* lpEncoding,
+ INT* pnScores)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_ValidateCodePage(
+ IMultiLanguage2* iface,
+ UINT uiCodePage,
+ HWND hwnd)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_GetCodePageDescription(
+ IMultiLanguage2* iface,
+ UINT uiCodePage,
+ LCID lcid,
+ LPWSTR lpWideCharStr,
+ int cchWideChar)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_IsCodePageInstallable(
+ IMultiLanguage2* iface,
+ UINT uiCodePage)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_SetMimeDBSource(
+ IMultiLanguage2* iface,
+ MIMECONTF dwSource)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_GetNumberOfScripts(
+ IMultiLanguage2* iface,
+ UINT* pnScripts)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_EnumScripts(
+ IMultiLanguage2* iface,
+ DWORD dwFlags,
+ LANGID LangId,
+ IEnumScript** ppEnumScript)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI fnIMultiLanguage2_ValidateCodePageEx(
+ IMultiLanguage2* iface,
+ UINT uiCodePage,
+ HWND hwnd,
+ DWORD dwfIODControl)
+{
+ FIXME("\n");
+ return E_NOTIMPL;
+}
+
+static ICOM_VTABLE(IMultiLanguage2) IMultiLanguage2_vtbl =
+{
+ ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
+ fnIMultiLanguage2_QueryInterface,
+ fnIMultiLanguage2_AddRef,
+ fnIMultiLanguage2_Release,
+ fnIMultiLanguage2_GetNumberOfCodePageInfo,
+ fnIMultiLanguage2_GetCodePageInfo,
+ fnIMultiLanguage2_GetFamilyCodePage,
+ fnIMultiLanguage2_EnumCodePages,
+ fnIMultiLanguage2_GetCharsetInfo,
+ fnIMultiLanguage2_IsConvertible,
+ fnIMultiLanguage2_ConvertString,
+ fnIMultiLanguage2_ConvertStringToUnicode,
+ fnIMultiLanguage2_ConvertStringFromUnicode,
+ fnIMultiLanguage2_ConvertStringReset,
+ fnIMultiLanguage2_GetRfc1766FromLcid,
+ fnIMultiLanguage2_GetLcidFromRfc1766,
+ fnIMultiLanguage2_EnumRfc1766,
+ fnIMultiLanguage2_GetRfc1766Info,
+ fnIMultiLanguage2_CreateConvertCharset,
+ fnIMultiLanguage2_ConvertStringInIStream,
+ fnIMultiLanguage2_ConvertStringToUnicodeEx,
+ fnIMultiLanguage2_DetectCodepageInIStream,
+ fnIMultiLanguage2_DetectInputCodepage,
+ fnIMultiLanguage2_ValidateCodePage,
+ fnIMultiLanguage2_GetCodePageDescription,
+ fnIMultiLanguage2_IsCodePageInstallable,
+ fnIMultiLanguage2_SetMimeDBSource,
+ fnIMultiLanguage2_GetNumberOfScripts,
+ fnIMultiLanguage2_EnumScripts,
+ fnIMultiLanguage2_ValidateCodePageEx,
+};
+
+static HRESULT MultiLanguage_create(IUnknown *pUnkOuter, LPVOID *ppObj)
+{
+ MLang_impl *mlang;
+ UINT i;
+
+ TRACE("Creating MultiLanguage object\n");
+
+ mlang = HeapAlloc( GetProcessHeap(), 0, sizeof (MLang_impl) );
+ mlang->vtbl_IMLangFontLink = &IMLangFontLink_vtbl;
+ mlang->vtbl_IMultiLanguage = &IMultiLanguage_vtbl;
+ mlang->vtbl_IMultiLanguage2 = &IMultiLanguage2_vtbl;
+
+ mlang->total = 0;
+ for (i = 0; i < sizeof(mlang_data)/sizeof(mlang_data[0]); i++)
+ mlang->total += mlang_data[i].number_of_cp;
+
+ mlang->ref = 1;
+ *ppObj = (LPVOID) mlang;
+ TRACE("returning %p\n", mlang);
+ return S_OK;
+}
+
+/******************************************************************************/
+
+HRESULT WINAPI MLANG_DllCanUnloadNow(void)
+{
+ FIXME("\n");
+ return S_FALSE;
+}
+
+HRESULT WINAPI MLANG_DllRegisterServer(void)
+{
+ FIXME("\n");
+ return S_OK;
+}
+
+HRESULT WINAPI MLANG_DllUnregisterServer(void)
+{
+ FIXME("\n");
+ return S_OK;
+}
--- /dev/null 1994-07-18 08:46:18.000000000 +0900
+++ dlls/mlang/mlang.spec 2004-08-03 17:49:22.000000000 +0900
@@ -0,0 +1,14 @@
+@ stub ConvertINetMultiByteToUnicode
+@ stub ConvertINetReset
+@ stub ConvertINetString
+@ stub ConvertINetUnicodeToMultiByte
+@ stdcall DllCanUnloadNow() MLANG_DllCanUnloadNow
+@ stdcall DllGetClassObject(ptr ptr ptr) MLANG_DllGetClassObject
+@ stdcall DllRegisterServer() MLANG_DllRegisterServer
+@ stdcall DllUnregisterServer() MLANG_DllUnregisterServer
+@ stub GetGlobalFontLinkObject
+@ stub IsConvertINetStringAvailable
+@ stub LcidToRfc1766A
+@ stub LcidToRfc1766W
+@ stub Rfc1766ToLcidA
+@ stub Rfc1766ToLcidW
--- /dev/null 1994-07-18 08:46:18.000000000 +0900
+++ dlls/mlang/tests/Makefile.in 2004-08-03 17:49:22.000000000 +0900
@@ -0,0 +1,14 @@
+TOPSRCDIR = @top_srcdir@
+TOPOBJDIR = ../../..
+SRCDIR = @srcdir@
+VPATH = @srcdir@
+TESTDLL = mlang.dll
+IMPORTS = ole32 gdi32 kernel32 ntdll
+EXTRALIBS = $(LIBUNICODE) -luuid
+
+CTESTS = \
+ mlang.c
+
+ at MAKE_TEST_RULES@
+
+### Dependencies:
--- /dev/null 1994-07-18 08:46:18.000000000 +0900
+++ dlls/mlang/tests/.cvsignore 2004-08-03 17:49:22.000000000 +0900
@@ -0,0 +1,3 @@
+Makefile
+mlang.ok
+testlist.c
--- /dev/null 1994-07-18 08:46:18.000000000 +0900
+++ dlls/mlang/tests/mlang.c 2004-08-03 17:51:57.000000000 +0900
@@ -0,0 +1,374 @@
+/*
+ * Unit test suite for MLANG APIs.
+ *
+ * Copyright 2004 Dmitry Timoshkov
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ */
+
+#define COBJMACROS
+
+#include <stdarg.h>
+
+#include "windef.h"
+#include "winbase.h"
+#include "winerror.h"
+#include "mlang.h"
+
+#include "wine/test.h"
+#include "wine/debug.h"
+
+#ifndef CP_UNICODE
+#define CP_UNICODE 1200
+#endif
+
+/*#define DUMP_CP_INFO*/
+
+#define TRACE_2 OutputDebugStringA
+
+static void test_multibyte_to_unicode_translations(IMultiLanguage2 *iML2)
+{
+ /* these APIs are broken regarding constness of the input buffer */
+ char stringA[] = "Just a test string\0"; /* double 0 for CP_UNICODE tests */
+ WCHAR stringW[] = {'J','u','s','t',' ','a',' ','t','e','s','t',' ','s','t','r','i','n','g',0};
+ char bufA[256];
+ WCHAR bufW[256];
+ UINT lenA, lenW;
+ HRESULT ret;
+
+ /* IMultiLanguage2_ConvertStringToUnicode tests */
+
+ memset(bufW, 'x', sizeof(bufW));
+ lenA = 0;
+ lenW = sizeof(bufW)/sizeof(bufW[0]);
+ TRACE_2("Call IMultiLanguage2_ConvertStringToUnicode\n");
+ ret = IMultiLanguage2_ConvertStringToUnicode(iML2, NULL, 1252, stringA, &lenA, bufW, &lenW);
+ ok(ret == S_OK, "IMultiLanguage2_ConvertStringToUnicode failed: %08lx\n", ret);
+ ok(lenA == 0, "expected lenA 0, got %u\n", lenA);
+ ok(lenW == 0, "expected lenW 0, got %u\n", lenW);
+
+ memset(bufW, 'x', sizeof(bufW));
+ lenA = -1;
+ lenW = sizeof(bufW)/sizeof(bufW[0]);
+ TRACE_2("Call IMultiLanguage2_ConvertStringToUnicode\n");
+ ret = IMultiLanguage2_ConvertStringToUnicode(iML2, NULL, 1252, stringA, &lenA, bufW, &lenW);
+ ok(ret == S_OK, "IMultiLanguage2_ConvertStringToUnicode failed: %08lx\n", ret);
+ ok(lenA == lstrlenA(stringA), "expected lenA %u, got %u\n", lstrlenA(stringA), lenA);
+ ok(lenW == lstrlenW(stringW), "expected lenW %u, got %u\n", lstrlenW(stringW), lenW);
+ ok(bufW[lenW] != 0, "buf should not be 0 terminated\n");
+ bufW[lenW] = 0; /* -1 doesn't include 0 terminator */
+ ok(!lstrcmpW(bufW, stringW), "bufW/stringW mismatch\n");
+
+ memset(bufW, 'x', sizeof(bufW));
+ lenA = -1;
+ lenW = 5;
+ TRACE_2("Call IMultiLanguage2_ConvertStringToUnicode\n");
+ ret = IMultiLanguage2_ConvertStringToUnicode(iML2, NULL, 1252, stringA, &lenA, bufW, &lenW);
+ ok(ret == E_FAIL, "IMultiLanguage2_ConvertStringToUnicode should fail: %08lx\n", ret);
+ ok(lenW == 0, "expected lenW 0, got %u\n", lenW);
+ /* still has to do partial conversion */
+ ok(!memcmp(bufW, stringW, 5 * sizeof(WCHAR)), "bufW/stringW mismatch\n");
+
+ memset(bufW, 'x', sizeof(bufW));
+ lenA = -1;
+ lenW = sizeof(bufW)/sizeof(bufW[0]);
+ TRACE_2("Call IMultiLanguage2_ConvertStringToUnicode\n");
+ ret = IMultiLanguage2_ConvertStringToUnicode(iML2, NULL, CP_UNICODE, stringA, &lenA, bufW, &lenW);
+ ok(ret == S_OK, "IMultiLanguage2_ConvertStringToUnicode failed: %08lx\n", ret);
+ ok(lenA == lstrlenA(stringA), "expected lenA %u, got %u\n", lstrlenA(stringA), lenA);
+ ok(lenW == lstrlenW(stringW)/sizeof(WCHAR), "expected lenW %u, got %u\n", lstrlenW(stringW)/sizeof(WCHAR), lenW);
+ ok(bufW[lenW] != 0, "buf should not be 0 terminated\n");
+ bufW[lenW] = 0; /* -1 doesn't include 0 terminator */
+ ok(!lstrcmpA((LPCSTR)bufW, stringA), "bufW/stringA mismatch\n");
+
+ /* IMultiLanguage2_ConvertStringFromUnicode tests */
+
+ memset(bufA, 'x', sizeof(bufA));
+ lenW = 0;
+ lenA = sizeof(bufA);
+ TRACE_2("Call IMultiLanguage2_ConvertStringFromUnicode\n");
+ ret = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, stringW, &lenW, bufA, &lenA);
+ ok(ret == S_OK, "IMultiLanguage2_ConvertStringFromUnicode failed: %08lx\n", ret);
+ ok(lenA == 0, "expected lenA 0, got %u\n", lenA);
+ ok(lenW == 0, "expected lenW 0, got %u\n", lenW);
+
+ memset(bufA, 'x', sizeof(bufA));
+ lenW = -1;
+ lenA = sizeof(bufA);
+ TRACE_2("Call IMultiLanguage2_ConvertStringFromUnicode\n");
+ ret = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, stringW, &lenW, bufA, &lenA);
+ ok(ret == S_OK, "IMultiLanguage2_ConvertStringFromUnicode failed: %08lx\n", ret);
+ ok(lenA == lstrlenA(stringA), "expected lenA %u, got %u\n", lstrlenA(stringA), lenA);
+ ok(lenW == lstrlenW(stringW), "expected lenW %u, got %u\n", lstrlenW(stringW), lenW);
+ ok(bufA[lenA] != 0, "buf should not be 0 terminated\n");
+ bufA[lenA] = 0; /* -1 doesn't include 0 terminator */
+ ok(!lstrcmpA(bufA, stringA), "bufA/stringA mismatch\n");
+
+ memset(bufA, 'x', sizeof(bufA));
+ lenW = -1;
+ lenA = 5;
+ TRACE_2("Call IMultiLanguage2_ConvertStringFromUnicode\n");
+ ret = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, 1252, stringW, &lenW, bufA, &lenA);
+ ok(ret == E_FAIL, "IMultiLanguage2_ConvertStringFromUnicode should fail: %08lx\n", ret);
+ ok(lenA == 0, "expected lenA 0, got %u\n", lenA);
+ /* still has to do partial conversion */
+ ok(!memcmp(bufA, stringA, 5), "bufW/stringW mismatch\n");
+
+ memset(bufA, 'x', sizeof(bufA));
+ lenW = -1;
+ lenA = sizeof(bufA);
+ TRACE_2("Call IMultiLanguage2_ConvertStringFromUnicode\n");
+ ret = IMultiLanguage2_ConvertStringFromUnicode(iML2, NULL, CP_UNICODE, stringW, &lenW, bufA, &lenA);
+ ok(ret == S_OK, "IMultiLanguage2_ConvertStringFromUnicode failed: %08lx\n", ret);
+ ok(lenA == lstrlenA(stringA) * sizeof(WCHAR), "expected lenA %u, got %u\n", lstrlenA(stringA) * sizeof(WCHAR), lenA);
+ ok(lenW == lstrlenW(stringW), "expected lenW %u, got %u\n", lstrlenW(stringW), lenW);
+ ok(bufA[lenA] != 0 && bufA[lenA+1] != 0, "buf should not be 0 terminated\n");
+ bufA[lenA] = 0; /* -1 doesn't include 0 terminator */
+ bufA[lenA+1] = 0; /* sizeof(WCHAR) */
+ ok(!lstrcmpW((LPCWSTR)bufA, stringW), "bufA/stringW mismatch\n");
+}
+
+static void inline cpinfo_cmp(MIMECPINFO *cpinfo1, MIMECPINFO *cpinfo2)
+{
+ ok(cpinfo1->dwFlags == cpinfo2->dwFlags, "dwFlags mismatch: %08lx != %08lx\n", cpinfo1->dwFlags, cpinfo2->dwFlags);
+ ok(cpinfo1->uiCodePage == cpinfo2->uiCodePage, "uiCodePage mismatch: %u != %u\n", cpinfo1->uiCodePage, cpinfo2->uiCodePage);
+ ok(cpinfo1->uiFamilyCodePage == cpinfo2->uiFamilyCodePage, "uiFamilyCodePage mismatch: %u != %u\n", cpinfo1->uiFamilyCodePage, cpinfo2->uiFamilyCodePage);
+ ok(!lstrcmpW(cpinfo1->wszDescription, cpinfo2->wszDescription), "wszDescription mismatch\n");
+ ok(!lstrcmpW(cpinfo1->wszWebCharset, cpinfo2->wszWebCharset), "wszWebCharset mismatch\n");
+ ok(!lstrcmpW(cpinfo1->wszHeaderCharset, cpinfo2->wszHeaderCharset), "wszHeaderCharset mismatch\n");
+ ok(!lstrcmpW(cpinfo1->wszBodyCharset, cpinfo2->wszBodyCharset), "wszBodyCharset mismatch\n");
+ ok(!lstrcmpW(cpinfo1->wszFixedWidthFont, cpinfo2->wszFixedWidthFont), "wszFixedWidthFont mismatch\n");
+ ok(!lstrcmpW(cpinfo1->wszProportionalFont, cpinfo2->wszProportionalFont), "wszProportionalFont mismatch\n");
+ ok(cpinfo1->bGDICharset == cpinfo2->bGDICharset, "bGDICharset mismatch: %d != %d\n", cpinfo1->bGDICharset, cpinfo2->bGDICharset);
+}
+
+#ifdef DUMP_CP_INFO
+static const char *dump_mime_flags(DWORD flags)
+{
+ static char buf[1024];
+
+ buf[0] = 0;
+
+ if (flags & MIMECONTF_MAILNEWS) strcat(buf, " MIMECONTF_MAILNEWS");
+ if (flags & MIMECONTF_BROWSER) strcat(buf, " MIMECONTF_BROWSER");
+ if (flags & MIMECONTF_MINIMAL) strcat(buf, " MIMECONTF_MINIMAL");
+ if (flags & MIMECONTF_IMPORT) strcat(buf, " MIMECONTF_IMPORT");
+ if (flags & MIMECONTF_SAVABLE_MAILNEWS) strcat(buf, " MIMECONTF_SAVABLE_MAILNEWS");
+ if (flags & MIMECONTF_SAVABLE_BROWSER) strcat(buf, " MIMECONTF_SAVABLE_BROWSER");
+ if (flags & MIMECONTF_EXPORT) strcat(buf, " MIMECONTF_EXPORT");
+ if (flags & MIMECONTF_PRIVCONVERTER) strcat(buf, " MIMECONTF_PRIVCONVERTER");
+ if (flags & MIMECONTF_VALID) strcat(buf, " MIMECONTF_VALID");
+ if (flags & MIMECONTF_VALID_NLS) strcat(buf, " MIMECONTF_VALID_NLS");
+ if (flags & MIMECONTF_MIME_IE4) strcat(buf, " MIMECONTF_MIME_IE4");
+ if (flags & MIMECONTF_MIME_LATEST) strcat(buf, " MIMECONTF_MIME_LATEST");
+ if (flags & MIMECONTF_MIME_REGISTRY) strcat(buf, " MIMECONTF_MIME_REGISTRY");
+
+ return buf;
+}
+#endif
+
+static void test_EnumCodePages(IMultiLanguage2 *iML2, DWORD flags)
+{
+ IEnumCodePage *iEnumCP = NULL;
+ MIMECPINFO *cpinfo;
+ MIMECPINFO cpinfo2;
+ HRESULT ret;
+ ULONG i, n;
+ UINT total;
+
+ total = 0;
+ TRACE_2("Call IMultiLanguage2_GetNumberOfCodePageInfo\n");
+ ret = IMultiLanguage2_GetNumberOfCodePageInfo(iML2, &total);
+ ok(ret == S_OK && total != 0, "IMultiLanguage2_GetNumberOfCodePageInfo: expected S_OK/!0, got %08lx/%u\n", ret, total);
+
+ trace("total mlang supported codepages %u\n", total);
+
+ TRACE_2("Call IMultiLanguage2_EnumCodePages\n");
+ ret = IMultiLanguage2_EnumCodePages(iML2, flags, LANG_NEUTRAL, &iEnumCP);
+ trace("IMultiLanguage2_EnumCodePages = %08lx, iEnumCP = %p\n", ret, iEnumCP);
+ ok(ret == S_OK && iEnumCP, "IMultiLanguage2_EnumCodePages: expected S_OK/!NULL, got %08lx/%p\n", ret, iEnumCP);
+
+ TRACE_2("Call IEnumCodePage_Reset\n");
+ ret = IEnumCodePage_Reset(iEnumCP);
+ ok(ret == S_OK, "IEnumCodePage_Reset: expected S_OK, got %08lx\n", ret);
+ n = 65536;
+ TRACE_2("Call IEnumCodePage_Next\n");
+ ret = IEnumCodePage_Next(iEnumCP, 0, NULL, &n);
+ ok(n == 0 && ret == S_FALSE, "IEnumCodePage_Next: expected 0/S_FALSE, got %lu/%08lx\n", n, ret);
+ TRACE_2("Call IEnumCodePage_Next\n");
+ ret = IEnumCodePage_Next(iEnumCP, 0, NULL, NULL);
+ ok(ret == S_FALSE, "IEnumCodePage_Next: expected S_FALSE, got %08lx\n", ret);
+
+ cpinfo = HeapAlloc(GetProcessHeap(), 0, sizeof(*cpinfo) * total * 2);
+
+ n = total * 2;
+ TRACE_2("Call IEnumCodePage_Next\n");
+ ret = IEnumCodePage_Next(iEnumCP, 0, cpinfo, &n);
+ trace("IEnumCodePage_Next = %08lx, n = %lu\n", ret, n);
+ ok(ret == S_FALSE && n == 0, "IEnumCodePage_Next: expected S_FALSE/0, got %08lx/%lu\n", ret, n);
+
+ n = total * 2;
+ TRACE_2("Call IEnumCodePage_Next\n");
+ ret = IEnumCodePage_Next(iEnumCP, n, cpinfo, &n);
+ ok(ret == S_OK && n != 0, "IEnumCodePage_Next: expected S_OK, got %08lx/%lu\n", ret, n);
+
+ trace("flags %08lx, enumerated codepages %lu\n", flags, n);
+
+ if (!flags)
+ {
+ ok(n == total, "IEnumCodePage_Next: expected %u, got %lu", total, n);
+
+ flags = MIMECONTF_MIME_LATEST;
+ }
+
+ total = n;
+
+ for (i = 0; i < n; i++)
+ {
+ CPINFOEXA cpinfoex;
+ CHARSETINFO csi;
+#ifdef DUMP_CP_INFO
+ trace("MIMECPINFO #%lu:\n"
+ "dwFlags %08lx %s\n"
+ "uiCodePage %u\n"
+ "uiFamilyCodePage %u\n"
+ "wszDescription %s\n"
+ "wszWebCharset %s\n"
+ "wszHeaderCharset %s\n"
+ "wszBodyCharset %s\n"
+ "wszFixedWidthFont %s\n"
+ "wszProportionalFont %s\n"
+ "bGDICharset %d\n\n",
+ i,
+ cpinfo[i].dwFlags, dump_mime_flags(cpinfo[i].dwFlags),
+ cpinfo[i].uiCodePage,
+ cpinfo[i].uiFamilyCodePage,
+ wine_dbgstr_w(cpinfo[i].wszDescription),
+ wine_dbgstr_w(cpinfo[i].wszWebCharset),
+ wine_dbgstr_w(cpinfo[i].wszHeaderCharset),
+ wine_dbgstr_w(cpinfo[i].wszBodyCharset),
+ wine_dbgstr_w(cpinfo[i].wszFixedWidthFont),
+ wine_dbgstr_w(cpinfo[i].wszProportionalFont),
+ cpinfo[i].bGDICharset);
+#endif
+ ok(cpinfo[i].dwFlags & flags, "enumerated flags %08lx do not include requested %08lx\n", cpinfo[i].dwFlags, flags);
+
+ if (TranslateCharsetInfo((DWORD *)cpinfo[i].uiFamilyCodePage, &csi, TCI_SRCCODEPAGE))
+ ok(cpinfo[i].bGDICharset == csi.ciCharset, "%d != %d\n", cpinfo[i].bGDICharset, csi.ciCharset);
+ else
+ trace("TranslateCharsetInfo failed for cp %u\n", cpinfo[i].uiFamilyCodePage);
+
+ if (GetCPInfoExA(cpinfo[i].uiCodePage, 0, &cpinfoex))
+ trace("CodePage %u name: %s\n", cpinfo[i].uiCodePage, cpinfoex.CodePageName);
+ else
+ trace("GetCPInfoExA failed for cp %u\n", cpinfo[i].uiCodePage);
+ if (GetCPInfoExA(cpinfo[i].uiFamilyCodePage, 0, &cpinfoex))
+ trace("CodePage %u name: %s\n", cpinfo[i].uiFamilyCodePage, cpinfoex.CodePageName);
+ else
+ trace("GetCPInfoExA failed for cp %u\n", cpinfo[i].uiFamilyCodePage);
+
+ /* Win95 does not support UTF-7 */
+ if (cpinfo[i].uiCodePage == CP_UTF7) continue;
+
+ /* support files for some codepages might be not installed, or
+ * the codepage is just an alias.
+ */
+ if (IsValidCodePage(cpinfo[i].uiCodePage))
+ {
+ TRACE_2("Call IMultiLanguage2_IsConvertible\n");
+ ret = IMultiLanguage2_IsConvertible(iML2, cpinfo[i].uiCodePage, CP_UNICODE);
+ ok(ret == S_OK, "IMultiLanguage2_IsConvertible(%u -> CP_UNICODE) = %08lx\n", cpinfo[i].uiCodePage, ret);
+ TRACE_2("Call IMultiLanguage2_IsConvertible\n");
+ ret = IMultiLanguage2_IsConvertible(iML2, CP_UNICODE, cpinfo[i].uiCodePage);
+ ok(ret == S_OK, "IMultiLanguage2_IsConvertible(CP_UNICODE -> %u) = %08lx\n", cpinfo[i].uiCodePage, ret);
+
+ TRACE_2("Call IMultiLanguage2_IsConvertible\n");
+ ret = IMultiLanguage2_IsConvertible(iML2, cpinfo[i].uiCodePage, CP_UTF8);
+ ok(ret == S_OK, "IMultiLanguage2_IsConvertible(%u -> CP_UTF8) = %08lx\n", cpinfo[i].uiCodePage, ret);
+ TRACE_2("Call IMultiLanguage2_IsConvertible\n");
+ ret = IMultiLanguage2_IsConvertible(iML2, CP_UTF8, cpinfo[i].uiCodePage);
+ ok(ret == S_OK, "IMultiLanguage2_IsConvertible(CP_UTF8 -> %u) = %08lx\n", cpinfo[i].uiCodePage, ret);
+ }
+ else
+ trace("IsValidCodePage failed for cp %u\n", cpinfo[i].uiCodePage);
+
+ trace("---\n");
+ }
+
+ /* now IEnumCodePage_Next should fail, since pointer is at the end */
+ n = 1;
+ ret = IEnumCodePage_Next(iEnumCP, 1, &cpinfo2, &n);
+ ok(ret == S_FALSE && n == 0, "IEnumCodePage_Next: expected S_OK/0, got %08lx/%lu\n", ret, n);
+
+ ret = IEnumCodePage_Reset(iEnumCP);
+ ok(ret == S_OK, "IEnumCodePage_Reset: expected S_OK, got %08lx\n", ret);
+ n = 0;
+ ret = IEnumCodePage_Next(iEnumCP, 1, &cpinfo2, &n);
+ ok(n == 1 && ret == S_OK, "IEnumCodePage_Next: expected 2/S_OK, got %lu/%08lx\n", n, ret);
+ cpinfo_cmp(&cpinfo[0], &cpinfo2);
+
+#if 0
+ /* Due to a bug in MS' implementation of IEnumCodePage_Skip
+ * it's not used here.
+ */
+ ret = IEnumCodePage_Skip(iEnumCP, 1);
+ ok(ret == S_OK, "IEnumCodePage_Skip: expected S_OK, got %08lx\n", ret);
+#endif
+ for (i = 0; i < total - 1; i++)
+ {
+ n = 0;
+ ret = IEnumCodePage_Next(iEnumCP, 1, &cpinfo2, &n);
+ ok(n == 1 && ret == S_OK, "IEnumCodePage_Next: expected 1/S_OK, got %lu/%08lx\n", n, ret);
+ cpinfo_cmp(&cpinfo[i + 1], &cpinfo2);
+ }
+
+ HeapFree(GetProcessHeap(), 0, cpinfo);
+ IEnumCodePage_Release(iEnumCP);
+}
+
+START_TEST(mlang)
+{
+ IMultiLanguage2 *iML2 = NULL;
+ HRESULT ret;
+
+ CoInitialize(NULL);
+ TRACE_2("Call CoCreateInstance\n");
+ ret = CoCreateInstance(&CLSID_CMultiLanguage, NULL, CLSCTX_INPROC_SERVER,
+ &IID_IMultiLanguage2, (void **)&iML2);
+
+ trace("ret = %08lx, MultiLanguage2 iML2 = %p\n", ret, iML2);
+ if (ret != S_OK || !iML2) return;
+
+ test_EnumCodePages(iML2, 0);
+ test_EnumCodePages(iML2, MIMECONTF_MIME_LATEST);
+ test_EnumCodePages(iML2, MIMECONTF_BROWSER);
+ test_EnumCodePages(iML2, MIMECONTF_MINIMAL);
+ test_EnumCodePages(iML2, MIMECONTF_VALID);
+ /* FIXME: why MIMECONTF_MIME_REGISTRY returns 0 of supported codepages? */
+ /*test_EnumCodePages(iML2, MIMECONTF_MIME_REGISTRY);*/
+
+ TRACE_2("Call IMultiLanguage2_IsConvertible\n");
+ ret = IMultiLanguage2_IsConvertible(iML2, CP_UTF8, CP_UNICODE);
+ ok(ret == S_OK, "IMultiLanguage2_IsConvertible(CP_UTF8 -> CP_UNICODE) = %08lx\n", ret);
+ TRACE_2("Call IMultiLanguage2_IsConvertible\n");
+ ret = IMultiLanguage2_IsConvertible(iML2, CP_UNICODE, CP_UTF8);
+ ok(ret == S_OK, "IMultiLanguage2_IsConvertible(CP_UNICODE -> CP_UTF8) = %08lx\n", ret);
+
+ test_multibyte_to_unicode_translations(iML2);
+
+ IMultiLanguage2_Release(iML2);
+
+ CoUninitialize();
+}
More information about the wine-patches
mailing list