wined3d: CMP supports _SAT.
[wine] / dlls / jscript / jscript_main.c
1 /*
2  * Copyright 2008 Jacek Caban for CodeWeavers
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17  */
18
19 #include "initguid.h"
20
21 #include "jscript.h"
22
23 #include "winreg.h"
24 #include "advpub.h"
25 #include "activaut.h"
26 #include "objsafe.h"
27 #include "mshtmhst.h"
28 #include "rpcproxy.h"
29 #include "jscript_classes.h"
30
31 #include "wine/debug.h"
32
33 WINE_DEFAULT_DEBUG_CHANNEL(jscript);
34
35 LONG module_ref = 0;
36
37 DEFINE_GUID(GUID_NULL,0,0,0,0,0,0,0,0,0,0,0);
38
39 HINSTANCE jscript_hinstance;
40
41 static HRESULT WINAPI ClassFactory_QueryInterface(IClassFactory *iface, REFIID riid, void **ppv)
42 {
43     *ppv = NULL;
44
45     if(IsEqualGUID(&IID_IUnknown, riid)) {
46         TRACE("(%p)->(IID_IUnknown %p)\n", iface, ppv);
47         *ppv = iface;
48     }else if(IsEqualGUID(&IID_IClassFactory, riid)) {
49         TRACE("(%p)->(IID_IClassFactory %p)\n", iface, ppv);
50         *ppv = iface;
51     }
52
53     if(*ppv) {
54         IUnknown_AddRef((IUnknown*)*ppv);
55         return S_OK;
56     }
57
58     FIXME("(%p)->(%s %p)\n", iface, debugstr_guid(riid), ppv);
59     return E_NOINTERFACE;
60 }
61
62 static ULONG WINAPI ClassFactory_AddRef(IClassFactory *iface)
63 {
64     TRACE("(%p)\n", iface);
65     return 2;
66 }
67
68 static ULONG WINAPI ClassFactory_Release(IClassFactory *iface)
69 {
70     TRACE("(%p)\n", iface);
71     return 1;
72 }
73
74 static HRESULT WINAPI ClassFactory_LockServer(IClassFactory *iface, BOOL fLock)
75 {
76     TRACE("(%p)->(%x)\n", iface, fLock);
77
78     if(fLock)
79         lock_module();
80     else
81         unlock_module();
82
83     return S_OK;
84 }
85
86 static const IClassFactoryVtbl JScriptFactoryVtbl = {
87     ClassFactory_QueryInterface,
88     ClassFactory_AddRef,
89     ClassFactory_Release,
90     JScriptFactory_CreateInstance,
91     ClassFactory_LockServer
92 };
93
94 static IClassFactory JScriptFactory = { &JScriptFactoryVtbl };
95
96 /******************************************************************
97  *              DllMain (jscript.@)
98  */
99 BOOL WINAPI DllMain(HINSTANCE hInstDLL, DWORD fdwReason, LPVOID lpv)
100 {
101     TRACE("(%p %d %p)\n", hInstDLL, fdwReason, lpv);
102
103     switch(fdwReason)
104     {
105     case DLL_WINE_PREATTACH:
106         return FALSE;  /* prefer native version */
107     case DLL_PROCESS_ATTACH:
108         DisableThreadLibraryCalls(hInstDLL);
109         jscript_hinstance = hInstDLL;
110         break;
111     }
112
113     return TRUE;
114 }
115
116 /***********************************************************************
117  *              DllGetClassObject       (jscript.@)
118  */
119 HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppv)
120 {
121     if(IsEqualGUID(&CLSID_JScript, rclsid)) {
122         TRACE("(CLSID_JScript %s %p)\n", debugstr_guid(riid), ppv);
123         return IClassFactory_QueryInterface(&JScriptFactory, riid, ppv);
124     }
125
126     FIXME("%s %s %p\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
127     return CLASS_E_CLASSNOTAVAILABLE;
128 }
129
130 /***********************************************************************
131  *          DllCanUnloadNow (jscript.@)
132  */
133 HRESULT WINAPI DllCanUnloadNow(void)
134 {
135     TRACE("() ref=%d\n", module_ref);
136
137     return module_ref ? S_FALSE : S_OK;
138 }
139
140 /***********************************************************************
141  *          DllRegisterServer (jscript.@)
142  */
143 HRESULT WINAPI DllRegisterServer(void)
144 {
145     TRACE("()\n");
146     return __wine_register_resources(jscript_hinstance, NULL);
147 }
148
149 /***********************************************************************
150  *          DllUnregisterServer (jscript.@)
151  */
152 HRESULT WINAPI DllUnregisterServer(void)
153 {
154     TRACE("()\n");
155     return __wine_unregister_resources(jscript_hinstance, NULL);
156 }