dtrans/source/win32/workbench/XTDo.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #include <osl/diagnose.h>
  21
  22 #include "../DTransHelper.hxx"
  23
  24 #include "XTDo.hxx"
  25
  26 #if defined _MSC_VER
  27 #pragma warning(push,1)
  28 #endif
  29 #include <windows.h>
  30 #include <ole2.h>
  31 #if defined _MSC_VER
  32 #pragma warning(pop)
  33 #endif
  34 #include <memory>
  35 #include <tchar.h>
  36
  37 using namespace ::std;
  38
  39 // OTWrapperDataObject
  40
  41 /*
  42     in the constructor we enumerate all formats offered by the transferable
  43     and convert the formats into formatetc structures
  44     if the transferable supports text in different charsets we use either
  45     the charset equal to the charset of the current thread or an arbitrary
  46     charset supported by the transferable and the system
  47     if the transferable supports only unicodetext we offer in addition to
  48     this text in the charset of the current thread
  49     in order to allow the consumer of the clipboard to query for the charset
  50     of the text in the clipboard we offer a CF_LOCALE
  51 */
  52 CXTDataObject::CXTDataObject( ) :
  53     m_nRefCnt( 0 )
  54 {
  55
  56 }
  57
  58 // IUnknown->QueryInterface
  59
  60 STDMETHODIMP CXTDataObject::QueryInterface( REFIID iid, LPVOID* ppvObject )
  61 {
  62     OSL_ASSERT( NULL != ppvObject );
  63
  64     if ( NULL == ppvObject )
  65         return E_INVALIDARG;
  66
  67     HRESULT hr = E_NOINTERFACE;
  68
  69     *ppvObject = NULL;
  70
  71     if ( ( __uuidof( IUnknown ) == iid ) || ( __uuidof( IDataObject ) == iid ) )
  72     {
  73         *ppvObject = static_cast< IUnknown* >( this );
  74         ( (LPUNKNOWN)*ppvObject )->AddRef( );
  75         hr = S_OK;
  76     }
  77
  78     return hr;
  79 }
  80
  81 // IUnknown->AddRef
  82
  83 STDMETHODIMP_(ULONG) CXTDataObject::AddRef( )
  84 {
  85     return static_cast< ULONG >( InterlockedIncrement( &m_nRefCnt ) );
  86 }
  87
  88 // IUnknown->Release
  89
  90 STDMETHODIMP_(ULONG) CXTDataObject::Release( )
  91 {
  92     // we need a helper variable because it's
  93     // not allowed to access a member variable
  94     // after an object is destroyed
  95     ULONG nRefCnt = static_cast< ULONG >( InterlockedDecrement( &m_nRefCnt ) );
  96
  97     if ( 0 == nRefCnt )
  98     {
  99         delete this;
 100     }
 101
 102     return nRefCnt;
 103 }
 104
 105 /*------------------------------------------------------------------------
 106
 107  IDataObject->GetData
 108  we deliver data only into global memory
 109
 110  algo:
 111  1. convert the given formatect struct into a valid dataflavor
 112  2. if the transferable directly supports the requested format
 113  2.1. if text data requested add a trailing '\0' in order to prevent
 114         problems (windows needs '\0' terminated strings
 115  2.2. we expect unicode data as Sequence< sal_Unicode > and all other
 116         text and raw data as Sequence< sal_Int8 >
 117
 118 ------------------------------------------------------------------------*/
 119
 120 STDMETHODIMP CXTDataObject::GetData( LPFORMATETC pFormatetc, LPSTGMEDIUM pmedium )
 121 {
 122     if ( ( NULL == pFormatetc ) || ( NULL == pmedium ) )
 123         return E_INVALIDARG;
 124
 125     HRESULT hr = E_FAIL;
 126
 127     if ( CF_TEXT == pFormatetc->cfFormat )
 128     {
 129         CHGlobalHelper hGlobHlp( TRUE );
 130
 131         char    pBuff[] = "Test OleClipboard";
 132         hGlobHlp.Write( pBuff, sizeof( pBuff ), NULL );
 133
 134         pmedium->tymed          = TYMED_HGLOBAL;
 135         pmedium->hGlobal        = hGlobHlp.GetHGlobal( );
 136         pmedium->pUnkForRelease = NULL;
 137
 138         hr = S_OK;
 139     }
 140
 141     return hr;
 142 }
 143
 144 // IDataObject->EnumFormatEtc
 145
 146 STDMETHODIMP CXTDataObject::EnumFormatEtc( DWORD dwDirection, IEnumFORMATETC** ppenumFormatetc )
 147 {
 148     if ( ( NULL == ppenumFormatetc ) || ( DATADIR_SET == dwDirection ) )
 149         return E_INVALIDARG;
 150
 151     *ppenumFormatetc = NULL;
 152
 153     HRESULT hr = E_FAIL;
 154
 155     if ( DATADIR_GET == dwDirection )
 156     {
 157         *ppenumFormatetc = new CEnumFormatEtc( this );
 158         static_cast< LPUNKNOWN >( *ppenumFormatetc )->AddRef( );
 159         hr = S_OK;
 160     }
 161
 162     return hr;
 163 }
 164
 165 // IDataObject->QueryGetData
 166
 167 STDMETHODIMP CXTDataObject::QueryGetData( LPFORMATETC pFormatetc )
 168 {
 169     return E_NOTIMPL;
 170 }
 171
 172 // IDataObject->GetDataHere
 173
 174 STDMETHODIMP CXTDataObject::GetDataHere( LPFORMATETC, LPSTGMEDIUM )
 175 {
 176     return E_NOTIMPL;
 177 }
 178
 179 // IDataObject->GetCanonicalFormatEtc
 180
 181 STDMETHODIMP CXTDataObject::GetCanonicalFormatEtc( LPFORMATETC, LPFORMATETC )
 182 {
 183     return E_NOTIMPL;
 184 }
 185
 186 // IDataObject->SetData
 187
 188 STDMETHODIMP CXTDataObject::SetData( LPFORMATETC, LPSTGMEDIUM, BOOL )
 189 {
 190     return E_NOTIMPL;
 191 }
 192
 193 // IDataObject->DAdvise
 194
 195 STDMETHODIMP CXTDataObject::DAdvise( LPFORMATETC, DWORD, LPADVISESINK, DWORD * )
 196 {
 197     return E_NOTIMPL;
 198 }
 199
 200 // IDataObject->DUnadvise
 201
 202 STDMETHODIMP CXTDataObject::DUnadvise( DWORD )
 203 {
 204     return E_NOTIMPL;
 205 }
 206
 207 // IDataObject->EnumDAdvise
 208
 209 STDMETHODIMP CXTDataObject::EnumDAdvise( LPENUMSTATDATA * )
 210 {
 211     return E_NOTIMPL;
 212 }
 213
 214 CXTDataObject::operator IDataObject*( )
 215 {
 216     return static_cast< IDataObject* >( this );
 217 }
 218
 219 CEnumFormatEtc::CEnumFormatEtc( LPUNKNOWN pUnkDataObj ) :
 220     m_nRefCnt( 0 ),
 221     m_pUnkDataObj( pUnkDataObj ),
 222     m_nCurrPos( 0 )
 223 {
 224 }
 225
 226 // IUnknown->QueryInterface
 227
 228 STDMETHODIMP CEnumFormatEtc::QueryInterface( REFIID iid, LPVOID* ppvObject )
 229 {
 230     if ( NULL == ppvObject )
 231         return E_INVALIDARG;
 232
 233     HRESULT hr = E_NOINTERFACE;
 234
 235     *ppvObject = NULL;
 236
 237     if ( ( __uuidof( IUnknown ) == iid ) || ( __uuidof( IEnumFORMATETC ) == iid ) )
 238     {
 239         *ppvObject = static_cast< IUnknown* >( this );
 240         static_cast< LPUNKNOWN >( *ppvObject )->AddRef( );
 241         hr = S_OK;
 242     }
 243
 244     return hr;
 245 }
 246
 247 // IUnknown->AddRef
 248
 249 STDMETHODIMP_(ULONG) CEnumFormatEtc::AddRef( )
 250 {
 251     // keep the dataobject alive
 252     m_pUnkDataObj->AddRef( );
 253     return InterlockedIncrement( &m_nRefCnt );
 254 }
 255
 256 // IUnknown->Release
 257
 258 STDMETHODIMP_(ULONG) CEnumFormatEtc::Release( )
 259 {
 260     // release the outer dataobject
 261     m_pUnkDataObj->Release( );
 262
 263     // we need a helper variable because it's
 264     // not allowed to access a member variable
 265     // after an object is destroyed
 266     ULONG nRefCnt = InterlockedDecrement( &m_nRefCnt );
 267     if ( 0 == nRefCnt )
 268         delete this;
 269
 270     return nRefCnt;
 271 }
 272
 273 // IEnumFORMATETC->Next
 274
 275 STDMETHODIMP CEnumFormatEtc::Next( ULONG celt, LPFORMATETC rgelt, ULONG* pceltFetched )
 276 {
 277     if ( ( 0 != celt ) && ( NULL == rgelt ) )
 278         return E_INVALIDARG;
 279
 280     ULONG   ulFetched = 0;
 281     ULONG   ulToFetch = celt;
 282     HRESULT hr        = S_FALSE;
 283
 284     while( m_nCurrPos < 1 )
 285     {
 286         rgelt->cfFormat = CF_TEXT;
 287         rgelt->ptd      = NULL;
 288         rgelt->dwAspect = DVASPECT_CONTENT;
 289         rgelt->lindex   = -1;
 290         rgelt->tymed    = TYMED_HGLOBAL;
 291
 292         ++m_nCurrPos;
 293         ++rgelt;
 294         --ulToFetch;
 295         ++ulFetched;
 296     }
 297
 298     if ( ulFetched == celt )
 299         hr = S_OK;
 300
 301     if ( NULL != pceltFetched )
 302     {
 303         *pceltFetched = ulFetched;
 304     }
 305
 306     return hr;
 307 }
 308
 309 // IEnumFORMATETC->Skip
 310
 311 STDMETHODIMP CEnumFormatEtc::Skip( ULONG celt )
 312 {
 313     HRESULT hr = S_FALSE;
 314
 315     /*
 316     if ( ( m_nCurrPos + celt ) < m_nClipFormats )
 317     {
 318         m_nCurrPos += celt;
 319         hr = S_OK;
 320     }
 321     */
 322
 323     return hr;
 324 }
 325
 326 // IEnumFORMATETC->Reset
 327
 328 STDMETHODIMP CEnumFormatEtc::Reset( )
 329 {
 330     m_nCurrPos = 0;
 331     return S_OK;
 332 }
 333
 334 // IEnumFORMATETC->Clone
 335
 336 STDMETHODIMP CEnumFormatEtc::Clone( IEnumFORMATETC** ppenum )
 337 {
 338     OSL_ASSERT( NULL != ppenum );
 339
 340     if ( NULL == ppenum )
 341         return E_INVALIDARG;
 342
 343     HRESULT hr = E_FAIL;
 344
 345     *ppenum = NULL;
 346
 347     CEnumFormatEtc* pCEnumFEtc = new CEnumFormatEtc( m_pUnkDataObj );
 348     if ( NULL != pCEnumFEtc )
 349     {
 350         pCEnumFEtc->m_nCurrPos = m_nCurrPos;
 351         *ppenum = static_cast< IEnumFORMATETC* >( pCEnumFEtc );
 352         static_cast< LPUNKNOWN >( *ppenum )->AddRef( );
 353         hr = NOERROR;
 354     }
 355
 356     return hr;
 357 }
 358
 359 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */