Removed some uses of the non-standard ICOM_THIS macro.
[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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
22  */
23
24 #define COM_NO_WINDOWS_H
25
26 #include <stdarg.h>
27 #include <string.h>
28
29 #include "windef.h"
30 #include "winbase.h"
31 #include "winuser.h"
32 #include "winreg.h"
33 #include "winerror.h"
34
35 #include "ole2.h"
36 #include "uuids.h"
37
38 #include "d3dxof_private.h"
39 #include "dxfile.h"
40
41 #include "wine/debug.h"
42
43 WINE_DEFAULT_DEBUG_CHANNEL(d3dxof);
44
45 static DWORD dll_ref = 0;
46
47 /* For the moment, do nothing here. */
48 BOOL WINAPI DllMain(HINSTANCE hInstDLL, DWORD fdwReason, LPVOID lpv)
49 {
50     switch(fdwReason) {
51         case DLL_PROCESS_ATTACH:
52             DisableThreadLibraryCalls(hInstDLL);
53             break;
54         case DLL_PROCESS_DETACH:
55             break;
56     }
57     return TRUE;
58 }
59
60 /******************************************************************************
61  * DirectX File ClassFactory
62  */
63 typedef struct {
64     IClassFactory ITF_IClassFactory;
65
66     DWORD ref;
67     HRESULT (*pfnCreateInstance)(IUnknown *pUnkOuter, LPVOID *ppObj);
68 } IClassFactoryImpl;
69
70 struct object_creation_info
71 {
72     const CLSID *clsid;
73     HRESULT (*pfnCreateInstance)(IUnknown *pUnkOuter, LPVOID *ppObj);
74 };
75
76 static const struct object_creation_info object_creation[] =
77 {
78     { &CLSID_CDirectXFile, IDirectXFileImpl_Create },
79 };
80
81 static HRESULT WINAPI XFCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid, LPVOID *ppobj)
82 {
83     IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
84
85     if (IsEqualGUID(riid, &IID_IUnknown)
86         || IsEqualGUID(riid, &IID_IClassFactory))
87     {
88         IClassFactory_AddRef(iface);
89         *ppobj = This;
90         return S_OK;
91     }
92
93     WARN("(%p)->(%s,%p),not found\n",This,debugstr_guid(riid),ppobj);
94     return E_NOINTERFACE;
95 }
96
97 static ULONG WINAPI XFCF_AddRef(LPCLASSFACTORY iface)
98 {
99     IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
100     return ++(This->ref);
101 }
102
103 static ULONG WINAPI XFCF_Release(LPCLASSFACTORY iface)
104 {
105     IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
106
107     ULONG ref = --This->ref;
108
109     if (ref == 0)
110         HeapFree(GetProcessHeap(), 0, This);
111
112     return ref;
113 }
114
115 static HRESULT WINAPI XFCF_CreateInstance(LPCLASSFACTORY iface, LPUNKNOWN pOuter, REFIID riid, LPVOID *ppobj)
116 {
117     IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
118     HRESULT hres;
119     LPUNKNOWN punk;
120     
121     TRACE("(%p)->(%p,%s,%p)\n",This,pOuter,debugstr_guid(riid),ppobj);
122
123     hres = This->pfnCreateInstance(pOuter, (LPVOID *) &punk);
124     if (FAILED(hres)) {
125         *ppobj = NULL;
126         return hres;
127     }
128     hres = IUnknown_QueryInterface(punk, riid, ppobj);
129     if (FAILED(hres)) {
130         *ppobj = NULL;
131         return hres;
132     }
133     IUnknown_Release(punk);
134     return hres;
135 }
136
137 static HRESULT WINAPI XFCF_LockServer(LPCLASSFACTORY iface, BOOL dolock)
138 {
139     IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
140     FIXME("(%p)->(%d),stub!\n",This,dolock);
141     return S_OK;
142 }
143
144 static IClassFactoryVtbl XFCF_Vtbl =
145 {
146     XFCF_QueryInterface,
147     XFCF_AddRef,
148     XFCF_Release,
149     XFCF_CreateInstance,
150     XFCF_LockServer
151 };
152
153 /***********************************************************************
154  *              DirectXFileCreate (D3DXOF.@)
155  */
156 HRESULT WINAPI DirectXFileCreate(LPDIRECTXFILE* lplpDirectXFile)
157 {
158     HRESULT hr;
159
160     TRACE("(%p)\n", lplpDirectXFile);
161
162     if (!lplpDirectXFile)
163         return DXFILEERR_BADVALUE;
164
165     hr = IDirectXFileImpl_Create(NULL, (LPVOID)lplpDirectXFile);
166
167     if (FAILED(hr))
168         return DXFILEERR_BADALLOC;
169
170     return S_OK;
171 }
172
173 /*******************************************************************************
174  * DllGetClassObject [D3DXOF.@]
175  * Retrieves class object from a DLL object
176  *
177  * NOTES
178  *    Docs say returns STDAPI
179  *
180  * PARAMS
181  *    rclsid [I] CLSID for the class object
182  *    riid   [I] Reference to identifier of interface for class object
183  *    ppv    [O] Address of variable to receive interface pointer for riid
184  *
185  * RETURNS
186  *    Success: S_OK
187  *    Failure: CLASS_E_CLASSNOTAVAILABLE, E_OUTOFMEMORY, E_INVALIDARG,
188  *             E_UNEXPECTED
189  */
190 DWORD WINAPI D3DXOF_DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppv)
191 {
192     int i;
193     IClassFactoryImpl *factory;
194     
195     TRACE("(%s,%s,%p)\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
196     
197     if ( !IsEqualGUID( &IID_IClassFactory, riid )
198          && ! IsEqualGUID( &IID_IUnknown, riid) )
199         return E_NOINTERFACE;
200
201     for (i=0; i < sizeof(object_creation)/sizeof(object_creation[0]); i++)
202     {
203         if (IsEqualGUID(object_creation[i].clsid, rclsid))
204             break;
205     }
206
207     if (i == sizeof(object_creation)/sizeof(object_creation[0]))
208     {
209         FIXME("%s: no class found.\n", debugstr_guid(rclsid));
210         return CLASS_E_CLASSNOTAVAILABLE;
211     }
212
213     factory = HeapAlloc(GetProcessHeap(), 0, sizeof(*factory));
214     if (factory == NULL) return E_OUTOFMEMORY;
215
216     factory->ITF_IClassFactory.lpVtbl = &XFCF_Vtbl;
217     factory->ref = 1;
218
219     factory->pfnCreateInstance = object_creation[i].pfnCreateInstance;
220
221     *ppv = &(factory->ITF_IClassFactory);
222     return S_OK;
223 }
224
225 /***********************************************************************
226  *              DllCanUnloadNow (D3DXOF.@)
227  */
228 HRESULT WINAPI D3DXOF_DllCanUnloadNow()
229 {
230     return dll_ref != 0 ? S_FALSE : S_OK;
231 }