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