?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
msvfw32: Call codec's Configure dialog if the codec supports it.
[wine/multimedia.git] / dlls / msvideo / msvideo_main.c
blob2ac5ff3d3f91811c50832bfcf4a7babf2c18d749
1 /*
2 * Copyright 1998 Marcus Meissner
3 * Copyright 2000 Bradley Baetz
4 * Copyright 2003 Michael Günnewig
5 * Copyright 2005 Dmitry Timoshkov
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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 *
21 * FIXME: This all assumes 32 bit codecs
22 * Win95 appears to prefer 32 bit codecs, even from 16 bit code.
23 * There is the ICOpenFunction16 to worry about still, though.
24 *
25 * TODO
26 * - no thread safety
27 */
28
29 #include <stdarg.h>
30 #include <stdio.h>
31 #include <string.h>
32
33 #define COM_NO_WINDOWS_H
34 #include "windef.h"
35 #include "winbase.h"
36 #include "winreg.h"
37 #include "winnls.h"
38 #include "wingdi.h"
39 #include "winuser.h"
40 #include "commdlg.h"
41 #include "vfw.h"
42 #include "msvideo_private.h"
43 #include "wine/debug.h"
44
45 /* Drivers32 settings */
46 #define HKLM_DRIVERS32 "Software\\Microsoft\\Windows NT\\CurrentVersion\\Drivers32"
47
48 WINE_DEFAULT_DEBUG_CHANNEL(msvideo);
49
50 static inline const char *wine_dbgstr_fcc( DWORD fcc )
51 {
52 return wine_dbg_sprintf("%c%c%c%c",
53 LOBYTE(LOWORD(fcc)), HIBYTE(LOWORD(fcc)),
54 LOBYTE(HIWORD(fcc)), HIBYTE(HIWORD(fcc)));
55 }
56
57 LRESULT (CALLBACK *pFnCallTo16)(HDRVR, HIC, UINT, LPARAM, LPARAM) = NULL;
58
59 static WINE_HIC* MSVIDEO_FirstHic /* = NULL */;
60
61 typedef struct _reg_driver reg_driver;
62 struct _reg_driver
63 {
64 DWORD fccType;
65 DWORD fccHandler;
66 DRIVERPROC proc;
67 LPWSTR name;
68 reg_driver* next;
69 };
70
71 static reg_driver* reg_driver_list = NULL;
72
73 /* This one is a macro such that it works for both ASCII and Unicode */
74 #define fourcc_to_string(str, fcc) do { \
75 (str)[0] = LOBYTE(LOWORD(fcc)); \
76 (str)[1] = HIBYTE(LOWORD(fcc)); \
77 (str)[2] = LOBYTE(HIWORD(fcc)); \
78 (str)[3] = HIBYTE(HIWORD(fcc)); \
79 } while(0)
80
81 HMODULE MSVFW32_hModule;
82
83 BOOL WINAPI DllMain( HINSTANCE hinst, DWORD reason, LPVOID reserved )
84 {
85 TRACE("%p,%lx,%p\n", hinst, reason, reserved);
86
87 switch(reason)
88 {
89 case DLL_PROCESS_ATTACH:
90 DisableThreadLibraryCalls(hinst);
91 MSVFW32_hModule = (HMODULE)hinst;
92 break;
93 }
94 return TRUE;
95 }
96
97 static int compare_fourcc(DWORD fcc1, DWORD fcc2)
98 {
99 char fcc_str1[4];
100 char fcc_str2[4];
101 fourcc_to_string(fcc_str1, fcc1);
102 fourcc_to_string(fcc_str2, fcc2);
103 return strncasecmp(fcc_str1, fcc_str2, 4);
104 }
105
106 typedef BOOL (*enum_handler_t)(const char*, int, void*);
107
108 static BOOL enum_drivers(DWORD fccType, enum_handler_t handler, void* param)
109 {
110 CHAR buf[2048], fccTypeStr[5], *s;
111 DWORD i, cnt = 0, bufLen, lRet;
112 BOOL result = FALSE;
113 FILETIME lastWrite;
114 HKEY hKey;
115
116 fourcc_to_string(fccTypeStr, fccType);
117 fccTypeStr[4] = '.';
118
119 /* first, go through the registry entries */
120 lRet = RegOpenKeyExA(HKEY_LOCAL_MACHINE, HKLM_DRIVERS32, 0, KEY_QUERY_VALUE, &hKey);
121 if (lRet == ERROR_SUCCESS)
122 {
123 DWORD numkeys;
124 RegQueryInfoKeyA( hKey, 0, 0, 0, &numkeys, 0, 0, 0, 0, 0, 0, 0);
125 for (i = 0; i < numkeys; i++)
126 {
127 bufLen = sizeof(buf) / sizeof(buf[0]);
128 lRet = RegEnumKeyExA(hKey, i, buf, &bufLen, 0, 0, 0, &lastWrite);
129 if (lRet != ERROR_SUCCESS) continue;
130 if (strncasecmp(buf, fccTypeStr, 5) || buf[9] != '=') continue;
131 if ((result = handler(buf, cnt++, param))) break;
132 }
133 RegCloseKey( hKey );
134 }
135 if (result) return result;
136
137 /* if that didn't work, go through the values in system.ini */
138 if (GetPrivateProfileSectionA("drivers32", buf, sizeof(buf), "system.ini"))
139 {
140 for (s = buf; *s; s += strlen(s) + 1)
141 {
142 TRACE("got %s\n", s);
143 if (strncasecmp(s, fccTypeStr, 5) || s[9] != '=') continue;
144 if ((result = handler(s, cnt++, param))) break;
145 }
146 }
147
148 return result;
149 }
150
151 /******************************************************************
152 * MSVIDEO_GetHicPtr
153 *
154 *
155 */
156 WINE_HIC* MSVIDEO_GetHicPtr(HIC hic)
157 {
158 WINE_HIC* whic;
159
160 for (whic = MSVIDEO_FirstHic; whic && whic->hic != hic; whic = whic->next);
161 return whic;
162 }
163
164 /***********************************************************************
165 * VideoForWindowsVersion [MSVFW32.2]
166 * VideoForWindowsVersion [MSVIDEO.2]
167 * Returns the version in major.minor form.
168 * In Windows95 this returns 0x040003b6 (4.950)
169 */
170 DWORD WINAPI VideoForWindowsVersion(void)
171 {
172 return 0x040003B6; /* 4.950 */
173 }
174
175 static BOOL ICInfo_enum_handler(const char *drv, int nr, void *param)
176 {
177 ICINFO *lpicinfo = (ICINFO *)param;
178 DWORD fccHandler = mmioStringToFOURCCA(drv + 5, 0);
179
180 /* exact match of fccHandler or nth driver found */
181 if ((lpicinfo->fccHandler != nr) && (lpicinfo->fccHandler != fccHandler))
182 return FALSE;
183
184 lpicinfo->fccHandler = fccHandler;
185 lpicinfo->dwFlags = 0;
186 lpicinfo->dwVersion = 0;
187 lpicinfo->dwVersionICM = ICVERSION;
188 lpicinfo->szName[0] = 0;
189 lpicinfo->szDescription[0] = 0;
190 MultiByteToWideChar(CP_ACP, 0, drv + 10, -1, lpicinfo->szDriver,
191 sizeof(lpicinfo->szDriver)/sizeof(WCHAR));
192
193 return TRUE;
194 }
195
196 /***********************************************************************
197 * ICInfo [MSVFW32.@]
198 * Get information about an installable compressor. Return TRUE if there
199 * is one.
200 *
201 * PARAMS
202 * fccType [I] type of compressor (e.g. 'vidc')
203 * fccHandler [I] real fcc for handler or <n>th compressor
204 * lpicinfo [O] information about compressor
205 */
206 BOOL VFWAPI ICInfo( DWORD fccType, DWORD fccHandler, ICINFO *lpicinfo)
207 {
208 TRACE("(%s,%s/%08lx,%p)\n",
209 wine_dbgstr_fcc(fccType), wine_dbgstr_fcc(fccHandler), fccHandler, lpicinfo);
210
211 lpicinfo->fccType = fccType;
212 lpicinfo->fccHandler = fccHandler;
213 return enum_drivers(fccType, ICInfo_enum_handler, lpicinfo);
214 }
215
216 static DWORD IC_HandleRef = 1;
217
218 /***********************************************************************
219 * ICInstall [MSVFW32.@]
220 */
221 BOOL VFWAPI ICInstall(DWORD fccType, DWORD fccHandler, LPARAM lParam, LPSTR szDesc, UINT wFlags)
222 {
223 reg_driver* driver;
224 unsigned len;
225
226 TRACE("(%s,%s,%p,%p,0x%08x)\n", wine_dbgstr_fcc(fccType), wine_dbgstr_fcc(fccHandler), (void*)lParam, szDesc, wFlags);
227
228 /* Check if a driver is already registered */
229 for (driver = reg_driver_list; driver; driver = driver->next)
230 {
231 if (!compare_fourcc(fccType, driver->fccType) &&
232 !compare_fourcc(fccHandler, driver->fccHandler))
233 break;
234 }
235 if (driver) return FALSE;
236
237 /* Register the driver */
238 driver = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(reg_driver));
239 if (!driver) goto oom;
240 driver->fccType = fccType;
241 driver->fccHandler = fccHandler;
242
243 switch(wFlags)
244 {
245 case ICINSTALL_FUNCTION:
246 driver->proc = (DRIVERPROC)lParam;
247 driver->name = NULL;
248 break;
249 case ICINSTALL_DRIVER:
250 driver->proc = NULL;
251 len = MultiByteToWideChar(CP_ACP, 0, (char*)lParam, -1, NULL, 0);
252 driver->name = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
253 if (!driver->name) goto oom;
254 MultiByteToWideChar(CP_ACP, 0, (char*)lParam, -1, driver->name, len);
255 break;
256 default:
257 ERR("Invalid flags!\n");
258 HeapFree(GetProcessHeap(), 0, driver);
259 return FALSE;
260 }
261
262 /* Insert our driver in the list*/
263 driver->next = reg_driver_list;
264 reg_driver_list = driver;
265
266 return TRUE;
267 oom:
268 HeapFree(GetProcessHeap(), 0, driver);
269 return FALSE;
270 }
271
272 /***********************************************************************
273 * ICRemove [MSVFW32.@]
274 */
275 BOOL VFWAPI ICRemove(DWORD fccType, DWORD fccHandler, UINT wFlags)
276 {
277 reg_driver** pdriver;
278 reg_driver* drv;
279
280 TRACE("(%s,%s,0x%08x)\n", wine_dbgstr_fcc(fccType), wine_dbgstr_fcc(fccHandler), wFlags);
281
282 /* Check if a driver is already registered */
283 for (pdriver = &reg_driver_list; *pdriver; pdriver = &(*pdriver)->next)
284 {
285 if (!compare_fourcc(fccType, (*pdriver)->fccType) &&
286 !compare_fourcc(fccHandler, (*pdriver)->fccHandler))
287 break;
288 }
289 if (!*pdriver)
290 return FALSE;
291
292 /* Remove the driver from the list */
293 drv = *pdriver;
294 *pdriver = (*pdriver)->next;
295 HeapFree(GetProcessHeap(), 0, drv->name);
296 HeapFree(GetProcessHeap(), 0, drv);
297
298 return TRUE;
299 }
300
301
302 /***********************************************************************
303 * ICOpen [MSVFW32.@]
304 * Opens an installable compressor. Return special handle.
305 */
306 HIC VFWAPI ICOpen(DWORD fccType, DWORD fccHandler, UINT wMode)
307 {
308 WCHAR codecname[10];
309 ICOPEN icopen;
310 HDRVR hdrv;
311 WINE_HIC* whic;
312 BOOL bIs16;
313 static const WCHAR drv32W[] = {'d','r','i','v','e','r','s','3','2','\0'};
314 reg_driver* driver;
315
316 TRACE("(%s,%s,0x%08x)\n", wine_dbgstr_fcc(fccType), wine_dbgstr_fcc(fccHandler), wMode);
317
318 /* Check if there is a registered driver that matches */
319 driver = reg_driver_list;
320 while(driver)
321 if (!compare_fourcc(fccType, driver->fccType) &&
322 !compare_fourcc(fccHandler, driver->fccHandler))
323 break;
324 else
325 driver = driver->next;
326
327 if (driver && driver->proc)
328 /* The driver has been registered at runtime with its driverproc */
329 return MSVIDEO_OpenFunction(fccType, fccHandler, wMode, (DRIVERPROC)driver->proc, (DWORD)NULL);
330
331 /* Well, lParam2 is in fact a LPVIDEO_OPEN_PARMS, but it has the
332 * same layout as ICOPEN
333 */
334 icopen.dwSize = sizeof(ICOPEN);
335 icopen.fccType = fccType;
336 icopen.fccHandler = fccHandler;
337 icopen.dwVersion = 0x00001000; /* FIXME */
338 icopen.dwFlags = wMode;
339 icopen.dwError = 0;
340 icopen.pV1Reserved = NULL;
341 icopen.pV2Reserved = NULL;
342 icopen.dnDevNode = 0; /* FIXME */
343
344 if (!driver) {
345 /* The driver is registered in the registry */
346 fourcc_to_string(codecname, fccType);
347 codecname[4] = '.';
348 fourcc_to_string(codecname + 5, fccHandler);
349 codecname[9] = '\0';
350
351 hdrv = OpenDriver(codecname, drv32W, (LPARAM)&icopen);
352 if (!hdrv)
353 return 0;
354 } else {
355 /* The driver has been registered at runtime with its name */
356 hdrv = OpenDriver(driver->name, NULL, (LPARAM)&icopen);
357 if (!hdrv)
358 return 0;
359 }
360 bIs16 = GetDriverFlags(hdrv) & 0x10000000; /* undocumented flag: WINE_GDF_16BIT */
361
362 if (bIs16 && !pFnCallTo16)
363 {
364 FIXME("Got a 16 bit driver, but no 16 bit support in msvfw\n");
365 return 0;
366 }
367 whic = HeapAlloc(GetProcessHeap(), 0, sizeof(WINE_HIC));
368 if (!whic)
369 {
370 CloseDriver(hdrv, 0, 0);
371 return FALSE;
372 }
373 whic->hdrv = hdrv;
374 /* FIXME: is the signature the real one ? */
375 whic->driverproc = bIs16 ? (DRIVERPROC)pFnCallTo16 : NULL;
376 whic->driverproc16 = 0;
377 whic->type = fccType;
378 whic->handler = fccHandler;
379 while (MSVIDEO_GetHicPtr(HIC_32(IC_HandleRef)) != NULL) IC_HandleRef++;
380 whic->hic = HIC_32(IC_HandleRef++);
381 whic->next = MSVIDEO_FirstHic;
382 MSVIDEO_FirstHic = whic;
383
384 TRACE("=> %p\n", whic->hic);
385 return whic->hic;
386 }
387
388 /***********************************************************************
389 * MSVIDEO_OpenFunction
390 */
391 HIC MSVIDEO_OpenFunction(DWORD fccType, DWORD fccHandler, UINT wMode,
392 DRIVERPROC lpfnHandler, DWORD lpfnHandler16)
393 {
394 ICOPEN icopen;
395 WINE_HIC* whic;
396
397 TRACE("(%s,%s,%d,%p,%08lx)\n",
398 wine_dbgstr_fcc(fccType), wine_dbgstr_fcc(fccHandler), wMode, lpfnHandler, lpfnHandler16);
399
400 icopen.dwSize = sizeof(ICOPEN);
401 icopen.fccType = fccType;
402 icopen.fccHandler = fccHandler;
403 icopen.dwVersion = ICVERSION;
404 icopen.dwFlags = wMode;
405 icopen.dwError = 0;
406 icopen.pV1Reserved = NULL;
407 icopen.pV2Reserved = NULL;
408 icopen.dnDevNode = 0; /* FIXME */
409
410 whic = HeapAlloc(GetProcessHeap(), 0, sizeof(WINE_HIC));
411 if (!whic) return 0;
412
413 whic->driverproc = lpfnHandler;
414 whic->driverproc16 = lpfnHandler16;
415 while (MSVIDEO_GetHicPtr(HIC_32(IC_HandleRef)) != NULL) IC_HandleRef++;
416 whic->hic = HIC_32(IC_HandleRef++);
417 whic->next = MSVIDEO_FirstHic;
418 MSVIDEO_FirstHic = whic;
419
420 /* Now try opening/loading the driver. Taken from DRIVER_AddToList */
421 /* What if the function is used more than once? */
422
423 if (MSVIDEO_SendMessage(whic, DRV_LOAD, 0L, 0L) != DRV_SUCCESS)
424 {
425 WARN("DRV_LOAD failed for hic %p\n", whic->hic);
426 MSVIDEO_FirstHic = whic->next;
427 HeapFree(GetProcessHeap(), 0, whic);
428 return 0;
429 }
430 /* return value is not checked */
431 MSVIDEO_SendMessage(whic, DRV_ENABLE, 0L, 0L);
432
433 whic->driverId = (DWORD)MSVIDEO_SendMessage(whic, DRV_OPEN, 0, (DWORD_PTR)&icopen);
434 /* FIXME: What should we put here? */
435 whic->hdrv = NULL;
436
437 if (whic->driverId == 0)
438 {
439 WARN("DRV_OPEN failed for hic %p\n", whic->hic);
440 MSVIDEO_FirstHic = whic->next;
441 HeapFree(GetProcessHeap(), 0, whic);
442 return 0;
443 }
444
445 TRACE("=> %p\n", whic->hic);
446 return whic->hic;
447 }
448
449 /***********************************************************************
450 * ICOpenFunction [MSVFW32.@]
451 */
452 HIC VFWAPI ICOpenFunction(DWORD fccType, DWORD fccHandler, UINT wMode, FARPROC lpfnHandler)
453 {
454 return MSVIDEO_OpenFunction(fccType, fccHandler, wMode, (DRIVERPROC)lpfnHandler, 0);
455 }
456
457 /***********************************************************************
458 * ICGetInfo [MSVFW32.@]
459 */
460 LRESULT VFWAPI ICGetInfo(HIC hic, ICINFO *picinfo, DWORD cb)
461 {
462 LRESULT ret;
463 WINE_HIC* whic = MSVIDEO_GetHicPtr(hic);
464
465 TRACE("(%p,%p,%ld)\n", hic, picinfo, cb);
466
467 whic = MSVIDEO_GetHicPtr(hic);
468 if (!whic) return ICERR_BADHANDLE;
469 if (!picinfo) return MMSYSERR_INVALPARAM;
470
471 /* (WS) The field szDriver should be initialized because the driver
472 * is not obliged and often will not do it. Some applications, like
473 * VirtualDub, rely on this field and will occasionally crash if it
474 * goes unitialized.
475 */
476 if (cb >= sizeof(ICINFO)) picinfo->szDriver[0] = '\0';
477
478 ret = ICSendMessage(hic, ICM_GETINFO, (DWORD_PTR)picinfo, cb);
479
480 /* (WS) When szDriver was not supplied by the driver itself, apparently
481 * Windows will set its value equal to the driver file name. This can
482 * be obtained from the registry as we do here.
483 */
484 if (cb >= sizeof(ICINFO) && picinfo->szDriver[0] == 0)
485 {
486 ICINFO ii;
487
488 memset(&ii, 0, sizeof(ii));
489 ii.dwSize = sizeof(ii);
490 ICInfo(picinfo->fccType, picinfo->fccHandler, &ii);
491 lstrcpyW(picinfo->szDriver, ii.szDriver);
492 }
493
494 TRACE(" -> 0x%08lx\n", ret);
495 return ret;
496 }
497
498 typedef struct {
499 DWORD fccType;
500 DWORD fccHandler;
501 LPBITMAPINFOHEADER lpbiIn;
502 LPBITMAPINFOHEADER lpbiOut;
503 WORD wMode;
504 DWORD querymsg;
505 HIC hic;
506 } driver_info_t;
507
508 static HIC try_driver(driver_info_t *info)
509 {
510 HIC hic;
511
512 if ((hic = ICOpen(info->fccType, info->fccHandler, info->wMode)))
513 {
514 if (!ICSendMessage(hic, info->querymsg, (DWORD_PTR)info->lpbiIn, (DWORD_PTR)info->lpbiOut))
515 return hic;
516 ICClose(hic);
517 }
518 return 0;
519 }
520
521 static BOOL ICLocate_enum_handler(const char *drv, int nr, void *param)
522 {
523 driver_info_t *info = (driver_info_t *)param;
524 info->fccHandler = mmioStringToFOURCCA(drv + 5, 0);
525 info->hic = try_driver(info);
526 return info->hic != 0;
527 }
528
529 /***********************************************************************
530 * ICLocate [MSVFW32.@]
531 */
532 HIC VFWAPI ICLocate(DWORD fccType, DWORD fccHandler, LPBITMAPINFOHEADER lpbiIn,
533 LPBITMAPINFOHEADER lpbiOut, WORD wMode)
534 {
535 driver_info_t info;
536
537 TRACE("(%s,%s,%p,%p,0x%04x)\n",
538 wine_dbgstr_fcc(fccType), wine_dbgstr_fcc(fccHandler), lpbiIn, lpbiOut, wMode);
539
540 info.fccType = fccType;
541 info.fccHandler = fccHandler;
542 info.lpbiIn = lpbiIn;
543 info.lpbiOut = lpbiOut;
544 info.wMode = wMode;
545
546 switch (wMode)
547 {
548 case ICMODE_FASTCOMPRESS:
549 case ICMODE_COMPRESS:
550 info.querymsg = ICM_COMPRESS_QUERY;
551 break;
552 case ICMODE_FASTDECOMPRESS:
553 case ICMODE_DECOMPRESS:
554 info.querymsg = ICM_DECOMPRESS_QUERY;
555 break;
556 case ICMODE_DRAW:
557 info.querymsg = ICM_DRAW_QUERY;
558 break;
559 default:
560 WARN("Unknown mode (%d)\n", wMode);
561 return 0;
562 }
563
564 /* Easy case: handler/type match, we just fire a query and return */
565 info.hic = try_driver(&info);
566 /* If it didn't work, try each driver in turn. 32 bit codecs only. */
567 /* FIXME: Move this to an init routine? */
568 if (!info.hic) enum_drivers(fccType, ICLocate_enum_handler, &info);
569
570 if (info.hic)
571 {
572 TRACE("=> %p\n", info.hic);
573 return info.hic;
574 }
575
576 if (fccType == streamtypeVIDEO)
577 return ICLocate(ICTYPE_VIDEO, fccHandler, lpbiIn, lpbiOut, wMode);
578
579 WARN("(%s,%s,%p,%p,0x%04x) not found!\n",
580 wine_dbgstr_fcc(fccType), wine_dbgstr_fcc(fccHandler), lpbiIn, lpbiOut, wMode);
581 return 0;
582 }
583
584 /***********************************************************************
585 * ICGetDisplayFormat [MSVFW32.@]
586 */
587 HIC VFWAPI ICGetDisplayFormat(
588 HIC hic,LPBITMAPINFOHEADER lpbiIn,LPBITMAPINFOHEADER lpbiOut,
589 INT depth,INT dx,INT dy)
590 {
591 HIC tmphic = hic;
592
593 TRACE("(%p,%p,%p,%d,%d,%d)!\n",hic,lpbiIn,lpbiOut,depth,dx,dy);
594
595 if (!tmphic) {
596 tmphic=ICLocate(ICTYPE_VIDEO,0,lpbiIn,NULL,ICMODE_DECOMPRESS);
597 if (!tmphic)
598 return tmphic;
599 }
600 if ((dy == lpbiIn->biHeight) && (dx == lpbiIn->biWidth))
601 dy = dx = 0; /* no resize needed */
602
603 /* Can we decompress it ? */
604 if (ICDecompressQuery(tmphic,lpbiIn,NULL) != 0)
605 goto errout; /* no, sorry */
606
607 ICDecompressGetFormat(tmphic,lpbiIn,lpbiOut);
608
609 if (lpbiOut->biCompression != 0) {
610 FIXME("Ooch, how come decompressor outputs compressed data (%ld)??\n",
611 lpbiOut->biCompression);
612 }
613 if (lpbiOut->biSize < sizeof(*lpbiOut)) {
614 FIXME("Ooch, size of output BIH is too small (%ld)\n",
615 lpbiOut->biSize);
616 lpbiOut->biSize = sizeof(*lpbiOut);
617 }
618 if (!depth) {
619 HDC hdc;
620
621 hdc = GetDC(0);
622 depth = GetDeviceCaps(hdc,BITSPIXEL)*GetDeviceCaps(hdc,PLANES);
623 ReleaseDC(0,hdc);
624 if (depth==15) depth = 16;
625 if (depth<8) depth = 8;
626 }
627 if (lpbiIn->biBitCount == 8)
628 depth = 8;
629
630 TRACE("=> %p\n", tmphic);
631 return tmphic;
632 errout:
633 if (hic!=tmphic)
634 ICClose(tmphic);
635
636 TRACE("=> 0\n");
637 return 0;
638 }
639
640 /***********************************************************************
641 * ICCompress [MSVFW32.@]
642 */
643 DWORD VFWAPIV
644 ICCompress(
645 HIC hic,DWORD dwFlags,LPBITMAPINFOHEADER lpbiOutput,LPVOID lpData,
646 LPBITMAPINFOHEADER lpbiInput,LPVOID lpBits,LPDWORD lpckid,
647 LPDWORD lpdwFlags,LONG lFrameNum,DWORD dwFrameSize,DWORD dwQuality,
648 LPBITMAPINFOHEADER lpbiPrev,LPVOID lpPrev)
649 {
650 ICCOMPRESS iccmp;
651
652 TRACE("(%p,%ld,%p,%p,%p,%p,...)\n",hic,dwFlags,lpbiOutput,lpData,lpbiInput,lpBits);
653
654 iccmp.dwFlags = dwFlags;
655
656 iccmp.lpbiOutput = lpbiOutput;
657 iccmp.lpOutput = lpData;
658 iccmp.lpbiInput = lpbiInput;
659 iccmp.lpInput = lpBits;
660
661 iccmp.lpckid = lpckid;
662 iccmp.lpdwFlags = lpdwFlags;
663 iccmp.lFrameNum = lFrameNum;
664 iccmp.dwFrameSize = dwFrameSize;
665 iccmp.dwQuality = dwQuality;
666 iccmp.lpbiPrev = lpbiPrev;
667 iccmp.lpPrev = lpPrev;
668 return ICSendMessage(hic,ICM_COMPRESS,(DWORD_PTR)&iccmp,sizeof(iccmp));
669 }
670
671 /***********************************************************************
672 * ICDecompress [MSVFW32.@]
673 */
674 DWORD VFWAPIV ICDecompress(HIC hic,DWORD dwFlags,LPBITMAPINFOHEADER lpbiFormat,
675 LPVOID lpData,LPBITMAPINFOHEADER lpbi,LPVOID lpBits)
676 {
677 ICDECOMPRESS icd;
678 DWORD ret;
679
680 TRACE("(%p,%ld,%p,%p,%p,%p)\n",hic,dwFlags,lpbiFormat,lpData,lpbi,lpBits);
681
682 TRACE("lpBits[0] == %lx\n",((LPDWORD)lpBits)[0]);
683
684 icd.dwFlags = dwFlags;
685 icd.lpbiInput = lpbiFormat;
686 icd.lpInput = lpData;
687
688 icd.lpbiOutput = lpbi;
689 icd.lpOutput = lpBits;
690 icd.ckid = 0;
691 ret = ICSendMessage(hic,ICM_DECOMPRESS,(DWORD_PTR)&icd,sizeof(ICDECOMPRESS));
692
693 TRACE("lpBits[0] == %lx\n",((LPDWORD)lpBits)[0]);
694
695 TRACE("-> %ld\n",ret);
696
697 return ret;
698 }
699
700
701 struct choose_compressor
702 {
703 UINT flags;
704 LPCSTR title;
705 COMPVARS cv;
706 };
707
708 struct codec_info
709 {
710 HIC hic;
711 ICINFO icinfo;
712 };
713
714 static BOOL enum_compressors(HWND list, COMPVARS *pcv, BOOL enum_all)
715 {
716 UINT id, total = 0;
717 ICINFO icinfo;
718
719 id = 0;
720
721 while (ICInfo(pcv->fccType, id, &icinfo))
722 {
723 struct codec_info *ic;
724 DWORD idx;
725 HIC hic;
726
727 id++;
728
729 hic = ICOpen(icinfo.fccType, icinfo.fccHandler, ICMODE_COMPRESS);
730
731 if (hic)
732 {
733 /* for unknown reason fccHandler reported by the driver
734 * doesn't always work, use the one returned by ICInfo instead.
735 */
736 DWORD fccHandler = icinfo.fccHandler;
737
738 if (!enum_all && pcv->lpbiIn)
739 {
740 if (ICCompressQuery(hic, pcv->lpbiIn, NULL) != ICERR_OK)
741 {
742 TRACE("fccHandler %s doesn't support input DIB format %ld\n",
743 wine_dbgstr_fcc(icinfo.fccHandler), pcv->lpbiIn->bmiHeader.biCompression);
744 ICClose(hic);
745 continue;
746 }
747 }
748
749 ICGetInfo(hic, &icinfo, sizeof(icinfo));
750 icinfo.fccHandler = fccHandler;
751
752 idx = SendMessageW(list, CB_ADDSTRING, 0, (LPARAM)icinfo.szDescription);
753
754 ic = HeapAlloc(GetProcessHeap(), 0, sizeof(struct codec_info));
755 memcpy(&ic->icinfo, &icinfo, sizeof(ICINFO));
756 ic->hic = hic;
757 SendMessageW(list, CB_SETITEMDATA, idx, (LPARAM)ic);
758 }
759 total++;
760 }
761
762 return total != 0;
763 }
764
765 static INT_PTR CALLBACK icm_choose_compressor_dlgproc(HWND hdlg, UINT msg, WPARAM wparam, LPARAM lparam)
766 {
767 switch (msg)
768 {
769 case WM_INITDIALOG:
770 {
771 struct codec_info *ic;
772 WCHAR buf[128];
773 struct choose_compressor *choose_comp = (struct choose_compressor *)lparam;
774
775 if (choose_comp->title)
776 SetWindowTextA(hdlg, choose_comp->title);
777
778 if (!(choose_comp->flags & ICMF_CHOOSE_DATARATE))
779 EnableWindow(GetDlgItem(hdlg, IDC_DATARATE), FALSE);
780
781 if (!(choose_comp->flags & ICMF_CHOOSE_KEYFRAME))
782 EnableWindow(GetDlgItem(hdlg, IDC_KEYFRAME), FALSE);
783
784 /*if (!(choose_comp->flags & ICMF_CHOOSE_PREVIEW))
785 EnableWindow(GetDlgItem(hdlg, IDC_PREVIEW), FALSE);*/
786
787 LoadStringW(MSVFW32_hModule, IDS_FULLFRAMES, buf, 128);
788 SendDlgItemMessageW(hdlg, IDC_COMP_LIST, CB_ADDSTRING, 0, (LPARAM)buf);
789
790 ic = HeapAlloc(GetProcessHeap(), 0, sizeof(struct codec_info));
791 ic->icinfo.fccType = streamtypeVIDEO;
792 ic->icinfo.fccHandler = comptypeDIB;
793 ic->hic = 0;
794 SendDlgItemMessageW(hdlg, IDC_COMP_LIST, CB_SETITEMDATA, 0, (LPARAM)ic);
795
796 enum_compressors(GetDlgItem(hdlg, IDC_COMP_LIST), &choose_comp->cv, choose_comp->flags & ICMF_CHOOSE_ALLCOMPRESSORS);
797
798 SendDlgItemMessageW(hdlg, IDC_COMP_LIST, CB_SETCURSEL, 0, 0);
799 SetFocus(GetDlgItem(hdlg, IDC_COMP_LIST));
800
801 SetWindowLongPtrW(hdlg, DWLP_USER, (ULONG_PTR)choose_comp);
802 break;
803 }
804
805 case WM_COMMAND:
806 switch (LOWORD(wparam))
807 {
808 case IDC_COMP_LIST:
809 {
810 INT cur_sel;
811 struct codec_info *ic;
812 BOOL enable = FALSE;
813
814 if (HIWORD(wparam != CBN_SELCHANGE))
815 break;
816
817 cur_sel = SendMessageW((HWND)lparam, CB_GETCURSEL, 0, 0);
818
819 ic = (struct codec_info *)SendMessageW((HWND)lparam, CB_GETITEMDATA, cur_sel, 0);
820 if (ic && ic->hic)
821 {
822 if (ICQueryConfigure(ic->hic) == DRVCNF_OK)
823 enable = TRUE;
824 }
825 EnableWindow(GetDlgItem(hdlg, IDC_CONFIGURE), enable);
826 break;
827 }
828
829 case IDC_CONFIGURE:
830 {
831 HWND list = GetDlgItem(hdlg, IDC_COMP_LIST);
832 INT cur_sel;
833 struct codec_info *ic;
834
835 if (HIWORD(wparam != BN_CLICKED))
836 break;
837
838 cur_sel = SendMessageW(list, CB_GETCURSEL, 0, 0);
839
840 ic = (struct codec_info *)SendMessageW(list, CB_GETITEMDATA, cur_sel, 0);
841 if (ic && ic->hic)
842 ICConfigure(ic->hic, hdlg);
843
844 break;
845 }
846
847 case IDOK:
848 {
849 HWND list = GetDlgItem(hdlg, IDC_COMP_LIST);
850 INT cur_sel;
851 struct codec_info *ic;
852
853 cur_sel = SendMessageW(list, CB_GETCURSEL, 0, 0);
854 ic = (struct codec_info *)SendMessageW(list, CB_GETITEMDATA, cur_sel, 0);
855 if (ic)
856 {
857 struct choose_compressor *choose_comp = (struct choose_compressor *)GetWindowLongPtrW(hdlg, DWLP_USER);
858
859 choose_comp->cv.hic = ic->hic;
860 choose_comp->cv.fccType = ic->icinfo.fccType;
861 choose_comp->cv.fccHandler = ic->icinfo.fccHandler;
862 /* FIXME: fill everything else */
863
864 /* prevent closing the codec handle below */
865 ic->hic = 0;
866 }
867 }
868 /* fall through */
869 case IDCANCEL:
870 {
871 HWND list = GetDlgItem(hdlg, IDC_COMP_LIST);
872 INT idx = 0;
873
874 while (1)
875 {
876 struct codec_info *ic;
877
878 ic = (struct codec_info *)SendMessageW(list, CB_GETITEMDATA, idx++, 0);
879
880 if (!ic || (LONG_PTR)ic == CB_ERR) break;
881
882 if (ic->hic) ICClose(ic->hic);
883 HeapFree(GetProcessHeap(), 0, ic);
884 }
885
886 EndDialog(hdlg, LOWORD(wparam) == IDOK);
887 break;
888 }
889
890 default:
891 break;
892 }
893 break;
894
895 default:
896 break;
897 }
898
899 return FALSE;
900 }
901
902 /***********************************************************************
903 * ICCompressorChoose [MSVFW32.@]
904 */
905 BOOL VFWAPI ICCompressorChoose(HWND hwnd, UINT uiFlags, LPVOID pvIn,
906 LPVOID lpData, PCOMPVARS pc, LPSTR lpszTitle)
907 {
908 struct choose_compressor choose_comp;
909 BOOL ret;
910
911 TRACE("(%p,%08x,%p,%p,%p,%s)\n", hwnd, uiFlags, pvIn, lpData, pc, lpszTitle);
912
913 if (!pc || pc->cbSize != sizeof(COMPVARS))
914 return FALSE;
915
916 if (!(pc->dwFlags & ICMF_COMPVARS_VALID))
917 {
918 pc->dwFlags = 0;
919 pc->fccType = pc->fccHandler = 0;
920 pc->hic = NULL;
921 pc->lpbiOut = NULL;
922 pc->lpBitsOut = pc->lpBitsPrev = pc->lpState = NULL;
923 pc->lQ = ICQUALITY_DEFAULT;
924 pc->lKey = -1;
925 pc->lDataRate = 300; /* kB */
926 pc->lpState = NULL;
927 pc->cbState = 0;
928 }
929 if (pc->fccType == 0)
930 pc->fccType = ICTYPE_VIDEO;
931
932 choose_comp.cv = *pc;
933 choose_comp.flags = uiFlags;
934 choose_comp.title = lpszTitle;
935
936 ret = DialogBoxParamW(MSVFW32_hModule, MAKEINTRESOURCEW(ICM_CHOOSE_COMPRESSOR), hwnd,
937 icm_choose_compressor_dlgproc, (LPARAM)&choose_comp);
938
939 if (ret)
940 {
941 *pc = choose_comp.cv;
942 pc->dwFlags |= ICMF_COMPVARS_VALID;
943 }
944
945 return ret;
946 }
947
948
949 /***********************************************************************
950 * ICCompressorFree [MSVFW32.@]
951 */
952 void VFWAPI ICCompressorFree(PCOMPVARS pc)
953 {
954 TRACE("(%p)\n",pc);
955
956 if (pc != NULL && pc->cbSize == sizeof(COMPVARS)) {
957 if (pc->hic != NULL) {
958 ICClose(pc->hic);
959 pc->hic = NULL;
960 }
961 if (pc->lpbiIn != NULL) {
962 HeapFree(GetProcessHeap(), 0, pc->lpbiIn);
963 pc->lpbiIn = NULL;
964 }
965 if (pc->lpBitsOut != NULL) {
966 HeapFree(GetProcessHeap(), 0, pc->lpBitsOut);
967 pc->lpBitsOut = NULL;
968 }
969 if (pc->lpBitsPrev != NULL) {
970 HeapFree(GetProcessHeap(), 0, pc->lpBitsPrev);
971 pc->lpBitsPrev = NULL;
972 }
973 if (pc->lpState != NULL) {
974 HeapFree(GetProcessHeap(), 0, pc->lpState);
975 pc->lpState = NULL;
976 }
977 pc->dwFlags = 0;
978 }
979 }
980
981
982 /******************************************************************
983 * MSVIDEO_SendMessage
984 *
985 *
986 */
987 LRESULT MSVIDEO_SendMessage(WINE_HIC* whic, UINT msg, DWORD_PTR lParam1, DWORD_PTR lParam2)
988 {
989 LRESULT ret;
990
991 #define XX(x) case x: TRACE("(%p,"#x",0x%08lx,0x%08lx)\n",whic,lParam1,lParam2); break;
992
993 switch (msg) {
994 /* DRV_* */
995 XX(DRV_LOAD);
996 XX(DRV_ENABLE);
997 XX(DRV_OPEN);
998 XX(DRV_CLOSE);
999 XX(DRV_DISABLE);
1000 XX(DRV_FREE);
1001 /* ICM_RESERVED+X */
1002 XX(ICM_ABOUT);
1003 XX(ICM_CONFIGURE);
1004 XX(ICM_GET);
1005 XX(ICM_GETINFO);
1006 XX(ICM_GETDEFAULTQUALITY);
1007 XX(ICM_GETQUALITY);
1008 XX(ICM_GETSTATE);
1009 XX(ICM_SETQUALITY);
1010 XX(ICM_SET);
1011 XX(ICM_SETSTATE);
1012 /* ICM_USER+X */
1013 XX(ICM_COMPRESS_FRAMES_INFO);
1014 XX(ICM_COMPRESS_GET_FORMAT);
1015 XX(ICM_COMPRESS_GET_SIZE);
1016 XX(ICM_COMPRESS_QUERY);
1017 XX(ICM_COMPRESS_BEGIN);
1018 XX(ICM_COMPRESS);
1019 XX(ICM_COMPRESS_END);
1020 XX(ICM_DECOMPRESS_GET_FORMAT);
1021 XX(ICM_DECOMPRESS_QUERY);
1022 XX(ICM_DECOMPRESS_BEGIN);
1023 XX(ICM_DECOMPRESS);
1024 XX(ICM_DECOMPRESS_END);
1025 XX(ICM_DECOMPRESS_SET_PALETTE);
1026 XX(ICM_DECOMPRESS_GET_PALETTE);
1027 XX(ICM_DRAW_QUERY);
1028 XX(ICM_DRAW_BEGIN);
1029 XX(ICM_DRAW_GET_PALETTE);
1030 XX(ICM_DRAW_START);
1031 XX(ICM_DRAW_STOP);
1032 XX(ICM_DRAW_END);
1033 XX(ICM_DRAW_GETTIME);
1034 XX(ICM_DRAW);
1035 XX(ICM_DRAW_WINDOW);
1036 XX(ICM_DRAW_SETTIME);
1037 XX(ICM_DRAW_REALIZE);
1038 XX(ICM_DRAW_FLUSH);
1039 XX(ICM_DRAW_RENDERBUFFER);
1040 XX(ICM_DRAW_START_PLAY);
1041 XX(ICM_DRAW_STOP_PLAY);
1042 XX(ICM_DRAW_SUGGESTFORMAT);
1043 XX(ICM_DRAW_CHANGEPALETTE);
1044 XX(ICM_GETBUFFERSWANTED);
1045 XX(ICM_GETDEFAULTKEYFRAMERATE);
1046 XX(ICM_DECOMPRESSEX_BEGIN);
1047 XX(ICM_DECOMPRESSEX_QUERY);
1048 XX(ICM_DECOMPRESSEX);
1049 XX(ICM_DECOMPRESSEX_END);
1050 XX(ICM_SET_STATUS_PROC);
1051 default:
1052 FIXME("(%p,0x%08lx,0x%08lx,0x%08lx) unknown message\n",whic,(DWORD)msg,lParam1,lParam2);
1053 }
1054
1055 #undef XX
1056
1057 if (whic->driverproc) {
1058 /* dwDriverId parameter is the value returned by the DRV_OPEN */
1059 ret = whic->driverproc(whic->driverId, whic->hdrv, msg, lParam1, lParam2);
1060 } else {
1061 ret = SendDriverMessage(whic->hdrv, msg, lParam1, lParam2);
1062 }
1063
1064 TRACE(" -> 0x%08lx\n", ret);
1065 return ret;
1066 }
1067
1068 /***********************************************************************
1069 * ICSendMessage [MSVFW32.@]
1070 */
1071 LRESULT VFWAPI ICSendMessage(HIC hic, UINT msg, DWORD_PTR lParam1, DWORD_PTR lParam2)
1072 {
1073 WINE_HIC* whic = MSVIDEO_GetHicPtr(hic);
1074
1075 if (!whic) return ICERR_BADHANDLE;
1076 return MSVIDEO_SendMessage(whic, msg, lParam1, lParam2);
1077 }
1078
1079 /***********************************************************************
1080 * ICDrawBegin [MSVFW32.@]
1081 */
1082 DWORD VFWAPIV ICDrawBegin(
1083 HIC hic, /* [in] */
1084 DWORD dwFlags, /* [in] flags */
1085 HPALETTE hpal, /* [in] palette to draw with */
1086 HWND hwnd, /* [in] window to draw to */
1087 HDC hdc, /* [in] HDC to draw to */
1088 INT xDst, /* [in] destination rectangle */
1089 INT yDst, /* [in] */
1090 INT dxDst, /* [in] */
1091 INT dyDst, /* [in] */
1092 LPBITMAPINFOHEADER lpbi, /* [in] format of frame to draw */
1093 INT xSrc, /* [in] source rectangle */
1094 INT ySrc, /* [in] */
1095 INT dxSrc, /* [in] */
1096 INT dySrc, /* [in] */
1097 DWORD dwRate, /* [in] frames/second = (dwRate/dwScale) */
1098 DWORD dwScale) /* [in] */
1099 {
1100
1101 ICDRAWBEGIN icdb;
1102
1103 TRACE("(%p,%ld,%p,%p,%p,%u,%u,%u,%u,%p,%u,%u,%u,%u,%ld,%ld)\n",
1104 hic, dwFlags, hpal, hwnd, hdc, xDst, yDst, dxDst, dyDst,
1105 lpbi, xSrc, ySrc, dxSrc, dySrc, dwRate, dwScale);
1106
1107 icdb.dwFlags = dwFlags;
1108 icdb.hpal = hpal;
1109 icdb.hwnd = hwnd;
1110 icdb.hdc = hdc;
1111 icdb.xDst = xDst;
1112 icdb.yDst = yDst;
1113 icdb.dxDst = dxDst;
1114 icdb.dyDst = dyDst;
1115 icdb.lpbi = lpbi;
1116 icdb.xSrc = xSrc;
1117 icdb.ySrc = ySrc;
1118 icdb.dxSrc = dxSrc;
1119 icdb.dySrc = dySrc;
1120 icdb.dwRate = dwRate;
1121 icdb.dwScale = dwScale;
1122 return ICSendMessage(hic,ICM_DRAW_BEGIN,(DWORD_PTR)&icdb,sizeof(icdb));
1123 }
1124
1125 /***********************************************************************
1126 * ICDraw [MSVFW32.@]
1127 */
1128 DWORD VFWAPIV ICDraw(HIC hic, DWORD dwFlags, LPVOID lpFormat, LPVOID lpData, DWORD cbData, LONG lTime) {
1129 ICDRAW icd;
1130
1131 TRACE("(%p,%ld,%p,%p,%ld,%ld)\n",hic,dwFlags,lpFormat,lpData,cbData,lTime);
1132
1133 icd.dwFlags = dwFlags;
1134 icd.lpFormat = lpFormat;
1135 icd.lpData = lpData;
1136 icd.cbData = cbData;
1137 icd.lTime = lTime;
1138
1139 return ICSendMessage(hic,ICM_DRAW,(DWORD_PTR)&icd,sizeof(icd));
1140 }
1141
1142 /***********************************************************************
1143 * ICClose [MSVFW32.@]
1144 */
1145 LRESULT WINAPI ICClose(HIC hic)
1146 {
1147 WINE_HIC* whic = MSVIDEO_GetHicPtr(hic);
1148 WINE_HIC** p;
1149
1150 TRACE("(%p)\n",hic);
1151
1152 if (!whic) return ICERR_BADHANDLE;
1153
1154 if (whic->driverproc)
1155 {
1156 MSVIDEO_SendMessage(whic, DRV_CLOSE, 0, 0);
1157 MSVIDEO_SendMessage(whic, DRV_DISABLE, 0, 0);
1158 MSVIDEO_SendMessage(whic, DRV_FREE, 0, 0);
1159 }
1160 else
1161 {
1162 CloseDriver(whic->hdrv, 0, 0);
1163 }
1164
1165 /* remove whic from list */
1166 for (p = &MSVIDEO_FirstHic; *p != NULL; p = &((*p)->next))
1167 {
1168 if ((*p) == whic)
1169 {
1170 *p = whic->next;
1171 break;
1172 }
1173 }
1174
1175 HeapFree(GetProcessHeap(), 0, whic);
1176 return 0;
1177 }
1178
1179
1180
1181 /***********************************************************************
1182 * ICImageCompress [MSVFW32.@]
1183 */
1184 HANDLE VFWAPI ICImageCompress(
1185 HIC hic, UINT uiFlags,
1186 LPBITMAPINFO lpbiIn, LPVOID lpBits,
1187 LPBITMAPINFO lpbiOut, LONG lQuality,
1188 LONG* plSize)
1189 {
1190 FIXME("(%p,%08x,%p,%p,%p,%ld,%p)\n",
1191 hic, uiFlags, lpbiIn, lpBits, lpbiOut, lQuality, plSize);
1192
1193 return NULL;
1194 }
1195
1196 /***********************************************************************
1197 * ICImageDecompress [MSVFW32.@]
1198 */
1199
1200 HANDLE VFWAPI ICImageDecompress(
1201 HIC hic, UINT uiFlags, LPBITMAPINFO lpbiIn,
1202 LPVOID lpBits, LPBITMAPINFO lpbiOut)
1203 {
1204 HGLOBAL hMem = NULL;
1205 BYTE* pMem = NULL;
1206 BOOL bReleaseIC = FALSE;
1207 BYTE* pHdr = NULL;
1208 ULONG cbHdr = 0;
1209 BOOL bSucceeded = FALSE;
1210 BOOL bInDecompress = FALSE;
1211 DWORD biSizeImage;
1212
1213 TRACE("(%p,%08x,%p,%p,%p)\n",
1214 hic, uiFlags, lpbiIn, lpBits, lpbiOut);
1215
1216 if ( hic == NULL )
1217 {
1218 hic = ICDecompressOpen( ICTYPE_VIDEO, 0, &lpbiIn->bmiHeader, (lpbiOut != NULL) ? &lpbiOut->bmiHeader : NULL );
1219 if ( hic == NULL )
1220 {
1221 WARN("no handler\n" );
1222 goto err;
1223 }
1224 bReleaseIC = TRUE;
1225 }
1226 if ( uiFlags != 0 )
1227 {
1228 FIXME( "unknown flag %08x\n", uiFlags );
1229 goto err;
1230 }
1231 if ( lpbiIn == NULL || lpBits == NULL )
1232 {
1233 WARN("invalid argument\n");
1234 goto err;
1235 }
1236
1237 if ( lpbiOut != NULL )
1238 {
1239 if ( lpbiOut->bmiHeader.biSize != sizeof(BITMAPINFOHEADER) )
1240 goto err;
1241 cbHdr = sizeof(BITMAPINFOHEADER);
1242 if ( lpbiOut->bmiHeader.biCompression == 3 )
1243 cbHdr += sizeof(DWORD)*3;
1244 else
1245 if ( lpbiOut->bmiHeader.biBitCount <= 8 )
1246 {
1247 if ( lpbiOut->bmiHeader.biClrUsed == 0 )
1248 cbHdr += sizeof(RGBQUAD) * (1<<lpbiOut->bmiHeader.biBitCount);
1249 else
1250 cbHdr += sizeof(RGBQUAD) * lpbiOut->bmiHeader.biClrUsed;
1251 }
1252 }
1253 else
1254 {
1255 TRACE( "get format\n" );
1256
1257 cbHdr = ICDecompressGetFormatSize(hic,lpbiIn);
1258 if ( cbHdr < sizeof(BITMAPINFOHEADER) )
1259 goto err;
1260 pHdr = HeapAlloc(GetProcessHeap(),0,cbHdr+sizeof(RGBQUAD)*256);
1261 if ( pHdr == NULL )
1262 goto err;
1263 ZeroMemory( pHdr, cbHdr+sizeof(RGBQUAD)*256 );
1264 if ( ICDecompressGetFormat( hic, lpbiIn, (BITMAPINFO*)pHdr ) != ICERR_OK )
1265 goto err;
1266 lpbiOut = (BITMAPINFO*)pHdr;
1267 if ( lpbiOut->bmiHeader.biBitCount <= 8 &&
1268 ICDecompressGetPalette( hic, lpbiIn, lpbiOut ) != ICERR_OK &&
1269 lpbiIn->bmiHeader.biBitCount == lpbiOut->bmiHeader.biBitCount )
1270 {
1271 if ( lpbiIn->bmiHeader.biClrUsed == 0 )
1272 memcpy( lpbiOut->bmiColors, lpbiIn->bmiColors, sizeof(RGBQUAD)*(1<<lpbiOut->bmiHeader.biBitCount) );
1273 else
1274 memcpy( lpbiOut->bmiColors, lpbiIn->bmiColors, sizeof(RGBQUAD)*lpbiIn->bmiHeader.biClrUsed );
1275 }
1276 if ( lpbiOut->bmiHeader.biBitCount <= 8 &&
1277 lpbiOut->bmiHeader.biClrUsed == 0 )
1278 lpbiOut->bmiHeader.biClrUsed = 1<<lpbiOut->bmiHeader.biBitCount;
1279
1280 lpbiOut->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
1281 cbHdr = sizeof(BITMAPINFOHEADER) + sizeof(RGBQUAD)*lpbiOut->bmiHeader.biClrUsed;
1282 }
1283
1284 biSizeImage = lpbiOut->bmiHeader.biSizeImage;
1285 if ( biSizeImage == 0 )
1286 biSizeImage = ((((lpbiOut->bmiHeader.biWidth * lpbiOut->bmiHeader.biBitCount + 7) >> 3) + 3) & (~3)) * abs(lpbiOut->bmiHeader.biHeight);
1287
1288 TRACE( "call ICDecompressBegin\n" );
1289
1290 if ( ICDecompressBegin( hic, lpbiIn, lpbiOut ) != ICERR_OK )
1291 goto err;
1292 bInDecompress = TRUE;
1293
1294 TRACE( "cbHdr %ld, biSizeImage %ld\n", cbHdr, biSizeImage );
1295
1296 hMem = GlobalAlloc( GMEM_MOVEABLE|GMEM_ZEROINIT, cbHdr + biSizeImage );
1297 if ( hMem == NULL )
1298 {
1299 WARN( "out of memory\n" );
1300 goto err;
1301 }
1302 pMem = (BYTE*)GlobalLock( hMem );
1303 if ( pMem == NULL )
1304 goto err;
1305 memcpy( pMem, lpbiOut, cbHdr );
1306
1307 TRACE( "call ICDecompress\n" );
1308 if ( ICDecompress( hic, 0, &lpbiIn->bmiHeader, lpBits, &lpbiOut->bmiHeader, pMem+cbHdr ) != ICERR_OK )
1309 goto err;
1310
1311 bSucceeded = TRUE;
1312 err:
1313 if ( bInDecompress )
1314 ICDecompressEnd( hic );
1315 if ( bReleaseIC )
1316 ICClose(hic);
1317 HeapFree(GetProcessHeap(),0,pHdr);
1318 if ( pMem != NULL )
1319 GlobalUnlock( hMem );
1320 if ( !bSucceeded && hMem != NULL )
1321 {
1322 GlobalFree(hMem); hMem = NULL;
1323 }
1324
1325 return (HANDLE)hMem;
1326 }
1327
1328 /***********************************************************************
1329 * ICSeqCompressFrame [MSVFW32.@]
1330 */
1331 LPVOID VFWAPI ICSeqCompressFrame(PCOMPVARS pc, UINT uiFlags, LPVOID lpBits, BOOL *pfKey, LONG *plSize)
1332 {
1333 ICCOMPRESS* icComp = (ICCOMPRESS *)pc->lpState;
1334 DWORD ret;
1335 TRACE("(%p, 0x%08x, %p, %p, %p)\n", pc, uiFlags, lpBits, pfKey, plSize);
1336
1337 if (pc->cbState != sizeof(ICCOMPRESS))
1338 {
1339 ERR("Invalid cbState (%li should be %i)\n", pc->cbState, sizeof(ICCOMPRESS));
1340 return NULL;
1341 }
1342
1343 if (!pc->lKeyCount++)
1344 icComp->dwFlags = ICCOMPRESS_KEYFRAME;
1345 else
1346 {
1347 if (pc->lKey && pc->lKeyCount == (pc->lKey - 1))
1348 /* No key frames if pc->lKey == 0 */
1349 pc->lKeyCount = 0;
1350 icComp->dwFlags = 0;
1351 }
1352
1353 icComp->lpInput = lpBits;
1354 icComp->lFrameNum = pc->lFrame++;
1355 icComp->lpOutput = pc->lpBitsOut;
1356 icComp->lpPrev = pc->lpBitsPrev;
1357 ret = ICSendMessage(pc->hic, ICM_COMPRESS, (DWORD_PTR)icComp, sizeof(icComp));
1358
1359 if (icComp->dwFlags & AVIIF_KEYFRAME)
1360 {
1361 pc->lKeyCount = 1;
1362 *pfKey = TRUE;
1363 TRACE("Key frame\n");
1364 }
1365 else
1366 *pfKey = FALSE;
1367
1368 *plSize = icComp->lpbiOutput->biSizeImage;
1369 TRACE(" -- 0x%08lx\n", ret);
1370 if (ret == ICERR_OK)
1371 {
1372 LPVOID oldprev, oldout;
1373 /* We shift Prev and Out, so we don't have to allocate and release memory */
1374 oldprev = pc->lpBitsPrev;
1375 oldout = pc->lpBitsOut;
1376 pc->lpBitsPrev = oldout;
1377 pc->lpBitsOut = oldprev;
1378
1379 TRACE("returning: %p\n", icComp->lpOutput);
1380 return icComp->lpOutput;
1381 }
1382 return NULL;
1383 }
1384
1385 /***********************************************************************
1386 * ICSeqCompressFrameEnd [MSVFW32.@]
1387 */
1388 void VFWAPI ICSeqCompressFrameEnd(PCOMPVARS pc)
1389 {
1390 DWORD ret;
1391 TRACE("(%p)\n", pc);
1392 ret = ICSendMessage(pc->hic, ICM_COMPRESS_END, 0, 0);
1393 TRACE(" -- %lx", ret);
1394 if (pc->lpbiIn)
1395 HeapFree(GetProcessHeap(), 0, pc->lpbiIn);
1396 if (pc->lpBitsPrev)
1397 HeapFree(GetProcessHeap(), 0, pc->lpBitsPrev);
1398 if (pc->lpBitsOut)
1399 HeapFree(GetProcessHeap(), 0, pc->lpBitsOut);
1400 if (pc->lpState)
1401 HeapFree(GetProcessHeap(), 0, pc->lpState);
1402 pc->lpbiIn = pc->lpBitsPrev = pc->lpBitsOut = pc->lpState = NULL;
1403 }
1404
1405 /***********************************************************************
1406 * ICSeqCompressFrameStart [MSVFW32.@]
1407 */
1408 BOOL VFWAPI ICSeqCompressFrameStart(PCOMPVARS pc, LPBITMAPINFO lpbiIn)
1409 {
1410 /* I'm ignoring bmiColors as I don't know what to do with it,
1411 * it doesn't appear to be used though
1412 */
1413 DWORD ret;
1414 pc->lpbiIn = HeapAlloc(GetProcessHeap(), 0, sizeof(BITMAPINFO));
1415 if (!pc->lpbiIn)
1416 return FALSE;
1417
1418 memcpy(pc->lpbiIn, lpbiIn, sizeof(BITMAPINFO));
1419 pc->lpBitsPrev = HeapAlloc(GetProcessHeap(), 0, pc->lpbiIn->bmiHeader.biSizeImage);
1420 if (!pc->lpBitsPrev)
1421 {
1422 HeapFree(GetProcessHeap(), 0, pc->lpbiIn);
1423 return FALSE;
1424 }
1425
1426 pc->lpState = HeapAlloc(GetProcessHeap(), 0, sizeof(ICCOMPRESS));
1427 if (!pc->lpState)
1428 {
1429 HeapFree(GetProcessHeap(), 0, pc->lpbiIn);
1430 HeapFree(GetProcessHeap(), 0, pc->lpBitsPrev);
1431 return FALSE;
1432 }
1433 pc->cbState = sizeof(ICCOMPRESS);
1434
1435 pc->lpBitsOut = HeapAlloc(GetProcessHeap(), 0, pc->lpbiOut->bmiHeader.biSizeImage);
1436 if (!pc->lpBitsOut)
1437 {
1438 HeapFree(GetProcessHeap(), 0, pc->lpbiIn);
1439 HeapFree(GetProcessHeap(), 0, pc->lpBitsPrev);
1440 HeapFree(GetProcessHeap(), 0, pc->lpState);
1441 return FALSE;
1442 }
1443 TRACE("Compvars:\n"
1444 "\tpc:\n"
1445 "\tsize: %li\n"
1446 "\tflags: %li\n"
1447 "\thic: %p\n"
1448 "\ttype: %lx\n"
1449 "\thandler: %lx\n"
1450 "\tin/out: %p/%p\n"
1451 "key/data/quality: %li/%li/%li\n",
1452 pc->cbSize, pc->dwFlags, pc->hic, pc->fccType, pc->fccHandler,
1453 pc->lpbiIn, pc->lpbiOut, pc->lKey, pc->lDataRate, pc->lQ);
1454
1455 ret = ICSendMessage(pc->hic, ICM_COMPRESS_BEGIN, (DWORD_PTR)pc->lpbiIn, (DWORD_PTR)pc->lpbiOut);
1456 TRACE(" -- %lx\n", ret);
1457 if (ret == ICERR_OK)
1458 {
1459 ICCOMPRESS* icComp = (ICCOMPRESS *)pc->lpState;
1460 /* Initialise some variables */
1461 pc->lFrame = 0; pc->lKeyCount = 0;
1462
1463 icComp->lpbiOutput = &pc->lpbiOut->bmiHeader;
1464 icComp->lpbiInput = &pc->lpbiIn->bmiHeader;
1465 icComp->lpckid = NULL;
1466 icComp->dwFrameSize = 0;
1467 icComp->dwQuality = pc->lQ;
1468 icComp->lpbiPrev = &pc->lpbiIn->bmiHeader;
1469 return TRUE;
1470 }
1471 HeapFree(GetProcessHeap(), 0, pc->lpbiIn);
1472 HeapFree(GetProcessHeap(), 0, pc->lpBitsPrev);
1473 HeapFree(GetProcessHeap(), 0, pc->lpState);
1474 HeapFree(GetProcessHeap(), 0, pc->lpBitsOut);
1475 pc->lpBitsPrev = pc->lpbiIn = pc->lpState = pc->lpBitsOut = NULL;
1476 return FALSE;
1477 }
1478
1479 /***********************************************************************
1480 * GetFileNamePreview [MSVFW32.@]
1481 */
1482 static BOOL GetFileNamePreview(LPVOID lpofn,BOOL bSave,BOOL bUnicode)
1483 {
1484 CHAR szFunctionName[20];
1485 BOOL (*fnGetFileName)(LPVOID);
1486 HMODULE hComdlg32;
1487 BOOL ret;
1488
1489 FIXME("(%p,%d,%d), semi-stub!\n",lpofn,bSave,bUnicode);
1490
1491 lstrcpyA(szFunctionName, (bSave ? "GetSaveFileName" : "GetOpenFileName"));
1492 lstrcatA(szFunctionName, (bUnicode ? "W" : "A"));
1493
1494 hComdlg32 = LoadLibraryA("COMDLG32.DLL");
1495 if (hComdlg32 == NULL)
1496 return FALSE;
1497
1498 fnGetFileName = (LPVOID)GetProcAddress(hComdlg32, szFunctionName);
1499 if (fnGetFileName == NULL)
1500 return FALSE;
1501
1502 /* FIXME: need to add OFN_ENABLEHOOK and our own handler */
1503 ret = fnGetFileName(lpofn);
1504
1505 FreeLibrary(hComdlg32);
1506 return ret;
1507 }
1508
1509 /***********************************************************************
1510 * GetOpenFileNamePreviewA [MSVFW32.@]
1511 */
1512 BOOL WINAPI GetOpenFileNamePreviewA(LPOPENFILENAMEA lpofn)
1513 {
1514 FIXME("(%p), semi-stub!\n", lpofn);
1515
1516 return GetFileNamePreview(lpofn, FALSE, FALSE);
1517 }
1518
1519 /***********************************************************************
1520 * GetOpenFileNamePreviewW [MSVFW32.@]
1521 */
1522 BOOL WINAPI GetOpenFileNamePreviewW(LPOPENFILENAMEW lpofn)
1523 {
1524 FIXME("(%p), semi-stub!\n", lpofn);
1525
1526 return GetFileNamePreview(lpofn, FALSE, TRUE);
1527 }
1528
1529 /***********************************************************************
1530 * GetSaveFileNamePreviewA [MSVFW32.@]
1531 */
1532 BOOL WINAPI GetSaveFileNamePreviewA(LPOPENFILENAMEA lpofn)
1533 {
1534 FIXME("(%p), semi-stub!\n", lpofn);
1535
1536 return GetFileNamePreview(lpofn, TRUE, FALSE);
1537 }
1538
1539 /***********************************************************************
1540 * GetSaveFileNamePreviewW [MSVFW32.@]
1541 */
1542 BOOL WINAPI GetSaveFileNamePreviewW(LPOPENFILENAMEW lpofn)
1543 {
1544 FIXME("(%p), semi-stub!\n", lpofn);
1545
1546 return GetFileNamePreview(lpofn, TRUE, TRUE);
1547 }
Maarten's multimedia branch