mirror of
https://github.com/ctm/executor.git
synced 2024-09-26 14:55:54 +00:00
264 lines
5.0 KiB
C
264 lines
5.0 KiB
C
|
/* Copyright 1998 by Abacus Research and
|
||
|
* Development, Inc. All rights reserved.
|
||
|
*/
|
||
|
|
||
|
#if !defined (OMIT_RCSID_STRINGS)
|
||
|
char ROMlib_rcsid_qt[] =
|
||
|
"$Id: qt.c 63 2004-12-24 18:19:43Z ctm $";
|
||
|
#endif
|
||
|
|
||
|
#include "rsys/common.h"
|
||
|
#include "QuickTime.h"
|
||
|
|
||
|
#if defined (CYGWIN32)
|
||
|
|
||
|
#define LIB_LOOKUP(lib, proc) \
|
||
|
do \
|
||
|
{ \
|
||
|
proc = (void *) GetProcAddress ((lib), #proc); \
|
||
|
if (!x) \
|
||
|
{ \
|
||
|
warning_unexpected ("Couldn't find " #proc); \
|
||
|
goto error; \
|
||
|
} \
|
||
|
} \
|
||
|
while (0)
|
||
|
|
||
|
#if 0
|
||
|
PRIVATE void
|
||
|
qt_init (void)
|
||
|
{
|
||
|
HINSTANCE qtlib;
|
||
|
|
||
|
qtlib = LoadLibrary ("???");
|
||
|
LIB_LOOKUP (qtlib, EnterMovies);
|
||
|
LIB_LOOKUP (qtlib, ExitMovies);
|
||
|
LIB_LOOKUP (qtlib, MoviesTask);
|
||
|
LIB_LOOKUP (qtlib, PrerollMovie);
|
||
|
LIB_LOOKUP (qtlib, SetMovieActive);
|
||
|
LIB_LOOKUP (qtlib, StartMovie);
|
||
|
LIB_LOOKUP (qtlib, StopMovie);
|
||
|
LIB_LOOKUP (qtlib, GoToBeginningOfMovie);
|
||
|
LIB_LOOKUP (qtlib, SetMovieGWorld);
|
||
|
LIB_LOOKUP (qtlib, UpdateMovie);
|
||
|
LIB_LOOKUP (qtlib, DisposeMovie);
|
||
|
LIB_LOOKUP (qtlib, GetMovieVolume);
|
||
|
LIB_LOOKUP (qtlib, CloseMovieFile);
|
||
|
LIB_LOOKUP (qtlib, IsMovieDone);
|
||
|
LIB_LOOKUP (qtlib, NewMovieFromFile);
|
||
|
LIB_LOOKUP (qtlib, GetMoviePreferredRate);
|
||
|
LIB_LOOKUP (qtlib, GetMovieBox);
|
||
|
LIB_LOOKUP (qtlib, SetMovieBox);
|
||
|
LIB_LOOKUP (qtlib, NewMovieController);
|
||
|
LIB_LOOKUP (qtlib, DisposeMovieController);
|
||
|
LIB_LOOKUP (qtlib, OpenMovieFile);
|
||
|
}
|
||
|
#endif
|
||
|
|
||
|
#endif
|
||
|
|
||
|
P0(PUBLIC pascal trap, OSErr, EnterMovies)
|
||
|
{
|
||
|
OSErr retval;
|
||
|
|
||
|
#if !defined(CYGWIN32)
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
retval = noErr;
|
||
|
#else
|
||
|
#if 0
|
||
|
retval = EnterMovies ();
|
||
|
#else
|
||
|
retval = 0;
|
||
|
#endif
|
||
|
#endif
|
||
|
return retval;
|
||
|
}
|
||
|
|
||
|
P0(PUBLIC pascal trap, void, ExitMovies)
|
||
|
{
|
||
|
#if !defined (CYGWIN32)
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
#else
|
||
|
#if 0
|
||
|
ExitMovies ();
|
||
|
#else
|
||
|
#endif
|
||
|
#endif
|
||
|
}
|
||
|
|
||
|
P2(PUBLIC pascal trap, void, MoviesTask, Movie, movie, LONGINT, maxmillisecs)
|
||
|
{
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
}
|
||
|
|
||
|
P3(PUBLIC pascal trap, OSErr, PrerollMovie,
|
||
|
Movie, movie,
|
||
|
TimeValue, time,
|
||
|
Fixed, rate)
|
||
|
{
|
||
|
OSErr retval;
|
||
|
|
||
|
#if !defined(CYGWIN32)
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
retval = noErr;
|
||
|
#else
|
||
|
retval = 0;
|
||
|
#endif
|
||
|
return retval;
|
||
|
}
|
||
|
|
||
|
P2(PUBLIC pascal trap, void, SetMovieActive, Movie, movie, BOOLEAN, active)
|
||
|
{
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
}
|
||
|
|
||
|
P1(PUBLIC pascal trap, void, StartMovie, Movie, movie)
|
||
|
{
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
}
|
||
|
|
||
|
P1(PUBLIC pascal trap, void, StopMovie, Movie, movie)
|
||
|
{
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
}
|
||
|
|
||
|
P1(PUBLIC pascal trap, void, GoToBeginningOfMovie, Movie, movie)
|
||
|
{
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
}
|
||
|
|
||
|
P3(PUBLIC pascal trap, void, SetMovieGWorld, Movie, movie, CGrafPtr, cgrafp,
|
||
|
GDHandle, gdh)
|
||
|
{
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
}
|
||
|
|
||
|
P1(PUBLIC pascal trap, OSErr, UpdateMovie, Movie, movie)
|
||
|
{
|
||
|
OSErr retval;
|
||
|
|
||
|
#if !defined(CYGWIN32)
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
retval = noErr;
|
||
|
#else
|
||
|
retval = 0;
|
||
|
#endif
|
||
|
return retval;
|
||
|
}
|
||
|
|
||
|
P1(PUBLIC pascal trap, void, DisposeMovie, Movie, movie)
|
||
|
{
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
}
|
||
|
|
||
|
P1(PUBLIC pascal trap, INTEGER, GetMovieVolume, Movie, movie)
|
||
|
{
|
||
|
INTEGER retval;
|
||
|
|
||
|
#if !defined(CYGWIN32)
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
retval = 1;
|
||
|
#else
|
||
|
retval = 0;
|
||
|
#endif
|
||
|
return retval;
|
||
|
}
|
||
|
|
||
|
P1(PUBLIC pascal trap, OSErr, CloseMovieFile, INTEGER, refnum)
|
||
|
{
|
||
|
OSErr retval;
|
||
|
|
||
|
#if !defined(CYGWIN32)
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
retval = noErr;
|
||
|
#else
|
||
|
retval = 0;
|
||
|
#endif
|
||
|
return retval;
|
||
|
}
|
||
|
|
||
|
P1(PUBLIC pascal trap, BOOLEAN, IsMovieDone, Movie, movie)
|
||
|
{
|
||
|
BOOLEAN retval;
|
||
|
|
||
|
#if !defined(CYGWIN32)
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
retval = TRUE;
|
||
|
#else
|
||
|
retval = 0;
|
||
|
#endif
|
||
|
return retval;
|
||
|
}
|
||
|
|
||
|
P6(PUBLIC pascal trap, OSErr, NewMovieFromFile, Movie *, moviep,
|
||
|
INTEGER, refnum, INTEGER *, residp, StringPtr, resnamep, INTEGER, flags,
|
||
|
BOOLEAN *, datarefwaschangedp)
|
||
|
{
|
||
|
OSErr retval;
|
||
|
|
||
|
#if !defined(CYGWIN32)
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
retval = noErr;
|
||
|
#else
|
||
|
retval = 0;
|
||
|
#endif
|
||
|
return retval;
|
||
|
}
|
||
|
|
||
|
P1(PUBLIC pascal trap, Fixed, GetMoviePreferredRate, Movie, movie)
|
||
|
{
|
||
|
Fixed retval;
|
||
|
|
||
|
#if !defined(CYGWIN32)
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
retval = 0;
|
||
|
#else
|
||
|
retval = 0;
|
||
|
#endif
|
||
|
return retval;
|
||
|
}
|
||
|
|
||
|
P2(PUBLIC pascal trap, void, GetMovieBox, Movie, movie, Rect *, boxp)
|
||
|
{
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
}
|
||
|
|
||
|
P2(PUBLIC pascal trap, void, SetMovieBox, Movie, movie, const Rect *, boxp)
|
||
|
{
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
}
|
||
|
|
||
|
P3(PUBLIC pascal trap, ComponentInstance, NewMovieController, Movie, movie,
|
||
|
const Rect *, movierectp, LONGINT, flags)
|
||
|
{
|
||
|
ComponentInstance retval;
|
||
|
|
||
|
#if !defined(CYGWIN32)
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
retval = 0;
|
||
|
#else
|
||
|
retval = 0;
|
||
|
#endif
|
||
|
return retval;
|
||
|
}
|
||
|
|
||
|
P1(PUBLIC pascal trap, void, DisposeMovieController,
|
||
|
ComponentInstance, controller)
|
||
|
{
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
}
|
||
|
|
||
|
P3(PUBLIC pascal trap, OSErr, OpenMovieFile, const FSSpec *, filespecp,
|
||
|
INTEGER *, refnump, uint8, perm)
|
||
|
{
|
||
|
OSErr retval;
|
||
|
|
||
|
#if !defined(CYGWIN32)
|
||
|
warning_unimplemented (NULL_STRING);
|
||
|
retval = fnfErr;
|
||
|
#else
|
||
|
retval = 0;
|
||
|
#endif
|
||
|
return retval;
|
||
|
}
|