embedserv/source/embed/ed_idataobj.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 #ifdef _MSC_VER
  20 #pragma warning(disable : 4917 4555)
  21 #endif
  22
  23 #include "embeddoc.hxx"
  24
  25 #include <com/sun/star/uno/Any.h>
  26 #include <com/sun/star/uno/Exception.hpp>
  27 #include <com/sun/star/datatransfer/XTransferable.hpp>
  28
  29
  30 #include <osl/thread.h>
  31
  32 using namespace ::com::sun::star;
  33
  34
  35 // EmbedDocument_Impl
  36
  37
  38 sal_uInt64 EmbedDocument_Impl::getMetaFileHandle_Impl( sal_Bool isEnhMeta )
  39 {
  40     sal_uInt64 pResult = NULL;
  41
  42     uno::Reference< datatransfer::XTransferable > xTransferable( m_pDocHolder->GetDocument(), uno::UNO_QUERY );
  43     if ( xTransferable.is() )
  44     {
  45         datatransfer::DataFlavor aFlavor;
  46
  47         if ( isEnhMeta )
  48         {
  49             aFlavor.MimeType = "application/x-openoffice-emf;windows_formatname=\"Image EMF\"";
  50             aFlavor.HumanPresentableName = "Enhanced Windows MetaFile";
  51         }
  52         else
  53         {
  54             aFlavor.MimeType = "application/x-openoffice-wmf;windows_formatname=\"Image WMF\"";
  55             aFlavor.HumanPresentableName = "Windows GDIMetaFile";
  56         }
  57
  58         aFlavor.DataType = cppu::UnoType<sal_uInt64>::get();
  59
  60         uno::Any aAny = xTransferable->getTransferData( aFlavor );
  61         aAny >>= pResult;
  62     }
  63
  64     return pResult;
  65 }
  66
  67
  68 // IDataObject
  69
  70 STDMETHODIMP EmbedDocument_Impl::GetData( FORMATETC * pFormatetc, STGMEDIUM * pMedium )
  71 {
  72     if ( !pFormatetc )
  73         return DV_E_FORMATETC;
  74
  75     if ( !pMedium )
  76         return STG_E_MEDIUMFULL;
  77
  78     if ( pFormatetc->dwAspect == DVASPECT_THUMBNAIL
  79       || pFormatetc->dwAspect == DVASPECT_ICON
  80       || pFormatetc->dwAspect == DVASPECT_DOCPRINT )
  81         return DV_E_DVASPECT;
  82
  83     if ( pFormatetc->cfFormat == CF_ENHMETAFILE )
  84     {
  85         if ( !( pFormatetc->tymed & TYMED_ENHMF ) )
  86             return DV_E_TYMED;
  87
  88         HENHMETAFILE hMeta = reinterpret_cast<HENHMETAFILE>( getMetaFileHandle_Impl( sal_True ) );
  89
  90         if ( hMeta )
  91         {
  92             pMedium->tymed = TYMED_ENHMF;
  93             pMedium->hEnhMetaFile = hMeta;
  94             pMedium->pUnkForRelease = NULL;
  95
  96             return S_OK;
  97         }
  98
  99         return STG_E_MEDIUMFULL;
 100     }
 101     else if ( pFormatetc->cfFormat == CF_METAFILEPICT )
 102     {
 103           if ( !( pFormatetc->tymed & TYMED_MFPICT ) )
 104             return DV_E_TYMED;
 105
 106         HGLOBAL hMeta = reinterpret_cast<HGLOBAL>( getMetaFileHandle_Impl( sal_False ) );
 107
 108         if ( hMeta )
 109         {
 110             pMedium->tymed = TYMED_MFPICT;
 111             pMedium->hMetaFilePict = hMeta;
 112             pMedium->pUnkForRelease = NULL;
 113
 114             return S_OK;
 115         }
 116
 117         return STG_E_MEDIUMFULL;
 118     }
 119     else
 120     {
 121         CLIPFORMAT cf_embSource = (CLIPFORMAT)RegisterClipboardFormatA( "Embed Source" );
 122         CLIPFORMAT cf_embObj = (CLIPFORMAT)RegisterClipboardFormatA( "Embedded Object" );
 123         if ( pFormatetc->cfFormat == cf_embSource || pFormatetc->cfFormat == cf_embObj )
 124         {
 125             if ( !( pFormatetc->tymed & TYMED_ISTORAGE ) )
 126                 return DV_E_TYMED;
 127
 128             CComPtr< IStorage > pNewStg;
 129             HRESULT hr = StgCreateDocfile( NULL, STGM_CREATE | STGM_READWRITE | STGM_DELETEONRELEASE, 0, &pNewStg );
 130             if ( FAILED( hr ) || !pNewStg ) return STG_E_MEDIUMFULL;
 131
 132             hr = SaveTo_Impl( pNewStg );
 133             if ( FAILED( hr ) ) return STG_E_MEDIUMFULL;
 134
 135             pMedium->tymed = TYMED_ISTORAGE;
 136             pMedium->pstg = pNewStg;
 137             pMedium->pstg->AddRef();
 138             pMedium->pUnkForRelease = ( IUnknown* )pNewStg;
 139
 140             return S_OK;
 141         }
 142     }
 143
 144     return DV_E_FORMATETC;
 145 }
 146
 147 STDMETHODIMP EmbedDocument_Impl::GetDataHere( FORMATETC * pFormatetc, STGMEDIUM * pMedium )
 148 {
 149     if ( !pFormatetc )
 150         return DV_E_FORMATETC;
 151
 152     if ( !pMedium )
 153         return STG_E_MEDIUMFULL;
 154
 155     if ( pFormatetc->dwAspect == DVASPECT_THUMBNAIL
 156       || pFormatetc->dwAspect == DVASPECT_ICON
 157       || pFormatetc->dwAspect == DVASPECT_DOCPRINT )
 158         return DV_E_DVASPECT;
 159
 160     CLIPFORMAT cf_embSource = (CLIPFORMAT)RegisterClipboardFormatA( "Embed Source" );
 161     CLIPFORMAT cf_embObj = (CLIPFORMAT)RegisterClipboardFormatA( "Embedded Object" );
 162
 163     if ( pFormatetc->cfFormat == cf_embSource || pFormatetc->cfFormat == cf_embObj )
 164     {
 165         if ( !( pFormatetc->tymed & TYMED_ISTORAGE ) )
 166             return DV_E_TYMED;
 167
 168         if ( !pMedium->pstg ) return STG_E_MEDIUMFULL;
 169
 170         HRESULT hr = SaveTo_Impl( pMedium->pstg );
 171         if ( FAILED( hr ) ) return STG_E_MEDIUMFULL;
 172
 173         pMedium->tymed = TYMED_ISTORAGE;
 174         pMedium->pUnkForRelease = NULL;
 175
 176         return S_OK;
 177     }
 178
 179     return DV_E_FORMATETC;
 180 }
 181
 182 STDMETHODIMP EmbedDocument_Impl::QueryGetData( FORMATETC * pFormatetc )
 183 {
 184     if ( pFormatetc )
 185     {
 186         if ( pFormatetc->dwAspect == DVASPECT_THUMBNAIL
 187           || pFormatetc->dwAspect == DVASPECT_ICON
 188           || pFormatetc->dwAspect == DVASPECT_DOCPRINT )
 189             return DV_E_DVASPECT;
 190
 191         if ( pFormatetc->cfFormat == CF_ENHMETAFILE )
 192         {
 193             if ( !( pFormatetc->tymed & TYMED_ENHMF ) )
 194                 return DV_E_TYMED;
 195
 196             return S_OK;
 197         }
 198         else if ( pFormatetc->cfFormat == CF_METAFILEPICT )
 199         {
 200               if ( !( pFormatetc->tymed & TYMED_MFPICT ) )
 201                 return DV_E_TYMED;
 202
 203             return S_OK;
 204         }
 205         else
 206         {
 207             CLIPFORMAT cf_embSource = (CLIPFORMAT)RegisterClipboardFormatA( "Embed Source" );
 208             CLIPFORMAT cf_embObj = (CLIPFORMAT)RegisterClipboardFormatA( "Embedded Object" );
 209             if ( pFormatetc->cfFormat == cf_embSource || pFormatetc->cfFormat == cf_embObj )
 210             {
 211                 if ( !( pFormatetc->tymed & TYMED_ISTORAGE ) )
 212                     return DV_E_TYMED;
 213
 214                 return S_OK;
 215             }
 216         }
 217     }
 218
 219     return DV_E_FORMATETC;
 220
 221 }
 222
 223 STDMETHODIMP EmbedDocument_Impl::GetCanonicalFormatEtc( FORMATETC * pFormatetcIn, FORMATETC * pFormatetcOut )
 224 {
 225     if ( !pFormatetcIn || !pFormatetcOut )
 226         return DV_E_FORMATETC;
 227
 228     pFormatetcOut->ptd = NULL;
 229     pFormatetcOut->cfFormat = pFormatetcIn->cfFormat;
 230     pFormatetcOut->dwAspect = DVASPECT_CONTENT;
 231
 232     if ( pFormatetcIn->cfFormat == CF_ENHMETAFILE )
 233     {
 234         pFormatetcOut->tymed = TYMED_ENHMF;
 235         return S_OK;
 236     }
 237     else if ( pFormatetcIn->cfFormat == CF_METAFILEPICT )
 238     {
 239           pFormatetcOut->tymed = TYMED_MFPICT;
 240         return S_OK;
 241     }
 242     else
 243     {
 244         CLIPFORMAT cf_embSource = (CLIPFORMAT)RegisterClipboardFormatA( "Embed Source" );
 245         CLIPFORMAT cf_embObj = (CLIPFORMAT)RegisterClipboardFormatA( "Embedded Object" );
 246         if ( pFormatetcIn->cfFormat == cf_embSource || pFormatetcIn->cfFormat == cf_embObj )
 247         {
 248             pFormatetcOut->tymed = TYMED_ISTORAGE;
 249             return S_OK;
 250         }
 251     }
 252
 253     return DV_E_FORMATETC;
 254 }
 255
 256 STDMETHODIMP EmbedDocument_Impl::SetData( FORMATETC * /*pFormatetc*/, STGMEDIUM * /*pMedium*/, BOOL /*fRelease*/ )
 257 {
 258     return E_NOTIMPL;
 259 }
 260
 261 STDMETHODIMP EmbedDocument_Impl::EnumFormatEtc( DWORD dwDirection, IEnumFORMATETC ** /*ppFormatetc*/ )
 262 {
 263     if ( dwDirection == DATADIR_GET )
 264         return OLE_S_USEREG;
 265
 266     return E_NOTIMPL;
 267 }
 268
 269 STDMETHODIMP EmbedDocument_Impl::DAdvise( FORMATETC * pFormatetc, DWORD advf, IAdviseSink * pAdvSink, DWORD * pdwConnection )
 270 {
 271     if ( !m_pDAdviseHolder )
 272         if ( !SUCCEEDED( CreateDataAdviseHolder( &m_pDAdviseHolder ) ) || !m_pDAdviseHolder )
 273             return E_OUTOFMEMORY;
 274
 275     return m_pDAdviseHolder->Advise( (IDataObject*)this, pFormatetc, advf, pAdvSink, pdwConnection );
 276 }
 277
 278 STDMETHODIMP EmbedDocument_Impl::DUnadvise( DWORD dwConnection )
 279 {
 280     if ( !m_pDAdviseHolder )
 281         if ( !SUCCEEDED( CreateDataAdviseHolder( &m_pDAdviseHolder ) ) || !m_pDAdviseHolder )
 282             return E_OUTOFMEMORY;
 283
 284     return m_pDAdviseHolder->Unadvise( dwConnection );
 285 }
 286
 287 STDMETHODIMP EmbedDocument_Impl::EnumDAdvise( IEnumSTATDATA ** ppenumAdvise )
 288 {
 289     if ( !m_pDAdviseHolder )
 290         if ( !SUCCEEDED( CreateDataAdviseHolder( &m_pDAdviseHolder ) ) || !m_pDAdviseHolder )
 291             return E_OUTOFMEMORY;
 292
 293     return m_pDAdviseHolder->EnumAdvise( ppenumAdvise );
 294 }
 295
 296 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */