Authors: Dmitry Timoshkov <dmitry@codeweavers.com>, Mike McCormack <mike@codeweavers.com>
Added an implementation of mlang.dll and test cases for it.
diff --git a/configure b/configure
index 69c9945..b521889 100755
--- a/configure
+++ b/configure
@@ -20271,7 +20271,7 @@
MAKE_PROG_RULES=programs/Makeprog.rules
- ac_config_files="$ac_config_files Make.rules dlls/Makedll.rules dlls/Maketest.rules libs/Makelib.rules programs/Makeprog.rules Makefile dlls/Makefile dlls/advapi32/Makefile dlls/advapi32/tests/Makefile dlls/amstream/Makefile dlls/atl/Makefile dlls/avicap32/Makefile dlls/avifil32/Makefile dlls/cabinet/Makefile dlls/capi2032/Makefile dlls/cards/Makefile dlls/cfgmgr32/Makefile dlls/comcat/Makefile dlls/comctl32/Makefile dlls/comctl32/tests/Makefile dlls/commdlg/Makefile dlls/crtdll/Makefile dlls/crypt32/Makefile dlls/ctl3d/Makefile dlls/d3d8/Makefile dlls/d3d9/Makefile dlls/d3dim/Makefile dlls/d3drm/Makefile dlls/d3dx8/Makefile dlls/d3dxof/Makefile dlls/dbghelp/Makefile dlls/dciman32/Makefile dlls/ddraw/Makefile dlls/ddraw/tests/Makefile dlls/devenum/Makefile dlls/dinput/Makefile dlls/dinput8/Makefile dlls/dmband/Makefile dlls/dmcompos/Makefile dlls/dmime/Makefile dlls/dmloader/Makefile dlls/dmscript/Makefile dlls/dmstyle/Makefile dlls/dmsynth/Makefile dlls/dmusic/Makefile dlls/dmusic32/Makefile dlls/dplay/Makefile dlls/dplayx/Makefile dlls/dpnet/Makefile dlls/dpnhpast/Makefile dlls/dsound/Makefile dlls/dsound/tests/Makefile dlls/dswave/Makefile dlls/dxdiagn/Makefile dlls/dxerr8/Makefile dlls/dxerr9/Makefile dlls/dxguid/Makefile dlls/gdi/Makefile dlls/gdi/tests/Makefile dlls/glu32/Makefile dlls/glut32/Makefile dlls/hhctrl.ocx/Makefile dlls/iccvid/Makefile dlls/icmp/Makefile dlls/ifsmgr.vxd/Makefile dlls/imagehlp/Makefile dlls/imm32/Makefile dlls/iphlpapi/Makefile dlls/iphlpapi/tests/Makefile dlls/kernel/Makefile dlls/kernel/tests/Makefile dlls/lzexpand/Makefile dlls/mapi32/Makefile dlls/mapi32/tests/Makefile dlls/mmdevldr.vxd/Makefile dlls/monodebg.vxd/Makefile dlls/mpr/Makefile dlls/msacm/Makefile dlls/msacm/imaadp32/Makefile dlls/msacm/msadp32/Makefile dlls/msacm/msg711/Makefile dlls/msacm/winemp3/Makefile dlls/msacm/tests/Makefile dlls/msdmo/Makefile dlls/mshtml/Makefile dlls/msi/Makefile dlls/msimg32/Makefile dlls/msisys/Makefile dlls/msnet32/Makefile dlls/msrle32/Makefile dlls/msvcrt/Makefile dlls/msvcrt/tests/Makefile dlls/msvcrt20/Makefile dlls/msvcrt40/Makefile dlls/msvcrtd/Makefile dlls/msvcrtd/tests/Makefile dlls/msvidc32/Makefile dlls/msvideo/Makefile dlls/mswsock/Makefile dlls/netapi32/Makefile dlls/netapi32/tests/Makefile dlls/newdev/Makefile dlls/ntdll/Makefile dlls/ntdll/tests/Makefile dlls/odbc32/Makefile dlls/ole32/Makefile dlls/oleacc/Makefile dlls/oleaut32/Makefile dlls/oleaut32/tests/Makefile dlls/olecli/Makefile dlls/oledlg/Makefile dlls/olepro32/Makefile dlls/olesvr/Makefile dlls/opengl32/Makefile dlls/psapi/Makefile dlls/psapi/tests/Makefile dlls/qcap/Makefile dlls/quartz/Makefile dlls/rasapi32/Makefile dlls/richedit/Makefile dlls/rpcrt4/Makefile dlls/rpcrt4/tests/Makefile dlls/rsabase/Makefile dlls/rsabase/tests/Makefile dlls/secur32/Makefile dlls/serialui/Makefile dlls/setupapi/Makefile dlls/shdocvw/Makefile dlls/shell32/Makefile dlls/shell32/tests/Makefile dlls/shfolder/Makefile dlls/shlwapi/Makefile dlls/shlwapi/tests/Makefile dlls/snmpapi/Makefile dlls/sti/Makefile dlls/tapi32/Makefile dlls/ttydrv/Makefile dlls/twain/Makefile dlls/unicows/Makefile dlls/url/Makefile dlls/urlmon/Makefile dlls/urlmon/tests/Makefile dlls/user/Makefile dlls/user/tests/Makefile dlls/uuid/Makefile dlls/uxtheme/Makefile dlls/vdhcp.vxd/Makefile dlls/vdmdbg/Makefile dlls/version/Makefile dlls/version/tests/Makefile dlls/vmm.vxd/Makefile dlls/vnbt.vxd/Makefile dlls/vnetbios.vxd/Makefile dlls/vtdapi.vxd/Makefile dlls/vwin32.vxd/Makefile dlls/win32s/Makefile dlls/winaspi/Makefile dlls/wined3d/Makefile dlls/winedos/Makefile dlls/wineps/Makefile dlls/wininet/Makefile dlls/wininet/tests/Makefile dlls/winmm/Makefile dlls/winmm/joystick/Makefile dlls/winmm/mcianim/Makefile dlls/winmm/mciavi/Makefile dlls/winmm/mcicda/Makefile dlls/winmm/mciseq/Makefile dlls/winmm/mciwave/Makefile dlls/winmm/midimap/Makefile dlls/winmm/tests/Makefile dlls/winmm/wavemap/Makefile dlls/winmm/winealsa/Makefile dlls/winmm/winearts/Makefile dlls/winmm/wineaudioio/Makefile dlls/winmm/winejack/Makefile dlls/winmm/winenas/Makefile dlls/winmm/wineoss/Makefile dlls/winnls/Makefile dlls/winsock/Makefile dlls/winsock/tests/Makefile dlls/winspool/Makefile dlls/winspool/tests/Makefile dlls/wintab32/Makefile dlls/wintrust/Makefile dlls/wow32/Makefile dlls/wsock32/Makefile dlls/x11drv/Makefile documentation/Makefile include/Makefile libs/Makefile libs/port/Makefile libs/unicode/Makefile libs/wine/Makefile libs/wpp/Makefile loader/Makefile programs/Makefile programs/avitools/Makefile programs/clock/Makefile programs/cmdlgtst/Makefile programs/control/Makefile programs/expand/Makefile programs/msiexec/Makefile programs/notepad/Makefile programs/progman/Makefile programs/regedit/Makefile programs/regsvr32/Makefile programs/rpcss/Makefile programs/rundll32/Makefile programs/start/Makefile programs/taskmgr/Makefile programs/uninstaller/Makefile programs/view/Makefile programs/wcmd/Makefile programs/wineboot/Makefile programs/winebrowser/Makefile programs/winecfg/Makefile programs/wineconsole/Makefile programs/winedbg/Makefile programs/winefile/Makefile programs/winemenubuilder/Makefile programs/winemine/Makefile programs/winepath/Makefile programs/winetest/Makefile programs/winevdm/Makefile programs/winhelp/Makefile programs/winver/Makefile server/Makefile tools/Makefile tools/widl/Makefile tools/winapi/Makefile tools/winebuild/Makefile tools/winedump/Makefile tools/winegcc/Makefile tools/wmc/Makefile tools/wrc/Makefile"
+ ac_config_files="$ac_config_files Make.rules dlls/Makedll.rules dlls/Maketest.rules libs/Makelib.rules programs/Makeprog.rules Makefile dlls/Makefile dlls/advapi32/Makefile dlls/advapi32/tests/Makefile dlls/amstream/Makefile dlls/atl/Makefile dlls/avicap32/Makefile dlls/avifil32/Makefile dlls/cabinet/Makefile dlls/capi2032/Makefile dlls/cards/Makefile dlls/cfgmgr32/Makefile dlls/comcat/Makefile dlls/comctl32/Makefile dlls/comctl32/tests/Makefile dlls/commdlg/Makefile dlls/crtdll/Makefile dlls/crypt32/Makefile dlls/ctl3d/Makefile dlls/d3d8/Makefile dlls/d3d9/Makefile dlls/d3dim/Makefile dlls/d3drm/Makefile dlls/d3dx8/Makefile dlls/d3dxof/Makefile dlls/dbghelp/Makefile dlls/dciman32/Makefile dlls/ddraw/Makefile dlls/ddraw/tests/Makefile dlls/devenum/Makefile dlls/dinput/Makefile dlls/dinput8/Makefile dlls/dmband/Makefile dlls/dmcompos/Makefile dlls/dmime/Makefile dlls/dmloader/Makefile dlls/dmscript/Makefile dlls/dmstyle/Makefile dlls/dmsynth/Makefile dlls/dmusic/Makefile dlls/dmusic32/Makefile dlls/dplay/Makefile dlls/dplayx/Makefile dlls/dpnet/Makefile dlls/dpnhpast/Makefile dlls/dsound/Makefile dlls/dsound/tests/Makefile dlls/dswave/Makefile dlls/dxdiagn/Makefile dlls/dxerr8/Makefile dlls/dxerr9/Makefile dlls/dxguid/Makefile dlls/gdi/Makefile dlls/gdi/tests/Makefile dlls/glu32/Makefile dlls/glut32/Makefile dlls/hhctrl.ocx/Makefile dlls/iccvid/Makefile dlls/icmp/Makefile dlls/ifsmgr.vxd/Makefile dlls/imagehlp/Makefile dlls/imm32/Makefile dlls/iphlpapi/Makefile dlls/iphlpapi/tests/Makefile dlls/kernel/Makefile dlls/kernel/tests/Makefile 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 dlls/msacm/Makefile dlls/msacm/imaadp32/Makefile dlls/msacm/msadp32/Makefile dlls/msacm/msg711/Makefile dlls/msacm/winemp3/Makefile dlls/msacm/tests/Makefile dlls/msdmo/Makefile dlls/mshtml/Makefile dlls/msi/Makefile dlls/msimg32/Makefile dlls/msisys/Makefile dlls/msnet32/Makefile dlls/msrle32/Makefile dlls/msvcrt/Makefile dlls/msvcrt/tests/Makefile dlls/msvcrt20/Makefile dlls/msvcrt40/Makefile dlls/msvcrtd/Makefile dlls/msvcrtd/tests/Makefile dlls/msvidc32/Makefile dlls/msvideo/Makefile dlls/mswsock/Makefile dlls/netapi32/Makefile dlls/netapi32/tests/Makefile dlls/newdev/Makefile dlls/ntdll/Makefile dlls/ntdll/tests/Makefile dlls/odbc32/Makefile dlls/ole32/Makefile dlls/oleacc/Makefile dlls/oleaut32/Makefile dlls/oleaut32/tests/Makefile dlls/olecli/Makefile dlls/oledlg/Makefile dlls/olepro32/Makefile dlls/olesvr/Makefile dlls/opengl32/Makefile dlls/psapi/Makefile dlls/psapi/tests/Makefile dlls/qcap/Makefile dlls/quartz/Makefile dlls/rasapi32/Makefile dlls/richedit/Makefile dlls/rpcrt4/Makefile dlls/rpcrt4/tests/Makefile dlls/rsabase/Makefile dlls/rsabase/tests/Makefile dlls/secur32/Makefile dlls/serialui/Makefile dlls/setupapi/Makefile dlls/shdocvw/Makefile dlls/shell32/Makefile dlls/shell32/tests/Makefile dlls/shfolder/Makefile dlls/shlwapi/Makefile dlls/shlwapi/tests/Makefile dlls/snmpapi/Makefile dlls/sti/Makefile dlls/tapi32/Makefile dlls/ttydrv/Makefile dlls/twain/Makefile dlls/unicows/Makefile dlls/url/Makefile dlls/urlmon/Makefile dlls/urlmon/tests/Makefile dlls/user/Makefile dlls/user/tests/Makefile dlls/uuid/Makefile dlls/uxtheme/Makefile dlls/vdhcp.vxd/Makefile dlls/vdmdbg/Makefile dlls/version/Makefile dlls/version/tests/Makefile dlls/vmm.vxd/Makefile dlls/vnbt.vxd/Makefile dlls/vnetbios.vxd/Makefile dlls/vtdapi.vxd/Makefile dlls/vwin32.vxd/Makefile dlls/win32s/Makefile dlls/winaspi/Makefile dlls/wined3d/Makefile dlls/winedos/Makefile dlls/wineps/Makefile dlls/wininet/Makefile dlls/wininet/tests/Makefile dlls/winmm/Makefile dlls/winmm/joystick/Makefile dlls/winmm/mcianim/Makefile dlls/winmm/mciavi/Makefile dlls/winmm/mcicda/Makefile dlls/winmm/mciseq/Makefile dlls/winmm/mciwave/Makefile dlls/winmm/midimap/Makefile dlls/winmm/tests/Makefile dlls/winmm/wavemap/Makefile dlls/winmm/winealsa/Makefile dlls/winmm/winearts/Makefile dlls/winmm/wineaudioio/Makefile dlls/winmm/winejack/Makefile dlls/winmm/winenas/Makefile dlls/winmm/wineoss/Makefile dlls/winnls/Makefile dlls/winsock/Makefile dlls/winsock/tests/Makefile dlls/winspool/Makefile dlls/winspool/tests/Makefile dlls/wintab32/Makefile dlls/wintrust/Makefile dlls/wow32/Makefile dlls/wsock32/Makefile dlls/x11drv/Makefile documentation/Makefile include/Makefile libs/Makefile libs/port/Makefile libs/unicode/Makefile libs/wine/Makefile libs/wpp/Makefile loader/Makefile programs/Makefile programs/avitools/Makefile programs/clock/Makefile programs/cmdlgtst/Makefile programs/control/Makefile programs/expand/Makefile programs/msiexec/Makefile programs/notepad/Makefile programs/progman/Makefile programs/regedit/Makefile programs/regsvr32/Makefile programs/rpcss/Makefile programs/rundll32/Makefile programs/start/Makefile programs/taskmgr/Makefile programs/uninstaller/Makefile programs/view/Makefile programs/wcmd/Makefile programs/wineboot/Makefile programs/winebrowser/Makefile programs/winecfg/Makefile programs/wineconsole/Makefile programs/winedbg/Makefile programs/winefile/Makefile programs/winemenubuilder/Makefile programs/winemine/Makefile programs/winepath/Makefile programs/winetest/Makefile programs/winevdm/Makefile programs/winhelp/Makefile programs/winver/Makefile server/Makefile tools/Makefile tools/widl/Makefile tools/winapi/Makefile tools/winebuild/Makefile tools/winedump/Makefile tools/winegcc/Makefile tools/wmc/Makefile tools/wrc/Makefile"
cat >confcache <<\_ACEOF
@@ -20876,6 +20876,8 @@
"dlls/lzexpand/Makefile" ) CONFIG_FILES="$CONFIG_FILES dlls/lzexpand/Makefile" ;;
"dlls/mapi32/Makefile" ) CONFIG_FILES="$CONFIG_FILES dlls/mapi32/Makefile" ;;
"dlls/mapi32/tests/Makefile" ) CONFIG_FILES="$CONFIG_FILES dlls/mapi32/tests/Makefile" ;;
+ "dlls/mlang/Makefile" ) CONFIG_FILES="$CONFIG_FILES dlls/mlang/Makefile" ;;
+ "dlls/mlang/tests/Makefile" ) CONFIG_FILES="$CONFIG_FILES dlls/mlang/tests/Makefile" ;;
"dlls/mmdevldr.vxd/Makefile" ) CONFIG_FILES="$CONFIG_FILES dlls/mmdevldr.vxd/Makefile" ;;
"dlls/monodebg.vxd/Makefile" ) CONFIG_FILES="$CONFIG_FILES dlls/monodebg.vxd/Makefile" ;;
"dlls/mpr/Makefile" ) CONFIG_FILES="$CONFIG_FILES dlls/mpr/Makefile" ;;
diff --git a/configure.ac b/configure.ac
index e9e4df8..a96eac5 100644
--- a/configure.ac
+++ b/configure.ac
@@ -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
diff --git a/dlls/Makefile.in b/dlls/Makefile.in
index 8e5f7c0..871183c 100644
--- a/dlls/Makefile.in
+++ b/dlls/Makefile.in
@@ -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
diff --git a/dlls/mlang/.cvsignore b/dlls/mlang/.cvsignore
new file mode 100644
index 0000000..92fe5e1
--- /dev/null
+++ b/dlls/mlang/.cvsignore
@@ -0,0 +1,3 @@
+Makefile
+mlang.dll.dbg.c
+mlang.spec.def
diff --git a/dlls/mlang/Makefile.in b/dlls/mlang/Makefile.in
new file mode 100644
index 0000000..9d0b21e
--- /dev/null
+++ b/dlls/mlang/Makefile.in
@@ -0,0 +1,17 @@
+TOPSRCDIR = @top_srcdir@
+TOPOBJDIR = ../..
+SRCDIR = @srcdir@
+VPATH = @srcdir@
+MODULE = mlang.dll
+IMPORTS = ole32 user32 gdi32 advapi32 kernel32 ntdll
+EXTRALIBS = $(LIBUNICODE) -luuid
+EXTRADEFS = -DCOM_NO_WINDOWS_H
+
+C_SRCS = \
+ mlang.c
+
+SUBDIRS = tests
+
+@MAKE_DLL_RULES@
+
+### Dependencies:
diff --git a/dlls/mlang/mlang.c b/dlls/mlang/mlang.c
new file mode 100644
index 0000000..75885a0
--- /dev/null
+++ b/dlls/mlang/mlang.c
@@ -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;
+}
diff --git a/dlls/mlang/mlang.spec b/dlls/mlang/mlang.spec
new file mode 100644
index 0000000..b5de11a
--- /dev/null
+++ b/dlls/mlang/mlang.spec
@@ -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
diff --git a/dlls/mlang/tests/.cvsignore b/dlls/mlang/tests/.cvsignore
new file mode 100644
index 0000000..09f0de0
--- /dev/null
+++ b/dlls/mlang/tests/.cvsignore
@@ -0,0 +1,3 @@
+Makefile
+mlang.ok
+testlist.c
diff --git a/dlls/mlang/tests/Makefile.in b/dlls/mlang/tests/Makefile.in
new file mode 100644
index 0000000..f4387ed
--- /dev/null
+++ b/dlls/mlang/tests/Makefile.in
@@ -0,0 +1,14 @@
+TOPSRCDIR = @top_srcdir@
+TOPOBJDIR = ../../..
+SRCDIR = @srcdir@
+VPATH = @srcdir@
+TESTDLL = mlang.dll
+IMPORTS = ole32 gdi32 kernel32 ntdll
+EXTRALIBS = -luuid
+
+CTESTS = \
+ mlang.c
+
+@MAKE_TEST_RULES@
+
+### Dependencies:
diff --git a/dlls/mlang/tests/mlang.c b/dlls/mlang/tests/mlang.c
new file mode 100644
index 0000000..1c16b80
--- /dev/null
+++ b/dlls/mlang/tests/mlang.c
@@ -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();
+}
