If using the default values, also set dwType to REG_SZ as our default
[wine] / dlls / msvideo / msvideo_main.c
1 /*
2  * Copyright 1998 Marcus Meissner
3  * Copyright 2000 Bradley Baetz
4  * Copyright 2003 Michael Günnewig
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  *
20  * FIXME: This all assumes 32 bit codecs
21  *              Win95 appears to prefer 32 bit codecs, even from 16 bit code.
22  *              There is the ICOpenFunction16 to worry about still, though.
23  *      
24  * TODO
25  *      - no thread safety
26  */
27
28 #include <stdio.h>
29 #include <string.h>
30
31 #include "msvideo_private.h"
32 #include "winnls.h"
33 #include "wingdi.h"
34 #include "winuser.h"
35
36 #include "windowsx.h"
37
38 #include "wine/debug.h"
39
40 WINE_DEFAULT_DEBUG_CHANNEL(msvideo);
41
42 static inline const char *wine_dbgstr_fcc( DWORD fcc )
43 {
44     return wine_dbg_sprintf("%c%c%c%c", 
45                             LOBYTE(LOWORD(fcc)), HIBYTE(LOWORD(fcc)),
46                             LOBYTE(HIWORD(fcc)), HIBYTE(HIWORD(fcc)));
47 }
48
49 LRESULT (CALLBACK *pFnCallTo16)(HDRVR, HIC, UINT, LPARAM, LPARAM) = NULL;
50
51 static WINE_HIC*        MSVIDEO_FirstHic /* = NULL */;
52
53 typedef struct _reg_driver reg_driver;
54 struct _reg_driver
55 {
56     DWORD       fccType;
57     DWORD       fccHandler;
58     DRIVERPROC  proc;
59     LPWSTR      name;
60     reg_driver* next;
61 };
62
63 static reg_driver* reg_driver_list = NULL;
64
65 static int compare_fourcc(DWORD fcc1, DWORD fcc2)
66 {
67   char fcc_str1[5];
68   char fcc_str2[5];
69   fcc_str1[0] = LOBYTE(LOWORD(fcc1));
70   fcc_str1[1] = HIBYTE(LOWORD(fcc1));
71   fcc_str1[2] = LOBYTE(HIWORD(fcc1));
72   fcc_str1[3] = HIBYTE(HIWORD(fcc1));
73   fcc_str1[4] = 0;
74   fcc_str2[0] = LOBYTE(LOWORD(fcc2));
75   fcc_str2[1] = HIBYTE(LOWORD(fcc2));
76   fcc_str2[2] = LOBYTE(HIWORD(fcc2));
77   fcc_str2[3] = HIBYTE(HIWORD(fcc2));
78   fcc_str2[4] = 0;
79
80   return strcasecmp(fcc_str1,fcc_str2);
81 }
82
83 /******************************************************************
84  *              MSVIDEO_GetHicPtr
85  *
86  *
87  */
88 WINE_HIC*   MSVIDEO_GetHicPtr(HIC hic)
89 {
90     WINE_HIC*   whic;
91
92     for (whic = MSVIDEO_FirstHic; whic && whic->hic != hic; whic = whic->next);
93     return whic;
94 }
95
96 /***********************************************************************
97  *              VideoForWindowsVersion          [MSVFW32.2]
98  *              VideoForWindowsVersion          [MSVIDEO.2]
99  * Returns the version in major.minor form.
100  * In Windows95 this returns 0x040003b6 (4.950)
101  */
102 DWORD WINAPI VideoForWindowsVersion(void) 
103 {
104     return 0x040003B6; /* 4.950 */
105 }
106
107 /* system.ini: [drivers] */
108
109 /***********************************************************************
110  *              ICInfo                          [MSVFW32.@]
111  * Get information about an installable compressor. Return TRUE if there
112  * is one.
113  */
114 BOOL VFWAPI ICInfo(
115         DWORD fccType,          /* [in] type of compressor ('vidc') */
116         DWORD fccHandler,       /* [in] real fcc for handler or <n>th compressor */
117         ICINFO *lpicinfo)       /* [out] information about compressor */
118 {
119     char        buf[2000];
120
121     TRACE("(%s,%s/%08lx,%p)\n", 
122           wine_dbgstr_fcc(fccType), wine_dbgstr_fcc(fccHandler), fccHandler, lpicinfo);
123
124     if (GetPrivateProfileSectionA("drivers32", buf, sizeof(buf), "system.ini")) 
125     {
126         char    fccTypeStr[4];
127         char    fccHandlerStr[4];
128         char*   s;
129
130         fccTypeStr[0] = LOBYTE(LOWORD(fccType));
131         fccTypeStr[1] = HIBYTE(LOWORD(fccType));
132         fccTypeStr[2] = LOBYTE(HIWORD(fccType));
133         fccTypeStr[3] = HIBYTE(HIWORD(fccType));
134
135         fccHandlerStr[0] = LOBYTE(LOWORD(fccHandler));
136         fccHandlerStr[1] = HIBYTE(LOWORD(fccHandler));
137         fccHandlerStr[2] = LOBYTE(HIWORD(fccHandler));
138         fccHandlerStr[3] = HIBYTE(HIWORD(fccHandler));
139
140         for (s = buf; *s; s += strlen(s) + 1) 
141         {
142             if (!strncasecmp(fccTypeStr, s, 4) && s[4] == '.' && s[9] == '=' &&
143                 (!fccHandler-- || !strncasecmp(fccHandlerStr, s + 5, 4)))
144             {
145                 /* exact match of fccHandler or nth driver found ?? */
146                 lpicinfo->fccType = fccType;
147                 lpicinfo->fccHandler = mmioStringToFOURCCA(s + 5, 0);
148                 lpicinfo->dwFlags = 0;
149                 lpicinfo->dwVersion = 0;
150                 lpicinfo->dwVersionICM = 0x104;
151                 lpicinfo->szName[0] = 0;
152                 lpicinfo->szDescription[0] = 0;
153                 MultiByteToWideChar(CP_ACP, 0, s + 10, -1, 
154                                     lpicinfo->szDriver, 
155                                     sizeof(lpicinfo->szDriver)/sizeof(WCHAR));
156                 return TRUE;
157             }
158         }
159     }
160     return FALSE;
161 }
162
163 static DWORD IC_HandleRef = 1;
164
165 /***********************************************************************
166  *              ICInstall                       [MSVFW32.@]
167  */
168 BOOL VFWAPI ICInstall(DWORD fccType, DWORD fccHandler, LPARAM lParam, LPSTR szDesc, UINT wFlags) 
169 {
170     reg_driver* driver;
171     unsigned len;
172
173     TRACE("(%s,%s,%p,%p,0x%08x)\n", wine_dbgstr_fcc(fccType), wine_dbgstr_fcc(fccHandler), (void*)lParam, szDesc, wFlags);
174
175     /* Check if a driver is already registered */
176     for (driver = reg_driver_list; driver; driver = driver->next)
177     {
178         if (!compare_fourcc(fccType, driver->fccType) &&
179             !compare_fourcc(fccHandler, driver->fccHandler))
180             break;
181     }
182     if (driver) return FALSE;
183
184     /* Register the driver */
185     driver = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(reg_driver));
186     if (!driver) goto oom;
187     driver->fccType = fccType;
188     driver->fccHandler = fccHandler;
189
190     switch(wFlags)
191     {
192     case ICINSTALL_FUNCTION:
193         driver->proc = (DRIVERPROC)lParam;
194         driver->name = NULL;
195         break;
196     case ICINSTALL_DRIVER:
197         driver->proc = NULL;
198         len = MultiByteToWideChar(CP_ACP, 0, (char*)lParam, -1, NULL, 0);
199         driver->name = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
200         if (!driver->name) goto oom;
201         MultiByteToWideChar(CP_ACP, 0, (char*)lParam, -1, driver->name, len);
202         break;
203     default:
204         ERR("Invalid flags!\n");
205         HeapFree(GetProcessHeap(), 0, driver);
206         return FALSE;
207    }
208
209    /* Insert our driver in the list*/
210    driver->next = reg_driver_list;
211    reg_driver_list = driver;
212     
213    return TRUE;
214  oom:
215    if (driver) HeapFree(GetProcessHeap(), 0, driver);
216    return FALSE;
217 }
218
219 /***********************************************************************
220  *              ICRemove                        [MSVFW32.@]
221  */
222 BOOL VFWAPI ICRemove(DWORD fccType, DWORD fccHandler, UINT wFlags) 
223 {
224     reg_driver** pdriver;
225     
226     TRACE("(%s,%s,0x%08x)\n", wine_dbgstr_fcc(fccType), wine_dbgstr_fcc(fccHandler), wFlags);
227
228     /* Check if a driver is already registered */
229     for (pdriver = &reg_driver_list; *pdriver; pdriver = &(*pdriver)->next)
230     {
231         if (!compare_fourcc(fccType, (*pdriver)->fccType) &&
232             !compare_fourcc(fccHandler, (*pdriver)->fccHandler))
233             break;
234     }
235     if (!*pdriver)
236         return FALSE;
237
238     /* Remove the driver from the list */
239     *pdriver = (*pdriver)->next;
240     if ((*pdriver)->name)
241         HeapFree(GetProcessHeap(), 0, (*pdriver)->name);
242     HeapFree(GetProcessHeap(), 0, *pdriver);
243     
244     return TRUE;  
245 }
246
247
248 /***********************************************************************
249  *              ICOpen                          [MSVFW32.@]
250  * Opens an installable compressor. Return special handle.
251  */
252 HIC VFWAPI ICOpen(DWORD fccType, DWORD fccHandler, UINT wMode) 
253 {
254     WCHAR               codecname[10];
255     ICOPEN              icopen;
256     HDRVR               hdrv;
257     WINE_HIC*           whic;
258     BOOL                bIs16;
259     static WCHAR        drv32W[] = {'d','r','i','v','e','r','s','3','2','\0'};
260     reg_driver*         driver;
261
262     TRACE("(%s,%s,0x%08x)\n", wine_dbgstr_fcc(fccType), wine_dbgstr_fcc(fccHandler), wMode);
263
264     /* Check if there is a registered driver that matches */
265     driver = reg_driver_list;
266     while(driver)
267         if (!compare_fourcc(fccType, driver->fccType) &&
268             !compare_fourcc(fccHandler, driver->fccHandler))
269             break;
270         else
271             driver = driver->next;
272
273     if (driver && driver->proc)
274         /* The driver has been registered at runtime with its driverproc */
275         return MSVIDEO_OpenFunction(fccType, fccHandler, wMode, (DRIVERPROC)driver->proc, (DWORD)NULL);
276   
277     /* Well, lParam2 is in fact a LPVIDEO_OPEN_PARMS, but it has the
278      * same layout as ICOPEN
279      */
280     icopen.dwSize               = sizeof(ICOPEN);
281     icopen.fccType              = fccType;
282     icopen.fccHandler           = fccHandler;
283     icopen.dwVersion            = 0x00001000; /* FIXME */
284     icopen.dwFlags              = wMode;
285     icopen.dwError              = 0;
286     icopen.pV1Reserved          = NULL;
287     icopen.pV2Reserved          = NULL;
288     icopen.dnDevNode            = 0; /* FIXME */
289         
290     if (!driver) {
291         /* The driver is registered in the registry */
292         codecname[0] = LOBYTE(LOWORD(fccType));
293         codecname[1] = HIBYTE(LOWORD(fccType));
294         codecname[2] = LOBYTE(HIWORD(fccType));
295         codecname[3] = HIBYTE(HIWORD(fccType));
296         codecname[4] = '.';
297         codecname[5] = LOBYTE(LOWORD(fccHandler));
298         codecname[6] = HIBYTE(LOWORD(fccHandler));
299         codecname[7] = LOBYTE(HIWORD(fccHandler));
300         codecname[8] = HIBYTE(HIWORD(fccHandler));
301         codecname[9] = '\0';
302
303         hdrv = OpenDriver(codecname, drv32W, (LPARAM)&icopen);
304         if (!hdrv) 
305         {
306             if (fccType == streamtypeVIDEO) 
307             {
308                 codecname[0] = 'v';
309                 codecname[1] = 'i';
310                 codecname[2] = 'd';
311                 codecname[3] = 'c';
312
313                 fccType = ICTYPE_VIDEO;
314                 hdrv = OpenDriver(codecname, drv32W, (LPARAM)&icopen);
315             }
316             if (!hdrv)
317                 return 0;
318         }
319     } else {
320         /* The driver has been registered at runtime with its name */
321         hdrv = OpenDriver(driver->name, NULL, (LPARAM)&icopen);
322         if (!hdrv) 
323             return 0; 
324     }
325     bIs16 = GetDriverFlags(hdrv) & 0x10000000; /* undocumented flag: WINE_GDF_16BIT */
326
327     if (bIs16 && !pFnCallTo16)
328     {
329         FIXME("Got a 16 bit driver, but no 16 bit support in msvfw\n");
330         return 0;
331     }
332     whic = HeapAlloc(GetProcessHeap(), 0, sizeof(WINE_HIC));
333     if (!whic)
334     {
335         CloseDriver(hdrv, 0, 0);
336         return FALSE;
337     }
338     whic->hdrv          = hdrv;
339     /* FIXME: is the signature the real one ? */
340     whic->driverproc    = bIs16 ? (DRIVERPROC)pFnCallTo16 : NULL;
341     whic->driverproc16  = 0;
342     whic->type          = fccType;
343     whic->handler       = fccHandler;
344     while (MSVIDEO_GetHicPtr(HIC_32(IC_HandleRef)) != NULL) IC_HandleRef++;
345     whic->hic           = HIC_32(IC_HandleRef++);
346     whic->next          = MSVIDEO_FirstHic;
347     MSVIDEO_FirstHic = whic;
348
349     TRACE("=> %p\n", whic->hic);
350     return whic->hic;
351 }
352
353 /***********************************************************************
354  *              MSVIDEO_OpenFunction
355  */
356 HIC MSVIDEO_OpenFunction(DWORD fccType, DWORD fccHandler, UINT wMode, 
357                          DRIVERPROC lpfnHandler, DWORD lpfnHandler16) 
358 {
359     ICOPEN      icopen;
360     WINE_HIC*   whic;
361
362     TRACE("(%s,%s,%d,%p,%08lx)\n", 
363           wine_dbgstr_fcc(fccType), wine_dbgstr_fcc(fccHandler), wMode, lpfnHandler, lpfnHandler16);
364
365     icopen.dwSize               = sizeof(ICOPEN);
366     icopen.fccType              = fccType;
367     icopen.fccHandler           = fccHandler;
368     icopen.dwVersion            = 0x00001000; /* FIXME */
369     icopen.dwFlags              = wMode;
370     icopen.dwError              = 0;
371     icopen.pV1Reserved          = NULL;
372     icopen.pV2Reserved          = NULL;
373     icopen.dnDevNode            = 0; /* FIXME */
374
375     whic = HeapAlloc(GetProcessHeap(), 0, sizeof(WINE_HIC));
376     if (!whic) return 0;
377
378     whic->driverproc   = lpfnHandler;
379     whic->driverproc16 = lpfnHandler16;
380     while (MSVIDEO_GetHicPtr(HIC_32(IC_HandleRef)) != NULL) IC_HandleRef++;
381     whic->hic          = HIC_32(IC_HandleRef++);
382     whic->next         = MSVIDEO_FirstHic;
383     MSVIDEO_FirstHic = whic;
384
385     /* Now try opening/loading the driver. Taken from DRIVER_AddToList */
386     /* What if the function is used more than once? */
387
388     if (MSVIDEO_SendMessage(whic, DRV_LOAD, 0L, 0L) != DRV_SUCCESS) 
389     {
390         WARN("DRV_LOAD failed for hic %p\n", whic->hic);
391         MSVIDEO_FirstHic = whic->next;
392         HeapFree(GetProcessHeap(), 0, whic);
393         return 0;
394     }
395     /* return value is not checked */
396     MSVIDEO_SendMessage(whic, DRV_ENABLE, 0L, 0L);
397
398     whic->driverId = (DWORD)MSVIDEO_SendMessage(whic, DRV_OPEN, 0, (DWORD)&icopen);
399     /* FIXME: What should we put here? */
400     whic->hdrv = (HDRVR)0;
401     
402     if (whic->driverId == 0) 
403     {
404         WARN("DRV_OPEN failed for hic %p\n", whic->hic);
405         MSVIDEO_FirstHic = whic->next;
406         HeapFree(GetProcessHeap(), 0, whic);
407         return 0;
408     }
409
410     TRACE("=> %p\n", whic->hic);
411     return whic->hic;
412 }
413
414 /***********************************************************************
415  *              ICOpenFunction                  [MSVFW32.@]
416  */
417 HIC VFWAPI ICOpenFunction(DWORD fccType, DWORD fccHandler, UINT wMode, FARPROC lpfnHandler) 
418 {
419     return MSVIDEO_OpenFunction(fccType, fccHandler, wMode, (DRIVERPROC)lpfnHandler, 0);
420 }
421
422 /***********************************************************************
423  *              ICGetInfo                       [MSVFW32.@]
424  */
425 LRESULT VFWAPI ICGetInfo(HIC hic, ICINFO *picinfo, DWORD cb) 
426 {
427     LRESULT     ret;
428     WINE_HIC*   whic = MSVIDEO_GetHicPtr(hic);
429
430     TRACE("(%p,%p,%ld)\n", hic, picinfo, cb);
431
432     whic = MSVIDEO_GetHicPtr(hic);
433     if (!whic) return ICERR_BADHANDLE;
434     if (!picinfo) return MMSYSERR_INVALPARAM;
435
436     /* (WS) The field szDriver should be initialized because the driver 
437      * is not obliged and often will not do it. Some applications, like
438      * VirtualDub, rely on this field and will occasionally crash if it
439      * goes unitialized.
440      */
441     if (cb >= sizeof(ICINFO)) picinfo->szDriver[0] = '\0';
442
443     ret = ICSendMessage(hic, ICM_GETINFO, (DWORD)picinfo, cb);
444
445     /* (WS) When szDriver was not supplied by the driver itself, apparently 
446      * Windows will set its value equal to the driver file name. This can
447      * be obtained from the registry as we do here.
448      */
449     if (cb >= sizeof(ICINFO) && picinfo->szDriver[0] == 0)
450     {
451         ICINFO  ii;
452
453         memset(&ii, 0, sizeof(ii));
454         ii.dwSize = sizeof(ii);
455         ICInfo(picinfo->fccType, picinfo->fccHandler, &ii);
456         lstrcpyW(picinfo->szDriver, ii.szDriver);
457     }
458
459     TRACE("     -> 0x%08lx\n", ret);
460     return ret;
461 }
462
463 /***********************************************************************
464  *              ICLocate                        [MSVFW32.@]
465  */
466 HIC VFWAPI ICLocate(DWORD fccType, DWORD fccHandler, LPBITMAPINFOHEADER lpbiIn,
467                     LPBITMAPINFOHEADER lpbiOut, WORD wMode)
468 {
469     HIC         hic;
470     DWORD       querymsg;
471     LPSTR       pszBuffer;
472
473     TRACE("(%s,%s,%p,%p,0x%04x)\n", 
474           wine_dbgstr_fcc(fccType), wine_dbgstr_fcc(fccHandler), lpbiIn, lpbiOut, wMode);
475
476     switch (wMode) 
477     {
478     case ICMODE_FASTCOMPRESS:
479     case ICMODE_COMPRESS:
480         querymsg = ICM_COMPRESS_QUERY;
481         break;
482     case ICMODE_FASTDECOMPRESS:
483     case ICMODE_DECOMPRESS:
484         querymsg = ICM_DECOMPRESS_QUERY;
485         break;
486     case ICMODE_DRAW:
487         querymsg = ICM_DRAW_QUERY;
488         break;
489     default:
490         WARN("Unknown mode (%d)\n", wMode);
491         return 0;
492     }
493
494     /* Easy case: handler/type match, we just fire a query and return */
495     hic = ICOpen(fccType, fccHandler, wMode);
496     if (hic) 
497     {
498         if (!ICSendMessage(hic, querymsg, (DWORD)lpbiIn, (DWORD)lpbiOut))
499         {
500             TRACE("=> %p\n", hic);
501             return hic;
502         }
503         ICClose(hic);
504     }
505
506     /* Now try each driver in turn. 32 bit codecs only. */
507     /* FIXME: Move this to an init routine? */
508     
509     pszBuffer = (LPSTR)HeapAlloc(GetProcessHeap(), 0, 1024);
510     if (GetPrivateProfileSectionA("drivers32", pszBuffer, 1024, "system.ini")) 
511     {
512         char* s = pszBuffer;
513         char  fcc[4];
514
515         while (*s) 
516         {
517             fcc[0] = LOBYTE(LOWORD(fccType));
518             fcc[1] = HIBYTE(LOWORD(fccType));
519             fcc[2] = LOBYTE(HIWORD(fccType));
520             fcc[3] = HIBYTE(HIWORD(fccType));
521             if (!strncasecmp(fcc, s, 4) && s[4] == '.' && s[9] == '=')
522             {
523                 char *s2 = s;
524                 while (*s2 != '\0' && *s2 != '.') s2++;
525                 if (*s2++) 
526                 {
527                     hic = ICOpen(fccType, mmioStringToFOURCCA(s2, 0), wMode);
528                     if (hic) 
529                     {
530                         if (!ICSendMessage(hic, querymsg, (DWORD)lpbiIn, (DWORD)lpbiOut))
531                         {
532                             HeapFree(GetProcessHeap(), 0, pszBuffer);
533                             TRACE("=> %p\n", hic);
534                             return hic;
535                         }
536                         ICClose(hic);
537                     }
538                 }
539             }
540             s += strlen(s) + 1;
541         }
542     }
543     HeapFree(GetProcessHeap(), 0, pszBuffer);
544
545     if (fccType == streamtypeVIDEO) 
546         return ICLocate(ICTYPE_VIDEO, fccHandler, lpbiIn, lpbiOut, wMode);
547     
548     WARN("(%s,%s,%p,%p,0x%04x) not found!\n",
549          wine_dbgstr_fcc(fccType), wine_dbgstr_fcc(fccHandler), lpbiIn, lpbiOut, wMode);
550     return 0;
551 }
552
553 /***********************************************************************
554  *              ICGetDisplayFormat                      [MSVFW32.@]
555  */
556 HIC VFWAPI ICGetDisplayFormat(
557         HIC hic,LPBITMAPINFOHEADER lpbiIn,LPBITMAPINFOHEADER lpbiOut,
558         INT depth,INT dx,INT dy)
559 {
560         HIC     tmphic = hic;
561
562         FIXME("(%p,%p,%p,%d,%d,%d),stub!\n",hic,lpbiIn,lpbiOut,depth,dx,dy);
563         if (!tmphic) {
564                 tmphic=ICLocate(ICTYPE_VIDEO,0,lpbiIn,NULL,ICMODE_DECOMPRESS);
565                 if (!tmphic)
566                         return tmphic;
567         }
568         if ((dy == lpbiIn->biHeight) && (dx == lpbiIn->biWidth))
569                 dy = dx = 0; /* no resize needed */
570
571         /* Can we decompress it ? */
572         if (ICDecompressQuery(tmphic,lpbiIn,NULL) != 0)
573                 goto errout; /* no, sorry */
574
575         ICDecompressGetFormat(tmphic,lpbiIn,lpbiOut);
576
577         if (lpbiOut->biCompression != 0) {
578            FIXME("Ooch, how come decompressor outputs compressed data (%ld)??\n",
579                          lpbiOut->biCompression);
580         }
581         if (lpbiOut->biSize < sizeof(*lpbiOut)) {
582            FIXME("Ooch, size of output BIH is too small (%ld)\n",
583                          lpbiOut->biSize);
584            lpbiOut->biSize = sizeof(*lpbiOut);
585         }
586         if (!depth) {
587                 HDC     hdc;
588
589                 hdc = GetDC(0);
590                 depth = GetDeviceCaps(hdc,BITSPIXEL)*GetDeviceCaps(hdc,PLANES);
591                 ReleaseDC(0,hdc);
592                 if (depth==15)  depth = 16;
593                 if (depth<8)    depth =  8;
594         }
595         if (lpbiIn->biBitCount == 8)
596                 depth = 8;
597
598         TRACE("=> %p\n", tmphic);
599         return tmphic;
600 errout:
601         if (hic!=tmphic)
602                 ICClose(tmphic);
603
604         TRACE("=> 0\n");
605         return 0;
606 }
607
608 /***********************************************************************
609  *              ICCompress                      [MSVFW32.@]
610  */
611 DWORD VFWAPIV
612 ICCompress(
613         HIC hic,DWORD dwFlags,LPBITMAPINFOHEADER lpbiOutput,LPVOID lpData,
614         LPBITMAPINFOHEADER lpbiInput,LPVOID lpBits,LPDWORD lpckid,
615         LPDWORD lpdwFlags,LONG lFrameNum,DWORD dwFrameSize,DWORD dwQuality,
616         LPBITMAPINFOHEADER lpbiPrev,LPVOID lpPrev)
617 {
618         ICCOMPRESS      iccmp;
619
620         TRACE("(%p,%ld,%p,%p,%p,%p,...)\n",hic,dwFlags,lpbiOutput,lpData,lpbiInput,lpBits);
621
622         iccmp.dwFlags           = dwFlags;
623
624         iccmp.lpbiOutput        = lpbiOutput;
625         iccmp.lpOutput          = lpData;
626         iccmp.lpbiInput         = lpbiInput;
627         iccmp.lpInput           = lpBits;
628
629         iccmp.lpckid            = lpckid;
630         iccmp.lpdwFlags         = lpdwFlags;
631         iccmp.lFrameNum         = lFrameNum;
632         iccmp.dwFrameSize       = dwFrameSize;
633         iccmp.dwQuality         = dwQuality;
634         iccmp.lpbiPrev          = lpbiPrev;
635         iccmp.lpPrev            = lpPrev;
636         return ICSendMessage(hic,ICM_COMPRESS,(DWORD)&iccmp,sizeof(iccmp));
637 }
638
639 /***********************************************************************
640  *              ICDecompress                    [MSVFW32.@]
641  */
642 DWORD VFWAPIV  ICDecompress(HIC hic,DWORD dwFlags,LPBITMAPINFOHEADER lpbiFormat,
643                                 LPVOID lpData,LPBITMAPINFOHEADER lpbi,LPVOID lpBits)
644 {
645         ICDECOMPRESS    icd;
646         DWORD ret;
647
648         TRACE("(%p,%ld,%p,%p,%p,%p)\n",hic,dwFlags,lpbiFormat,lpData,lpbi,lpBits);
649
650         TRACE("lpBits[0] == %lx\n",((LPDWORD)lpBits)[0]);
651
652         icd.dwFlags     = dwFlags;
653         icd.lpbiInput   = lpbiFormat;
654         icd.lpInput     = lpData;
655
656         icd.lpbiOutput  = lpbi;
657         icd.lpOutput    = lpBits;
658         icd.ckid        = 0;
659         ret = ICSendMessage(hic,ICM_DECOMPRESS,(DWORD)&icd,sizeof(ICDECOMPRESS));
660
661         TRACE("lpBits[0] == %lx\n",((LPDWORD)lpBits)[0]);
662
663         TRACE("-> %ld\n",ret);
664
665         return ret;
666 }
667
668
669 /***********************************************************************
670  *              ICCompressorChoose   [MSVFW32.@]
671  */
672 BOOL VFWAPI ICCompressorChoose(HWND hwnd, UINT uiFlags, LPVOID pvIn,
673                                LPVOID lpData, PCOMPVARS pc, LPSTR lpszTitle)
674 {
675   FIXME("(%p,0x%X,%p,%p,%p,%s),stub!\n",hwnd,uiFlags,pvIn,lpData,pc,lpszTitle);
676
677   if (pc == NULL || pc->cbSize != sizeof(COMPVARS))
678     return FALSE;
679
680   if ((pc->dwFlags & ICMF_COMPVARS_VALID) == 0) {
681     pc->dwFlags   = 0;
682     pc->fccType   = pc->fccHandler = 0;
683     pc->hic       = NULL;
684     pc->lpbiOut   = NULL;
685     pc->lpBitsOut = pc->lpBitsPrev = pc->lpState = NULL;
686     pc->lQ        = ICQUALITY_DEFAULT;
687     pc->lKey      = -1;
688     pc->lDataRate = 300; /* kB */
689     pc->lpState   = NULL;
690     pc->cbState   = 0;
691   }
692   if (pc->fccType == 0)
693     pc->fccType = ICTYPE_VIDEO;
694
695   /* FIXME */
696   
697   return FALSE;
698 }
699
700
701 /***********************************************************************
702  *              ICCompressorFree   [MSVFW32.@]
703  */
704 void VFWAPI ICCompressorFree(PCOMPVARS pc)
705 {
706   TRACE("(%p)\n",pc);
707
708   if (pc != NULL && pc->cbSize == sizeof(COMPVARS)) {
709     if (pc->hic != NULL) {
710       ICClose(pc->hic);
711       pc->hic = NULL;
712     }
713     if (pc->lpbiOut != NULL) {
714       GlobalFreePtr(pc->lpbiOut);
715       pc->lpbiOut = NULL;
716     }
717     if (pc->lpBitsOut != NULL) {
718       GlobalFreePtr(pc->lpBitsOut);
719       pc->lpBitsOut = NULL;
720     }
721     if (pc->lpBitsPrev != NULL) {
722       GlobalFreePtr(pc->lpBitsPrev);
723       pc->lpBitsPrev = NULL;
724     }
725     if (pc->lpState != NULL) {
726       GlobalFreePtr(pc->lpBitsPrev);
727       pc->lpState = NULL;
728     }
729     pc->dwFlags = 0;
730   }
731 }
732
733
734 /******************************************************************
735  *              MSVIDEO_SendMessage
736  *
737  *
738  */
739 LRESULT MSVIDEO_SendMessage(WINE_HIC* whic, UINT msg, DWORD lParam1, DWORD lParam2)
740 {
741     LRESULT     ret;
742     
743 #define XX(x) case x: TRACE("(%p,"#x",0x%08lx,0x%08lx)\n",whic,lParam1,lParam2); break;
744     
745     switch (msg) {
746         /* DRV_* */
747         XX(DRV_LOAD);
748         XX(DRV_ENABLE);
749         XX(DRV_OPEN);
750         XX(DRV_CLOSE);
751         XX(DRV_DISABLE);
752         XX(DRV_FREE);
753         /* ICM_RESERVED+X */
754         XX(ICM_ABOUT);
755         XX(ICM_CONFIGURE);
756         XX(ICM_GET);
757         XX(ICM_GETINFO);
758         XX(ICM_GETDEFAULTQUALITY);
759         XX(ICM_GETQUALITY);
760         XX(ICM_GETSTATE);
761         XX(ICM_SETQUALITY);
762         XX(ICM_SET);
763         XX(ICM_SETSTATE);
764         /* ICM_USER+X */
765         XX(ICM_COMPRESS_FRAMES_INFO);
766         XX(ICM_COMPRESS_GET_FORMAT);
767         XX(ICM_COMPRESS_GET_SIZE);
768         XX(ICM_COMPRESS_QUERY);
769         XX(ICM_COMPRESS_BEGIN);
770         XX(ICM_COMPRESS);
771         XX(ICM_COMPRESS_END);
772         XX(ICM_DECOMPRESS_GET_FORMAT);
773         XX(ICM_DECOMPRESS_QUERY);
774         XX(ICM_DECOMPRESS_BEGIN);
775         XX(ICM_DECOMPRESS);
776         XX(ICM_DECOMPRESS_END);
777         XX(ICM_DECOMPRESS_SET_PALETTE);
778         XX(ICM_DECOMPRESS_GET_PALETTE);
779         XX(ICM_DRAW_QUERY);
780         XX(ICM_DRAW_BEGIN);
781         XX(ICM_DRAW_GET_PALETTE);
782         XX(ICM_DRAW_START);
783         XX(ICM_DRAW_STOP);
784         XX(ICM_DRAW_END);
785         XX(ICM_DRAW_GETTIME);
786         XX(ICM_DRAW);
787         XX(ICM_DRAW_WINDOW);
788         XX(ICM_DRAW_SETTIME);
789         XX(ICM_DRAW_REALIZE);
790         XX(ICM_DRAW_FLUSH);
791         XX(ICM_DRAW_RENDERBUFFER);
792         XX(ICM_DRAW_START_PLAY);
793         XX(ICM_DRAW_STOP_PLAY);
794         XX(ICM_DRAW_SUGGESTFORMAT);
795         XX(ICM_DRAW_CHANGEPALETTE);
796         XX(ICM_GETBUFFERSWANTED);
797         XX(ICM_GETDEFAULTKEYFRAMERATE);
798         XX(ICM_DECOMPRESSEX_BEGIN);
799         XX(ICM_DECOMPRESSEX_QUERY);
800         XX(ICM_DECOMPRESSEX);
801         XX(ICM_DECOMPRESSEX_END);
802         XX(ICM_SET_STATUS_PROC);
803     default:
804         FIXME("(%p,0x%08lx,0x%08lx,0x%08lx) unknown message\n",whic,(DWORD)msg,lParam1,lParam2);
805     }
806     
807 #undef XX
808     
809     if (whic->driverproc) {
810         /* dwDriverId parameter is the value returned by the DRV_OPEN */
811         ret = whic->driverproc(whic->driverId, whic->hdrv, msg, lParam1, lParam2);
812     } else {
813         ret = SendDriverMessage(whic->hdrv, msg, lParam1, lParam2);
814     }
815
816     TRACE("     -> 0x%08lx\n", ret);
817     return ret;
818 }
819
820 /***********************************************************************
821  *              ICSendMessage                   [MSVFW32.@]
822  */
823 LRESULT VFWAPI ICSendMessage(HIC hic, UINT msg, DWORD lParam1, DWORD lParam2) 
824 {
825     WINE_HIC*   whic = MSVIDEO_GetHicPtr(hic);
826
827     if (!whic) return ICERR_BADHANDLE;
828     return MSVIDEO_SendMessage(whic, msg, lParam1, lParam2);
829 }
830
831 /***********************************************************************
832  *              ICDrawBegin             [MSVFW32.@]
833  */
834 DWORD VFWAPIV ICDrawBegin(
835         HIC                hic,     /* [in] */
836         DWORD              dwFlags, /* [in] flags */
837         HPALETTE           hpal,    /* [in] palette to draw with */
838         HWND               hwnd,    /* [in] window to draw to */
839         HDC                hdc,     /* [in] HDC to draw to */
840         INT                xDst,    /* [in] destination rectangle */
841         INT                yDst,    /* [in] */
842         INT                dxDst,   /* [in] */
843         INT                dyDst,   /* [in] */
844         LPBITMAPINFOHEADER lpbi,    /* [in] format of frame to draw */
845         INT                xSrc,    /* [in] source rectangle */
846         INT                ySrc,    /* [in] */
847         INT                dxSrc,   /* [in] */
848         INT                dySrc,   /* [in] */
849         DWORD              dwRate,  /* [in] frames/second = (dwRate/dwScale) */
850         DWORD              dwScale) /* [in] */
851 {
852
853         ICDRAWBEGIN     icdb;
854
855         TRACE("(%p,%ld,%p,%p,%p,%u,%u,%u,%u,%p,%u,%u,%u,%u,%ld,%ld)\n",
856                   hic, dwFlags, hpal, hwnd, hdc, xDst, yDst, dxDst, dyDst,
857                   lpbi, xSrc, ySrc, dxSrc, dySrc, dwRate, dwScale);
858
859         icdb.dwFlags = dwFlags;
860         icdb.hpal = hpal;
861         icdb.hwnd = hwnd;
862         icdb.hdc = hdc;
863         icdb.xDst = xDst;
864         icdb.yDst = yDst;
865         icdb.dxDst = dxDst;
866         icdb.dyDst = dyDst;
867         icdb.lpbi = lpbi;
868         icdb.xSrc = xSrc;
869         icdb.ySrc = ySrc;
870         icdb.dxSrc = dxSrc;
871         icdb.dySrc = dySrc;
872         icdb.dwRate = dwRate;
873         icdb.dwScale = dwScale;
874         return ICSendMessage(hic,ICM_DRAW_BEGIN,(DWORD)&icdb,sizeof(icdb));
875 }
876
877 /***********************************************************************
878  *              ICDraw                  [MSVFW32.@]
879  */
880 DWORD VFWAPIV ICDraw(HIC hic, DWORD dwFlags, LPVOID lpFormat, LPVOID lpData, DWORD cbData, LONG lTime) {
881         ICDRAW  icd;
882
883         TRACE("(%p,%ld,%p,%p,%ld,%ld)\n",hic,dwFlags,lpFormat,lpData,cbData,lTime);
884
885         icd.dwFlags = dwFlags;
886         icd.lpFormat = lpFormat;
887         icd.lpData = lpData;
888         icd.cbData = cbData;
889         icd.lTime = lTime;
890
891         return ICSendMessage(hic,ICM_DRAW,(DWORD)&icd,sizeof(icd));
892 }
893
894 /***********************************************************************
895  *              ICClose                 [MSVFW32.@]
896  */
897 LRESULT WINAPI ICClose(HIC hic)
898 {
899     WINE_HIC* whic = MSVIDEO_GetHicPtr(hic);
900     WINE_HIC** p;
901
902     TRACE("(%p)\n",hic);
903
904     if (!whic) return ICERR_BADHANDLE;
905
906     if (whic->driverproc) 
907     {
908         MSVIDEO_SendMessage(whic, DRV_CLOSE, 0, 0);
909         MSVIDEO_SendMessage(whic, DRV_DISABLE, 0, 0);
910         MSVIDEO_SendMessage(whic, DRV_FREE, 0, 0);
911     }
912     else
913     {
914         CloseDriver(whic->hdrv, 0, 0);
915     }
916
917     /* remove whic from list */
918     for (p = &MSVIDEO_FirstHic; *p != NULL; p = &((*p)->next))
919     {
920         if ((*p) == whic)
921         {
922             *p = whic->next;
923             break;
924         }
925     }
926
927     HeapFree(GetProcessHeap(), 0, whic);
928     return 0;
929 }
930
931
932
933 /***********************************************************************
934  *              ICImageCompress [MSVFW32.@]
935  */
936 HANDLE VFWAPI ICImageCompress(
937         HIC hic, UINT uiFlags,
938         LPBITMAPINFO lpbiIn, LPVOID lpBits,
939         LPBITMAPINFO lpbiOut, LONG lQuality,
940         LONG* plSize)
941 {
942         FIXME("(%p,%08x,%p,%p,%p,%ld,%p)\n",
943                 hic, uiFlags, lpbiIn, lpBits, lpbiOut, lQuality, plSize);
944
945         return NULL;
946 }
947
948 /***********************************************************************
949  *              ICImageDecompress       [MSVFW32.@]
950  */
951
952 HANDLE VFWAPI ICImageDecompress(
953         HIC hic, UINT uiFlags, LPBITMAPINFO lpbiIn,
954         LPVOID lpBits, LPBITMAPINFO lpbiOut)
955 {
956         HGLOBAL hMem = NULL;
957         BYTE*   pMem = NULL;
958         BOOL    bReleaseIC = FALSE;
959         BYTE*   pHdr = NULL;
960         LONG    cbHdr = 0;
961         BOOL    bSucceeded = FALSE;
962         BOOL    bInDecompress = FALSE;
963         DWORD   biSizeImage;
964
965         TRACE("(%p,%08x,%p,%p,%p)\n",
966                 hic, uiFlags, lpbiIn, lpBits, lpbiOut);
967
968         if ( hic == NULL )
969         {
970                 hic = ICDecompressOpen( ICTYPE_VIDEO, 0, &lpbiIn->bmiHeader, (lpbiOut != NULL) ? &lpbiOut->bmiHeader : NULL );
971                 if ( hic == NULL )
972                 {
973                         WARN("no handler\n" );
974                         goto err;
975                 }
976                 bReleaseIC = TRUE;
977         }
978         if ( uiFlags != 0 )
979         {
980                 FIXME( "unknown flag %08x\n", uiFlags );
981                 goto err;
982         }
983         if ( lpbiIn == NULL || lpBits == NULL )
984         {
985                 WARN("invalid argument\n");
986                 goto err;
987         }
988
989         if ( lpbiOut != NULL )
990         {
991                 if ( lpbiOut->bmiHeader.biSize != sizeof(BITMAPINFOHEADER) )
992                         goto err;
993                 cbHdr = sizeof(BITMAPINFOHEADER);
994                 if ( lpbiOut->bmiHeader.biCompression == 3 )
995                         cbHdr += sizeof(DWORD)*3;
996                 else
997                 if ( lpbiOut->bmiHeader.biBitCount <= 8 )
998                 {
999                         if ( lpbiOut->bmiHeader.biClrUsed == 0 )
1000                                 cbHdr += sizeof(RGBQUAD) * (1<<lpbiOut->bmiHeader.biBitCount);
1001                         else
1002                                 cbHdr += sizeof(RGBQUAD) * lpbiOut->bmiHeader.biClrUsed;
1003                 }
1004         }
1005         else
1006         {
1007                 TRACE( "get format\n" );
1008
1009                 cbHdr = ICDecompressGetFormatSize(hic,lpbiIn);
1010                 if ( cbHdr < sizeof(BITMAPINFOHEADER) )
1011                         goto err;
1012                 pHdr = (BYTE*)HeapAlloc(GetProcessHeap(),0,cbHdr+sizeof(RGBQUAD)*256);
1013                 if ( pHdr == NULL )
1014                         goto err;
1015                 ZeroMemory( pHdr, cbHdr+sizeof(RGBQUAD)*256 );
1016                 if ( ICDecompressGetFormat( hic, lpbiIn, (BITMAPINFO*)pHdr ) != ICERR_OK )
1017                         goto err;
1018                 lpbiOut = (BITMAPINFO*)pHdr;
1019                 if ( lpbiOut->bmiHeader.biBitCount <= 8 &&
1020                          ICDecompressGetPalette( hic, lpbiIn, lpbiOut ) != ICERR_OK &&
1021                          lpbiIn->bmiHeader.biBitCount == lpbiOut->bmiHeader.biBitCount )
1022                 {
1023                         if ( lpbiIn->bmiHeader.biClrUsed == 0 )
1024                                 memcpy( lpbiOut->bmiColors, lpbiIn->bmiColors, sizeof(RGBQUAD)*(1<<lpbiOut->bmiHeader.biBitCount) );
1025                         else
1026                                 memcpy( lpbiOut->bmiColors, lpbiIn->bmiColors, sizeof(RGBQUAD)*lpbiIn->bmiHeader.biClrUsed );
1027                 }
1028                 if ( lpbiOut->bmiHeader.biBitCount <= 8 &&
1029                          lpbiOut->bmiHeader.biClrUsed == 0 )
1030                         lpbiOut->bmiHeader.biClrUsed = 1<<lpbiOut->bmiHeader.biBitCount;
1031
1032                 lpbiOut->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
1033                 cbHdr = sizeof(BITMAPINFOHEADER) + sizeof(RGBQUAD)*lpbiOut->bmiHeader.biClrUsed;
1034         }
1035
1036         biSizeImage = lpbiOut->bmiHeader.biSizeImage;
1037         if ( biSizeImage == 0 )
1038                 biSizeImage = ((((lpbiOut->bmiHeader.biWidth * lpbiOut->bmiHeader.biBitCount + 7) >> 3) + 3) & (~3)) * abs(lpbiOut->bmiHeader.biHeight);
1039
1040         TRACE( "call ICDecompressBegin\n" );
1041
1042         if ( ICDecompressBegin( hic, lpbiIn, lpbiOut ) != ICERR_OK )
1043                 goto err;
1044         bInDecompress = TRUE;
1045
1046         TRACE( "cbHdr %ld, biSizeImage %ld\n", cbHdr, biSizeImage );
1047
1048         hMem = GlobalAlloc( GMEM_MOVEABLE|GMEM_ZEROINIT, cbHdr + biSizeImage );
1049         if ( hMem == NULL )
1050         {
1051                 WARN( "out of memory\n" );
1052                 goto err;
1053         }
1054         pMem = (BYTE*)GlobalLock( hMem );
1055         if ( pMem == NULL )
1056                 goto err;
1057         memcpy( pMem, lpbiOut, cbHdr );
1058
1059         TRACE( "call ICDecompress\n" );
1060         if ( ICDecompress( hic, 0, &lpbiIn->bmiHeader, lpBits, &lpbiOut->bmiHeader, pMem+cbHdr ) != ICERR_OK )
1061                 goto err;
1062
1063         bSucceeded = TRUE;
1064 err:
1065         if ( bInDecompress )
1066                 ICDecompressEnd( hic );
1067         if ( bReleaseIC )
1068                 ICClose(hic);
1069         if ( pHdr != NULL )
1070                 HeapFree(GetProcessHeap(),0,pHdr);
1071         if ( pMem != NULL )
1072                 GlobalUnlock( hMem );
1073         if ( !bSucceeded && hMem != NULL )
1074         {
1075                 GlobalFree(hMem); hMem = NULL;
1076         }
1077
1078         return (HANDLE)hMem;
1079 }
1080
1081 static BOOL GetFileNamePreview(LPVOID lpofn,BOOL bSave,BOOL bUnicode)
1082 {
1083   CHAR    szFunctionName[20];
1084   BOOL    (*fnGetFileName)(LPVOID);
1085   HMODULE hComdlg32;
1086   BOOL    ret;
1087
1088   FIXME("(%p,%d,%d), semi-stub!\n",lpofn,bSave,bUnicode);
1089
1090   lstrcpyA(szFunctionName, (bSave ? "GetSaveFileName" : "GetOpenFileName"));
1091   lstrcatA(szFunctionName, (bUnicode ? "W" : "A"));
1092
1093   hComdlg32 = LoadLibraryA("COMDLG32.DLL");
1094   if (hComdlg32 == NULL)
1095     return FALSE;
1096
1097   fnGetFileName = (LPVOID)GetProcAddress(hComdlg32, szFunctionName);
1098   if (fnGetFileName == NULL)
1099     return FALSE;
1100
1101   /* FIXME: need to add OFN_ENABLEHOOK and our own handler */
1102   ret = fnGetFileName(lpofn);
1103
1104   FreeLibrary(hComdlg32);
1105   return ret;
1106 }
1107
1108 /***********************************************************************
1109  *              GetOpenFileNamePreviewA [MSVFW32.@]
1110  */
1111 BOOL WINAPI GetOpenFileNamePreviewA(LPOPENFILENAMEA lpofn)
1112 {
1113   FIXME("(%p), semi-stub!\n", lpofn);
1114
1115   return GetFileNamePreview(lpofn, FALSE, FALSE);
1116 }
1117
1118 /***********************************************************************
1119  *              GetOpenFileNamePreviewW [MSVFW32.@]
1120  */
1121 BOOL WINAPI GetOpenFileNamePreviewW(LPOPENFILENAMEW lpofn)
1122 {
1123   FIXME("(%p), semi-stub!\n", lpofn);
1124
1125   return GetFileNamePreview(lpofn, FALSE, TRUE);
1126 }
1127
1128 /***********************************************************************
1129  *              GetSaveFileNamePreviewA [MSVFW32.@]
1130  */
1131 BOOL WINAPI GetSaveFileNamePreviewA(LPOPENFILENAMEA lpofn)
1132 {
1133   FIXME("(%p), semi-stub!\n", lpofn);
1134
1135   return GetFileNamePreview(lpofn, TRUE, FALSE);
1136 }
1137
1138 /***********************************************************************
1139  *              GetSaveFileNamePreviewW [MSVFW32.@]
1140  */
1141 BOOL WINAPI GetSaveFileNamePreviewW(LPOPENFILENAMEW lpofn)
1142 {
1143   FIXME("(%p), semi-stub!\n", lpofn);
1144
1145   return GetFileNamePreview(lpofn, TRUE, TRUE);
1146 }