917 lines
28 KiB
C
917 lines
28 KiB
C
/* -*- tab-width: 8; c-basic-offset: 4 -*- */
|
||
/*
|
||
* Animation control
|
||
*
|
||
* Copyright 1998, 1999 Eric Kohl
|
||
* 1999 Eric Pouech
|
||
*
|
||
* NOTES
|
||
* I will only improve this control once in a while.
|
||
* Eric <ekohl@abo.rhein-zeitung.de>
|
||
*
|
||
* TODO:
|
||
* - check for the 'rec ' list in some AVI files
|
||
* - implement some missing flags (ACS_TRANSPARENT)
|
||
* - protection between service thread and wndproc messages handling
|
||
* concurrent access to infoPtr
|
||
*/
|
||
|
||
|
||
#include "winbase.h"
|
||
#include "commctrl.h"
|
||
#include "vfw.h"
|
||
#include "mmsystem.h"
|
||
#include "services.h"
|
||
#include "debugtools.h"
|
||
|
||
DEFAULT_DEBUG_CHANNEL(animate);
|
||
|
||
typedef struct
|
||
{
|
||
/* pointer to msvideo functions. it's easier to put them here.
|
||
* to be correct, they should be defined on a per process basis, but
|
||
* this would required a per process storage. We're using a per object
|
||
* storage instead, which is not efficient on memory usage, but
|
||
* will lead to less bugs in the future
|
||
*/
|
||
HIC WINAPI (*fnICOpen)(DWORD, DWORD, UINT);
|
||
LRESULT WINAPI (*fnICClose)(HIC);
|
||
LRESULT WINAPI (*fnICSendMessage)(HIC, UINT, DWORD, DWORD);
|
||
DWORD WINAPIV (*fnICDecompress)(HIC,DWORD,LPBITMAPINFOHEADER,LPVOID,LPBITMAPINFOHEADER,LPVOID);
|
||
|
||
HMMIO WINAPI (*fnmmioOpenA)(LPSTR,MMIOINFO*,DWORD);
|
||
MMRESULT WINAPI (*fnmmioClose)(HMMIO,UINT);
|
||
UINT WINAPI (*fnmmioAscend)(HMMIO,MMCKINFO*,UINT);
|
||
UINT WINAPI (*fnmmioDescend)(HMMIO,MMCKINFO*,const MMCKINFO*,UINT);
|
||
LONG WINAPI (*fnmmioSeek)(HMMIO,LONG,INT);
|
||
LONG WINAPI (*fnmmioRead)(HMMIO,HPSTR,LONG);
|
||
|
||
/* reference to input stream (file or resource) */
|
||
HGLOBAL hRes;
|
||
HMMIO hMMio; /* handle to mmio stream */
|
||
HWND hWnd;
|
||
/* information on the loaded AVI file */
|
||
MainAVIHeader mah;
|
||
AVIStreamHeader ash;
|
||
LPBITMAPINFOHEADER inbih;
|
||
LPDWORD lpIndex;
|
||
/* data for the decompressor */
|
||
HIC hic;
|
||
LPBITMAPINFOHEADER outbih;
|
||
LPVOID indata;
|
||
LPVOID outdata;
|
||
/* data for the background mechanism */
|
||
CRITICAL_SECTION cs;
|
||
HANDLE hService;
|
||
UINT uTimer;
|
||
/* data for playing the file */
|
||
int nFromFrame;
|
||
int nToFrame;
|
||
int nLoop;
|
||
int currFrame;
|
||
/* Background frame info*/
|
||
HBITMAP bkgFrameb;
|
||
LPDWORD bkColor;
|
||
} ANIMATE_INFO;
|
||
|
||
#define ANIMATE_GetInfoPtr(hWnd) ((ANIMATE_INFO *)GetWindowLongA(hWnd, 0))
|
||
|
||
HMODULE hModWinmm;
|
||
|
||
static void ANIMATE_Notify(ANIMATE_INFO* infoPtr, UINT notif)
|
||
{
|
||
SendMessageA(GetParent(infoPtr->hWnd), WM_COMMAND,
|
||
MAKEWPARAM(GetDlgCtrlID(infoPtr->hWnd), notif),
|
||
(LPARAM)infoPtr->hWnd);
|
||
}
|
||
|
||
static BOOL ANIMATE_LoadResA(ANIMATE_INFO *infoPtr, HINSTANCE hInst, LPSTR lpName)
|
||
{
|
||
HRSRC hrsrc;
|
||
MMIOINFO mminfo;
|
||
LPVOID lpAvi;
|
||
|
||
hrsrc = FindResourceA(hInst, lpName, "AVI");
|
||
if (!hrsrc)
|
||
return FALSE;
|
||
|
||
infoPtr->hRes = LoadResource(hInst, hrsrc);
|
||
if (!infoPtr->hRes)
|
||
return FALSE;
|
||
|
||
lpAvi = LockResource(infoPtr->hRes);
|
||
if (!lpAvi)
|
||
return FALSE;
|
||
|
||
memset(&mminfo, 0, sizeof(mminfo));
|
||
mminfo.fccIOProc = FOURCC_MEM;
|
||
mminfo.pchBuffer = (LPSTR)lpAvi;
|
||
mminfo.cchBuffer = SizeofResource(hInst, hrsrc);
|
||
infoPtr->hMMio = infoPtr->fnmmioOpenA(NULL, &mminfo, MMIO_READ);
|
||
|
||
if (!infoPtr->hMMio) {
|
||
GlobalFree((HGLOBAL)lpAvi);
|
||
return FALSE;
|
||
}
|
||
|
||
infoPtr->bkgFrameb=(HBITMAP)NULL;
|
||
|
||
return TRUE;
|
||
}
|
||
|
||
|
||
static BOOL ANIMATE_LoadFileA(ANIMATE_INFO *infoPtr, LPSTR lpName)
|
||
{
|
||
infoPtr->hMMio = infoPtr->fnmmioOpenA((LPSTR)lpName, NULL,
|
||
MMIO_ALLOCBUF | MMIO_READ | MMIO_DENYWRITE);
|
||
|
||
if (!infoPtr->hMMio)
|
||
return FALSE;
|
||
|
||
return TRUE;
|
||
}
|
||
|
||
|
||
static LRESULT ANIMATE_DoStop(ANIMATE_INFO *infoPtr)
|
||
{
|
||
EnterCriticalSection(&infoPtr->cs);
|
||
|
||
/* should stop playing */
|
||
if (infoPtr->hService) {
|
||
SERVICE_Delete(infoPtr->hService);
|
||
infoPtr->hService = 0;
|
||
}
|
||
if (infoPtr->uTimer) {
|
||
KillTimer(infoPtr->hWnd, infoPtr->uTimer);
|
||
infoPtr->uTimer = 0;
|
||
}
|
||
|
||
LeaveCriticalSection(&infoPtr->cs);
|
||
|
||
ANIMATE_Notify(infoPtr, ACN_STOP);
|
||
|
||
return TRUE;
|
||
}
|
||
|
||
|
||
static void ANIMATE_Free(ANIMATE_INFO *infoPtr)
|
||
{
|
||
if (infoPtr->hMMio) {
|
||
ANIMATE_DoStop(infoPtr);
|
||
infoPtr->fnmmioClose(infoPtr->hMMio, 0);
|
||
if (infoPtr->bkgFrameb) {
|
||
DeleteObject(infoPtr->bkgFrameb);
|
||
infoPtr->bkgFrameb=(HBITMAP)NULL;
|
||
infoPtr->bkColor=NULL;
|
||
}
|
||
if (infoPtr->hRes) {
|
||
FreeResource(infoPtr->hRes);
|
||
infoPtr->hRes = 0;
|
||
}
|
||
if (infoPtr->lpIndex) {
|
||
HeapFree(GetProcessHeap(), 0, infoPtr->lpIndex);
|
||
infoPtr->lpIndex = NULL;
|
||
}
|
||
if (infoPtr->hic) {
|
||
(infoPtr->fnICClose)(infoPtr->hic);
|
||
infoPtr->hic = 0;
|
||
}
|
||
if (infoPtr->inbih) {
|
||
HeapFree(GetProcessHeap(), 0, infoPtr->inbih);
|
||
infoPtr->inbih = NULL;
|
||
}
|
||
if (infoPtr->outbih) {
|
||
HeapFree(GetProcessHeap(), 0, infoPtr->outbih);
|
||
infoPtr->outbih = NULL;
|
||
}
|
||
HeapFree(GetProcessHeap(), 0, infoPtr->indata);
|
||
HeapFree(GetProcessHeap(), 0, infoPtr->outdata);
|
||
infoPtr->indata = infoPtr->outdata = NULL;
|
||
infoPtr->hWnd = 0;
|
||
infoPtr->hMMio = 0;
|
||
memset(&infoPtr->mah, 0, sizeof(infoPtr->mah));
|
||
memset(&infoPtr->ash, 0, sizeof(infoPtr->ash));
|
||
infoPtr->nFromFrame = infoPtr->nToFrame = infoPtr->nLoop = infoPtr->currFrame = 0;
|
||
}
|
||
}
|
||
|
||
|
||
static LRESULT ANIMATE_PaintFrame(ANIMATE_INFO* infoPtr, HDC hDC)
|
||
{
|
||
if (!hDC || !infoPtr->inbih)
|
||
return TRUE;
|
||
if (infoPtr->hic){
|
||
if (GetWindowLongA(infoPtr->hWnd, GWL_STYLE) & ACS_TRANSPARENT){
|
||
FIXME("TRANSPARENCY NOT SUPPORTED(NOT TESTED) FOR COMPRESSED IMAGE\n");
|
||
}
|
||
StretchDIBits(hDC, 0, 0, infoPtr->outbih->biWidth, infoPtr->outbih->biHeight,
|
||
0, 0, infoPtr->outbih->biWidth, infoPtr->outbih->biHeight,
|
||
infoPtr->outdata, (LPBITMAPINFO)infoPtr->outbih, DIB_RGB_COLORS,
|
||
SRCCOPY);
|
||
}
|
||
else{
|
||
if (GetWindowLongA(infoPtr->hWnd, GWL_STYLE) & ACS_TRANSPARENT){
|
||
HBITMAP hbmMem, hbmMem2,hbmMem3;
|
||
HDC hdcSrc, hdcMask, hdcMem;
|
||
|
||
hdcSrc = CreateCompatibleDC(hDC);
|
||
hdcMask = CreateCompatibleDC(hDC);
|
||
hdcMem = CreateCompatibleDC(hDC);
|
||
|
||
/* create a Black and white bitmap */
|
||
hbmMem = CreateCompatibleBitmap( hDC,infoPtr->inbih->biWidth,infoPtr->inbih->biHeight);
|
||
hbmMem2 = CreateBitmap(infoPtr->inbih->biWidth, infoPtr->inbih->biHeight, 1, 1, NULL);
|
||
hbmMem3 = CreateCompatibleBitmap( hDC,infoPtr->inbih->biWidth,infoPtr->inbih->biHeight);
|
||
|
||
SelectObject( hdcSrc, hbmMem);
|
||
|
||
StretchDIBits(hdcSrc, 0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight,
|
||
0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight,
|
||
infoPtr->indata, (LPBITMAPINFO)infoPtr->inbih, DIB_RGB_COLORS,
|
||
SRCCOPY);
|
||
|
||
if (infoPtr->bkgFrameb==(HBITMAP)NULL)
|
||
{
|
||
infoPtr->bkgFrameb = CreateCompatibleBitmap( hDC,infoPtr->inbih->biWidth,infoPtr->inbih->biHeight);
|
||
SelectObject( hdcMem, infoPtr->bkgFrameb);
|
||
BitBlt(hdcMem, 0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight, hDC, 0, 0, SRCCOPY);
|
||
/* Get the transparent color from the first frame*/
|
||
switch (infoPtr->inbih->biBitCount) {
|
||
case 1:
|
||
case 4:
|
||
/*FIXME: Not supported Yet.*/
|
||
break;
|
||
case 8:
|
||
infoPtr->bkColor = (LPVOID)((LPSTR)infoPtr->inbih + (WORD)(((LPBITMAPINFO)infoPtr->inbih)->bmiHeader.biSize));
|
||
break;
|
||
case 16:
|
||
case 24:
|
||
case 32:
|
||
infoPtr->bkColor = (LPVOID)GetPixel(hdcSrc, 0, 0);
|
||
/*FIXME:Has not been test with more than 8bpp, errors are possible*/
|
||
break;
|
||
}
|
||
|
||
}
|
||
/* Need the copy of the original destination HDC*/
|
||
SelectObject( hdcSrc, infoPtr->bkgFrameb);
|
||
SelectObject( hdcMem, hbmMem3);
|
||
BitBlt(hdcMem, 0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight, hdcSrc, 0, 0, SRCCOPY);
|
||
|
||
SelectObject( hdcSrc, hbmMem);
|
||
SelectObject( hdcMask, hbmMem2);
|
||
|
||
/*Windows converts a color source into monochrome when the destination is
|
||
monochrome. In this situation, all pixels in the color bitmap that are the same color
|
||
as the background color become 1s, and all the other pixels are converted to 0s. */
|
||
|
||
/* Set the transparent color from the first frame*/
|
||
switch (infoPtr->inbih->biBitCount) {
|
||
case 1:
|
||
case 4:
|
||
/*FIXME: Not supported Yet.*/
|
||
break;
|
||
case 8:
|
||
SetBkColor(hdcSrc, infoPtr->bkColor[(((BYTE*)infoPtr->indata)[0])]);
|
||
break;
|
||
case 16:
|
||
case 24:
|
||
case 32:
|
||
SetBkColor(hdcSrc, (COLORREF)infoPtr->bkColor);
|
||
break;
|
||
}
|
||
|
||
BitBlt(hdcMask, 0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight, hdcSrc, 0, 0, SRCCOPY);
|
||
|
||
/*During a blt operation with a color destination, a monochrome source bitmap
|
||
(and/or a brush when applicable) is converted to color on the fly before the
|
||
actual ROP is carried out on the bits. The 0 (black) pixels in the monochrome
|
||
bitmap are converted to the destination's text (foreground) color, and the 1
|
||
(white) pixels are converted to the background color. */
|
||
|
||
SetBkColor(hdcSrc, RGB(0,0,0)); /* 1s --> black (0x000000)*/
|
||
SetTextColor(hdcSrc, RGB(255,255,255)); /* 0s --> white (0xFFFFFF)*/
|
||
|
||
BitBlt(hdcSrc, 0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight, hdcMask, 0, 0, SRCAND);
|
||
|
||
SetBkColor(hdcMem, RGB(255,255,255)); /* 0s --> white (0xFFFFFF) */
|
||
SetTextColor(hdcMem, RGB(0,0,0)); /* 1s --> black (0x000000) */
|
||
|
||
BitBlt(hdcMem, 0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight, hdcMask, 0, 0, SRCAND);
|
||
|
||
BitBlt(hdcMem, 0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight, hdcSrc, 0, 0, SRCPAINT);
|
||
|
||
BitBlt(hDC, 0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight, hdcMem, 0, 0, SRCCOPY);
|
||
|
||
DeleteDC(hdcMem);
|
||
DeleteDC(hdcSrc);
|
||
DeleteDC(hdcMask);
|
||
DeleteObject(hbmMem);
|
||
DeleteObject(hbmMem2);
|
||
DeleteObject(hbmMem3);
|
||
|
||
}
|
||
else{
|
||
StretchDIBits(hDC, 0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight,
|
||
0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight,
|
||
infoPtr->indata, (LPBITMAPINFO)infoPtr->inbih, DIB_RGB_COLORS,
|
||
SRCCOPY);
|
||
}
|
||
}
|
||
|
||
return TRUE;
|
||
}
|
||
|
||
static LRESULT ANIMATE_DrawFrame(ANIMATE_INFO* infoPtr)
|
||
{
|
||
HDC hDC;
|
||
|
||
TRACE("Drawing frame %d (loop %d)\n", infoPtr->currFrame, infoPtr->nLoop);
|
||
|
||
EnterCriticalSection(&infoPtr->cs);
|
||
|
||
infoPtr->fnmmioSeek(infoPtr->hMMio, infoPtr->lpIndex[infoPtr->currFrame], SEEK_SET);
|
||
infoPtr->fnmmioRead(infoPtr->hMMio, infoPtr->indata, infoPtr->ash.dwSuggestedBufferSize);
|
||
|
||
if (infoPtr->hic &&
|
||
(infoPtr->fnICDecompress)(infoPtr->hic, 0, infoPtr->inbih, infoPtr->indata,
|
||
infoPtr->outbih, infoPtr->outdata) != ICERR_OK) {
|
||
LeaveCriticalSection(&infoPtr->cs);
|
||
WARN("Decompression error\n");
|
||
return FALSE;
|
||
}
|
||
|
||
if ((hDC = GetDC(infoPtr->hWnd)) != 0) {
|
||
ANIMATE_PaintFrame(infoPtr, hDC);
|
||
ReleaseDC(infoPtr->hWnd, hDC);
|
||
}
|
||
|
||
if (infoPtr->currFrame++ >= infoPtr->nToFrame) {
|
||
infoPtr->currFrame = infoPtr->nFromFrame;
|
||
if (infoPtr->nLoop != -1) {
|
||
if (--infoPtr->nLoop == 0) {
|
||
ANIMATE_DoStop(infoPtr);
|
||
}
|
||
}
|
||
}
|
||
LeaveCriticalSection(&infoPtr->cs);
|
||
|
||
return TRUE;
|
||
}
|
||
|
||
static void CALLBACK ANIMATE_ServiceCallback(ULONG_PTR ptr_)
|
||
{
|
||
ANIMATE_INFO* infoPtr = (ANIMATE_INFO*)ptr_;
|
||
|
||
EnterCriticalSection(&infoPtr->cs);
|
||
ANIMATE_DrawFrame(infoPtr);
|
||
LeaveCriticalSection(&infoPtr->cs);
|
||
}
|
||
|
||
static LRESULT ANIMATE_Play(HWND hWnd, WPARAM wParam, LPARAM lParam)
|
||
{
|
||
ANIMATE_INFO *infoPtr = ANIMATE_GetInfoPtr(hWnd);
|
||
|
||
/* nothing opened */
|
||
if (!infoPtr->hMMio)
|
||
return FALSE;
|
||
|
||
if (infoPtr->hService || infoPtr->uTimer) {
|
||
FIXME("Already playing ? what should I do ??\n");
|
||
ANIMATE_DoStop(infoPtr);
|
||
}
|
||
|
||
infoPtr->nFromFrame = (INT)LOWORD(lParam);
|
||
infoPtr->nToFrame = (INT)HIWORD(lParam);
|
||
infoPtr->nLoop = (INT)wParam;
|
||
|
||
if (infoPtr->nToFrame == 0xFFFF)
|
||
infoPtr->nToFrame = infoPtr->mah.dwTotalFrames - 1;
|
||
|
||
TRACE("(repeat=%d from=%d to=%d);\n",
|
||
infoPtr->nLoop, infoPtr->nFromFrame, infoPtr->nToFrame);
|
||
|
||
if (infoPtr->nFromFrame >= infoPtr->nToFrame ||
|
||
infoPtr->nToFrame >= infoPtr->mah.dwTotalFrames)
|
||
return FALSE;
|
||
|
||
infoPtr->currFrame = infoPtr->nFromFrame;
|
||
|
||
if (GetWindowLongA(hWnd, GWL_STYLE) & ACS_TIMER) {
|
||
TRACE("Using a timer\n");
|
||
/* create a timer to display AVI */
|
||
infoPtr->uTimer = SetTimer(hWnd, 1, infoPtr->mah.dwMicroSecPerFrame / 1000, NULL);
|
||
} else {
|
||
TRACE("Using the service thread\n");
|
||
/* time is in <20>s */
|
||
infoPtr->hService = SERVICE_AddTimer(infoPtr->mah.dwMicroSecPerFrame / 1000,
|
||
ANIMATE_ServiceCallback, (DWORD)infoPtr);
|
||
}
|
||
|
||
ANIMATE_Notify(infoPtr, ACN_START);
|
||
|
||
return TRUE;
|
||
}
|
||
|
||
|
||
static BOOL ANIMATE_GetAviInfo(ANIMATE_INFO *infoPtr)
|
||
{
|
||
MMCKINFO ckMainRIFF;
|
||
MMCKINFO mmckHead;
|
||
MMCKINFO mmckList;
|
||
MMCKINFO mmckInfo;
|
||
DWORD numFrame;
|
||
DWORD insize;
|
||
|
||
if (infoPtr->fnmmioDescend(infoPtr->hMMio, &ckMainRIFF, NULL, 0) != 0) {
|
||
WARN("Can't find 'RIFF' chunk\n");
|
||
return FALSE;
|
||
}
|
||
|
||
if ((ckMainRIFF.ckid != FOURCC_RIFF) ||
|
||
(ckMainRIFF.fccType != mmioFOURCC('A', 'V', 'I', ' '))) {
|
||
WARN("Can't find 'AVI ' chunk\n");
|
||
return FALSE;
|
||
}
|
||
|
||
mmckHead.fccType = mmioFOURCC('h', 'd', 'r', 'l');
|
||
if (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckHead, &ckMainRIFF, MMIO_FINDLIST) != 0) {
|
||
WARN("Can't find 'hdrl' list\n");
|
||
return FALSE;
|
||
}
|
||
|
||
mmckInfo.ckid = mmioFOURCC('a', 'v', 'i', 'h');
|
||
if (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckInfo, &mmckHead, MMIO_FINDCHUNK) != 0) {
|
||
WARN("Can't find 'avih' chunk\n");
|
||
return FALSE;
|
||
}
|
||
|
||
infoPtr->fnmmioRead(infoPtr->hMMio, (LPSTR)&infoPtr->mah, sizeof(infoPtr->mah));
|
||
TRACE("mah.dwMicroSecPerFrame=%ld\n", infoPtr->mah.dwMicroSecPerFrame);
|
||
TRACE("mah.dwMaxBytesPerSec=%ld\n", infoPtr->mah.dwMaxBytesPerSec);
|
||
TRACE("mah.dwPaddingGranularity=%ld\n", infoPtr->mah.dwPaddingGranularity);
|
||
TRACE("mah.dwFlags=%ld\n", infoPtr->mah.dwFlags);
|
||
TRACE("mah.dwTotalFrames=%ld\n", infoPtr->mah.dwTotalFrames);
|
||
TRACE("mah.dwInitialFrames=%ld\n", infoPtr->mah.dwInitialFrames);
|
||
TRACE("mah.dwStreams=%ld\n", infoPtr->mah.dwStreams);
|
||
TRACE("mah.dwSuggestedBufferSize=%ld\n", infoPtr->mah.dwSuggestedBufferSize);
|
||
TRACE("mah.dwWidth=%ld\n", infoPtr->mah.dwWidth);
|
||
TRACE("mah.dwHeight=%ld\n", infoPtr->mah.dwHeight);
|
||
infoPtr->fnmmioAscend(infoPtr->hMMio, &mmckInfo, 0);
|
||
|
||
mmckList.fccType = mmioFOURCC('s', 't', 'r', 'l');
|
||
if (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckList, &mmckHead, MMIO_FINDLIST) != 0) {
|
||
WARN("Can't find 'strl' list\n");
|
||
return FALSE;
|
||
}
|
||
|
||
mmckInfo.ckid = mmioFOURCC('s', 't', 'r', 'h');
|
||
if (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckInfo, &mmckList, MMIO_FINDCHUNK) != 0) {
|
||
WARN("Can't find 'strh' chunk\n");
|
||
return FALSE;
|
||
}
|
||
|
||
infoPtr->fnmmioRead(infoPtr->hMMio, (LPSTR)&infoPtr->ash, sizeof(infoPtr->ash));
|
||
TRACE("ash.fccType='%c%c%c%c'\n", LOBYTE(LOWORD(infoPtr->ash.fccType)),
|
||
HIBYTE(LOWORD(infoPtr->ash.fccType)),
|
||
LOBYTE(HIWORD(infoPtr->ash.fccType)),
|
||
HIBYTE(HIWORD(infoPtr->ash.fccType)));
|
||
TRACE("ash.fccHandler='%c%c%c%c'\n", LOBYTE(LOWORD(infoPtr->ash.fccHandler)),
|
||
HIBYTE(LOWORD(infoPtr->ash.fccHandler)),
|
||
LOBYTE(HIWORD(infoPtr->ash.fccHandler)),
|
||
HIBYTE(HIWORD(infoPtr->ash.fccHandler)));
|
||
TRACE("ash.dwFlags=%ld\n", infoPtr->ash.dwFlags);
|
||
TRACE("ash.wPriority=%d\n", infoPtr->ash.wPriority);
|
||
TRACE("ash.wLanguage=%d\n", infoPtr->ash.wLanguage);
|
||
TRACE("ash.dwInitialFrames=%ld\n", infoPtr->ash.dwInitialFrames);
|
||
TRACE("ash.dwScale=%ld\n", infoPtr->ash.dwScale);
|
||
TRACE("ash.dwRate=%ld\n", infoPtr->ash.dwRate);
|
||
TRACE("ash.dwStart=%ld\n", infoPtr->ash.dwStart);
|
||
TRACE("ash.dwLength=%ld\n", infoPtr->ash.dwLength);
|
||
TRACE("ash.dwSuggestedBufferSize=%ld\n", infoPtr->ash.dwSuggestedBufferSize);
|
||
TRACE("ash.dwQuality=%ld\n", infoPtr->ash.dwQuality);
|
||
TRACE("ash.dwSampleSize=%ld\n", infoPtr->ash.dwSampleSize);
|
||
TRACE("ash.rcFrame=(%d,%d,%d,%d)\n", infoPtr->ash.rcFrame.top, infoPtr->ash.rcFrame.left,
|
||
infoPtr->ash.rcFrame.bottom, infoPtr->ash.rcFrame.right);
|
||
infoPtr->fnmmioAscend(infoPtr->hMMio, &mmckInfo, 0);
|
||
|
||
mmckInfo.ckid = mmioFOURCC('s', 't', 'r', 'f');
|
||
if (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckInfo, &mmckList, MMIO_FINDCHUNK) != 0) {
|
||
WARN("Can't find 'strh' chunk\n");
|
||
return FALSE;
|
||
}
|
||
|
||
infoPtr->inbih = HeapAlloc(GetProcessHeap(), 0, mmckInfo.cksize);
|
||
if (!infoPtr->inbih) {
|
||
WARN("Can't alloc input BIH\n");
|
||
return FALSE;
|
||
}
|
||
|
||
infoPtr->fnmmioRead(infoPtr->hMMio, (LPSTR)infoPtr->inbih, mmckInfo.cksize);
|
||
TRACE("bih.biSize=%ld\n", infoPtr->inbih->biSize);
|
||
TRACE("bih.biWidth=%ld\n", infoPtr->inbih->biWidth);
|
||
TRACE("bih.biHeight=%ld\n", infoPtr->inbih->biHeight);
|
||
TRACE("bih.biPlanes=%d\n", infoPtr->inbih->biPlanes);
|
||
TRACE("bih.biBitCount=%d\n", infoPtr->inbih->biBitCount);
|
||
TRACE("bih.biCompression=%ld\n", infoPtr->inbih->biCompression);
|
||
TRACE("bih.biSizeImage=%ld\n", infoPtr->inbih->biSizeImage);
|
||
TRACE("bih.biXPelsPerMeter=%ld\n", infoPtr->inbih->biXPelsPerMeter);
|
||
TRACE("bih.biYPelsPerMeter=%ld\n", infoPtr->inbih->biYPelsPerMeter);
|
||
TRACE("bih.biClrUsed=%ld\n", infoPtr->inbih->biClrUsed);
|
||
TRACE("bih.biClrImportant=%ld\n", infoPtr->inbih->biClrImportant);
|
||
infoPtr->fnmmioAscend(infoPtr->hMMio, &mmckInfo, 0);
|
||
|
||
infoPtr->fnmmioAscend(infoPtr->hMMio, &mmckList, 0);
|
||
|
||
#if 0
|
||
/* an AVI has 0 or 1 video stream, and to be animated should not contain
|
||
* an audio stream, so only one strl is allowed
|
||
*/
|
||
mmckList.fccType = mmioFOURCC('s', 't', 'r', 'l');
|
||
if (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckList, &mmckHead, MMIO_FINDLIST) == 0) {
|
||
WARN("There should be a single 'strl' list\n");
|
||
return FALSE;
|
||
}
|
||
#endif
|
||
|
||
infoPtr->fnmmioAscend(infoPtr->hMMio, &mmckHead, 0);
|
||
|
||
/* no need to read optional JUNK chunk */
|
||
|
||
mmckList.fccType = mmioFOURCC('m', 'o', 'v', 'i');
|
||
if (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckList, &ckMainRIFF, MMIO_FINDLIST) != 0) {
|
||
WARN("Can't find 'movi' list\n");
|
||
return FALSE;
|
||
}
|
||
|
||
/* FIXME: should handle the 'rec ' LIST when present */
|
||
|
||
infoPtr->lpIndex = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
|
||
infoPtr->mah.dwTotalFrames * sizeof(DWORD));
|
||
if (!infoPtr->lpIndex) {
|
||
WARN("Can't alloc index array\n");
|
||
return FALSE;
|
||
}
|
||
|
||
numFrame = insize = 0;
|
||
while (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckInfo, &mmckList, 0) == 0 &&
|
||
numFrame < infoPtr->mah.dwTotalFrames) {
|
||
infoPtr->lpIndex[numFrame] = mmckInfo.dwDataOffset;
|
||
if (insize < mmckInfo.cksize)
|
||
insize = mmckInfo.cksize;
|
||
numFrame++;
|
||
infoPtr->fnmmioAscend(infoPtr->hMMio, &mmckInfo, 0);
|
||
}
|
||
if (numFrame != infoPtr->mah.dwTotalFrames) {
|
||
WARN("Found %ld frames (/%ld)\n", numFrame, infoPtr->mah.dwTotalFrames);
|
||
return FALSE;
|
||
}
|
||
if (insize > infoPtr->ash.dwSuggestedBufferSize) {
|
||
WARN("insize=%ld suggestedSize=%ld\n", insize, infoPtr->ash.dwSuggestedBufferSize);
|
||
infoPtr->ash.dwSuggestedBufferSize = insize;
|
||
}
|
||
|
||
infoPtr->indata = HeapAlloc(GetProcessHeap(), 0, infoPtr->ash.dwSuggestedBufferSize);
|
||
if (!infoPtr->indata) {
|
||
WARN("Can't alloc input buffer\n");
|
||
return FALSE;
|
||
}
|
||
|
||
return TRUE;
|
||
}
|
||
|
||
|
||
static BOOL ANIMATE_GetAviCodec(ANIMATE_INFO *infoPtr)
|
||
{
|
||
DWORD outSize;
|
||
|
||
/* check uncompressed AVI */
|
||
if (infoPtr->ash.fccHandler == mmioFOURCC('D', 'I', 'B', ' ') ||
|
||
infoPtr->ash.fccHandler == mmioFOURCC('R', 'L', 'E', ' ')) {
|
||
infoPtr->hic = 0;
|
||
return TRUE;
|
||
}
|
||
|
||
/* try to get a decompressor for that type */
|
||
infoPtr->hic = (infoPtr->fnICOpen)(ICTYPE_VIDEO,
|
||
infoPtr->ash.fccHandler,
|
||
ICMODE_DECOMPRESS);
|
||
if (!infoPtr->hic) {
|
||
WARN("Can't load codec for the file\n");
|
||
return FALSE;
|
||
}
|
||
|
||
outSize = (infoPtr->fnICSendMessage)(infoPtr->hic,
|
||
ICM_DECOMPRESS_GET_FORMAT,
|
||
(DWORD)infoPtr->inbih, 0L);
|
||
infoPtr->outbih = HeapAlloc(GetProcessHeap(), 0, outSize);
|
||
if (!infoPtr->outbih) {
|
||
WARN("Can't alloc output BIH\n");
|
||
return FALSE;
|
||
}
|
||
|
||
if ((infoPtr->fnICSendMessage)(infoPtr->hic, ICM_DECOMPRESS_GET_FORMAT,
|
||
(DWORD)infoPtr->inbih,
|
||
(DWORD)infoPtr->outbih) != ICERR_OK) {
|
||
WARN("Can't get output BIH\n");
|
||
return FALSE;
|
||
}
|
||
|
||
infoPtr->outdata = HeapAlloc(GetProcessHeap(), 0, infoPtr->outbih->biSizeImage);
|
||
if (!infoPtr->outdata) {
|
||
WARN("Can't alloc output buffer\n");
|
||
return FALSE;
|
||
}
|
||
|
||
if ((infoPtr->fnICSendMessage)(infoPtr->hic, ICM_DECOMPRESS_BEGIN,
|
||
(DWORD)infoPtr->inbih,
|
||
(DWORD)infoPtr->outbih) != ICERR_OK) {
|
||
WARN("Can't begin decompression\n");
|
||
return FALSE;
|
||
}
|
||
|
||
return TRUE;
|
||
}
|
||
|
||
static void ANIMATE_Center(ANIMATE_INFO *infoPtr)
|
||
{
|
||
int x,y,dx,dy;
|
||
RECT Rect;
|
||
HWND hWnd=infoPtr->hWnd;
|
||
HWND hWndParent=GetWindowLongA(hWnd, GWL_HWNDPARENT);
|
||
|
||
if (!hWndParent || !GetWindowRect(hWndParent, &Rect)) return;
|
||
|
||
dx=Rect.right-Rect.left+1;
|
||
dy=Rect.bottom-Rect.top+1;
|
||
x=infoPtr->mah.dwWidth < dx ? (dx-infoPtr->mah.dwWidth) >> 1 : 0;
|
||
y=infoPtr->mah.dwHeight < dy ? (dy-infoPtr->mah.dwHeight) >> 1 : 0;
|
||
|
||
MoveWindow(hWnd, x, y, infoPtr->mah.dwWidth, infoPtr->mah.dwHeight, TRUE);
|
||
}
|
||
|
||
static LRESULT ANIMATE_OpenA(HWND hWnd, WPARAM wParam, LPARAM lParam)
|
||
{
|
||
ANIMATE_INFO *infoPtr = ANIMATE_GetInfoPtr(hWnd);
|
||
HINSTANCE hInstance = (HINSTANCE)wParam;
|
||
|
||
ANIMATE_Free(infoPtr);
|
||
|
||
if (!lParam) {
|
||
TRACE("Closing avi!\n");
|
||
return TRUE;
|
||
}
|
||
|
||
if (!hInstance)
|
||
hInstance = GetWindowLongA(hWnd, GWL_HINSTANCE);
|
||
|
||
if (HIWORD(lParam)) {
|
||
TRACE("(\"%s\");\n", (LPSTR)lParam);
|
||
|
||
if (!ANIMATE_LoadResA(infoPtr, hInstance, (LPSTR)lParam)) {
|
||
TRACE("No AVI resource found!\n");
|
||
if (!ANIMATE_LoadFileA(infoPtr, (LPSTR)lParam)) {
|
||
WARN("No AVI file found!\n");
|
||
return FALSE;
|
||
}
|
||
}
|
||
} else {
|
||
TRACE("(%u);\n", (WORD)LOWORD(lParam));
|
||
|
||
if (!ANIMATE_LoadResA(infoPtr, hInstance,
|
||
MAKEINTRESOURCEA((INT)lParam))) {
|
||
WARN("No AVI resource found!\n");
|
||
return FALSE;
|
||
}
|
||
}
|
||
|
||
if (!ANIMATE_GetAviInfo(infoPtr)) {
|
||
WARN("Can't get AVI information\n");
|
||
ANIMATE_Free(infoPtr);
|
||
return FALSE;
|
||
}
|
||
|
||
if (!ANIMATE_GetAviCodec(infoPtr)) {
|
||
WARN("Can't get AVI Codec\n");
|
||
ANIMATE_Free(infoPtr);
|
||
return FALSE;
|
||
}
|
||
|
||
if (GetWindowLongA(hWnd, GWL_STYLE) & ACS_CENTER) {
|
||
|
||
ANIMATE_Center(infoPtr);
|
||
|
||
} else {
|
||
/* MoveWindow(hWnd, 0, 0, infoPtr->mah.dwWidth, infoPtr->mah.dwHeight, FALSE);*/
|
||
SetWindowPos(hWnd, 0, 0, 0, infoPtr->mah.dwWidth, infoPtr->mah.dwHeight,
|
||
SWP_NOACTIVATE | SWP_NOMOVE | SWP_NOZORDER);
|
||
}
|
||
|
||
if (GetWindowLongA(hWnd, GWL_STYLE) & ACS_TRANSPARENT) {
|
||
FIXME("ACS_TRANSPARENT: NIY\n");
|
||
}
|
||
|
||
if (GetWindowLongA(hWnd, GWL_STYLE) & ACS_AUTOPLAY) {
|
||
return ANIMATE_Play(hWnd, -1, (LPARAM)MAKELONG(0, infoPtr->mah.dwTotalFrames-1));
|
||
}
|
||
|
||
return TRUE;
|
||
}
|
||
|
||
|
||
/* << ANIMATE_Open32W >> */
|
||
|
||
static LRESULT ANIMATE_Stop(HWND hWnd, WPARAM wParam, LPARAM lParam)
|
||
{
|
||
ANIMATE_INFO *infoPtr = ANIMATE_GetInfoPtr(hWnd);
|
||
|
||
/* nothing opened */
|
||
if (!infoPtr->hMMio)
|
||
return FALSE;
|
||
|
||
ANIMATE_DoStop(infoPtr);
|
||
return TRUE;
|
||
}
|
||
|
||
|
||
static LRESULT ANIMATE_Create(HWND hWnd, WPARAM wParam, LPARAM lParam)
|
||
{
|
||
ANIMATE_INFO* infoPtr;
|
||
HMODULE hModule = LoadLibraryA("msvfw32.dll");
|
||
|
||
if (!hModule)
|
||
return FALSE;
|
||
|
||
/* allocate memory for info structure */
|
||
infoPtr = (ANIMATE_INFO *)COMCTL32_Alloc(sizeof(ANIMATE_INFO));
|
||
if (!infoPtr) {
|
||
ERR("could not allocate info memory!\n");
|
||
return 0;
|
||
}
|
||
|
||
/* Temporary hack until we get dllglue up and running */
|
||
infoPtr->fnICOpen = (void*)GetProcAddress(hModule, "ICOpen");
|
||
infoPtr->fnICClose = (void*)GetProcAddress(hModule, "ICClose");
|
||
infoPtr->fnICSendMessage = (void*)GetProcAddress(hModule, "ICSendMessage");
|
||
infoPtr->fnICDecompress = (void*)GetProcAddress(hModule, "ICDecompress");
|
||
|
||
TRACE("Animate style=0x%08lx, parent=%08lx\n", GetWindowLongA(hWnd, GWL_STYLE), (DWORD)GetParent(hWnd));
|
||
|
||
/* store crossref hWnd <-> info structure */
|
||
SetWindowLongA(hWnd, 0, (DWORD)infoPtr);
|
||
infoPtr->hWnd = hWnd;
|
||
|
||
hModWinmm = LoadLibraryA("WINMM");
|
||
|
||
infoPtr->fnmmioOpenA = (void*)GetProcAddress(hModWinmm, "mmioOpenA");
|
||
infoPtr->fnmmioClose = (void*)GetProcAddress(hModWinmm, "mmioClose");
|
||
infoPtr->fnmmioAscend = (void*)GetProcAddress(hModWinmm, "mmioAscend");
|
||
infoPtr->fnmmioDescend = (void*)GetProcAddress(hModWinmm, "mmioDescend");
|
||
infoPtr->fnmmioSeek = (void*)GetProcAddress(hModWinmm, "mmioSeek");
|
||
infoPtr->fnmmioRead = (void*)GetProcAddress(hModWinmm, "mmioRead");
|
||
|
||
InitializeCriticalSection(&infoPtr->cs);
|
||
|
||
return 0;
|
||
}
|
||
|
||
|
||
static LRESULT ANIMATE_Destroy(HWND hWnd, WPARAM wParam, LPARAM lParam)
|
||
{
|
||
ANIMATE_INFO *infoPtr = ANIMATE_GetInfoPtr(hWnd);
|
||
|
||
|
||
/* free avi data */
|
||
ANIMATE_Free(infoPtr);
|
||
|
||
/* free animate info data */
|
||
COMCTL32_Free(infoPtr);
|
||
SetWindowLongA(hWnd, 0, 0);
|
||
|
||
FreeLibrary(hModWinmm);
|
||
return 0;
|
||
}
|
||
|
||
|
||
static LRESULT ANIMATE_EraseBackground(HWND hWnd, WPARAM wParam, LPARAM lParam)
|
||
{
|
||
RECT rect;
|
||
|
||
GetClientRect(hWnd, &rect);
|
||
#if 0
|
||
HBRUSH hBrush = CreateSolidBrush(infoPtr->clrBk);
|
||
|
||
FillRect((HDC)wParam, &rect, hBrush);
|
||
DeleteObject(hBrush);
|
||
#else
|
||
FillRect((HDC)wParam, &rect, GetSysColorBrush(COLOR_WINDOW));
|
||
#endif
|
||
return TRUE;
|
||
}
|
||
|
||
static LRESULT WINAPI ANIMATE_Size(HWND hWnd, WPARAM wParam, LPARAM lParam)
|
||
{
|
||
ANIMATE_INFO *infoPtr = ANIMATE_GetInfoPtr(hWnd);
|
||
|
||
if (GetWindowLongA(hWnd, GWL_STYLE) & ACS_CENTER) {
|
||
if (infoPtr->hMMio) {
|
||
/* centers the animation in the control, invalidates the control
|
||
*/
|
||
ANIMATE_Center(infoPtr);
|
||
}
|
||
InvalidateRect(hWnd, NULL, TRUE);
|
||
}
|
||
return TRUE;
|
||
}
|
||
|
||
static LRESULT WINAPI ANIMATE_WindowProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
|
||
{
|
||
TRACE("hwnd=%x msg=%x wparam=%x lparam=%lx\n", hWnd, uMsg, wParam, lParam);
|
||
if (!ANIMATE_GetInfoPtr(hWnd) && (uMsg != WM_NCCREATE))
|
||
return DefWindowProcA(hWnd, uMsg, wParam, lParam);
|
||
switch (uMsg)
|
||
{
|
||
case ACM_OPENA:
|
||
return ANIMATE_OpenA(hWnd, wParam, lParam);
|
||
|
||
/* case ACM_OPEN32W: FIXME!! */
|
||
/* return ANIMATE_Open32W(hWnd, wParam, lParam); */
|
||
|
||
case ACM_PLAY:
|
||
return ANIMATE_Play(hWnd, wParam, lParam);
|
||
|
||
case ACM_STOP:
|
||
return ANIMATE_Stop(hWnd, wParam, lParam);
|
||
|
||
case WM_NCCREATE:
|
||
ANIMATE_Create(hWnd, wParam, lParam);
|
||
return DefWindowProcA(hWnd, uMsg, wParam, lParam);
|
||
|
||
case WM_NCHITTEST:
|
||
return HTTRANSPARENT;
|
||
|
||
case WM_DESTROY:
|
||
ANIMATE_Destroy(hWnd, wParam, lParam);
|
||
return DefWindowProcA(hWnd, uMsg, wParam, lParam);
|
||
|
||
case WM_ERASEBKGND:
|
||
ANIMATE_EraseBackground(hWnd, wParam, lParam);
|
||
break;
|
||
|
||
/* case WM_STYLECHANGED: FIXME shall we do something ?? */
|
||
|
||
case WM_TIMER:
|
||
return ANIMATE_DrawFrame(ANIMATE_GetInfoPtr(hWnd));
|
||
|
||
case WM_CLOSE:
|
||
ANIMATE_Free(ANIMATE_GetInfoPtr(hWnd));
|
||
return TRUE;
|
||
|
||
case WM_PAINT:
|
||
if (wParam) {
|
||
ANIMATE_PaintFrame(ANIMATE_GetInfoPtr(hWnd), (HDC)wParam);
|
||
} else {
|
||
PAINTSTRUCT ps;
|
||
HDC hDC = BeginPaint(hWnd, &ps);
|
||
ANIMATE_PaintFrame(ANIMATE_GetInfoPtr(hWnd), hDC);
|
||
EndPaint(hWnd, &ps);
|
||
}
|
||
break;
|
||
|
||
case WM_SIZE:
|
||
ANIMATE_Size(hWnd, wParam, lParam);
|
||
return DefWindowProcA(hWnd, uMsg, wParam, lParam);
|
||
|
||
default:
|
||
if (uMsg >= WM_USER)
|
||
ERR("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam);
|
||
|
||
return DefWindowProcA(hWnd, uMsg, wParam, lParam);
|
||
}
|
||
return 0;
|
||
}
|
||
|
||
|
||
void ANIMATE_Register(void)
|
||
{
|
||
WNDCLASSA wndClass;
|
||
|
||
ZeroMemory(&wndClass, sizeof(WNDCLASSA));
|
||
wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS;
|
||
wndClass.lpfnWndProc = (WNDPROC)ANIMATE_WindowProc;
|
||
wndClass.cbClsExtra = 0;
|
||
wndClass.cbWndExtra = sizeof(ANIMATE_INFO *);
|
||
wndClass.hCursor = LoadCursorA(0, IDC_ARROWA);
|
||
wndClass.hbrBackground = (HBRUSH)(COLOR_BTNFACE + 1);
|
||
wndClass.lpszClassName = ANIMATE_CLASSA;
|
||
|
||
RegisterClassA(&wndClass);
|
||
}
|
||
|
||
|
||
void ANIMATE_Unregister(void)
|
||
{
|
||
UnregisterClassA(ANIMATE_CLASSA, (HINSTANCE)NULL);
|
||
}
|
||
|