git.oblomov.eu Git - wine/blob - 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 static const WCHAR brW[] = {'b','r',0};
  40
  41 typedef struct {
  42     const IHTMLTxtRangeVtbl *lpHTMLTxtRangeVtbl;
  43
  44     LONG ref;
  45
  46     nsIDOMRange *nsrange;
  47     HTMLDocument *doc;
  48
  49     struct list entry;
  50 } HTMLTxtRange;
  51
  52 #define HTMLTXTRANGE(x)  ((IHTMLTxtRange*)  &(x)->lpHTMLTxtRangeVtbl)
  53
  54 typedef struct {
  55     WCHAR *buf;
  56     DWORD len;
  57     DWORD size;
  58 } wstrbuf_t;
  59
  60 typedef struct {
  61     PRUint16 type;
  62     nsIDOMNode *node;
  63     PRUint32 off;
  64     nsAString str;
  65     const PRUnichar *p;
  66 } dompos_t;
  67
  68 typedef enum {
  69     RU_UNKNOWN,
  70     RU_CHAR,
  71     RU_WORD,
  72     RU_SENTENCE,
  73     RU_TEXTEDIT
  74 } range_unit_t;
  75
  76 static HTMLTxtRange *get_range_object(HTMLDocument *doc, IHTMLTxtRange *iface)
  77 {
  78     HTMLTxtRange *iter;
  79
  80     LIST_FOR_EACH_ENTRY(iter, &doc->range_list, HTMLTxtRange, entry) {
  81         if(HTMLTXTRANGE(iter) == iface)
  82             return iter;
  83     }
  84
  85     ERR("Could not find range in document\n");
  86     return NULL;
  87 }
  88
  89 static range_unit_t string_to_unit(LPCWSTR str)
  90 {
  91     static const WCHAR characterW[] =
  92         {'c','h','a','r','a','c','t','e','r',0};
  93     static const WCHAR wordW[] =
  94         {'w','o','r','d',0};
  95     static const WCHAR sentenceW[] =
  96         {'s','e','n','t','e','n','c','e',0};
  97     static const WCHAR texteditW[] =
  98         {'t','e','x','t','e','d','i','t',0};
  99
 100     if(!strcmpiW(str, characterW))  return RU_CHAR;
 101     if(!strcmpiW(str, wordW))       return RU_WORD;
 102     if(!strcmpiW(str, sentenceW))   return RU_SENTENCE;
 103     if(!strcmpiW(str, texteditW))   return RU_TEXTEDIT;
 104
 105     return RU_UNKNOWN;
 106 }
 107
 108 static int string_to_nscmptype(LPCWSTR str)
 109 {
 110     static const WCHAR seW[] = {'S','t','a','r','t','T','o','E','n','d',0};
 111     static const WCHAR ssW[] = {'S','t','a','r','t','T','o','S','t','a','r','t',0};
 112     static const WCHAR esW[] = {'E','n','d','T','o','S','t','a','r','t',0};
 113     static const WCHAR eeW[] = {'E','n','d','T','o','E','n','d',0};
 114
 115     if(!strcmpiW(str, seW))  return NS_START_TO_END;
 116     if(!strcmpiW(str, ssW))  return NS_START_TO_START;
 117     if(!strcmpiW(str, esW))  return NS_END_TO_START;
 118     if(!strcmpiW(str, eeW))  return NS_END_TO_END;
 119
 120     return -1;
 121 }
 122
 123 static PRUint16 get_node_type(nsIDOMNode *node)
 124 {
 125     PRUint16 type = 0xfff;
 126
 127     if(node)
 128         nsIDOMNode_GetNodeType(node, &type);
 129
 130     return type;
 131 }
 132
 133 static BOOL is_br_node(nsIDOMNode *node)
 134 {
 135     nsIDOMElement *elem;
 136     nsAString tag_str;
 137     const PRUnichar *tag;
 138     BOOL ret = FALSE;
 139     nsresult nsres;
 140
 141     nsres = nsIDOMNode_QueryInterface(node, &IID_nsIDOMElement, (void**)&elem);
 142     if(NS_FAILED(nsres))
 143         return FALSE;
 144
 145     nsAString_Init(&tag_str, NULL);
 146     nsIDOMElement_GetTagName(elem, &tag_str);
 147     nsIDOMElement_Release(elem);
 148     nsAString_GetData(&tag_str, &tag, 0);
 149
 150     if(!strcmpiW(tag, brW))
 151         ret = TRUE;
 152
 153     nsAString_Finish(&tag_str);
 154
 155     return ret;
 156 }
 157
 158 static void inline wstrbuf_init(wstrbuf_t *buf)
 159 {
 160     buf->len = 0;
 161     buf->size = 16;
 162     buf->buf = mshtml_alloc(buf->size * sizeof(WCHAR));
 163     *buf->buf = 0;
 164 }
 165
 166 static void inline wstrbuf_finish(wstrbuf_t *buf)
 167 {
 168     mshtml_free(buf->buf);
 169 }
 170
 171 static void wstrbuf_append_len(wstrbuf_t *buf, LPCWSTR str, int len)
 172 {
 173     if(buf->len+len >= buf->size) {
 174         buf->size = 2*buf->len+len;
 175         buf->buf = mshtml_realloc(buf->buf, buf->size * sizeof(WCHAR));
 176     }
 177
 178     memcpy(buf->buf+buf->len, str, len*sizeof(WCHAR));
 179     buf->len += len;
 180     buf->buf[buf->len] = 0;
 181 }
 182
 183 static void inline wstrbuf_append(wstrbuf_t *buf, LPCWSTR str)
 184 {
 185     wstrbuf_append_len(buf, str, strlenW(str));
 186 }
 187
 188 static void wstrbuf_append_node(wstrbuf_t *buf, nsIDOMNode *node)
 189 {
 190
 191     switch(get_node_type(node)) {
 192     case TEXT_NODE: {
 193         nsIDOMText *nstext;
 194         nsAString data_str;
 195         const PRUnichar *data;
 196
 197         nsIDOMNode_QueryInterface(node, &IID_nsIDOMText, (void**)&nstext);
 198
 199         nsAString_Init(&data_str, NULL);
 200         nsIDOMText_GetData(nstext, &data_str);
 201         nsAString_GetData(&data_str, &data, NULL);
 202         wstrbuf_append(buf, data);
 203         nsAString_Finish(&data_str);
 204
 205        nsIDOMText_Release(nstext);
 206
 207         break;
 208     }
 209     case ELEMENT_NODE:
 210         if(is_br_node(node)) {
 211             static const WCHAR endlW[] = {'\r','\n'};
 212             wstrbuf_append_len(buf, endlW, 2);
 213         }
 214     }
 215 }
 216
 217 static BOOL fill_nodestr(dompos_t *pos)
 218 {
 219     nsIDOMText *text;
 220     nsresult nsres;
 221
 222     if(pos->type != TEXT_NODE)
 223         return FALSE;
 224
 225     nsres = nsIDOMNode_QueryInterface(pos->node, &IID_nsIDOMText, (void**)&text);
 226     if(NS_FAILED(nsres))
 227         return FALSE;
 228
 229     nsAString_Init(&pos->str, NULL);
 230     nsIDOMText_GetData(text, &pos->str);
 231     nsIDOMText_Release(text);
 232     nsAString_GetData(&pos->str, &pos->p, NULL);
 233
 234     return TRUE;
 235 }
 236
 237 static nsIDOMNode *next_node(nsIDOMNode *iter)
 238 {
 239     nsIDOMNode *ret, *tmp;
 240     nsresult nsres;
 241
 242     if(!iter)
 243         return NULL;
 244
 245     nsres = nsIDOMNode_GetFirstChild(iter, &ret);
 246     if(NS_SUCCEEDED(nsres) && ret)
 247         return ret;
 248
 249     nsIDOMNode_AddRef(iter);
 250
 251     do {
 252         nsres = nsIDOMNode_GetNextSibling(iter, &ret);
 253         if(NS_SUCCEEDED(nsres) && ret) {
 254             nsIDOMNode_Release(iter);
 255             return ret;
 256         }
 257
 258         nsres = nsIDOMNode_GetParentNode(iter, &tmp);
 259         nsIDOMNode_Release(iter);
 260         iter = tmp;
 261     }while(NS_SUCCEEDED(nsres) && iter);
 262
 263     return NULL;
 264 }
 265
 266 static nsIDOMNode *prev_node(HTMLTxtRange *This, nsIDOMNode *iter)
 267 {
 268     nsIDOMNode *ret, *tmp;
 269     nsresult nsres;
 270
 271     if(!iter) {
 272         nsIDOMHTMLDocument *nshtmldoc;
 273         nsIDOMHTMLElement *nselem;
 274         nsIDOMDocument *nsdoc;
 275
 276         nsIWebNavigation_GetDocument(This->doc->nscontainer->navigation, &nsdoc);
 277         nsIDOMDocument_QueryInterface(nsdoc, &IID_nsIDOMHTMLDocument, (void**)&nshtmldoc);
 278         nsIDOMDocument_Release(nsdoc);
 279         nsIDOMHTMLDocument_GetBody(nshtmldoc, &nselem);
 280         nsIDOMHTMLDocument_Release(nshtmldoc);
 281
 282         nsIDOMElement_GetLastChild(nselem, &tmp);
 283         if(!tmp)
 284             return (nsIDOMNode*)nselem;
 285
 286         while(tmp) {
 287             ret = tmp;
 288             nsIDOMNode_GetLastChild(ret, &tmp);
 289         }
 290
 291         nsIDOMElement_Release(nselem);
 292
 293         return ret;
 294     }
 295
 296     nsres = nsIDOMNode_GetLastChild(iter, &ret);
 297     if(NS_SUCCEEDED(nsres) && ret)
 298         return ret;
 299
 300     nsIDOMNode_AddRef(iter);
 301
 302     do {
 303         nsres = nsIDOMNode_GetPreviousSibling(iter, &ret);
 304         if(NS_SUCCEEDED(nsres) && ret) {
 305             nsIDOMNode_Release(iter);
 306             return ret;
 307         }
 308
 309         nsres = nsIDOMNode_GetParentNode(iter, &tmp);
 310         nsIDOMNode_Release(iter);
 311         iter = tmp;
 312     }while(NS_SUCCEEDED(nsres) && iter);
 313
 314     return NULL;
 315 }
 316
 317 static nsIDOMNode *get_child_node(nsIDOMNode *node, PRUint32 off)
 318 {
 319     nsIDOMNodeList *node_list;
 320     nsIDOMNode *ret = NULL;
 321
 322     nsIDOMNode_GetChildNodes(node, &node_list);
 323     nsIDOMNodeList_Item(node_list, off, &ret);
 324     nsIDOMNodeList_Release(node_list);
 325
 326     return ret;
 327 }
 328
 329 static void get_cur_pos(HTMLTxtRange *This, BOOL start, dompos_t *pos)
 330 {
 331     nsIDOMNode *node;
 332     PRInt32 off;
 333
 334     pos->p = NULL;
 335
 336     if(!start) {
 337         PRBool collapsed;
 338         nsIDOMRange_GetCollapsed(This->nsrange, &collapsed);
 339         start = collapsed;
 340     }
 341
 342     if(start) {
 343         nsIDOMRange_GetStartContainer(This->nsrange, &node);
 344         nsIDOMRange_GetStartOffset(This->nsrange, &off);
 345     }else {
 346         nsIDOMRange_GetEndContainer(This->nsrange, &node);
 347         nsIDOMRange_GetEndOffset(This->nsrange, &off);
 348     }
 349
 350     pos->type = get_node_type(node);
 351     if(pos->type == ELEMENT_NODE) {
 352         if(start) {
 353             pos->node = get_child_node(node, off);
 354             pos->off = 0;
 355         }else {
 356             pos->node = off ? get_child_node(node, off-1) : prev_node(This, node);
 357             pos->off = -1;
 358         }
 359
 360         pos->type = get_node_type(pos->node);
 361         nsIDOMNode_Release(node);
 362     }else if(start) {
 363         pos->node = node;
 364         pos->off = off;
 365     }else if(off) {
 366         pos->node = node;
 367         pos->off = off-1;
 368     }else {
 369         pos->node = prev_node(This, node);
 370         pos->off = -1;
 371         nsIDOMNode_Release(node);
 372     }
 373
 374     if(pos->type == TEXT_NODE)
 375         fill_nodestr(pos);
 376 }
 377
 378 static void set_range_pos(HTMLTxtRange *This, BOOL start, dompos_t *pos)
 379 {
 380     nsresult nsres;
 381
 382     if(start) {
 383         if(pos->type == TEXT_NODE)
 384             nsres = nsIDOMRange_SetStart(This->nsrange, pos->node, pos->off);
 385         else
 386             nsres = nsIDOMRange_SetStartBefore(This->nsrange, pos->node);
 387     }else {
 388         if(pos->type == TEXT_NODE)
 389             nsres = nsIDOMRange_SetEnd(This->nsrange, pos->node, pos->off+1);
 390         else
 391             nsres = nsIDOMRange_SetEndAfter(This->nsrange, pos->node);
 392     }
 393
 394     if(NS_FAILED(nsres))
 395         ERR("failed: %p %08x\n", pos->node, nsres);
 396 }
 397
 398 static void inline dompos_release(dompos_t *pos)
 399 {
 400     if(pos->node)
 401         nsIDOMNode_Release(pos->node);
 402
 403     if(pos->p)
 404         nsAString_Finish(&pos->str);
 405 }
 406
 407 static void inline dompos_addref(dompos_t *pos)
 408 {
 409     if(pos->node)
 410         nsIDOMNode_AddRef(pos->node);
 411
 412     if(pos->type == TEXT_NODE)
 413         fill_nodestr(pos);
 414 }
 415
 416 static void range_to_string(HTMLTxtRange *This, wstrbuf_t *buf)
 417 {
 418     nsIDOMNode *iter, *tmp;
 419     dompos_t start_pos, end_pos;
 420     PRBool collapsed;
 421
 422     nsIDOMRange_GetCollapsed(This->nsrange, &collapsed);
 423     if(collapsed) {
 424         wstrbuf_finish(buf);
 425         buf->buf = NULL;
 426         buf->size = 0;
 427         return;
 428     }
 429
 430     get_cur_pos(This, FALSE, &end_pos);
 431     get_cur_pos(This, TRUE, &start_pos);
 432
 433     if(start_pos.type == TEXT_NODE) {
 434         if(start_pos.node == end_pos.node) {
 435             wstrbuf_append_len(buf, start_pos.p+start_pos.off, end_pos.off-start_pos.off+1);
 436             iter = start_pos.node;
 437             nsIDOMNode_AddRef(iter);
 438         }else {
 439             wstrbuf_append(buf, start_pos.p+start_pos.off);
 440             iter = next_node(start_pos.node);
 441         }
 442     }else {
 443         iter = start_pos.node;
 444         nsIDOMNode_AddRef(iter);
 445     }
 446
 447     while(iter != end_pos.node) {
 448         wstrbuf_append_node(buf, iter);
 449         tmp = next_node(iter);
 450         nsIDOMNode_Release(iter);
 451         iter = tmp;
 452     }
 453
 454     nsIDOMNode_AddRef(end_pos.node);
 455
 456     if(start_pos.node != end_pos.node && !is_br_node(end_pos.node))
 457         wstrbuf_append_len(buf, end_pos.p, end_pos.off+1);
 458
 459     nsIDOMNode_Release(iter);
 460     dompos_release(&start_pos);
 461     dompos_release(&end_pos);
 462 }
 463
 464 static WCHAR get_pos_char(const dompos_t *pos)
 465 {
 466     switch(pos->type) {
 467     case TEXT_NODE:
 468         return pos->p[pos->off];
 469     case ELEMENT_NODE:
 470         if(is_br_node(pos->node))
 471             return '\n';
 472     }
 473
 474     return 0;
 475 }
 476
 477 static WCHAR next_char(const dompos_t *pos, dompos_t *new_pos)
 478 {
 479     nsIDOMNode *iter, *tmp;
 480
 481     if(pos->type == TEXT_NODE && pos->off != -1 && pos->p[pos->off+1]) {
 482         *new_pos = *pos;
 483         new_pos->off++;
 484         dompos_addref(new_pos);
 485         return new_pos->p[new_pos->off];
 486     }
 487
 488     iter = next_node(pos->node);
 489     if(!iter)
 490         return 0;
 491
 492     while(1) {
 493         switch(get_node_type(iter)) {
 494         case TEXT_NODE:
 495             new_pos->node = iter;
 496             new_pos->type = TEXT_NODE;
 497             new_pos->off = 0;
 498             fill_nodestr(new_pos);
 499             return *new_pos->p;
 500
 501         case ELEMENT_NODE:
 502             if(!is_br_node(iter))
 503                 break;
 504
 505             new_pos->node = iter;
 506             new_pos->type = ELEMENT_NODE;
 507             new_pos->off = 0;
 508             new_pos->p = NULL;
 509             return '\n';
 510         }
 511
 512         tmp = iter;
 513         iter = next_node(iter);
 514         nsIDOMNode_Release(tmp);
 515
 516         if(!iter)
 517             break;
 518     }
 519
 520     return 0;
 521 }
 522
 523 static WCHAR prev_char(HTMLTxtRange *This, const dompos_t *pos, dompos_t *new_pos)
 524 {
 525     nsIDOMNode *iter, *tmp;
 526
 527     if(pos->type == TEXT_NODE && pos->off > 0) {
 528         *new_pos = *pos;
 529         new_pos->off--;
 530         dompos_addref(new_pos);
 531         return new_pos->p[new_pos->off];
 532     }
 533
 534     iter = prev_node(This, pos->node);
 535     if(!iter)
 536         return 0;
 537
 538     while(1) {
 539         switch(get_node_type(iter)) {
 540         case TEXT_NODE:
 541             new_pos->node = iter;
 542             new_pos->type = TEXT_NODE;
 543             fill_nodestr(new_pos);
 544             new_pos->off = strlenW(new_pos->p)-1;
 545             return new_pos->p[new_pos->off];
 546
 547         case ELEMENT_NODE:
 548             if(!is_br_node(iter))
 549                 break;
 550
 551             new_pos->node = iter;
 552             new_pos->type = ELEMENT_NODE;
 553             new_pos->off = 0;
 554             new_pos->p = NULL;
 555             return '\n';
 556         }
 557
 558         tmp = iter;
 559         iter = prev_node(This, iter);
 560         nsIDOMNode_Release(tmp);
 561
 562         if(!iter)
 563             break;
 564     }
 565
 566     *new_pos = *pos;
 567     dompos_addref(new_pos);
 568     return 0;
 569 }
 570
 571 static BOOL find_next_space(const dompos_t *pos, BOOL first_space, dompos_t *ret)
 572 {
 573     dompos_t iter, tmp;
 574     WCHAR c;
 575
 576     if(first_space) {
 577         c = get_pos_char(pos);
 578         if(c && isspaceW(c)) {
 579             *ret = *pos;
 580             dompos_addref(ret);
 581             return FALSE;
 582         }
 583     }
 584
 585     c = next_char(pos, &iter);
 586     if(!c) {
 587         *ret = *pos;
 588         dompos_addref(ret);
 589         return FALSE;
 590     }
 591
 592     while(!isspaceW(c)) {
 593         tmp = iter;
 594         c = next_char(&tmp, &iter);
 595         if(!c) {
 596             iter = tmp;
 597             break;
 598         }
 599         dompos_release(&tmp);
 600     }
 601
 602     *ret = iter;
 603     return TRUE;
 604 }
 605
 606 static long find_prev_space(HTMLTxtRange *This, const dompos_t *pos, BOOL first_space, dompos_t *ret)
 607 {
 608     dompos_t iter, tmp;
 609     WCHAR c;
 610
 611     c = prev_char(This, pos, &iter);
 612     if(!c || (first_space && isspaceW(c))) {
 613         *ret = *pos;
 614         dompos_addref(ret);
 615         return FALSE;
 616     }
 617
 618     while(1) {
 619         tmp = iter;
 620         c = prev_char(This, &tmp, &iter);
 621         if(!c || isspaceW(c)) {
 622             dompos_release(&iter);
 623             break;
 624         }
 625         dompos_release(&tmp);
 626     }
 627
 628     *ret = tmp;
 629     return TRUE;
 630 }
 631
 632 #define HTMLTXTRANGE_THIS(iface) DEFINE_THIS(HTMLTxtRange, HTMLTxtRange, iface)
 633
 634 static HRESULT WINAPI HTMLTxtRange_QueryInterface(IHTMLTxtRange *iface, REFIID riid, void **ppv)
 635 {
 636     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 637
 638     *ppv = NULL;
 639
 640     if(IsEqualGUID(&IID_IUnknown, riid)) {
 641         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
 642         *ppv = HTMLTXTRANGE(This);
 643     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
 644         TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
 645         *ppv = HTMLTXTRANGE(This);
 646     }else if(IsEqualGUID(&IID_IHTMLTxtRange, riid)) {
 647         TRACE("(%p)->(IID_IHTMLTxtRange %p)\n", This, ppv);
 648         *ppv = HTMLTXTRANGE(This);
 649     }
 650
 651     if(*ppv) {
 652         IUnknown_AddRef((IUnknown*)*ppv);
 653         return S_OK;
 654     }
 655
 656     WARN("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv);
 657     return E_NOINTERFACE;
 658 }
 659
 660 static ULONG WINAPI HTMLTxtRange_AddRef(IHTMLTxtRange *iface)
 661 {
 662     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 663     LONG ref = InterlockedIncrement(&This->ref);
 664
 665     TRACE("(%p) ref=%d\n", This, ref);
 666
 667     return ref;
 668 }
 669
 670 static ULONG WINAPI HTMLTxtRange_Release(IHTMLTxtRange *iface)
 671 {
 672     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 673     LONG ref = InterlockedDecrement(&This->ref);
 674
 675     TRACE("(%p) ref=%d\n", This, ref);
 676
 677     if(!ref) {
 678         if(This->nsrange)
 679             nsISelection_Release(This->nsrange);
 680         if(This->doc)
 681             list_remove(&This->entry);
 682         mshtml_free(This);
 683     }
 684
 685     return ref;
 686 }
 687
 688 static HRESULT WINAPI HTMLTxtRange_GetTypeInfoCount(IHTMLTxtRange *iface, UINT *pctinfo)
 689 {
 690     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 691     FIXME("(%p)->(%p)\n", This, pctinfo);
 692     return E_NOTIMPL;
 693 }
 694
 695 static HRESULT WINAPI HTMLTxtRange_GetTypeInfo(IHTMLTxtRange *iface, UINT iTInfo,
 696                                                LCID lcid, ITypeInfo **ppTInfo)
 697 {
 698     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 699     FIXME("(%p)->(%u %u %p)\n", This, iTInfo, lcid, ppTInfo);
 700     return E_NOTIMPL;
 701 }
 702
 703 static HRESULT WINAPI HTMLTxtRange_GetIDsOfNames(IHTMLTxtRange *iface, REFIID riid,
 704                                                  LPOLESTR *rgszNames, UINT cNames,
 705                                                  LCID lcid, DISPID *rgDispId)
 706 {
 707     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 708     FIXME("(%p)->(%s %p %u %u %p)\n", This, debugstr_guid(riid), rgszNames, cNames,
 709           lcid, rgDispId);
 710     return E_NOTIMPL;
 711 }
 712
 713 static HRESULT WINAPI HTMLTxtRange_Invoke(IHTMLTxtRange *iface, DISPID dispIdMember,
 714                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
 715                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
 716 {
 717     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 718     FIXME("(%p)->(%d %s %d %d %p %p %p %p)\n", This, dispIdMember, debugstr_guid(riid),
 719           lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 720     return E_NOTIMPL;
 721 }
 722
 723 static HRESULT WINAPI HTMLTxtRange_get_htmlText(IHTMLTxtRange *iface, BSTR *p)
 724 {
 725     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 726
 727     TRACE("(%p)->(%p)\n", This, p);
 728
 729     *p = NULL;
 730
 731     if(This->nsrange) {
 732         nsIDOMDocumentFragment *fragment;
 733         nsresult nsres;
 734
 735         nsres = nsIDOMRange_CloneContents(This->nsrange, &fragment);
 736         if(NS_SUCCEEDED(nsres)) {
 737             const PRUnichar *nstext;
 738             nsAString nsstr;
 739
 740             nsAString_Init(&nsstr, NULL);
 741             nsnode_to_nsstring((nsIDOMNode*)fragment, &nsstr);
 742             nsIDOMDocumentFragment_Release(fragment);
 743
 744             nsAString_GetData(&nsstr, &nstext, NULL);
 745             *p = SysAllocString(nstext);
 746
 747             nsAString_Finish(&nsstr);
 748         }
 749     }
 750
 751     if(!*p) {
 752         const WCHAR emptyW[] = {0};
 753         *p = SysAllocString(emptyW);
 754     }
 755
 756     TRACE("return %s\n", debugstr_w(*p));
 757     return S_OK;
 758 }
 759
 760 static HRESULT WINAPI HTMLTxtRange_put_text(IHTMLTxtRange *iface, BSTR v)
 761 {
 762     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 763     nsIDOMDocument *nsdoc;
 764     nsIDOMText *text_node;
 765     nsAString text_str;
 766     nsresult nsres;
 767
 768     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 769
 770     if(!This->doc)
 771         return MSHTML_E_NODOC;
 772
 773     nsres = nsIWebNavigation_GetDocument(This->doc->nscontainer->navigation, &nsdoc);
 774     if(NS_FAILED(nsres)) {
 775         ERR("GetDocument failed: %08x\n", nsres);
 776         return S_OK;
 777     }
 778
 779     nsAString_Init(&text_str, v);
 780     nsres = nsIDOMDocument_CreateTextNode(nsdoc, &text_str, &text_node);
 781     nsAString_Finish(&text_str);
 782     if(NS_FAILED(nsres)) {
 783         ERR("CreateTextNode failed: %08x\n", nsres);
 784         return S_OK;
 785     }
 786     nsres = nsIDOMRange_DeleteContents(This->nsrange);
 787     if(NS_FAILED(nsres))
 788         ERR("DeleteContents failed: %08x\n", nsres);
 789
 790     nsres = nsIDOMRange_InsertNode(This->nsrange, (nsIDOMNode*)text_node);
 791     if(NS_FAILED(nsres))
 792         ERR("InsertNode failed: %08x\n", nsres);
 793
 794     return S_OK;
 795 }
 796
 797 static HRESULT WINAPI HTMLTxtRange_get_text(IHTMLTxtRange *iface, BSTR *p)
 798 {
 799     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 800     wstrbuf_t buf;
 801
 802     TRACE("(%p)->(%p)\n", This, p);
 803
 804     wstrbuf_init(&buf);
 805     range_to_string(This, &buf);
 806     if(buf.buf)
 807         *p = SysAllocString(buf.buf);
 808     else
 809         *p = NULL;
 810     wstrbuf_finish(&buf);
 811
 812     TRACE("ret %s\n", debugstr_w(*p));
 813     return S_OK;
 814 }
 815
 816 static HRESULT WINAPI HTMLTxtRange_parentElement(IHTMLTxtRange *iface, IHTMLElement **parent)
 817 {
 818     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 819     nsIDOMNode *nsnode, *tmp;
 820     HTMLDOMNode *node;
 821     HRESULT hres;
 822
 823     TRACE("(%p)->(%p)\n", This, parent);
 824
 825     nsIDOMRange_GetCommonAncestorContainer(This->nsrange, &nsnode);
 826     while(nsnode && get_node_type(nsnode) != ELEMENT_NODE) {
 827         nsIDOMNode_GetParentNode(nsnode, &tmp);
 828         nsIDOMNode_Release(nsnode);
 829         nsnode = tmp;
 830     }
 831
 832     if(!nsnode) {
 833         *parent = NULL;
 834         return S_OK;
 835     }
 836
 837     node = get_node(This->doc, nsnode);
 838     nsIDOMNode_Release(nsnode);
 839
 840     hres = IHTMLDOMNode_QueryInterface(HTMLDOMNODE(node), &IID_IHTMLElement, (void**)parent);
 841
 842     IHTMLDOMNode_Release(HTMLDOMNODE(node));
 843     return hres;
 844 }
 845
 846 static HRESULT WINAPI HTMLTxtRange_duplicate(IHTMLTxtRange *iface, IHTMLTxtRange **Duplicate)
 847 {
 848     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 849     nsIDOMRange *nsrange = NULL;
 850
 851     TRACE("(%p)->(%p)\n", This, Duplicate);
 852
 853     nsIDOMRange_CloneRange(This->nsrange, &nsrange);
 854     *Duplicate = HTMLTxtRange_Create(This->doc, nsrange);
 855     nsIDOMRange_Release(nsrange);
 856
 857     return S_OK;
 858 }
 859
 860 static HRESULT WINAPI HTMLTxtRange_inRange(IHTMLTxtRange *iface, IHTMLTxtRange *Range,
 861         VARIANT_BOOL *InRange)
 862 {
 863     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 864     HTMLTxtRange *src_range;
 865     PRInt16 nsret = 0;
 866     nsresult nsres;
 867
 868     TRACE("(%p)->(%p %p)\n", This, Range, InRange);
 869
 870     *InRange = VARIANT_FALSE;
 871
 872     src_range = get_range_object(This->doc, Range);
 873     if(!src_range)
 874         return E_FAIL;
 875
 876     nsres = nsIDOMRange_CompareBoundaryPoints(This->nsrange, NS_START_TO_START,
 877             src_range->nsrange, &nsret);
 878     if(NS_SUCCEEDED(nsres) && nsret <= 0) {
 879         nsres = nsIDOMRange_CompareBoundaryPoints(This->nsrange, NS_END_TO_END,
 880                 src_range->nsrange, &nsret);
 881         if(NS_SUCCEEDED(nsres) && nsret >= 0)
 882             *InRange = VARIANT_TRUE;
 883     }
 884
 885     if(NS_FAILED(nsres))
 886         ERR("CompareBoundaryPoints failed: %08x\n", nsres);
 887
 888     return S_OK;
 889 }
 890
 891 static HRESULT WINAPI HTMLTxtRange_isEqual(IHTMLTxtRange *iface, IHTMLTxtRange *Range,
 892         VARIANT_BOOL *IsEqual)
 893 {
 894     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 895     HTMLTxtRange *src_range;
 896     PRInt16 nsret = 0;
 897     nsresult nsres;
 898
 899     TRACE("(%p)->(%p %p)\n", This, Range, IsEqual);
 900
 901     *IsEqual = VARIANT_FALSE;
 902
 903     src_range = get_range_object(This->doc, Range);
 904     if(!src_range)
 905         return E_FAIL;
 906
 907     nsres = nsIDOMRange_CompareBoundaryPoints(This->nsrange, NS_START_TO_START,
 908             src_range->nsrange, &nsret);
 909     if(NS_SUCCEEDED(nsres) && !nsret) {
 910         nsres = nsIDOMRange_CompareBoundaryPoints(This->nsrange, NS_END_TO_END,
 911                 src_range->nsrange, &nsret);
 912         if(NS_SUCCEEDED(nsres) && !nsret)
 913             *IsEqual = VARIANT_TRUE;
 914     }
 915
 916     if(NS_FAILED(nsres))
 917         ERR("CompareBoundaryPoints failed: %08x\n", nsres);
 918
 919     return S_OK;
 920 }
 921
 922 static HRESULT WINAPI HTMLTxtRange_scrollIntoView(IHTMLTxtRange *iface, VARIANT_BOOL fStart)
 923 {
 924     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 925     FIXME("(%p)->(%x)\n", This, fStart);
 926     return E_NOTIMPL;
 927 }
 928
 929 static HRESULT WINAPI HTMLTxtRange_collapse(IHTMLTxtRange *iface, VARIANT_BOOL Start)
 930 {
 931     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 932
 933     TRACE("(%p)->(%x)\n", This, Start);
 934
 935     nsIDOMRange_Collapse(This->nsrange, Start != VARIANT_FALSE);
 936     return S_OK;
 937 }
 938
 939 static HRESULT WINAPI HTMLTxtRange_expand(IHTMLTxtRange *iface, BSTR Unit, VARIANT_BOOL *Success)
 940 {
 941     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 942     range_unit_t unit;
 943
 944     TRACE("(%p)->(%s %p)\n", This, debugstr_w(Unit), Success);
 945
 946     unit = string_to_unit(Unit);
 947     if(unit == RU_UNKNOWN)
 948         return E_INVALIDARG;
 949
 950     switch(unit) {
 951     case RU_WORD: {
 952         dompos_t end_pos, start_pos, new_pos;
 953
 954         *Success = VARIANT_FALSE;
 955
 956         get_cur_pos(This, TRUE, &start_pos);
 957         get_cur_pos(This, FALSE, &end_pos);
 958         if(find_next_space(&end_pos, TRUE, &new_pos)) {
 959             set_range_pos(This, FALSE, &new_pos);
 960             *Success = VARIANT_TRUE;
 961         }
 962         dompos_release(&new_pos);
 963
 964         if(find_prev_space(This, &start_pos, TRUE, &new_pos)) {
 965             set_range_pos(This, TRUE, &new_pos);
 966             *Success = VARIANT_TRUE;
 967         }
 968
 969         dompos_release(&new_pos);
 970         dompos_release(&end_pos);
 971
 972         break;
 973     }
 974     default:
 975         FIXME("Unimplemented unit %s\n", debugstr_w(Unit));
 976     }
 977
 978     return S_OK;
 979 }
 980
 981 static HRESULT WINAPI HTMLTxtRange_move(IHTMLTxtRange *iface, BSTR Unit,
 982         long Count, long *ActualCount)
 983 {
 984     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 985     FIXME("(%p)->(%s %ld %p)\n", This, debugstr_w(Unit), Count, ActualCount);
 986     return E_NOTIMPL;
 987 }
 988
 989 static HRESULT WINAPI HTMLTxtRange_moveStart(IHTMLTxtRange *iface, BSTR Unit,
 990         long Count, long *ActualCount)
 991 {
 992     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
 993     FIXME("(%p)->(%s %ld %p)\n", This, debugstr_w(Unit), Count, ActualCount);
 994     return E_NOTIMPL;
 995 }
 996
 997 static HRESULT WINAPI HTMLTxtRange_moveEnd(IHTMLTxtRange *iface, BSTR Unit,
 998         long Count, long *ActualCount)
 999 {
1000     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1001     FIXME("(%p)->(%s %ld %p)\n", This, debugstr_w(Unit), Count, ActualCount);
1002     return E_NOTIMPL;
1003 }
1004
1005 static HRESULT WINAPI HTMLTxtRange_select(IHTMLTxtRange *iface)
1006 {
1007     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1008
1009     TRACE("(%p)\n", This);
1010
1011     if(This->doc->nscontainer) {
1012         nsIDOMWindow *dom_window = NULL;
1013         nsISelection *nsselection;
1014
1015         nsIWebBrowser_GetContentDOMWindow(This->doc->nscontainer->webbrowser, &dom_window);
1016         nsIDOMWindow_GetSelection(dom_window, &nsselection);
1017         nsIDOMWindow_Release(dom_window);
1018
1019         nsISelection_RemoveAllRanges(nsselection);
1020         nsISelection_AddRange(nsselection, This->nsrange);
1021
1022         nsISelection_Release(nsselection);
1023     }
1024
1025     return S_OK;
1026 }
1027
1028 static HRESULT WINAPI HTMLTxtRange_pasteHTML(IHTMLTxtRange *iface, BSTR html)
1029 {
1030     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1031     FIXME("(%p)->(%s)\n", This, debugstr_w(html));
1032     return E_NOTIMPL;
1033 }
1034
1035 static HRESULT WINAPI HTMLTxtRange_moveToElementText(IHTMLTxtRange *iface, IHTMLElement *element)
1036 {
1037     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1038     FIXME("(%p)->(%p)\n", This, element);
1039     return E_NOTIMPL;
1040 }
1041
1042 static HRESULT WINAPI HTMLTxtRange_setEndPoint(IHTMLTxtRange *iface, BSTR how,
1043         IHTMLTxtRange *SourceRange)
1044 {
1045     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1046     FIXME("(%p)->(%s %p)\n", This, debugstr_w(how), SourceRange);
1047     return E_NOTIMPL;
1048 }
1049
1050 static HRESULT WINAPI HTMLTxtRange_compareEndPoints(IHTMLTxtRange *iface, BSTR how,
1051         IHTMLTxtRange *SourceRange, long *ret)
1052 {
1053     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1054     HTMLTxtRange *src_range;
1055     PRInt16 nsret = 0;
1056     int nscmpt;
1057     nsresult nsres;
1058
1059     TRACE("(%p)->(%s %p %p)\n", This, debugstr_w(how), SourceRange, ret);
1060
1061     nscmpt = string_to_nscmptype(how);
1062     if(nscmpt == -1)
1063         return E_INVALIDARG;
1064
1065     src_range = get_range_object(This->doc, SourceRange);
1066     if(!src_range)
1067         return E_FAIL;
1068
1069     nsres = nsIDOMRange_CompareBoundaryPoints(This->nsrange, nscmpt, src_range->nsrange, &nsret);
1070     if(NS_FAILED(nsres))
1071         ERR("CompareBoundaryPoints failed: %08x\n", nsres);
1072
1073     *ret = nsret;
1074     return S_OK;
1075 }
1076
1077 static HRESULT WINAPI HTMLTxtRange_findText(IHTMLTxtRange *iface, BSTR String,
1078         long count, long Flags, VARIANT_BOOL *Success)
1079 {
1080     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1081     FIXME("(%p)->(%s %ld %08lx %p)\n", This, debugstr_w(String), count, Flags, Success);
1082     return E_NOTIMPL;
1083 }
1084
1085 static HRESULT WINAPI HTMLTxtRange_moveToPoint(IHTMLTxtRange *iface, long x, long y)
1086 {
1087     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1088     FIXME("(%p)->(%ld %ld)\n", This, x, y);
1089     return E_NOTIMPL;
1090 }
1091
1092 static HRESULT WINAPI HTMLTxtRange_getBookmark(IHTMLTxtRange *iface, BSTR *Bookmark)
1093 {
1094     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1095     FIXME("(%p)->(%p)\n", This, Bookmark);
1096     return E_NOTIMPL;
1097 }
1098
1099 static HRESULT WINAPI HTMLTxtRange_moveToBookmark(IHTMLTxtRange *iface, BSTR Bookmark,
1100         VARIANT_BOOL *Success)
1101 {
1102     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1103     FIXME("(%p)->(%s %p)\n", This, debugstr_w(Bookmark), Success);
1104     return E_NOTIMPL;
1105 }
1106
1107 static HRESULT WINAPI HTMLTxtRange_queryCommandSupported(IHTMLTxtRange *iface, BSTR cmdID,
1108         VARIANT_BOOL *pfRet)
1109 {
1110     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1111     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
1112     return E_NOTIMPL;
1113 }
1114
1115 static HRESULT WINAPI HTMLTxtRange_queryCommandEnabled(IHTMLTxtRange *iface, BSTR cmdID,
1116         VARIANT_BOOL *pfRet)
1117 {
1118     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1119     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
1120     return E_NOTIMPL;
1121 }
1122
1123 static HRESULT WINAPI HTMLTxtRange_queryCommandState(IHTMLTxtRange *iface, BSTR cmdID,
1124         VARIANT_BOOL *pfRet)
1125 {
1126     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1127     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
1128     return E_NOTIMPL;
1129 }
1130
1131 static HRESULT WINAPI HTMLTxtRange_queryCommandIndeterm(IHTMLTxtRange *iface, BSTR cmdID,
1132         VARIANT_BOOL *pfRet)
1133 {
1134     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1135     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
1136     return E_NOTIMPL;
1137 }
1138
1139 static HRESULT WINAPI HTMLTxtRange_queryCommandText(IHTMLTxtRange *iface, BSTR cmdID,
1140         BSTR *pcmdText)
1141 {
1142     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1143     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pcmdText);
1144     return E_NOTIMPL;
1145 }
1146
1147 static HRESULT WINAPI HTMLTxtRange_queryCommandValue(IHTMLTxtRange *iface, BSTR cmdID,
1148         VARIANT *pcmdValue)
1149 {
1150     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1151     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pcmdValue);
1152     return E_NOTIMPL;
1153 }
1154
1155 static HRESULT WINAPI HTMLTxtRange_execCommand(IHTMLTxtRange *iface, BSTR cmdID,
1156         VARIANT_BOOL showUI, VARIANT value, VARIANT_BOOL *pfRet)
1157 {
1158     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1159     FIXME("(%p)->(%s %x v %p)\n", This, debugstr_w(cmdID), showUI, pfRet);
1160     return E_NOTIMPL;
1161 }
1162
1163 static HRESULT WINAPI HTMLTxtRange_execCommandShowHelp(IHTMLTxtRange *iface, BSTR cmdID,
1164         VARIANT_BOOL *pfRet)
1165 {
1166     HTMLTxtRange *This = HTMLTXTRANGE_THIS(iface);
1167     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
1168     return E_NOTIMPL;
1169 }
1170
1171 #undef HTMLTXTRANGE_THIS
1172
1173 static const IHTMLTxtRangeVtbl HTMLTxtRangeVtbl = {
1174     HTMLTxtRange_QueryInterface,
1175     HTMLTxtRange_AddRef,
1176     HTMLTxtRange_Release,
1177     HTMLTxtRange_GetTypeInfoCount,
1178     HTMLTxtRange_GetTypeInfo,
1179     HTMLTxtRange_GetIDsOfNames,
1180     HTMLTxtRange_Invoke,
1181     HTMLTxtRange_get_htmlText,
1182     HTMLTxtRange_put_text,
1183     HTMLTxtRange_get_text,
1184     HTMLTxtRange_parentElement,
1185     HTMLTxtRange_duplicate,
1186     HTMLTxtRange_inRange,
1187     HTMLTxtRange_isEqual,
1188     HTMLTxtRange_scrollIntoView,
1189     HTMLTxtRange_collapse,
1190     HTMLTxtRange_expand,
1191     HTMLTxtRange_move,
1192     HTMLTxtRange_moveStart,
1193     HTMLTxtRange_moveEnd,
1194     HTMLTxtRange_select,
1195     HTMLTxtRange_pasteHTML,
1196     HTMLTxtRange_moveToElementText,
1197     HTMLTxtRange_setEndPoint,
1198     HTMLTxtRange_compareEndPoints,
1199     HTMLTxtRange_findText,
1200     HTMLTxtRange_moveToPoint,
1201     HTMLTxtRange_getBookmark,
1202     HTMLTxtRange_moveToBookmark,
1203     HTMLTxtRange_queryCommandSupported,
1204     HTMLTxtRange_queryCommandEnabled,
1205     HTMLTxtRange_queryCommandState,
1206     HTMLTxtRange_queryCommandIndeterm,
1207     HTMLTxtRange_queryCommandText,
1208     HTMLTxtRange_queryCommandValue,
1209     HTMLTxtRange_execCommand,
1210     HTMLTxtRange_execCommandShowHelp
1211 };
1212
1213 IHTMLTxtRange *HTMLTxtRange_Create(HTMLDocument *doc, nsIDOMRange *nsrange)
1214 {
1215     HTMLTxtRange *ret = mshtml_alloc(sizeof(HTMLTxtRange));
1216
1217     ret->lpHTMLTxtRangeVtbl = &HTMLTxtRangeVtbl;
1218     ret->ref = 1;
1219
1220     if(nsrange)
1221         nsIDOMRange_AddRef(nsrange);
1222     ret->nsrange = nsrange;
1223
1224     ret->doc = doc;
1225     list_add_head(&doc->range_list, &ret->entry);
1226
1227     return HTMLTXTRANGE(ret);
1228 }
1229
1230 void detach_ranges(HTMLDocument *This)
1231 {
1232     HTMLTxtRange *iter;
1233
1234     LIST_FOR_EACH_ENTRY(iter, &This->range_list, HTMLTxtRange, entry) {
1235         iter->doc = NULL;
1236     }
1237 }