# This script generates a Python interface for an Apple Macintosh Manager. # It uses the "bgen" package to generate C code. # The function specifications are generated by scanning the mamager's header file, # using the "scantools" package (customized for this particular manager). #error missing SetActionFilter import string # Declarations that change for each manager MACHEADERFILE = 'Movies.h' # The Apple header file MODNAME = '_Qt' # The name of the module OBJECTNAME = 'Movie' # The basic name of the objects used here # The following is *usually* unchanged but may still require tuning MODPREFIX = 'Qt' # The prefix for module-wide routines OBJECTTYPE = "Movie" # The C type used to represent them OBJECTPREFIX = MODPREFIX + 'Obj' # The prefix for object methods INPUTFILE = string.lower(MODPREFIX) + 'gen.py' # The file generated by the scanner OUTPUTFILE = MODNAME + "module.c" # The file generated by this program from macsupport import * # Create the type objects includestuff = includestuff + """ #include #ifdef USE_TOOLBOX_OBJECT_GLUE extern PyObject *_TrackObj_New(Track); extern int _TrackObj_Convert(PyObject *, Track *); extern PyObject *_MovieObj_New(Movie); extern int _MovieObj_Convert(PyObject *, Movie *); extern PyObject *_MovieCtlObj_New(MovieController); extern int _MovieCtlObj_Convert(PyObject *, MovieController *); extern PyObject *_TimeBaseObj_New(TimeBase); extern int _TimeBaseObj_Convert(PyObject *, TimeBase *); extern PyObject *_UserDataObj_New(UserData); extern int _UserDataObj_Convert(PyObject *, UserData *); extern PyObject *_MediaObj_New(Media); extern int _MediaObj_Convert(PyObject *, Media *); #define TrackObj_New _TrackObj_New #define TrackObj_Convert _TrackObj_Convert #define MovieObj_New _MovieObj_New #define MovieObj_Convert _MovieObj_Convert #define MovieCtlObj_New _MovieCtlObj_New #define MovieCtlObj_Convert _MovieCtlObj_Convert #define TimeBaseObj_New _TimeBaseObj_New #define TimeBaseObj_Convert _TimeBaseObj_Convert #define UserDataObj_New _UserDataObj_New #define UserDataObj_Convert _UserDataObj_Convert #define MediaObj_New _MediaObj_New #define MediaObj_Convert _MediaObj_Convert #endif /* Macro to allow us to GetNextInterestingTime without duration */ #define GetMediaNextInterestingTimeOnly(media, flags, time, rate, rv) \ GetMediaNextInterestingTime(media, flags, time, rate, rv, NULL) /* ** Parse/generate time records */ static PyObject * QtTimeRecord_New(TimeRecord *itself) { if (itself->base) return Py_BuildValue("O&lO&", PyMac_Buildwide, &itself->value, itself->scale, TimeBaseObj_New, itself->base); else return Py_BuildValue("O&lO", PyMac_Buildwide, &itself->value, itself->scale, Py_None); } static int QtTimeRecord_Convert(PyObject *v, TimeRecord *p_itself) { PyObject *base = NULL; if( !PyArg_ParseTuple(v, "O&l|O", PyMac_Getwide, &p_itself->value, &p_itself->scale, &base) ) return 0; if ( base == NULL || base == Py_None ) p_itself->base = NULL; else if ( !TimeBaseObj_Convert(base, &p_itself->base) ) return 0; return 1; } static int QtMusicMIDIPacket_Convert(PyObject *v, MusicMIDIPacket *p_itself) { int dummy; if( !PyArg_ParseTuple(v, "hls#", &p_itself->length, &p_itself->reserved, p_itself->data, dummy) ) return 0; return 1; } """ initstuff = initstuff + """ PyMac_INIT_TOOLBOX_OBJECT_NEW(Track, TrackObj_New); PyMac_INIT_TOOLBOX_OBJECT_CONVERT(Track, TrackObj_Convert); PyMac_INIT_TOOLBOX_OBJECT_NEW(Movie, MovieObj_New); PyMac_INIT_TOOLBOX_OBJECT_CONVERT(Movie, MovieObj_Convert); PyMac_INIT_TOOLBOX_OBJECT_NEW(MovieController, MovieCtlObj_New); PyMac_INIT_TOOLBOX_OBJECT_CONVERT(MovieController, MovieCtlObj_Convert); PyMac_INIT_TOOLBOX_OBJECT_NEW(TimeBase, TimeBaseObj_New); PyMac_INIT_TOOLBOX_OBJECT_CONVERT(TimeBase, TimeBaseObj_Convert); PyMac_INIT_TOOLBOX_OBJECT_NEW(UserData, UserDataObj_New); PyMac_INIT_TOOLBOX_OBJECT_CONVERT(UserData, UserDataObj_Convert); PyMac_INIT_TOOLBOX_OBJECT_NEW(Media, MediaObj_New); PyMac_INIT_TOOLBOX_OBJECT_CONVERT(Media, MediaObj_Convert); """ # Our (opaque) objects Movie = OpaqueByValueType('Movie', 'MovieObj') NullMovie = FakeType("(Movie)0") Track = OpaqueByValueType('Track', 'TrackObj') Media = OpaqueByValueType('Media', 'MediaObj') UserData = OpaqueByValueType('UserData', 'UserDataObj') TimeBase = OpaqueByValueType('TimeBase', 'TimeBaseObj') MovieController = OpaqueByValueType('MovieController', 'MovieCtlObj') IdleManager = OpaqueByValueType('IdleManager', 'IdleManagerObj') SGOutput = OpaqueByValueType('SGOutput', 'SGOutputObj') # Other opaque objects Component = OpaqueByValueType('Component', 'CmpObj') MediaHandlerComponent = OpaqueByValueType('MediaHandlerComponent', 'CmpObj') DataHandlerComponent = OpaqueByValueType('DataHandlerComponent', 'CmpObj') CompressorComponent = OpaqueByValueType('CompressorComponent', 'CmpObj') DecompressorComponent = OpaqueByValueType('DecompressorComponent', 'CmpObj') CodecComponent = OpaqueByValueType('CodecComponent', 'CmpObj') # Despite their names, these are all ComponentInstance types GraphicsImportComponent = OpaqueByValueType('GraphicsImportComponent', 'CmpInstObj') GraphicsExportComponent = OpaqueByValueType('GraphicsExportComponent', 'CmpInstObj') ImageTranscoderComponent = OpaqueByValueType('ImageTranscoderComponent', 'CmpInstObj') MovieImportComponent = OpaqueByValueType('MovieImportComponent', 'CmpInstObj') MovieExportComponent = OpaqueByValueType('MovieExportComponent', 'CmpInstObj') TextExportComponent = OpaqueByValueType('TextExportComponent', 'CmpInstObj') GraphicImageMovieImportComponent = OpaqueByValueType('GraphicImageMovieImportComponent', 'CmpInstObj') pnotComponent = OpaqueByValueType('pnotComponent', 'CmpInstObj') # DataCompressorComponent, DataDecompressorComponent would go here DataCodecComponent = OpaqueByValueType('DataCodecComponent', 'CmpInstObj') TweenerComponent = OpaqueByValueType('TweenerComponent', 'CmpInstObj') QTVideoOutputComponent = OpaqueByValueType('QTVideoOutputComponent', 'CmpInstObj') SeqGrabComponent = OpaqueByValueType('SeqGrabComponent', 'CmpInstObj') VideoDigitizerComponent = OpaqueByValueType('VideoDigitizerComponent', 'CmpInstObj') ComponentInstance = OpaqueByValueType('ComponentInstance', 'CmpInstObj') MediaHandler = OpaqueByValueType('MediaHandler', 'CmpInstObj') DataHandler = OpaqueByValueType('DataHandler', 'CmpInstObj') SGChannel = OpaqueByValueType('SGChannel', 'CmpInstObj') TunePlayer = OpaqueByValueType('TunePlayer', 'CmpInstObj') MusicComponent = OpaqueByValueType('MusicComponent', 'CmpInstObj') NoteAllocator = OpaqueByValueType('NoteAllocator', 'CmpInstObj') QTMIDIComponent = OpaqueByValueType('QTMIDIComponent', 'CmpInstObj') ConstFSSpecPtr = FSSpec_ptr GrafPtr = OpaqueByValueType("GrafPtr", "GrafObj") Byte = Boolean # XXXX For GetPaused and SetPaused RgnHandle = OpaqueByValueType("RgnHandle", "ResObj") PicHandle = OpaqueByValueType("PicHandle", "ResObj") CTabHandle = OpaqueByValueType("CTabHandle", "ResObj") PixMapHandle = OpaqueByValueType("PixMapHandle", "ResObj") SampleDescriptionHandle = OpaqueByValueType("SampleDescriptionHandle", "ResObj") ImageDescriptionHandle = OpaqueByValueType("ImageDescriptionHandle", "ResObj") TextDescriptionHandle = OpaqueByValueType("TextDescriptionHandle", "ResObj") TEHandle = OpaqueByValueType("TEHandle", "ResObj") CGrafPtr = OpaqueByValueType("CGrafPtr", "GrafObj") GDHandle = OpaqueByValueType("GDHandle", "OptResObj") AliasHandle = OpaqueByValueType("AliasHandle", "ResObj") SoundDescriptionHandle = OpaqueByValueType("SoundDescriptionHandle", "ResObj") VdigBufferRecListHandle = OpaqueByValueType("VdigBufferRecListHandle", "ResObj") VDCompressionListHandle = OpaqueByValueType("VDCompressionListHandle", "ResObj") TimeCodeDescriptionHandle = OpaqueByValueType("TimeCodeDescriptionHandle", "ResObj") DataHFileTypeOrderingHandle = OpaqueByValueType("DataHFileTypeOrderingHandle", "ResObj") QTMIDIPortListHandle = OpaqueByValueType("QTMIDIPortListHandle", "ResObj") GenericKnobDescriptionListHandle = OpaqueByValueType("GenericKnobDescriptionListHandle", "ResObj") InstrumentInfoListHandle = OpaqueByValueType("InstrumentInfoListHandle", "ResObj") # Silly Apple, passing an OStype by reference... OSType_ptr = OpaqueType("OSType", "PyMac_BuildOSType", "PyMac_GetOSType") # And even sillier: passing floats by address float_ptr = ByAddressType("float", "f") RGBColor = OpaqueType("RGBColor", "QdRGB") RGBColor_ptr = RGBColor TimeRecord = OpaqueType("TimeRecord", "QtTimeRecord") TimeRecord_ptr = TimeRecord MusicMIDIPacket = OpaqueType("MusicMIDIPacket", "QtMusicMIDIPacket") MusicMIDIPacket_ptr = MusicMIDIPacket # Non-opaque types, mostly integer-ish TimeValue = Type("TimeValue", "l") TimeScale = Type("TimeScale", "l") TimeBaseFlags = Type("TimeBaseFlags", "l") QTCallBackFlags = Type("QTCallBackFlags", "H") TimeBaseStatus = Type("TimeBaseStatus", "l") QTCallBackType = Type("QTCallBackType", "H") nextTimeFlagsEnum = Type("nextTimeFlagsEnum", "H") createMovieFileFlagsEnum = Type("createMovieFileFlagsEnum", "l") movieFlattenFlagsEnum = Type("movieFlattenFlagsEnum", "l") dataRefAttributesFlags = Type("dataRefAttributesFlags", "l") playHintsEnum = Type("playHintsEnum", "l") mediaHandlerFlagsEnum = Type("mediaHandlerFlagsEnum", "l") ComponentResult = Type("ComponentResult", "l") VideoDigitizerError = Type("ComponentResult", "l") HandlerError = Type("HandlerError", "l") Ptr = InputOnlyType("Ptr", "s") StringPtr = Type("StringPtr", "s") UnsignedLongPtr = Type("unsigned long *", "s") mcactionparams = InputOnlyType("void *", "s") QTParameterDialog = Type("QTParameterDialog", "l") QTAtomID = Type("QTAtomID", "l") MCInterfaceElement = Type("MCInterfaceElement", "l") CodecType = OSTypeType("CodecType") GWorldPtr = OpaqueByValueType("GWorldPtr", "GWorldObj") QTFloatSingle = Type("QTFloatSingle", "f") CodecQ = Type("CodecQ", "l") MusicController = Type("MusicController", "l") # Could-not-be-bothered-types (NewMovieFromFile) dummyshortptr = FakeType('(short *)0') dummyStringPtr = FakeType('(StringPtr)0') # Not-quite-sure-this-is-okay types AtomicInstrument = OpaqueByValueType("AtomicInstrument", "ResObj") AtomicInstrumentPtr = InputOnlyType("AtomicInstrumentPtr", "s") # XXXX Need to override output_tp_newBody() to allow for None initializer. class QtGlobalObjectDefinition(PEP253Mixin, GlobalObjectDefinition): def outputCheckNewArg(self): # We don't allow NULL pointers to be returned by QuickTime API calls, # in stead we raise an exception Output("""if (itself == NULL) { PyErr_SetString(Qt_Error,"Cannot create %s from NULL pointer"); return NULL; }""", self.name) def outputCheckConvertArg(self): # But what we do allow is passing None whereever a quicktime object is # expected, and pass this as NULL to the API routines. Note you can # call methods too by creating an object with None as the initializer. Output("if (v == Py_None)") OutLbrace() Output("*p_itself = NULL;") Output("return 1;") OutRbrace() class MovieObjectDefinition(QtGlobalObjectDefinition): def outputFreeIt(self, itselfname): Output("if (%s) DisposeMovie(%s);", itselfname, itselfname) class TrackObjectDefinition(QtGlobalObjectDefinition): def outputFreeIt(self, itselfname): Output("if (%s) DisposeMovieTrack(%s);", itselfname, itselfname) class MediaObjectDefinition(QtGlobalObjectDefinition): def outputFreeIt(self, itselfname): Output("if (%s) DisposeTrackMedia(%s);", itselfname, itselfname) class UserDataObjectDefinition(QtGlobalObjectDefinition): def outputFreeIt(self, itselfname): Output("if (%s) DisposeUserData(%s);", itselfname, itselfname) class TimeBaseObjectDefinition(QtGlobalObjectDefinition): pass class MovieCtlObjectDefinition(QtGlobalObjectDefinition): def outputFreeIt(self, itselfname): Output("if (%s) DisposeMovieController(%s);", itselfname, itselfname) class IdleManagerObjectDefinition(QtGlobalObjectDefinition): pass class SGOutputObjectDefinition(QtGlobalObjectDefinition): # XXXX I'm not sure I fully understand how SGOutput works. It seems it's always tied # to a specific SeqGrabComponent, but I'm not 100% sure. Also, I'm not sure all the # routines that return an SGOutput actually return a *new* SGOutput. Need to read up on # this. pass # From here on it's basically all boiler plate... # Create the generator groups and link them module = MacModule(MODNAME, MODPREFIX, includestuff, finalstuff, initstuff) Movie_object = MovieObjectDefinition('Movie', 'MovieObj', 'Movie') Track_object = TrackObjectDefinition('Track', 'TrackObj', 'Track') Media_object = MediaObjectDefinition('Media', 'MediaObj', 'Media') UserData_object = UserDataObjectDefinition('UserData', 'UserDataObj', 'UserData') TimeBase_object = TimeBaseObjectDefinition('TimeBase', 'TimeBaseObj', 'TimeBase') MovieController_object = MovieCtlObjectDefinition('MovieController', 'MovieCtlObj', 'MovieController') IdleManager_object = IdleManagerObjectDefinition('IdleManager', 'IdleManagerObj', 'IdleManager') SGOutput_object = SGOutputObjectDefinition('SGOutput', 'SGOutputObj', 'SGOutput') module.addobject(IdleManager_object) module.addobject(MovieController_object) module.addobject(TimeBase_object) module.addobject(UserData_object) module.addobject(Media_object) module.addobject(Track_object) module.addobject(Movie_object) module.addobject(SGOutput_object) # Test which types we are still missing. execfile(string.lower(MODPREFIX) + 'typetest.py') # Create the generator classes used to populate the lists Function = OSErrWeakLinkFunctionGenerator Method = OSErrWeakLinkMethodGenerator # Create and populate the lists functions = [] IdleManager_methods = [] MovieController_methods = [] TimeBase_methods = [] UserData_methods = [] Media_methods = [] Track_methods = [] Movie_methods = [] SGOutput_methods = [] execfile(INPUTFILE) # # Some functions from ImageCompression.h that we need: ICMAlignmentProcRecordPtr = FakeType('(ICMAlignmentProcRecordPtr)0') dummyRect = FakeType('(Rect *)0') f = Function(void, 'AlignWindow', (WindowPtr, 'wp', InMode), (Boolean, 'front', InMode), (dummyRect, 'alignmentRect', InMode), (ICMAlignmentProcRecordPtr, 'alignmentProc', InMode), ) functions.append(f) f = Function(void, 'DragAlignedWindow', (WindowPtr, 'wp', InMode), (Point, 'startPt', InMode), (Rect_ptr, 'boundsRect', InMode), (dummyRect, 'alignmentRect', InMode), (ICMAlignmentProcRecordPtr, 'alignmentProc', InMode), ) functions.append(f) # And we want the version of MoviesTask without a movie argument f = Function(void, 'MoviesTask', (NullMovie, 'theMovie', InMode), (long, 'maxMilliSecToUse', InMode), ) functions.append(f) # And we want a GetMediaNextInterestingTime without duration f = Method(void, 'GetMediaNextInterestingTimeOnly', (Media, 'theMedia', InMode), (short, 'interestingTimeFlags', InMode), (TimeValue, 'time', InMode), (Fixed, 'rate', InMode), (TimeValue, 'interestingTime', OutMode), ) Media_methods.append(f) # add the populated lists to the generator groups # (in a different wordl the scan program would generate this) for f in functions: module.add(f) for f in MovieController_methods: MovieController_object.add(f) for f in TimeBase_methods: TimeBase_object.add(f) for f in UserData_methods: UserData_object.add(f) for f in Media_methods: Media_object.add(f) for f in Track_methods: Track_object.add(f) for f in Movie_methods: Movie_object.add(f) # generate output (open the output file as late as possible) SetOutputFileName(OUTPUTFILE) module.generate()