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
= heap_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 heap_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
);
161 heap_free(This
->BrowseWindowInfo
);
162 This
->BrowseWindowInfo
= heap_alloc(phlbwi
->cbSize
);
163 memcpy(This
->BrowseWindowInfo
, phlbwi
, phlbwi
->cbSize
);
168 static HRESULT WINAPI
IHlinkBC_GetBrowseWindowInfo(IHlinkBrowseContext
* iface
,
171 HlinkBCImpl
*This
= (HlinkBCImpl
*)iface
;
172 TRACE("(%p)->(%p)\n", This
, phlbwi
);
177 if(!This
->BrowseWindowInfo
)
180 memcpy(phlbwi
, This
->BrowseWindowInfo
, This
->BrowseWindowInfo
->cbSize
);
185 static HRESULT WINAPI
IHlinkBC_SetInitialHlink(IHlinkBrowseContext
* iface
,
186 IMoniker
*pimkTarget
, LPCWSTR pwzLocation
, LPCWSTR pwzFriendlyName
)
188 HlinkBCImpl
*This
= (HlinkBCImpl
*)iface
;
190 FIXME("(%p)->(%p %s %s)\n", This
, pimkTarget
,
191 debugstr_w(pwzLocation
), debugstr_w(pwzFriendlyName
));
193 if (This
->CurrentPage
)
194 IHlink_Release(This
->CurrentPage
);
196 HlinkCreateFromMoniker(pimkTarget
, pwzLocation
, pwzFriendlyName
, NULL
,
197 0, NULL
, &IID_IHlink
, (LPVOID
*) &This
->CurrentPage
);
202 static HRESULT WINAPI
IHlinkBC_OnNavigateHlink(IHlinkBrowseContext
*iface
,
203 DWORD grfHLNF
, IMoniker
* pmkTarget
, LPCWSTR pwzLocation
, LPCWSTR
204 pwzFriendlyName
, ULONG
*puHLID
)
206 HlinkBCImpl
*This
= (HlinkBCImpl
*)iface
;
208 FIXME("(%p)->(%i %p %s %s %p)\n", This
, grfHLNF
, pmkTarget
,
209 debugstr_w(pwzLocation
), debugstr_w(pwzFriendlyName
), puHLID
);
214 static HRESULT WINAPI
IHlinkBC_UpdateHlink(IHlinkBrowseContext
* iface
,
215 ULONG uHLID
, IMoniker
* pimkTarget
, LPCWSTR pwzLocation
,
216 LPCWSTR pwzFriendlyName
)
222 static HRESULT WINAPI
IHlinkBC_EnumNavigationStack( IHlinkBrowseContext
*iface
,
223 DWORD dwReserved
, DWORD grfHLFNAMEF
, IEnumHLITEM
** ppienumhlitem
)
229 static HRESULT WINAPI
IHlinkBC_QueryHlink( IHlinkBrowseContext
* iface
,
230 DWORD grfHLONG
, ULONG uHLID
)
236 static HRESULT WINAPI
IHlinkBC_GetHlink( IHlinkBrowseContext
* iface
,
237 ULONG uHLID
, IHlink
** ppihl
)
239 HlinkBCImpl
*This
= (HlinkBCImpl
*)iface
;
241 TRACE("(%p)->(%x %p)\n", This
, uHLID
, ppihl
);
243 if(uHLID
!= HLID_CURRENT
) {
244 FIXME("Only HLID_CURRENT implemented, given: %x\n", uHLID
);
248 *ppihl
= This
->CurrentPage
;
249 IHlink_AddRef(*ppihl
);
254 static HRESULT WINAPI
IHlinkBC_SetCurrentHlink( IHlinkBrowseContext
* iface
,
261 static HRESULT WINAPI
IHlinkBC_Clone( IHlinkBrowseContext
* iface
,
262 IUnknown
* piunkOuter
, REFIID riid
, IUnknown
** ppiunkOjb
)
268 static HRESULT WINAPI
IHlinkBC_Close(IHlinkBrowseContext
* iface
,
275 static const IHlinkBrowseContextVtbl hlvt
=
277 IHlinkBC_fnQueryInterface
,
283 IHlinkBC_SetBrowseWindowInfo
,
284 IHlinkBC_GetBrowseWindowInfo
,
285 IHlinkBC_SetInitialHlink
,
286 IHlinkBC_OnNavigateHlink
,
287 IHlinkBC_UpdateHlink
,
288 IHlinkBC_EnumNavigationStack
,
291 IHlinkBC_SetCurrentHlink
,