2 * Copyright 2006-2007 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
19 #include "mshtml_private.h"
21 static const WCHAR brW
[] = {'b','r',0};
22 static const WCHAR hrW
[] = {'h','r',0};
26 IHTMLTxtRange IHTMLTxtRange_iface
;
27 IOleCommandTarget IOleCommandTarget_iface
;
32 HTMLDocumentNode
*doc
;
57 static HTMLTxtRange
*get_range_object(HTMLDocumentNode
*doc
, IHTMLTxtRange
*iface
)
61 LIST_FOR_EACH_ENTRY(iter
, &doc
->range_list
, HTMLTxtRange
, entry
) {
62 if(&iter
->IHTMLTxtRange_iface
== iface
)
66 ERR("Could not find range in document\n");
70 static range_unit_t
string_to_unit(LPCWSTR str
)
72 static const WCHAR characterW
[] =
73 {'c','h','a','r','a','c','t','e','r',0};
74 static const WCHAR wordW
[] =
76 static const WCHAR sentenceW
[] =
77 {'s','e','n','t','e','n','c','e',0};
78 static const WCHAR texteditW
[] =
79 {'t','e','x','t','e','d','i','t',0};
81 if(!strcmpiW(str
, characterW
)) return RU_CHAR
;
82 if(!strcmpiW(str
, wordW
)) return RU_WORD
;
83 if(!strcmpiW(str
, sentenceW
)) return RU_SENTENCE
;
84 if(!strcmpiW(str
, texteditW
)) return RU_TEXTEDIT
;
89 static int string_to_nscmptype(LPCWSTR str
)
91 static const WCHAR seW
[] = {'S','t','a','r','t','T','o','E','n','d',0};
92 static const WCHAR ssW
[] = {'S','t','a','r','t','T','o','S','t','a','r','t',0};
93 static const WCHAR esW
[] = {'E','n','d','T','o','S','t','a','r','t',0};
94 static const WCHAR eeW
[] = {'E','n','d','T','o','E','n','d',0};
96 if(!strcmpiW(str
, seW
)) return NS_START_TO_END
;
97 if(!strcmpiW(str
, ssW
)) return NS_START_TO_START
;
98 if(!strcmpiW(str
, esW
)) return NS_END_TO_START
;
99 if(!strcmpiW(str
, eeW
)) return NS_END_TO_END
;
104 static UINT16
get_node_type(nsIDOMNode
*node
)
109 nsIDOMNode_GetNodeType(node
, &type
);
114 static void get_text_node_data(nsIDOMNode
*node
, nsAString
*nsstr
, const PRUnichar
**str
)
119 nsres
= nsIDOMNode_QueryInterface(node
, &IID_nsIDOMText
, (void**)&nstext
);
120 assert(nsres
== NS_OK
);
122 nsAString_Init(nsstr
, NULL
);
123 nsres
= nsIDOMText_GetData(nstext
, nsstr
);
124 nsIDOMText_Release(nstext
);
126 ERR("GetData failed: %08x\n", nsres
);
128 nsAString_GetData(nsstr
, str
);
131 static nsIDOMNode
*get_child_node(nsIDOMNode
*node
, UINT32 off
)
133 nsIDOMNodeList
*node_list
;
134 nsIDOMNode
*ret
= NULL
;
136 nsIDOMNode_GetChildNodes(node
, &node_list
);
137 nsIDOMNodeList_Item(node_list
, off
, &ret
);
138 nsIDOMNodeList_Release(node_list
);
143 /* This is very inefficient, but there is no faster way to compute index in
144 * child node list using public API. Gecko has internal nsINode::IndexOf
145 * function that we could consider exporting and use instead. */
146 static int get_child_index(nsIDOMNode
*parent
, nsIDOMNode
*child
)
148 nsIDOMNodeList
*node_list
;
153 nsres
= nsIDOMNode_GetChildNodes(parent
, &node_list
);
154 assert(nsres
== NS_OK
);
157 nsres
= nsIDOMNodeList_Item(node_list
, ret
, &node
);
158 assert(nsres
== NS_OK
&& node
);
160 nsIDOMNode_Release(node
);
163 nsIDOMNode_Release(node
);
167 nsIDOMNodeList_Release(node_list
);
171 static void init_rangepoint(rangepoint_t
*rangepoint
, nsIDOMNode
*node
, UINT32 off
)
173 nsIDOMNode_AddRef(node
);
175 rangepoint
->type
= get_node_type(node
);
176 rangepoint
->node
= node
;
177 rangepoint
->off
= off
;
180 static inline void free_rangepoint(rangepoint_t
*rangepoint
)
182 nsIDOMNode_Release(rangepoint
->node
);
185 static inline BOOL
rangepoint_cmp(const rangepoint_t
*point1
, const rangepoint_t
*point2
)
187 return point1
->node
== point2
->node
&& point1
->off
== point2
->off
;
190 static BOOL
rangepoint_next_node(rangepoint_t
*iter
)
196 /* Try to move to the child node. */
197 node
= get_child_node(iter
->node
, iter
->off
);
199 free_rangepoint(iter
);
200 init_rangepoint(iter
, node
, 0);
201 nsIDOMNode_Release(node
);
205 /* There are no more children in the node. Move to parent. */
206 nsres
= nsIDOMNode_GetParentNode(iter
->node
, &node
);
207 assert(nsres
== NS_OK
);
211 off
= get_child_index(node
, iter
->node
)+1;
212 free_rangepoint(iter
);
213 init_rangepoint(iter
, node
, off
);
214 nsIDOMNode_Release(node
);
218 static UINT32
get_child_count(nsIDOMNode
*node
)
220 nsIDOMNodeList
*node_list
;
224 nsres
= nsIDOMNode_GetChildNodes(node
, &node_list
);
225 assert(nsres
== NS_OK
);
227 nsres
= nsIDOMNodeList_GetLength(node_list
, &ret
);
228 nsIDOMNodeList_Release(node_list
);
229 assert(nsres
== NS_OK
);
234 static UINT32
get_text_length(nsIDOMNode
*node
)
240 nsres
= nsIDOMNode_QueryInterface(node
, &IID_nsIDOMText
, (void**)&nstext
);
241 assert(nsres
== NS_OK
);
243 nsres
= nsIDOMText_GetLength(nstext
, &ret
);
244 nsIDOMText_Release(nstext
);
245 assert(nsres
== NS_OK
);
250 static BOOL
rangepoint_prev_node(rangepoint_t
*iter
)
256 /* Try to move to the child node. */
258 node
= get_child_node(iter
->node
, iter
->off
-1);
259 assert(node
!= NULL
);
261 off
= get_node_type(node
) == TEXT_NODE
? get_text_length(node
) : get_child_count(node
);
262 free_rangepoint(iter
);
263 init_rangepoint(iter
, node
, off
);
264 nsIDOMNode_Release(node
);
268 /* There are no more children in the node. Move to parent. */
269 nsres
= nsIDOMNode_GetParentNode(iter
->node
, &node
);
270 assert(nsres
== NS_OK
);
274 off
= get_child_index(node
, iter
->node
);
275 free_rangepoint(iter
);
276 init_rangepoint(iter
, node
, off
);
280 static void get_start_point(HTMLTxtRange
*This
, rangepoint_t
*ret
)
285 nsIDOMRange_GetStartContainer(This
->nsrange
, &node
);
286 nsIDOMRange_GetStartOffset(This
->nsrange
, &off
);
288 init_rangepoint(ret
, node
, off
);
290 nsIDOMNode_Release(node
);
293 static void get_end_point(HTMLTxtRange
*This
, rangepoint_t
*ret
)
298 nsIDOMRange_GetEndContainer(This
->nsrange
, &node
);
299 nsIDOMRange_GetEndOffset(This
->nsrange
, &off
);
301 init_rangepoint(ret
, node
, off
);
303 nsIDOMNode_Release(node
);
306 static void set_start_point(HTMLTxtRange
*This
, const rangepoint_t
*start
)
308 nsresult nsres
= nsIDOMRange_SetStart(This
->nsrange
, start
->node
, start
->off
);
310 ERR("failed: %08x\n", nsres
);
313 static void set_end_point(HTMLTxtRange
*This
, const rangepoint_t
*end
)
315 nsresult nsres
= nsIDOMRange_SetEnd(This
->nsrange
, end
->node
, end
->off
);
317 ERR("failed: %08x\n", nsres
);
320 static BOOL
is_elem_tag(nsIDOMNode
*node
, LPCWSTR istag
)
324 const PRUnichar
*tag
;
328 nsres
= nsIDOMNode_QueryInterface(node
, &IID_nsIDOMElement
, (void**)&elem
);
332 nsAString_Init(&tag_str
, NULL
);
333 nsIDOMElement_GetTagName(elem
, &tag_str
);
334 nsIDOMElement_Release(elem
);
335 nsAString_GetData(&tag_str
, &tag
);
337 ret
= !strcmpiW(tag
, istag
);
339 nsAString_Finish(&tag_str
);
344 static inline BOOL
wstrbuf_init(wstrbuf_t
*buf
)
348 buf
->buf
= heap_alloc(buf
->size
* sizeof(WCHAR
));
349 if (!buf
->buf
) return FALSE
;
354 static inline void wstrbuf_finish(wstrbuf_t
*buf
)
359 static void wstrbuf_append_len(wstrbuf_t
*buf
, LPCWSTR str
, int len
)
361 if(buf
->len
+len
>= buf
->size
) {
362 buf
->size
= 2*buf
->size
+len
;
363 buf
->buf
= heap_realloc(buf
->buf
, buf
->size
* sizeof(WCHAR
));
366 memcpy(buf
->buf
+buf
->len
, str
, len
*sizeof(WCHAR
));
368 buf
->buf
[buf
->len
] = 0;
371 static void wstrbuf_append_nodetxt(wstrbuf_t
*buf
, LPCWSTR str
, int len
)
373 const WCHAR
*s
= str
;
376 TRACE("%s\n", debugstr_wn(str
, len
));
378 if(buf
->len
+len
>= buf
->size
) {
379 buf
->size
= 2*buf
->size
+len
;
380 buf
->buf
= heap_realloc(buf
->buf
, buf
->size
* sizeof(WCHAR
));
383 if(buf
->len
&& isspaceW(buf
->buf
[buf
->len
-1])) {
384 while(s
< str
+len
&& isspaceW(*s
))
388 d
= buf
->buf
+buf
->len
;
393 while(s
< str
+len
&& isspaceW(*s
))
400 buf
->len
= d
- buf
->buf
;
404 static void wstrbuf_append_node(wstrbuf_t
*buf
, nsIDOMNode
*node
, BOOL ignore_text
)
407 switch(get_node_type(node
)) {
411 const PRUnichar
*data
;
416 nsIDOMNode_QueryInterface(node
, &IID_nsIDOMText
, (void**)&nstext
);
418 nsAString_Init(&data_str
, NULL
);
419 nsIDOMText_GetData(nstext
, &data_str
);
420 nsAString_GetData(&data_str
, &data
);
421 wstrbuf_append_nodetxt(buf
, data
, strlenW(data
));
422 nsAString_Finish(&data_str
);
424 nsIDOMText_Release(nstext
);
429 if(is_elem_tag(node
, brW
)) {
430 static const WCHAR endlW
[] = {'\r','\n'};
431 wstrbuf_append_len(buf
, endlW
, 2);
432 }else if(is_elem_tag(node
, hrW
)) {
433 static const WCHAR endl2W
[] = {'\r','\n','\r','\n'};
434 wstrbuf_append_len(buf
, endl2W
, 4);
439 static void wstrbuf_append_node_rec(wstrbuf_t
*buf
, nsIDOMNode
*node
)
441 nsIDOMNode
*iter
, *tmp
;
443 wstrbuf_append_node(buf
, node
, FALSE
);
445 nsIDOMNode_GetFirstChild(node
, &iter
);
447 wstrbuf_append_node_rec(buf
, iter
);
448 nsIDOMNode_GetNextSibling(iter
, &tmp
);
449 nsIDOMNode_Release(iter
);
454 static void range_to_string(HTMLTxtRange
*This
, wstrbuf_t
*buf
)
456 rangepoint_t end_pos
, iter
;
459 nsIDOMRange_GetCollapsed(This
->nsrange
, &collapsed
);
467 get_end_point(This
, &end_pos
);
468 get_start_point(This
, &iter
);
471 if(iter
.type
== TEXT_NODE
) {
472 const PRUnichar
*str
;
475 get_text_node_data(iter
.node
, &nsstr
, &str
);
477 if(iter
.node
== end_pos
.node
) {
478 wstrbuf_append_nodetxt(buf
, str
+iter
.off
, end_pos
.off
-iter
.off
);
479 nsAString_Finish(&nsstr
);
483 wstrbuf_append_nodetxt(buf
, str
+iter
.off
, strlenW(str
+iter
.off
));
484 nsAString_Finish(&nsstr
);
488 node
= get_child_node(iter
.node
, iter
.off
);
490 wstrbuf_append_node(buf
, node
, TRUE
);
491 nsIDOMNode_Release(node
);
495 if(!rangepoint_next_node(&iter
)) {
496 ERR("End of document?\n");
499 }while(!rangepoint_cmp(&iter
, &end_pos
));
501 free_rangepoint(&iter
);
502 free_rangepoint(&end_pos
);
507 for(p
= buf
->buf
+buf
->len
-1; p
>= buf
->buf
&& isspaceW(*p
); p
--);
509 p
= strchrW(p
, '\r');
515 HRESULT
get_node_text(HTMLDOMNode
*node
, BSTR
*ret
)
520 if (!wstrbuf_init(&buf
))
521 return E_OUTOFMEMORY
;
522 wstrbuf_append_node_rec(&buf
, node
->nsnode
);
524 *ret
= SysAllocString(buf
.buf
);
526 hres
= E_OUTOFMEMORY
;
530 wstrbuf_finish(&buf
);
533 TRACE("ret %s\n", debugstr_w(*ret
));
537 static WCHAR
move_next_char(rangepoint_t
*iter
)
539 rangepoint_t last_space
;
547 const PRUnichar
*str
;
551 get_text_node_data(iter
->node
, &nsstr
, &str
);
554 nsAString_Finish(&nsstr
);
564 free_rangepoint(&last_space
);
570 nsAString_Finish(&nsstr
);
571 if(!c
) { /* continue to skip spaces */
572 init_rangepoint(&last_space
, iter
->node
, iter
->off
);
578 nsAString_Finish(&nsstr
);
581 /* If we have a non-space char and we're skipping spaces, stop and return the last found space. */
583 free_rangepoint(iter
);
592 node
= get_child_node(iter
->node
, iter
->off
);
596 if(is_elem_tag(node
, brW
)) {
598 nsIDOMNode_Release(node
);
599 free_rangepoint(iter
);
605 init_rangepoint(&last_space
, iter
->node
, iter
->off
+1);
606 }else if(is_elem_tag(node
, hrW
)) {
607 nsIDOMNode_Release(node
);
609 free_rangepoint(iter
);
618 nsIDOMNode_Release(node
);
620 }while(rangepoint_next_node(iter
));
625 static WCHAR
move_prev_char(rangepoint_t
*iter
)
627 rangepoint_t last_space
;
635 const PRUnichar
*str
;
642 get_text_node_data(iter
->node
, &nsstr
, &str
);
648 while(p
> str
&& isspaceW(*(p
-1)))
652 free_rangepoint(&last_space
);
657 nsAString_Finish(&nsstr
);
658 if(p
== str
) { /* continue to skip spaces */
659 init_rangepoint(&last_space
, iter
->node
, iter
->off
);
665 nsAString_Finish(&nsstr
);
668 /* If we have a non-space char and we're skipping spaces, stop and return the last found space. */
670 free_rangepoint(iter
);
682 node
= get_child_node(iter
->node
, iter
->off
-1);
686 if(is_elem_tag(node
, brW
)) {
688 free_rangepoint(&last_space
);
690 init_rangepoint(&last_space
, iter
->node
, iter
->off
-1);
691 }else if(is_elem_tag(node
, hrW
)) {
692 nsIDOMNode_Release(node
);
694 free_rangepoint(iter
);
703 nsIDOMNode_Release(node
);
705 }while(rangepoint_prev_node(iter
));
708 free_rangepoint(iter
);
716 static LONG
move_by_chars(rangepoint_t
*iter
, LONG cnt
)
721 while(ret
< cnt
&& move_next_char(iter
))
724 while(ret
> cnt
&& move_prev_char(iter
))
731 static LONG
find_prev_space(rangepoint_t
*iter
, BOOL first_space
)
736 init_rangepoint(&prev
, iter
->node
, iter
->off
);
737 c
= move_prev_char(&prev
);
738 if(!c
|| (first_space
&& isspaceW(c
)))
742 free_rangepoint(iter
);
743 init_rangepoint(iter
, prev
.node
, prev
.off
);
744 c
= move_prev_char(&prev
);
745 }while(c
&& !isspaceW(c
));
747 free_rangepoint(&prev
);
751 static BOOL
find_word_end(rangepoint_t
*iter
, BOOL is_collapsed
)
753 rangepoint_t prev_iter
;
758 init_rangepoint(&prev_iter
, iter
->node
, iter
->off
);
759 c
= move_prev_char(&prev_iter
);
760 free_rangepoint(&prev_iter
);
766 init_rangepoint(&prev_iter
, iter
->node
, iter
->off
);
767 c
= move_next_char(iter
);
769 free_rangepoint(iter
);
775 ret
= !rangepoint_cmp(iter
, &prev_iter
);
779 free_rangepoint(&prev_iter
);
780 }while(c
&& !isspaceW(c
));
785 static LONG
move_by_words(rangepoint_t
*iter
, LONG cnt
)
792 while(ret
< cnt
&& (c
= move_next_char(iter
))) {
797 while(ret
> cnt
&& find_prev_space(iter
, FALSE
))
804 static inline HTMLTxtRange
*impl_from_IHTMLTxtRange(IHTMLTxtRange
*iface
)
806 return CONTAINING_RECORD(iface
, HTMLTxtRange
, IHTMLTxtRange_iface
);
809 static HRESULT WINAPI
HTMLTxtRange_QueryInterface(IHTMLTxtRange
*iface
, REFIID riid
, void **ppv
)
811 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
813 TRACE("(%p)->(%s %p)\n", This
, debugstr_mshtml_guid(riid
), ppv
);
815 if(IsEqualGUID(&IID_IUnknown
, riid
)) {
816 *ppv
= &This
->IHTMLTxtRange_iface
;
817 }else if(IsEqualGUID(&IID_IHTMLTxtRange
, riid
)) {
818 *ppv
= &This
->IHTMLTxtRange_iface
;
819 }else if(IsEqualGUID(&IID_IOleCommandTarget
, riid
)) {
820 *ppv
= &This
->IOleCommandTarget_iface
;
821 }else if(dispex_query_interface(&This
->dispex
, riid
, ppv
)) {
822 return *ppv
? S_OK
: E_NOINTERFACE
;
825 WARN("(%p)->(%s %p)\n", This
, debugstr_guid(riid
), ppv
);
826 return E_NOINTERFACE
;
829 IUnknown_AddRef((IUnknown
*)*ppv
);
833 static ULONG WINAPI
HTMLTxtRange_AddRef(IHTMLTxtRange
*iface
)
835 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
836 LONG ref
= InterlockedIncrement(&This
->ref
);
838 TRACE("(%p) ref=%d\n", This
, ref
);
843 static ULONG WINAPI
HTMLTxtRange_Release(IHTMLTxtRange
*iface
)
845 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
846 LONG ref
= InterlockedDecrement(&This
->ref
);
848 TRACE("(%p) ref=%d\n", This
, ref
);
852 nsIDOMRange_Release(This
->nsrange
);
854 list_remove(&This
->entry
);
855 release_dispex(&This
->dispex
);
862 static HRESULT WINAPI
HTMLTxtRange_GetTypeInfoCount(IHTMLTxtRange
*iface
, UINT
*pctinfo
)
864 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
866 return IDispatchEx_GetTypeInfoCount(&This
->dispex
.IDispatchEx_iface
, pctinfo
);
869 static HRESULT WINAPI
HTMLTxtRange_GetTypeInfo(IHTMLTxtRange
*iface
, UINT iTInfo
,
870 LCID lcid
, ITypeInfo
**ppTInfo
)
872 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
874 return IDispatchEx_GetTypeInfo(&This
->dispex
.IDispatchEx_iface
, iTInfo
, lcid
, ppTInfo
);
877 static HRESULT WINAPI
HTMLTxtRange_GetIDsOfNames(IHTMLTxtRange
*iface
, REFIID riid
,
878 LPOLESTR
*rgszNames
, UINT cNames
,
879 LCID lcid
, DISPID
*rgDispId
)
881 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
883 return IDispatchEx_GetIDsOfNames(&This
->dispex
.IDispatchEx_iface
, riid
, rgszNames
,
884 cNames
, lcid
, rgDispId
);
887 static HRESULT WINAPI
HTMLTxtRange_Invoke(IHTMLTxtRange
*iface
, DISPID dispIdMember
,
888 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
,
889 VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
891 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
893 return IDispatchEx_Invoke(&This
->dispex
.IDispatchEx_iface
, dispIdMember
, riid
,
894 lcid
, wFlags
, pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
897 static HRESULT WINAPI
HTMLTxtRange_get_htmlText(IHTMLTxtRange
*iface
, BSTR
*p
)
899 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
901 TRACE("(%p)->(%p)\n", This
, p
);
906 nsIDOMDocumentFragment
*fragment
;
909 nsres
= nsIDOMRange_CloneContents(This
->nsrange
, &fragment
);
910 if(NS_SUCCEEDED(nsres
)) {
911 const PRUnichar
*nstext
;
914 nsAString_Init(&nsstr
, NULL
);
915 nsnode_to_nsstring((nsIDOMNode
*)fragment
, &nsstr
);
916 nsIDOMDocumentFragment_Release(fragment
);
918 nsAString_GetData(&nsstr
, &nstext
);
919 *p
= SysAllocString(nstext
);
921 nsAString_Finish(&nsstr
);
926 const WCHAR emptyW
[] = {0};
927 *p
= SysAllocString(emptyW
);
930 TRACE("return %s\n", debugstr_w(*p
));
934 static HRESULT WINAPI
HTMLTxtRange_put_text(IHTMLTxtRange
*iface
, BSTR v
)
936 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
937 nsIDOMText
*text_node
;
941 TRACE("(%p)->(%s)\n", This
, debugstr_w(v
));
944 return MSHTML_E_NODOC
;
946 nsAString_InitDepend(&text_str
, v
);
947 nsres
= nsIDOMHTMLDocument_CreateTextNode(This
->doc
->nsdoc
, &text_str
, &text_node
);
948 nsAString_Finish(&text_str
);
949 if(NS_FAILED(nsres
)) {
950 ERR("CreateTextNode failed: %08x\n", nsres
);
953 nsres
= nsIDOMRange_DeleteContents(This
->nsrange
);
955 ERR("DeleteContents failed: %08x\n", nsres
);
957 nsres
= nsIDOMRange_InsertNode(This
->nsrange
, (nsIDOMNode
*)text_node
);
959 ERR("InsertNode failed: %08x\n", nsres
);
961 nsres
= nsIDOMRange_SetEndAfter(This
->nsrange
, (nsIDOMNode
*)text_node
);
963 ERR("SetEndAfter failed: %08x\n", nsres
);
965 return IHTMLTxtRange_collapse(&This
->IHTMLTxtRange_iface
, VARIANT_FALSE
);
968 static HRESULT WINAPI
HTMLTxtRange_get_text(IHTMLTxtRange
*iface
, BSTR
*p
)
970 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
973 TRACE("(%p)->(%p)\n", This
, p
);
979 if (!wstrbuf_init(&buf
))
980 return E_OUTOFMEMORY
;
981 range_to_string(This
, &buf
);
983 *p
= SysAllocString(buf
.buf
);
984 wstrbuf_finish(&buf
);
986 TRACE("ret %s\n", debugstr_w(*p
));
990 static HRESULT WINAPI
HTMLTxtRange_parentElement(IHTMLTxtRange
*iface
, IHTMLElement
**parent
)
992 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
993 nsIDOMNode
*nsnode
, *tmp
;
997 TRACE("(%p)->(%p)\n", This
, parent
);
999 nsIDOMRange_GetCommonAncestorContainer(This
->nsrange
, &nsnode
);
1000 while(nsnode
&& get_node_type(nsnode
) != ELEMENT_NODE
) {
1001 nsIDOMNode_GetParentNode(nsnode
, &tmp
);
1002 nsIDOMNode_Release(nsnode
);
1011 hres
= get_node(This
->doc
, nsnode
, TRUE
, &node
);
1012 nsIDOMNode_Release(nsnode
);
1016 hres
= IHTMLDOMNode_QueryInterface(&node
->IHTMLDOMNode_iface
, &IID_IHTMLElement
, (void**)parent
);
1021 static HRESULT WINAPI
HTMLTxtRange_duplicate(IHTMLTxtRange
*iface
, IHTMLTxtRange
**Duplicate
)
1023 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1024 nsIDOMRange
*nsrange
= NULL
;
1027 TRACE("(%p)->(%p)\n", This
, Duplicate
);
1029 nsIDOMRange_CloneRange(This
->nsrange
, &nsrange
);
1030 hres
= HTMLTxtRange_Create(This
->doc
, nsrange
, Duplicate
);
1031 nsIDOMRange_Release(nsrange
);
1036 static HRESULT WINAPI
HTMLTxtRange_inRange(IHTMLTxtRange
*iface
, IHTMLTxtRange
*Range
,
1037 VARIANT_BOOL
*InRange
)
1039 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1040 HTMLTxtRange
*src_range
;
1044 TRACE("(%p)->(%p %p)\n", This
, Range
, InRange
);
1046 *InRange
= VARIANT_FALSE
;
1048 src_range
= get_range_object(This
->doc
, Range
);
1052 nsres
= nsIDOMRange_CompareBoundaryPoints(This
->nsrange
, NS_START_TO_START
,
1053 src_range
->nsrange
, &nsret
);
1054 if(NS_SUCCEEDED(nsres
) && nsret
<= 0) {
1055 nsres
= nsIDOMRange_CompareBoundaryPoints(This
->nsrange
, NS_END_TO_END
,
1056 src_range
->nsrange
, &nsret
);
1057 if(NS_SUCCEEDED(nsres
) && nsret
>= 0)
1058 *InRange
= VARIANT_TRUE
;
1061 if(NS_FAILED(nsres
))
1062 ERR("CompareBoundaryPoints failed: %08x\n", nsres
);
1067 static HRESULT WINAPI
HTMLTxtRange_isEqual(IHTMLTxtRange
*iface
, IHTMLTxtRange
*Range
,
1068 VARIANT_BOOL
*IsEqual
)
1070 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1071 HTMLTxtRange
*src_range
;
1075 TRACE("(%p)->(%p %p)\n", This
, Range
, IsEqual
);
1077 *IsEqual
= VARIANT_FALSE
;
1079 src_range
= get_range_object(This
->doc
, Range
);
1083 nsres
= nsIDOMRange_CompareBoundaryPoints(This
->nsrange
, NS_START_TO_START
,
1084 src_range
->nsrange
, &nsret
);
1085 if(NS_SUCCEEDED(nsres
) && !nsret
) {
1086 nsres
= nsIDOMRange_CompareBoundaryPoints(This
->nsrange
, NS_END_TO_END
,
1087 src_range
->nsrange
, &nsret
);
1088 if(NS_SUCCEEDED(nsres
) && !nsret
)
1089 *IsEqual
= VARIANT_TRUE
;
1092 if(NS_FAILED(nsres
))
1093 ERR("CompareBoundaryPoints failed: %08x\n", nsres
);
1098 static HRESULT WINAPI
HTMLTxtRange_scrollIntoView(IHTMLTxtRange
*iface
, VARIANT_BOOL fStart
)
1100 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1101 FIXME("(%p)->(%x)\n", This
, fStart
);
1105 static HRESULT WINAPI
HTMLTxtRange_collapse(IHTMLTxtRange
*iface
, VARIANT_BOOL Start
)
1107 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1109 TRACE("(%p)->(%x)\n", This
, Start
);
1111 nsIDOMRange_Collapse(This
->nsrange
, Start
!= VARIANT_FALSE
);
1115 static HRESULT WINAPI
HTMLTxtRange_expand(IHTMLTxtRange
*iface
, BSTR Unit
, VARIANT_BOOL
*Success
)
1117 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1120 TRACE("(%p)->(%s %p)\n", This
, debugstr_w(Unit
), Success
);
1122 unit
= string_to_unit(Unit
);
1123 if(unit
== RU_UNKNOWN
)
1124 return E_INVALIDARG
;
1126 *Success
= VARIANT_FALSE
;
1130 rangepoint_t end
, start
;
1131 cpp_bool is_collapsed
;
1133 get_start_point(This
, &start
);
1134 get_end_point(This
, &end
);
1136 nsIDOMRange_GetCollapsed(This
->nsrange
, &is_collapsed
);
1138 if(find_word_end(&end
, is_collapsed
)) {
1139 set_end_point(This
, &end
);
1140 *Success
= VARIANT_TRUE
;
1143 if(find_prev_space(&start
, TRUE
)) {
1144 set_start_point(This
, &start
);
1145 *Success
= VARIANT_TRUE
;
1148 free_rangepoint(&end
);
1149 free_rangepoint(&start
);
1154 nsIDOMHTMLElement
*nsbody
= NULL
;
1157 nsres
= nsIDOMHTMLDocument_GetBody(This
->doc
->nsdoc
, &nsbody
);
1158 if(NS_FAILED(nsres
) || !nsbody
) {
1159 ERR("Could not get body: %08x\n", nsres
);
1163 nsres
= nsIDOMRange_SelectNodeContents(This
->nsrange
, (nsIDOMNode
*)nsbody
);
1164 nsIDOMHTMLElement_Release(nsbody
);
1165 if(NS_FAILED(nsres
)) {
1166 ERR("Collapse failed: %08x\n", nsres
);
1170 *Success
= VARIANT_TRUE
;
1175 FIXME("Unimplemented unit %s\n", debugstr_w(Unit
));
1181 static HRESULT WINAPI
HTMLTxtRange_move(IHTMLTxtRange
*iface
, BSTR Unit
,
1182 LONG Count
, LONG
*ActualCount
)
1184 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1187 TRACE("(%p)->(%s %d %p)\n", This
, debugstr_w(Unit
), Count
, ActualCount
);
1189 unit
= string_to_unit(Unit
);
1190 if(unit
== RU_UNKNOWN
)
1191 return E_INVALIDARG
;
1195 return IHTMLTxtRange_collapse(&This
->IHTMLTxtRange_iface
, VARIANT_TRUE
);
1202 get_start_point(This
, &start
);
1204 *ActualCount
= move_by_chars(&start
, Count
);
1206 set_start_point(This
, &start
);
1207 IHTMLTxtRange_collapse(&This
->IHTMLTxtRange_iface
, VARIANT_TRUE
);
1208 free_rangepoint(&start
);
1215 get_start_point(This
, &start
);
1217 *ActualCount
= move_by_words(&start
, Count
);
1219 set_start_point(This
, &start
);
1220 IHTMLTxtRange_collapse(&This
->IHTMLTxtRange_iface
, VARIANT_TRUE
);
1221 free_rangepoint(&start
);
1226 FIXME("unimplemented unit %s\n", debugstr_w(Unit
));
1229 TRACE("ret %d\n", *ActualCount
);
1233 static HRESULT WINAPI
HTMLTxtRange_moveStart(IHTMLTxtRange
*iface
, BSTR Unit
,
1234 LONG Count
, LONG
*ActualCount
)
1236 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1239 TRACE("(%p)->(%s %d %p)\n", This
, debugstr_w(Unit
), Count
, ActualCount
);
1241 unit
= string_to_unit(Unit
);
1242 if(unit
== RU_UNKNOWN
)
1243 return E_INVALIDARG
;
1254 get_start_point(This
, &start
);
1256 *ActualCount
= move_by_chars(&start
, Count
);
1258 set_start_point(This
, &start
);
1259 free_rangepoint(&start
);
1264 FIXME("unimplemented unit %s\n", debugstr_w(Unit
));
1271 static HRESULT WINAPI
HTMLTxtRange_moveEnd(IHTMLTxtRange
*iface
, BSTR Unit
,
1272 LONG Count
, LONG
*ActualCount
)
1274 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1277 TRACE("(%p)->(%s %d %p)\n", This
, debugstr_w(Unit
), Count
, ActualCount
);
1279 unit
= string_to_unit(Unit
);
1280 if(unit
== RU_UNKNOWN
)
1281 return E_INVALIDARG
;
1292 get_end_point(This
, &end
);
1294 *ActualCount
= move_by_chars(&end
, Count
);
1296 set_end_point(This
, &end
);
1297 free_rangepoint(&end
);
1302 FIXME("unimplemented unit %s\n", debugstr_w(Unit
));
1308 static HRESULT WINAPI
HTMLTxtRange_select(IHTMLTxtRange
*iface
)
1310 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1311 nsISelection
*nsselection
;
1314 TRACE("(%p)\n", This
);
1316 nsres
= nsIDOMWindow_GetSelection(This
->doc
->basedoc
.window
->nswindow
, &nsselection
);
1317 if(NS_FAILED(nsres
)) {
1318 ERR("GetSelection failed: %08x\n", nsres
);
1322 nsISelection_RemoveAllRanges(nsselection
);
1323 nsISelection_AddRange(nsselection
, This
->nsrange
);
1324 nsISelection_Release(nsselection
);
1328 static HRESULT WINAPI
HTMLTxtRange_pasteHTML(IHTMLTxtRange
*iface
, BSTR html
)
1330 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1331 nsIDOMDocumentFragment
*doc_frag
;
1335 TRACE("(%p)->(%s)\n", This
, debugstr_w(html
));
1337 nsres
= nsIDOMRange_Collapse(This
->nsrange
, TRUE
);
1338 assert(nsres
== NS_OK
);
1340 nsAString_InitDepend(&nsstr
, html
);
1341 nsres
= nsIDOMRange_CreateContextualFragment(This
->nsrange
, &nsstr
, &doc_frag
);
1342 nsAString_Finish(&nsstr
);
1343 if(NS_FAILED(nsres
)) {
1344 ERR("CreateContextualFragment failed: %08x\n", nsres
);
1348 nsres
= nsIDOMRange_InsertNode(This
->nsrange
, (nsIDOMNode
*)doc_frag
);
1349 nsIDOMDocumentFragment_Release(doc_frag
);
1350 if(NS_FAILED(nsres
)) {
1351 ERR("InsertNode failed: %08x\n", nsres
);
1355 nsres
= nsIDOMRange_Collapse(This
->nsrange
, FALSE
);
1356 assert(nsres
== NS_OK
);
1360 static HRESULT WINAPI
HTMLTxtRange_moveToElementText(IHTMLTxtRange
*iface
, IHTMLElement
*element
)
1362 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1366 TRACE("(%p)->(%p)\n", This
, element
);
1368 elem
= unsafe_impl_from_IHTMLElement(element
);
1370 return E_INVALIDARG
;
1372 nsres
= nsIDOMRange_SelectNodeContents(This
->nsrange
, elem
->node
.nsnode
);
1373 if(NS_FAILED(nsres
)) {
1374 ERR("SelectNodeContents failed: %08x\n", nsres
);
1381 static HRESULT WINAPI
HTMLTxtRange_setEndPoint(IHTMLTxtRange
*iface
, BSTR how
,
1382 IHTMLTxtRange
*SourceRange
)
1384 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1385 HTMLTxtRange
*src_range
;
1386 nsIDOMNode
*ref_node
;
1393 TRACE("(%p)->(%s %p)\n", This
, debugstr_w(how
), SourceRange
);
1395 how_type
= string_to_nscmptype(how
);
1397 return E_INVALIDARG
;
1399 src_range
= get_range_object(This
->doc
, SourceRange
);
1404 case NS_START_TO_START
:
1405 case NS_END_TO_START
:
1406 nsres
= nsIDOMRange_GetStartContainer(src_range
->nsrange
, &ref_node
);
1407 assert(nsres
== NS_OK
);
1409 nsres
= nsIDOMRange_GetStartOffset(src_range
->nsrange
, &ref_offset
);
1410 assert(nsres
== NS_OK
);
1412 set_start
= how_type
== NS_START_TO_START
;
1415 case NS_START_TO_END
:
1416 nsres
= nsIDOMRange_GetEndContainer(src_range
->nsrange
, &ref_node
);
1417 assert(nsres
== NS_OK
);
1419 nsres
= nsIDOMRange_GetEndOffset(src_range
->nsrange
, &ref_offset
);
1420 assert(nsres
== NS_OK
);
1422 set_start
= how_type
== NS_START_TO_END
;
1424 DEFAULT_UNREACHABLE
;
1427 nsres
= nsIDOMRange_ComparePoint(This
->nsrange
, ref_node
, ref_offset
, &cmp
);
1428 assert(nsres
== NS_OK
);
1432 nsres
= nsIDOMRange_SetStart(This
->nsrange
, ref_node
, ref_offset
);
1434 nsres
= nsIDOMRange_Collapse(This
->nsrange
, FALSE
);
1435 assert(nsres
== NS_OK
);
1437 nsres
= nsIDOMRange_SetEnd(This
->nsrange
, ref_node
, ref_offset
);
1441 nsres
= nsIDOMRange_SetEnd(This
->nsrange
, ref_node
, ref_offset
);
1443 nsres
= nsIDOMRange_Collapse(This
->nsrange
, TRUE
);
1444 assert(nsres
== NS_OK
);
1446 nsres
= nsIDOMRange_SetStart(This
->nsrange
, ref_node
, ref_offset
);
1449 assert(nsres
== NS_OK
);
1451 nsIDOMNode_Release(ref_node
);
1455 static HRESULT WINAPI
HTMLTxtRange_compareEndPoints(IHTMLTxtRange
*iface
, BSTR how
,
1456 IHTMLTxtRange
*SourceRange
, LONG
*ret
)
1458 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1459 HTMLTxtRange
*src_range
;
1464 TRACE("(%p)->(%s %p %p)\n", This
, debugstr_w(how
), SourceRange
, ret
);
1466 nscmpt
= string_to_nscmptype(how
);
1468 return E_INVALIDARG
;
1470 src_range
= get_range_object(This
->doc
, SourceRange
);
1474 nsres
= nsIDOMRange_CompareBoundaryPoints(This
->nsrange
, nscmpt
, src_range
->nsrange
, &nsret
);
1475 if(NS_FAILED(nsres
))
1476 ERR("CompareBoundaryPoints failed: %08x\n", nsres
);
1482 static HRESULT WINAPI
HTMLTxtRange_findText(IHTMLTxtRange
*iface
, BSTR String
,
1483 LONG count
, LONG Flags
, VARIANT_BOOL
*Success
)
1485 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1486 FIXME("(%p)->(%s %d %08x %p)\n", This
, debugstr_w(String
), count
, Flags
, Success
);
1490 static HRESULT WINAPI
HTMLTxtRange_moveToPoint(IHTMLTxtRange
*iface
, LONG x
, LONG y
)
1492 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1493 FIXME("(%p)->(%d %d)\n", This
, x
, y
);
1497 static HRESULT WINAPI
HTMLTxtRange_getBookmark(IHTMLTxtRange
*iface
, BSTR
*Bookmark
)
1499 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1500 FIXME("(%p)->(%p)\n", This
, Bookmark
);
1504 static HRESULT WINAPI
HTMLTxtRange_moveToBookmark(IHTMLTxtRange
*iface
, BSTR Bookmark
,
1505 VARIANT_BOOL
*Success
)
1507 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1508 FIXME("(%p)->(%s %p)\n", This
, debugstr_w(Bookmark
), Success
);
1512 static HRESULT WINAPI
HTMLTxtRange_queryCommandSupported(IHTMLTxtRange
*iface
, BSTR cmdID
,
1513 VARIANT_BOOL
*pfRet
)
1515 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1516 FIXME("(%p)->(%s %p)\n", This
, debugstr_w(cmdID
), pfRet
);
1520 static HRESULT WINAPI
HTMLTxtRange_queryCommandEnabled(IHTMLTxtRange
*iface
, BSTR cmdID
,
1521 VARIANT_BOOL
*pfRet
)
1523 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1524 FIXME("(%p)->(%s %p)\n", This
, debugstr_w(cmdID
), pfRet
);
1528 static HRESULT WINAPI
HTMLTxtRange_queryCommandState(IHTMLTxtRange
*iface
, BSTR cmdID
,
1529 VARIANT_BOOL
*pfRet
)
1531 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1532 FIXME("(%p)->(%s %p)\n", This
, debugstr_w(cmdID
), pfRet
);
1536 static HRESULT WINAPI
HTMLTxtRange_queryCommandIndeterm(IHTMLTxtRange
*iface
, BSTR cmdID
,
1537 VARIANT_BOOL
*pfRet
)
1539 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1540 FIXME("(%p)->(%s %p)\n", This
, debugstr_w(cmdID
), pfRet
);
1544 static HRESULT WINAPI
HTMLTxtRange_queryCommandText(IHTMLTxtRange
*iface
, BSTR cmdID
,
1547 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1548 FIXME("(%p)->(%s %p)\n", This
, debugstr_w(cmdID
), pcmdText
);
1552 static HRESULT WINAPI
HTMLTxtRange_queryCommandValue(IHTMLTxtRange
*iface
, BSTR cmdID
,
1555 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1556 FIXME("(%p)->(%s %p)\n", This
, debugstr_w(cmdID
), pcmdValue
);
1560 static HRESULT WINAPI
HTMLTxtRange_execCommand(IHTMLTxtRange
*iface
, BSTR cmdID
,
1561 VARIANT_BOOL showUI
, VARIANT value
, VARIANT_BOOL
*pfRet
)
1563 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1564 FIXME("(%p)->(%s %x v %p)\n", This
, debugstr_w(cmdID
), showUI
, pfRet
);
1568 static HRESULT WINAPI
HTMLTxtRange_execCommandShowHelp(IHTMLTxtRange
*iface
, BSTR cmdID
,
1569 VARIANT_BOOL
*pfRet
)
1571 HTMLTxtRange
*This
= impl_from_IHTMLTxtRange(iface
);
1572 FIXME("(%p)->(%s %p)\n", This
, debugstr_w(cmdID
), pfRet
);
1576 static const IHTMLTxtRangeVtbl HTMLTxtRangeVtbl
= {
1577 HTMLTxtRange_QueryInterface
,
1578 HTMLTxtRange_AddRef
,
1579 HTMLTxtRange_Release
,
1580 HTMLTxtRange_GetTypeInfoCount
,
1581 HTMLTxtRange_GetTypeInfo
,
1582 HTMLTxtRange_GetIDsOfNames
,
1583 HTMLTxtRange_Invoke
,
1584 HTMLTxtRange_get_htmlText
,
1585 HTMLTxtRange_put_text
,
1586 HTMLTxtRange_get_text
,
1587 HTMLTxtRange_parentElement
,
1588 HTMLTxtRange_duplicate
,
1589 HTMLTxtRange_inRange
,
1590 HTMLTxtRange_isEqual
,
1591 HTMLTxtRange_scrollIntoView
,
1592 HTMLTxtRange_collapse
,
1593 HTMLTxtRange_expand
,
1595 HTMLTxtRange_moveStart
,
1596 HTMLTxtRange_moveEnd
,
1597 HTMLTxtRange_select
,
1598 HTMLTxtRange_pasteHTML
,
1599 HTMLTxtRange_moveToElementText
,
1600 HTMLTxtRange_setEndPoint
,
1601 HTMLTxtRange_compareEndPoints
,
1602 HTMLTxtRange_findText
,
1603 HTMLTxtRange_moveToPoint
,
1604 HTMLTxtRange_getBookmark
,
1605 HTMLTxtRange_moveToBookmark
,
1606 HTMLTxtRange_queryCommandSupported
,
1607 HTMLTxtRange_queryCommandEnabled
,
1608 HTMLTxtRange_queryCommandState
,
1609 HTMLTxtRange_queryCommandIndeterm
,
1610 HTMLTxtRange_queryCommandText
,
1611 HTMLTxtRange_queryCommandValue
,
1612 HTMLTxtRange_execCommand
,
1613 HTMLTxtRange_execCommandShowHelp
1616 static inline HTMLTxtRange
*impl_from_IOleCommandTarget(IOleCommandTarget
*iface
)
1618 return CONTAINING_RECORD(iface
, HTMLTxtRange
, IOleCommandTarget_iface
);
1621 static HRESULT WINAPI
RangeCommandTarget_QueryInterface(IOleCommandTarget
*iface
, REFIID riid
, void **ppv
)
1623 HTMLTxtRange
*This
= impl_from_IOleCommandTarget(iface
);
1624 return IHTMLTxtRange_QueryInterface(&This
->IHTMLTxtRange_iface
, riid
, ppv
);
1627 static ULONG WINAPI
RangeCommandTarget_AddRef(IOleCommandTarget
*iface
)
1629 HTMLTxtRange
*This
= impl_from_IOleCommandTarget(iface
);
1630 return IHTMLTxtRange_AddRef(&This
->IHTMLTxtRange_iface
);
1633 static ULONG WINAPI
RangeCommandTarget_Release(IOleCommandTarget
*iface
)
1635 HTMLTxtRange
*This
= impl_from_IOleCommandTarget(iface
);
1636 return IHTMLTxtRange_Release(&This
->IHTMLTxtRange_iface
);
1639 static HRESULT WINAPI
RangeCommandTarget_QueryStatus(IOleCommandTarget
*iface
, const GUID
*pguidCmdGroup
,
1640 ULONG cCmds
, OLECMD prgCmds
[], OLECMDTEXT
*pCmdText
)
1642 HTMLTxtRange
*This
= impl_from_IOleCommandTarget(iface
);
1643 FIXME("(%p)->(%s %d %p %p)\n", This
, debugstr_guid(pguidCmdGroup
), cCmds
, prgCmds
, pCmdText
);
1647 static HRESULT
exec_indent(HTMLTxtRange
*This
, VARIANT
*in
, VARIANT
*out
)
1649 nsIDOMHTMLElement
*blockquote_elem
, *p_elem
;
1650 nsIDOMDocumentFragment
*fragment
;
1653 static const PRUnichar blockquoteW
[] = {'B','L','O','C','K','Q','U','O','T','E',0};
1654 static const PRUnichar pW
[] = {'P',0};
1656 TRACE("(%p)->(%p %p)\n", This
, in
, out
);
1658 if(!This
->doc
->nsdoc
) {
1659 WARN("NULL nsdoc\n");
1663 create_nselem(This
->doc
, blockquoteW
, &blockquote_elem
);
1664 create_nselem(This
->doc
, pW
, &p_elem
);
1666 nsIDOMRange_ExtractContents(This
->nsrange
, &fragment
);
1667 nsIDOMHTMLElement_AppendChild(p_elem
, (nsIDOMNode
*)fragment
, &tmp
);
1668 nsIDOMDocumentFragment_Release(fragment
);
1669 nsIDOMNode_Release(tmp
);
1671 nsIDOMHTMLElement_AppendChild(blockquote_elem
, (nsIDOMNode
*)p_elem
, &tmp
);
1672 nsIDOMHTMLElement_Release(p_elem
);
1673 nsIDOMNode_Release(tmp
);
1675 nsIDOMRange_InsertNode(This
->nsrange
, (nsIDOMNode
*)blockquote_elem
);
1676 nsIDOMHTMLElement_Release(blockquote_elem
);
1681 static HRESULT WINAPI
RangeCommandTarget_Exec(IOleCommandTarget
*iface
, const GUID
*pguidCmdGroup
,
1682 DWORD nCmdID
, DWORD nCmdexecopt
, VARIANT
*pvaIn
, VARIANT
*pvaOut
)
1684 HTMLTxtRange
*This
= impl_from_IOleCommandTarget(iface
);
1686 TRACE("(%p)->(%s %d %x %p %p)\n", This
, debugstr_guid(pguidCmdGroup
), nCmdID
,
1687 nCmdexecopt
, pvaIn
, pvaOut
);
1689 if(pguidCmdGroup
&& IsEqualGUID(&CGID_MSHTML
, pguidCmdGroup
)) {
1692 return exec_indent(This
, pvaIn
, pvaOut
);
1694 FIXME("Unsupported cmdid %d of CGID_MSHTML\n", nCmdID
);
1697 FIXME("Unsupported cmd %d of group %s\n", nCmdID
, debugstr_guid(pguidCmdGroup
));
1703 static const IOleCommandTargetVtbl OleCommandTargetVtbl
= {
1704 RangeCommandTarget_QueryInterface
,
1705 RangeCommandTarget_AddRef
,
1706 RangeCommandTarget_Release
,
1707 RangeCommandTarget_QueryStatus
,
1708 RangeCommandTarget_Exec
1711 static const tid_t HTMLTxtRange_iface_tids
[] = {
1715 static dispex_static_data_t HTMLTxtRange_dispex
= {
1719 HTMLTxtRange_iface_tids
1722 HRESULT
HTMLTxtRange_Create(HTMLDocumentNode
*doc
, nsIDOMRange
*nsrange
, IHTMLTxtRange
**p
)
1726 ret
= heap_alloc(sizeof(HTMLTxtRange
));
1728 return E_OUTOFMEMORY
;
1730 init_dispex(&ret
->dispex
, (IUnknown
*)&ret
->IHTMLTxtRange_iface
, &HTMLTxtRange_dispex
);
1732 ret
->IHTMLTxtRange_iface
.lpVtbl
= &HTMLTxtRangeVtbl
;
1733 ret
->IOleCommandTarget_iface
.lpVtbl
= &OleCommandTargetVtbl
;
1737 nsIDOMRange_AddRef(nsrange
);
1738 ret
->nsrange
= nsrange
;
1741 list_add_head(&doc
->range_list
, &ret
->entry
);
1743 *p
= &ret
->IHTMLTxtRange_iface
;
1747 void detach_ranges(HTMLDocumentNode
*This
)
1751 LIST_FOR_EACH_ENTRY(iter
, &This
->range_list
, HTMLTxtRange
, entry
) {