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
29 #include "wine/debug.h"
31 #include "mshtml_private.h"
33 WINE_DEFAULT_DEBUG_CHANNEL(mshtml
);
36 HTMLTextContainer textcont
;
38 const IHTMLBodyElementVtbl
*lpHTMLBodyElementVtbl
;
40 ConnectionPoint cp_propnotif
;
42 nsIDOMHTMLBodyElement
*nsbody
;
45 #define HTMLBODY(x) ((IHTMLBodyElement*) &(x)->lpHTMLBodyElementVtbl)
47 static BOOL
variant_to_nscolor(const VARIANT
*v
, nsAString
*nsstr
)
51 nsAString_Init(nsstr
, V_BSTR(v
));
56 static const WCHAR formatW
[] = {'#','%','x',0};
58 wsprintfW(buf
, formatW
, V_I4(v
));
59 nsAString_Init(nsstr
, buf
);
64 FIXME("invalid vt=%d\n", V_VT(v
));
71 static void nscolor_to_variant(const nsAString
*nsstr
, VARIANT
*p
)
73 const PRUnichar
*color
;
75 nsAString_GetData(nsstr
, &color
);
79 V_I4(p
) = strtolW(color
+1, NULL
, 16);
82 V_BSTR(p
) = SysAllocString(color
);
86 #define HTMLBODY_THIS(iface) DEFINE_THIS(HTMLBodyElement, HTMLBodyElement, iface)
88 static HRESULT WINAPI
HTMLBodyElement_QueryInterface(IHTMLBodyElement
*iface
,
89 REFIID riid
, void **ppv
)
91 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
93 return IHTMLDOMNode_QueryInterface(HTMLDOMNODE(&This
->textcont
.element
.node
), riid
, ppv
);
96 static ULONG WINAPI
HTMLBodyElement_AddRef(IHTMLBodyElement
*iface
)
98 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
100 return IHTMLDOMNode_AddRef(HTMLDOMNODE(&This
->textcont
.element
.node
));
103 static ULONG WINAPI
HTMLBodyElement_Release(IHTMLBodyElement
*iface
)
105 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
107 return IHTMLDOMNode_Release(HTMLDOMNODE(&This
->textcont
.element
.node
));
110 static HRESULT WINAPI
HTMLBodyElement_GetTypeInfoCount(IHTMLBodyElement
*iface
, UINT
*pctinfo
)
112 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
113 return IDispatchEx_GetTypeInfoCount(DISPATCHEX(&This
->textcont
.element
.node
.dispex
), pctinfo
);
116 static HRESULT WINAPI
HTMLBodyElement_GetTypeInfo(IHTMLBodyElement
*iface
, UINT iTInfo
,
117 LCID lcid
, ITypeInfo
**ppTInfo
)
119 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
120 return IDispatchEx_GetTypeInfo(DISPATCHEX(&This
->textcont
.element
.node
.dispex
), iTInfo
, lcid
, ppTInfo
);
123 static HRESULT WINAPI
HTMLBodyElement_GetIDsOfNames(IHTMLBodyElement
*iface
, REFIID riid
,
124 LPOLESTR
*rgszNames
, UINT cNames
,
125 LCID lcid
, DISPID
*rgDispId
)
127 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
128 return IDispatchEx_GetIDsOfNames(DISPATCHEX(&This
->textcont
.element
.node
.dispex
), riid
, rgszNames
, cNames
, lcid
, rgDispId
);
131 static HRESULT WINAPI
HTMLBodyElement_Invoke(IHTMLBodyElement
*iface
, DISPID dispIdMember
,
132 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
,
133 VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
135 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
136 return IDispatchEx_Invoke(DISPATCHEX(&This
->textcont
.element
.node
.dispex
), dispIdMember
, riid
, lcid
,
137 wFlags
, pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
140 static HRESULT WINAPI
HTMLBodyElement_put_background(IHTMLBodyElement
*iface
, BSTR v
)
142 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
143 FIXME("(%p)->(%s)\n", This
, debugstr_w(v
));
147 static HRESULT WINAPI
HTMLBodyElement_get_background(IHTMLBodyElement
*iface
, BSTR
*p
)
149 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
150 nsAString background_str
;
153 TRACE("(%p)->(%p)\n", This
, p
);
155 nsAString_Init(&background_str
, NULL
);
157 nsres
= nsIDOMHTMLBodyElement_GetBackground(This
->nsbody
, &background_str
);
158 if(NS_SUCCEEDED(nsres
)) {
159 const PRUnichar
*background
;
160 nsAString_GetData(&background_str
, &background
);
161 *p
= *background
? SysAllocString(background
) : NULL
;
163 ERR("GetBackground failed: %08x\n", nsres
);
167 nsAString_Finish(&background_str
);
169 TRACE("*p = %s\n", debugstr_w(*p
));
173 static HRESULT WINAPI
HTMLBodyElement_put_bgProperties(IHTMLBodyElement
*iface
, BSTR v
)
175 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
176 FIXME("(%p)->(%s)\n", This
, debugstr_w(v
));
180 static HRESULT WINAPI
HTMLBodyElement_get_bgProperties(IHTMLBodyElement
*iface
, BSTR
*p
)
182 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
183 FIXME("(%p)->(%p)\n", This
, p
);
187 static HRESULT WINAPI
HTMLBodyElement_put_leftMargin(IHTMLBodyElement
*iface
, VARIANT v
)
189 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
190 FIXME("(%p)->()\n", This
);
194 static HRESULT WINAPI
HTMLBodyElement_get_leftMargin(IHTMLBodyElement
*iface
, VARIANT
*p
)
196 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
197 FIXME("(%p)->(%p)\n", This
, p
);
201 static HRESULT WINAPI
HTMLBodyElement_put_topMargin(IHTMLBodyElement
*iface
, VARIANT v
)
203 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
204 FIXME("(%p)->()\n", This
);
208 static HRESULT WINAPI
HTMLBodyElement_get_topMargin(IHTMLBodyElement
*iface
, VARIANT
*p
)
210 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
211 FIXME("(%p)->(%p)\n", This
, p
);
215 static HRESULT WINAPI
HTMLBodyElement_put_rightMargin(IHTMLBodyElement
*iface
, VARIANT v
)
217 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
218 FIXME("(%p)->()\n", This
);
222 static HRESULT WINAPI
HTMLBodyElement_get_rightMargin(IHTMLBodyElement
*iface
, VARIANT
*p
)
224 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
225 FIXME("(%p)->(%p)\n", This
, p
);
229 static HRESULT WINAPI
HTMLBodyElement_put_bottomMargin(IHTMLBodyElement
*iface
, VARIANT v
)
231 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
232 FIXME("(%p)->()\n", This
);
236 static HRESULT WINAPI
HTMLBodyElement_get_bottomMargin(IHTMLBodyElement
*iface
, VARIANT
*p
)
238 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
239 FIXME("(%p)->(%p)\n", This
, p
);
243 static HRESULT WINAPI
HTMLBodyElement_put_noWrap(IHTMLBodyElement
*iface
, VARIANT_BOOL v
)
245 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
246 FIXME("(%p)->(%x)\n", This
, v
);
250 static HRESULT WINAPI
HTMLBodyElement_get_noWrap(IHTMLBodyElement
*iface
, VARIANT_BOOL
*p
)
252 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
253 FIXME("(%p)->(%p)\n", This
, p
);
257 static HRESULT WINAPI
HTMLBodyElement_put_bgColor(IHTMLBodyElement
*iface
, VARIANT v
)
259 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
260 FIXME("(%p)->()\n", This
);
264 static HRESULT WINAPI
HTMLBodyElement_get_bgColor(IHTMLBodyElement
*iface
, VARIANT
*p
)
266 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
267 FIXME("(%p)->(%p)\n", This
, p
);
271 static HRESULT WINAPI
HTMLBodyElement_put_text(IHTMLBodyElement
*iface
, VARIANT v
)
273 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
274 FIXME("(%p)->()\n", This
);
278 static HRESULT WINAPI
HTMLBodyElement_get_text(IHTMLBodyElement
*iface
, VARIANT
*p
)
280 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
281 FIXME("(%p)->(%p)\n", This
, p
);
285 static HRESULT WINAPI
HTMLBodyElement_put_link(IHTMLBodyElement
*iface
, VARIANT v
)
287 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
291 TRACE("(%p)->(v%d)\n", This
, V_VT(&v
));
293 if(!variant_to_nscolor(&v
, &link_str
))
296 nsres
= nsIDOMHTMLBodyElement_SetLink(This
->nsbody
, &link_str
);
297 nsAString_Finish(&link_str
);
299 ERR("SetLink failed: %08x\n", nsres
);
304 static HRESULT WINAPI
HTMLBodyElement_get_link(IHTMLBodyElement
*iface
, VARIANT
*p
)
306 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
310 TRACE("(%p)->(%p)\n", This
, p
);
312 nsAString_Init(&link_str
, NULL
);
313 nsres
= nsIDOMHTMLBodyElement_GetLink(This
->nsbody
, &link_str
);
315 ERR("GetLink failed: %08x\n", nsres
);
317 nscolor_to_variant(&link_str
, p
);
318 nsAString_Finish(&link_str
);
323 static HRESULT WINAPI
HTMLBodyElement_put_vLink(IHTMLBodyElement
*iface
, VARIANT v
)
325 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
329 TRACE("(%p)->(v%d)\n", This
, V_VT(&v
));
331 if(!variant_to_nscolor(&v
, &vlink_str
))
334 nsres
= nsIDOMHTMLBodyElement_SetVLink(This
->nsbody
, &vlink_str
);
335 nsAString_Finish(&vlink_str
);
337 ERR("SetLink failed: %08x\n", nsres
);
342 static HRESULT WINAPI
HTMLBodyElement_get_vLink(IHTMLBodyElement
*iface
, VARIANT
*p
)
344 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
348 TRACE("(%p)->(%p)\n", This
, p
);
350 nsAString_Init(&vlink_str
, NULL
);
351 nsres
= nsIDOMHTMLBodyElement_GetVLink(This
->nsbody
, &vlink_str
);
353 ERR("GetLink failed: %08x\n", nsres
);
355 nscolor_to_variant(&vlink_str
, p
);
356 nsAString_Finish(&vlink_str
);
361 static HRESULT WINAPI
HTMLBodyElement_put_aLink(IHTMLBodyElement
*iface
, VARIANT v
)
363 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
367 TRACE("(%p)->(v%d)\n", This
, V_VT(&v
));
369 if(!variant_to_nscolor(&v
, &alink_str
))
372 nsres
= nsIDOMHTMLBodyElement_SetALink(This
->nsbody
, &alink_str
);
373 nsAString_Finish(&alink_str
);
375 ERR("SetALink failed: %08x\n", nsres
);
380 static HRESULT WINAPI
HTMLBodyElement_get_aLink(IHTMLBodyElement
*iface
, VARIANT
*p
)
382 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
386 TRACE("(%p)->(%p)\n", This
, p
);
388 nsAString_Init(&alink_str
, NULL
);
389 nsres
= nsIDOMHTMLBodyElement_GetALink(This
->nsbody
, &alink_str
);
391 ERR("GetALink failed: %08x\n", nsres
);
393 nscolor_to_variant(&alink_str
, p
);
394 nsAString_Finish(&alink_str
);
399 static HRESULT WINAPI
HTMLBodyElement_put_onload(IHTMLBodyElement
*iface
, VARIANT v
)
401 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
402 FIXME("(%p)->()\n", This
);
406 static HRESULT WINAPI
HTMLBodyElement_get_onload(IHTMLBodyElement
*iface
, VARIANT
*p
)
408 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
409 FIXME("(%p)->(%p)\n", This
, p
);
413 static HRESULT WINAPI
HTMLBodyElement_put_onunload(IHTMLBodyElement
*iface
, VARIANT v
)
415 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
416 FIXME("(%p)->()\n", This
);
420 static HRESULT WINAPI
HTMLBodyElement_get_onunload(IHTMLBodyElement
*iface
, VARIANT
*p
)
422 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
423 FIXME("(%p)->(%p)\n", This
, p
);
427 static HRESULT WINAPI
HTMLBodyElement_put_scroll(IHTMLBodyElement
*iface
, BSTR v
)
429 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
430 FIXME("(%p)->(%s)\n", This
, debugstr_w(v
));
434 static HRESULT WINAPI
HTMLBodyElement_get_scroll(IHTMLBodyElement
*iface
, BSTR
*p
)
436 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
437 FIXME("(%p)->(%p)\n", This
, p
);
441 static HRESULT WINAPI
HTMLBodyElement_put_onselect(IHTMLBodyElement
*iface
, VARIANT v
)
443 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
444 FIXME("(%p)->()\n", This
);
448 static HRESULT WINAPI
HTMLBodyElement_get_onselect(IHTMLBodyElement
*iface
, VARIANT
*p
)
450 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
451 FIXME("(%p)->(%p)\n", This
, p
);
455 static HRESULT WINAPI
HTMLBodyElement_put_onbeforeunload(IHTMLBodyElement
*iface
, VARIANT v
)
457 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
458 FIXME("(%p)->()\n", This
);
462 static HRESULT WINAPI
HTMLBodyElement_get_onbeforeunload(IHTMLBodyElement
*iface
, VARIANT
*p
)
464 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
465 FIXME("(%p)->(%p)\n", This
, p
);
469 static HRESULT WINAPI
HTMLBodyElement_createTextRange(IHTMLBodyElement
*iface
, IHTMLTxtRange
**range
)
471 HTMLBodyElement
*This
= HTMLBODY_THIS(iface
);
472 nsIDOMRange
*nsrange
= NULL
;
474 TRACE("(%p)->(%p)\n", This
, range
);
476 if(This
->textcont
.element
.node
.doc
->nscontainer
) {
477 nsIDOMDocument
*nsdoc
;
478 nsIDOMDocumentRange
*nsdocrange
;
481 nsIWebNavigation_GetDocument(This
->textcont
.element
.node
.doc
->nscontainer
->navigation
, &nsdoc
);
482 nsIDOMDocument_QueryInterface(nsdoc
, &IID_nsIDOMDocumentRange
, (void**)&nsdocrange
);
483 nsIDOMDocument_Release(nsdoc
);
485 nsres
= nsIDOMDocumentRange_CreateRange(nsdocrange
, &nsrange
);
486 if(NS_SUCCEEDED(nsres
)) {
487 nsres
= nsIDOMRange_SelectNodeContents(nsrange
, This
->textcont
.element
.node
.nsnode
);
489 ERR("SelectNodeContents failed: %08x\n", nsres
);
491 ERR("CreateRange failed: %08x\n", nsres
);
494 nsIDOMDocumentRange_Release(nsdocrange
);
497 *range
= HTMLTxtRange_Create(This
->textcont
.element
.node
.doc
, nsrange
);
503 static const IHTMLBodyElementVtbl HTMLBodyElementVtbl
= {
504 HTMLBodyElement_QueryInterface
,
505 HTMLBodyElement_AddRef
,
506 HTMLBodyElement_Release
,
507 HTMLBodyElement_GetTypeInfoCount
,
508 HTMLBodyElement_GetTypeInfo
,
509 HTMLBodyElement_GetIDsOfNames
,
510 HTMLBodyElement_Invoke
,
511 HTMLBodyElement_put_background
,
512 HTMLBodyElement_get_background
,
513 HTMLBodyElement_put_bgProperties
,
514 HTMLBodyElement_get_bgProperties
,
515 HTMLBodyElement_put_leftMargin
,
516 HTMLBodyElement_get_leftMargin
,
517 HTMLBodyElement_put_topMargin
,
518 HTMLBodyElement_get_topMargin
,
519 HTMLBodyElement_put_rightMargin
,
520 HTMLBodyElement_get_rightMargin
,
521 HTMLBodyElement_put_bottomMargin
,
522 HTMLBodyElement_get_bottomMargin
,
523 HTMLBodyElement_put_noWrap
,
524 HTMLBodyElement_get_noWrap
,
525 HTMLBodyElement_put_bgColor
,
526 HTMLBodyElement_get_bgColor
,
527 HTMLBodyElement_put_text
,
528 HTMLBodyElement_get_text
,
529 HTMLBodyElement_put_link
,
530 HTMLBodyElement_get_link
,
531 HTMLBodyElement_put_vLink
,
532 HTMLBodyElement_get_vLink
,
533 HTMLBodyElement_put_aLink
,
534 HTMLBodyElement_get_aLink
,
535 HTMLBodyElement_put_onload
,
536 HTMLBodyElement_get_onload
,
537 HTMLBodyElement_put_onunload
,
538 HTMLBodyElement_get_onunload
,
539 HTMLBodyElement_put_scroll
,
540 HTMLBodyElement_get_scroll
,
541 HTMLBodyElement_put_onselect
,
542 HTMLBodyElement_get_onselect
,
543 HTMLBodyElement_put_onbeforeunload
,
544 HTMLBodyElement_get_onbeforeunload
,
545 HTMLBodyElement_createTextRange
548 #define HTMLBODY_NODE_THIS(iface) DEFINE_THIS2(HTMLBodyElement, textcont.element.node, iface)
550 static HRESULT
HTMLBodyElement_QI(HTMLDOMNode
*iface
, REFIID riid
, void **ppv
)
552 HTMLBodyElement
*This
= HTMLBODY_NODE_THIS(iface
);
556 if(IsEqualGUID(&IID_IUnknown
, riid
)) {
557 TRACE("(%p)->(IID_IUnknown %p)\n", This
, ppv
);
558 *ppv
= HTMLBODY(This
);
559 }else if(IsEqualGUID(&IID_IDispatch
, riid
)) {
560 TRACE("(%p)->(IID_IDispatch %p)\n", This
, ppv
);
561 *ppv
= HTMLBODY(This
);
562 }else if(IsEqualGUID(&IID_IHTMLBodyElement
, riid
)) {
563 TRACE("(%p)->(IID_IHTMLBodyElement %p)\n", This
, ppv
);
564 *ppv
= HTMLBODY(This
);
565 }else if(IsEqualGUID(&IID_IHTMLTextContainer
, riid
)) {
566 TRACE("(%p)->(IID_IHTMLTextContainer %p)\n", &This
->textcont
, ppv
);
567 *ppv
= HTMLTEXTCONT(&This
->textcont
);
571 IUnknown_AddRef((IUnknown
*)*ppv
);
575 return HTMLElement_QI(&This
->textcont
.element
.node
, riid
, ppv
);
578 static void HTMLBodyElement_destructor(HTMLDOMNode
*iface
)
580 HTMLBodyElement
*This
= HTMLBODY_NODE_THIS(iface
);
582 nsIDOMHTMLBodyElement_Release(This
->nsbody
);
584 HTMLElement_destructor(&This
->textcont
.element
.node
);
587 #undef HTMLBODY_NODE_THIS
589 static const NodeImplVtbl HTMLBodyElementImplVtbl
= {
591 HTMLBodyElement_destructor
594 HTMLElement
*HTMLBodyElement_Create(nsIDOMHTMLElement
*nselem
)
596 HTMLBodyElement
*ret
= heap_alloc_zero(sizeof(HTMLBodyElement
));
599 TRACE("(%p)->(%p)\n", ret
, nselem
);
601 HTMLTextContainer_Init(&ret
->textcont
);
603 ret
->lpHTMLBodyElementVtbl
= &HTMLBodyElementVtbl
;
604 ret
->textcont
.element
.node
.vtbl
= &HTMLBodyElementImplVtbl
;
606 ConnectionPoint_Init(&ret
->cp_propnotif
, &ret
->textcont
.element
.cp_container
, &IID_IPropertyNotifySink
);
608 nsres
= nsIDOMHTMLElement_QueryInterface(nselem
, &IID_nsIDOMHTMLBodyElement
,
609 (void**)&ret
->nsbody
);
611 ERR("Could not get nsDOMHTMLBodyElement: %08x\n", nsres
);
613 return &ret
->textcont
.element
;