1 /* -*- tab-width: 8; c-basic-offset: 4 -*- */
5 * Copyright 1998, 1999 Eric Kohl
6 * Copyright 1999 Eric Pouech
7 * Copyright 2005 Dimitrie O. Paun
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public
11 * License as published by the Free Software Foundation; either
12 * version 2.1 of the License, or (at your option) any later version.
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Lesser General Public License for more details.
19 * You should have received a copy of the GNU Lesser General Public
20 * License along with this library; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
25 * This code was audited for completeness against the documented features
26 * of Comctl32.dll version 6.0 on Mar. 15, 2005, by Dimitrie O. Paun.
28 * Unless otherwise noted, we believe this code to be complete, as per
29 * the specification mentioned above.
30 * If you discover missing features, or bugs, please note them below.
33 * - check for the 'rec ' list in some AVI files
47 #include "wine/debug.h"
49 WINE_DEFAULT_DEBUG_CHANNEL(animate);
53 HIC (WINAPI *fnICOpen)(DWORD, DWORD, UINT);
54 LRESULT (WINAPI *fnICClose)(HIC);
55 LRESULT (WINAPI *fnICSendMessage)(HIC, UINT, DWORD_PTR, DWORD_PTR);
56 DWORD (WINAPIV *fnICDecompress)(HIC,DWORD,LPBITMAPINFOHEADER,LPVOID,LPBITMAPINFOHEADER,LPVOID);
61 /* reference to input stream (file or resource) */
63 HMMIO hMMio; /* handle to mmio stream */
67 /* information on the loaded AVI file */
70 LPBITMAPINFOHEADER inbih;
72 /* data for the decompressor */
74 LPBITMAPINFOHEADER outbih;
77 /* data for the background mechanism */
83 /* data for playing the file */
88 /* transparency info*/
89 COLORREF transparentColor;
94 #define ANIMATE_COLOR_NONE 0xffffffff
96 static void ANIMATE_Notify(const ANIMATE_INFO *infoPtr, UINT notif)
98 SendMessageW(infoPtr->hwndNotify, WM_COMMAND,
99 MAKEWPARAM(GetDlgCtrlID(infoPtr->hwndSelf), notif),
100 (LPARAM)infoPtr->hwndSelf);
103 static BOOL ANIMATE_LoadResW(ANIMATE_INFO *infoPtr, HINSTANCE hInst, LPCWSTR lpName)
105 static const WCHAR aviW[] = { 'A', 'V', 'I', 0 };
110 hrsrc = FindResourceW(hInst, lpName, aviW);
114 infoPtr->hRes = LoadResource(hInst, hrsrc);
118 lpAvi = LockResource(infoPtr->hRes);
122 memset(&mminfo, 0, sizeof(mminfo));
123 mminfo.fccIOProc = FOURCC_MEM;
124 mminfo.pchBuffer = (LPSTR)lpAvi;
125 mminfo.cchBuffer = SizeofResource(hInst, hrsrc);
126 infoPtr->hMMio = mmioOpenW(NULL, &mminfo, MMIO_READ);
129 FreeResource(infoPtr->hRes);
137 static BOOL ANIMATE_LoadFileW(ANIMATE_INFO *infoPtr, LPWSTR lpName)
139 infoPtr->hMMio = mmioOpenW(lpName, 0, MMIO_ALLOCBUF | MMIO_READ | MMIO_DENYWRITE);
141 if(!infoPtr->hMMio) return FALSE;
146 static BOOL ANIMATE_DoStop(ANIMATE_INFO *infoPtr)
148 BOOL stopped = FALSE;
150 EnterCriticalSection(&infoPtr->cs);
152 /* should stop playing */
153 if (infoPtr->hThread)
155 HANDLE handle = infoPtr->hThread;
157 TRACE("stopping animation thread\n");
158 infoPtr->hThread = 0;
159 SetEvent( infoPtr->hStopEvent );
161 if (infoPtr->threadId != GetCurrentThreadId())
163 LeaveCriticalSection(&infoPtr->cs); /* leave it a chance to run */
164 WaitForSingleObject( handle, INFINITE );
165 TRACE("animation thread stopped\n");
166 EnterCriticalSection(&infoPtr->cs);
169 CloseHandle( handle );
170 CloseHandle( infoPtr->hStopEvent );
171 infoPtr->hStopEvent = 0;
174 if (infoPtr->uTimer) {
175 KillTimer(infoPtr->hwndSelf, infoPtr->uTimer);
180 LeaveCriticalSection(&infoPtr->cs);
183 ANIMATE_Notify(infoPtr, ACN_STOP);
189 static void ANIMATE_Free(ANIMATE_INFO *infoPtr)
191 if (infoPtr->hMMio) {
192 ANIMATE_DoStop(infoPtr);
193 mmioClose(infoPtr->hMMio, 0);
195 FreeResource(infoPtr->hRes);
198 Free (infoPtr->lpIndex);
199 infoPtr->lpIndex = NULL;
201 fnIC.fnICClose(infoPtr->hic);
204 Free (infoPtr->inbih);
205 infoPtr->inbih = NULL;
206 Free (infoPtr->outbih);
207 infoPtr->outbih = NULL;
208 Free (infoPtr->indata);
209 infoPtr->indata = NULL;
210 Free (infoPtr->outdata);
211 infoPtr->outdata = NULL;
212 if( infoPtr->hbmPrevFrame )
214 DeleteObject(infoPtr->hbmPrevFrame);
215 infoPtr->hbmPrevFrame = 0;
218 memset(&infoPtr->mah, 0, sizeof(infoPtr->mah));
219 memset(&infoPtr->ash, 0, sizeof(infoPtr->ash));
220 infoPtr->nFromFrame = infoPtr->nToFrame = infoPtr->nLoop = infoPtr->currFrame = 0;
222 infoPtr->transparentColor = ANIMATE_COLOR_NONE;
225 static void ANIMATE_TransparentBlt(ANIMATE_INFO const *infoPtr, HDC hdcDest, HDC hdcSource)
231 /* create a transparency mask */
232 hdcMask = CreateCompatibleDC(hdcDest);
233 hbmMask = CreateBitmap(infoPtr->inbih->biWidth, infoPtr->inbih->biHeight, 1,1,NULL);
234 hbmOld = SelectObject(hdcMask, hbmMask);
236 SetBkColor(hdcSource,infoPtr->transparentColor);
237 BitBlt(hdcMask,0,0,infoPtr->inbih->biWidth, infoPtr->inbih->biHeight,hdcSource,0,0,SRCCOPY);
239 /* mask the source bitmap */
240 SetBkColor(hdcSource, RGB(0,0,0));
241 SetTextColor(hdcSource, RGB(255,255,255));
242 BitBlt(hdcSource, 0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight, hdcMask, 0, 0, SRCAND);
244 /* mask the destination bitmap */
245 SetBkColor(hdcDest, RGB(255,255,255));
246 SetTextColor(hdcDest, RGB(0,0,0));
247 BitBlt(hdcDest, 0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight, hdcMask, 0, 0, SRCAND);
249 /* combine source and destination */
250 BitBlt(hdcDest,0,0,infoPtr->inbih->biWidth, infoPtr->inbih->biHeight,hdcSource,0,0,SRCPAINT);
252 SelectObject(hdcMask, hbmOld);
253 DeleteObject(hbmMask);
257 static BOOL ANIMATE_PaintFrame(ANIMATE_INFO* infoPtr, HDC hDC)
259 void const *pBitmapData;
260 BITMAPINFO const *pBitmapInfo;
268 if (!hDC || !infoPtr->inbih)
273 pBitmapData = infoPtr->outdata;
274 pBitmapInfo = (LPBITMAPINFO)infoPtr->outbih;
276 nWidth = infoPtr->outbih->biWidth;
277 nHeight = infoPtr->outbih->biHeight;
281 pBitmapData = infoPtr->indata;
282 pBitmapInfo = (LPBITMAPINFO)infoPtr->inbih;
284 nWidth = infoPtr->inbih->biWidth;
285 nHeight = infoPtr->inbih->biHeight;
288 if(!infoPtr->hbmPrevFrame)
290 infoPtr->hbmPrevFrame=CreateCompatibleBitmap(hDC, nWidth,nHeight );
293 hdcMem = CreateCompatibleDC(hDC);
294 hbmOld = SelectObject(hdcMem, infoPtr->hbmPrevFrame);
296 SetDIBits(hdcMem, infoPtr->hbmPrevFrame, 0, nHeight, pBitmapData, pBitmapInfo, DIB_RGB_COLORS);
299 * we need to get the transparent color even without ACS_TRANSPARENT,
300 * because the style can be changed later on and the color should always
301 * be obtained in the first frame
303 if(infoPtr->transparentColor == ANIMATE_COLOR_NONE)
305 infoPtr->transparentColor = GetPixel(hdcMem,0,0);
308 if(infoPtr->dwStyle & ACS_TRANSPARENT)
310 HDC hdcFinal = CreateCompatibleDC(hDC);
311 HBITMAP hbmFinal = CreateCompatibleBitmap(hDC,nWidth, nHeight);
312 HBITMAP hbmOld2 = SelectObject(hdcFinal, hbmFinal);
318 rect.bottom = nHeight;
320 if(!infoPtr->hbrushBG)
321 infoPtr->hbrushBG = GetCurrentObject(hDC, OBJ_BRUSH);
323 FillRect(hdcFinal, &rect, infoPtr->hbrushBG);
324 ANIMATE_TransparentBlt(infoPtr, hdcFinal, hdcMem);
326 SelectObject(hdcFinal, hbmOld2);
327 SelectObject(hdcMem, hbmFinal);
329 DeleteObject(infoPtr->hbmPrevFrame);
330 infoPtr->hbmPrevFrame = hbmFinal;
333 if (infoPtr->dwStyle & ACS_CENTER)
337 GetWindowRect(infoPtr->hwndSelf, &rect);
338 nOffsetX = ((rect.right - rect.left) - nWidth)/2;
339 nOffsetY = ((rect.bottom - rect.top) - nHeight)/2;
341 BitBlt(hDC, nOffsetX, nOffsetY, nWidth, nHeight, hdcMem, 0, 0, SRCCOPY);
343 SelectObject(hdcMem, hbmOld);
348 static BOOL ANIMATE_DrawFrame(ANIMATE_INFO *infoPtr)
352 TRACE("Drawing frame %d (loop %d)\n", infoPtr->currFrame, infoPtr->nLoop);
354 mmioSeek(infoPtr->hMMio, infoPtr->lpIndex[infoPtr->currFrame], SEEK_SET);
355 mmioRead(infoPtr->hMMio, infoPtr->indata, infoPtr->ash.dwSuggestedBufferSize);
358 fnIC.fnICDecompress(infoPtr->hic, 0, infoPtr->inbih, infoPtr->indata,
359 infoPtr->outbih, infoPtr->outdata) != ICERR_OK) {
360 WARN("Decompression error\n");
364 if ((hDC = GetDC(infoPtr->hwndSelf)) != 0) {
365 ANIMATE_PaintFrame(infoPtr, hDC);
366 ReleaseDC(infoPtr->hwndSelf, hDC);
369 if (infoPtr->currFrame++ >= infoPtr->nToFrame) {
370 infoPtr->currFrame = infoPtr->nFromFrame;
371 if (infoPtr->nLoop != -1) {
372 if (--infoPtr->nLoop == 0) {
373 ANIMATE_DoStop(infoPtr);
381 static LRESULT ANIMATE_Timer(ANIMATE_INFO *infoPtr)
383 /* FIXME: we should pass the hDC instead of 0 to WM_CTLCOLORSTATIC */
384 if (infoPtr->dwStyle & ACS_TRANSPARENT)
385 infoPtr->hbrushBG = (HBRUSH)SendMessageW(infoPtr->hwndNotify,
387 0, (LPARAM)infoPtr->hwndSelf);
388 EnterCriticalSection(&infoPtr->cs);
389 ANIMATE_DrawFrame(infoPtr);
390 LeaveCriticalSection(&infoPtr->cs);
395 static DWORD CALLBACK ANIMATE_AnimationThread(LPVOID ptr_)
397 ANIMATE_INFO *infoPtr = (ANIMATE_INFO *)ptr_;
403 if (infoPtr->dwStyle & ACS_TRANSPARENT)
404 infoPtr->hbrushBG = (HBRUSH)SendMessageW(infoPtr->hwndNotify,
406 0, (LPARAM)infoPtr->hwndSelf);
407 EnterCriticalSection(&infoPtr->cs);
408 ANIMATE_DrawFrame(infoPtr);
409 timeout = infoPtr->mah.dwMicroSecPerFrame;
410 event = infoPtr->hStopEvent;
411 LeaveCriticalSection(&infoPtr->cs);
413 /* time is in microseconds, we should convert it to milliseconds */
414 if ((event == 0) || WaitForSingleObject( event, (timeout+500)/1000) == WAIT_OBJECT_0)
420 static LRESULT ANIMATE_Play(ANIMATE_INFO *infoPtr, UINT cRepeat, WORD wFrom, WORD wTo)
426 if (infoPtr->hThread || infoPtr->uTimer) {
427 TRACE("Already playing\n");
431 infoPtr->nFromFrame = wFrom;
432 infoPtr->nToFrame = wTo;
433 infoPtr->nLoop = cRepeat;
435 if (infoPtr->nToFrame == 0xFFFF)
436 infoPtr->nToFrame = infoPtr->mah.dwTotalFrames - 1;
438 TRACE("(repeat=%d from=%d to=%d);\n",
439 infoPtr->nLoop, infoPtr->nFromFrame, infoPtr->nToFrame);
441 if (infoPtr->nFromFrame >= infoPtr->mah.dwTotalFrames &&
442 (SHORT)infoPtr->nFromFrame < 0)
443 infoPtr->nFromFrame = 0;
445 if (infoPtr->nFromFrame > infoPtr->nToFrame ||
446 infoPtr->nToFrame >= infoPtr->mah.dwTotalFrames)
449 infoPtr->currFrame = infoPtr->nFromFrame;
451 /* seek - doesn't need to start a thread or set a timer and neither
452 * does it send a notification */
453 if (infoPtr->nFromFrame == infoPtr->nToFrame)
455 if (infoPtr->dwStyle & ACS_TRANSPARENT)
456 infoPtr->hbrushBG = (HBRUSH)SendMessageW(infoPtr->hwndNotify,
458 0, (LPARAM)infoPtr->hwndSelf);
459 ANIMATE_DrawFrame(infoPtr);
463 if (infoPtr->dwStyle & ACS_TIMER)
465 TRACE("Using a timer\n");
466 /* create a timer to display AVI */
467 infoPtr->uTimer = SetTimer(infoPtr->hwndSelf, 1,
468 infoPtr->mah.dwMicroSecPerFrame / 1000, NULL);
472 if(infoPtr->dwStyle & ACS_TRANSPARENT)
473 infoPtr->hbrushBG = (HBRUSH)SendMessageW(infoPtr->hwndNotify,
474 WM_CTLCOLORSTATIC, 0,
475 (LPARAM)infoPtr->hwndSelf);
477 TRACE("Using an animation thread\n");
478 infoPtr->hStopEvent = CreateEventW( NULL, TRUE, FALSE, NULL );
479 infoPtr->hThread = CreateThread(0, 0, ANIMATE_AnimationThread,
480 (LPVOID)infoPtr, 0, &infoPtr->threadId);
481 if(!infoPtr->hThread) return FALSE;
485 ANIMATE_Notify(infoPtr, ACN_START);
491 static BOOL ANIMATE_GetAviInfo(ANIMATE_INFO *infoPtr)
500 if (mmioDescend(infoPtr->hMMio, &ckMainRIFF, NULL, 0) != 0) {
501 WARN("Can't find 'RIFF' chunk\n");
505 if ((ckMainRIFF.ckid != FOURCC_RIFF) ||
506 (ckMainRIFF.fccType != mmioFOURCC('A', 'V', 'I', ' '))) {
507 WARN("Can't find 'AVI ' chunk\n");
511 mmckHead.fccType = mmioFOURCC('h', 'd', 'r', 'l');
512 if (mmioDescend(infoPtr->hMMio, &mmckHead, &ckMainRIFF, MMIO_FINDLIST) != 0) {
513 WARN("Can't find 'hdrl' list\n");
517 mmckInfo.ckid = mmioFOURCC('a', 'v', 'i', 'h');
518 if (mmioDescend(infoPtr->hMMio, &mmckInfo, &mmckHead, MMIO_FINDCHUNK) != 0) {
519 WARN("Can't find 'avih' chunk\n");
523 mmioRead(infoPtr->hMMio, (LPSTR)&infoPtr->mah, sizeof(infoPtr->mah));
525 TRACE("mah.dwMicroSecPerFrame=%d\n", infoPtr->mah.dwMicroSecPerFrame);
526 TRACE("mah.dwMaxBytesPerSec=%d\n", infoPtr->mah.dwMaxBytesPerSec);
527 TRACE("mah.dwPaddingGranularity=%d\n", infoPtr->mah.dwPaddingGranularity);
528 TRACE("mah.dwFlags=%d\n", infoPtr->mah.dwFlags);
529 TRACE("mah.dwTotalFrames=%d\n", infoPtr->mah.dwTotalFrames);
530 TRACE("mah.dwInitialFrames=%d\n", infoPtr->mah.dwInitialFrames);
531 TRACE("mah.dwStreams=%d\n", infoPtr->mah.dwStreams);
532 TRACE("mah.dwSuggestedBufferSize=%d\n", infoPtr->mah.dwSuggestedBufferSize);
533 TRACE("mah.dwWidth=%d\n", infoPtr->mah.dwWidth);
534 TRACE("mah.dwHeight=%d\n", infoPtr->mah.dwHeight);
536 mmioAscend(infoPtr->hMMio, &mmckInfo, 0);
538 mmckList.fccType = mmioFOURCC('s', 't', 'r', 'l');
539 if (mmioDescend(infoPtr->hMMio, &mmckList, &mmckHead, MMIO_FINDLIST) != 0) {
540 WARN("Can't find 'strl' list\n");
544 mmckInfo.ckid = mmioFOURCC('s', 't', 'r', 'h');
545 if (mmioDescend(infoPtr->hMMio, &mmckInfo, &mmckList, MMIO_FINDCHUNK) != 0) {
546 WARN("Can't find 'strh' chunk\n");
550 mmioRead(infoPtr->hMMio, (LPSTR)&infoPtr->ash, sizeof(infoPtr->ash));
552 TRACE("ash.fccType='%c%c%c%c'\n", LOBYTE(LOWORD(infoPtr->ash.fccType)),
553 HIBYTE(LOWORD(infoPtr->ash.fccType)),
554 LOBYTE(HIWORD(infoPtr->ash.fccType)),
555 HIBYTE(HIWORD(infoPtr->ash.fccType)));
556 TRACE("ash.fccHandler='%c%c%c%c'\n", LOBYTE(LOWORD(infoPtr->ash.fccHandler)),
557 HIBYTE(LOWORD(infoPtr->ash.fccHandler)),
558 LOBYTE(HIWORD(infoPtr->ash.fccHandler)),
559 HIBYTE(HIWORD(infoPtr->ash.fccHandler)));
560 TRACE("ash.dwFlags=%d\n", infoPtr->ash.dwFlags);
561 TRACE("ash.wPriority=%d\n", infoPtr->ash.wPriority);
562 TRACE("ash.wLanguage=%d\n", infoPtr->ash.wLanguage);
563 TRACE("ash.dwInitialFrames=%d\n", infoPtr->ash.dwInitialFrames);
564 TRACE("ash.dwScale=%d\n", infoPtr->ash.dwScale);
565 TRACE("ash.dwRate=%d\n", infoPtr->ash.dwRate);
566 TRACE("ash.dwStart=%d\n", infoPtr->ash.dwStart);
567 TRACE("ash.dwLength=%d\n", infoPtr->ash.dwLength);
568 TRACE("ash.dwSuggestedBufferSize=%d\n", infoPtr->ash.dwSuggestedBufferSize);
569 TRACE("ash.dwQuality=%d\n", infoPtr->ash.dwQuality);
570 TRACE("ash.dwSampleSize=%d\n", infoPtr->ash.dwSampleSize);
571 TRACE("ash.rcFrame=(%d,%d,%d,%d)\n", infoPtr->ash.rcFrame.top, infoPtr->ash.rcFrame.left,
572 infoPtr->ash.rcFrame.bottom, infoPtr->ash.rcFrame.right);
574 mmioAscend(infoPtr->hMMio, &mmckInfo, 0);
576 mmckInfo.ckid = mmioFOURCC('s', 't', 'r', 'f');
577 if (mmioDescend(infoPtr->hMMio, &mmckInfo, &mmckList, MMIO_FINDCHUNK) != 0) {
578 WARN("Can't find 'strh' chunk\n");
582 infoPtr->inbih = Alloc(mmckInfo.cksize);
583 if (!infoPtr->inbih) {
584 WARN("Can't alloc input BIH\n");
588 mmioRead(infoPtr->hMMio, (LPSTR)infoPtr->inbih, mmckInfo.cksize);
590 TRACE("bih.biSize=%d\n", infoPtr->inbih->biSize);
591 TRACE("bih.biWidth=%d\n", infoPtr->inbih->biWidth);
592 TRACE("bih.biHeight=%d\n", infoPtr->inbih->biHeight);
593 TRACE("bih.biPlanes=%d\n", infoPtr->inbih->biPlanes);
594 TRACE("bih.biBitCount=%d\n", infoPtr->inbih->biBitCount);
595 TRACE("bih.biCompression=%d\n", infoPtr->inbih->biCompression);
596 TRACE("bih.biSizeImage=%d\n", infoPtr->inbih->biSizeImage);
597 TRACE("bih.biXPelsPerMeter=%d\n", infoPtr->inbih->biXPelsPerMeter);
598 TRACE("bih.biYPelsPerMeter=%d\n", infoPtr->inbih->biYPelsPerMeter);
599 TRACE("bih.biClrUsed=%d\n", infoPtr->inbih->biClrUsed);
600 TRACE("bih.biClrImportant=%d\n", infoPtr->inbih->biClrImportant);
602 mmioAscend(infoPtr->hMMio, &mmckInfo, 0);
604 mmioAscend(infoPtr->hMMio, &mmckList, 0);
607 /* an AVI has 0 or 1 video stream, and to be animated should not contain
608 * an audio stream, so only one strl is allowed
610 mmckList.fccType = mmioFOURCC('s', 't', 'r', 'l');
611 if (mmioDescend(infoPtr->hMMio, &mmckList, &mmckHead, MMIO_FINDLIST) == 0) {
612 WARN("There should be a single 'strl' list\n");
617 mmioAscend(infoPtr->hMMio, &mmckHead, 0);
619 /* no need to read optional JUNK chunk */
621 mmckList.fccType = mmioFOURCC('m', 'o', 'v', 'i');
622 if (mmioDescend(infoPtr->hMMio, &mmckList, &ckMainRIFF, MMIO_FINDLIST) != 0) {
623 WARN("Can't find 'movi' list\n");
627 /* FIXME: should handle the 'rec ' LIST when present */
629 infoPtr->lpIndex = Alloc(infoPtr->mah.dwTotalFrames * sizeof(DWORD));
630 if (!infoPtr->lpIndex)
633 numFrame = insize = 0;
634 while (mmioDescend(infoPtr->hMMio, &mmckInfo, &mmckList, 0) == 0 &&
635 numFrame < infoPtr->mah.dwTotalFrames) {
636 infoPtr->lpIndex[numFrame] = mmckInfo.dwDataOffset;
637 if (insize < mmckInfo.cksize)
638 insize = mmckInfo.cksize;
640 mmioAscend(infoPtr->hMMio, &mmckInfo, 0);
642 if (numFrame != infoPtr->mah.dwTotalFrames) {
643 WARN("Found %d frames (/%d)\n", numFrame, infoPtr->mah.dwTotalFrames);
646 if (insize > infoPtr->ash.dwSuggestedBufferSize) {
647 WARN("insize=%d suggestedSize=%d\n", insize, infoPtr->ash.dwSuggestedBufferSize);
648 infoPtr->ash.dwSuggestedBufferSize = insize;
651 infoPtr->indata = Alloc(infoPtr->ash.dwSuggestedBufferSize);
652 if (!infoPtr->indata)
659 static BOOL ANIMATE_GetAviCodec(ANIMATE_INFO *infoPtr)
663 /* check uncompressed AVI */
664 if ((infoPtr->ash.fccHandler == mmioFOURCC('D', 'I', 'B', ' ')) ||
665 (infoPtr->ash.fccHandler == mmioFOURCC('R', 'L', 'E', ' ')) ||
666 (infoPtr->ash.fccHandler == mmioFOURCC(0, 0, 0, 0)))
672 /* try to get a decompressor for that type */
673 infoPtr->hic = fnIC.fnICOpen(ICTYPE_VIDEO, infoPtr->ash.fccHandler, ICMODE_DECOMPRESS);
675 WARN("Can't load codec for the file\n");
679 outSize = fnIC.fnICSendMessage(infoPtr->hic, ICM_DECOMPRESS_GET_FORMAT,
680 (DWORD_PTR)infoPtr->inbih, 0L);
682 infoPtr->outbih = Alloc(outSize);
683 if (!infoPtr->outbih)
686 if (fnIC.fnICSendMessage(infoPtr->hic, ICM_DECOMPRESS_GET_FORMAT,
687 (DWORD_PTR)infoPtr->inbih, (DWORD_PTR)infoPtr->outbih) != ICERR_OK)
689 WARN("Can't get output BIH\n");
693 infoPtr->outdata = Alloc(infoPtr->outbih->biSizeImage);
694 if (!infoPtr->outdata)
697 if (fnIC.fnICSendMessage(infoPtr->hic, ICM_DECOMPRESS_BEGIN,
698 (DWORD_PTR)infoPtr->inbih, (DWORD_PTR)infoPtr->outbih) != ICERR_OK) {
699 WARN("Can't begin decompression\n");
707 static BOOL ANIMATE_OpenW(ANIMATE_INFO *infoPtr, HINSTANCE hInstance, LPWSTR lpszName)
709 ANIMATE_Free(infoPtr);
713 TRACE("Closing avi!\n");
714 /* installer of thebat! v1.62 requires FALSE here */
715 return (infoPtr->hMMio != 0);
719 hInstance = (HINSTANCE)GetWindowLongPtrW(infoPtr->hwndSelf, GWLP_HINSTANCE);
721 TRACE("(%s)\n", debugstr_w(lpszName));
723 if (HIWORD(lpszName))
725 if (!ANIMATE_LoadResW(infoPtr, hInstance, lpszName))
727 TRACE("No AVI resource found!\n");
728 if (!ANIMATE_LoadFileW(infoPtr, lpszName))
730 WARN("No AVI file found!\n");
737 if (!ANIMATE_LoadResW(infoPtr, hInstance, lpszName))
739 WARN("No AVI resource found!\n");
744 if (!ANIMATE_GetAviInfo(infoPtr))
746 WARN("Can't get AVI information\n");
747 ANIMATE_Free(infoPtr);
751 if (!ANIMATE_GetAviCodec(infoPtr))
753 WARN("Can't get AVI Codec\n");
754 ANIMATE_Free(infoPtr);
758 if (!(infoPtr->dwStyle & ACS_CENTER))
759 SetWindowPos(infoPtr->hwndSelf, 0, 0, 0, infoPtr->mah.dwWidth, infoPtr->mah.dwHeight,
760 SWP_NOACTIVATE | SWP_NOMOVE | SWP_NOZORDER);
762 if (infoPtr->dwStyle & ACS_AUTOPLAY)
763 return ANIMATE_Play(infoPtr, -1, 0, infoPtr->mah.dwTotalFrames - 1);
769 static BOOL ANIMATE_OpenA(ANIMATE_INFO *infoPtr, HINSTANCE hInstance, LPSTR lpszName)
775 if (!HIWORD(lpszName))
776 return ANIMATE_OpenW(infoPtr, hInstance, (LPWSTR)lpszName);
778 len = MultiByteToWideChar(CP_ACP, 0, lpszName, -1, NULL, 0);
779 lpwszName = Alloc(len * sizeof(WCHAR));
780 if (!lpwszName) return FALSE;
781 MultiByteToWideChar(CP_ACP, 0, lpszName, -1, lpwszName, len);
783 result = ANIMATE_OpenW(infoPtr, hInstance, lpwszName);
789 static BOOL ANIMATE_Stop(ANIMATE_INFO *infoPtr)
795 ANIMATE_DoStop(infoPtr);
800 static BOOL ANIMATE_Create(HWND hWnd, const CREATESTRUCTW *lpcs)
802 static const WCHAR msvfw32W[] = { 'm', 's', 'v', 'f', 'w', '3', '2', '.', 'd', 'l', 'l', 0 };
803 ANIMATE_INFO *infoPtr;
807 fnIC.hModule = LoadLibraryW(msvfw32W);
808 if (!fnIC.hModule) return FALSE;
810 fnIC.fnICOpen = (void*)GetProcAddress(fnIC.hModule, "ICOpen");
811 fnIC.fnICClose = (void*)GetProcAddress(fnIC.hModule, "ICClose");
812 fnIC.fnICSendMessage = (void*)GetProcAddress(fnIC.hModule, "ICSendMessage");
813 fnIC.fnICDecompress = (void*)GetProcAddress(fnIC.hModule, "ICDecompress");
816 /* allocate memory for info structure */
817 infoPtr = (ANIMATE_INFO *)Alloc(sizeof(ANIMATE_INFO));
818 if (!infoPtr) return FALSE;
820 /* store crossref hWnd <-> info structure */
821 SetWindowLongPtrW(hWnd, 0, (DWORD_PTR)infoPtr);
822 infoPtr->hwndSelf = hWnd;
823 infoPtr->hwndNotify = lpcs->hwndParent;
824 infoPtr->transparentColor = ANIMATE_COLOR_NONE;
825 infoPtr->hbmPrevFrame = 0;
826 infoPtr->dwStyle = lpcs->style;
828 TRACE("Animate style=0x%08x, parent=%p\n", infoPtr->dwStyle, infoPtr->hwndNotify);
830 InitializeCriticalSection(&infoPtr->cs);
831 infoPtr->cs.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": ANIMATE_INFO*->cs");
837 static LRESULT ANIMATE_Destroy(ANIMATE_INFO *infoPtr)
840 ANIMATE_Free(infoPtr);
842 /* free animate info data */
843 SetWindowLongPtrW(infoPtr->hwndSelf, 0, 0);
845 infoPtr->cs.DebugInfo->Spare[0] = 0;
846 DeleteCriticalSection(&infoPtr->cs);
853 static BOOL ANIMATE_EraseBackground(ANIMATE_INFO const *infoPtr, HDC hdc)
858 if(infoPtr->dwStyle & ACS_TRANSPARENT)
860 hBrush = (HBRUSH)SendMessageW(infoPtr->hwndNotify, WM_CTLCOLORSTATIC,
861 (WPARAM)hdc, (LPARAM)infoPtr->hwndSelf);
864 GetClientRect(infoPtr->hwndSelf, &rect);
865 FillRect(hdc, &rect, hBrush ? hBrush : GetCurrentObject(hdc, OBJ_BRUSH));
871 static LRESULT ANIMATE_StyleChanged(ANIMATE_INFO *infoPtr, WPARAM wStyleType, const STYLESTRUCT *lpss)
873 TRACE("(styletype=%lx, styleOld=0x%08x, styleNew=0x%08x)\n",
874 wStyleType, lpss->styleOld, lpss->styleNew);
876 if (wStyleType != GWL_STYLE) return 0;
878 infoPtr->dwStyle = lpss->styleNew;
880 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
885 static LRESULT WINAPI ANIMATE_WindowProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
887 ANIMATE_INFO *infoPtr = (ANIMATE_INFO *)GetWindowLongPtrW(hWnd, 0);
889 TRACE("hwnd=%p msg=%x wparam=%lx lparam=%lx\n", hWnd, uMsg, wParam, lParam);
890 if (!infoPtr && (uMsg != WM_NCCREATE))
891 return DefWindowProcW(hWnd, uMsg, wParam, lParam);
895 return ANIMATE_OpenA(infoPtr, (HINSTANCE)wParam, (LPSTR)lParam);
898 return ANIMATE_OpenW(infoPtr, (HINSTANCE)wParam, (LPWSTR)lParam);
901 return ANIMATE_Play(infoPtr, (INT)wParam, LOWORD(lParam), HIWORD(lParam));
904 return ANIMATE_Stop(infoPtr);
907 ANIMATE_Free(infoPtr);
911 return ANIMATE_Create(hWnd, (LPCREATESTRUCTW)lParam);
914 return HTTRANSPARENT;
917 return ANIMATE_Destroy(infoPtr);
920 return ANIMATE_EraseBackground(infoPtr, (HDC)wParam);
922 case WM_STYLECHANGED:
923 return ANIMATE_StyleChanged(infoPtr, wParam, (LPSTYLESTRUCT)lParam);
926 return ANIMATE_Timer(infoPtr);
931 /* the animation has not decompressed
932 * (and displayed) the first frame yet, don't paint
934 if (!infoPtr->hbmPrevFrame)
936 /* default paint handling */
937 return DefWindowProcW(hWnd, uMsg, wParam, lParam);
942 EnterCriticalSection(&infoPtr->cs);
943 ANIMATE_PaintFrame(infoPtr, (HDC)wParam);
944 LeaveCriticalSection(&infoPtr->cs);
949 HDC hDC = BeginPaint(infoPtr->hwndSelf, &ps);
951 EnterCriticalSection(&infoPtr->cs);
952 ANIMATE_PaintFrame(infoPtr, hDC);
953 LeaveCriticalSection(&infoPtr->cs);
955 EndPaint(infoPtr->hwndSelf, &ps);
961 if (infoPtr->dwStyle & ACS_CENTER)
962 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
963 return DefWindowProcW(hWnd, uMsg, wParam, lParam);
966 if ((uMsg >= WM_USER) && (uMsg < WM_APP))
967 ERR("unknown msg %04x wp=%08lx lp=%08lx\n", uMsg, wParam, lParam);
969 return DefWindowProcW(hWnd, uMsg, wParam, lParam);
974 void ANIMATE_Register(void)
978 ZeroMemory(&wndClass, sizeof(WNDCLASSW));
979 wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS;
980 wndClass.lpfnWndProc = ANIMATE_WindowProc;
981 wndClass.cbClsExtra = 0;
982 wndClass.cbWndExtra = sizeof(ANIMATE_INFO *);
983 wndClass.hCursor = LoadCursorW(0, (LPCWSTR)IDC_ARROW);
984 wndClass.hbrBackground = (HBRUSH)(COLOR_BTNFACE + 1);
985 wndClass.lpszClassName = ANIMATE_CLASSW;
987 RegisterClassW(&wndClass);
991 void ANIMATE_Unregister(void)
993 UnregisterClassW(ANIMATE_CLASSW, NULL);