Added stub DLL.

Robert Wilhelm robert.wilhelm at gmx.net
Sat Mar 7 10:50:12 CST 2009


---
 configure.ac                  |    1 +
 dlls/vbscript/Makefile.in     |   14 ++++++
 dlls/vbscript/vbscript.h      |   33 ++++++++++++++
 dlls/vbscript/vbscript.spec   |    4 ++
 dlls/vbscript/vbscript_main.c |   95 +++++++++++++++++++++++++++++++++++++++++
 5 files changed, 147 insertions(+), 0 deletions(-)
 create mode 100644 dlls/vbscript/Makefile.in
 create mode 100644 dlls/vbscript/vbscript.h
 create mode 100644 dlls/vbscript/vbscript.spec
 create mode 100644 dlls/vbscript/vbscript_main.c

diff --git a/configure.ac b/configure.ac
index f70222f..4438c09 100644
--- a/configure.ac
+++ b/configure.ac
@@ -2228,6 +2228,7 @@ WINE_CONFIG_MAKEFILE([dlls/usp10/tests/Makefile],[dlls/Maketest.rules],[dlls],[A
 WINE_CONFIG_MAKEFILE([dlls/uuid/Makefile],[dlls/Makeimplib.rules],[dlls],[ALL_IMPLIB_DIRS])
 WINE_CONFIG_MAKEFILE([dlls/uxtheme/Makefile],[dlls/Makedll.rules],[dlls],[ALL_DLL_DIRS])
 WINE_CONFIG_MAKEFILE([dlls/uxtheme/tests/Makefile],[dlls/Maketest.rules],[dlls],[ALL_TEST_DIRS],[enable_tests])
+WINE_CONFIG_MAKEFILE([dlls/vbscript/Makefile],[dlls/Makedll.rules],[dlls],[ALL_DLL_DIRS])
 WINE_CONFIG_MAKEFILE([dlls/vdhcp.vxd/Makefile],[dlls/Makedll.rules],[dlls],[ALL_DLL_DIRS])
 WINE_CONFIG_MAKEFILE([dlls/vdmdbg/Makefile],[dlls/Makedll.rules],[dlls],[ALL_DLL_DIRS])
 WINE_CONFIG_MAKEFILE([dlls/version/Makefile],[dlls/Makedll.rules],[dlls],[ALL_DLL_DIRS])
diff --git a/dlls/vbscript/Makefile.in b/dlls/vbscript/Makefile.in
new file mode 100644
index 0000000..508c62e
--- /dev/null
+++ b/dlls/vbscript/Makefile.in
@@ -0,0 +1,14 @@
+TOPSRCDIR = @top_srcdir@
+TOPOBJDIR = ../..
+SRCDIR    = @srcdir@
+VPATH     = @srcdir@
+MODULE    = vbscript.dll
+IMPORTS   = kernel32
+
+C_SRCS = \
+	vbscript_main.c
+
+ at MAKE_DLL_RULES@
+
+ at DEPENDENCIES@  # everything below this line is overwritten by make depend
+
diff --git a/dlls/vbscript/vbscript.h b/dlls/vbscript/vbscript.h
new file mode 100644
index 0000000..e60c1fa
--- /dev/null
+++ b/dlls/vbscript/vbscript.h
@@ -0,0 +1,33 @@
+/*
+ * Copyright 2008 Jacek Caban for CodeWeavers
+ * Copyright 2009 Robert Wilhelm 
+ *
+ * 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
+ */
+
+#include <stdarg.h>
+#include <stdio.h>
+
+#define COBJMACROS
+
+#include "windef.h"
+#include "winbase.h"
+#include "winuser.h"
+#include "ole2.h"
+#include "dispex.h"
+#include "activscp.h"
+
+
+
diff --git a/dlls/vbscript/vbscript.spec b/dlls/vbscript/vbscript.spec
new file mode 100644
index 0000000..b16365d
--- /dev/null
+++ b/dlls/vbscript/vbscript.spec
@@ -0,0 +1,4 @@
+@ stdcall -private DllCanUnloadNow()
+@ stdcall -private DllGetClassObject(ptr ptr ptr)
+@ stdcall -private DllRegisterServer()
+@ stdcall -private DllUnregisterServer()
diff --git a/dlls/vbscript/vbscript_main.c b/dlls/vbscript/vbscript_main.c
new file mode 100644
index 0000000..7e57fff
--- /dev/null
+++ b/dlls/vbscript/vbscript_main.c
@@ -0,0 +1,95 @@
+/*
+ * Copyright 2008 Jacek Caban for CodeWeavers
+ * Copyright 2009 Robert Wilhelm
+ *
+ * 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
+ */
+
+#include "initguid.h"
+
+#include "vbscript.h"
+
+#include "winreg.h"
+#include "advpub.h"
+#include "activaut.h"
+#include "objsafe.h"
+
+#include "wine/debug.h"
+
+WINE_DEFAULT_DEBUG_CHANNEL(vbscript);
+
+LONG module_ref = 0;
+
+static HINSTANCE vbscript_hinstance;
+
+/******************************************************************
+ *              DllMain (vbscript.@)
+ */
+BOOL WINAPI DllMain(HINSTANCE hInstDLL, DWORD fdwReason, LPVOID lpv)
+{
+    TRACE("(%p %d %p)\n", hInstDLL, fdwReason, lpv);
+
+    switch(fdwReason)
+    {
+    case DLL_WINE_PREATTACH:
+        return FALSE;  /* prefer native version */
+    case DLL_PROCESS_ATTACH:
+        DisableThreadLibraryCalls(hInstDLL);
+        vbscript_hinstance = hInstDLL;
+        break;
+    }
+
+    return TRUE;
+}
+
+/***********************************************************************
+ *		DllGetClassObject	(vbscript.@)
+ */
+HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppv)
+{
+
+    FIXME("%s %s %p\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
+    return CLASS_E_CLASSNOTAVAILABLE;
+}
+
+/***********************************************************************
+ *          DllCanUnloadNow (vbscript.@)
+ */
+HRESULT WINAPI DllCanUnloadNow(void)
+{
+    TRACE("() ref=%d\n", module_ref);
+
+    return module_ref ? S_FALSE : S_OK;
+}
+
+
+
+/***********************************************************************
+ *          DllRegisterServer (vbscript.@)
+ */
+HRESULT WINAPI DllRegisterServer(void)
+{
+    TRACE("()\n");
+    return S_OK;
+}
+
+/***********************************************************************
+ *          DllUnregisterServer (vbscript.@)
+ */
+HRESULT WINAPI DllUnregisterServer(void)
+{
+    TRACE("()\n");
+    return S_OK;
+}
-- 
1.6.0.6


--=-bWQmZ3XIb9ePX55VVoEQ--




More information about the wine-patches mailing list