jscript: Store the necessary function and variable info in the TypeInfo.
[wine.git] / dlls / msado15 / main.c
blob32ae252337374bb615b472ce2ab4e0cdf2186be4
1 /*
2 * Copyright 2019 Hans Leidekker for CodeWeavers
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.
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.
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
19 #include <stdarg.h>
20 #include "windef.h"
21 #include "winbase.h"
22 #include "initguid.h"
23 #define COBJMACROS
24 #include "objbase.h"
25 #include "rpcproxy.h"
26 #include "msado15_backcompat.h"
28 #include "wine/debug.h"
29 #include "wine/heap.h"
31 #include "msado15_private.h"
33 WINE_DEFAULT_DEBUG_CHANNEL(msado15);
35 static HINSTANCE hinstance;
37 BOOL WINAPI DllMain( HINSTANCE dll, DWORD reason, LPVOID reserved )
39 switch (reason)
41 case DLL_PROCESS_ATTACH:
42 hinstance = dll;
43 DisableThreadLibraryCalls( dll );
44 break;
46 return TRUE;
49 typedef HRESULT (*fnCreateInstance)( void **obj );
51 struct msadocf
53 IClassFactory IClassFactory_iface;
54 fnCreateInstance pfnCreateInstance;
57 static inline struct msadocf *impl_from_IClassFactory( IClassFactory *iface )
59 return CONTAINING_RECORD( iface, struct msadocf, IClassFactory_iface );
62 static HRESULT WINAPI msadocf_QueryInterface( IClassFactory *iface, REFIID riid, void **obj )
64 if (IsEqualGUID( riid, &IID_IUnknown ) || IsEqualGUID( riid, &IID_IClassFactory ))
66 IClassFactory_AddRef( iface );
67 *obj = iface;
68 return S_OK;
70 FIXME( "interface %s not implemented\n", debugstr_guid(riid) );
71 return E_NOINTERFACE;
74 static ULONG WINAPI msadocf_AddRef( IClassFactory *iface )
76 return 2;
79 static ULONG WINAPI msadocf_Release( IClassFactory *iface )
81 return 1;
84 static HRESULT WINAPI msadocf_CreateInstance( IClassFactory *iface, LPUNKNOWN outer, REFIID riid, void **obj )
86 struct msadocf *cf = impl_from_IClassFactory( iface );
87 IUnknown *unknown;
88 HRESULT hr;
90 TRACE( "%p, %s, %p\n", outer, debugstr_guid(riid), obj );
92 *obj = NULL;
93 if (outer)
94 return CLASS_E_NOAGGREGATION;
96 hr = cf->pfnCreateInstance( (void **)&unknown );
97 if (FAILED(hr))
98 return hr;
100 hr = IUnknown_QueryInterface( unknown, riid, obj );
101 IUnknown_Release( unknown );
102 return hr;
105 static HRESULT WINAPI msadocf_LockServer( IClassFactory *iface, BOOL dolock )
107 FIXME( "%p, %d\n", iface, dolock );
108 return S_OK;
111 static const struct IClassFactoryVtbl msadocf_vtbl =
113 msadocf_QueryInterface,
114 msadocf_AddRef,
115 msadocf_Release,
116 msadocf_CreateInstance,
117 msadocf_LockServer
120 static struct msadocf connection_cf = { { &msadocf_vtbl }, Connection_create };
121 static struct msadocf recordset_cf = { { &msadocf_vtbl }, Recordset_create };
122 static struct msadocf stream_cf = { { &msadocf_vtbl }, Stream_create };
124 /***********************************************************************
125 * DllGetClassObject
127 HRESULT WINAPI DllGetClassObject( REFCLSID clsid, REFIID iid, void **obj )
129 IClassFactory *cf = NULL;
131 TRACE( "%s, %s, %p\n", debugstr_guid(clsid), debugstr_guid(iid), obj );
133 if (IsEqualGUID( clsid, &CLSID_Connection ))
135 cf = &connection_cf.IClassFactory_iface;
137 else if (IsEqualGUID( clsid, &CLSID_Recordset ))
139 cf = &recordset_cf.IClassFactory_iface;
141 else if (IsEqualGUID( clsid, &CLSID_Stream ))
143 cf = &stream_cf.IClassFactory_iface;
145 if (!cf) return CLASS_E_CLASSNOTAVAILABLE;
146 return IClassFactory_QueryInterface( cf, iid, obj );
149 /******************************************************************
150 * DllCanUnloadNow
152 HRESULT WINAPI DllCanUnloadNow(void)
154 return S_FALSE;
157 /***********************************************************************
158 * DllRegisterServer
160 HRESULT WINAPI DllRegisterServer( void )
162 return __wine_register_resources( hinstance );
165 /***********************************************************************
166 * DllUnregisterServer
168 HRESULT WINAPI DllUnregisterServer( void )
170 return __wine_unregister_resources( hinstance );