2 * Copyright 2008 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 "mshtml_private.h"
30 #include "wine/debug.h"
32 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
34 static const WCHAR autoW[] = {'a','u','t','o',0};
35 static const WCHAR yesW[] = {'y','e','s',0};
36 static const WCHAR noW[] = {'n','o',0};
38 HRESULT set_frame_doc(HTMLFrameBase *frame, nsIDOMDocument *nsdoc)
40 nsIDOMWindow *nswindow;
44 if(frame->content_window)
47 nswindow = get_nsdoc_window(nsdoc);
51 window = nswindow_to_window(nswindow);
53 hres = HTMLWindow_Create(frame->element.node.doc->basedoc.doc_obj, nswindow,
54 frame->element.node.doc->basedoc.window, &window);
55 nsIDOMWindow_Release(nswindow);
59 frame->content_window = window;
60 window->frame_element = frame;
64 #define HTMLFRAMEBASE_THIS(iface) DEFINE_THIS(HTMLFrameBase, IHTMLFrameBase, iface)
66 static HRESULT WINAPI HTMLFrameBase_QueryInterface(IHTMLFrameBase *iface, REFIID riid, void **ppv)
68 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
70 return IHTMLDOMNode_QueryInterface(&This->element.node.IHTMLDOMNode_iface, riid, ppv);
73 static ULONG WINAPI HTMLFrameBase_AddRef(IHTMLFrameBase *iface)
75 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
77 return IHTMLDOMNode_AddRef(&This->element.node.IHTMLDOMNode_iface);
80 static ULONG WINAPI HTMLFrameBase_Release(IHTMLFrameBase *iface)
82 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
84 return IHTMLDOMNode_Release(&This->element.node.IHTMLDOMNode_iface);
87 static HRESULT WINAPI HTMLFrameBase_GetTypeInfoCount(IHTMLFrameBase *iface, UINT *pctinfo)
89 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
91 return IDispatchEx_GetTypeInfoCount(&This->element.node.dispex.IDispatchEx_iface, pctinfo);
94 static HRESULT WINAPI HTMLFrameBase_GetTypeInfo(IHTMLFrameBase *iface, UINT iTInfo,
95 LCID lcid, ITypeInfo **ppTInfo)
97 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
99 return IDispatchEx_GetTypeInfo(&This->element.node.dispex.IDispatchEx_iface, iTInfo, lcid,
103 static HRESULT WINAPI HTMLFrameBase_GetIDsOfNames(IHTMLFrameBase *iface, REFIID riid,
104 LPOLESTR *rgszNames, UINT cNames, LCID lcid, DISPID *rgDispId)
106 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
108 return IDispatchEx_GetIDsOfNames(&This->element.node.dispex.IDispatchEx_iface, riid, rgszNames,
109 cNames, lcid, rgDispId);
112 static HRESULT WINAPI HTMLFrameBase_Invoke(IHTMLFrameBase *iface, DISPID dispIdMember,
113 REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
114 VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
116 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
118 return IDispatchEx_Invoke(&This->element.node.dispex.IDispatchEx_iface, dispIdMember, riid,
119 lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
122 static HRESULT WINAPI HTMLFrameBase_put_src(IHTMLFrameBase *iface, BSTR v)
124 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
126 TRACE("(%p)->(%s)\n", This, debugstr_w(v));
128 if(!This->content_window || !This->element.node.doc || !This->element.node.doc->basedoc.window) {
129 FIXME("detached element\n");
133 return navigate_url(This->content_window, v, This->element.node.doc->basedoc.window->url);
136 static HRESULT WINAPI HTMLFrameBase_get_src(IHTMLFrameBase *iface, BSTR *p)
138 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
139 FIXME("(%p)->(%p)\n", This, p);
143 static HRESULT WINAPI HTMLFrameBase_put_name(IHTMLFrameBase *iface, BSTR v)
145 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
146 FIXME("(%p)->(%s)\n", This, debugstr_w(v));
150 static HRESULT WINAPI HTMLFrameBase_get_name(IHTMLFrameBase *iface, BSTR *p)
152 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
154 const PRUnichar *strdata;
157 TRACE("(%p)->(%p)\n", This, p);
160 nsAString_Init(&nsstr, NULL);
161 nsres = nsIDOMHTMLFrameElement_GetName(This->nsframe, &nsstr);
162 }else if(This->nsiframe) {
163 nsAString_Init(&nsstr, NULL);
164 nsres = nsIDOMHTMLIFrameElement_GetName(This->nsiframe, &nsstr);
166 ERR("No attached ns frame object\n");
170 if(NS_FAILED(nsres)) {
171 ERR("GetName failed: 0x%08x\n", nsres);
172 nsAString_Finish(&nsstr);
176 nsAString_GetData(&nsstr, &strdata);
178 *p = SysAllocString(strdata);
180 nsAString_Finish(&nsstr);
181 return E_OUTOFMEMORY;
186 nsAString_Finish(&nsstr);
191 static HRESULT WINAPI HTMLFrameBase_put_border(IHTMLFrameBase *iface, VARIANT v)
193 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
194 FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
198 static HRESULT WINAPI HTMLFrameBase_get_border(IHTMLFrameBase *iface, VARIANT *p)
200 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
201 FIXME("(%p)->(%p)\n", This, p);
205 static HRESULT WINAPI HTMLFrameBase_put_frameBorder(IHTMLFrameBase *iface, BSTR v)
207 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
208 FIXME("(%p)->(%s)\n", This, debugstr_w(v));
212 static HRESULT WINAPI HTMLFrameBase_get_frameBorder(IHTMLFrameBase *iface, BSTR *p)
214 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
215 FIXME("(%p)->(%p)\n", This, p);
219 static HRESULT WINAPI HTMLFrameBase_put_frameSpacing(IHTMLFrameBase *iface, VARIANT v)
221 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
222 FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
226 static HRESULT WINAPI HTMLFrameBase_get_frameSpacing(IHTMLFrameBase *iface, VARIANT *p)
228 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
229 FIXME("(%p)->(%p)\n", This, p);
233 static HRESULT WINAPI HTMLFrameBase_put_marginWidth(IHTMLFrameBase *iface, VARIANT v)
235 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
236 FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
240 static HRESULT WINAPI HTMLFrameBase_get_marginWidth(IHTMLFrameBase *iface, VARIANT *p)
242 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
243 FIXME("(%p)->(%p)\n", This, p);
247 static HRESULT WINAPI HTMLFrameBase_put_marginHeight(IHTMLFrameBase *iface, VARIANT v)
249 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
250 FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
254 static HRESULT WINAPI HTMLFrameBase_get_marginHeight(IHTMLFrameBase *iface, VARIANT *p)
256 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
257 FIXME("(%p)->(%p)\n", This, p);
261 static HRESULT WINAPI HTMLFrameBase_put_noResize(IHTMLFrameBase *iface, VARIANT_BOOL v)
263 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
264 FIXME("(%p)->(%x)\n", This, v);
268 static HRESULT WINAPI HTMLFrameBase_get_noResize(IHTMLFrameBase *iface, VARIANT_BOOL *p)
270 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
271 FIXME("(%p)->(%p)\n", This, p);
275 static HRESULT WINAPI HTMLFrameBase_put_scrolling(IHTMLFrameBase *iface, BSTR v)
277 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
281 TRACE("(%p)->(%s)\n", This, debugstr_w(v));
283 if(!(!strcmpiW(v, yesW) || !strcmpiW(v, noW) || !strcmpiW(v, autoW)))
287 nsAString_InitDepend(&nsstr, v);
288 nsres = nsIDOMHTMLFrameElement_SetScrolling(This->nsframe, &nsstr);
289 }else if(This->nsiframe) {
290 nsAString_InitDepend(&nsstr, v);
291 nsres = nsIDOMHTMLIFrameElement_SetScrolling(This->nsiframe, &nsstr);
293 ERR("No attached ns frame object\n");
296 nsAString_Finish(&nsstr);
298 if(NS_FAILED(nsres)) {
299 ERR("SetScrolling failed: 0x%08x\n", nsres);
306 static HRESULT WINAPI HTMLFrameBase_get_scrolling(IHTMLFrameBase *iface, BSTR *p)
308 HTMLFrameBase *This = HTMLFRAMEBASE_THIS(iface);
310 const PRUnichar *strdata;
313 TRACE("(%p)->(%p)\n", This, p);
316 nsAString_Init(&nsstr, NULL);
317 nsres = nsIDOMHTMLFrameElement_GetScrolling(This->nsframe, &nsstr);
318 }else if(This->nsiframe) {
319 nsAString_Init(&nsstr, NULL);
320 nsres = nsIDOMHTMLIFrameElement_GetScrolling(This->nsiframe, &nsstr);
322 ERR("No attached ns frame object\n");
326 if(NS_FAILED(nsres)) {
327 ERR("GetScrolling failed: 0x%08x\n", nsres);
328 nsAString_Finish(&nsstr);
332 nsAString_GetData(&nsstr, &strdata);
335 *p = SysAllocString(strdata);
337 *p = SysAllocString(autoW);
339 nsAString_Finish(&nsstr);
341 return *p ? S_OK : E_OUTOFMEMORY;
344 static const IHTMLFrameBaseVtbl HTMLFrameBaseVtbl = {
345 HTMLFrameBase_QueryInterface,
346 HTMLFrameBase_AddRef,
347 HTMLFrameBase_Release,
348 HTMLFrameBase_GetTypeInfoCount,
349 HTMLFrameBase_GetTypeInfo,
350 HTMLFrameBase_GetIDsOfNames,
351 HTMLFrameBase_Invoke,
352 HTMLFrameBase_put_src,
353 HTMLFrameBase_get_src,
354 HTMLFrameBase_put_name,
355 HTMLFrameBase_get_name,
356 HTMLFrameBase_put_border,
357 HTMLFrameBase_get_border,
358 HTMLFrameBase_put_frameBorder,
359 HTMLFrameBase_get_frameBorder,
360 HTMLFrameBase_put_frameSpacing,
361 HTMLFrameBase_get_frameSpacing,
362 HTMLFrameBase_put_marginWidth,
363 HTMLFrameBase_get_marginWidth,
364 HTMLFrameBase_put_marginHeight,
365 HTMLFrameBase_get_marginHeight,
366 HTMLFrameBase_put_noResize,
367 HTMLFrameBase_get_noResize,
368 HTMLFrameBase_put_scrolling,
369 HTMLFrameBase_get_scrolling
372 #define HTMLFRAMEBASE2_THIS(iface) DEFINE_THIS(HTMLFrameBase, IHTMLFrameBase2, iface)
374 static HRESULT WINAPI HTMLFrameBase2_QueryInterface(IHTMLFrameBase2 *iface, REFIID riid, void **ppv)
376 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
378 return IHTMLDOMNode_QueryInterface(&This->element.node.IHTMLDOMNode_iface, riid, ppv);
381 static ULONG WINAPI HTMLFrameBase2_AddRef(IHTMLFrameBase2 *iface)
383 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
385 return IHTMLDOMNode_AddRef(&This->element.node.IHTMLDOMNode_iface);
388 static ULONG WINAPI HTMLFrameBase2_Release(IHTMLFrameBase2 *iface)
390 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
392 return IHTMLDOMNode_Release(&This->element.node.IHTMLDOMNode_iface);
395 static HRESULT WINAPI HTMLFrameBase2_GetTypeInfoCount(IHTMLFrameBase2 *iface, UINT *pctinfo)
397 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
398 FIXME("(%p)\n", This);
402 static HRESULT WINAPI HTMLFrameBase2_GetTypeInfo(IHTMLFrameBase2 *iface, UINT iTInfo,
403 LCID lcid, ITypeInfo **ppTInfo)
405 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
406 FIXME("(%p)\n", This);
410 static HRESULT WINAPI HTMLFrameBase2_GetIDsOfNames(IHTMLFrameBase2 *iface, REFIID riid,
411 LPOLESTR *rgszNames, UINT cNames, LCID lcid, DISPID *rgDispId)
413 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
414 FIXME("(%p)\n", This);
418 static HRESULT WINAPI HTMLFrameBase2_Invoke(IHTMLFrameBase2 *iface, DISPID dispIdMember,
419 REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
420 VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
422 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
423 FIXME("(%p)\n", This);
427 static HRESULT WINAPI HTMLFrameBase2_get_contentWindow(IHTMLFrameBase2 *iface, IHTMLWindow2 **p)
429 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
431 TRACE("(%p)->(%p)\n", This, p);
433 if(This->content_window) {
434 IHTMLWindow2_AddRef(&This->content_window->IHTMLWindow2_iface);
435 *p = &This->content_window->IHTMLWindow2_iface;
437 WARN("NULL content window\n");
443 static HRESULT WINAPI HTMLFrameBase2_put_onload(IHTMLFrameBase2 *iface, VARIANT v)
445 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
446 FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
450 static HRESULT WINAPI HTMLFrameBase2_get_onload(IHTMLFrameBase2 *iface, VARIANT *p)
452 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
453 FIXME("(%p)->(%p)\n", This, p);
457 static HRESULT WINAPI HTMLFrameBase2_put_onreadystatechange(IHTMLFrameBase2 *iface, VARIANT v)
459 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
460 FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
464 static HRESULT WINAPI HTMLFrameBase2_get_onreadystatechange(IHTMLFrameBase2 *iface, VARIANT *p)
466 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
467 FIXME("(%p)->(%p)\n", This, p);
471 static HRESULT WINAPI HTMLFrameBase2_get_readyState(IHTMLFrameBase2 *iface, BSTR *p)
473 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
475 TRACE("(%p)->(%p)\n", This, p);
477 if(!This->content_window || !This->content_window->doc) {
478 FIXME("no document associated\n");
482 return IHTMLDocument2_get_readyState(&This->content_window->doc->basedoc.IHTMLDocument2_iface, p);
485 static HRESULT WINAPI HTMLFrameBase2_put_allowTransparency(IHTMLFrameBase2 *iface, VARIANT_BOOL v)
487 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
488 FIXME("(%p)->(%x)\n", This, v);
492 static HRESULT WINAPI HTMLFrameBase2_get_allowTransparency(IHTMLFrameBase2 *iface, VARIANT_BOOL *p)
494 HTMLFrameBase *This = HTMLFRAMEBASE2_THIS(iface);
495 FIXME("(%p)->(%p)\n", This, p);
499 #undef HTMLFRAMEBASE2_THIS
501 static const IHTMLFrameBase2Vtbl HTMLFrameBase2Vtbl = {
502 HTMLFrameBase2_QueryInterface,
503 HTMLFrameBase2_AddRef,
504 HTMLFrameBase2_Release,
505 HTMLFrameBase2_GetTypeInfoCount,
506 HTMLFrameBase2_GetTypeInfo,
507 HTMLFrameBase2_GetIDsOfNames,
508 HTMLFrameBase2_Invoke,
509 HTMLFrameBase2_get_contentWindow,
510 HTMLFrameBase2_put_onload,
511 HTMLFrameBase2_get_onload,
512 HTMLFrameBase2_put_onreadystatechange,
513 HTMLFrameBase2_get_onreadystatechange,
514 HTMLFrameBase2_get_readyState,
515 HTMLFrameBase2_put_allowTransparency,
516 HTMLFrameBase2_get_allowTransparency
519 HRESULT HTMLFrameBase_QI(HTMLFrameBase *This, REFIID riid, void **ppv)
521 if(IsEqualGUID(&IID_IHTMLFrameBase, riid)) {
522 TRACE("(%p)->(IID_IHTMLFrameBase %p)\n", This, ppv);
523 *ppv = HTMLFRAMEBASE(This);
524 }else if(IsEqualGUID(&IID_IHTMLFrameBase2, riid)) {
525 TRACE("(%p)->(IID_IHTMLFrameBase2 %p)\n", This, ppv);
526 *ppv = HTMLFRAMEBASE2(This);
528 return HTMLElement_QI(&This->element.node, riid, ppv);
531 IUnknown_AddRef((IUnknown*)*ppv);
535 void HTMLFrameBase_destructor(HTMLFrameBase *This)
537 if(This->content_window)
538 This->content_window->frame_element = NULL;
541 nsIDOMHTMLFrameElement_Release(This->nsframe);
543 nsIDOMHTMLIFrameElement_Release(This->nsiframe);
545 HTMLElement_destructor(&This->element.node);
548 void HTMLFrameBase_Init(HTMLFrameBase *This, HTMLDocumentNode *doc, nsIDOMHTMLElement *nselem,
549 dispex_static_data_t *dispex_data)
553 This->lpIHTMLFrameBaseVtbl = &HTMLFrameBaseVtbl;
554 This->lpIHTMLFrameBase2Vtbl = &HTMLFrameBase2Vtbl;
556 HTMLElement_Init(&This->element, doc, nselem, dispex_data);
558 nsres = nsIDOMHTMLElement_QueryInterface(nselem, &IID_nsIDOMHTMLFrameElement, (void**)&This->nsframe);
559 if(NS_FAILED(nsres)) {
560 nsres = nsIDOMHTMLElement_QueryInterface(nselem, &IID_nsIDOMHTMLIFrameElement, (void**)&This->nsiframe);
562 ERR("Could not get nsIDOMHTML[I]Frame interface\n");
564 This->nsiframe = NULL;