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