scrobj: Add partial DllInstall implementation.

Signed-off-by: Jacek Caban <jacek@codeweavers.com> Signed-off-by: Alexandre Julliard <julliard@winehq.org>

scrobj: Add partial DllInstall implementation.
30bbed5d · Jacek Caban · Alexandre Julliard · de6554a3 · 30bbed5d · 30bbed5d
Commit 30bbed5d authored Sep 18, 2019 by Jacek Caban Committed by Alexandre Julliard Sep 18, 2019
Show whitespace changes
Inline Side-by-side

Showing with 20 additions and 0 deletions

scrobj.c dlls/scrobj/scrobj.c +19 -0

scrobj.spec dlls/scrobj/scrobj.spec +1 -0

No files found.
--- a/dlls/scrobj/scrobj.c
+++ b/dlls/scrobj/scrobj.c
@@ -444,6 +444,25 @@ HRESULT WINAPI DllUnregisterServer(void)
    return __wine_unregister_resources(scrobj_instance);
 }

+/***********************************************************************
+ *      DllInstall (scrobj.@)
+ */
+HRESULT WINAPI DllInstall(BOOL install, const WCHAR *arg)
+{
+    HRESULT hres;
+
+    if (install)
+    {
+        hres = DllRegisterServer();
+        if (!arg || FAILED(hres)) return hres;
+    }
+    else if (!arg)
+        return DllUnregisterServer();
+
+    FIXME("argument %s not supported\n", debugstr_w(arg));
+    return E_NOTIMPL;
+}
+
 static HRESULT WINAPI scriptlet_typelib_CreateInstance(IClassFactory *factory, IUnknown *outer, REFIID riid, void **obj)
 {
    struct scriptlet_typelib *This;

--- a/dlls/scrobj/scrobj.spec
+++ b/dlls/scrobj/scrobj.spec
 @ stdcall -private DllCanUnloadNow()
 @ stdcall -private DllGetClassObject(ptr ptr ptr)
+@ stdcall -private DllInstall(long wstr)
 @ stdcall -private DllRegisterServer()
 @ stdcall -private DllUnregisterServer()