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