dlls/quartz/avidec.c

   1 /*
   2  * AVI Decompressor (VFW decompressors wrapper)
   3  *
   4  * Copyright 2004-2005 Christian Costa
   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 #include "config.h"
  22
  23 #include "quartz_private.h"
  24 #include "pin.h"
  25
  26 #include "uuids.h"
  27 #include "amvideo.h"
  28 #include "windef.h"
  29 #include "winbase.h"
  30 #include "dshow.h"
  31 #include "strmif.h"
  32 #include "vfwmsgs.h"
  33 #include "vfw.h"
  34 #include "dvdmedia.h"
  35
  36 #include <assert.h>
  37
  38 #include "wine/unicode.h"
  39 #include "wine/debug.h"
  40
  41 #include "transform.h"
  42
  43 WINE_DEFAULT_DEBUG_CHANNEL(quartz);
  44
  45 typedef struct AVIDecImpl
  46 {
  47     TransformFilterImpl tf;
  48     HIC hvid;
  49     BITMAPINFOHEADER* pBihIn;
  50     BITMAPINFOHEADER* pBihOut;
  51 } AVIDecImpl;
  52
  53 static HRESULT AVIDec_ProcessBegin(TransformFilterImpl* pTransformFilter)
  54 {
  55     AVIDecImpl* This = (AVIDecImpl*)pTransformFilter;
  56     DWORD result;
  57
  58     TRACE("(%p)->()\n", This);
  59
  60     result = ICDecompressBegin(This->hvid, This->pBihIn, This->pBihOut);
  61     if (result != ICERR_OK)
  62     {
  63         ERR("Cannot start processing (%d)\n", result);
  64         return E_FAIL;
  65     }
  66     return S_OK;
  67 }
  68
  69 static HRESULT AVIDec_ProcessSampleData(InputPin *pin, IMediaSample *pSample)
  70 {
  71     AVIDecImpl* This = (AVIDecImpl *)pin->pin.pinInfo.pFilter;
  72     AM_MEDIA_TYPE amt;
  73     HRESULT hr;
  74     DWORD res;
  75     IMediaSample* pOutSample = NULL;
  76     DWORD cbDstStream;
  77     LPBYTE pbDstStream;
  78     DWORD cbSrcStream;
  79     LPBYTE pbSrcStream;
  80     LONGLONG tStart, tStop;
  81
  82     EnterCriticalSection(&This->tf.csFilter);
  83     if (This->tf.state == State_Stopped)
  84     {
  85         LeaveCriticalSection(&This->tf.csFilter);
  86         return VFW_E_WRONG_STATE;
  87     }
  88
  89     if (pin->end_of_stream || pin->flushing)
  90     {
  91         LeaveCriticalSection(&This->tf.csFilter);
  92         return S_FALSE;
  93     }
  94
  95     hr = IMediaSample_GetPointer(pSample, &pbSrcStream);
  96     if (FAILED(hr))
  97     {
  98         ERR("Cannot get pointer to sample data (%x)\n", hr);
  99         goto error;
 100     }
 101
 102     cbSrcStream = IMediaSample_GetActualDataLength(pSample);
 103
 104     TRACE("Sample data ptr = %p, size = %d\n", pbSrcStream, cbSrcStream);
 105
 106     hr = IPin_ConnectionMediaType(This->tf.ppPins[0], &amt);
 107     if (FAILED(hr)) {
 108         ERR("Unable to retrieve media type\n");
 109         goto error;
 110     }
 111
 112     /* Update input size to match sample size */
 113     This->pBihIn->biSizeImage = cbSrcStream;
 114
 115     hr = OutputPin_GetDeliveryBuffer((OutputPin*)This->tf.ppPins[1], &pOutSample, NULL, NULL, 0);
 116     if (FAILED(hr)) {
 117         ERR("Unable to get delivery buffer (%x)\n", hr);
 118         goto error;
 119     }
 120
 121     hr = IMediaSample_SetActualDataLength(pOutSample, 0);
 122     assert(hr == S_OK);
 123
 124     hr = IMediaSample_GetPointer(pOutSample, &pbDstStream);
 125     if (FAILED(hr)) {
 126         ERR("Unable to get pointer to buffer (%x)\n", hr);
 127         goto error;
 128     }
 129     cbDstStream = IMediaSample_GetSize(pOutSample);
 130     if (cbDstStream < This->pBihOut->biSizeImage) {
 131         ERR("Sample size is too small %d < %d\n", cbDstStream, This->pBihOut->biSizeImage);
 132         hr = E_FAIL;
 133         goto error;
 134     }
 135
 136     res = ICDecompress(This->hvid, 0, This->pBihIn, pbSrcStream, This->pBihOut, pbDstStream);
 137     if (res != ICERR_OK)
 138         ERR("Error occurred during the decompression (%x)\n", res);
 139
 140     IMediaSample_SetActualDataLength(pOutSample, This->pBihOut->biSizeImage);
 141
 142     IMediaSample_SetPreroll(pOutSample, (IMediaSample_IsPreroll(pSample) == S_OK));
 143     IMediaSample_SetDiscontinuity(pOutSample, (IMediaSample_IsDiscontinuity(pSample) == S_OK));
 144     IMediaSample_SetSyncPoint(pOutSample, (IMediaSample_IsSyncPoint(pSample) == S_OK));
 145
 146     if (IMediaSample_GetTime(pSample, &tStart, &tStop) == S_OK)
 147         IMediaSample_SetTime(pOutSample, &tStart, &tStop);
 148     else
 149         IMediaSample_SetTime(pOutSample, NULL, NULL);
 150
 151     LeaveCriticalSection(&This->tf.csFilter);
 152     hr = OutputPin_SendSample((OutputPin*)This->tf.ppPins[1], pOutSample);
 153     if (hr != S_OK && hr != VFW_E_NOT_CONNECTED)
 154         ERR("Error sending sample (%x)\n", hr);
 155     IMediaSample_Release(pOutSample);
 156     return hr;
 157
 158 error:
 159     if (pOutSample)
 160         IMediaSample_Release(pOutSample);
 161
 162     LeaveCriticalSection(&This->tf.csFilter);
 163     return hr;
 164 }
 165
 166 static HRESULT AVIDec_ProcessEnd(TransformFilterImpl* pTransformFilter)
 167 {
 168     AVIDecImpl* This = (AVIDecImpl*)pTransformFilter;
 169     DWORD result;
 170
 171     TRACE("(%p)->()\n", This);
 172
 173     if (!This->hvid)
 174         return S_OK;
 175
 176     result = ICDecompressEnd(This->hvid);
 177     if (result != ICERR_OK)
 178     {
 179         ERR("Cannot stop processing (%d)\n", result);
 180         return E_FAIL;
 181     }
 182     return S_OK;
 183 }
 184
 185 static HRESULT AVIDec_ConnectInput(InputPin *pin, const AM_MEDIA_TYPE * pmt)
 186 {
 187     AVIDecImpl* This = (AVIDecImpl*)pin->pin.pinInfo.pFilter;
 188     HRESULT hr = VFW_E_TYPE_NOT_ACCEPTED;
 189
 190     TRACE("(%p)->(%p)\n", This, pmt);
 191
 192     /* Check root (GUID w/o FOURCC) */
 193     if ((IsEqualIID(&pmt->majortype, &MEDIATYPE_Video)) &&
 194         (!memcmp(((const char *)&pmt->subtype)+4, ((const char *)&MEDIATYPE_Video)+4, sizeof(GUID)-4)))
 195     {
 196         VIDEOINFOHEADER *format1 = (VIDEOINFOHEADER *)pmt->pbFormat;
 197         VIDEOINFOHEADER2 *format2 = (VIDEOINFOHEADER2 *)pmt->pbFormat;
 198         BITMAPINFOHEADER *bmi;
 199
 200         if (IsEqualIID(&pmt->formattype, &FORMAT_VideoInfo))
 201             bmi = &format1->bmiHeader;
 202         else if (IsEqualIID(&pmt->formattype, &FORMAT_VideoInfo2))
 203             bmi = &format2->bmiHeader;
 204         else
 205             goto failed;
 206         TRACE("Fourcc: %s\n", debugstr_an((const char *)&pmt->subtype.Data1, 4));
 207
 208         This->hvid = ICLocate(pmt->majortype.Data1, pmt->subtype.Data1, bmi, NULL, ICMODE_DECOMPRESS);
 209         if (This->hvid)
 210         {
 211             AM_MEDIA_TYPE* outpmt = &This->tf.pmt;
 212             const CLSID* outsubtype;
 213             DWORD bih_size;
 214             DWORD output_depth = bmi->biBitCount;
 215             DWORD result;
 216             FreeMediaType(outpmt);
 217
 218             switch(bmi->biBitCount)
 219             {
 220                 case 32: outsubtype = &MEDIASUBTYPE_RGB32; break;
 221                 case 24: outsubtype = &MEDIASUBTYPE_RGB24; break;
 222                 case 16: outsubtype = &MEDIASUBTYPE_RGB565; break;
 223                 case 8:  outsubtype = &MEDIASUBTYPE_RGB8; break;
 224                 default:
 225                     WARN("Non standard input depth %d, forced output depth to 32\n", bmi->biBitCount);
 226                     outsubtype = &MEDIASUBTYPE_RGB32;
 227                     output_depth = 32;
 228                     break;
 229             }
 230
 231             /* Copy bitmap header from media type to 1 for input and 1 for output */
 232             bih_size = bmi->biSize + bmi->biClrUsed * 4;
 233             This->pBihIn = CoTaskMemAlloc(bih_size);
 234             if (!This->pBihIn)
 235             {
 236                 hr = E_OUTOFMEMORY;
 237                 goto failed;
 238             }
 239             This->pBihOut = CoTaskMemAlloc(bih_size);
 240             if (!This->pBihOut)
 241             {
 242                 hr = E_OUTOFMEMORY;
 243                 goto failed;
 244             }
 245             memcpy(This->pBihIn, bmi, bih_size);
 246             memcpy(This->pBihOut, bmi, bih_size);
 247
 248             /* Update output format as non compressed bitmap */
 249             This->pBihOut->biCompression = 0;
 250             This->pBihOut->biBitCount = output_depth;
 251             This->pBihOut->biSizeImage = This->pBihOut->biWidth * This->pBihOut->biHeight * This->pBihOut->biBitCount / 8;
 252             TRACE("Size: %u\n", This->pBihIn->biSize);
 253             result = ICDecompressQuery(This->hvid, This->pBihIn, This->pBihOut);
 254             if (result != ICERR_OK)
 255             {
 256                 ERR("Unable to found a suitable output format (%d)\n", result);
 257                 goto failed;
 258             }
 259
 260             /* Update output media type */
 261             CopyMediaType(outpmt, pmt);
 262             outpmt->subtype = *outsubtype;
 263
 264             if (IsEqualIID(&pmt->formattype, &FORMAT_VideoInfo))
 265                 memcpy(&(((VIDEOINFOHEADER *)outpmt->pbFormat)->bmiHeader), This->pBihOut, This->pBihOut->biSize);
 266             else if (IsEqualIID(&pmt->formattype, &FORMAT_VideoInfo2))
 267                 memcpy(&(((VIDEOINFOHEADER2 *)outpmt->pbFormat)->bmiHeader), This->pBihOut, This->pBihOut->biSize);
 268             else
 269                 assert(0);
 270
 271             /* Update buffer size of media samples in output */
 272             ((OutputPin*)This->tf.ppPins[1])->allocProps.cbBuffer = This->pBihOut->biSizeImage;
 273
 274             TRACE("Connection accepted\n");
 275             return S_OK;
 276         }
 277         TRACE("Unable to find a suitable VFW decompressor\n");
 278     }
 279
 280 failed:
 281
 282     TRACE("Connection refused\n");
 283     return hr;
 284 }
 285
 286 static HRESULT AVIDec_Cleanup(InputPin *pin)
 287 {
 288     AVIDecImpl *This = (AVIDecImpl *)pin->pin.pinInfo.pFilter;
 289
 290     TRACE("(%p)->()\n", This);
 291
 292     if (This->hvid)
 293         ICClose(This->hvid);
 294     if (This->pBihIn)
 295         CoTaskMemFree(This->pBihIn);
 296     if (This->pBihOut)
 297         CoTaskMemFree(This->pBihOut);
 298
 299     This->hvid = NULL;
 300     This->pBihIn = NULL;
 301     This->pBihOut = NULL;
 302
 303     return S_OK;
 304 }
 305
 306 static const TransformFuncsTable AVIDec_FuncsTable = {
 307     AVIDec_ProcessBegin,
 308     AVIDec_ProcessSampleData,
 309     AVIDec_ProcessEnd,
 310     NULL,
 311     AVIDec_ConnectInput,
 312     AVIDec_Cleanup
 313 };
 314
 315 HRESULT AVIDec_create(IUnknown * pUnkOuter, LPVOID * ppv)
 316 {
 317     HRESULT hr;
 318     AVIDecImpl * This;
 319
 320     TRACE("(%p, %p)\n", pUnkOuter, ppv);
 321
 322     *ppv = NULL;
 323
 324     if (pUnkOuter)
 325         return CLASS_E_NOAGGREGATION;
 326
 327     /* Note: This memory is managed by the transform filter once created */
 328     This = CoTaskMemAlloc(sizeof(AVIDecImpl));
 329
 330     This->hvid = NULL;
 331     This->pBihIn = NULL;
 332     This->pBihOut = NULL;
 333
 334     hr = TransformFilter_Create(&(This->tf), &CLSID_AVIDec, &AVIDec_FuncsTable, NULL, NULL, NULL);
 335
 336     if (FAILED(hr))
 337         return hr;
 338
 339     *ppv = This;
 340
 341     return hr;
 342 }