[Bug 38189] Multiple applications want 'IHTMLDocument2::put_charset' implementation (Yarxi dictionary, iPed 7G 2019)

https://bugs.winehq.org/show_bug.cgi?id=38189

Anastasius Focht  changed:

What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |download
            Summary|Yarxi Japanese -> Russian   |Multiple applications want
                   |dictionary shows error      |'IHTMLDocument2::put_charse
                   |0x80004001 on startup       |t' implementation (Yarxi
                   |                            |dictionary, iPed 7G 2019)
                 CC|                            |[e-mail]

--- Comment #8 from Anastasius Focht  ---
Hello folks,

found another app that calls this, although it doesn't seem critical.

http://www.pedfast.com/

iPed 7G 2019 (.NET 4.0 app) v13.0.10800

Download: ftp://pedfast.com/pub/iPed7g_Setup_x86_4980.msi

Prerequisite: 'winetricks -q dotnet40'

--- snip ---
$ pwd
/home/focht/.wine/drive_c/Program Files (x86)/PedFast Technologies/iPed(tm) 7G
2019/13.0.10800

$  wine ./iPed7G.exe 
...
0035:fixme:mshtml:HTMLDocument_put_charset (0x53590d0)->(L"unicode")
...
--- snip ---

Running with managed debugger to trap at CLR exceptions at first chance:

--- snip ---
(34.35): CLR exception - code e0434352 (first chance)
Exception object: 00e28e14
Exception type:   System.NotImplementedException
Message:          The method or operation is not implemented.
InnerException:   <none>
StackTrace (generated):
<none>
StackTraceString: <none>
HResult: 80004001

OS Thread Id: 0x35 (0)
Child SP IP       Call Site
0033c20c 7b43c81b [HelperMethodFrame: 0033c20c] 
0033c25c 0398961d DomainBoundILStubClass.IL_STUB_CLRtoCOM(System.String)
0033c278 03472e8e [InlinedCallFrame: 0033c278]
System.Windows.Forms.UnsafeNativeMethods+IHTMLDocument2.SetCharset(System.String)
0033c2f0 03472e8e
System.Windows.Forms.WebBrowser+WebBrowserEvent.DocumentComplete(System.Object,
System.Object ByRef)
0033c874 791421db [DebuggerU2MCatchHandlerFrame: 0033c874] 
0033c840 791421db [CustomGCFrame: 0033c840] 
0033c814 791421db [GCFrame: 0033c814] 
0033c7f8 791421db [GCFrame: 0033c7f8] 
0033ca1c 791421db [HelperMethodFrame_PROTECTOBJ: 0033ca1c]
System.RuntimeMethodHandle._InvokeMethodFast(System.IRuntimeMethodInfo,
System.Object, System.Object[], System.SignatureStruct ByRef,
System.Reflection.MethodAttributes, System.RuntimeType)
0033ca98 79b3d689
System.RuntimeMethodHandle.InvokeMethodFast(System.IRuntimeMethodInfo,
System.Object, System.Object[], System.Signature,
System.Reflection.MethodAttributes, System.RuntimeType)
0033caec 79b3d37c System.Reflection.RuntimeMethodInfo.Invoke(System.Object,
System.Reflection.BindingFlags, System.Reflection.Binder, System.Object[],
System.Globalization.CultureInfo, Boolean)
0033cb28 79b3bfed System.Reflection.RuntimeMethodInfo.Invoke(System.Object,
System.Reflection.BindingFlags, System.Reflection.Binder, System.Object[],
System.Globalization.CultureInfo)
0033d95c 791421db [DebuggerU2MCatchHandlerFrame: 0033d95c] 
0033d910 791421db [GCFrame: 0033d910] 
0033d8f4 791421db [GCFrame: 0033d8f4] 
0033ea90 791421db [InlinedCallFrame: 0033ea90] 
0033ea8c 034b2eec DomainBoundILStubClass.IL_STUB_PInvoke(MSG ByRef)
0033ea90 034a71ff [InlinedCallFrame: 0033ea90]
System.Windows.Forms.UnsafeNativeMethods.DispatchMessageW(MSG ByRef)
0033ead4 034a71ff
System.Windows.Forms.Application+ComponentManager.System.Windows.Forms.UnsafeNativeMethods.IMsoComponentManager.FPushMessageLoop(IntPtr,
Int32, Int32)
0033ead8 034a6e2c [InlinedCallFrame: 0033ead8] 
0033eb70 034a6e2c
System.Windows.Forms.Application+ThreadContext.RunMessageLoopInner(Int32,
System.Windows.Forms.ApplicationContext)
0033ebc8 034a6c81
System.Windows.Forms.Application+ThreadContext.RunMessageLoop(Int32,
System.Windows.Forms.ApplicationContext)
0033ebf8 0399fefb
System.Windows.Forms.Application.RunDialog(System.Windows.Forms.Form)
0033ec0c 039c9f83
System.Windows.Forms.Form.ShowDialog(System.Windows.Forms.IWin32Window)
0033ec10 039ca1b7 [InlinedCallFrame: 0033ec10] 
0033eca8 039ca1b7 System.Windows.Forms.Form.ShowDialog()
0033ecac 039a0f2a
System.Windows.Forms.Application+ThreadContext.OnThreadException(System.Exception)
0033ece8 039a9866
System.Windows.Forms.Control.WndProcException(System.Exception)
0033ecf4 039aff9c
System.Windows.Forms.Control+ControlNativeWindow.OnThreadException(System.Exception)
0033ecf8 03496fd1 System.Windows.Forms.NativeWindow.Callback(IntPtr, Int32,
IntPtr, IntPtr)
0033f0a0 00a10528 [InlinedCallFrame: 0033f0a0] 
0033f09c 034b2388
DomainBoundILStubClass.IL_STUB_PInvoke(System.Runtime.InteropServices.HandleRef,
Int32)
0033f0a0 03494a17 [InlinedCallFrame: 0033f0a0]
System.Windows.Forms.SafeNativeMethods.ShowWindow(System.Runtime.InteropServices.HandleRef,
Int32)
0033f0e8 03494a17 System.Windows.Forms.Control.SetVisibleCore(Boolean)
0033f180 0349f8fb System.Windows.Forms.Form.SetVisibleCore(Boolean)
0033f1b4 03492c60 System.Windows.Forms.Control.set_Visible(Boolean)
0033f1bc 034a6d9d
System.Windows.Forms.Application+ThreadContext.RunMessageLoopInner(Int32,
System.Windows.Forms.ApplicationContext)
0033f214 034a6c81
System.Windows.Forms.Application+ThreadContext.RunMessageLoop(Int32,
System.Windows.Forms.ApplicationContext)
0033f244 003f3745
Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.OnRun()
0033f270 003f0d97
Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.DoApplicationModel()
0033f29c 003f07e8
Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.Run(System.String[])
0033f2e8 003f00e5 iPed7G.My.MyApplication.Main(System.String[])
0033f548 791421db [GCFrame: 0033f548]

