2 * Implementation of hyperlinking (hlink.dll)
4 * Copyright 2005 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21 #include "hlink_private.h"
23 #include "wine/debug.h"
25 WINE_DEFAULT_DEBUG_CHANNEL(hlink);
27 static const IHlinkBrowseContextVtbl hlvt;
31 const IHlinkBrowseContextVtbl *lpVtbl;
33 HLBWINFO* BrowseWindowInfo;
38 HRESULT WINAPI HLinkBrowseContext_Constructor(IUnknown *pUnkOuter, REFIID riid,
43 TRACE("unkOut=%p riid=%s\n", pUnkOuter, debugstr_guid(riid));
47 return CLASS_E_NOAGGREGATION;
49 hl = hlink_alloc_zero(sizeof(HlinkBCImpl));
60 static HRESULT WINAPI IHlinkBC_fnQueryInterface( IHlinkBrowseContext *iface,
61 REFIID riid, LPVOID* ppvObj)
63 HlinkBCImpl *This = (HlinkBCImpl*)iface;
64 TRACE ("(%p)->(%s,%p)\n", This, debugstr_guid (riid), ppvObj);
66 if (IsEqualIID(riid, &IID_IUnknown) ||
67 IsEqualIID(riid, &IID_IHlinkBrowseContext))
72 IUnknown_AddRef((IUnknown*)(*ppvObj));
78 static ULONG WINAPI IHlinkBC_fnAddRef (IHlinkBrowseContext* iface)
80 HlinkBCImpl *This = (HlinkBCImpl*)iface;
81 ULONG refCount = InterlockedIncrement(&This->ref);
83 TRACE("(%p)->(count=%u)\n", This, refCount - 1);
88 static ULONG WINAPI IHlinkBC_fnRelease (IHlinkBrowseContext* iface)
90 HlinkBCImpl *This = (HlinkBCImpl*)iface;
91 ULONG refCount = InterlockedDecrement(&This->ref);
93 TRACE("(%p)->(count=%u)\n", This, refCount + 1);
97 TRACE("-- destroying IHlinkBrowseContext (%p)\n", This);
98 hlink_free(This->BrowseWindowInfo);
99 if (This->CurrentPage)
100 IHlink_Release(This->CurrentPage);
105 static HRESULT WINAPI IHlinkBC_Register(IHlinkBrowseContext* iface,
106 DWORD dwReserved, IUnknown *piunk, IMoniker *pimk, DWORD *pdwRegister)
108 static const WCHAR szIdent[] = {'W','I','N','E','H','L','I','N','K',0};
109 HlinkBCImpl *This = (HlinkBCImpl*)iface;
112 IRunningObjectTable *ROT;
114 FIXME("(%p)->(%i %p %p %p)\n", This, dwReserved, piunk, pimk, pdwRegister);
116 CreateItemMoniker(NULL, szIdent, &mon);
117 CreateGenericComposite(mon, pimk, &composite);
119 GetRunningObjectTable(0, &ROT);
120 IRunningObjectTable_Register(ROT, 0, piunk, composite, pdwRegister);
122 IRunningObjectTable_Release(ROT);
123 IMoniker_Release(composite);
124 IMoniker_Release(mon);
129 static HRESULT WINAPI IHlinkBC_GetObject(IHlinkBrowseContext* face,
130 IMoniker *pimk, BOOL fBindifRootRegistered, IUnknown **ppiunk)
136 static HRESULT WINAPI IHlinkBC_Revoke(IHlinkBrowseContext* iface,
140 IRunningObjectTable *ROT;
141 HlinkBCImpl *This = (HlinkBCImpl*)iface;
143 FIXME("(%p)->(%i)\n", This, dwRegister);
145 GetRunningObjectTable(0, &ROT);
146 r = IRunningObjectTable_Revoke(ROT, dwRegister);
147 IRunningObjectTable_Release(ROT);
152 static HRESULT WINAPI IHlinkBC_SetBrowseWindowInfo(IHlinkBrowseContext* iface,
155 HlinkBCImpl *This = (HlinkBCImpl*)iface;
156 TRACE("(%p)->(%p)\n", This, phlbwi);
158 hlink_free(This->BrowseWindowInfo);
159 This->BrowseWindowInfo = hlink_alloc(phlbwi->cbSize);
160 memcpy(This->BrowseWindowInfo, phlbwi, phlbwi->cbSize);
165 static HRESULT WINAPI IHlinkBC_GetBrowseWindowInfo(IHlinkBrowseContext* iface,
172 static HRESULT WINAPI IHlinkBC_SetInitialHlink(IHlinkBrowseContext* iface,
173 IMoniker *pimkTarget, LPCWSTR pwzLocation, LPCWSTR pwzFriendlyName)
175 HlinkBCImpl *This = (HlinkBCImpl*)iface;
177 FIXME("(%p)->(%p %s %s)\n", This, pimkTarget,
178 debugstr_w(pwzLocation), debugstr_w(pwzFriendlyName));
180 if (This->CurrentPage)
181 IHlink_Release(This->CurrentPage);
183 HlinkCreateFromMoniker(pimkTarget, pwzLocation, pwzFriendlyName, NULL,
184 0, NULL, &IID_IHlink, (LPVOID*) &This->CurrentPage);
189 static HRESULT WINAPI IHlinkBC_OnNavigateHlink(IHlinkBrowseContext *iface,
190 DWORD grfHLNF, IMoniker* pmkTarget, LPCWSTR pwzLocation, LPCWSTR
191 pwzFriendlyName, ULONG *puHLID)
193 HlinkBCImpl *This = (HlinkBCImpl*)iface;
195 FIXME("(%p)->(%i %p %s %s %p)\n", This, grfHLNF, pmkTarget,
196 debugstr_w(pwzLocation), debugstr_w(pwzFriendlyName), puHLID);
201 static HRESULT WINAPI IHlinkBC_UpdateHlink(IHlinkBrowseContext* iface,
202 ULONG uHLID, IMoniker* pimkTarget, LPCWSTR pwzLocation,
203 LPCWSTR pwzFriendlyName)
209 static HRESULT WINAPI IHlinkBC_EnumNavigationStack( IHlinkBrowseContext *iface,
210 DWORD dwReserved, DWORD grfHLFNAMEF, IEnumHLITEM** ppienumhlitem)
216 static HRESULT WINAPI IHlinkBC_QueryHlink( IHlinkBrowseContext* iface,
217 DWORD grfHLONG, ULONG uHLID)
223 static HRESULT WINAPI IHlinkBC_GetHlink( IHlinkBrowseContext* iface,
224 ULONG uHLID, IHlink** ppihl)
230 static HRESULT WINAPI IHlinkBC_SetCurrentHlink( IHlinkBrowseContext* iface,
237 static HRESULT WINAPI IHlinkBC_Clone( IHlinkBrowseContext* iface,
238 IUnknown* piunkOuter, REFIID riid, IUnknown** ppiunkOjb)
244 static HRESULT WINAPI IHlinkBC_Close(IHlinkBrowseContext* iface,
251 static const IHlinkBrowseContextVtbl hlvt =
253 IHlinkBC_fnQueryInterface,
259 IHlinkBC_SetBrowseWindowInfo,
260 IHlinkBC_GetBrowseWindowInfo,
261 IHlinkBC_SetInitialHlink,
262 IHlinkBC_OnNavigateHlink,
263 IHlinkBC_UpdateHlink,
264 IHlinkBC_EnumNavigationStack,
267 IHlinkBC_SetCurrentHlink,