2 * Copyright 2006 Jacek Caban for CodeWeavers
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.
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.
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
28 #include "wine/debug.h"
29 #include "wine/unicode.h"
31 #include "mshtml_private.h"
33 WINE_DEFAULT_DEBUG_CHANNEL(mshtml
);
36 const IHTMLSelectionObjectVtbl
*lpHTMLSelectionObjectVtbl
;
40 nsISelection
*nsselection
;
44 } HTMLSelectionObject
;
46 #define HTMLSELOBJ(x) ((IHTMLSelectionObject*) &(x)->lpHTMLSelectionObjectVtbl)
48 #define HTMLSELOBJ_THIS(iface) DEFINE_THIS(HTMLSelectionObject, HTMLSelectionObject, iface)
50 static HRESULT WINAPI
HTMLSelectionObject_QueryInterface(IHTMLSelectionObject
*iface
,
51 REFIID riid
, void **ppv
)
53 HTMLSelectionObject
*This
= HTMLSELOBJ_THIS(iface
);
57 if(IsEqualGUID(&IID_IUnknown
, riid
)) {
58 TRACE("(%p)->(IID_IUnknown %p)\n", This
, ppv
);
59 *ppv
= HTMLSELOBJ(This
);
60 }else if(IsEqualGUID(&IID_IDispatch
, riid
)) {
61 TRACE("(%p)->(IID_IUnknown %p)\n", This
, ppv
);
62 *ppv
= HTMLSELOBJ(This
);
63 }else if(IsEqualGUID(&IID_IHTMLSelectionObject
, riid
)) {
64 TRACE("(%p)->(IID_IUnknown %p)\n", This
, ppv
);
65 *ppv
= HTMLSELOBJ(This
);
69 IUnknown_AddRef((IUnknown
*)*ppv
);
73 WARN("(%p)->(%s %p)\n", This
, debugstr_guid(riid
), ppv
);
77 static ULONG WINAPI
HTMLSelectionObject_AddRef(IHTMLSelectionObject
*iface
)
79 HTMLSelectionObject
*This
= HTMLSELOBJ_THIS(iface
);
80 LONG ref
= InterlockedIncrement(&This
->ref
);
82 TRACE("(%p) ref=%d\n", This
, ref
);
87 static ULONG WINAPI
HTMLSelectionObject_Release(IHTMLSelectionObject
*iface
)
89 HTMLSelectionObject
*This
= HTMLSELOBJ_THIS(iface
);
90 LONG ref
= InterlockedDecrement(&This
->ref
);
92 TRACE("(%p) ref=%d\n", This
, ref
);
96 nsISelection_Release(This
->nsselection
);
98 list_remove(&This
->entry
);
105 static HRESULT WINAPI
HTMLSelectionObject_GetTypeInfoCount(IHTMLSelectionObject
*iface
, UINT
*pctinfo
)
107 HTMLSelectionObject
*This
= HTMLSELOBJ_THIS(iface
);
108 FIXME("(%p)->(%p)\n", This
, pctinfo
);
112 static HRESULT WINAPI
HTMLSelectionObject_GetTypeInfo(IHTMLSelectionObject
*iface
, UINT iTInfo
,
113 LCID lcid
, ITypeInfo
**ppTInfo
)
115 HTMLSelectionObject
*This
= HTMLSELOBJ_THIS(iface
);
116 FIXME("(%p)->(%u %u %p)\n", This
, iTInfo
, lcid
, ppTInfo
);
120 static HRESULT WINAPI
HTMLSelectionObject_GetIDsOfNames(IHTMLSelectionObject
*iface
, REFIID riid
,
121 LPOLESTR
*rgszNames
, UINT cNames
,
122 LCID lcid
, DISPID
*rgDispId
)
124 HTMLSelectionObject
*This
= HTMLSELOBJ_THIS(iface
);
125 FIXME("(%p)->(%s %p %u %u %p)\n", This
, debugstr_guid(riid
), rgszNames
, cNames
,
130 static HRESULT WINAPI
HTMLSelectionObject_Invoke(IHTMLSelectionObject
*iface
, DISPID dispIdMember
,
131 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
,
132 VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
134 HTMLSelectionObject
*This
= HTMLSELOBJ_THIS(iface
);
135 FIXME("(%p)->(%d %s %d %d %p %p %p %p)\n", This
, dispIdMember
, debugstr_guid(riid
),
136 lcid
, wFlags
, pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
140 static HRESULT WINAPI
HTMLSelectionObject_createRange(IHTMLSelectionObject
*iface
, IDispatch
**range
)
142 HTMLSelectionObject
*This
= HTMLSELOBJ_THIS(iface
);
143 nsIDOMRange
*nsrange
= NULL
;
145 TRACE("(%p)->(%p)\n", This
, range
);
147 if(This
->nsselection
) {
148 PRInt32 nsrange_cnt
= 0;
151 nsISelection_GetRangeCount(This
->nsselection
, &nsrange_cnt
);
153 nsIDOMDocument
*nsdoc
;
154 nsIDOMHTMLDocument
*nshtmldoc
;
155 nsIDOMHTMLElement
*nsbody
= NULL
;
157 TRACE("nsrange_cnt = 0\n");
159 nsres
= nsIWebNavigation_GetDocument(This
->doc
->nscontainer
->navigation
, &nsdoc
);
160 if(NS_FAILED(nsres
) || !nsdoc
) {
161 ERR("GetDocument failed: %08x\n", nsres
);
165 nsIDOMDocument_QueryInterface(nsdoc
, &IID_nsIDOMHTMLDocument
, (void**)&nshtmldoc
);
166 nsIDOMDocument_Release(nsdoc
);
168 nsres
= nsIDOMHTMLDocument_GetBody(nshtmldoc
, &nsbody
);
169 nsIDOMHTMLDocument_Release(nshtmldoc
);
170 if(NS_FAILED(nsres
) || !nsbody
) {
171 ERR("Could not get body: %08x\n", nsres
);
175 nsres
= nsISelection_Collapse(This
->nsselection
, (nsIDOMNode
*)nsbody
, 0);
176 nsIDOMHTMLElement_Release(nsbody
);
178 ERR("Collapse failed: %08x\n", nsres
);
179 }else if(nsrange_cnt
> 1) {
180 FIXME("range_cnt = %d\n", nsrange_cnt
);
183 nsres
= nsISelection_GetRangeAt(This
->nsselection
, 0, &nsrange
);
185 ERR("GetRangeAt failed: %08x\n", nsres
);
188 *range
= (IDispatch
*)HTMLTxtRange_Create(This
->doc
, nsrange
);
192 static HRESULT WINAPI
HTMLSelectionObject_empty(IHTMLSelectionObject
*iface
)
194 HTMLSelectionObject
*This
= HTMLSELOBJ_THIS(iface
);
195 FIXME("(%p)\n", This
);
199 static HRESULT WINAPI
HTMLSelectionObject_clear(IHTMLSelectionObject
*iface
)
201 HTMLSelectionObject
*This
= HTMLSELOBJ_THIS(iface
);
202 FIXME("(%p)\n", This
);
206 static HRESULT WINAPI
HTMLSelectionObject_get_type(IHTMLSelectionObject
*iface
, BSTR
*p
)
208 HTMLSelectionObject
*This
= HTMLSELOBJ_THIS(iface
);
209 PRBool collapsed
= TRUE
;
211 static const WCHAR wszNone
[] = {'N','o','n','e',0};
212 static const WCHAR wszText
[] = {'T','e','x','t',0};
214 TRACE("(%p)->(%p)\n", This
, p
);
216 if(This
->nsselection
)
217 nsISelection_GetIsCollapsed(This
->nsselection
, &collapsed
);
219 *p
= SysAllocString(collapsed
? wszNone
: wszText
); /* FIXME: control */
220 TRACE("ret %s\n", debugstr_w(*p
));
224 #undef HTMLSELOBJ_THIS
226 static const IHTMLSelectionObjectVtbl HTMLSelectionObjectVtbl
= {
227 HTMLSelectionObject_QueryInterface
,
228 HTMLSelectionObject_AddRef
,
229 HTMLSelectionObject_Release
,
230 HTMLSelectionObject_GetTypeInfoCount
,
231 HTMLSelectionObject_GetTypeInfo
,
232 HTMLSelectionObject_GetIDsOfNames
,
233 HTMLSelectionObject_Invoke
,
234 HTMLSelectionObject_createRange
,
235 HTMLSelectionObject_empty
,
236 HTMLSelectionObject_clear
,
237 HTMLSelectionObject_get_type
240 IHTMLSelectionObject
*HTMLSelectionObject_Create(HTMLDocument
*doc
, nsISelection
*nsselection
)
242 HTMLSelectionObject
*ret
= heap_alloc(sizeof(HTMLSelectionObject
));
244 ret
->lpHTMLSelectionObjectVtbl
= &HTMLSelectionObjectVtbl
;
246 ret
->nsselection
= nsselection
; /* We shouldn't call AddRef here */
249 list_add_head(&doc
->selection_list
, &ret
->entry
);
251 return HTMLSELOBJ(ret
);
254 void detach_selection(HTMLDocument
*This
)
256 HTMLSelectionObject
*iter
;
258 LIST_FOR_EACH_ENTRY(iter
, &This
->selection_list
, HTMLSelectionObject
, entry
) {