summaryrefslogtreecommitdiff
path: root/MovieDecode
diff options
context:
space:
mode:
Diffstat (limited to 'MovieDecode')
-rw-r--r--MovieDecode/SimpleTest.c437
1 files changed, 437 insertions, 0 deletions
diff --git a/MovieDecode/SimpleTest.c b/MovieDecode/SimpleTest.c
new file mode 100644
index 0000000..6c01395
--- /dev/null
+++ b/MovieDecode/SimpleTest.c
@@ -0,0 +1,437 @@
+/*
+** $Id: SimpleTest.c,v 1.1 93/05/22 13:42:56 chris Exp $
+** $Revision: 1.1 $
+**
+** $Filename: MovieDecode/SimpleTest.c $
+** $Author: chris $
+** $Date: 93/05/22 13:42:56 $
+**
+** Simple program to test the movie decoder.
+** Usage: SimpleTest <filename>
+*/
+
+// #define VERBOSE
+
+#include <proto/exec.h>
+#include <exec/memory.h>
+#include <proto/graphics.h>
+#include <proto/intuition.h>
+#include <proto/dos.h>
+#include <string.h>
+
+#include <libraries/iff.h> /* Not an official CBM file */
+
+#define MIN(a,b) ((a)<(b)?(a):(b))
+#define MAX(a,b) ((a)>(b)?(a):(b))
+
+#define ID_ANSQ IFFL_MAKE_ID('A','N','S','Q')
+
+#define MAXFRAMES 1024 /* Max # of frames for animation (test) */
+
+struct Library *IFFBase;
+
+
+/****************************************************************************
+** Prototypes for the MovieDecode functions
+*/
+
+APTR __asm
+InitJDecoder(register __d0 ULONG animtype);
+
+VOID __asm
+FreeJDecoder(register __a0 APTR handle);
+
+BOOL __asm
+ModifyJFrame(register __a0 APTR deltas,
+ register __a1 struct BitMap *bm,
+ register __a2 APTR handle);
+
+
+#ifdef VERBOSE
+/****************************************************************************
+** Not used. Dump a MOVIE frame in ASCII. Ugly code :)
+*/
+
+LONG DumpFrame(ULONG *chunk,struct BitMap *bm)
+{
+ static WORD frame = 0;
+ int ok = FALSE;
+ UWORD *ptr = (WORD *)(chunk+2);
+
+ Printf("\nFrame %ld\n", ++frame);
+
+ for(;;)
+ {
+ WORD bytes, rows, offset;
+ bytes=*ptr++; ptr++; rows=*ptr++;
+
+ if (bytes==1)
+ {
+ goto onebyte;
+ }
+ else if (bytes==2)
+ {
+ int entries, i;
+
+ bytes = *ptr++;
+
+ if ((bytes!=2) && (bytes!=4) && (bytes!=6))
+ {
+ Printf("Error: Secondary byte count = %ld\n\n", bytes);
+ break;
+ }
+onebyte:
+ if ((rows<1) || ((rows>8) && (rows!=16) && (rows!=32)))
+ {
+ Printf("Illegal # of rows: %ld\n", rows);
+ break;
+ }
+
+ entries = *ptr++;
+ Printf(" %ld bytes x %ld rows: %ld times\n", bytes, rows, entries);
+
+ for (i=0; i<entries; ++i)
+ {
+ offset = *ptr++;
+ Printf(" %ld: (%ld,%ld)\n",
+ offset, offset % bm->BytesPerRow, offset / bm->BytesPerRow);
+
+ ptr = (void *)(((ULONG)ptr) + bm->Depth * rows * bytes);
+
+ if ((bytes==1) && (bm->Depth & 1) && (rows & 1))
+ ptr = (void *)(((ULONG)ptr) + 1);
+ }
+ }
+ else if(bytes == 0)
+ {
+ PutStr("End of frame\n");
+ ok = TRUE;
+ break;
+ }
+ else
+ {
+ Printf("Error: Primary byte count = %ld\n\n", bytes);
+ break;
+ }
+ }
+ return ok;
+}
+#endif
+
+
+/****************************************************************************
+** Generate the next animation frame
+*/
+
+LONG MyModifyFrame(ULONG *form, struct BitMap *bm, APTR decoderhandle)
+{
+ ULONG *chunk;
+
+ if (chunk = IFFL_FindChunk(form, ID_ANHD))
+ {
+ int op = ((struct IFFL_ANHD *)(chunk+2))->Operation;
+
+ if (op=='J')
+ {
+ if (chunk = IFFL_FindChunk(form, ID_DLTA))
+ {
+#ifdef VERBOSE
+ return DumpFrame(chunk, bm);
+#else
+ return ModifyJFrame(chunk+2, bm, decoderhandle);
+#endif
+ }
+ }
+ else return (LONG)IFFL_ModifyFrame(form, bm); /* ANIM5... */
+ }
+}
+
+
+/****************************************************************************
+** Load & display an animation
+*/
+
+void ShowAnim(char *name)
+{
+ struct IFFL_BMHD *bmhd;
+ struct BitMap *bm1 = NULL, *bm2 = NULL;
+ struct Screen *screen = NULL;
+ ULONG *form;
+ int numframes = 0, i, swidth, sheight;
+ WORD *ansq, *anptr;
+ ULONG *seq[MAXFRAMES];
+ APTR decoderhandle = NULL;
+ ULONG *ifffile;
+ BOOL eor;
+
+
+ /*
+ ** Load animation to memory
+ */
+ if (!(ifffile = IFFL_OpenIFF(name, IFFL_MODE_READ)))
+ {
+ PutStr("Not an IFF file!\n");
+ goto cleanup;
+ }
+
+ if(*(((ULONG *)ifffile)+2) != ID_ANIM)
+ {
+ PutStr("Not an ANIM file!\n");
+ goto cleanup;
+ }
+
+ form = ifffile+3; /* Skip FORM....ANIM */
+
+ if (!(bmhd = IFFL_GetBMHD(form)))
+ {
+ PutStr("No BMHD\n");
+ goto cleanup;
+ }
+ Printf("%ld x %ld x %ld ", bmhd->w, bmhd->h, bmhd->nPlanes);
+
+
+ /*
+ ** Calculate the screen size. Movie needs at least a 320 x 200
+ ** (or 640 x 400 in hires/interlace) screen.
+ */
+ swidth = bmhd->w;
+
+ if (swidth < 320)
+ swidth = 320;
+
+ if ((swidth > 400) && (swidth < 640))
+ swidth = 640;
+
+ sheight = bmhd->h;
+ if (sheight < 200)
+ sheight = 200;
+
+ if ((sheight > 300) && (sheight < 400))
+ sheight = 400;
+
+ Printf("Screen size is %ld x %ld\n", swidth, sheight);
+
+
+ /*
+ ** Allocate the two bitmaps
+ */
+ if (!(bm1 = AllocBitMap(swidth, sheight, bmhd->nPlanes, 0/*BMF_DISPLAYABLE*/, NULL)))
+ {
+ PutStr("Can't allocate bitmap 1!\n");
+ goto cleanup;
+ }
+
+ if (!(bm2 = AllocBitMap(swidth, sheight, bmhd->nPlanes, 0/*BMF_DISPLAYABLE*/, NULL)))
+ {
+ PutStr("Can't allocate bitmap 2!\n");
+ goto cleanup;
+ }
+
+
+ /*
+ ** Open the screen and set the colors
+ */
+ if (screen = OpenScreenTags(NULL,
+ SA_Width, swidth,
+ SA_Height, sheight,
+ SA_Depth, bmhd->nPlanes,
+ SA_DisplayID, IFFL_GetViewModes(form),
+ SA_BitMap, bm1,
+ SA_Quiet, TRUE,
+ SA_Behind, TRUE,
+ TAG_DONE
+ ))
+ {
+ UWORD colortab[256];
+ int colorcount = IFFL_GetColorTab(form, (WORD *)colortab);
+
+ LoadRGB4(&screen->ViewPort, colortab, colorcount);
+ }
+ else
+ {
+ PutStr("Can't open screen!");
+ goto cleanup;
+ }
+
+
+ /*
+ ** Get pointers to all delta FORMs
+ */
+ while (form = IFFL_FindChunk(form, 0L))
+ {
+ UWORD *dlta;
+
+ if (*form != ID_FORM) break;
+
+ if (dlta = IFFL_FindChunk(form, ID_DLTA))
+ {
+ if ((dlta[4]==1) || (dlta[4]==2))
+ eor=dlta[5];
+ }
+ else PutStr("No delta!");
+ seq[numframes++] = form;
+
+ if (numframes >= MAXFRAMES-1)
+ {
+ PutStr("- Too many frames!");
+ goto cleanup;
+ }
+ }
+
+
+ /*
+ ** Determine the compression type
+ */
+ if (form = IFFL_FindChunk(ifffile, ID_ANSQ))
+ {
+ /*
+ ** Initialize the decoder
+ */
+ if (decoderhandle = InitJDecoder((eor?0x10000L:0) | bm1->Depth))
+ {
+ Printf(eor ? "Movie reversible, " : "Movie oneway, ");
+ anptr = ansq = (WORD *)(form+2);
+ }
+ else
+ {
+ PutStr("Can't init decoder!\n");
+ goto cleanup;
+ }
+ }
+ else
+ {
+ Printf("ANIM format, ");
+ ansq = NULL;
+ }
+ Printf("%ld frames.\n", numframes);
+
+
+ /*
+ ** Display the first frame
+ */
+ if (!IFFL_DecodePic(ifffile+3, bm1))
+ {
+ Printf("Decode error: %ld\n", IFFL_IFFError());
+ goto cleanup;
+ }
+
+
+ if(bmhd->w < 320)
+ ScrollRaster(&screen->RastPort, (bmhd->w-320) / 2, 0, 0, 0, 319, bmhd->h-1);
+
+
+ /*
+ ** Display the second frame: copy and modify the first one
+ */
+ BltBitMap(bm1, 0, 0, bm2, 0, 0, screen->Width, screen->Height, 0xc0, 0xff, NULL);
+ WaitBlit();
+
+ if (!MyModifyFrame(seq[0], bm2, decoderhandle))
+ {
+ PutStr("Can't modify 1st frame\n");
+ goto cleanup;
+ }
+
+ ScreenToFront(screen);
+
+
+ /*
+ ** The loop: Play animation 3 times
+ */
+ for(i=0; i<3; ++i)
+ {
+ int frame = 1;
+ for(;;)
+ {
+ struct BitMap *dummy;
+
+ if (CheckSignal(SIGBREAKF_CTRL_C))
+ goto cleanup;
+
+ /*
+ ** Flip BitMaps
+ */
+ dummy=bm1; bm1=bm2; bm2=dummy;
+ screen->BitMap = *bm1; /* ugly but only a test anyway */
+ MakeScreen(screen);
+ RethinkDisplay();
+
+#if 01
+ if (ansq)
+ {
+ if ((anptr[1]>0) && (anptr[1]<200))
+ Delay(anptr[1]); /* Wait 'anptr[1]' blanks */
+ }
+#endif
+
+ if (!MyModifyFrame(seq[ansq?anptr[0]:frame], bm2, decoderhandle))
+ {
+ PutStr("Can't decode frame\n");
+ goto cleanup;
+ }
+
+ if (ansq)
+ {
+ anptr+=2;
+ if (anptr[1] == -1)
+ {
+ anptr = ansq+2*(anptr[0]-1);
+ break;
+ }
+ }
+ else
+ {
+ if (++frame >= numframes)
+ break;
+ }
+ }
+ }
+ Delay(50); /* Show the last frame for 1 second */
+
+cleanup:
+ PutStr("Cleanup...\n");
+
+ if (decoderhandle)
+ FreeJDecoder(decoderhandle);
+
+ if (screen)
+ CloseScreen(screen);
+
+ if (bm2)
+ FreeBitMap(bm2);
+
+ if (bm1)
+ FreeBitMap(bm1);
+}
+
+
+/****************************************************************************
+** Entry point
+*/
+
+int main(int argc, char **argv)
+{
+ if (!(GfxBase = (struct GfxBase *)OpenLibrary("graphics.library", 39)))
+ return RETURN_FAIL;
+
+ if (!(IntuitionBase = (struct IntuitionBase *)OpenLibrary("intuition.library", 37)))
+ return RETURN_FAIL;
+
+ if (argc == 2)
+ {
+ if (IFFBase = OpenLibrary(IFFNAME, 19))
+ {
+ ShowAnim(argv[1]); /* Show the animation */
+
+ CloseLibrary(IFFBase);
+ }
+ else PutStr("No iff.library!\n");
+ }
+ else PutStr("Usage: SimpleTest <filename>\n");
+
+ CloseLibrary((struct Library *)IntuitionBase);
+ CloseLibrary((struct Library *)GfxBase);
+
+ return RETURN_OK;
+}
+
generated by cgit v1.2.3 (git 2.25.1) at 2024-11-22 02:29:05 +0000