mirror of
				https://github.com/python/cpython.git
				synced 2025-10-31 13:41:24 +00:00 
			
		
		
		
	
		
			
				
	
	
		
			379 lines
		
	
	
	
		
			16 KiB
		
	
	
	
		
			Python
		
	
	
	
	
	
			
		
		
	
	
			379 lines
		
	
	
	
		
			16 KiB
		
	
	
	
		
			Python
		
	
	
	
	
	
| # 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 <QuickTime/QuickTime.h>
 | |
| 
 | |
| 
 | |
| #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')
 | |
| GraphicsImportComponent = OpaqueByValueType('GraphicsImportComponent', 'CmpObj')
 | |
| GraphicsExportComponent = OpaqueByValueType('GraphicsExportComponent', 'CmpObj')
 | |
| ImageTranscoderComponent = OpaqueByValueType('ImageTranscoderComponent', 'CmpObj')
 | |
| DataCodecComponent = OpaqueByValueType('DataCodecComponent', 'CmpObj')
 | |
| GraphicImageMovieImportComponent = OpaqueByValueType('GraphicImageMovieImportComponent', 'CmpObj')
 | |
| MovieExportComponent = OpaqueByValueType('MovieExportComponent', 'CmpObj')
 | |
| MovieImportComponent = OpaqueByValueType('MovieImportComponent', 'CmpObj')
 | |
| QTVideoOutputComponent = OpaqueByValueType('QTVideoOutputComponent', 'CmpObj')
 | |
| SeqGrabComponent = OpaqueByValueType('SeqGrabComponent', 'CmpObj')
 | |
| TextExportComponent = OpaqueByValueType('TextExportComponent', 'CmpObj')
 | |
| TweenerComponent = OpaqueByValueType('TweenerComponent', 'CmpObj')
 | |
| pnotComponent = OpaqueByValueType('pnotComponent', 'CmpObj')
 | |
| VideoDigitizerComponent = OpaqueByValueType('VideoDigitizerComponent', 'CmpObj')
 | |
| 
 | |
| 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()
 | 
