[MSVFW32_WINETEST] Sync with Wine Staging 1.7.55. CORE-10536
[reactos.git] / rostests / winetests / msvfw32 / msvfw.c
1 /*
2 * Unit tests for video playback
3 *
4 * Copyright 2008,2010 Jörg Höhle
5 * Copyright 2008 Austin English
6 *
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
11 *
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
16 *
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20 */
21
22 #define WIN32_LEAN_AND_MEAN
23 #include <windows.h>
24 #include <vfw.h>
25
26 #include "wine/test.h"
27
28 static void test_OpenCase(void)
29 {
30 HIC h;
31 ICINFO info;
32 /* Check if default handler works */
33 h = ICOpen(mmioFOURCC('v','i','d','c'),0,ICMODE_DECOMPRESS);
34 ok(0!=h,"ICOpen(vidc.0) failed\n");
35 if (h) {
36 info.dwSize = sizeof(info);
37 info.szName[0] = 0;
38 ICGetInfo(h, &info, sizeof(info));
39 trace("The default decompressor is %s\n", wine_dbgstr_w(info.szName));
40 ok(ICClose(h)==ICERR_OK,"ICClose failed\n");
41 }
42 h = ICOpen(mmioFOURCC('v','i','d','c'),0,ICMODE_COMPRESS);
43 ok(0!=h || broken(h == 0),"ICOpen(vidc.0) failed\n"); /* Not present in Win8 */
44 if (h) {
45 info.dwSize = sizeof(info);
46 info.szName[0] = 0;
47 ICGetInfo(h, &info, sizeof(info));
48 trace("The default compressor is %s\n", wine_dbgstr_w(info.szName));
49 ok(ICClose(h)==ICERR_OK,"ICClose failed\n");
50 }
51
52 /* Open a compressor with combinations of lowercase
53 * and uppercase compressortype and handler.
54 */
55 h = ICOpen(mmioFOURCC('v','i','d','c'),mmioFOURCC('m','s','v','c'),ICMODE_DECOMPRESS);
56 ok(0!=h,"ICOpen(vidc.msvc) failed\n");
57 if (h) {
58 ok(ICClose(h)==ICERR_OK,"ICClose failed\n");
59 }
60 h = ICOpen(mmioFOURCC('v','i','d','c'),mmioFOURCC('M','S','V','C'),ICMODE_DECOMPRESS);
61 ok(0!=h,"ICOpen(vidc.MSVC) failed\n");
62 if (h) {
63 ok(ICClose(h)==ICERR_OK,"ICClose failed\n");
64 }
65 h = ICOpen(mmioFOURCC('V','I','D','C'),mmioFOURCC('m','s','v','c'),ICMODE_DECOMPRESS);
66 ok(0!=h,"ICOpen(VIDC.msvc) failed\n");
67 if (h) {
68 ok(ICClose(h)==ICERR_OK,"ICClose failed\n");
69 }
70 h = ICOpen(mmioFOURCC('V','I','D','C'),mmioFOURCC('M','S','V','C'),ICMODE_DECOMPRESS);
71 ok(0!=h,"ICOpen(VIDC.MSVC) failed\n");
72 if (h) {
73 ok(ICClose(h)==ICERR_OK,"ICClose failed\n");
74 }
75 h = ICOpen(mmioFOURCC('v','i','d','c'),mmioFOURCC('m','S','v','C'),ICMODE_DECOMPRESS);
76 ok(0!=h,"ICOpen(vidc.mSvC) failed\n");
77 if (h) {
78 ok(ICClose(h)==ICERR_OK,"ICClose failed\n");
79 }
80 h = ICOpen(mmioFOURCC('v','I','d','C'),mmioFOURCC('m','s','v','c'),ICMODE_DECOMPRESS);
81 ok(0!=h,"ICOpen(vIdC.msvc) failed\n");
82 if (h) {
83 ok(ICClose(h)==ICERR_OK,"ICClose failed\n");
84 }
85 }
86
87 static void test_Locate(void)
88 {
89 static BITMAPINFOHEADER bi = {sizeof(BITMAPINFOHEADER),32,8, 1,8, BI_RLE8, 0,100000,100000, 0,0};
90 static BITMAPINFOHEADER bo = {sizeof(BITMAPINFOHEADER),32,8, 1,8, BI_RGB, 0,100000,100000, 0,0};
91 HIC h;
92 DWORD err;
93
94 /* Oddly, MSDN documents that ICLocate takes BITMAPINFOHEADER
95 * pointers, while ICDecompressQuery takes the larger
96 * BITMAPINFO. Probably it's all the same as long as the
97 * variable length color quads are present when they are
98 * needed. */
99
100 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
101 ok(h != 0, "RLE8->RGB failed\n");
102 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
103
104 bo.biHeight = - bo.biHeight;
105 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
106 ok(h == 0, "RLE8->RGB height<0 succeeded\n");
107 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
108 bo.biHeight = - bo.biHeight;
109
110 bi.biCompression = mmioFOURCC('c','v','i','d'); /* Cinepak */
111 h = ICOpen(ICTYPE_VIDEO, mmioFOURCC('c','v','i','d'), ICMODE_DECOMPRESS);
112 if (h == 0) win_skip("Cinepak/ICCVID codec not found\n");
113 else {
114 bo.biBitCount = bi.biBitCount = 32;
115 err = ICDecompressQuery(h, &bi, &bo);
116 ok(err == ICERR_OK, "Query cvid->RGB32: %d\n", err);
117
118 err = ICDecompressQuery(h, &bi, NULL);
119 ok(err == ICERR_OK, "Query cvid 32: %d\n", err);
120
121 bo.biHeight = -bo.biHeight;
122 err = ICDecompressQuery(h, &bi, &bo);
123 ok(err == ICERR_OK, "Query cvid->RGB32 height<0: %d\n", err);
124 bo.biHeight = -bo.biHeight;
125
126 ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
127
128 bo.biBitCount = bi.biBitCount = 8;
129 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
130 todo_wine ok(h != 0, "cvid->RGB8 failed\n");
131 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
132 bo.biHeight = - bo.biHeight;
133 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
134 todo_wine ok(h != 0, "cvid->RGB8 height<0 failed\n");
135 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
136 bo.biHeight = - bo.biHeight;
137
138 bo.biBitCount = bi.biBitCount = 16;
139 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
140 ok(h != 0, "cvid->RGB16 failed\n");
141 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
142 bo.biHeight = - bo.biHeight;
143 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
144 ok(h != 0, "cvid->RGB16 height<0 failed\n");
145 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
146 bo.biHeight = - bo.biHeight;
147
148 bo.biBitCount = bi.biBitCount = 32;
149 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
150 ok(h != 0, "cvid->RGB32 failed\n");
151 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
152 bo.biHeight = - bo.biHeight;
153 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
154 ok(h != 0, "cvid->RGB32 height<0 failed\n");
155 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
156 bo.biHeight = - bo.biHeight;
157
158 bi.biCompression = mmioFOURCC('C','V','I','D');
159 /* Unlike ICOpen, upper case fails with ICLocate. */
160 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
161 ok(h == 0, "CVID->RGB32 upper case succeeded\n");
162 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
163 }
164
165 bi.biCompression = mmioFOURCC('M','S','V','C'); /* MS Video 1 */
166
167 bo.biBitCount = bi.biBitCount = 16;
168 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
169 ok(h != 0, "MSVC->RGB16 failed\n");
170 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
171
172 bo.biHeight = - bo.biHeight;
173 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
174 todo_wine ok(h != 0, "MSVC->RGB16 height<0 failed\n");
175 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
176 bo.biHeight = - bo.biHeight;
177
178 bo.biHeight--;
179 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
180 ok(h == 0, "MSVC->RGB16 height too small succeeded\n");
181 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
182 bo.biHeight++;
183
184 /* ICLocate wants upper case MSVC */
185 bi.biCompression = mmioFOURCC('m','s','v','c');
186 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
187 ok(h == 0, "msvc->RGB16 succeeded\n");
188 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
189
190 bi.biCompression = mmioFOURCC('M','S','V','C');
191 h = ICOpen(ICTYPE_VIDEO, mmioFOURCC('M','S','V','C'), ICMODE_DECOMPRESS);
192 ok(h != 0, "No MSVC codec installed!?\n");
193 if (h != 0) {
194 err = ICDecompressQuery(h, &bi, &bo);
195 ok(err == ICERR_OK, "Query MSVC->RGB16: %d\n", err);
196
197 err = ICDecompressQuery(h, &bi, NULL);
198 ok(err == ICERR_OK, "Query MSVC 16: %d\n", err);
199
200 bo.biHeight = -bo.biHeight;
201 err = ICDecompressQuery(h, &bi, &bo);
202 todo_wine ok(err == ICERR_OK, "Query MSVC->RGB16 height<0: %d\n", err);
203 bo.biHeight = -bo.biHeight;
204
205 bi.biCompression = mmioFOURCC('m','s','v','c');
206 err = ICDecompressQuery(h, &bi, &bo);
207 ok(err == ICERR_BADFORMAT, "Query msvc->RGB16: %d\n", err);
208
209 ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
210 }
211
212 bi.biCompression = BI_RGB;
213 bo.biBitCount = bi.biBitCount = 8;
214 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
215 ok(h != 0, "RGB8->RGB identity failed\n");
216 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
217
218 bi.biCompression = BI_RLE8;
219 h = ICLocate(ICTYPE_VIDEO, 0, &bi, &bo, ICMODE_DECOMPRESS);
220 ok(h != 0, "RLE8->RGB again failed\n");
221 if (h) ok(ICClose(h) == ICERR_OK,"ICClose failed\n");
222 }
223
224 static void test_ICSeqCompress(void)
225 {
226 /* The purpose of this test is to validate sequential frame compressing
227 * functions. The MRLE codec will be used because Wine supports it and
228 * it is present in any Windows.
229 */
230 HIC h;
231 DWORD err, vidc = mmioFOURCC('v','i','d','c'), mrle = mmioFOURCC('m', 'r', 'l', 'e');
232 DWORD i;
233 LONG frame_len;
234 BOOL key_frame, ret;
235 char *frame;
236 COMPVARS pc;
237 struct { BITMAPINFOHEADER header; RGBQUAD map[256]; }
238 input_header = { {sizeof(BITMAPINFOHEADER), 32, 1, 1, 8, 0, 32*8, 0, 0, 256, 256},
239 {{255,0,0}, {0,255,0}, {0,0,255}, {255,255,255}}};
240 PBITMAPINFO bitmap = (PBITMAPINFO) &input_header;
241 static BYTE input[32] = {1,2,3,3,3,3,2,3,1};
242 static const BYTE output_kf[] = {1,1,1,2,4,3,0,3,2,3,1,0,23,0,0,0,0,1}, /* key frame*/
243 output_nkf[] = {0,0,0,1}; /* non key frame */
244
245 h = ICOpen(vidc, mrle, ICMODE_COMPRESS);
246 ok(h != NULL, "Expected non-NULL\n");
247
248 pc.cbSize = sizeof(pc);
249 pc.dwFlags = ICMF_COMPVARS_VALID;
250 pc.fccType = vidc;
251 pc.fccHandler = mrle;
252 pc.hic = h;
253 pc.lpbiIn = NULL;
254 pc.lpbiOut = NULL;
255 pc.lpBitsOut = pc.lpBitsPrev = pc.lpState = NULL;
256 pc.lQ = ICQUALITY_DEFAULT;
257 pc.lKey = 1;
258 pc.lDataRate = 300;
259 pc.lpState = NULL;
260 pc.cbState = 0;
261
262 ret = ICSeqCompressFrameStart(&pc, bitmap);
263 ok(ret == TRUE, "Expected TRUE\n");
264 /* Check that reserved pointers were allocated */
265 ok(pc.lpbiIn != NULL, "Expected non-NULL\n");
266 ok(pc.lpbiOut != NULL, "Expected non-NULL\n");
267
268 for(i = 0; i < 9; i++)
269 {
270 frame_len = 0;
271 frame = ICSeqCompressFrame(&pc, 0, input, &key_frame, &frame_len);
272 ok(frame != NULL, "Frame[%d]: Expected non-NULL\n", i);
273 if (frame_len == sizeof(output_nkf))
274 ok(!memcmp(output_nkf, frame, frame_len), "Frame[%d]: Contents do not match\n", i);
275 else if (frame_len == sizeof(output_kf))
276 ok(!memcmp(output_kf, frame, frame_len), "Frame[%d]: Contents do not match\n", i);
277 else
278 ok(0, "Unknown frame size of %d byten\n", frame_len);
279 }
280
281 ICSeqCompressFrameEnd(&pc);
282 ICCompressorFree(&pc);
283 /* ICCompressorFree already closed the HIC */
284 err = ICClose(h);
285 ok(err == ICERR_BADHANDLE, "Expected -8, got %d\n", err);
286 }
287
288 START_TEST(msvfw)
289 {
290 test_OpenCase();
291 test_Locate();
292 test_ICSeqCompress();
293 }