msxml3: Release IDispatchEx dynamic data properly.
[wine] / dlls / mshtml / hlink.c
1 /*
2  * Copyright 2005-2006 Jacek Caban for CodeWeavers
3  *
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.
8  *
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.
13  *
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
17  */
18
19 #include <stdarg.h>
20
21 #define COBJMACROS
22
23 #include "windef.h"
24 #include "winbase.h"
25 #include "winuser.h"
26 #include "ole2.h"
27
28 #include "wine/debug.h"
29
30 #include "mshtml_private.h"
31
32 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
33
34 /**********************************************************
35  * IHlinkTarget implementation
36  */
37
38 static inline HTMLDocument *impl_from_IHlinkTarget(IHlinkTarget *iface)
39 {
40     return CONTAINING_RECORD(iface, HTMLDocument, IHlinkTarget_iface);
41 }
42
43 static HRESULT WINAPI HlinkTarget_QueryInterface(IHlinkTarget *iface, REFIID riid, void **ppv)
44 {
45     HTMLDocument *This = impl_from_IHlinkTarget(iface);
46     return htmldoc_query_interface(This, riid, ppv);
47 }
48
49 static ULONG WINAPI HlinkTarget_AddRef(IHlinkTarget *iface)
50 {
51     HTMLDocument *This = impl_from_IHlinkTarget(iface);
52     return htmldoc_addref(This);
53 }
54
55 static ULONG WINAPI HlinkTarget_Release(IHlinkTarget *iface)
56 {
57     HTMLDocument *This = impl_from_IHlinkTarget(iface);
58     return htmldoc_release(This);
59 }
60
61 static HRESULT WINAPI HlinkTarget_SetBrowseContext(IHlinkTarget *iface, IHlinkBrowseContext *pihlbc)
62 {
63     HTMLDocument *This = impl_from_IHlinkTarget(iface);
64     FIXME("(%p)->(%p)\n", This, pihlbc);
65     return E_NOTIMPL;
66 }
67
68 static HRESULT WINAPI HlinkTarget_GetBrowseContext(IHlinkTarget *iface, IHlinkBrowseContext **ppihlbc)
69 {
70     HTMLDocument *This = impl_from_IHlinkTarget(iface);
71     FIXME("(%p)->(%p)\n", This, ppihlbc);
72     return E_NOTIMPL;
73 }
74
75 static HRESULT WINAPI HlinkTarget_Navigate(IHlinkTarget *iface, DWORD grfHLNF, LPCWSTR pwzJumpLocation)
76 {
77     HTMLDocument *This = impl_from_IHlinkTarget(iface);
78
79     TRACE("(%p)->(%08x %s)\n", This, grfHLNF, debugstr_w(pwzJumpLocation));
80
81     if(grfHLNF)
82         FIXME("Unsupported grfHLNF=%08x\n", grfHLNF);
83     if(pwzJumpLocation)
84         FIXME("JumpLocation not supported\n");
85
86     return IOleObject_DoVerb(&This->IOleObject_iface, OLEIVERB_SHOW, NULL, NULL, -1, NULL, NULL);
87 }
88
89 static HRESULT WINAPI HlinkTarget_GetMoniker(IHlinkTarget *iface, LPCWSTR pwzLocation, DWORD dwAssign,
90         IMoniker **ppimkLocation)
91 {
92     HTMLDocument *This = impl_from_IHlinkTarget(iface);
93     FIXME("(%p)->(%s %08x %p)\n", This, debugstr_w(pwzLocation), dwAssign, ppimkLocation);
94     return E_NOTIMPL;
95 }
96
97 static HRESULT WINAPI HlinkTarget_GetFriendlyName(IHlinkTarget *iface, LPCWSTR pwzLocation,
98         LPWSTR *ppwzFriendlyName)
99 {
100     HTMLDocument *This = impl_from_IHlinkTarget(iface);
101     FIXME("(%p)->(%s %p)\n", This, debugstr_w(pwzLocation), ppwzFriendlyName);
102     return E_NOTIMPL;
103 }
104
105 static const IHlinkTargetVtbl HlinkTargetVtbl = {
106     HlinkTarget_QueryInterface,
107     HlinkTarget_AddRef,
108     HlinkTarget_Release,
109     HlinkTarget_SetBrowseContext,
110     HlinkTarget_GetBrowseContext,
111     HlinkTarget_Navigate,
112     HlinkTarget_GetMoniker,
113     HlinkTarget_GetFriendlyName
114 };
115
116 void HTMLDocument_Hlink_Init(HTMLDocument *This)
117 {
118     This->IHlinkTarget_iface.lpVtbl = &HlinkTargetVtbl;
119 }