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
28 #include "wine/debug.h"
34 WINE_DEFAULT_DEBUG_CHANNEL(atl
);
36 BOOL WINAPI
DllMain(HINSTANCE hinstDLL
, DWORD fdwReason
, LPVOID lpvReserved
)
38 TRACE("(0x%p, %ld, %p)\n",hinstDLL
,fdwReason
,lpvReserved
);
40 if (fdwReason
== DLL_PROCESS_ATTACH
) DisableThreadLibraryCalls(hinstDLL
);
44 HRESULT WINAPI
AtlModuleInit(_ATL_MODULEA
* pM
, _ATL_OBJMAP_ENTRYA
* p
, HINSTANCE h
)
48 FIXME("SEMI-STUB (%p %p %p)\n",pM
,p
,h
);
50 memset(pM
,0,sizeof(_ATL_MODULEA
));
51 pM
->cbSize
= sizeof(_ATL_MODULEA
);
53 pM
->m_hInstResource
= h
;
54 pM
->m_hInstTypeLib
= h
;
56 pM
->m_hHeap
= GetProcessHeap();
60 while (pM
->m_pObjMap
[i
].pclsid
!= NULL
)
62 TRACE("Initializing object %i\n",i
);
63 p
[i
].pfnObjectMain(TRUE
);
70 HRESULT WINAPI
AtlModuleTerm(_ATL_MODULEA
* pM
)
72 HeapFree(GetProcessHeap(), 0, pM
);
76 HRESULT WINAPI
AtlModuleRegisterClassObjects(_ATL_MODULEA
*pM
, DWORD dwClsContext
,
82 TRACE("(%p %li %li)\n",pM
, dwClsContext
, dwFlags
);
87 while(pM
->m_pObjMap
[i
].pclsid
!= NULL
)
90 _ATL_OBJMAP_ENTRYA
*obj
= &(pM
->m_pObjMap
[i
]);
93 TRACE("Registering object %i\n",i
);
94 if (obj
->pfnGetClassObject
)
96 rc
= obj
->pfnGetClassObject(obj
->pfnCreateInstance
, &IID_IUnknown
,
100 CoRegisterClassObject(obj
->pclsid
, pUnknown
, dwClsContext
,
101 dwFlags
, &obj
->dwRegister
);
103 IUnknown_Release(pUnknown
);
112 HRESULT WINAPI
AtlInternalQueryInterface(LPVOID
this, const _ATL_INTMAP_ENTRY
* pEntries
, REFIID iid
, LPVOID
* ppvObject
)
115 HRESULT rc
= E_NOINTERFACE
;
116 TRACE("(%p, %p, %p, %p)\n",this, pEntries
, iid
, ppvObject
);
118 if (IsEqualGUID(iid
,&IID_IUnknown
))
120 TRACE("Returning IUnknown\n");
122 IUnknown_AddRef((IUnknown
*)this);
126 while (pEntries
[i
].pFunc
!= 0)
128 TRACE("Trying entry %i (%p %li %p)\n",i
,pEntries
[i
].piid
,
129 pEntries
[i
].dw
, pEntries
[i
].pFunc
);
131 if (pEntries
[i
].piid
&& IsEqualGUID(iid
,pEntries
[i
].piid
))
134 if (pEntries
[i
].pFunc
== (_ATL_CREATORARGFUNC
*)1)
137 *ppvObject
= ((LPSTR
)this+pEntries
[i
].dw
);
138 IUnknown_AddRef((IUnknown
*)this);
144 rc
= pEntries
[i
].pFunc(this, iid
, ppvObject
,0);
150 TRACE("Done returning (0x%lx)\n",rc
);
154 /***********************************************************************
155 * AtlModuleUpdateRegistryFromResourceD [ATL.@]
158 HRESULT WINAPI
AtlModuleUpdateRegistryFromResourceD(_ATL_MODULEW
* pM
, LPCOLESTR lpszRes
,
159 BOOL bRegister
, /* struct _ATL_REGMAP_ENTRY* */ void* pMapEntries
, /* IRegistrar* */ void* pReg
)
161 HINSTANCE hInst
= pM
->m_hInst
;
162 /* everything inside this function below this point
163 * should go into atl71.AtlUpdateRegistryFromResourceD
165 WCHAR module_name
[MAX_PATH
];
167 GetModuleFileNameW(hInst
, module_name
, MAX_PATH
);
169 FIXME("stub %p (%s), %s, %d, %p, %p\n", hInst
, debugstr_w(module_name
),
170 debugstr_w(lpszRes
), bRegister
, pMapEntries
, pReg
);