d3dxof: Sign-compare warning fix.
[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
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 LONG 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     LONG 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 InterlockedIncrement(&This->ref);
101 }
102
103 static ULONG WINAPI XFCF_Release(LPCLASSFACTORY iface)
104 {
105     IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
106
107     ULONG ref = InterlockedDecrement(&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     *ppobj = NULL;
124     hres = This->pfnCreateInstance(pOuter, (LPVOID *) &punk);
125     if (SUCCEEDED(hres)) {
126         hres = IUnknown_QueryInterface(punk, riid, ppobj);
127         IUnknown_Release(punk);
128     }
129     return hres;
130 }
131
132 static HRESULT WINAPI XFCF_LockServer(LPCLASSFACTORY iface, BOOL dolock)
133 {
134     IClassFactoryImpl *This = (IClassFactoryImpl *)iface;
135     FIXME("(%p)->(%d),stub!\n",This,dolock);
136     return S_OK;
137 }
138
139 static const IClassFactoryVtbl XFCF_Vtbl =
140 {
141     XFCF_QueryInterface,
142     XFCF_AddRef,
143     XFCF_Release,
144     XFCF_CreateInstance,
145     XFCF_LockServer
146 };
147
148 /***********************************************************************
149  *              DirectXFileCreate (D3DXOF.@)
150  */
151 HRESULT WINAPI DirectXFileCreate(LPDIRECTXFILE* lplpDirectXFile)
152 {
153     HRESULT hr;
154
155     TRACE("(%p)\n", lplpDirectXFile);
156
157     if (!lplpDirectXFile)
158         return DXFILEERR_BADVALUE;
159
160     hr = IDirectXFileImpl_Create(NULL, (LPVOID)lplpDirectXFile);
161
162     if (FAILED(hr))
163         return DXFILEERR_BADALLOC;
164
165     return S_OK;
166 }
167
168 /*******************************************************************************
169  * DllGetClassObject [D3DXOF.@]
170  * Retrieves class object from a DLL object
171  *
172  * NOTES
173  *    Docs say returns STDAPI
174  *
175  * PARAMS
176  *    rclsid [I] CLSID for the class object
177  *    riid   [I] Reference to identifier of interface for class object
178  *    ppv    [O] Address of variable to receive interface pointer for riid
179  *
180  * RETURNS
181  *    Success: S_OK
182  *    Failure: CLASS_E_CLASSNOTAVAILABLE, E_OUTOFMEMORY, E_INVALIDARG,
183  *             E_UNEXPECTED
184  */
185 HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppv)
186 {
187     unsigned int i;
188     IClassFactoryImpl *factory;
189
190     TRACE("(%s,%s,%p)\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
191     
192     if ( !IsEqualGUID( &IID_IClassFactory, riid )
193          && ! IsEqualGUID( &IID_IUnknown, riid) )
194         return E_NOINTERFACE;
195
196     for (i=0; i < sizeof(object_creation)/sizeof(object_creation[0]); i++)
197     {
198         if (IsEqualGUID(object_creation[i].clsid, rclsid))
199             break;
200     }
201
202     if (i == sizeof(object_creation)/sizeof(object_creation[0]))
203     {
204         FIXME("%s: no class found.\n", debugstr_guid(rclsid));
205         return CLASS_E_CLASSNOTAVAILABLE;
206     }
207
208     factory = HeapAlloc(GetProcessHeap(), 0, sizeof(*factory));
209     if (factory == NULL) return E_OUTOFMEMORY;
210
211     factory->ITF_IClassFactory.lpVtbl = &XFCF_Vtbl;
212     factory->ref = 1;
213
214     factory->pfnCreateInstance = object_creation[i].pfnCreateInstance;
215
216     *ppv = &(factory->ITF_IClassFactory);
217     return S_OK;
218 }
219
220 /***********************************************************************
221  *              DllCanUnloadNow (D3DXOF.@)
222  */
223 HRESULT WINAPI DllCanUnloadNow(void)
224 {
225     return dll_ref != 0 ? S_FALSE : S_OK;
226 }