The vt field should be a VARTYPE not a VARENUM.
[wine] / dlls / dplayx / dpclassfactory.c
1 /*
2  * Copyright 1999, 2000 Peter Hunnisett
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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
17  */
18
19 #include <string.h>
20 #include "windef.h"
21 #include "objbase.h"
22 #include "winerror.h"
23 #include "wine/debug.h"
24 #include "dpinit.h"
25
26 WINE_DEFAULT_DEBUG_CHANNEL(dplay);
27
28
29 /*******************************************************************************
30  * DirectPlayLobby ClassFactory
31  */
32
33 typedef struct
34 {
35     /* IUnknown fields */
36     ICOM_VFIELD(IClassFactory);
37     DWORD                       ref;
38 } IClassFactoryImpl;
39
40 static HRESULT WINAPI
41 DP_and_DPL_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) {
42         ICOM_THIS(IClassFactoryImpl,iface);
43
44         FIXME("(%p)->(%s,%p),stub!\n",This,debugstr_guid(riid),ppobj);
45
46         return E_NOINTERFACE;
47 }
48
49 static ULONG WINAPI
50 DP_and_DPL_AddRef(LPCLASSFACTORY iface) {
51         ICOM_THIS(IClassFactoryImpl,iface);
52         return ++(This->ref);
53 }
54
55 static ULONG WINAPI DP_and_DPL_Release(LPCLASSFACTORY iface) {
56         ICOM_THIS(IClassFactoryImpl,iface);
57         /* static class (reference starts @ 1), won't ever be freed */
58         return --(This->ref);
59 }
60
61 static HRESULT WINAPI DP_and_DPL_CreateInstance(
62         LPCLASSFACTORY iface,LPUNKNOWN pOuter,REFIID riid,LPVOID *ppobj
63 ) {
64         ICOM_THIS(IClassFactoryImpl,iface);
65
66         TRACE("(%p)->(%p,%s,%p)\n",This,pOuter,debugstr_guid(riid),ppobj);
67
68         if ( DPL_CreateInterface( riid, ppobj ) == S_OK )
69         {
70            return S_OK;
71         }
72         else if ( DP_CreateInterface( riid, ppobj ) == S_OK )
73         {
74            return S_OK;
75         }
76
77         return E_NOINTERFACE;
78 }
79
80 static HRESULT WINAPI DP_and_DPL_LockServer(LPCLASSFACTORY iface,BOOL dolock) {
81         ICOM_THIS(IClassFactoryImpl,iface);
82         FIXME("(%p)->(%d),stub!\n",This,dolock);
83         return S_OK;
84 }
85
86 static ICOM_VTABLE(IClassFactory) DP_and_DPL_Vtbl = {
87         ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
88         DP_and_DPL_QueryInterface,
89         DP_and_DPL_AddRef,
90         DP_and_DPL_Release,
91         DP_and_DPL_CreateInstance,
92         DP_and_DPL_LockServer
93 };
94
95 static IClassFactoryImpl DP_and_DPL_CF = {&DP_and_DPL_Vtbl, 1 };
96
97
98 /*******************************************************************************
99  * DllGetClassObject [DPLAYX.11]
100  * Retrieves DP or DPL class object from a DLL object
101  *
102  * NOTES
103  *    Docs say returns STDAPI
104  *
105  * PARAMS
106  *    rclsid [I] CLSID for the class object
107  *    riid   [I] Reference to identifier of interface for class object
108  *    ppv    [O] Address of variable to receive interface pointer for riid
109  *
110  * RETURNS
111  *    Success: S_OK
112  *    Failure: CLASS_E_CLASSNOTAVAILABLE, E_OUTOFMEMORY, E_INVALIDARG,
113  *             E_UNEXPECTED
114  */
115 DWORD WINAPI DPLAYX_DllGetClassObject(REFCLSID rclsid,REFIID riid,LPVOID *ppv)
116 {
117     TRACE("(%p,%p,%p)\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
118
119     if ( IsEqualCLSID( riid, &IID_IClassFactory ) )
120     {
121         *ppv = (LPVOID)&DP_and_DPL_CF;
122         IClassFactory_AddRef( (IClassFactory*)*ppv );
123
124         return S_OK;
125     }
126
127     ERR("(%p,%p,%p): no interface found.\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
128     return CLASS_E_CLASSNOTAVAILABLE;
129 }