Use the more idiomatic form of iterating through the list.
[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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  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 (%ld)\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,%ld)\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 (%lx)\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 (%lx)\n", hr);
110         goto error;
111     }
112     cbDstStream = IMediaSample_GetSize(pSample);
113     if (cbDstStream < This->pBihOut->biSizeImage) {
114         ERR("Sample size is too small %ld < %ld\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 (%lx)\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 (%lx)\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 (%ld)\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     if ((IsEqualIID(&pmt->majortype, &MEDIATYPE_Video)) &&
162         (!memcmp(((char*)&pmt->subtype)+4, ((char*)&MEDIATYPE_Video)+4, sizeof(GUID)-4)) && /* Check root (GUID w/o FOURCC) */
163         (IsEqualIID(&pmt->formattype, &FORMAT_VideoInfo)))
164     {
165         VIDEOINFOHEADER* format = (VIDEOINFOHEADER*)pmt->pbFormat;
166
167         This->hvid = ICLocate(pmt->majortype.Data1, pmt->subtype.Data1, &format->bmiHeader, NULL, ICMODE_DECOMPRESS);
168         if (This->hvid)
169         {
170             AM_MEDIA_TYPE* outpmt = &((OutputPin*)This->tf.ppPins[1])->pin.mtCurrent;
171             const CLSID* outsubtype;
172             DWORD bih_size;
173             DWORD output_depth = format->bmiHeader.biBitCount;
174             DWORD result;
175
176             switch(format->bmiHeader.biBitCount)
177             {
178                 case 32: outsubtype = &MEDIASUBTYPE_RGB32; break;
179                 case 24: outsubtype = &MEDIASUBTYPE_RGB24; break;
180                 case 16: outsubtype = &MEDIASUBTYPE_RGB565; break;
181                 case 8:  outsubtype = &MEDIASUBTYPE_RGB8; break;
182                 default:
183                     TRACE("Non standard input depth %d, forced ouptut depth to 32\n", format->bmiHeader.biBitCount);
184                     outsubtype = &MEDIASUBTYPE_RGB32;
185                     output_depth = 32;
186                     break;
187             }
188
189             /* Copy bitmap header from media type to 1 for input and 1 for output */
190             bih_size = format->bmiHeader.biSize + format->bmiHeader.biClrUsed * 4;
191             This->pBihIn = (BITMAPINFOHEADER*)CoTaskMemAlloc(bih_size);
192             if (!This->pBihIn)
193             {
194                 hr = E_OUTOFMEMORY;
195                 goto failed;
196             }
197             This->pBihOut = (BITMAPINFOHEADER*)CoTaskMemAlloc(bih_size);
198             if (!This->pBihOut)
199             {
200                 hr = E_OUTOFMEMORY;
201                 goto failed;
202             }
203             memcpy(This->pBihIn, &format->bmiHeader, bih_size);
204             memcpy(This->pBihOut, &format->bmiHeader, bih_size);
205
206             /* Update output format as non compressed bitmap */
207             This->pBihOut->biCompression = 0;
208             This->pBihOut->biBitCount = output_depth;
209             This->pBihOut->biSizeImage = This->pBihOut->biWidth * This->pBihOut->biHeight * This->pBihOut->biBitCount / 8;
210
211             result = ICDecompressQuery(This->hvid, This->pBihIn, This->pBihOut);
212             if (result != ICERR_OK)
213             {
214                 TRACE("Unable to found a suitable output format (%ld)\n", result);
215                 goto failed;
216             }
217
218             /* Update output media type */
219             CopyMediaType(outpmt, pmt);
220             outpmt->subtype = *outsubtype;
221             memcpy(&(((VIDEOINFOHEADER*)outpmt->pbFormat)->bmiHeader), This->pBihOut, This->pBihOut->biSize); 
222
223             /* Update buffer size of media samples in output */
224             ((OutputPin*)This->tf.ppPins[1])->allocProps.cbBuffer = This->pBihOut->biSizeImage;
225
226             TRACE("Connection accepted\n");
227             return S_OK;
228         }
229         TRACE("Unable to find a suitable VFW decompressor\n");
230     }
231
232 failed:
233     AVIDec_Cleanup(pTransformFilter);
234     
235     TRACE("Connection refused\n");
236     return hr;
237 }
238
239 static HRESULT AVIDec_Cleanup(TransformFilterImpl* pTransformFilter)
240 {
241     AVIDecImpl* This = (AVIDecImpl*)pTransformFilter;
242
243     TRACE("(%p)->()\n", This);
244     
245     if (This->hvid)
246         ICClose(This->hvid);
247     if (This->pBihIn)
248         CoTaskMemFree(This->pBihIn);
249     if (This->pBihOut)
250         CoTaskMemFree(This->pBihOut);
251
252     This->hvid = NULL;
253     This->pBihIn = NULL;
254     This->pBihOut = NULL;
255
256     return S_OK;
257 }
258
259 TransformFuncsTable AVIDec_FuncsTable = {
260     AVIDec_ProcessBegin,
261     AVIDec_ProcessSampleData,
262     AVIDec_ProcessEnd,
263     AVIDec_ConnectInput,
264     AVIDec_Cleanup
265 };
266
267 HRESULT AVIDec_create(IUnknown * pUnkOuter, LPVOID * ppv)
268 {
269     HRESULT hr;
270     AVIDecImpl * This;
271
272     TRACE("(%p, %p)\n", pUnkOuter, ppv);
273
274     *ppv = NULL;
275
276     if (pUnkOuter)
277         return CLASS_E_NOAGGREGATION;
278
279     /* Note: This memory is managed by the transform filter once created */
280     This = CoTaskMemAlloc(sizeof(AVIDecImpl));
281
282     This->hvid = NULL;
283     This->pBihIn = NULL;
284     This->pBihOut = NULL;
285
286     hr = TransformFilter_Create(&(This->tf), &CLSID_AVIDec, &AVIDec_FuncsTable);
287
288     if (FAILED(hr))
289         return hr;
290
291     *ppv = (LPVOID)This;
292
293     return hr;
294 }