?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Remove the obsolete pascal16 (replaced by pascal -ret16).
[wine/testsucceed.git] / dlls / msvideo / msvideo_main.c
blobd0f6ed185536967dc080e32a0d7ef6622981a4a1
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 }
Quick hack tree for wine patches julliard doesn't want to commit