git.oblomov.eu Git - wine/blob - dlls/msxml3/cdata.c

   1 /*
   2  *    DOM CDATA node implementation
   3  *
   4  * Copyright 2007 Alistair Leslie-Hughes
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #define COBJMACROS
  22
  23 #include "config.h"
  24
  25 #include <stdarg.h>
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "winuser.h"
  29 #include "ole2.h"
  30 #include "msxml2.h"
  31
  32 #include "msxml_private.h"
  33
  34 #include "wine/debug.h"
  35
  36 WINE_DEFAULT_DEBUG_CHANNEL(msxml);
  37
  38 #ifdef HAVE_LIBXML2
  39
  40 typedef struct _domcdata
  41 {
  42     const struct IXMLDOMCDATASectionVtbl *lpVtbl;
  43     LONG ref;
  44     xmlnode *node;
  45 } domcdata;
  46
  47 static inline domcdata *impl_from_IXMLDOMCDATASection( IXMLDOMCDATASection *iface )
  48 {
  49     return (domcdata *)((char*)iface - FIELD_OFFSET(domcdata, lpVtbl));
  50 }
  51
  52 static HRESULT WINAPI domcdata_QueryInterface(
  53     IXMLDOMCDATASection *iface,
  54     REFIID riid,
  55     void** ppvObject )
  56 {
  57     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
  58     TRACE("%p %s %p\n", This, debugstr_guid(riid), ppvObject);
  59
  60     if ( IsEqualGUID( riid, &IID_IXMLDOMCDATASection ) ||
  61          IsEqualGUID( riid, &IID_IXMLDOMCharacterData) ||
  62          IsEqualGUID( riid, &IID_IDispatch ) ||
  63          IsEqualGUID( riid, &IID_IUnknown ) )
  64     {
  65         *ppvObject = iface;
  66     }
  67     else if ( IsEqualGUID( riid, &IID_IXMLDOMNode ) )
  68     {
  69         *ppvObject = IXMLDOMNode_from_impl(This->node);
  70     }
  71     else if ( IsEqualGUID( riid, &IID_IXMLDOMText ) ||
  72               IsEqualGUID( riid, &IID_IXMLDOMElement ) )
  73     {
  74         TRACE("Unsupported interface\n");
  75         return E_NOINTERFACE;
  76     }
  77     else
  78     {
  79         FIXME("Unsupported interface %s\n", debugstr_guid(riid));
  80         return E_NOINTERFACE;
  81     }
  82
  83     IXMLDOMText_AddRef((IUnknown*)*ppvObject);
  84     return S_OK;
  85 }
  86
  87 static ULONG WINAPI domcdata_AddRef(
  88     IXMLDOMCDATASection *iface )
  89 {
  90     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
  91     return InterlockedIncrement( &This->ref );
  92 }
  93
  94 static ULONG WINAPI domcdata_Release(
  95     IXMLDOMCDATASection *iface )
  96 {
  97     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
  98     ULONG ref;
  99
 100     ref = InterlockedDecrement( &This->ref );
 101     if ( ref == 0 )
 102     {
 103         IXMLDOMNode_Release(IXMLDOMNode_from_impl(This->node));
 104         HeapFree( GetProcessHeap(), 0, This );
 105     }
 106
 107     return ref;
 108 }
 109
 110 static HRESULT WINAPI domcdata_GetTypeInfoCount(
 111     IXMLDOMCDATASection *iface,
 112     UINT* pctinfo )
 113 {
 114     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 115
 116     TRACE("(%p)->(%p)\n", This, pctinfo);
 117
 118     *pctinfo = 1;
 119
 120     return S_OK;
 121 }
 122
 123 static HRESULT WINAPI domcdata_GetTypeInfo(
 124     IXMLDOMCDATASection *iface,
 125     UINT iTInfo, LCID lcid,
 126     ITypeInfo** ppTInfo )
 127 {
 128     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 129     HRESULT hr;
 130
 131     TRACE("(%p)->(%u %u %p)\n", This, iTInfo, lcid, ppTInfo);
 132
 133     hr = get_typeinfo(IXMLDOMCDATASection_tid, ppTInfo);
 134
 135     return hr;
 136 }
 137
 138 static HRESULT WINAPI domcdata_GetIDsOfNames(
 139     IXMLDOMCDATASection *iface,
 140     REFIID riid, LPOLESTR* rgszNames,
 141     UINT cNames, LCID lcid, DISPID* rgDispId )
 142 {
 143     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 144     ITypeInfo *typeinfo;
 145     HRESULT hr;
 146
 147     TRACE("(%p)->(%s %p %u %u %p)\n", This, debugstr_guid(riid), rgszNames, cNames,
 148           lcid, rgDispId);
 149
 150     if(!rgszNames || cNames == 0 || !rgDispId)
 151         return E_INVALIDARG;
 152
 153     hr = get_typeinfo(IXMLDOMCDATASection_tid, &typeinfo);
 154     if(SUCCEEDED(hr))
 155     {
 156         hr = ITypeInfo_GetIDsOfNames(typeinfo, rgszNames, cNames, rgDispId);
 157         ITypeInfo_Release(typeinfo);
 158     }
 159
 160     return hr;
 161 }
 162
 163 static HRESULT WINAPI domcdata_Invoke(
 164     IXMLDOMCDATASection *iface,
 165     DISPID dispIdMember, REFIID riid, LCID lcid,
 166     WORD wFlags, DISPPARAMS* pDispParams, VARIANT* pVarResult,
 167     EXCEPINFO* pExcepInfo, UINT* puArgErr )
 168 {
 169     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 170     ITypeInfo *typeinfo;
 171     HRESULT hr;
 172
 173     TRACE("(%p)->(%d %s %d %d %p %p %p %p)\n", This, dispIdMember, debugstr_guid(riid),
 174           lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 175
 176     hr = get_typeinfo(IXMLDOMCDATASection_tid, &typeinfo);
 177     if(SUCCEEDED(hr))
 178     {
 179         hr = ITypeInfo_Invoke(typeinfo, &(This->lpVtbl), dispIdMember, wFlags, pDispParams,
 180                 pVarResult, pExcepInfo, puArgErr);
 181         ITypeInfo_Release(typeinfo);
 182     }
 183
 184     return hr;
 185 }
 186
 187 static HRESULT WINAPI domcdata_get_nodeName(
 188     IXMLDOMCDATASection *iface,
 189     BSTR* p )
 190 {
 191     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 192     return IXMLDOMNode_get_nodeName( IXMLDOMNode_from_impl(This->node), p );
 193 }
 194
 195 static HRESULT WINAPI domcdata_get_nodeValue(
 196     IXMLDOMCDATASection *iface,
 197     VARIANT* var1 )
 198 {
 199     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 200     return IXMLDOMNode_get_nodeValue( IXMLDOMNode_from_impl(This->node), var1 );
 201 }
 202
 203 static HRESULT WINAPI domcdata_put_nodeValue(
 204     IXMLDOMCDATASection *iface,
 205     VARIANT var1 )
 206 {
 207     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 208     return IXMLDOMNode_put_nodeValue( IXMLDOMNode_from_impl(This->node), var1 );
 209 }
 210
 211 static HRESULT WINAPI domcdata_get_nodeType(
 212     IXMLDOMCDATASection *iface,
 213     DOMNodeType* domNodeType )
 214 {
 215     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 216     return IXMLDOMNode_get_nodeType( IXMLDOMNode_from_impl(This->node), domNodeType );
 217 }
 218
 219 static HRESULT WINAPI domcdata_get_parentNode(
 220     IXMLDOMCDATASection *iface,
 221     IXMLDOMNode** parent )
 222 {
 223     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 224     return IXMLDOMNode_get_parentNode( IXMLDOMNode_from_impl(This->node), parent );
 225 }
 226
 227 static HRESULT WINAPI domcdata_get_childNodes(
 228     IXMLDOMCDATASection *iface,
 229     IXMLDOMNodeList** outList)
 230 {
 231     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 232     return IXMLDOMNode_get_childNodes( IXMLDOMNode_from_impl(This->node), outList );
 233 }
 234
 235 static HRESULT WINAPI domcdata_get_firstChild(
 236     IXMLDOMCDATASection *iface,
 237     IXMLDOMNode** domNode)
 238 {
 239     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 240     return IXMLDOMNode_get_firstChild( IXMLDOMNode_from_impl(This->node), domNode );
 241 }
 242
 243 static HRESULT WINAPI domcdata_get_lastChild(
 244     IXMLDOMCDATASection *iface,
 245     IXMLDOMNode** domNode)
 246 {
 247     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 248     return IXMLDOMNode_get_lastChild( IXMLDOMNode_from_impl(This->node), domNode );
 249 }
 250
 251 static HRESULT WINAPI domcdata_get_previousSibling(
 252     IXMLDOMCDATASection *iface,
 253     IXMLDOMNode** domNode)
 254 {
 255     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 256     return IXMLDOMNode_get_previousSibling( IXMLDOMNode_from_impl(This->node), domNode );
 257 }
 258
 259 static HRESULT WINAPI domcdata_get_nextSibling(
 260     IXMLDOMCDATASection *iface,
 261     IXMLDOMNode** domNode)
 262 {
 263     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 264     return IXMLDOMNode_get_nextSibling( IXMLDOMNode_from_impl(This->node), domNode );
 265 }
 266
 267 static HRESULT WINAPI domcdata_get_attributes(
 268     IXMLDOMCDATASection *iface,
 269     IXMLDOMNamedNodeMap** attributeMap)
 270 {
 271         domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 272     return IXMLDOMNode_get_attributes( IXMLDOMNode_from_impl(This->node), attributeMap );
 273 }
 274
 275 static HRESULT WINAPI domcdata_insertBefore(
 276     IXMLDOMCDATASection *iface,
 277     IXMLDOMNode* newNode, VARIANT var1,
 278     IXMLDOMNode** outOldNode)
 279 {
 280     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 281     return IXMLDOMNode_insertBefore( IXMLDOMNode_from_impl(This->node), newNode, var1, outOldNode );
 282 }
 283
 284 static HRESULT WINAPI domcdata_replaceChild(
 285     IXMLDOMCDATASection *iface,
 286     IXMLDOMNode* newNode,
 287     IXMLDOMNode* oldNode,
 288     IXMLDOMNode** outOldNode)
 289 {
 290     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 291     return IXMLDOMNode_replaceChild( IXMLDOMNode_from_impl(This->node), newNode, oldNode, outOldNode );
 292 }
 293
 294 static HRESULT WINAPI domcdata_removeChild(
 295     IXMLDOMCDATASection *iface,
 296     IXMLDOMNode* domNode, IXMLDOMNode** oldNode)
 297 {
 298     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 299     return IXMLDOMNode_removeChild( IXMLDOMNode_from_impl(This->node), domNode, oldNode );
 300 }
 301
 302 static HRESULT WINAPI domcdata_appendChild(
 303     IXMLDOMCDATASection *iface,
 304     IXMLDOMNode* newNode, IXMLDOMNode** outNewNode)
 305 {
 306     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 307     return IXMLDOMNode_appendChild( IXMLDOMNode_from_impl(This->node), newNode, outNewNode );
 308 }
 309
 310 static HRESULT WINAPI domcdata_hasChildNodes(
 311     IXMLDOMCDATASection *iface,
 312     VARIANT_BOOL* pbool)
 313 {
 314     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 315     return IXMLDOMNode_hasChildNodes( IXMLDOMNode_from_impl(This->node), pbool );
 316 }
 317
 318 static HRESULT WINAPI domcdata_get_ownerDocument(
 319     IXMLDOMCDATASection *iface,
 320     IXMLDOMDocument** domDocument)
 321 {
 322     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 323     return IXMLDOMNode_get_ownerDocument( IXMLDOMNode_from_impl(This->node), domDocument );
 324 }
 325
 326 static HRESULT WINAPI domcdata_cloneNode(
 327     IXMLDOMCDATASection *iface,
 328     VARIANT_BOOL pbool, IXMLDOMNode** outNode)
 329 {
 330     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 331     return IXMLDOMNode_cloneNode( IXMLDOMNode_from_impl(This->node), pbool, outNode );
 332 }
 333
 334 static HRESULT WINAPI domcdata_get_nodeTypeString(
 335     IXMLDOMCDATASection *iface,
 336     BSTR* p)
 337 {
 338     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 339     return IXMLDOMNode_get_nodeTypeString( IXMLDOMNode_from_impl(This->node), p );
 340 }
 341
 342 static HRESULT WINAPI domcdata_get_text(
 343     IXMLDOMCDATASection *iface,
 344     BSTR* p)
 345 {
 346     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 347     return IXMLDOMNode_get_text( IXMLDOMNode_from_impl(This->node), p );
 348 }
 349
 350 static HRESULT WINAPI domcdata_put_text(
 351     IXMLDOMCDATASection *iface,
 352     BSTR p)
 353 {
 354     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 355     return IXMLDOMNode_put_text( IXMLDOMNode_from_impl(This->node), p );
 356 }
 357
 358 static HRESULT WINAPI domcdata_get_specified(
 359     IXMLDOMCDATASection *iface,
 360     VARIANT_BOOL* pbool)
 361 {
 362     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 363     return IXMLDOMNode_get_specified( IXMLDOMNode_from_impl(This->node), pbool );
 364 }
 365
 366 static HRESULT WINAPI domcdata_get_definition(
 367     IXMLDOMCDATASection *iface,
 368     IXMLDOMNode** domNode)
 369 {
 370     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 371     return IXMLDOMNode_get_definition( IXMLDOMNode_from_impl(This->node), domNode );
 372 }
 373
 374 static HRESULT WINAPI domcdata_get_nodeTypedValue(
 375     IXMLDOMCDATASection *iface,
 376     VARIANT* var1)
 377 {
 378     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 379     return IXMLDOMNode_get_nodeTypedValue( IXMLDOMNode_from_impl(This->node), var1 );
 380 }
 381
 382 static HRESULT WINAPI domcdata_put_nodeTypedValue(
 383     IXMLDOMCDATASection *iface,
 384     VARIANT var1)
 385 {
 386     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 387     return IXMLDOMNode_put_nodeTypedValue( IXMLDOMNode_from_impl(This->node), var1 );
 388 }
 389
 390 static HRESULT WINAPI domcdata_get_dataType(
 391     IXMLDOMCDATASection *iface,
 392     VARIANT* var1)
 393 {
 394     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 395     return IXMLDOMNode_get_dataType( IXMLDOMNode_from_impl(This->node), var1 );
 396 }
 397
 398 static HRESULT WINAPI domcdata_put_dataType(
 399     IXMLDOMCDATASection *iface,
 400     BSTR p)
 401 {
 402     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 403     return IXMLDOMNode_put_dataType( IXMLDOMNode_from_impl(This->node), p );
 404 }
 405
 406 static HRESULT WINAPI domcdata_get_xml(
 407     IXMLDOMCDATASection *iface,
 408     BSTR* p)
 409 {
 410     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 411     return IXMLDOMNode_get_xml( IXMLDOMNode_from_impl(This->node), p );
 412 }
 413
 414 static HRESULT WINAPI domcdata_transformNode(
 415     IXMLDOMCDATASection *iface,
 416     IXMLDOMNode* domNode, BSTR* p)
 417 {
 418     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 419     return IXMLDOMNode_transformNode( IXMLDOMNode_from_impl(This->node), domNode, p );
 420 }
 421
 422 static HRESULT WINAPI domcdata_selectNodes(
 423     IXMLDOMCDATASection *iface,
 424     BSTR p, IXMLDOMNodeList** outList)
 425 {
 426     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 427     return IXMLDOMNode_selectNodes( IXMLDOMNode_from_impl(This->node), p, outList );
 428 }
 429
 430 static HRESULT WINAPI domcdata_selectSingleNode(
 431     IXMLDOMCDATASection *iface,
 432     BSTR p, IXMLDOMNode** outNode)
 433 {
 434     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 435     return IXMLDOMNode_selectSingleNode( IXMLDOMNode_from_impl(This->node), p, outNode );
 436 }
 437
 438 static HRESULT WINAPI domcdata_get_parsed(
 439     IXMLDOMCDATASection *iface,
 440     VARIANT_BOOL* pbool)
 441 {
 442     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 443     return IXMLDOMNode_get_parsed( IXMLDOMNode_from_impl(This->node), pbool );
 444 }
 445
 446 static HRESULT WINAPI domcdata_get_namespaceURI(
 447     IXMLDOMCDATASection *iface,
 448     BSTR* p)
 449 {
 450     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 451     return IXMLDOMNode_get_namespaceURI( IXMLDOMNode_from_impl(This->node), p );
 452 }
 453
 454 static HRESULT WINAPI domcdata_get_prefix(
 455     IXMLDOMCDATASection *iface,
 456     BSTR* p)
 457 {
 458     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 459     return IXMLDOMNode_get_prefix( IXMLDOMNode_from_impl(This->node), p );
 460 }
 461
 462 static HRESULT WINAPI domcdata_get_baseName(
 463     IXMLDOMCDATASection *iface,
 464     BSTR* p)
 465 {
 466     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 467     return IXMLDOMNode_get_baseName( IXMLDOMNode_from_impl(This->node), p );
 468 }
 469
 470 static HRESULT WINAPI domcdata_transformNodeToObject(
 471     IXMLDOMCDATASection *iface,
 472     IXMLDOMNode* domNode, VARIANT var1)
 473 {
 474     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 475     return IXMLDOMNode_transformNodeToObject( IXMLDOMNode_from_impl(This->node), domNode, var1 );
 476 }
 477
 478 static HRESULT WINAPI domcdata_get_data(
 479     IXMLDOMCDATASection *iface,
 480     BSTR *p)
 481 {
 482     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 483     HRESULT hr = E_FAIL;
 484     VARIANT vRet;
 485
 486     if(!p)
 487         return E_INVALIDARG;
 488
 489     hr = IXMLDOMNode_get_nodeValue( IXMLDOMNode_from_impl(This->node), &vRet );
 490     if(hr == S_OK)
 491     {
 492         *p = V_BSTR(&vRet);
 493     }
 494
 495     return hr;
 496 }
 497
 498 static HRESULT WINAPI domcdata_put_data(
 499     IXMLDOMCDATASection *iface,
 500     BSTR data)
 501 {
 502     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 503     HRESULT hr = E_FAIL;
 504     VARIANT val;
 505
 506     TRACE("%p %s\n", This, debugstr_w(data) );
 507
 508     V_VT(&val) = VT_BSTR;
 509     V_BSTR(&val) = data;
 510
 511     hr = IXMLDOMNode_put_nodeValue( IXMLDOMNode_from_impl(This->node), val );
 512
 513     return hr;
 514 }
 515
 516 static HRESULT WINAPI domcdata_get_length(
 517     IXMLDOMCDATASection *iface,
 518     LONG *len)
 519 {
 520     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 521     xmlChar *pContent;
 522     LONG nLength = 0;
 523
 524     TRACE("%p\n", iface);
 525
 526     if(!len)
 527         return E_INVALIDARG;
 528
 529     pContent = xmlNodeGetContent(This->node->node);
 530     if(pContent)
 531     {
 532         nLength = xmlStrlen(pContent);
 533         xmlFree(pContent);
 534     }
 535
 536     *len = nLength;
 537
 538     return S_OK;
 539 }
 540
 541 static HRESULT WINAPI domcdata_substringData(
 542     IXMLDOMCDATASection *iface,
 543     LONG offset, LONG count, BSTR *p)
 544 {
 545     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 546     xmlChar *pContent;
 547     LONG nLength = 0;
 548     HRESULT hr = S_FALSE;
 549
 550     TRACE("%p\n", iface);
 551
 552     if(!p)
 553         return E_INVALIDARG;
 554
 555     *p = NULL;
 556     if(offset < 0 || count < 0)
 557         return E_INVALIDARG;
 558
 559     if(count == 0)
 560         return hr;
 561
 562     pContent = xmlNodeGetContent(This->node->node);
 563     if(pContent)
 564     {
 565         nLength = xmlStrlen(pContent);
 566
 567         if( offset < nLength)
 568         {
 569             BSTR sContent = bstr_from_xmlChar(pContent);
 570             if(offset + count > nLength)
 571                 *p = SysAllocString(&sContent[offset]);
 572             else
 573                 *p = SysAllocStringLen(&sContent[offset], count);
 574
 575             SysFreeString(sContent);
 576             hr = S_OK;
 577         }
 578
 579         xmlFree(pContent);
 580     }
 581
 582     return hr;
 583 }
 584
 585 static HRESULT WINAPI domcdata_appendData(
 586     IXMLDOMCDATASection *iface,
 587     BSTR p)
 588 {
 589     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 590     xmlChar *pContent;
 591     HRESULT hr = S_FALSE;
 592
 593     TRACE("%p\n", iface);
 594
 595     /* Nothing to do if NULL or an Empty string passed in. */
 596     if(p == NULL || SysStringLen(p) == 0)
 597         return S_OK;
 598
 599     pContent = xmlChar_from_wchar( p );
 600     if(pContent)
 601     {
 602         if(xmlTextConcat(This->node->node, pContent, SysStringLen(p) ) == 0)
 603             hr = S_OK;
 604         else
 605             hr = E_FAIL;
 606     }
 607     else
 608         hr = E_FAIL;
 609     HeapFree(GetProcessHeap(), 0, pContent);
 610
 611     return hr;
 612 }
 613
 614 static HRESULT WINAPI domcdata_insertData(
 615     IXMLDOMCDATASection *iface,
 616     LONG offset, BSTR p)
 617 {
 618     domcdata *This = impl_from_IXMLDOMCDATASection( iface );
 619     xmlChar *pXmlContent;
 620     BSTR sNewString;
 621     HRESULT hr = S_FALSE;
 622     LONG nLength = 0, nLengthP = 0;
 623     xmlChar *str = NULL;
 624
 625     TRACE("%p\n", This);
 626
 627     /* If have a NULL or empty string, don't do anything. */
 628     if(SysStringLen(p) == 0)
 629         return S_OK;
 630
 631     if(offset < 0)
 632     {
 633         return E_INVALIDARG;
 634     }
 635
 636     pXmlContent = xmlNodeGetContent(This->node->node);
 637     if(pXmlContent)
 638     {
 639         BSTR sContent = bstr_from_xmlChar( pXmlContent );
 640         nLength = SysStringLen(sContent);
 641         nLengthP = SysStringLen(p);
 642
 643         if(nLength < offset)
 644         {
 645             SysFreeString(sContent);
 646             xmlFree(pXmlContent);
 647
 648             return E_INVALIDARG;
 649         }
 650
 651         sNewString = SysAllocStringLen(NULL, nLength + nLengthP + 1);
 652         if(sNewString)
 653         {
 654             if(offset > 0)
 655                 memcpy(sNewString, sContent, offset * sizeof(WCHAR));
 656
 657             memcpy(&sNewString[offset], p, nLengthP * sizeof(WCHAR));
 658
 659             if(offset+nLengthP < nLength)
 660                 memcpy(&sNewString[offset+nLengthP], &sContent[offset], (nLength-offset) * sizeof(WCHAR));
 661
 662             sNewString[nLengthP + nLength] = 0;
 663
 664             str = xmlChar_from_wchar(sNewString);
 665             if(str)
 666             {
 667                 xmlNodeSetContent(This->node->node, str);
 668                 hr = S_OK;
 669             }
 670             HeapFree(GetProcessHeap(), 0, str);
 671
 672             SysFreeString(sNewString);
 673         }
 674
 675         SysFreeString(sContent);
 676
 677         xmlFree(pXmlContent);
 678     }
 679
 680     return hr;
 681 }
 682
 683 static HRESULT WINAPI domcdata_deleteData(
 684     IXMLDOMCDATASection *iface,
 685     LONG offset, LONG count)
 686 {
 687     FIXME("\n");
 688     return E_NOTIMPL;
 689 }
 690
 691 static HRESULT WINAPI domcdata_replaceData(
 692     IXMLDOMCDATASection *iface,
 693     LONG offset, LONG count, BSTR p)
 694 {
 695     FIXME("\n");
 696     return E_NOTIMPL;
 697 }
 698
 699 static HRESULT WINAPI domcdata_splitText(
 700     IXMLDOMCDATASection *iface,
 701     LONG offset, IXMLDOMText **txtNode)
 702 {
 703     FIXME("\n");
 704     return E_NOTIMPL;
 705 }
 706
 707
 708 static const struct IXMLDOMCDATASectionVtbl domcdata_vtbl =
 709 {
 710     domcdata_QueryInterface,
 711     domcdata_AddRef,
 712     domcdata_Release,
 713     domcdata_GetTypeInfoCount,
 714     domcdata_GetTypeInfo,
 715     domcdata_GetIDsOfNames,
 716     domcdata_Invoke,
 717     domcdata_get_nodeName,
 718     domcdata_get_nodeValue,
 719     domcdata_put_nodeValue,
 720     domcdata_get_nodeType,
 721     domcdata_get_parentNode,
 722     domcdata_get_childNodes,
 723     domcdata_get_firstChild,
 724     domcdata_get_lastChild,
 725     domcdata_get_previousSibling,
 726     domcdata_get_nextSibling,
 727     domcdata_get_attributes,
 728     domcdata_insertBefore,
 729     domcdata_replaceChild,
 730     domcdata_removeChild,
 731     domcdata_appendChild,
 732     domcdata_hasChildNodes,
 733     domcdata_get_ownerDocument,
 734     domcdata_cloneNode,
 735     domcdata_get_nodeTypeString,
 736     domcdata_get_text,
 737     domcdata_put_text,
 738     domcdata_get_specified,
 739     domcdata_get_definition,
 740     domcdata_get_nodeTypedValue,
 741     domcdata_put_nodeTypedValue,
 742     domcdata_get_dataType,
 743     domcdata_put_dataType,
 744     domcdata_get_xml,
 745     domcdata_transformNode,
 746     domcdata_selectNodes,
 747     domcdata_selectSingleNode,
 748     domcdata_get_parsed,
 749     domcdata_get_namespaceURI,
 750     domcdata_get_prefix,
 751     domcdata_get_baseName,
 752     domcdata_transformNodeToObject,
 753     domcdata_get_data,
 754     domcdata_put_data,
 755     domcdata_get_length,
 756     domcdata_substringData,
 757     domcdata_appendData,
 758     domcdata_insertData,
 759     domcdata_deleteData,
 760     domcdata_replaceData,
 761     domcdata_splitText
 762 };
 763
 764 IUnknown* create_cdata( xmlNodePtr text )
 765 {
 766     domcdata *This;
 767
 768     This = HeapAlloc( GetProcessHeap(), 0, sizeof *This );
 769     if ( !This )
 770         return NULL;
 771
 772     This->lpVtbl = &domcdata_vtbl;
 773     This->ref = 1;
 774
 775     This->node = create_basic_node( text, (IUnknown*)&This->lpVtbl, NULL );
 776     if(!This->node)
 777     {
 778         HeapFree(GetProcessHeap(), 0, This);
 779         return NULL;
 780     }
 781
 782     return (IUnknown*) &This->lpVtbl;
 783 }
 784
 785 #endif