dlls/mshtml/txtrange.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 "config.h"
  20
  21 #include <stdarg.h>
  22 #include <stdio.h>
  23
  24 #define COBJMACROS
  25
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "winuser.h"
  29 #include "winnls.h"
  30 #include "ole2.h"
  31
  32 #include "wine/debug.h"
  33 #include "wine/unicode.h"
  34
  35 #include "mshtml_private.h"
  36
  37 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
  38
  39 typedef struct {
  40     const IHTMLTxtRangeVtbl *lpHTMLTxtRangeVtbl;
  41
  42     LONG ref;
  43
  44     nsIDOMRange *nsrange;
  45     HTMLDocument *doc;
  46
  47     struct list entry;
  48 } HTMLTxtRange;
  49
  50 #define HTMLTXTRANGE(x)  ((IHTMLTxtRange*)  &(x)->lpHTMLTxtRangeVtbl)
  51
  52 #define HTMLTXTRANGE_THIS(iface) DEFINE_THIS(HTMLTxtRange, HTMLTxtRange, iface)
  53
  54 static HRESULT WINAPI HTMLTxtRange_QueryInterface(IHTMLTxtRange *iface, REFIID riid, void **ppv)
  55 {
  56     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
  57
  58     *ppv = NULL;
  59
  60     if(IsEqualGUID(&IID_IUnknown, riid)) {
  61         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
  62         *ppv = HTMLTXTRANGE(This);
  63     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
  64         TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
  65         *ppv = HTMLTXTRANGE(This);
  66     }else if(IsEqualGUID(&IID_IHTMLTxtRange, riid)) {
  67         TRACE("(%p)->(IID_IHTMLTxtRange %p)\n", This, ppv);
  68         *ppv = HTMLTXTRANGE(This);
  69     }
  70
  71     if(*ppv) {
  72         IUnknown_AddRef((IUnknown*)*ppv);
  73         return S_OK;
  74     }
  75
  76     WARN("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv);
  77     return E_NOINTERFACE;
  78 }
  79
  80 static ULONG WINAPI HTMLTxtRange_AddRef(IHTMLTxtRange *iface)
  81 {
  82     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
  83     LONG ref = InterlockedIncrement(&This->ref);
  84
  85     TRACE("(%p) ref=%d\n", This, ref);
  86
  87     return ref;
  88 }
  89
  90 static ULONG WINAPI HTMLTxtRange_Release(IHTMLTxtRange *iface)
  91 {
  92     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
  93     LONG ref = InterlockedDecrement(&This->ref);
  94
  95     TRACE("(%p) ref=%d\n", This, ref);
  96
  97     if(!ref) {
  98         if(This->nsrange)
  99             nsISelection_Release(This->nsrange);
 100         if(This->doc)
 101             list_remove(&This->entry);
 102         mshtml_free(This);
 103     }
 104
 105     return ref;
 106 }
 107
 108 static HRESULT WINAPI HTMLTxtRange_GetTypeInfoCount(IHTMLTxtRange *iface, UINT *pctinfo)
 109 {
 110     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 111     FIXME("(%p)->(%p)\n", This, pctinfo);
 112     return E_NOTIMPL;
 113 }
 114
 115 static HRESULT WINAPI HTMLTxtRange_GetTypeInfo(IHTMLTxtRange *iface, UINT iTInfo,
 116                                                LCID lcid, ITypeInfo **ppTInfo)
 117 {
 118     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 119     FIXME("(%p)->(%u %u %p)\n", This, iTInfo, lcid, ppTInfo);
 120     return E_NOTIMPL;
 121 }
 122
 123 static HRESULT WINAPI HTMLTxtRange_GetIDsOfNames(IHTMLTxtRange *iface, REFIID riid,
 124                                                  LPOLESTR *rgszNames, UINT cNames,
 125                                                  LCID lcid, DISPID *rgDispId)
 126 {
 127     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 128     FIXME("(%p)->(%s %p %u %u %p)\n", This, debugstr_guid(riid), rgszNames, cNames,
 129           lcid, rgDispId);
 130     return E_NOTIMPL;
 131 }
 132
 133 static HRESULT WINAPI HTMLTxtRange_Invoke(IHTMLTxtRange *iface, DISPID dispIdMember,
 134                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
 135                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
 136 {
 137     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 138     FIXME("(%p)->(%d %s %d %d %p %p %p %p)\n", This, dispIdMember, debugstr_guid(riid),
 139           lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 140     return E_NOTIMPL;
 141 }
 142
 143 static HRESULT WINAPI HTMLTxtRange_get_htmlText(IHTMLTxtRange *iface, BSTR *p)
 144 {
 145     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 146
 147     TRACE("(%p)->(%p)\n", This, p);
 148
 149     *p = NULL;
 150
 151     if(This->nsrange) {
 152         nsIDOMDocumentFragment *fragment;
 153         nsresult nsres;
 154
 155         nsres = nsIDOMRange_CloneContents(This->nsrange, &fragment);
 156         if(NS_SUCCEEDED(nsres)) {
 157             const PRUnichar *nstext;
 158             nsAString nsstr;
 159
 160             nsAString_Init(&nsstr, NULL);
 161             nsnode_to_nsstring((nsIDOMNode*)fragment, &nsstr);
 162             nsIDOMDocumentFragment_Release(fragment);
 163
 164             nsAString_GetData(&nsstr, &nstext, NULL);
 165             *p = SysAllocString(nstext);
 166
 167             nsAString_Finish(&nsstr);
 168         }
 169     }
 170
 171     if(!*p) {
 172         const WCHAR emptyW[] = {0};
 173         *p = SysAllocString(emptyW);
 174     }
 175
 176     TRACE("return %s\n", debugstr_w(*p));
 177     return S_OK;
 178 }
 179
 180 static HRESULT WINAPI HTMLTxtRange_put_text(IHTMLTxtRange *iface, BSTR v)
 181 {
 182     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 183     nsIDOMDocument *nsdoc;
 184     nsIDOMText *text_node;
 185     nsAString text_str;
 186     nsresult nsres;
 187
 188     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 189
 190     if(!This->doc)
 191         return MSHTML_E_NODOC;
 192
 193     nsres = nsIWebNavigation_GetDocument(This->doc->nscontainer->navigation, &nsdoc);
 194     if(NS_FAILED(nsres)) {
 195         ERR("GetDocument failed: %08x\n", nsres);
 196         return S_OK;
 197     }
 198
 199     nsAString_Init(&text_str, v);
 200     nsres = nsIDOMDocument_CreateTextNode(nsdoc, &text_str, &text_node);
 201     nsAString_Finish(&text_str);
 202     if(NS_FAILED(nsres)) {
 203         ERR("CreateTextNode failed: %08x\n", nsres);
 204         return S_OK;
 205     }
 206     nsres = nsIDOMRange_DeleteContents(This->nsrange);
 207     if(NS_FAILED(nsres))
 208         ERR("DeleteContents failed: %08x\n", nsres);
 209
 210     nsres = nsIDOMRange_InsertNode(This->nsrange, (nsIDOMNode*)text_node);
 211     if(NS_FAILED(nsres))
 212         ERR("InsertNode failed: %08x\n", nsres);
 213
 214     return S_OK;
 215 }
 216
 217 static HRESULT WINAPI HTMLTxtRange_get_text(IHTMLTxtRange *iface, BSTR *p)
 218 {
 219     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 220
 221     TRACE("(%p)->(%p)\n", This, p);
 222
 223     *p = NULL;
 224
 225     if(This->nsrange) {
 226         nsAString text_str;
 227         nsresult nsres;
 228
 229         nsAString_Init(&text_str, NULL);
 230
 231         nsres = nsIDOMRange_ToString(This->nsrange, &text_str);
 232         if(NS_SUCCEEDED(nsres)) {
 233             const PRUnichar *nstext;
 234
 235             nsAString_GetData(&text_str, &nstext, NULL);
 236             *p = SysAllocString(nstext);
 237         }else {
 238             ERR("ToString failed: %08x\n", nsres);
 239         }
 240
 241         nsAString_Finish(&text_str);
 242     }
 243
 244     if(!*p) {
 245         static const WCHAR empty[] = {0};
 246         *p = SysAllocString(empty);
 247     }
 248
 249     return S_OK;
 250 }
 251
 252 static HRESULT WINAPI HTMLTxtRange_parentElement(IHTMLTxtRange *iface, IHTMLElement **parent)
 253 {
 254     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 255     FIXME("(%p)->(%p)\n", This, parent);
 256     return E_NOTIMPL;
 257 }
 258
 259 static HRESULT WINAPI HTMLTxtRange_duplicate(IHTMLTxtRange *iface, IHTMLTxtRange **Duplicate)
 260 {
 261     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 262     nsIDOMRange *nsrange = NULL;
 263
 264     TRACE("(%p)->(%p)\n", This, Duplicate);
 265
 266     nsIDOMRange_CloneRange(This->nsrange, &nsrange);
 267     *Duplicate = HTMLTxtRange_Create(This->doc, nsrange);
 268     nsIDOMRange_Release(nsrange);
 269
 270     return S_OK;
 271 }
 272
 273 static HRESULT WINAPI HTMLTxtRange_inRange(IHTMLTxtRange *iface, IHTMLTxtRange *Range,
 274         VARIANT_BOOL *InRange)
 275 {
 276     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 277     FIXME("(%p)->(%p %p)\n", This, Range, InRange);
 278     return E_NOTIMPL;
 279 }
 280
 281 static HRESULT WINAPI HTMLTxtRange_isEqual(IHTMLTxtRange *iface, IHTMLTxtRange *Range,
 282         VARIANT_BOOL *IsEqual)
 283 {
 284     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 285     FIXME("(%p)->(%p %p)\n", This, Range, IsEqual);
 286     return E_NOTIMPL;
 287 }
 288
 289 static HRESULT WINAPI HTMLTxtRange_scrollIntoView(IHTMLTxtRange *iface, VARIANT_BOOL fStart)
 290 {
 291     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 292     FIXME("(%p)->(%x)\n", This, fStart);
 293     return E_NOTIMPL;
 294 }
 295
 296 static HRESULT WINAPI HTMLTxtRange_collapse(IHTMLTxtRange *iface, VARIANT_BOOL Start)
 297 {
 298     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 299
 300     TRACE("(%p)->(%x)\n", This, Start);
 301
 302     nsIDOMRange_Collapse(This->nsrange, Start != VARIANT_FALSE);
 303     return S_OK;
 304 }
 305
 306 static HRESULT WINAPI HTMLTxtRange_expand(IHTMLTxtRange *iface, BSTR Unit, VARIANT_BOOL *Success)
 307 {
 308     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 309     FIXME("(%p)->(%s %p)\n", This, debugstr_w(Unit), Success);
 310     return E_NOTIMPL;
 311 }
 312
 313 static HRESULT WINAPI HTMLTxtRange_move(IHTMLTxtRange *iface, BSTR Unit,
 314         long Count, long *ActualCount)
 315 {
 316     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 317     FIXME("(%p)->(%s %ld %p)\n", This, debugstr_w(Unit), Count, ActualCount);
 318     return E_NOTIMPL;
 319 }
 320
 321 static HRESULT WINAPI HTMLTxtRange_moveStart(IHTMLTxtRange *iface, BSTR Unit,
 322         long Count, long *ActualCount)
 323 {
 324     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 325     FIXME("(%p)->(%s %ld %p)\n", This, debugstr_w(Unit), Count, ActualCount);
 326     return E_NOTIMPL;
 327 }
 328
 329 static HRESULT WINAPI HTMLTxtRange_moveEnd(IHTMLTxtRange *iface, BSTR Unit,
 330         long Count, long *ActualCount)
 331 {
 332     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 333     FIXME("(%p)->(%s %ld %p)\n", This, debugstr_w(Unit), Count, ActualCount);
 334     return E_NOTIMPL;
 335 }
 336
 337 static HRESULT WINAPI HTMLTxtRange_select(IHTMLTxtRange *iface)
 338 {
 339     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 340     FIXME("(%p)->()\n", This);
 341     return E_NOTIMPL;
 342 }
 343
 344 static HRESULT WINAPI HTMLTxtRange_pasteHTML(IHTMLTxtRange *iface, BSTR html)
 345 {
 346     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 347     FIXME("(%p)->(%s)\n", This, debugstr_w(html));
 348     return E_NOTIMPL;
 349 }
 350
 351 static HRESULT WINAPI HTMLTxtRange_moveToElementText(IHTMLTxtRange *iface, IHTMLElement *element)
 352 {
 353     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 354     FIXME("(%p)->(%p)\n", This, element);
 355     return E_NOTIMPL;
 356 }
 357
 358 static HRESULT WINAPI HTMLTxtRange_setEndPoint(IHTMLTxtRange *iface, BSTR how,
 359         IHTMLTxtRange *SourceRange)
 360 {
 361     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 362     FIXME("(%p)->(%s %p)\n", This, debugstr_w(how), SourceRange);
 363     return E_NOTIMPL;
 364 }
 365
 366 static HRESULT WINAPI HTMLTxtRange_compareEndPoints(IHTMLTxtRange *iface, BSTR how,
 367         IHTMLTxtRange *SourceRange, long *ret)
 368 {
 369     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 370     FIXME("(%p)->(%s %p %p)\n", This, debugstr_w(how), SourceRange, ret);
 371     return E_NOTIMPL;
 372 }
 373
 374 static HRESULT WINAPI HTMLTxtRange_findText(IHTMLTxtRange *iface, BSTR String,
 375         long count, long Flags, VARIANT_BOOL *Success)
 376 {
 377     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 378     FIXME("(%p)->(%s %ld %08lx %p)\n", This, debugstr_w(String), count, Flags, Success);
 379     return E_NOTIMPL;
 380 }
 381
 382 static HRESULT WINAPI HTMLTxtRange_moveToPoint(IHTMLTxtRange *iface, long x, long y)
 383 {
 384     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 385     FIXME("(%p)->(%ld %ld)\n", This, x, y);
 386     return E_NOTIMPL;
 387 }
 388
 389 static HRESULT WINAPI HTMLTxtRange_getBookmark(IHTMLTxtRange *iface, BSTR *Bookmark)
 390 {
 391     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 392     FIXME("(%p)->(%p)\n", This, Bookmark);
 393     return E_NOTIMPL;
 394 }
 395
 396 static HRESULT WINAPI HTMLTxtRange_moveToBookmark(IHTMLTxtRange *iface, BSTR Bookmark,
 397         VARIANT_BOOL *Success)
 398 {
 399     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 400     FIXME("(%p)->(%s %p)\n", This, debugstr_w(Bookmark), Success);
 401     return E_NOTIMPL;
 402 }
 403
 404 static HRESULT WINAPI HTMLTxtRange_queryCommandSupported(IHTMLTxtRange *iface, BSTR cmdID,
 405         VARIANT_BOOL *pfRet)
 406 {
 407     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 408     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
 409     return E_NOTIMPL;
 410 }
 411
 412 static HRESULT WINAPI HTMLTxtRange_queryCommandEnabled(IHTMLTxtRange *iface, BSTR cmdID,
 413         VARIANT_BOOL *pfRet)
 414 {
 415     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 416     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
 417     return E_NOTIMPL;
 418 }
 419
 420 static HRESULT WINAPI HTMLTxtRange_queryCommandState(IHTMLTxtRange *iface, BSTR cmdID,
 421         VARIANT_BOOL *pfRet)
 422 {
 423     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 424     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
 425     return E_NOTIMPL;
 426 }
 427
 428 static HRESULT WINAPI HTMLTxtRange_queryCommandIndeterm(IHTMLTxtRange *iface, BSTR cmdID,
 429         VARIANT_BOOL *pfRet)
 430 {
 431     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 432     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
 433     return E_NOTIMPL;
 434 }
 435
 436 static HRESULT WINAPI HTMLTxtRange_queryCommandText(IHTMLTxtRange *iface, BSTR cmdID,
 437         BSTR *pcmdText)
 438 {
 439     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 440     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pcmdText);
 441     return E_NOTIMPL;
 442 }
 443
 444 static HRESULT WINAPI HTMLTxtRange_queryCommandValue(IHTMLTxtRange *iface, BSTR cmdID,
 445         VARIANT *pcmdValue)
 446 {
 447     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 448     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pcmdValue);
 449     return E_NOTIMPL;
 450 }
 451
 452 static HRESULT WINAPI HTMLTxtRange_execCommand(IHTMLTxtRange *iface, BSTR cmdID,
 453         VARIANT_BOOL showUI, VARIANT value, VARIANT_BOOL *pfRet)
 454 {
 455     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 456     FIXME("(%p)->(%s %x v %p)\n", This, debugstr_w(cmdID), showUI, pfRet);
 457     return E_NOTIMPL;
 458 }
 459
 460 static HRESULT WINAPI HTMLTxtRange_execCommandShowHelp(IHTMLTxtRange *iface, BSTR cmdID,
 461         VARIANT_BOOL *pfRet)
 462 {
 463     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 464     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
 465     return E_NOTIMPL;
 466 }
 467
 468 #undef HTMLTXTRANGE_THIS
 469
 470 static const IHTMLTxtRangeVtbl HTMLTxtRangeVtbl = {
 471     HTMLTxtRange_QueryInterface,
 472     HTMLTxtRange_AddRef,
 473     HTMLTxtRange_Release,
 474     HTMLTxtRange_GetTypeInfoCount,
 475     HTMLTxtRange_GetTypeInfo,
 476     HTMLTxtRange_GetIDsOfNames,
 477     HTMLTxtRange_Invoke,
 478     HTMLTxtRange_get_htmlText,
 479     HTMLTxtRange_put_text,
 480     HTMLTxtRange_get_text,
 481     HTMLTxtRange_parentElement,
 482     HTMLTxtRange_duplicate,
 483     HTMLTxtRange_inRange,
 484     HTMLTxtRange_isEqual,
 485     HTMLTxtRange_scrollIntoView,
 486     HTMLTxtRange_collapse,
 487     HTMLTxtRange_expand,
 488     HTMLTxtRange_move,
 489     HTMLTxtRange_moveStart,
 490     HTMLTxtRange_moveEnd,
 491     HTMLTxtRange_select,
 492     HTMLTxtRange_pasteHTML,
 493     HTMLTxtRange_moveToElementText,
 494     HTMLTxtRange_setEndPoint,
 495     HTMLTxtRange_compareEndPoints,
 496     HTMLTxtRange_findText,
 497     HTMLTxtRange_moveToPoint,
 498     HTMLTxtRange_getBookmark,
 499     HTMLTxtRange_moveToBookmark,
 500     HTMLTxtRange_queryCommandSupported,
 501     HTMLTxtRange_queryCommandEnabled,
 502     HTMLTxtRange_queryCommandState,
 503     HTMLTxtRange_queryCommandIndeterm,
 504     HTMLTxtRange_queryCommandText,
 505     HTMLTxtRange_queryCommandValue,
 506     HTMLTxtRange_execCommand,
 507     HTMLTxtRange_execCommandShowHelp
 508 };
 509
 510 IHTMLTxtRange *HTMLTxtRange_Create(HTMLDocument *doc, nsIDOMRange *nsrange)
 511 {
 512     HTMLTxtRange *ret = mshtml_alloc(sizeof(HTMLTxtRange));
 513
 514     ret->lpHTMLTxtRangeVtbl = &HTMLTxtRangeVtbl;
 515     ret->ref = 1;
 516
 517     if(nsrange)
 518         nsIDOMRange_AddRef(nsrange);
 519     ret->nsrange = nsrange;
 520
 521     ret->doc = doc;
 522     list_add_head(&doc->range_list, &ret->entry);
 523
 524     return HTMLTXTRANGE(ret);
 525 }
 526
 527 void detach_ranges(HTMLDocument *This)
 528 {
 529     HTMLTxtRange *iter;
 530
 531     LIST_FOR_EACH_ENTRY(iter, &This->range_list, HTMLTxtRange, entry) {
 532         iter->doc = NULL;
 533     }
 534 }