sal/workben/clipboardwben/testcopy/XTDataObject.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: XTDataObject.cxx,v $
  10  * $Revision: 1.6 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_sal.hxx"
  33
  34 //------------------------------------------------------------------------
  35 // includes
  36 //------------------------------------------------------------------------
  37 #include <osl/diagnose.h>
  38
  39 #ifndef _TWRAPPERDATAOBJECT_HXX_
  40 #include "XTDataObject.hxx"
  41 #endif
  42
  43 #include <windows.h>
  44 #include <ole2.h>
  45 #include <memory>
  46
  47 //------------------------------------------------------------------------
  48 // namespace directives
  49 //------------------------------------------------------------------------
  50
  51
  52 //============================================================================
  53 // OTWrapperDataObject
  54 //============================================================================
  55
  56 //------------------------------------------------------------------------
  57 // ctor
  58 //------------------------------------------------------------------------
  59
  60 CXTDataObject::CXTDataObject( LONG nRefCntInitVal ) :
  61     m_nRefCnt( nRefCntInitVal )
  62 {
  63 }
  64
  65 //------------------------------------------------------------------------
  66 // dtor
  67 //------------------------------------------------------------------------
  68
  69 CXTDataObject::~CXTDataObject( )
  70 {
  71 }
  72
  73 //------------------------------------------------------------------------
  74 // IUnknown->QueryInterface
  75 //------------------------------------------------------------------------
  76
  77 STDMETHODIMP CXTDataObject::QueryInterface( REFIID iid, LPVOID* ppvObject )
  78 {
  79     OSL_ASSERT( NULL != ppvObject );
  80
  81     if ( NULL == ppvObject )
  82         return E_INVALIDARG;
  83
  84     HRESULT hr = E_NOINTERFACE;
  85
  86     *ppvObject = NULL;
  87
  88     if ( ( __uuidof( IUnknown ) == iid ) || ( __uuidof( IDataObject ) == iid ) )
  89     {
  90         *ppvObject = static_cast< IUnknown* >( this );
  91         ( (LPUNKNOWN)*ppvObject )->AddRef( );
  92         hr = S_OK;
  93     }
  94
  95     return hr;
  96 }
  97
  98 //------------------------------------------------------------------------
  99 // IUnknown->AddRef
 100 //------------------------------------------------------------------------
 101
 102 STDMETHODIMP_(ULONG) CXTDataObject::AddRef( )
 103 {
 104     return static_cast< ULONG >( InterlockedIncrement( &m_nRefCnt ) );
 105 }
 106
 107 //------------------------------------------------------------------------
 108 // IUnknown->Release
 109 //------------------------------------------------------------------------
 110
 111 STDMETHODIMP_(ULONG) CXTDataObject::Release( )
 112 {
 113     // we need a helper variable because it's
 114     // not allowed to access a member variable
 115     // after an object is destroyed
 116     ULONG nRefCnt = static_cast< ULONG >( InterlockedDecrement( &m_nRefCnt ) );
 117
 118     if ( 0 == nRefCnt )
 119     {
 120         delete this;
 121     }
 122
 123     return nRefCnt;
 124 }
 125
 126 //------------------------------------------------------------------------
 127 // IDataObject->GetData
 128 // warning: 'goto' ahead (to easy error handling without using exceptions)
 129 //------------------------------------------------------------------------
 130
 131 STDMETHODIMP CXTDataObject::GetData(LPFORMATETC pFormatetc, LPSTGMEDIUM pmedium )
 132 {
 133     OSL_ASSERT( ( NULL != pFormatetc ) &&
 134                 ( !IsBadReadPtr( (LPVOID)pFormatetc, sizeof( FORMATETC ) ) ) );
 135     OSL_ASSERT( ( NULL != pmedium ) &&
 136                 ( !IsBadWritePtr( (LPVOID)pmedium, sizeof( STGMEDIUM ) ) ) );
 137
 138     if ( ( NULL == pFormatetc ) || ( NULL == pmedium ) )
 139         return E_INVALIDARG;
 140
 141     HRESULT hr = E_FAIL;
 142
 143     if ( CF_TEXT == pFormatetc->cfFormat )
 144     {
 145         char     buff[] = "Hello World, How are you!";
 146         LPSTREAM lpStream;
 147
 148         hr = CreateStreamOnHGlobal( NULL, FALSE, &lpStream );
 149         if ( SUCCEEDED( hr ) )
 150         {
 151             hr = lpStream->Write( buff, sizeof( buff ) * sizeof( char ), NULL );
 152             if ( SUCCEEDED( hr ) )
 153             {
 154                 HGLOBAL hGlob;
 155
 156                 GetHGlobalFromStream( lpStream, &hGlob );
 157
 158                 pmedium->tymed          = TYMED_HGLOBAL;
 159                 pmedium->hGlobal        = hGlob;
 160                 pmedium->pUnkForRelease = NULL;
 161             }
 162             lpStream->Release( );
 163             hr = S_OK;
 164         }
 165         else
 166         {
 167             pmedium->tymed = TYMED_NULL;
 168         }
 169     }
 170     else if ( CF_UNICODETEXT == pFormatetc->cfFormat )
 171     {
 172         WCHAR     buff[] = L"Hello World, How are you!";
 173         LPSTREAM lpStream;
 174
 175         hr = CreateStreamOnHGlobal( NULL, FALSE, &lpStream );
 176         if ( SUCCEEDED( hr ) )
 177         {
 178             hr = lpStream->Write( buff, sizeof( buff ) * sizeof( WCHAR ), NULL );
 179             if ( SUCCEEDED( hr ) )
 180             {
 181                 HGLOBAL hGlob;
 182
 183                 GetHGlobalFromStream( lpStream, &hGlob );
 184
 185                 pmedium->tymed          = TYMED_HGLOBAL;
 186                 pmedium->hGlobal        = hGlob;
 187                 pmedium->pUnkForRelease = NULL;
 188             }
 189             lpStream->Release( );
 190             hr = S_OK;
 191         }
 192         else
 193         {
 194             pmedium->tymed = TYMED_NULL;
 195         }
 196     }
 197
 198     return hr;
 199 }
 200
 201 //------------------------------------------------------------------------
 202 // IDataObject->EnumFormatEtc
 203 //------------------------------------------------------------------------
 204
 205 STDMETHODIMP CXTDataObject::EnumFormatEtc( DWORD dwDirection, IEnumFORMATETC** ppenumFormatetc )
 206 {
 207     if ( ( NULL == ppenumFormatetc ) || ( DATADIR_SET == dwDirection ) )
 208         return E_INVALIDARG;
 209
 210     *ppenumFormatetc = NULL;
 211
 212     HRESULT hr = E_FAIL;
 213
 214     if ( DATADIR_GET == dwDirection )
 215     {
 216         *ppenumFormatetc = new CEnumFormatEtc( this );
 217         static_cast< LPUNKNOWN >( *ppenumFormatetc )->AddRef( );
 218         hr = S_OK;
 219     }
 220
 221     return hr;
 222 }
 223
 224 //------------------------------------------------------------------------
 225 // IDataObject->QueryGetData
 226 //------------------------------------------------------------------------
 227
 228 STDMETHODIMP CXTDataObject::QueryGetData( LPFORMATETC pFormatetc )
 229 {
 230     return E_NOTIMPL;
 231 }
 232
 233 //------------------------------------------------------------------------
 234 // IDataObject->GetDataHere
 235 //------------------------------------------------------------------------
 236
 237 STDMETHODIMP CXTDataObject::GetDataHere( LPFORMATETC, LPSTGMEDIUM )
 238 {
 239     return E_NOTIMPL;
 240 }
 241
 242 //------------------------------------------------------------------------
 243 // IDataObject->GetCanonicalFormatEtc
 244 //------------------------------------------------------------------------
 245
 246 STDMETHODIMP CXTDataObject::GetCanonicalFormatEtc( LPFORMATETC, LPFORMATETC )
 247 {
 248     return E_NOTIMPL;
 249 }
 250
 251 //------------------------------------------------------------------------
 252 // IDataObject->SetData
 253 //------------------------------------------------------------------------
 254
 255 STDMETHODIMP CXTDataObject::SetData( LPFORMATETC, LPSTGMEDIUM, BOOL )
 256 {
 257     return E_NOTIMPL;
 258 }
 259
 260 //------------------------------------------------------------------------
 261 // IDataObject->DAdvise
 262 //------------------------------------------------------------------------
 263
 264 STDMETHODIMP CXTDataObject::DAdvise( LPFORMATETC, DWORD, LPADVISESINK, DWORD * )
 265 {
 266     return E_NOTIMPL;
 267 }
 268
 269 //------------------------------------------------------------------------
 270 // IDataObject->DUnadvise
 271 //------------------------------------------------------------------------
 272
 273 STDMETHODIMP CXTDataObject::DUnadvise( DWORD )
 274 {
 275     return E_NOTIMPL;
 276 }
 277
 278 //------------------------------------------------------------------------
 279 // IDataObject->EnumDAdvise
 280 //------------------------------------------------------------------------
 281
 282 STDMETHODIMP CXTDataObject::EnumDAdvise( LPENUMSTATDATA * )
 283 {
 284     return E_NOTIMPL;
 285 }
 286
 287 //------------------------------------------------------------------------
 288 // for our convenience
 289 //------------------------------------------------------------------------
 290
 291 CXTDataObject::operator IDataObject*( )
 292 {
 293     return static_cast< IDataObject* >( this );
 294 }
 295
 296
 297 //============================================================================
 298 // CEnumFormatEtc
 299 //============================================================================
 300
 301
 302 //----------------------------------------------------------------------------
 303 // ctor
 304 //----------------------------------------------------------------------------
 305
 306 CEnumFormatEtc::CEnumFormatEtc( LPUNKNOWN pUnkDataObj ) :
 307     m_nRefCnt( 0 ),
 308     m_pUnkDataObj( pUnkDataObj ),
 309     m_nCurrentPos( 0 )
 310 {
 311     m_cfFormats[0] = CF_UNICODETEXT;
 312     m_cfFormats[1] = CF_TEXT;
 313 }
 314
 315 //----------------------------------------------------------------------------
 316 // dtor
 317 //----------------------------------------------------------------------------
 318
 319 CEnumFormatEtc::~CEnumFormatEtc( )
 320 {
 321 }
 322
 323 //----------------------------------------------------------------------------
 324 // IUnknown->QueryInterface
 325 //----------------------------------------------------------------------------
 326
 327 STDMETHODIMP CEnumFormatEtc::QueryInterface( REFIID iid, LPVOID* ppvObject )
 328 {
 329     if ( NULL == ppvObject )
 330         return E_INVALIDARG;
 331
 332     HRESULT hr = E_NOINTERFACE;
 333
 334     *ppvObject = NULL;
 335
 336     if ( ( __uuidof( IUnknown ) == iid ) || ( __uuidof( IEnumFORMATETC ) == iid ) )
 337     {
 338         *ppvObject = static_cast< IUnknown* >( this );
 339         static_cast< LPUNKNOWN >( *ppvObject )->AddRef( );
 340         hr = S_OK;
 341     }
 342
 343     return hr;
 344 }
 345
 346 //----------------------------------------------------------------------------
 347 // IUnknown->AddRef
 348 //----------------------------------------------------------------------------
 349
 350 STDMETHODIMP_(ULONG) CEnumFormatEtc::AddRef( )
 351 {
 352     // keep the dataobject alive
 353     m_pUnkDataObj->AddRef( );
 354     return InterlockedIncrement( &m_nRefCnt );
 355 }
 356
 357 //----------------------------------------------------------------------------
 358 // IUnknown->Release
 359 //----------------------------------------------------------------------------
 360
 361 STDMETHODIMP_(ULONG) CEnumFormatEtc::Release( )
 362 {
 363     // release the outer dataobject
 364     m_pUnkDataObj->Release( );
 365
 366     // we need a helper variable because it's
 367     // not allowed to access a member variable
 368     // after an object is destroyed
 369     ULONG nRefCnt = InterlockedDecrement( &m_nRefCnt );
 370     if ( 0 == nRefCnt )
 371         delete this;
 372
 373     return nRefCnt;
 374 }
 375
 376 //----------------------------------------------------------------------------
 377 // IEnumFORMATETC->Next
 378 //----------------------------------------------------------------------------
 379
 380 STDMETHODIMP CEnumFormatEtc::Next( ULONG celt, LPFORMATETC rgelt, ULONG* pceltFetched )
 381 {
 382     OSL_ASSERT( ( ( celt > 0 ) && ( NULL != rgelt ) ) ||
 383                 ( ( 0 == celt ) && ( NULL == rgelt ) ) );
 384
 385     if ( ( 0 != celt ) && ( NULL == rgelt ) )
 386         return E_INVALIDARG;
 387
 388     ULONG   ulFetched = 0;
 389     ULONG   ulToFetch = celt;
 390     HRESULT hr        = S_FALSE;
 391
 392     while( ( m_nCurrentPos < sizeof( m_cfFormats ) ) && ( ulToFetch > 0 ) )
 393     {
 394         OSL_ASSERT( !IsBadWritePtr( (LPVOID)rgelt, sizeof( FORMATETC ) ) );
 395
 396         rgelt->cfFormat = m_cfFormats[m_nCurrentPos];
 397         rgelt->ptd      = NULL;
 398         rgelt->dwAspect = DVASPECT_CONTENT;
 399         rgelt->lindex   = -1;
 400         rgelt->tymed    = TYMED_HGLOBAL;
 401
 402         ++m_nCurrentPos;
 403         ++rgelt;
 404         --ulToFetch;
 405         ++ulFetched;
 406     }
 407
 408     if ( ulFetched == celt )
 409         hr = S_OK;
 410
 411     if ( NULL != pceltFetched )
 412     {
 413         OSL_ASSERT( !IsBadWritePtr( (LPVOID)pceltFetched, sizeof( ULONG ) ) );
 414         *pceltFetched = ulFetched;
 415     }
 416
 417     return hr;
 418 }
 419
 420 //----------------------------------------------------------------------------
 421 // IEnumFORMATETC->Skip
 422 //----------------------------------------------------------------------------
 423
 424 STDMETHODIMP CEnumFormatEtc::Skip( ULONG celt )
 425 {
 426     HRESULT hr = S_FALSE;
 427
 428     if ( ( m_nCurrentPos + celt ) < sizeof( m_cfFormats ) )
 429     {
 430         m_nCurrentPos += celt;
 431         hr = S_OK;
 432     }
 433
 434     return hr;
 435 }
 436
 437 //----------------------------------------------------------------------------
 438 // IEnumFORMATETC->Reset
 439 //----------------------------------------------------------------------------
 440
 441 STDMETHODIMP CEnumFormatEtc::Reset( )
 442 {
 443     m_nCurrentPos = 0;
 444     return S_OK;
 445 }
 446
 447 //----------------------------------------------------------------------------
 448 // IEnumFORMATETC->Clone
 449 //----------------------------------------------------------------------------
 450
 451 STDMETHODIMP CEnumFormatEtc::Clone( IEnumFORMATETC** ppenum )
 452 {
 453     OSL_ASSERT( NULL != ppenum );
 454
 455     if ( NULL == ppenum )
 456         return E_INVALIDARG;
 457
 458     HRESULT hr = E_FAIL;
 459
 460     *ppenum = NULL;
 461
 462     CEnumFormatEtc* pCEnumFEtc = new CEnumFormatEtc( m_pUnkDataObj );
 463     if ( NULL != pCEnumFEtc )
 464     {
 465         pCEnumFEtc->m_nCurrentPos = m_nCurrentPos;
 466         *ppenum = static_cast< IEnumFORMATETC* >( pCEnumFEtc );
 467         static_cast< LPUNKNOWN >( *ppenum )->AddRef( );
 468         hr = NOERROR;
 469     }
 470
 471     return hr;
 472 }
 473