First chance exceptions are reported before any exception handling.
This exception may be expected and handled.
eax=7b4298b1 ebx=00000010 ecx=0033c0a4 edx=0033c160 esi=00000000 edi=0014a4e0
eip=7b43c81b esp=0033c084 ebp=0033c0f8 iopl=0         nv up ei pl nz ac pe nc
cs=0023  ss=002b  ds=002b  es=002b  fs=0063  gs=006b             efl=00200216
KERNEL32!RaiseException+0x9b:
7b43c81b 83c40c          add     esp,0Ch
--- snip ---

Wine source:

https://source.winehq.org/git/wine.git/blob/HEAD:/dlls/mshtml/htmldoc.c#l911

--- snip ---
 910 static HRESULT WINAPI HTMLDocument_put_charset(IHTMLDocument2 *iface, BSTR
v)
 911 {
 912     HTMLDocument *This = impl_from_IHTMLDocument2(iface);
 913     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 914     return E_NOTIMPL;
 915 }
 916 
 917 static HRESULT WINAPI HTMLDocument_get_charset(IHTMLDocument2 *iface, BSTR
*p)
 918 {
 919     HTMLDocument *This = impl_from_IHTMLDocument2(iface);
 920 
 921     TRACE("(%p)->(%p)\n", This, p);
 922 
 923     return IHTMLDocument7_get_characterSet(&This->IHTMLDocument7_iface,
p);
 924 }
 925 
 926 static HRESULT WINAPI HTMLDocument_put_defaultCharset(IHTMLDocument2
*iface, BSTR v)
 927 {
 928     HTMLDocument *This = impl_from_IHTMLDocument2(iface);
 929     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 930     return E_NOTIMPL;
 931 }
 932 
 933 static HRESULT WINAPI HTMLDocument_get_defaultCharset(IHTMLDocument2
*iface, BSTR *p)
 934 {
 935     HTMLDocument *This = impl_from_IHTMLDocument2(iface);
 936 
 937     TRACE("(%p)->(%p)\n", This, p);
 938 
 939     *p = charset_string_from_cp(GetACP());
 940     return *p ? S_OK : E_OUTOFMEMORY;
 941 }
--- snip ---

$ sha1sum iPed7g_Setup_x86_4980.msi 
fb8312d835822043eceb3dc282e0e4a6ac95a4d3  iPed7g_Setup_x86_4980.msi

$ du -sh iPed7g_Setup_x86_4980.msi 
39M    iPed7g_Setup_x86_4980.msi

$ wine --version
wine-3.18

Regards