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
30 #include "wine/debug.h"
32 #include "mshtml_private.h"
33 #include "htmlevent.h"
34 #include "htmlstyle.h"
36 WINE_DEFAULT_DEBUG_CHANNEL(mshtml
);
41 IHTMLBodyElement IHTMLBodyElement_iface
;
42 IHTMLTextContainer IHTMLTextContainer_iface
;
44 nsIDOMHTMLBodyElement
*nsbody
;
54 {L
"fuchsia", 0xff00ff},
58 {L
"maroon", 0x800000},
61 {L
"purple", 0x800080},
63 {L
"silver", 0xc0c0c0},
69 static int comp_value(const WCHAR
*ptr
, int dpc
)
80 else if(is_digit(ch
= *ptr
++))
81 ret
= ret
*16 + (ch
-'0');
82 else if('a' <= ch
&& ch
<= 'f')
83 ret
= ret
*16 + (ch
-'a') + 10;
84 else if('A' <= ch
&& ch
<= 'F')
85 ret
= ret
*16 + (ch
-'A') + 10;
93 /* Based on Gecko NS_LooseHexToRGB */
94 static int loose_hex_to_rgb(const WCHAR
*hex
)
106 dpc
= min(len
/3 + (len
%3 ? 1 : 0), 4);
107 return (comp_value(hex
, dpc
) << 16)
108 | (comp_value(hex
+dpc
, dpc
) << 8)
109 | comp_value(hex
+2*dpc
, dpc
);
112 HRESULT
nscolor_to_str(LPCWSTR color
, BSTR
*ret
)
117 if(!color
|| !*color
) {
123 for(i
=0; i
< ARRAY_SIZE(keyword_table
); i
++) {
124 if(!wcsicmp(color
, keyword_table
[i
].keyword
))
125 rgb
= keyword_table
[i
].rgb
;
129 rgb
= loose_hex_to_rgb(color
);
131 *ret
= SysAllocStringLen(NULL
, 7);
133 return E_OUTOFMEMORY
;
135 swprintf(*ret
, 8, L
"#%02x%02x%02x", rgb
>>16, (rgb
>>8)&0xff, rgb
&0xff);
137 TRACE("%s -> %s\n", debugstr_w(color
), debugstr_w(*ret
));
141 BOOL
variant_to_nscolor(const VARIANT
*v
, nsAString
*nsstr
)
145 nsAString_Init(nsstr
, V_BSTR(v
));
151 wsprintfW(buf
, L
"#%x", V_I4(v
));
152 nsAString_Init(nsstr
, buf
);
157 FIXME("invalid color %s\n", debugstr_variant(v
));
164 static HRESULT
return_nscolor(nsresult nsres
, nsAString
*nsstr
, VARIANT
*p
)
166 const PRUnichar
*color
;
168 if(NS_FAILED(nsres
)) {
169 ERR("failed: %08x\n", nsres
);
170 nsAString_Finish(nsstr
);
174 nsAString_GetData(nsstr
, &color
);
178 V_I4(p
) = wcstol(color
+1, NULL
, 16);
181 V_BSTR(p
) = SysAllocString(color
);
183 nsAString_Finish(nsstr
);
184 return E_OUTOFMEMORY
;
188 nsAString_Finish(nsstr
);
189 TRACE("ret %s\n", debugstr_variant(p
));
193 static inline HTMLBodyElement
*impl_from_IHTMLBodyElement(IHTMLBodyElement
*iface
)
195 return CONTAINING_RECORD(iface
, HTMLBodyElement
, IHTMLBodyElement_iface
);
198 static HRESULT WINAPI
HTMLBodyElement_QueryInterface(IHTMLBodyElement
*iface
,
199 REFIID riid
, void **ppv
)
201 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
203 return IHTMLDOMNode_QueryInterface(&This
->element
.node
.IHTMLDOMNode_iface
, riid
, ppv
);
206 static ULONG WINAPI
HTMLBodyElement_AddRef(IHTMLBodyElement
*iface
)
208 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
210 return IHTMLDOMNode_AddRef(&This
->element
.node
.IHTMLDOMNode_iface
);
213 static ULONG WINAPI
HTMLBodyElement_Release(IHTMLBodyElement
*iface
)
215 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
217 return IHTMLDOMNode_Release(&This
->element
.node
.IHTMLDOMNode_iface
);
220 static HRESULT WINAPI
HTMLBodyElement_GetTypeInfoCount(IHTMLBodyElement
*iface
, UINT
*pctinfo
)
222 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
223 return IDispatchEx_GetTypeInfoCount(&This
->element
.node
.event_target
.dispex
.IDispatchEx_iface
,
227 static HRESULT WINAPI
HTMLBodyElement_GetTypeInfo(IHTMLBodyElement
*iface
, UINT iTInfo
,
228 LCID lcid
, ITypeInfo
**ppTInfo
)
230 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
231 return IDispatchEx_GetTypeInfo(&This
->element
.node
.event_target
.dispex
.IDispatchEx_iface
, iTInfo
,
235 static HRESULT WINAPI
HTMLBodyElement_GetIDsOfNames(IHTMLBodyElement
*iface
, REFIID riid
,
236 LPOLESTR
*rgszNames
, UINT cNames
,
237 LCID lcid
, DISPID
*rgDispId
)
239 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
240 return IDispatchEx_GetIDsOfNames(&This
->element
.node
.event_target
.dispex
.IDispatchEx_iface
, riid
,
241 rgszNames
, cNames
, lcid
, rgDispId
);
244 static HRESULT WINAPI
HTMLBodyElement_Invoke(IHTMLBodyElement
*iface
, DISPID dispIdMember
,
245 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
,
246 VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
248 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
249 return IDispatchEx_Invoke(&This
->element
.node
.event_target
.dispex
.IDispatchEx_iface
, dispIdMember
,
250 riid
, lcid
, wFlags
, pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
253 static HRESULT WINAPI
HTMLBodyElement_put_background(IHTMLBodyElement
*iface
, BSTR v
)
255 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
259 TRACE("(%p)->(%s)\n", This
, debugstr_w(v
));
261 nsAString_InitDepend(&nsstr
, v
);
262 nsres
= nsIDOMHTMLBodyElement_SetBackground(This
->nsbody
, &nsstr
);
263 nsAString_Finish(&nsstr
);
270 static HRESULT WINAPI
HTMLBodyElement_get_background(IHTMLBodyElement
*iface
, BSTR
*p
)
272 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
273 nsAString background_str
;
276 TRACE("(%p)->(%p)\n", This
, p
);
278 nsAString_Init(&background_str
, NULL
);
279 nsres
= nsIDOMHTMLBodyElement_GetBackground(This
->nsbody
, &background_str
);
280 return return_nsstr(nsres
, &background_str
, p
);
283 static HRESULT WINAPI
HTMLBodyElement_put_bgProperties(IHTMLBodyElement
*iface
, BSTR v
)
285 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
286 FIXME("(%p)->(%s)\n", This
, debugstr_w(v
));
290 static HRESULT WINAPI
HTMLBodyElement_get_bgProperties(IHTMLBodyElement
*iface
, BSTR
*p
)
292 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
293 FIXME("(%p)->(%p)\n", This
, p
);
297 static HRESULT WINAPI
HTMLBodyElement_put_leftMargin(IHTMLBodyElement
*iface
, VARIANT v
)
299 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
300 FIXME("(%p)->(%s)\n", This
, debugstr_variant(&v
));
304 static HRESULT WINAPI
HTMLBodyElement_get_leftMargin(IHTMLBodyElement
*iface
, VARIANT
*p
)
306 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
307 FIXME("(%p)->(%p)\n", This
, p
);
311 static HRESULT WINAPI
HTMLBodyElement_put_topMargin(IHTMLBodyElement
*iface
, VARIANT v
)
313 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
314 FIXME("(%p)->(%s)\n", This
, debugstr_variant(&v
));
318 static HRESULT WINAPI
HTMLBodyElement_get_topMargin(IHTMLBodyElement
*iface
, VARIANT
*p
)
320 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
321 FIXME("(%p)->(%p)\n", This
, p
);
325 static HRESULT WINAPI
HTMLBodyElement_put_rightMargin(IHTMLBodyElement
*iface
, VARIANT v
)
327 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
328 FIXME("(%p)->(%s)\n", This
, debugstr_variant(&v
));
332 static HRESULT WINAPI
HTMLBodyElement_get_rightMargin(IHTMLBodyElement
*iface
, VARIANT
*p
)
334 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
335 FIXME("(%p)->(%p)\n", This
, p
);
339 static HRESULT WINAPI
HTMLBodyElement_put_bottomMargin(IHTMLBodyElement
*iface
, VARIANT v
)
341 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
342 FIXME("(%p)->(%s)\n", This
, debugstr_variant(&v
));
346 static HRESULT WINAPI
HTMLBodyElement_get_bottomMargin(IHTMLBodyElement
*iface
, VARIANT
*p
)
348 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
349 FIXME("(%p)->(%p)\n", This
, p
);
353 static HRESULT WINAPI
HTMLBodyElement_put_noWrap(IHTMLBodyElement
*iface
, VARIANT_BOOL v
)
355 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
356 FIXME("(%p)->(%x)\n", This
, v
);
360 static HRESULT WINAPI
HTMLBodyElement_get_noWrap(IHTMLBodyElement
*iface
, VARIANT_BOOL
*p
)
362 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
363 FIXME("(%p)->(%p)\n", This
, p
);
367 static HRESULT WINAPI
HTMLBodyElement_put_bgColor(IHTMLBodyElement
*iface
, VARIANT v
)
369 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
373 TRACE("(%p)->(%s)\n", This
, debugstr_variant(&v
));
375 if(!variant_to_nscolor(&v
, &strColor
))
378 nsres
= nsIDOMHTMLBodyElement_SetBgColor(This
->nsbody
, &strColor
);
379 nsAString_Finish(&strColor
);
381 ERR("SetBgColor failed: %08x\n", nsres
);
386 static HRESULT WINAPI
HTMLBodyElement_get_bgColor(IHTMLBodyElement
*iface
, VARIANT
*p
)
388 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
392 TRACE("(%p)->(%p)\n", This
, p
);
394 nsAString_Init(&nsstr
, NULL
);
395 nsres
= nsIDOMHTMLBodyElement_GetBgColor(This
->nsbody
, &nsstr
);
396 return return_nsstr_variant(nsres
, &nsstr
, NSSTR_COLOR
, p
);
399 static HRESULT WINAPI
HTMLBodyElement_put_text(IHTMLBodyElement
*iface
, VARIANT v
)
401 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
405 TRACE("(%p)->(%s)\n", This
, debugstr_variant(&v
));
407 if(!variant_to_nscolor(&v
, &text
))
410 nsres
= nsIDOMHTMLBodyElement_SetText(This
->nsbody
, &text
);
411 nsAString_Finish(&text
);
412 if(NS_FAILED(nsres
)) {
413 ERR("SetText failed: %08x\n", nsres
);
420 static HRESULT WINAPI
HTMLBodyElement_get_text(IHTMLBodyElement
*iface
, VARIANT
*p
)
422 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
427 TRACE("(%p)->(%p)\n", This
, p
);
429 nsAString_Init(&text
, NULL
);
430 nsres
= nsIDOMHTMLBodyElement_GetText(This
->nsbody
, &text
);
431 if(NS_SUCCEEDED(nsres
)) {
432 const PRUnichar
*color
;
434 nsAString_GetData(&text
, &color
);
436 hres
= nscolor_to_str(color
, &V_BSTR(p
));
438 ERR("GetText failed: %08x\n", nsres
);
442 nsAString_Finish(&text
);
447 static HRESULT WINAPI
HTMLBodyElement_put_link(IHTMLBodyElement
*iface
, VARIANT v
)
449 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
453 TRACE("(%p)->(%s)\n", This
, debugstr_variant(&v
));
455 if(!variant_to_nscolor(&v
, &link_str
))
458 nsres
= nsIDOMHTMLBodyElement_SetLink(This
->nsbody
, &link_str
);
459 nsAString_Finish(&link_str
);
461 ERR("SetLink failed: %08x\n", nsres
);
466 static HRESULT WINAPI
HTMLBodyElement_get_link(IHTMLBodyElement
*iface
, VARIANT
*p
)
468 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
472 TRACE("(%p)->(%p)\n", This
, p
);
474 nsAString_Init(&link_str
, NULL
);
475 nsres
= nsIDOMHTMLBodyElement_GetLink(This
->nsbody
, &link_str
);
476 return return_nscolor(nsres
, &link_str
, p
);
479 static HRESULT WINAPI
HTMLBodyElement_put_vLink(IHTMLBodyElement
*iface
, VARIANT v
)
481 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
485 TRACE("(%p)->(%s)\n", This
, debugstr_variant(&v
));
487 if(!variant_to_nscolor(&v
, &vlink_str
))
490 nsres
= nsIDOMHTMLBodyElement_SetVLink(This
->nsbody
, &vlink_str
);
491 nsAString_Finish(&vlink_str
);
493 ERR("SetLink failed: %08x\n", nsres
);
498 static HRESULT WINAPI
HTMLBodyElement_get_vLink(IHTMLBodyElement
*iface
, VARIANT
*p
)
500 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
504 TRACE("(%p)->(%p)\n", This
, p
);
506 nsAString_Init(&vlink_str
, NULL
);
507 nsres
= nsIDOMHTMLBodyElement_GetVLink(This
->nsbody
, &vlink_str
);
508 return return_nscolor(nsres
, &vlink_str
, p
);
511 static HRESULT WINAPI
HTMLBodyElement_put_aLink(IHTMLBodyElement
*iface
, VARIANT v
)
513 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
517 TRACE("(%p)->(%s)\n", This
, debugstr_variant(&v
));
519 if(!variant_to_nscolor(&v
, &alink_str
))
522 nsres
= nsIDOMHTMLBodyElement_SetALink(This
->nsbody
, &alink_str
);
523 nsAString_Finish(&alink_str
);
525 ERR("SetALink failed: %08x\n", nsres
);
530 static HRESULT WINAPI
HTMLBodyElement_get_aLink(IHTMLBodyElement
*iface
, VARIANT
*p
)
532 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
536 TRACE("(%p)->(%p)\n", This
, p
);
538 nsAString_Init(&alink_str
, NULL
);
539 nsres
= nsIDOMHTMLBodyElement_GetALink(This
->nsbody
, &alink_str
);
540 return return_nscolor(nsres
, &alink_str
, p
);
543 static HRESULT WINAPI
HTMLBodyElement_put_onload(IHTMLBodyElement
*iface
, VARIANT v
)
545 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
547 TRACE("(%p)->(%s)\n", This
, debugstr_variant(&v
));
549 return set_node_event(&This
->element
.node
, EVENTID_LOAD
, &v
);
552 static HRESULT WINAPI
HTMLBodyElement_get_onload(IHTMLBodyElement
*iface
, VARIANT
*p
)
554 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
556 TRACE("(%p)->(%p)\n", This
, p
);
558 return get_node_event(&This
->element
.node
, EVENTID_LOAD
, p
);
561 static HRESULT WINAPI
HTMLBodyElement_put_onunload(IHTMLBodyElement
*iface
, VARIANT v
)
563 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
564 FIXME("(%p)->(%s)\n", This
, debugstr_variant(&v
));
568 static HRESULT WINAPI
HTMLBodyElement_get_onunload(IHTMLBodyElement
*iface
, VARIANT
*p
)
570 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
571 FIXME("(%p)->(%p)\n", This
, p
);
575 static HRESULT WINAPI
HTMLBodyElement_put_scroll(IHTMLBodyElement
*iface
, BSTR v
)
577 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
578 static const WCHAR
*val
;
580 TRACE("(%p)->(%s)\n", This
, debugstr_w(v
));
582 /* Emulate with CSS visibility attribute */
583 if(!wcscmp(v
, L
"yes")) {
585 }else if(!wcscmp(v
, L
"auto")) {
587 }else if(!wcscmp(v
, L
"no")) {
590 WARN("Invalid argument %s\n", debugstr_w(v
));
594 return set_elem_style(&This
->element
, STYLEID_OVERFLOW
, val
);
597 static HRESULT WINAPI
HTMLBodyElement_get_scroll(IHTMLBodyElement
*iface
, BSTR
*p
)
599 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
600 const WCHAR
*ret
= NULL
;
604 TRACE("(%p)->(%p)\n", This
, p
);
606 /* Emulate with CSS visibility attribute */
607 hres
= get_elem_style(&This
->element
, STYLEID_OVERFLOW
, &overflow
);
611 if(!overflow
|| !*overflow
) {
614 }else if(!wcscmp(overflow
, L
"visible") || !wcscmp(overflow
, L
"auto")) {
616 }else if(!wcscmp(overflow
, L
"scroll")) {
618 }else if(!wcscmp(overflow
, L
"hidden")) {
621 TRACE("Defaulting %s to NULL\n", debugstr_w(overflow
));
626 SysFreeString(overflow
);
628 *p
= SysAllocString(ret
);
629 hres
= *p
? S_OK
: E_OUTOFMEMORY
;
635 static HRESULT WINAPI
HTMLBodyElement_put_onselect(IHTMLBodyElement
*iface
, VARIANT v
)
637 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
638 FIXME("(%p)->(%s)\n", This
, debugstr_variant(&v
));
642 static HRESULT WINAPI
HTMLBodyElement_get_onselect(IHTMLBodyElement
*iface
, VARIANT
*p
)
644 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
645 FIXME("(%p)->(%p)\n", This
, p
);
649 static HRESULT WINAPI
HTMLBodyElement_put_onbeforeunload(IHTMLBodyElement
*iface
, VARIANT v
)
651 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
652 FIXME("(%p)->(%s)\n", This
, debugstr_variant(&v
));
656 static HRESULT WINAPI
HTMLBodyElement_get_onbeforeunload(IHTMLBodyElement
*iface
, VARIANT
*p
)
658 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
659 FIXME("(%p)->(%p)\n", This
, p
);
663 static HRESULT WINAPI
HTMLBodyElement_createTextRange(IHTMLBodyElement
*iface
, IHTMLTxtRange
**range
)
665 HTMLBodyElement
*This
= impl_from_IHTMLBodyElement(iface
);
666 nsIDOMRange
*nsrange
= NULL
;
670 TRACE("(%p)->(%p)\n", This
, range
);
672 if(!This
->element
.node
.doc
->nsdoc
) {
677 nsres
= nsIDOMHTMLDocument_CreateRange(This
->element
.node
.doc
->nsdoc
, &nsrange
);
678 if(NS_SUCCEEDED(nsres
)) {
679 nsres
= nsIDOMRange_SelectNodeContents(nsrange
, This
->element
.node
.nsnode
);
681 ERR("SelectNodeContents failed: %08x\n", nsres
);
683 ERR("CreateRange failed: %08x\n", nsres
);
686 hres
= HTMLTxtRange_Create(This
->element
.node
.doc
->basedoc
.doc_node
, nsrange
, range
);
688 nsIDOMRange_Release(nsrange
);
692 static const IHTMLBodyElementVtbl HTMLBodyElementVtbl
= {
693 HTMLBodyElement_QueryInterface
,
694 HTMLBodyElement_AddRef
,
695 HTMLBodyElement_Release
,
696 HTMLBodyElement_GetTypeInfoCount
,
697 HTMLBodyElement_GetTypeInfo
,
698 HTMLBodyElement_GetIDsOfNames
,
699 HTMLBodyElement_Invoke
,
700 HTMLBodyElement_put_background
,
701 HTMLBodyElement_get_background
,
702 HTMLBodyElement_put_bgProperties
,
703 HTMLBodyElement_get_bgProperties
,
704 HTMLBodyElement_put_leftMargin
,
705 HTMLBodyElement_get_leftMargin
,
706 HTMLBodyElement_put_topMargin
,
707 HTMLBodyElement_get_topMargin
,
708 HTMLBodyElement_put_rightMargin
,
709 HTMLBodyElement_get_rightMargin
,
710 HTMLBodyElement_put_bottomMargin
,
711 HTMLBodyElement_get_bottomMargin
,
712 HTMLBodyElement_put_noWrap
,
713 HTMLBodyElement_get_noWrap
,
714 HTMLBodyElement_put_bgColor
,
715 HTMLBodyElement_get_bgColor
,
716 HTMLBodyElement_put_text
,
717 HTMLBodyElement_get_text
,
718 HTMLBodyElement_put_link
,
719 HTMLBodyElement_get_link
,
720 HTMLBodyElement_put_vLink
,
721 HTMLBodyElement_get_vLink
,
722 HTMLBodyElement_put_aLink
,
723 HTMLBodyElement_get_aLink
,
724 HTMLBodyElement_put_onload
,
725 HTMLBodyElement_get_onload
,
726 HTMLBodyElement_put_onunload
,
727 HTMLBodyElement_get_onunload
,
728 HTMLBodyElement_put_scroll
,
729 HTMLBodyElement_get_scroll
,
730 HTMLBodyElement_put_onselect
,
731 HTMLBodyElement_get_onselect
,
732 HTMLBodyElement_put_onbeforeunload
,
733 HTMLBodyElement_get_onbeforeunload
,
734 HTMLBodyElement_createTextRange
737 static inline HTMLBodyElement
*impl_from_IHTMLTextContainer(IHTMLTextContainer
*iface
)
739 return CONTAINING_RECORD(iface
, HTMLBodyElement
, IHTMLTextContainer_iface
);
742 static HRESULT WINAPI
HTMLTextContainer_QueryInterface(IHTMLTextContainer
*iface
,
743 REFIID riid
, void **ppv
)
745 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
746 return IHTMLElement_QueryInterface(&This
->element
.IHTMLElement_iface
, riid
, ppv
);
749 static ULONG WINAPI
HTMLTextContainer_AddRef(IHTMLTextContainer
*iface
)
751 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
752 return IHTMLElement_AddRef(&This
->element
.IHTMLElement_iface
);
755 static ULONG WINAPI
HTMLTextContainer_Release(IHTMLTextContainer
*iface
)
757 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
758 return IHTMLElement_Release(&This
->element
.IHTMLElement_iface
);
761 static HRESULT WINAPI
HTMLTextContainer_GetTypeInfoCount(IHTMLTextContainer
*iface
, UINT
*pctinfo
)
763 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
764 return IDispatchEx_GetTypeInfoCount(&This
->element
.node
.event_target
.dispex
.IDispatchEx_iface
, pctinfo
);
767 static HRESULT WINAPI
HTMLTextContainer_GetTypeInfo(IHTMLTextContainer
*iface
, UINT iTInfo
,
768 LCID lcid
, ITypeInfo
**ppTInfo
)
770 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
771 return IDispatchEx_GetTypeInfo(&This
->element
.node
.event_target
.dispex
.IDispatchEx_iface
, iTInfo
, lcid
,
775 static HRESULT WINAPI
HTMLTextContainer_GetIDsOfNames(IHTMLTextContainer
*iface
, REFIID riid
,
776 LPOLESTR
*rgszNames
, UINT cNames
,
777 LCID lcid
, DISPID
*rgDispId
)
779 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
780 return IDispatchEx_GetIDsOfNames(&This
->element
.node
.event_target
.dispex
.IDispatchEx_iface
, riid
, rgszNames
,
781 cNames
, lcid
, rgDispId
);
784 static HRESULT WINAPI
HTMLTextContainer_Invoke(IHTMLTextContainer
*iface
, DISPID dispIdMember
,
785 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
,
786 VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
788 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
789 return IDispatchEx_Invoke(&This
->element
.node
.event_target
.dispex
.IDispatchEx_iface
, dispIdMember
, riid
,
790 lcid
, wFlags
, pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
793 static HRESULT WINAPI
HTMLTextContainer_createControlRange(IHTMLTextContainer
*iface
,
796 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
797 FIXME("(%p)->(%p)\n", This
, range
);
801 static HRESULT WINAPI
HTMLTextContainer_get_scrollHeight(IHTMLTextContainer
*iface
, LONG
*p
)
803 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
805 TRACE("(%p)->(%p)\n", This
, p
);
807 return IHTMLElement2_get_scrollHeight(&This
->element
.IHTMLElement2_iface
, p
);
810 static HRESULT WINAPI
HTMLTextContainer_get_scrollWidth(IHTMLTextContainer
*iface
, LONG
*p
)
812 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
814 TRACE("(%p)->(%p)\n", This
, p
);
816 return IHTMLElement2_get_scrollWidth(&This
->element
.IHTMLElement2_iface
, p
);
819 static HRESULT WINAPI
HTMLTextContainer_put_scrollTop(IHTMLTextContainer
*iface
, LONG v
)
821 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
823 TRACE("(%p)->(%d)\n", This
, v
);
825 return IHTMLElement2_put_scrollTop(&This
->element
.IHTMLElement2_iface
, v
);
828 static HRESULT WINAPI
HTMLTextContainer_get_scrollTop(IHTMLTextContainer
*iface
, LONG
*p
)
830 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
832 TRACE("(%p)->(%p)\n", This
, p
);
834 return IHTMLElement2_get_scrollTop(&This
->element
.IHTMLElement2_iface
, p
);
837 static HRESULT WINAPI
HTMLTextContainer_put_scrollLeft(IHTMLTextContainer
*iface
, LONG v
)
839 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
841 TRACE("(%p)->(%d)\n", This
, v
);
843 return IHTMLElement2_put_scrollLeft(&This
->element
.IHTMLElement2_iface
, v
);
846 static HRESULT WINAPI
HTMLTextContainer_get_scrollLeft(IHTMLTextContainer
*iface
, LONG
*p
)
848 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
850 TRACE("(%p)->(%p)\n", This
, p
);
852 return IHTMLElement2_get_scrollLeft(&This
->element
.IHTMLElement2_iface
, p
);
855 static HRESULT WINAPI
HTMLTextContainer_put_onscroll(IHTMLTextContainer
*iface
, VARIANT v
)
857 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
858 FIXME("(%p)->()\n", This
);
862 static HRESULT WINAPI
HTMLTextContainer_get_onscroll(IHTMLTextContainer
*iface
, VARIANT
*p
)
864 HTMLBodyElement
*This
= impl_from_IHTMLTextContainer(iface
);
865 FIXME("(%p)->(%p)\n", This
, p
);
869 static const IHTMLTextContainerVtbl HTMLTextContainerVtbl
= {
870 HTMLTextContainer_QueryInterface
,
871 HTMLTextContainer_AddRef
,
872 HTMLTextContainer_Release
,
873 HTMLTextContainer_GetTypeInfoCount
,
874 HTMLTextContainer_GetTypeInfo
,
875 HTMLTextContainer_GetIDsOfNames
,
876 HTMLTextContainer_Invoke
,
877 HTMLTextContainer_createControlRange
,
878 HTMLTextContainer_get_scrollHeight
,
879 HTMLTextContainer_get_scrollWidth
,
880 HTMLTextContainer_put_scrollTop
,
881 HTMLTextContainer_get_scrollTop
,
882 HTMLTextContainer_put_scrollLeft
,
883 HTMLTextContainer_get_scrollLeft
,
884 HTMLTextContainer_put_onscroll
,
885 HTMLTextContainer_get_onscroll
888 static inline HTMLBodyElement
*impl_from_HTMLDOMNode(HTMLDOMNode
*iface
)
890 return CONTAINING_RECORD(iface
, HTMLBodyElement
, element
.node
);
893 static HRESULT
HTMLBodyElement_QI(HTMLDOMNode
*iface
, REFIID riid
, void **ppv
)
895 HTMLBodyElement
*This
= impl_from_HTMLDOMNode(iface
);
899 if(IsEqualGUID(&IID_IUnknown
, riid
)) {
900 TRACE("(%p)->(IID_IUnknown %p)\n", This
, ppv
);
901 *ppv
= &This
->IHTMLBodyElement_iface
;
902 }else if(IsEqualGUID(&IID_IDispatch
, riid
)) {
903 TRACE("(%p)->(IID_IDispatch %p)\n", This
, ppv
);
904 *ppv
= &This
->IHTMLBodyElement_iface
;
905 }else if(IsEqualGUID(&IID_IHTMLBodyElement
, riid
)) {
906 TRACE("(%p)->(IID_IHTMLBodyElement %p)\n", This
, ppv
);
907 *ppv
= &This
->IHTMLBodyElement_iface
;
908 }else if(IsEqualGUID(&IID_IHTMLTextContainer
, riid
)) {
909 TRACE("(%p)->(IID_IHTMLTextContainer %p)\n", This
, ppv
);
910 *ppv
= &This
->IHTMLTextContainer_iface
;
914 IUnknown_AddRef((IUnknown
*)*ppv
);
918 return HTMLElement_QI(&This
->element
.node
, riid
, ppv
);
921 static void HTMLBodyElement_traverse(HTMLDOMNode
*iface
, nsCycleCollectionTraversalCallback
*cb
)
923 HTMLBodyElement
*This
= impl_from_HTMLDOMNode(iface
);
926 note_cc_edge((nsISupports
*)This
->nsbody
, "This->nsbody", cb
);
929 static void HTMLBodyElement_unlink(HTMLDOMNode
*iface
)
931 HTMLBodyElement
*This
= impl_from_HTMLDOMNode(iface
);
934 nsIDOMHTMLBodyElement
*nsbody
= This
->nsbody
;
936 nsIDOMHTMLBodyElement_Release(nsbody
);
940 static EventTarget
*HTMLBodyElement_get_event_prop_target(HTMLDOMNode
*iface
, int event_id
)
942 HTMLBodyElement
*This
= impl_from_HTMLDOMNode(iface
);
950 return This
->element
.node
.doc
&& This
->element
.node
.doc
->window
951 ? &This
->element
.node
.doc
->window
->event_target
952 : &This
->element
.node
.event_target
;
954 return &This
->element
.node
.event_target
;
958 static BOOL
HTMLBodyElement_is_text_edit(HTMLDOMNode
*iface
)
963 static BOOL
HTMLBodyElement_is_settable(HTMLDOMNode
*iface
, DISPID dispid
)
966 case DISPID_IHTMLELEMENT_OUTERTEXT
:
973 static const cpc_entry_t HTMLBodyElement_cpc
[] = {
974 {&DIID_HTMLTextContainerEvents
},
975 {&IID_IPropertyNotifySink
},
980 static const NodeImplVtbl HTMLBodyElementImplVtbl
= {
983 HTMLElement_destructor
,
986 HTMLElement_handle_event
,
987 HTMLElement_get_attr_col
,
988 HTMLBodyElement_get_event_prop_target
,
996 HTMLBodyElement_traverse
,
997 HTMLBodyElement_unlink
,
998 HTMLBodyElement_is_text_edit
,
999 HTMLBodyElement_is_settable
1002 static const tid_t HTMLBodyElement_iface_tids
[] = {
1003 IHTMLBodyElement_tid
,
1004 IHTMLBodyElement2_tid
,
1006 IHTMLTextContainer_tid
,
1010 static dispex_static_data_t HTMLBodyElement_dispex
= {
1014 HTMLBodyElement_iface_tids
,
1015 HTMLElement_init_dispex_info
1018 HRESULT
HTMLBodyElement_Create(HTMLDocumentNode
*doc
, nsIDOMElement
*nselem
, HTMLElement
**elem
)
1020 HTMLBodyElement
*ret
;
1023 ret
= heap_alloc_zero(sizeof(HTMLBodyElement
));
1025 return E_OUTOFMEMORY
;
1027 ret
->IHTMLBodyElement_iface
.lpVtbl
= &HTMLBodyElementVtbl
;
1028 ret
->IHTMLTextContainer_iface
.lpVtbl
= &HTMLTextContainerVtbl
;
1029 ret
->element
.node
.vtbl
= &HTMLBodyElementImplVtbl
;
1031 HTMLElement_Init(&ret
->element
, doc
, nselem
, &HTMLBodyElement_dispex
);
1033 nsres
= nsIDOMElement_QueryInterface(nselem
, &IID_nsIDOMHTMLBodyElement
, (void**)&ret
->nsbody
);
1034 assert(nsres
== NS_OK
);
1036 *elem
= &ret
->element
;