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