2 * Implementation of Active Template Library (atl.dll)
4 * Copyright 2004 Aric Stewart for CodeWeavers
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
30 #include "wine/debug.h"
37 WINE_DEFAULT_DEBUG_CHANNEL(atl);
41 BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved)
43 TRACE("(0x%p, %ld, %p)\n",hinstDLL,fdwReason,lpvReserved);
45 if (fdwReason == DLL_PROCESS_ATTACH) {
46 DisableThreadLibraryCalls(hinstDLL);
52 HRESULT WINAPI AtlModuleInit(_ATL_MODULEA* pM, _ATL_OBJMAP_ENTRYA* p, HINSTANCE h)
56 FIXME("SEMI-STUB (%p %p %p)\n",pM,p,h);
58 memset(pM,0,sizeof(_ATL_MODULEA));
59 pM->cbSize = sizeof(_ATL_MODULEA);
61 pM->m_hInstResource = h;
62 pM->m_hInstTypeLib = h;
64 pM->m_hHeap = GetProcessHeap();
68 while (pM->m_pObjMap[i].pclsid != NULL)
70 TRACE("Initializing object %i\n",i);
71 p[i].pfnObjectMain(TRUE);
78 HRESULT WINAPI AtlModuleTerm(_ATL_MODULEA* pM)
80 HeapFree(GetProcessHeap(), 0, pM);
84 HRESULT WINAPI AtlModuleRegisterClassObjects(_ATL_MODULEA *pM, DWORD dwClsContext,
90 TRACE("(%p %li %li)\n",pM, dwClsContext, dwFlags);
95 while(pM->m_pObjMap[i].pclsid != NULL)
98 _ATL_OBJMAP_ENTRYA *obj = &(pM->m_pObjMap[i]);
101 TRACE("Registering object %i\n",i);
102 if (obj->pfnGetClassObject)
104 rc = obj->pfnGetClassObject(obj->pfnCreateInstance, &IID_IUnknown,
108 CoRegisterClassObject(obj->pclsid, pUnknown, dwClsContext,
109 dwFlags, &obj->dwRegister);
111 IUnknown_Release(pUnknown);
120 HRESULT WINAPI AtlModuleUnregisterServerEx(_ATL_MODULEA* pM, BOOL bUnRegTypeLib, const CLSID* pCLSID)
122 FIXME("(%p, %i, %p) stub\n", pM, bUnRegTypeLib, pCLSID);
126 HRESULT WINAPI AtlInternalQueryInterface(LPVOID this, const _ATL_INTMAP_ENTRY* pEntries, REFIID iid, LPVOID* ppvObject)
129 HRESULT rc = E_NOINTERFACE;
130 TRACE("(%p, %p, %p, %p)\n",this, pEntries, iid, ppvObject);
132 if (IsEqualGUID(iid,&IID_IUnknown))
134 TRACE("Returning IUnknown\n");
136 IUnknown_AddRef((IUnknown*)this);
140 while (pEntries[i].pFunc != 0)
142 TRACE("Trying entry %i (%p %li %p)\n",i,pEntries[i].piid,
143 pEntries[i].dw, pEntries[i].pFunc);
145 if (pEntries[i].piid && IsEqualGUID(iid,pEntries[i].piid))
148 if (pEntries[i].pFunc == (_ATL_CREATORARGFUNC*)1)
151 *ppvObject = ((LPSTR)this+pEntries[i].dw);
152 IUnknown_AddRef((IUnknown*)this);
158 rc = pEntries[i].pFunc(this, iid, ppvObject,0);
164 TRACE("Done returning (0x%lx)\n",rc);
168 /***********************************************************************
169 * AtlModuleUpdateRegistryFromResourceD [ATL.@]
172 HRESULT WINAPI AtlModuleUpdateRegistryFromResourceD(_ATL_MODULEW* pM, LPCOLESTR lpszRes,
173 BOOL bRegister, struct _ATL_REGMAP_ENTRY* pMapEntries, IRegistrar* pReg)
175 HINSTANCE hInst = pM->m_hInst;
176 /* everything inside this function below this point
177 * should go into atl71.AtlUpdateRegistryFromResourceD
179 WCHAR module_name[MAX_PATH];
181 GetModuleFileNameW(hInst, module_name, MAX_PATH);
183 FIXME("stub %p (%s), %s, %d, %p, %p\n", hInst, debugstr_w(module_name),
184 debugstr_w(lpszRes), bRegister, pMapEntries, pReg);
189 /***********************************************************************
190 * AtlModuleRegisterServer [ATL.@]
193 HRESULT WINAPI AtlModuleRegisterServer(_ATL_MODULEW* pM, BOOL bRegTypeLib, const CLSID* clsid)
195 FIXME("%p %d %s\n", pM, bRegTypeLib, debugstr_guid(clsid));
199 /***********************************************************************
202 HRESULT WINAPI AtlAdvise(IUnknown *pUnkCP, IUnknown *pUnk, const IID *iid, LPDWORD pdw)
204 FIXME("%p %p %p %p\n", pUnkCP, pUnk, iid, pdw);
208 /***********************************************************************
209 * AtlUnadvise [ATL.@]
211 HRESULT WINAPI AtlUnadvise(IUnknown *pUnkCP, const IID *iid, DWORD dw)
213 FIXME("%p %p %ld\n", pUnkCP, iid, dw);
217 /***********************************************************************
218 * AtlFreeMarshalStream [ATL.@]
220 HRESULT WINAPI AtlFreeMarshalStream(IStream *stm)
226 /***********************************************************************
227 * AtlMarshalPtrInProc [ATL.@]
229 HRESULT WINAPI AtlMarshalPtrInProc(IUnknown *pUnk, const IID *iid, IStream **pstm)
231 FIXME("%p %p %p\n", pUnk, iid, pstm);
235 /***********************************************************************
236 * AtlUnmarshalPtr [ATL.@]
238 HRESULT WINAPI AtlUnmarshalPtr(IStream *stm, const IID *iid, IUnknown **ppUnk)
240 FIXME("%p %p %p\n", stm, iid, ppUnk);
244 /***********************************************************************
245 * AtlModuleGetClassObject [ATL.@]
247 HRESULT WINAPI AtlModuleGetClassObject(_ATL_MODULEW *pm, REFCLSID rclsid,
248 REFIID riid, LPVOID *ppv)
250 FIXME("%p %p %p %p\n", pm, rclsid, riid, ppv);
254 /***********************************************************************
255 * AtlModuleGetClassObject [ATL.@]
257 HRESULT WINAPI AtlModuleRegisterTypeLib(_ATL_MODULEW *pm, LPCOLESTR lpszIndex)
259 FIXME("%p %s\n", pm, debugstr_w(lpszIndex));
263 /***********************************************************************
264 * AtlModuleRevokeClassObjects [ATL.@]
266 HRESULT WINAPI AtlModuleRevokeClassObjects(_ATL_MODULEW *pm)
272 /***********************************************************************
273 * AtlModuleUnregisterServer [ATL.@]
275 HRESULT WINAPI AtlModuleUnregisterServer(_ATL_MODULEW *pm, const CLSID *clsid)
277 FIXME("%p %s\n", pm, debugstr_guid(clsid));