shdocvw: Added test of GetControlInfo.
[wine] / dlls / d3dxof / main.c
1 /*
2  *     DirectX Files Functions (D3DXOF.DLL)
3  *
4  * Copyright 2004 Christian Costa
5  *
6  * This file contains the (internal) driver registration functions,
7  * driver enumeration APIs and DirectDraw creation functions.
8  *
9  * This library is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Lesser General Public
11  * License as published by the Free Software Foundation; either
12  * version 2.1 of the License, or (at your option) any later version.
13  *
14  * This library is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * Lesser General Public License for more details.
18  *
19  * You should have received a copy of the GNU Lesser General Public
20  * License along with this library; if not, write to the Free Software
21  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
22  */
23
24 #include <stdarg.h>
25 #include <string.h>
26
27 #define COBJMACROS
28 #define COM_NO_WINDOWS_H
29
30 #include "windef.h"
31 #include "winbase.h"
32 #include "winuser.h"
33 #include "winreg.h"
34 #include "winerror.h"
35
36 #include "ole2.h"
37 #include "uuids.h"
38
39 #include "d3dxof_private.h"
40 #include "dxfile.h"
41
42 #include "wine/debug.h"
43
44 WINE_DEFAULT_DEBUG_CHANNEL(d3dxof);
45
46 static LONG dll_ref = 0;
47
48 /* For the moment, do nothing here. */
49 BOOL WINAPI DllMain(HINSTANCE hInstDLL, DWORD fdwReason, LPVOID lpv)
50 {
51     switch(fdwReason) {
52         case DLL_PROCESS_ATTACH:
53             DisableThreadLibraryCalls(hInstDLL);
54             break;
55         case DLL_PROCESS_DETACH:
56             break;
57     }
58     return TRUE;
59 }
60
61 /******************************************************************************
62  * DirectX File ClassFactory
63  */
64 typedef struct {
65     IClassFactory ITF_IClassFactory;
66
67     LONG ref;
68     HRESULT (*pfnCreateInstance)(IUnknown *pUnkOuter, LPVOID *ppObj);
69 } IClassFactoryImpl;
70
71 struct object_creation_info
72 {
73     const CLSID *clsid;
74     HRESULT (*pfnCreateInstance)(IUnknown *pUnkOuter, LPVOID *ppObj);
75 };
76
77 static const struct object_creation_info object_creation[] =
78 {
79     { &CLSID_CDirectXFile, IDirectXFileImpl_Create },
80 };
81
82 static HRESULT WINAPI XFCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid, LPVOID *ppobj)
83 {
84     IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
85
86     if (IsEqualGUID(riid, &IID_IUnknown)
87         || IsEqualGUID(riid, &IID_IClassFactory))
88     {
89         IClassFactory_AddRef(iface);
90         *ppobj = This;
91         return S_OK;
92     }
93
94     WARN("(%p)->(%s,%p),not found\n",This,debugstr_guid(riid),ppobj);
95     return E_NOINTERFACE;
96 }
97
98 static ULONG WINAPI XFCF_AddRef(LPCLASSFACTORY iface)
99 {
100     IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
101     return InterlockedIncrement(&This->ref);
102 }
103
104 static ULONG WINAPI XFCF_Release(LPCLASSFACTORY iface)
105 {
106     IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
107
108     ULONG ref = InterlockedDecrement(&This->ref);
109
110     if (ref == 0)
111         HeapFree(GetProcessHeap(), 0, This);
112
113     return ref;
114 }
115
116 static HRESULT WINAPI XFCF_CreateInstance(LPCLASSFACTORY iface, LPUNKNOWN pOuter, REFIID riid, LPVOID *ppobj)
117 {
118     IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
119     HRESULT hres;
120     LPUNKNOWN punk;
121     
122     TRACE("(%p)->(%p,%s,%p)\n",This,pOuter,debugstr_guid(riid),ppobj);
123
124     *ppobj = NULL;
125     hres = This->pfnCreateInstance(pOuter, (LPVOID *) &punk);
126     if (SUCCEEDED(hres)) {
127         hres = IUnknown_QueryInterface(punk, riid, ppobj);
128         IUnknown_Release(punk);
129     }
130     return hres;
131 }
132
133 static HRESULT WINAPI XFCF_LockServer(LPCLASSFACTORY iface, BOOL dolock)
134 {
135     IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
136     FIXME("(%p)->(%d),stub!\n",This,dolock);
137     return S_OK;
138 }
139
140 static const IClassFactoryVtbl XFCF_Vtbl =
141 {
142     XFCF_QueryInterface,
143     XFCF_AddRef,
144     XFCF_Release,
145     XFCF_CreateInstance,
146     XFCF_LockServer
147 };
148
149 /***********************************************************************
150  *              DirectXFileCreate (D3DXOF.@)
151  */
152 HRESULT WINAPI DirectXFileCreate(LPDIRECTXFILE* lplpDirectXFile)
153 {
154     HRESULT hr;
155
156     TRACE("(%p)\n", lplpDirectXFile);
157
158     if (!lplpDirectXFile)
159         return DXFILEERR_BADVALUE;
160
161     hr = IDirectXFileImpl_Create(NULL, (LPVOID)lplpDirectXFile);
162
163     if (FAILED(hr))
164         return DXFILEERR_BADALLOC;
165
166     return S_OK;
167 }
168
169 /*******************************************************************************
170  * DllGetClassObject [D3DXOF.@]
171  * Retrieves class object from a DLL object
172  *
173  * NOTES
174  *    Docs say returns STDAPI
175  *
176  * PARAMS
177  *    rclsid [I] CLSID for the class object
178  *    riid   [I] Reference to identifier of interface for class object
179  *    ppv    [O] Address of variable to receive interface pointer for riid
180  *
181  * RETURNS
182  *    Success: S_OK
183  *    Failure: CLASS_E_CLASSNOTAVAILABLE, E_OUTOFMEMORY, E_INVALIDARG,
184  *             E_UNEXPECTED
185  */
186 HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppv)
187 {
188     int i;
189     IClassFactoryImpl *factory;
190     
191     TRACE("(%s,%s,%p)\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
192     
193     if ( !IsEqualGUID( &IID_IClassFactory, riid )
194          && ! IsEqualGUID( &IID_IUnknown, riid) )
195         return E_NOINTERFACE;
196
197     for (i=0; i < sizeof(object_creation)/sizeof(object_creation[0]); i++)
198     {
199         if (IsEqualGUID(object_creation[i].clsid, rclsid))
200             break;
201     }
202
203     if (i == sizeof(object_creation)/sizeof(object_creation[0]))
204     {
205         FIXME("%s: no class found.\n", debugstr_guid(rclsid));
206         return CLASS_E_CLASSNOTAVAILABLE;
207     }
208
209     factory = HeapAlloc(GetProcessHeap(), 0, sizeof(*factory));
210     if (factory == NULL) return E_OUTOFMEMORY;
211
212     factory->ITF_IClassFactory.lpVtbl = &XFCF_Vtbl;
213     factory->ref = 1;
214
215     factory->pfnCreateInstance = object_creation[i].pfnCreateInstance;
216
217     *ppv = &(factory->ITF_IClassFactory);
218     return S_OK;
219 }
220
221 /***********************************************************************
222  *              DllCanUnloadNow (D3DXOF.@)
223  */
224 HRESULT WINAPI DllCanUnloadNow(void)
225 {
226     return dll_ref != 0 ? S_FALSE : S_OK;
227 }