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