dlls/mshtml/htmltextarea.c

   1 /*
   2  * Copyright 2006 Jacek Caban for CodeWeavers
   3  *
   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.
   8  *
   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.
  13  *
  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
  17  */
  18
  19 #include <stdarg.h>
  20 #include <assert.h>
  21
  22 #define COBJMACROS
  23
  24 #include "windef.h"
  25 #include "winbase.h"
  26 #include "winuser.h"
  27 #include "ole2.h"
  28
  29 #include "wine/debug.h"
  30
  31 #include "mshtml_private.h"
  32
  33 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
  34
  35 struct HTMLTextAreaElement {
  36     HTMLElement element;
  37
  38     IHTMLTextAreaElement IHTMLTextAreaElement_iface;
  39
  40     nsIDOMHTMLTextAreaElement *nstextarea;
  41 };
  42
  43 static inline HTMLTextAreaElement *impl_from_IHTMLTextAreaElement(IHTMLTextAreaElement *iface)
  44 {
  45     return CONTAINING_RECORD(iface, HTMLTextAreaElement, IHTMLTextAreaElement_iface);
  46 }
  47
  48 static HRESULT WINAPI HTMLTextAreaElement_QueryInterface(IHTMLTextAreaElement *iface,
  49                                                          REFIID riid, void **ppv)
  50 {
  51     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
  52
  53     return IHTMLDOMNode_QueryInterface(&This->element.node.IHTMLDOMNode_iface, riid, ppv);
  54 }
  55
  56 static ULONG WINAPI HTMLTextAreaElement_AddRef(IHTMLTextAreaElement *iface)
  57 {
  58     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
  59
  60     return IHTMLDOMNode_AddRef(&This->element.node.IHTMLDOMNode_iface);
  61 }
  62
  63 static ULONG WINAPI HTMLTextAreaElement_Release(IHTMLTextAreaElement *iface)
  64 {
  65     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
  66
  67     return IHTMLDOMNode_Release(&This->element.node.IHTMLDOMNode_iface);
  68 }
  69
  70 static HRESULT WINAPI HTMLTextAreaElement_GetTypeInfoCount(IHTMLTextAreaElement *iface, UINT *pctinfo)
  71 {
  72     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
  73     return IDispatchEx_GetTypeInfoCount(&This->element.node.event_target.dispex.IDispatchEx_iface, pctinfo);
  74 }
  75
  76 static HRESULT WINAPI HTMLTextAreaElement_GetTypeInfo(IHTMLTextAreaElement *iface, UINT iTInfo,
  77                                               LCID lcid, ITypeInfo **ppTInfo)
  78 {
  79     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
  80     return IDispatchEx_GetTypeInfo(&This->element.node.event_target.dispex.IDispatchEx_iface, iTInfo, lcid,
  81             ppTInfo);
  82 }
  83
  84 static HRESULT WINAPI HTMLTextAreaElement_GetIDsOfNames(IHTMLTextAreaElement *iface, REFIID riid,
  85                                                 LPOLESTR *rgszNames, UINT cNames,
  86                                                 LCID lcid, DISPID *rgDispId)
  87 {
  88     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
  89     return IDispatchEx_GetIDsOfNames(&This->element.node.event_target.dispex.IDispatchEx_iface, riid, rgszNames,
  90             cNames, lcid, rgDispId);
  91 }
  92
  93 static HRESULT WINAPI HTMLTextAreaElement_Invoke(IHTMLTextAreaElement *iface, DISPID dispIdMember,
  94                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
  95                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
  96 {
  97     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
  98     return IDispatchEx_Invoke(&This->element.node.event_target.dispex.IDispatchEx_iface, dispIdMember, riid,
  99             lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 100 }
 101
 102 static HRESULT WINAPI HTMLTextAreaElement_get_type(IHTMLTextAreaElement *iface, BSTR *p)
 103 {
 104     static const WCHAR textareaW[] = {'t','e','x','t','a','r','e','a',0};
 105
 106     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 107
 108     TRACE("(%p)->(%p)\n", This, p);
 109
 110     *p = SysAllocString(textareaW);
 111     if(!*p)
 112         return E_OUTOFMEMORY;
 113     return S_OK;
 114 }
 115
 116 static HRESULT WINAPI HTMLTextAreaElement_put_value(IHTMLTextAreaElement *iface, BSTR v)
 117 {
 118     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 119     nsAString value_str;
 120     nsresult nsres;
 121
 122     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 123
 124     nsAString_InitDepend(&value_str, v);
 125     nsres = nsIDOMHTMLTextAreaElement_SetValue(This->nstextarea, &value_str);
 126     nsAString_Finish(&value_str);
 127     if(NS_FAILED(nsres)) {
 128         ERR("SetValue failed: %08x\n", nsres);
 129         return E_FAIL;
 130     }
 131
 132     return S_OK;
 133 }
 134
 135 static HRESULT WINAPI HTMLTextAreaElement_get_value(IHTMLTextAreaElement *iface, BSTR *p)
 136 {
 137     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 138     nsAString value_str;
 139     nsresult nsres;
 140
 141     TRACE("(%p)->(%p)\n", This, p);
 142
 143     nsAString_Init(&value_str, NULL);
 144     nsres = nsIDOMHTMLTextAreaElement_GetValue(This->nstextarea, &value_str);
 145     return return_nsstr(nsres, &value_str, p);
 146 }
 147
 148 static HRESULT WINAPI HTMLTextAreaElement_put_name(IHTMLTextAreaElement *iface, BSTR v)
 149 {
 150     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 151     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 152     return E_NOTIMPL;
 153 }
 154
 155 static HRESULT WINAPI HTMLTextAreaElement_get_name(IHTMLTextAreaElement *iface, BSTR *p)
 156 {
 157     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 158     nsAString name_str;
 159     nsresult nsres;
 160
 161     TRACE("(%p)->(%p)\n", This, p);
 162
 163     nsAString_Init(&name_str, NULL);
 164     nsres = nsIDOMHTMLTextAreaElement_GetName(This->nstextarea, &name_str);
 165     return return_nsstr(nsres, &name_str, p);
 166 }
 167
 168 static HRESULT WINAPI HTMLTextAreaElement_put_status(IHTMLTextAreaElement *iface, VARIANT v)
 169 {
 170     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 171     FIXME("(%p)->()\n", This);
 172     return E_NOTIMPL;
 173 }
 174
 175 static HRESULT WINAPI HTMLTextAreaElement_get_status(IHTMLTextAreaElement *iface, VARIANT *p)
 176 {
 177     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 178     FIXME("(%p)->(%p)\n", This, p);
 179     return E_NOTIMPL;
 180 }
 181
 182 static HRESULT WINAPI HTMLTextAreaElement_put_disabled(IHTMLTextAreaElement *iface, VARIANT_BOOL v)
 183 {
 184     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 185     FIXME("(%p)->(%x)\n", This, v);
 186     return E_NOTIMPL;
 187 }
 188
 189 static HRESULT WINAPI HTMLTextAreaElement_get_disabled(IHTMLTextAreaElement *iface, VARIANT_BOOL *p)
 190 {
 191     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 192     FIXME("(%p)->(%p)\n", This, p);
 193     return E_NOTIMPL;
 194 }
 195
 196 static HRESULT WINAPI HTMLTextAreaElement_get_form(IHTMLTextAreaElement *iface, IHTMLFormElement **p)
 197 {
 198     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 199     nsIDOMHTMLFormElement *nsform;
 200     nsresult nsres;
 201
 202     TRACE("(%p)->(%p)\n", This, p);
 203
 204     nsres = nsIDOMHTMLTextAreaElement_GetForm(This->nstextarea, &nsform);
 205     return return_nsform(nsres, nsform, p);
 206 }
 207
 208 static HRESULT WINAPI HTMLTextAreaElement_put_defaultValue(IHTMLTextAreaElement *iface, BSTR v)
 209 {
 210     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 211     nsAString nsstr;
 212     nsresult nsres;
 213
 214     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 215
 216     nsAString_InitDepend(&nsstr, v);
 217     nsres = nsIDOMHTMLTextAreaElement_SetDefaultValue(This->nstextarea, &nsstr);
 218     nsAString_Finish(&nsstr);
 219     return NS_SUCCEEDED(nsres) ? S_OK : E_FAIL;
 220 }
 221
 222 static HRESULT WINAPI HTMLTextAreaElement_get_defaultValue(IHTMLTextAreaElement *iface, BSTR *p)
 223 {
 224     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 225     nsAString nsstr;
 226     nsresult nsres;
 227
 228     TRACE("(%p)->(%p)\n", This, p);
 229
 230     nsAString_Init(&nsstr, NULL);
 231     nsres = nsIDOMHTMLTextAreaElement_GetDefaultValue(This->nstextarea, &nsstr);
 232     return return_nsstr(nsres, &nsstr, p);
 233 }
 234
 235 static HRESULT WINAPI HTMLTextAreaElement_select(IHTMLTextAreaElement *iface)
 236 {
 237     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 238     FIXME("(%p)\n", This);
 239     return E_NOTIMPL;
 240 }
 241
 242 static HRESULT WINAPI HTMLTextAreaElement_put_onchange(IHTMLTextAreaElement *iface, VARIANT v)
 243 {
 244     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 245     FIXME("(%p)->()\n", This);
 246     return E_NOTIMPL;
 247 }
 248
 249 static HRESULT WINAPI HTMLTextAreaElement_get_onchange(IHTMLTextAreaElement *iface, VARIANT *p)
 250 {
 251     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 252     FIXME("(%p)->(%p)\n", This, p);
 253     return E_NOTIMPL;
 254 }
 255
 256 static HRESULT WINAPI HTMLTextAreaElement_put_onselect(IHTMLTextAreaElement *iface, VARIANT v)
 257 {
 258     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 259     FIXME("(%p)->()\n", This);
 260     return E_NOTIMPL;
 261 }
 262
 263 static HRESULT WINAPI HTMLTextAreaElement_get_onselect(IHTMLTextAreaElement *iface, VARIANT *p)
 264 {
 265     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 266     FIXME("(%p)->(%p)\n", This, p);
 267     return E_NOTIMPL;
 268 }
 269
 270 static HRESULT WINAPI HTMLTextAreaElement_put_readOnly(IHTMLTextAreaElement *iface, VARIANT_BOOL v)
 271 {
 272     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 273     nsresult nsres;
 274
 275     TRACE("(%p)->(%x)\n", This, v);
 276
 277     nsres = nsIDOMHTMLTextAreaElement_SetReadOnly(This->nstextarea, v != VARIANT_FALSE);
 278     if(NS_FAILED(nsres)) {
 279         ERR("SetReadOnly failed: %08x\n", nsres);
 280         return E_FAIL;
 281     }
 282
 283     return S_OK;
 284 }
 285
 286 static HRESULT WINAPI HTMLTextAreaElement_get_readOnly(IHTMLTextAreaElement *iface, VARIANT_BOOL *p)
 287 {
 288     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 289     cpp_bool b;
 290     nsresult nsres;
 291
 292     TRACE("(%p)->(%p)\n", This, p);
 293
 294     nsres = nsIDOMHTMLTextAreaElement_GetReadOnly(This->nstextarea, &b);
 295     if(NS_FAILED(nsres)) {
 296         ERR("GetReadOnly failed: %08x\n", nsres);
 297         return E_FAIL;
 298     }
 299
 300     *p = variant_bool(b);
 301     return S_OK;
 302 }
 303
 304 static HRESULT WINAPI HTMLTextAreaElement_put_rows(IHTMLTextAreaElement *iface, LONG v)
 305 {
 306     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 307     FIXME("(%p)->(%d)\n", This, v);
 308     return E_NOTIMPL;
 309 }
 310
 311 static HRESULT WINAPI HTMLTextAreaElement_get_rows(IHTMLTextAreaElement *iface, LONG *p)
 312 {
 313     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 314     FIXME("(%p)->(%p)\n", This, p);
 315     return E_NOTIMPL;
 316 }
 317
 318 static HRESULT WINAPI HTMLTextAreaElement_put_cols(IHTMLTextAreaElement *iface, LONG v)
 319 {
 320     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 321     FIXME("(%p)->(%d)\n", This, v);
 322     return E_NOTIMPL;
 323 }
 324
 325 static HRESULT WINAPI HTMLTextAreaElement_get_cols(IHTMLTextAreaElement *iface, LONG *p)
 326 {
 327     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 328     FIXME("(%p)->(%p)\n", This, p);
 329     return E_NOTIMPL;
 330 }
 331
 332 static HRESULT WINAPI HTMLTextAreaElement_put_wrap(IHTMLTextAreaElement *iface, BSTR v)
 333 {
 334     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 335     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 336     return E_NOTIMPL;
 337 }
 338
 339 static HRESULT WINAPI HTMLTextAreaElement_get_wrap(IHTMLTextAreaElement *iface, BSTR *p)
 340 {
 341     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 342     FIXME("(%p)->(%p)\n", This, p);
 343     return E_NOTIMPL;
 344 }
 345
 346 static HRESULT WINAPI HTMLTextAreaElement_createTextRange(IHTMLTextAreaElement *iface,
 347                                                           IHTMLTxtRange **range)
 348 {
 349     HTMLTextAreaElement *This = impl_from_IHTMLTextAreaElement(iface);
 350     FIXME("(%p)->(%p)\n", This, range);
 351     return E_NOTIMPL;
 352 }
 353
 354 static const IHTMLTextAreaElementVtbl HTMLTextAreaElementVtbl = {
 355     HTMLTextAreaElement_QueryInterface,
 356     HTMLTextAreaElement_AddRef,
 357     HTMLTextAreaElement_Release,
 358     HTMLTextAreaElement_GetTypeInfoCount,
 359     HTMLTextAreaElement_GetTypeInfo,
 360     HTMLTextAreaElement_GetIDsOfNames,
 361     HTMLTextAreaElement_Invoke,
 362     HTMLTextAreaElement_get_type,
 363     HTMLTextAreaElement_put_value,
 364     HTMLTextAreaElement_get_value,
 365     HTMLTextAreaElement_put_name,
 366     HTMLTextAreaElement_get_name,
 367     HTMLTextAreaElement_put_status,
 368     HTMLTextAreaElement_get_status,
 369     HTMLTextAreaElement_put_disabled,
 370     HTMLTextAreaElement_get_disabled,
 371     HTMLTextAreaElement_get_form,
 372     HTMLTextAreaElement_put_defaultValue,
 373     HTMLTextAreaElement_get_defaultValue,
 374     HTMLTextAreaElement_select,
 375     HTMLTextAreaElement_put_onchange,
 376     HTMLTextAreaElement_get_onchange,
 377     HTMLTextAreaElement_put_onselect,
 378     HTMLTextAreaElement_get_onselect,
 379     HTMLTextAreaElement_put_readOnly,
 380     HTMLTextAreaElement_get_readOnly,
 381     HTMLTextAreaElement_put_rows,
 382     HTMLTextAreaElement_get_rows,
 383     HTMLTextAreaElement_put_cols,
 384     HTMLTextAreaElement_get_cols,
 385     HTMLTextAreaElement_put_wrap,
 386     HTMLTextAreaElement_get_wrap,
 387     HTMLTextAreaElement_createTextRange
 388 };
 389
 390 static inline HTMLTextAreaElement *impl_from_HTMLDOMNode(HTMLDOMNode *iface)
 391 {
 392     return CONTAINING_RECORD(iface, HTMLTextAreaElement, element.node);
 393 }
 394
 395 static HRESULT HTMLTextAreaElement_QI(HTMLDOMNode *iface, REFIID riid, void **ppv)
 396 {
 397     HTMLTextAreaElement *This = impl_from_HTMLDOMNode(iface);
 398
 399     *ppv = NULL;
 400
 401     if(IsEqualGUID(&IID_IUnknown, riid)) {
 402         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
 403         *ppv = &This->IHTMLTextAreaElement_iface;
 404     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
 405         TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
 406         *ppv = &This->IHTMLTextAreaElement_iface;
 407     }else if(IsEqualGUID(&IID_IHTMLTextAreaElement, riid)) {
 408         TRACE("(%p)->(IID_IHTMLTextAreaElement %p)\n", This, ppv);
 409         *ppv = &This->IHTMLTextAreaElement_iface;
 410     }
 411
 412     if(*ppv) {
 413         IUnknown_AddRef((IUnknown*)*ppv);
 414         return S_OK;
 415     }
 416
 417     return HTMLElement_QI(&This->element.node, riid, ppv);
 418 }
 419
 420 static HRESULT HTMLTextAreaElementImpl_put_disabled(HTMLDOMNode *iface, VARIANT_BOOL v)
 421 {
 422     HTMLTextAreaElement *This = impl_from_HTMLDOMNode(iface);
 423     return IHTMLTextAreaElement_put_disabled(&This->IHTMLTextAreaElement_iface, v);
 424 }
 425
 426 static HRESULT HTMLTextAreaElementImpl_get_disabled(HTMLDOMNode *iface, VARIANT_BOOL *p)
 427 {
 428     HTMLTextAreaElement *This = impl_from_HTMLDOMNode(iface);
 429     return IHTMLTextAreaElement_get_disabled(&This->IHTMLTextAreaElement_iface, p);
 430 }
 431
 432 static BOOL HTMLTextAreaElement_is_text_edit(HTMLDOMNode *iface)
 433 {
 434     return TRUE;
 435 }
 436
 437 static void HTMLTextAreaElement_traverse(HTMLDOMNode *iface, nsCycleCollectionTraversalCallback *cb)
 438 {
 439     HTMLTextAreaElement *This = impl_from_HTMLDOMNode(iface);
 440
 441     if(This->nstextarea)
 442         note_cc_edge((nsISupports*)This->nstextarea, "This->nstextarea", cb);
 443 }
 444
 445 static void HTMLTextAreaElement_unlink(HTMLDOMNode *iface)
 446 {
 447     HTMLTextAreaElement *This = impl_from_HTMLDOMNode(iface);
 448
 449     if(This->nstextarea) {
 450         nsIDOMHTMLTextAreaElement *nstextarea = This->nstextarea;
 451
 452         This->nstextarea = NULL;
 453         nsIDOMHTMLTextAreaElement_Release(nstextarea);
 454     }
 455 }
 456
 457 static const NodeImplVtbl HTMLTextAreaElementImplVtbl = {
 458     &CLSID_HTMLTextAreaElement,
 459     HTMLTextAreaElement_QI,
 460     HTMLElement_destructor,
 461     HTMLElement_cpc,
 462     HTMLElement_clone,
 463     HTMLElement_handle_event,
 464     HTMLElement_get_attr_col,
 465     NULL,
 466     HTMLTextAreaElementImpl_put_disabled,
 467     HTMLTextAreaElementImpl_get_disabled,
 468     NULL,
 469     NULL,
 470     NULL,
 471     NULL,
 472     NULL,
 473     HTMLTextAreaElement_traverse,
 474     HTMLTextAreaElement_unlink,
 475     HTMLTextAreaElement_is_text_edit
 476 };
 477
 478 static const tid_t HTMLTextAreaElement_iface_tids[] = {
 479     HTMLELEMENT_TIDS,
 480     IHTMLTextAreaElement_tid,
 481     0
 482 };
 483
 484 static dispex_static_data_t HTMLTextAreaElement_dispex = {
 485     NULL,
 486     DispHTMLTextAreaElement_tid,
 487     HTMLTextAreaElement_iface_tids,
 488     HTMLElement_init_dispex_info
 489 };
 490
 491 HRESULT HTMLTextAreaElement_Create(HTMLDocumentNode *doc, nsIDOMElement *nselem, HTMLElement **elem)
 492 {
 493     HTMLTextAreaElement *ret;
 494     nsresult nsres;
 495
 496     ret = heap_alloc_zero(sizeof(HTMLTextAreaElement));
 497     if(!ret)
 498         return E_OUTOFMEMORY;
 499
 500     ret->IHTMLTextAreaElement_iface.lpVtbl = &HTMLTextAreaElementVtbl;
 501     ret->element.node.vtbl = &HTMLTextAreaElementImplVtbl;
 502
 503     HTMLElement_Init(&ret->element, doc, nselem, &HTMLTextAreaElement_dispex);
 504
 505     nsres = nsIDOMElement_QueryInterface(nselem, &IID_nsIDOMHTMLTextAreaElement, (void**)&ret->nstextarea);
 506     assert(nsres == NS_OK);
 507
 508     *elem = &ret->element;
 509     return S_OK;
 510 }