git.sesse.net Git - vlc/blob - activex/dataobject.cpp

   1 /*****************************************************************************
   2  * viewobject.cpp: ActiveX control for VLC
   3  *****************************************************************************
   4  * Copyright (C) 2005 VideoLAN
   5  *
   6  * Authors: Damien Fouilleul <Damien.Fouilleul@laposte.net>
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
  21  *****************************************************************************/
  22
  23 #include "plugin.h"
  24 #include "dataobject.h"
  25
  26 #include "utils.h"
  27
  28 using namespace std;
  29
  30 ////////////////////////////////////////////////////////////////////////////////////////////////
  31
  32 class VLCEnumFORMATETC : public IEnumFORMATETC
  33 {
  34 public:
  35
  36     VLCEnumFORMATETC(vector<FORMATETC> &v) :
  37         e(VLCEnum<FORMATETC>(IID_IEnumFORMATETC, v)) {};
  38
  39     VLCEnumFORMATETC(const VLCEnumFORMATETC &vlcEnum) : e(vlcEnum.e) {};
  40     virtual ~VLCEnumFORMATETC() {};
  41
  42     // IUnknown methods
  43     STDMETHODIMP QueryInterface(REFIID riid, void **ppv)
  44         { return e.QueryInterface(riid, ppv); };
  45     STDMETHODIMP_(ULONG) AddRef(void)
  46         { return e.AddRef(); };
  47     STDMETHODIMP_(ULONG) Release(void)
  48         {return e.Release(); };
  49
  50     //IEnumConnectionPoints
  51     STDMETHODIMP Next(ULONG celt, LPFORMATETC rgelt, ULONG *pceltFetched)
  52         { return e.Next(celt, rgelt, pceltFetched); };
  53     STDMETHODIMP Skip(ULONG celt)
  54         { return e.Skip(celt);};
  55     STDMETHODIMP Reset(void)
  56         { return e.Reset();};
  57     STDMETHODIMP Clone(LPENUMFORMATETC *ppenum)
  58         { if( NULL == ppenum ) return E_POINTER;
  59           *ppenum = dynamic_cast<LPENUMFORMATETC>(new VLCEnumFORMATETC(*this));
  60           return (NULL != *ppenum) ? S_OK : E_OUTOFMEMORY;
  61         };
  62
  63 private:
  64
  65     VLCEnum<FORMATETC> e;
  66 };
  67
  68 ////////////////////////////////////////////////////////////////////////////////////////////////
  69
  70 static const FORMATETC _metaFileFormatEtc =
  71     {
  72         CF_METAFILEPICT,
  73         NULL,
  74         DVASPECT_CONTENT,
  75         -1,
  76         TYMED_MFPICT,
  77     };
  78 static const FORMATETC _enhMetaFileFormatEtc =
  79     {
  80         CF_ENHMETAFILE,
  81         NULL,
  82         DVASPECT_CONTENT,
  83         -1,
  84         TYMED_ENHMF,
  85     };
  86
  87 VLCDataObject::VLCDataObject(VLCPlugin *p_instance) : _p_instance(p_instance)
  88 {
  89     _v_formatEtc.push_back(_enhMetaFileFormatEtc);
  90     _v_formatEtc.push_back(_metaFileFormatEtc);
  91     CreateDataAdviseHolder(&_p_adviseHolder);
  92 };
  93
  94 VLCDataObject::~VLCDataObject()
  95 {
  96     _p_adviseHolder->Release();
  97 };
  98
  99 ////////////////////////////////////////////////////////////////////////////////////////////////
 100
 101 STDMETHODIMP VLCDataObject::DAdvise(LPFORMATETC pFormatEtc, DWORD padvf, LPADVISESINK pAdviseSink, LPDWORD pdwConnection)
 102 {
 103     return _p_adviseHolder->Advise(this,
 104             pFormatEtc, padvf,pAdviseSink, pdwConnection);
 105 };
 106
 107 STDMETHODIMP VLCDataObject::DUnadvise(DWORD dwConnection)
 108 {
 109     return _p_adviseHolder->Unadvise(dwConnection);
 110 };
 111
 112 STDMETHODIMP VLCDataObject::EnumDAdvise(IEnumSTATDATA **ppenumAdvise)
 113 {
 114     return _p_adviseHolder->EnumAdvise(ppenumAdvise);
 115 };
 116
 117 STDMETHODIMP VLCDataObject::EnumFormatEtc(DWORD dwDirection, IEnumFORMATETC **ppenumformatetc)
 118 {
 119     if( NULL == ppenumformatetc )
 120         return E_POINTER;
 121
 122     *ppenumformatetc = new VLCEnumFORMATETC(_v_formatEtc);
 123     return NOERROR;
 124 };
 125
 126 STDMETHODIMP VLCDataObject::GetCanonicalFormatEtc(LPFORMATETC pFormatEtcIn, LPFORMATETC pFormatEtcOut)
 127 {
 128     HRESULT result = QueryGetData(pFormatEtcIn);
 129     if( FAILED(result) )
 130         return result;
 131
 132     if( NULL == pFormatEtcOut )
 133         return E_POINTER;
 134
 135     *pFormatEtcOut = *pFormatEtcIn;
 136     pFormatEtcOut->ptd = NULL;
 137
 138     return DATA_S_SAMEFORMATETC;
 139 };
 140
 141 STDMETHODIMP VLCDataObject::GetData(LPFORMATETC pFormatEtc, LPSTGMEDIUM pMedium)
 142 {
 143     if( NULL == pMedium )
 144         return E_POINTER;
 145
 146     HRESULT result = QueryGetData(pFormatEtc);
 147     if( SUCCEEDED(result) )
 148     {
 149         switch( pFormatEtc->cfFormat )
 150         {
 151             case CF_METAFILEPICT:
 152                 pMedium->tymed = TYMED_MFPICT;
 153                 pMedium->hMetaFilePict = NULL;
 154                 pMedium->pUnkForRelease = NULL;
 155                 result = getMetaFileData(pFormatEtc, pMedium);
 156                 break;
 157             case CF_ENHMETAFILE:
 158                 pMedium->tymed = TYMED_ENHMF;
 159                 pMedium->hEnhMetaFile = NULL;
 160                 pMedium->pUnkForRelease = NULL;
 161                 result = getEnhMetaFileData(pFormatEtc, pMedium);
 162                 break;
 163             default:
 164                 result = DV_E_FORMATETC;
 165         }
 166     }
 167     return result;
 168 };
 169
 170 STDMETHODIMP VLCDataObject::GetDataHere(LPFORMATETC pFormatEtc, LPSTGMEDIUM pMedium)
 171 {
 172     if( NULL == pMedium )
 173         return E_POINTER;
 174
 175     return E_NOTIMPL;
 176 }
 177
 178 ////////////////////////////////////////////////////////////////////////////////////////////////
 179
 180 HRESULT VLCDataObject::getMetaFileData(LPFORMATETC pFormatEtc, LPSTGMEDIUM pMedium)
 181 {
 182     HDC hicTargetDev = CreateDevDC(pFormatEtc->ptd);
 183     if( NULL == hicTargetDev )
 184         return E_FAIL;
 185
 186     HDC hdcMeta = CreateMetaFile(NULL);
 187     if( NULL != hdcMeta )
 188     {
 189         LPMETAFILEPICT pMetaFilePict = (LPMETAFILEPICT)CoTaskMemAlloc(sizeof(METAFILEPICT));
 190         if( NULL != pMetaFilePict )
 191         {
 192             SIZEL size = _p_instance->getExtent();
 193             RECTL wBounds = { 0L, 0L, size.cx, size.cy };
 194
 195             pMetaFilePict->mm   = MM_ANISOTROPIC;
 196             pMetaFilePict->xExt = size.cx;
 197             pMetaFilePict->yExt = size.cy;
 198
 199             DPFromHimetric(hicTargetDev, (LPPOINT)&size, 1);
 200
 201             SetMapMode(hdcMeta, MM_ANISOTROPIC);
 202             SetWindowExtEx(hdcMeta, size.cx, size.cy, NULL);
 203
 204             RECTL bounds = { 0L, 0L, size.cx, size.cy };
 205
 206             _p_instance->onDraw(pFormatEtc->ptd, hicTargetDev, hdcMeta, &bounds, &wBounds);
 207             pMetaFilePict->hMF = CloseMetaFile(hdcMeta);
 208             if( NULL != pMetaFilePict->hMF )
 209                 pMedium->hMetaFilePict = pMetaFilePict;
 210             else
 211                 CoTaskMemFree(pMetaFilePict);
 212         }
 213     }
 214     DeleteDC(hicTargetDev);
 215     return (NULL != pMedium->hMetaFilePict) ? S_OK : E_FAIL;
 216 };
 217
 218 HRESULT VLCDataObject::getEnhMetaFileData(LPFORMATETC pFormatEtc, LPSTGMEDIUM pMedium)
 219 {
 220     HDC hicTargetDev = CreateDevDC(pFormatEtc->ptd);
 221     if( NULL == hicTargetDev )
 222         return E_FAIL;
 223
 224     SIZEL size = _p_instance->getExtent();
 225
 226     HDC hdcMeta = CreateEnhMetaFile(hicTargetDev, NULL, NULL, NULL);
 227     if( NULL != hdcMeta )
 228     {
 229         RECTL wBounds = { 0L, 0L, size.cx, size.cy };
 230
 231         DPFromHimetric(hicTargetDev, (LPPOINT)&size, 1);
 232
 233         RECTL bounds = { 0L, 0L, size.cx, size.cy };
 234
 235         _p_instance->onDraw(pFormatEtc->ptd, hicTargetDev, hdcMeta, &bounds, &wBounds);
 236         pMedium->hEnhMetaFile = CloseEnhMetaFile(hdcMeta);
 237     }
 238     DeleteDC(hicTargetDev);
 239
 240     return (NULL != pMedium->hEnhMetaFile) ? S_OK : E_FAIL;
 241 };
 242
 243 STDMETHODIMP VLCDataObject::QueryGetData(LPFORMATETC pFormatEtc)
 244 {
 245     if( NULL == pFormatEtc )
 246         return E_POINTER;
 247
 248     const FORMATETC *formatEtc;
 249
 250     switch( pFormatEtc->cfFormat )
 251     {
 252         case CF_METAFILEPICT:
 253             formatEtc = &_metaFileFormatEtc;
 254             break;
 255         case CF_ENHMETAFILE:
 256             formatEtc = &_enhMetaFileFormatEtc;
 257             break;
 258         default:
 259             return DV_E_FORMATETC;
 260     }
 261
 262     if( pFormatEtc->dwAspect != formatEtc->dwAspect )
 263         return DV_E_DVASPECT;
 264
 265     if( pFormatEtc->lindex != formatEtc->lindex )
 266         return DV_E_LINDEX;
 267
 268     if( pFormatEtc->tymed != formatEtc->tymed )
 269         return DV_E_TYMED;
 270
 271     return S_OK;
 272 };
 273
 274 STDMETHODIMP VLCDataObject::SetData(LPFORMATETC pFormatEtc, LPSTGMEDIUM pMedium, BOOL fRelease)
 275 {
 276     return E_NOTIMPL;
 277 };
 278
 279 /*void VLCDataObject::onDataChange(void)
 280 {
 281     _p_adviseHolder->SendOnDataChange(this, 0, 0);
 282 };*/
 283
 284 void VLCDataObject::onClose(void)
 285 {
 286     _p_adviseHolder->SendOnDataChange(this, 0, ADVF_DATAONSTOP);
 287     if( S_OK == OleIsCurrentClipboard(dynamic_cast<LPDATAOBJECT>(this)) )
 288         OleFlushClipboard();
 289 };
 290