Jacek Caban : vbscript: Added new DLL.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: c35aa01caabd59ba17e482da7c00dd2e338f041c
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=c35aa01caabd59ba17e482da7c...

Author: Jacek Caban 
Date:   Tue Jun 21 16:14:04 2011 +0200

vbscript: Added new DLL.

---

configure                     |    1 +
 configure.ac                  |    1 +
 dlls/vbscript/Makefile.in     |    6 +++
 dlls/vbscript/vbscript.spec   |    4 ++
 dlls/vbscript/vbscript_main.c |   85 +++++++++++++++++++++++++++++++++++++++++
 5 files changed, 97 insertions(+), 0 deletions(-)

diff --git a/configure b/configure
index 92586f2..e6baa28 100755
--- a/configure
+++ b/configure
@@ -15373,6 +15373,7 @@ wine_fn_config_test dlls/usp10/tests usp10_test
 wine_fn_config_lib uuid
 wine_fn_config_dll uxtheme enable_uxtheme implib
 wine_fn_config_test dlls/uxtheme/tests uxtheme_test
+wine_fn_config_dll vbscript enable_vbscript
 wine_fn_config_dll vcomp enable_vcomp
 wine_fn_config_dll vdhcp.vxd enable_win16
 wine_fn_config_dll vdmdbg enable_vdmdbg implib
diff --git a/configure.ac b/configure.ac
index 2e20f24..b50d5ed 100644
--- a/configure.ac
+++ b/configure.ac
@@ -2846,6 +2846,7 @@ WINE_CONFIG_TEST(dlls/usp10/tests)
 WINE_CONFIG_LIB(uuid)
 WINE_CONFIG_DLL(uxtheme,,[implib])
 WINE_CONFIG_TEST(dlls/uxtheme/tests)
+WINE_CONFIG_DLL(vbscript)
 WINE_CONFIG_DLL(vcomp)
 WINE_CONFIG_DLL(vdhcp.vxd,enable_win16)
 WINE_CONFIG_DLL(vdmdbg,,[implib])
diff --git a/dlls/vbscript/Makefile.in b/dlls/vbscript/Makefile.in
new file mode 100644
index 0000000..7b05715
--- /dev/null
+++ b/dlls/vbscript/Makefile.in
@@ -0,0 +1,6 @@
+MODULE    = vbscript.dll
+
+C_SRCS = \
+	vbscript_main.c
+
+@MAKE_DLL_RULES@
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..f8b760e
--- /dev/null
+++ b/dlls/vbscript/vbscript_main.c
@@ -0,0 +1,85 @@
+/*
+ * Copyright 2011 Jacek Caban for CodeWeavers
+ *
+ * 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 "config.h"
+
+#include <stdarg.h>
+
+#define COBJMACROS
+
+#include "windef.h"
+#include "winbase.h"
+
+#include "wine/debug.h"
+
+WINE_DEFAULT_DEBUG_CHANNEL(vbscript);
+
+/******************************************************************
+ *              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);
+        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)
+{
+    FIXME("()\n");
+    return S_FALSE;
+}
+
+/***********************************************************************
+ *          DllRegisterServer (vbscript.@)
+ */
+HRESULT WINAPI DllRegisterServer(void)
+{
+    FIXME("()\n");
+    return S_OK;
+}
+
+/***********************************************************************
+ *          DllUnregisterServer (vbscript.@)
+ */
+HRESULT WINAPI DllUnregisterServer(void)
+{
+    FIXME("()\n");
+    return S_OK;
+}