winealsa.drv: Fixed bad sizeof (pointer vs struct) (Coverity).
[wine.git] / dlls / msvidc32 / msvideo1.c
blob7add314d8d3a6464f085d8ddd6b0a1bd3d615abf
1 /*
2 * Microsoft Video-1 Decoder
3 * Copyright (C) 2003 the ffmpeg project
5 * Portions Copyright (C) 2004 Mike McCormack for CodeWeavers
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.
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.
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
23 /**
24 * @file msvideo1.c
25 * Microsoft Video-1 Decoder by Mike Melanson (melanson@pcisys.net)
26 * For more information about the MS Video-1 format, visit:
27 * http://www.pcisys.net/~melanson/codecs/
29 * This decoder outputs either PAL8 or RGB555 data, depending on the
30 * whether a RGB palette was passed through palctrl;
31 * if it's present, then the data is PAL8; RGB555 otherwise.
34 #include <stdarg.h>
35 #include "windef.h"
36 #include "winbase.h"
37 #include "wingdi.h"
38 #include "winuser.h"
39 #include "commdlg.h"
40 #include "vfw.h"
41 #include "mmsystem.h"
42 #include "msvidc32_private.h"
44 #include "wine/debug.h"
46 WINE_DEFAULT_DEBUG_CHANNEL(msvidc32);
48 static HINSTANCE MSVIDC32_hModule;
50 #define CRAM_MAGIC mmioFOURCC('C', 'R', 'A', 'M')
51 #define MSVC_MAGIC mmioFOURCC('M', 'S', 'V', 'C')
52 #define WHAM_MAGIC mmioFOURCC('W', 'H', 'A', 'M')
53 #define compare_fourcc(fcc1, fcc2) (((fcc1)^(fcc2))&~0x20202020)
55 #define PALETTE_COUNT 256
56 #define LE_16(x) ((((const uint8_t *)(x))[1] << 8) | ((const uint8_t *)(x))[0])
58 /* FIXME - check the stream size */
59 #define CHECK_STREAM_PTR(n) \
60 if ((stream_ptr + n) > buf_size ) { \
61 WARN("stream_ptr out of bounds (%d >= %d)\n", \
62 stream_ptr + n, buf_size); \
63 return; \
66 typedef BYTE uint8_t;
68 typedef struct Msvideo1Context {
69 DWORD dwMagic;
70 int mode_8bit; /* if it's not 8-bit, it's 16-bit */
71 } Msvideo1Context;
73 static void
74 msvideo1_decode_8bit( int width, int height, const unsigned char *buf, int buf_size,
75 unsigned char *pixels, int stride)
77 int block_ptr, pixel_ptr;
78 int total_blocks;
79 int pixel_x, pixel_y; /* pixel width and height iterators */
80 int block_x, block_y; /* block width and height iterators */
81 int blocks_wide, blocks_high; /* width and height in 4x4 blocks */
82 int block_inc;
83 int row_dec;
85 /* decoding parameters */
86 int stream_ptr;
87 unsigned char byte_a, byte_b;
88 unsigned short flags;
89 int skip_blocks;
90 unsigned char colors[8];
92 stream_ptr = 0;
93 skip_blocks = 0;
94 blocks_wide = width / 4;
95 blocks_high = height / 4;
96 total_blocks = blocks_wide * blocks_high;
97 block_inc = 4;
98 #ifdef ORIGINAL
99 row_dec = stride + 4;
100 #else
101 row_dec = - (stride - 4); /* such that -row_dec > 0 */
102 #endif
104 for (block_y = blocks_high; block_y > 0; block_y--) {
105 #ifdef ORIGINAL
106 block_ptr = ((block_y * 4) - 1) * stride;
107 #else
108 block_ptr = ((blocks_high - block_y) * 4) * stride;
109 #endif
110 for (block_x = blocks_wide; block_x > 0; block_x--) {
111 /* check if this block should be skipped */
112 if (skip_blocks) {
113 block_ptr += block_inc;
114 skip_blocks--;
115 total_blocks--;
116 continue;
119 pixel_ptr = block_ptr;
121 /* get the next two bytes in the encoded data stream */
122 CHECK_STREAM_PTR(2);
123 byte_a = buf[stream_ptr++];
124 byte_b = buf[stream_ptr++];
126 /* check if the decode is finished */
127 if ((byte_a == 0) && (byte_b == 0) && (total_blocks == 0))
128 return;
129 else if ((byte_b & 0xFC) == 0x84) {
130 /* skip code, but don't count the current block */
131 skip_blocks = ((byte_b - 0x84) << 8) + byte_a - 1;
132 } else if (byte_b < 0x80) {
133 /* 2-color encoding */
134 flags = (byte_b << 8) | byte_a;
136 CHECK_STREAM_PTR(2);
137 colors[0] = buf[stream_ptr++];
138 colors[1] = buf[stream_ptr++];
140 for (pixel_y = 0; pixel_y < 4; pixel_y++) {
141 for (pixel_x = 0; pixel_x < 4; pixel_x++, flags >>= 1)
142 pixels[pixel_ptr++] = colors[(flags & 0x1) ^ 1];
143 pixel_ptr -= row_dec;
145 } else if (byte_b >= 0x90) {
146 /* 8-color encoding */
147 flags = (byte_b << 8) | byte_a;
149 CHECK_STREAM_PTR(8);
150 memcpy(colors, &buf[stream_ptr], 8);
151 stream_ptr += 8;
153 for (pixel_y = 0; pixel_y < 4; pixel_y++) {
154 for (pixel_x = 0; pixel_x < 4; pixel_x++, flags >>= 1)
155 pixels[pixel_ptr++] =
156 colors[((pixel_y & 0x2) << 1) +
157 (pixel_x & 0x2) + ((flags & 0x1) ^ 1)];
158 pixel_ptr -= row_dec;
160 } else {
161 /* 1-color encoding */
162 colors[0] = byte_a;
164 for (pixel_y = 0; pixel_y < 4; pixel_y++) {
165 for (pixel_x = 0; pixel_x < 4; pixel_x++)
166 pixels[pixel_ptr++] = colors[0];
167 pixel_ptr -= row_dec;
171 block_ptr += block_inc;
172 total_blocks--;
177 static void
178 msvideo1_decode_16bit( int width, int height, const unsigned char *buf, int buf_size,
179 unsigned short *pixels, int stride)
181 int block_ptr, pixel_ptr;
182 int total_blocks;
183 int pixel_x, pixel_y; /* pixel width and height iterators */
184 int block_x, block_y; /* block width and height iterators */
185 int blocks_wide, blocks_high; /* width and height in 4x4 blocks */
186 int block_inc;
187 int row_dec;
189 /* decoding parameters */
190 int stream_ptr;
191 unsigned char byte_a, byte_b;
192 unsigned short flags;
193 int skip_blocks;
194 unsigned short colors[8];
196 stream_ptr = 0;
197 skip_blocks = 0;
198 blocks_wide = width / 4;
199 blocks_high = height / 4;
200 total_blocks = blocks_wide * blocks_high;
201 block_inc = 4;
202 #ifdef ORIGINAL
203 row_dec = stride + 4;
204 #else
205 row_dec = - (stride - 4); /* such that -row_dec > 0 */
206 #endif
208 for (block_y = blocks_high; block_y > 0; block_y--) {
209 #ifdef ORIGINAL
210 block_ptr = ((block_y * 4) - 1) * stride;
211 #else
212 block_ptr = ((blocks_high - block_y) * 4) * stride;
213 #endif
214 for (block_x = blocks_wide; block_x > 0; block_x--) {
215 /* check if this block should be skipped */
216 if (skip_blocks) {
217 block_ptr += block_inc;
218 skip_blocks--;
219 total_blocks--;
220 continue;
223 pixel_ptr = block_ptr;
225 /* get the next two bytes in the encoded data stream */
226 CHECK_STREAM_PTR(2);
227 byte_a = buf[stream_ptr++];
228 byte_b = buf[stream_ptr++];
230 /* check if the decode is finished */
231 if ((byte_a == 0) && (byte_b == 0) && (total_blocks == 0)) {
232 return;
233 } else if ((byte_b & 0xFC) == 0x84) {
234 /* skip code, but don't count the current block */
235 skip_blocks = ((byte_b - 0x84) << 8) + byte_a - 1;
236 } else if (byte_b < 0x80) {
237 /* 2- or 8-color encoding modes */
238 flags = (byte_b << 8) | byte_a;
240 CHECK_STREAM_PTR(4);
241 colors[0] = LE_16(&buf[stream_ptr]);
242 stream_ptr += 2;
243 colors[1] = LE_16(&buf[stream_ptr]);
244 stream_ptr += 2;
246 if (colors[0] & 0x8000) {
247 /* 8-color encoding */
248 CHECK_STREAM_PTR(12);
249 colors[2] = LE_16(&buf[stream_ptr]);
250 stream_ptr += 2;
251 colors[3] = LE_16(&buf[stream_ptr]);
252 stream_ptr += 2;
253 colors[4] = LE_16(&buf[stream_ptr]);
254 stream_ptr += 2;
255 colors[5] = LE_16(&buf[stream_ptr]);
256 stream_ptr += 2;
257 colors[6] = LE_16(&buf[stream_ptr]);
258 stream_ptr += 2;
259 colors[7] = LE_16(&buf[stream_ptr]);
260 stream_ptr += 2;
262 for (pixel_y = 0; pixel_y < 4; pixel_y++) {
263 for (pixel_x = 0; pixel_x < 4; pixel_x++, flags >>= 1)
264 pixels[pixel_ptr++] =
265 colors[((pixel_y & 0x2) << 1) +
266 (pixel_x & 0x2) + ((flags & 0x1) ^ 1)];
267 pixel_ptr -= row_dec;
269 } else {
270 /* 2-color encoding */
271 for (pixel_y = 0; pixel_y < 4; pixel_y++) {
272 for (pixel_x = 0; pixel_x < 4; pixel_x++, flags >>= 1)
273 pixels[pixel_ptr++] = colors[(flags & 0x1) ^ 1];
274 pixel_ptr -= row_dec;
277 } else {
278 /* otherwise, it's a 1-color block */
279 colors[0] = (byte_b << 8) | byte_a;
281 for (pixel_y = 0; pixel_y < 4; pixel_y++) {
282 for (pixel_x = 0; pixel_x < 4; pixel_x++)
283 pixels[pixel_ptr++] = colors[0];
284 pixel_ptr -= row_dec;
288 block_ptr += block_inc;
289 total_blocks--;
294 static LRESULT
295 CRAM_DecompressQuery( Msvideo1Context *info, LPBITMAPINFO in, LPBITMAPINFO out )
297 TRACE("ICM_DECOMPRESS_QUERY %p %p %p\n", info, in, out);
299 if( (info==NULL) || (info->dwMagic!=CRAM_MAGIC) )
300 return ICERR_BADPARAM;
302 TRACE("planes = %d\n", in->bmiHeader.biPlanes );
303 TRACE("bpp = %d\n", in->bmiHeader.biBitCount );
304 TRACE("height = %d\n", in->bmiHeader.biHeight );
305 TRACE("width = %d\n", in->bmiHeader.biWidth );
306 TRACE("compr = %x\n", in->bmiHeader.biCompression );
308 if( ( in->bmiHeader.biCompression != CRAM_MAGIC ) &&
309 ( in->bmiHeader.biCompression != MSVC_MAGIC ) &&
310 ( in->bmiHeader.biCompression != WHAM_MAGIC ) )
311 return ICERR_BADFORMAT;
313 if( ( in->bmiHeader.biBitCount != 16 ) &&
314 ( in->bmiHeader.biBitCount != 8 ) )
316 TRACE("can't do %d bpp\n", in->bmiHeader.biBitCount );
317 return ICERR_BADFORMAT;
320 /* output must be same dimensions as input */
321 if( out )
323 if( in->bmiHeader.biBitCount != out->bmiHeader.biBitCount )
324 return ICERR_BADFORMAT;
325 if( in->bmiHeader.biPlanes != out->bmiHeader.biPlanes )
326 return ICERR_BADFORMAT;
327 if( in->bmiHeader.biHeight != out->bmiHeader.biHeight )
328 return ICERR_BADFORMAT;
329 if( in->bmiHeader.biWidth != out->bmiHeader.biWidth )
330 return ICERR_BADFORMAT;
333 TRACE("OK!\n");
335 return ICERR_OK;
338 static LRESULT
339 CRAM_DecompressGetFormat( Msvideo1Context *info, LPBITMAPINFO in, LPBITMAPINFO out )
341 DWORD size;
343 TRACE("ICM_DECOMPRESS_GETFORMAT %p %p %p\n", info, in, out);
345 if( (info==NULL) || (info->dwMagic!=CRAM_MAGIC) )
346 return ICERR_BADPARAM;
348 size = in->bmiHeader.biSize;
349 if (in->bmiHeader.biBitCount <= 8)
350 size += in->bmiHeader.biClrUsed * sizeof(RGBQUAD);
352 if( out )
354 memcpy( out, in, size );
355 out->bmiHeader.biCompression = BI_RGB;
356 out->bmiHeader.biSizeImage = in->bmiHeader.biHeight
357 * in->bmiHeader.biWidth *4;
358 return ICERR_OK;
361 return size;
364 static LRESULT CRAM_DecompressBegin( Msvideo1Context *info, LPBITMAPINFO in, LPBITMAPINFO out )
366 TRACE("ICM_DECOMPRESS_BEGIN %p %p %p\n", info, in, out);
368 if( (info==NULL) || (info->dwMagic!=CRAM_MAGIC) )
369 return ICERR_BADPARAM;
371 TRACE("bitmap is %d bpp\n", in->bmiHeader.biBitCount);
372 if( in->bmiHeader.biBitCount == 8 )
373 info->mode_8bit = 1;
374 else if( in->bmiHeader.biBitCount == 16 )
375 info->mode_8bit = 0;
376 else
378 info->mode_8bit = 0;
379 FIXME("Unsupported output format %i\n", in->bmiHeader.biBitCount);
382 return ICERR_OK;
385 static LRESULT CRAM_Decompress( Msvideo1Context *info, ICDECOMPRESS *icd, DWORD size )
387 LONG width, height, stride, sz;
389 TRACE("ICM_DECOMPRESS %p %p %d\n", info, icd, size);
391 if( (info==NULL) || (info->dwMagic!=CRAM_MAGIC) )
392 return ICERR_BADPARAM;
394 /* FIXME: flags are ignored */
396 width = icd->lpbiInput->biWidth;
397 height = icd->lpbiInput->biHeight;
398 stride = width; /* in bytes or 16bit words */
399 sz = icd->lpbiInput->biSizeImage;
401 if (info->mode_8bit)
403 msvideo1_decode_8bit( width, height, icd->lpInput, sz,
404 icd->lpOutput, stride);
406 else
408 msvideo1_decode_16bit( width, height, icd->lpInput, sz,
409 icd->lpOutput, stride);
412 return ICERR_OK;
415 static LRESULT CRAM_DecompressEx( Msvideo1Context *info, ICDECOMPRESSEX *icd, DWORD size )
417 LONG width, height, stride, sz;
419 TRACE("ICM_DECOMPRESSEX %p %p %d\n", info, icd, size);
421 if( (info==NULL) || (info->dwMagic!=CRAM_MAGIC) )
422 return ICERR_BADPARAM;
424 /* FIXME: flags are ignored */
426 width = icd->lpbiSrc->biWidth;
427 height = icd->lpbiSrc->biHeight;
428 stride = width;
429 sz = icd->lpbiSrc->biSizeImage;
431 if (info->mode_8bit)
433 msvideo1_decode_8bit( width, height, icd->lpSrc, sz,
434 icd->lpDst, stride);
436 else
438 msvideo1_decode_16bit( width, height, icd->lpSrc, sz,
439 icd->lpDst, stride);
442 return ICERR_OK;
445 static LRESULT CRAM_GetInfo( const Msvideo1Context *info, ICINFO *icinfo, DWORD dwSize )
447 if (!icinfo) return sizeof(ICINFO);
448 if (dwSize < sizeof(ICINFO)) return 0;
450 icinfo->dwSize = sizeof(ICINFO);
451 icinfo->fccType = ICTYPE_VIDEO;
452 icinfo->fccHandler = info ? info->dwMagic : CRAM_MAGIC;
453 icinfo->dwFlags = 0;
454 icinfo->dwVersion = ICVERSION;
455 icinfo->dwVersionICM = ICVERSION;
457 LoadStringW(MSVIDC32_hModule, IDS_NAME, icinfo->szName, sizeof(icinfo->szName)/sizeof(WCHAR));
458 LoadStringW(MSVIDC32_hModule, IDS_DESCRIPTION, icinfo->szDescription, sizeof(icinfo->szDescription)/sizeof(WCHAR));
459 /* msvfw32 will fill icinfo->szDriver for us */
461 return sizeof(ICINFO);
464 /***********************************************************************
465 * DriverProc (MSVIDC32.@)
467 LRESULT WINAPI CRAM_DriverProc( DWORD_PTR dwDriverId, HDRVR hdrvr, UINT msg,
468 LPARAM lParam1, LPARAM lParam2 )
470 Msvideo1Context *info = (Msvideo1Context *) dwDriverId;
471 LRESULT r = ICERR_UNSUPPORTED;
473 TRACE("%ld %p %04x %08lx %08lx\n", dwDriverId, hdrvr, msg, lParam1, lParam2);
475 switch( msg )
477 case DRV_LOAD:
478 TRACE("Loaded\n");
479 r = 1;
480 break;
482 case DRV_ENABLE:
483 break;
485 case DRV_OPEN:
487 ICINFO *icinfo = (ICINFO *)lParam2;
489 TRACE("Opened\n");
491 if (icinfo && compare_fourcc(icinfo->fccType, ICTYPE_VIDEO)) return 0;
493 info = HeapAlloc( GetProcessHeap(), 0, sizeof (Msvideo1Context) );
494 if( info )
496 memset( info, 0, sizeof *info );
497 info->dwMagic = CRAM_MAGIC;
499 r = (LRESULT) info;
500 break;
503 case DRV_CLOSE:
504 HeapFree( GetProcessHeap(), 0, info );
505 break;
507 case DRV_DISABLE:
508 break;
510 case DRV_FREE:
511 break;
513 case ICM_GETINFO:
514 r = CRAM_GetInfo( info, (ICINFO *)lParam1, (DWORD)lParam2 );
515 break;
517 case ICM_DECOMPRESS_QUERY:
518 r = CRAM_DecompressQuery( info, (LPBITMAPINFO) lParam1,
519 (LPBITMAPINFO) lParam2 );
520 break;
522 case ICM_DECOMPRESS_GET_FORMAT:
523 r = CRAM_DecompressGetFormat( info, (LPBITMAPINFO) lParam1,
524 (LPBITMAPINFO) lParam2 );
525 break;
527 case ICM_DECOMPRESS_GET_PALETTE:
528 FIXME("ICM_DECOMPRESS_GET_PALETTE\n");
529 break;
531 case ICM_DECOMPRESSEX_QUERY:
532 FIXME("ICM_DECOMPRESSEX_QUERY\n");
533 break;
535 case ICM_DECOMPRESS:
536 r = CRAM_Decompress( info, (ICDECOMPRESS*) lParam1,
537 (DWORD) lParam2 );
538 break;
540 case ICM_DECOMPRESS_BEGIN:
541 r = CRAM_DecompressBegin( info, (LPBITMAPINFO) lParam1,
542 (LPBITMAPINFO) lParam2 );
543 break;
545 case ICM_DECOMPRESSEX:
546 r = CRAM_DecompressEx( info, (ICDECOMPRESSEX*) lParam1,
547 (DWORD) lParam2 );
548 break;
550 case ICM_DECOMPRESS_END:
551 r = ICERR_OK;
552 break;
554 case ICM_COMPRESS_QUERY:
555 FIXME("compression not implemented\n");
556 r = ICERR_BADFORMAT;
557 break;
559 case ICM_CONFIGURE:
560 r = ICERR_UNSUPPORTED;
561 break;
563 default:
564 FIXME("Unknown message: %04x %ld %ld\n", msg, lParam1, lParam2);
567 return r;
570 /***********************************************************************
571 * DllMain
573 BOOL WINAPI DllMain(HINSTANCE hModule, DWORD dwReason, LPVOID lpReserved)
575 TRACE("(%p,%d,%p)\n", hModule, dwReason, lpReserved);
577 switch (dwReason)
579 case DLL_PROCESS_ATTACH:
580 DisableThreadLibraryCalls(hModule);
581 MSVIDC32_hModule = hModule;
582 break;
584 case DLL_PROCESS_DETACH:
585 break;
587 return TRUE;