1 # This script generates a Python interface for an Apple Macintosh Manager. 2 # It uses the "bgen" package to generate C code. 3 # The function specifications are generated by scanning the mamager's header file, 4 # using the "scantools" package (customized for this particular manager). 5 6 #error missing SetActionFilter 7 8 import string 9 10 # Declarations that change for each manager 11 MACHEADERFILE = 'Movies.h' # The Apple header file 12 MODNAME = '_Qt' # The name of the module 13 OBJECTNAME = 'Movie' # The basic name of the objects used here 14 15 # The following is *usually* unchanged but may still require tuning 16 MODPREFIX = 'Qt' # The prefix for module-wide routines 17 OBJECTTYPE = "Movie" # The C type used to represent them 18 OBJECTPREFIX = MODPREFIX + 'Obj' # The prefix for object methods 19 INPUTFILE = string.lower(MODPREFIX) + 'gen.py' # The file generated by the scanner 20 OUTPUTFILE = MODNAME + "module.c" # The file generated by this program 21 22 from macsupport import * 23 24 # Create the type objects 25 26 includestuff = includestuff + """ 27 #include <QuickTime/QuickTime.h> 28 29 30 #ifdef USE_TOOLBOX_OBJECT_GLUE 31 extern PyObject *_TrackObj_New(Track); 32 extern int _TrackObj_Convert(PyObject *, Track *); 33 extern PyObject *_MovieObj_New(Movie); 34 extern int _MovieObj_Convert(PyObject *, Movie *); 35 extern PyObject *_MovieCtlObj_New(MovieController); 36 extern int _MovieCtlObj_Convert(PyObject *, MovieController *); 37 extern PyObject *_TimeBaseObj_New(TimeBase); 38 extern int _TimeBaseObj_Convert(PyObject *, TimeBase *); 39 extern PyObject *_UserDataObj_New(UserData); 40 extern int _UserDataObj_Convert(PyObject *, UserData *); 41 extern PyObject *_MediaObj_New(Media); 42 extern int _MediaObj_Convert(PyObject *, Media *); 43 44 #define TrackObj_New _TrackObj_New 45 #define TrackObj_Convert _TrackObj_Convert 46 #define MovieObj_New _MovieObj_New 47 #define MovieObj_Convert _MovieObj_Convert 48 #define MovieCtlObj_New _MovieCtlObj_New 49 #define MovieCtlObj_Convert _MovieCtlObj_Convert 50 #define TimeBaseObj_New _TimeBaseObj_New 51 #define TimeBaseObj_Convert _TimeBaseObj_Convert 52 #define UserDataObj_New _UserDataObj_New 53 #define UserDataObj_Convert _UserDataObj_Convert 54 #define MediaObj_New _MediaObj_New 55 #define MediaObj_Convert _MediaObj_Convert 56 #endif 57 58 /* Macro to allow us to GetNextInterestingTime without duration */ 59 #define GetMediaNextInterestingTimeOnly(media, flags, time, rate, rv) \ 60 GetMediaNextInterestingTime(media, flags, time, rate, rv, NULL) 61 62 /* 63 ** Parse/generate time records 64 */ 65 static PyObject * 66 QtTimeRecord_New(TimeRecord *itself) 67 { 68 if (itself->base) 69 return Py_BuildValue("O&lO&", PyMac_Buildwide, &itself->value, itself->scale, 70 TimeBaseObj_New, itself->base); 71 else 72 return Py_BuildValue("O&lO", PyMac_Buildwide, &itself->value, itself->scale, 73 Py_None); 74 } 75 76 static int 77 QtTimeRecord_Convert(PyObject *v, TimeRecord *p_itself) 78 { 79 PyObject *base = NULL; 80 if( !PyArg_ParseTuple(v, "O&l|O", PyMac_Getwide, &p_itself->value, &p_itself->scale, 81 &base) ) 82 return 0; 83 if ( base == NULL || base == Py_None ) 84 p_itself->base = NULL; 85 else 86 if ( !TimeBaseObj_Convert(base, &p_itself->base) ) 87 return 0; 88 return 1; 89 } 90 91 static int 92 QtMusicMIDIPacket_Convert(PyObject *v, MusicMIDIPacket *p_itself) 93 { 94 int dummy; 95 96 if( !PyArg_ParseTuple(v, "hls#", &p_itself->length, &p_itself->reserved, p_itself->data, dummy) ) 97 return 0; 98 return 1; 99 } 100 101 102 103 """ 104 105 initstuff = initstuff + """ 106 PyMac_INIT_TOOLBOX_OBJECT_NEW(Track, TrackObj_New); 107 PyMac_INIT_TOOLBOX_OBJECT_CONVERT(Track, TrackObj_Convert); 108 PyMac_INIT_TOOLBOX_OBJECT_NEW(Movie, MovieObj_New); 109 PyMac_INIT_TOOLBOX_OBJECT_CONVERT(Movie, MovieObj_Convert); 110 PyMac_INIT_TOOLBOX_OBJECT_NEW(MovieController, MovieCtlObj_New); 111 PyMac_INIT_TOOLBOX_OBJECT_CONVERT(MovieController, MovieCtlObj_Convert); 112 PyMac_INIT_TOOLBOX_OBJECT_NEW(TimeBase, TimeBaseObj_New); 113 PyMac_INIT_TOOLBOX_OBJECT_CONVERT(TimeBase, TimeBaseObj_Convert); 114 PyMac_INIT_TOOLBOX_OBJECT_NEW(UserData, UserDataObj_New); 115 PyMac_INIT_TOOLBOX_OBJECT_CONVERT(UserData, UserDataObj_Convert); 116 PyMac_INIT_TOOLBOX_OBJECT_NEW(Media, MediaObj_New); 117 PyMac_INIT_TOOLBOX_OBJECT_CONVERT(Media, MediaObj_Convert); 118 """ 119 120 # Our (opaque) objects 121 Movie = OpaqueByValueType('Movie', 'MovieObj') 122 NullMovie = FakeType("(Movie)0") 123 Track = OpaqueByValueType('Track', 'TrackObj') 124 Media = OpaqueByValueType('Media', 'MediaObj') 125 UserData = OpaqueByValueType('UserData', 'UserDataObj') 126 TimeBase = OpaqueByValueType('TimeBase', 'TimeBaseObj') 127 MovieController = OpaqueByValueType('MovieController', 'MovieCtlObj') 128 IdleManager = OpaqueByValueType('IdleManager', 'IdleManagerObj') 129 SGOutput = OpaqueByValueType('SGOutput', 'SGOutputObj') 130 131 # Other opaque objects 132 Component = OpaqueByValueType('Component', 'CmpObj') 133 MediaHandlerComponent = OpaqueByValueType('MediaHandlerComponent', 'CmpObj') 134 DataHandlerComponent = OpaqueByValueType('DataHandlerComponent', 'CmpObj') 135 CompressorComponent = OpaqueByValueType('CompressorComponent', 'CmpObj') 136 DecompressorComponent = OpaqueByValueType('DecompressorComponent', 'CmpObj') 137 CodecComponent = OpaqueByValueType('CodecComponent', 'CmpObj') 138 139 # Despite their names, these are all ComponentInstance types 140 GraphicsImportComponent = OpaqueByValueType('GraphicsImportComponent', 'CmpInstObj') 141 GraphicsExportComponent = OpaqueByValueType('GraphicsExportComponent', 'CmpInstObj') 142 ImageTranscoderComponent = OpaqueByValueType('ImageTranscoderComponent', 'CmpInstObj') 143 MovieImportComponent = OpaqueByValueType('MovieImportComponent', 'CmpInstObj') 144 MovieExportComponent = OpaqueByValueType('MovieExportComponent', 'CmpInstObj') 145 TextExportComponent = OpaqueByValueType('TextExportComponent', 'CmpInstObj') 146 GraphicImageMovieImportComponent = OpaqueByValueType('GraphicImageMovieImportComponent', 'CmpInstObj') 147 pnotComponent = OpaqueByValueType('pnotComponent', 'CmpInstObj') 148 # DataCompressorComponent, DataDecompressorComponent would go here 149 DataCodecComponent = OpaqueByValueType('DataCodecComponent', 'CmpInstObj') 150 TweenerComponent = OpaqueByValueType('TweenerComponent', 'CmpInstObj') 151 QTVideoOutputComponent = OpaqueByValueType('QTVideoOutputComponent', 'CmpInstObj') 152 SeqGrabComponent = OpaqueByValueType('SeqGrabComponent', 'CmpInstObj') 153 VideoDigitizerComponent = OpaqueByValueType('VideoDigitizerComponent', 'CmpInstObj') 154 155 ComponentInstance = OpaqueByValueType('ComponentInstance', 'CmpInstObj') 156 MediaHandler = OpaqueByValueType('MediaHandler', 'CmpInstObj') 157 DataHandler = OpaqueByValueType('DataHandler', 'CmpInstObj') 158 SGChannel = OpaqueByValueType('SGChannel', 'CmpInstObj') 159 TunePlayer = OpaqueByValueType('TunePlayer', 'CmpInstObj') 160 MusicComponent = OpaqueByValueType('MusicComponent', 'CmpInstObj') 161 NoteAllocator = OpaqueByValueType('NoteAllocator', 'CmpInstObj') 162 QTMIDIComponent = OpaqueByValueType('QTMIDIComponent', 'CmpInstObj') 163 164 ConstFSSpecPtr = FSSpec_ptr 165 GrafPtr = OpaqueByValueType("GrafPtr", "GrafObj") 166 Byte = Boolean # XXXX For GetPaused and SetPaused 167 168 RgnHandle = OpaqueByValueType("RgnHandle", "ResObj") 169 PicHandle = OpaqueByValueType("PicHandle", "ResObj") 170 CTabHandle = OpaqueByValueType("CTabHandle", "ResObj") 171 PixMapHandle = OpaqueByValueType("PixMapHandle", "ResObj") 172 SampleDescriptionHandle = OpaqueByValueType("SampleDescriptionHandle", "ResObj") 173 ImageDescriptionHandle = OpaqueByValueType("ImageDescriptionHandle", "ResObj") 174 TextDescriptionHandle = OpaqueByValueType("TextDescriptionHandle", "ResObj") 175 TEHandle = OpaqueByValueType("TEHandle", "ResObj") 176 CGrafPtr = OpaqueByValueType("CGrafPtr", "GrafObj") 177 GDHandle = OpaqueByValueType("GDHandle", "OptResObj") 178 AliasHandle = OpaqueByValueType("AliasHandle", "ResObj") 179 SoundDescriptionHandle = OpaqueByValueType("SoundDescriptionHandle", "ResObj") 180 VdigBufferRecListHandle = OpaqueByValueType("VdigBufferRecListHandle", "ResObj") 181 VDCompressionListHandle = OpaqueByValueType("VDCompressionListHandle", "ResObj") 182 TimeCodeDescriptionHandle = OpaqueByValueType("TimeCodeDescriptionHandle", "ResObj") 183 DataHFileTypeOrderingHandle = OpaqueByValueType("DataHFileTypeOrderingHandle", "ResObj") 184 QTMIDIPortListHandle = OpaqueByValueType("QTMIDIPortListHandle", "ResObj") 185 GenericKnobDescriptionListHandle = OpaqueByValueType("GenericKnobDescriptionListHandle", "ResObj") 186 InstrumentInfoListHandle = OpaqueByValueType("InstrumentInfoListHandle", "ResObj") 187 # Silly Apple, passing an OStype by reference... 188 OSType_ptr = OpaqueType("OSType", "PyMac_BuildOSType", "PyMac_GetOSType") 189 # And even sillier: passing floats by address 190 float_ptr = ByAddressType("float", "f") 191 192 RGBColor = OpaqueType("RGBColor", "QdRGB") 193 RGBColor_ptr = RGBColor 194 TimeRecord = OpaqueType("TimeRecord", "QtTimeRecord") 195 TimeRecord_ptr = TimeRecord 196 MusicMIDIPacket = OpaqueType("MusicMIDIPacket", "QtMusicMIDIPacket") 197 MusicMIDIPacket_ptr = MusicMIDIPacket 198 199 # Non-opaque types, mostly integer-ish 200 TimeValue = Type("TimeValue", "l") 201 TimeScale = Type("TimeScale", "l") 202 TimeBaseFlags = Type("TimeBaseFlags", "l") 203 QTCallBackFlags = Type("QTCallBackFlags", "H") 204 TimeBaseStatus = Type("TimeBaseStatus", "l") 205 QTCallBackType = Type("QTCallBackType", "H") 206 nextTimeFlagsEnum = Type("nextTimeFlagsEnum", "H") 207 createMovieFileFlagsEnum = Type("createMovieFileFlagsEnum", "l") 208 movieFlattenFlagsEnum = Type("movieFlattenFlagsEnum", "l") 209 dataRefAttributesFlags = Type("dataRefAttributesFlags", "l") 210 playHintsEnum = Type("playHintsEnum", "l") 211 mediaHandlerFlagsEnum = Type("mediaHandlerFlagsEnum", "l") 212 ComponentResult = Type("ComponentResult", "l") 213 VideoDigitizerError = Type("ComponentResult", "l") 214 HandlerError = Type("HandlerError", "l") 215 Ptr = InputOnlyType("Ptr", "s") 216 StringPtr = Type("StringPtr", "s") 217 UnsignedLongPtr = Type("unsigned long *", "s") 218 mcactionparams = InputOnlyType("void *", "s") 219 QTParameterDialog = Type("QTParameterDialog", "l") 220 QTAtomID = Type("QTAtomID", "l") 221 MCInterfaceElement = Type("MCInterfaceElement", "l") 222 CodecType = OSTypeType("CodecType") 223 GWorldPtr = OpaqueByValueType("GWorldPtr", "GWorldObj") 224 QTFloatSingle = Type("QTFloatSingle", "f") 225 CodecQ = Type("CodecQ", "l") 226 MusicController = Type("MusicController", "l") 227 228 # Could-not-be-bothered-types (NewMovieFromFile) 229 dummyshortptr = FakeType('(short *)0') 230 dummyStringPtr = FakeType('(StringPtr)0') 231 232 # Not-quite-sure-this-is-okay types 233 AtomicInstrument = OpaqueByValueType("AtomicInstrument", "ResObj") 234 AtomicInstrumentPtr = InputOnlyType("AtomicInstrumentPtr", "s") 235 236 # XXXX Need to override output_tp_newBody() to allow for None initializer. 237 class QtGlobalObjectDefinition(PEP253Mixin, GlobalObjectDefinition): 238 def outputCheckNewArg(self): 239 # We don't allow NULL pointers to be returned by QuickTime API calls, 240 # in stead we raise an exception 241 Output("""if (itself == NULL) { 242 PyErr_SetString(Qt_Error,"Cannot create %s from NULL pointer"); 243 return NULL; 244 }""", self.name) 245 246 def outputCheckConvertArg(self): 247 # But what we do allow is passing None whereever a quicktime object is 248 # expected, and pass this as NULL to the API routines. Note you can 249 # call methods too by creating an object with None as the initializer. 250 Output("if (v == Py_None)") 251 OutLbrace() 252 Output("*p_itself = NULL;") 253 Output("return 1;") 254 OutRbrace() 255 256 class MovieObjectDefinition(QtGlobalObjectDefinition): 257 def outputFreeIt(self, itselfname): 258 Output("if (%s) DisposeMovie(%s);", itselfname, itselfname) 259 260 class TrackObjectDefinition(QtGlobalObjectDefinition): 261 def outputFreeIt(self, itselfname): 262 Output("if (%s) DisposeMovieTrack(%s);", itselfname, itselfname) 263 264 class MediaObjectDefinition(QtGlobalObjectDefinition): 265 def outputFreeIt(self, itselfname): 266 Output("if (%s) DisposeTrackMedia(%s);", itselfname, itselfname) 267 268 class UserDataObjectDefinition(QtGlobalObjectDefinition): 269 def outputFreeIt(self, itselfname): 270 Output("if (%s) DisposeUserData(%s);", itselfname, itselfname) 271 272 class TimeBaseObjectDefinition(QtGlobalObjectDefinition): 273 pass 274 275 class MovieCtlObjectDefinition(QtGlobalObjectDefinition): 276 def outputFreeIt(self, itselfname): 277 Output("if (%s) DisposeMovieController(%s);", itselfname, itselfname) 278 279 class IdleManagerObjectDefinition(QtGlobalObjectDefinition): 280 pass 281 282 class SGOutputObjectDefinition(QtGlobalObjectDefinition): 283 # XXXX I'm not sure I fully understand how SGOutput works. It seems it's always tied 284 # to a specific SeqGrabComponent, but I'm not 100% sure. Also, I'm not sure all the 285 # routines that return an SGOutput actually return a *new* SGOutput. Need to read up on 286 # this. 287 pass 288 289 290 # From here on it's basically all boiler plate... 291 292 # Create the generator groups and link them 293 module = MacModule(MODNAME, MODPREFIX, includestuff, finalstuff, initstuff) 294 Movie_object = MovieObjectDefinition('Movie', 'MovieObj', 'Movie') 295 Track_object = TrackObjectDefinition('Track', 'TrackObj', 'Track') 296 Media_object = MediaObjectDefinition('Media', 'MediaObj', 'Media') 297 UserData_object = UserDataObjectDefinition('UserData', 'UserDataObj', 'UserData') 298 TimeBase_object = TimeBaseObjectDefinition('TimeBase', 'TimeBaseObj', 'TimeBase') 299 MovieController_object = MovieCtlObjectDefinition('MovieController', 'MovieCtlObj', 'MovieController') 300 IdleManager_object = IdleManagerObjectDefinition('IdleManager', 'IdleManagerObj', 'IdleManager') 301 SGOutput_object = SGOutputObjectDefinition('SGOutput', 'SGOutputObj', 'SGOutput') 302 303 module.addobject(IdleManager_object) 304 module.addobject(MovieController_object) 305 module.addobject(TimeBase_object) 306 module.addobject(UserData_object) 307 module.addobject(Media_object) 308 module.addobject(Track_object) 309 module.addobject(Movie_object) 310 module.addobject(SGOutput_object) 311 312 # Test which types we are still missing. 313 execfile(string.lower(MODPREFIX) + 'typetest.py') 314 315 # Create the generator classes used to populate the lists 316 Function = OSErrWeakLinkFunctionGenerator 317 Method = OSErrWeakLinkMethodGenerator 318 319 # Create and populate the lists 320 functions = [] 321 IdleManager_methods = [] 322 MovieController_methods = [] 323 TimeBase_methods = [] 324 UserData_methods = [] 325 Media_methods = [] 326 Track_methods = [] 327 Movie_methods = [] 328 SGOutput_methods = [] 329 execfile(INPUTFILE) 330 331 # 332 # Some functions from ImageCompression.h that we need: 333 ICMAlignmentProcRecordPtr = FakeType('(ICMAlignmentProcRecordPtr)0') 334 dummyRect = FakeType('(Rect *)0') 335 336 f = Function(void, 'AlignWindow', 337 (WindowPtr, 'wp', InMode), 338 (Boolean, 'front', InMode), 339 (dummyRect, 'alignmentRect', InMode), 340 (ICMAlignmentProcRecordPtr, 'alignmentProc', InMode), 341 ) 342 functions.append(f) 343 344 f = Function(void, 'DragAlignedWindow', 345 (WindowPtr, 'wp', InMode), 346 (Point, 'startPt', InMode), 347 (Rect_ptr, 'boundsRect', InMode), 348 (dummyRect, 'alignmentRect', InMode), 349 (ICMAlignmentProcRecordPtr, 'alignmentProc', InMode), 350 ) 351 functions.append(f) 352 353 # And we want the version of MoviesTask without a movie argument 354 f = Function(void, 'MoviesTask', 355 (NullMovie, 'theMovie', InMode), 356 (long, 'maxMilliSecToUse', InMode), 357 ) 358 functions.append(f) 359 360 # And we want a GetMediaNextInterestingTime without duration 361 f = Method(void, 'GetMediaNextInterestingTimeOnly', 362 (Media, 'theMedia', InMode), 363 (short, 'interestingTimeFlags', InMode), 364 (TimeValue, 'time', InMode), 365 (Fixed, 'rate', InMode), 366 (TimeValue, 'interestingTime', OutMode), 367 ) 368 Media_methods.append(f) 369 370 # add the populated lists to the generator groups 371 # (in a different wordl the scan program would generate this) 372 for f in functions: module.add(f) 373 for f in MovieController_methods: MovieController_object.add(f) 374 for f in TimeBase_methods: TimeBase_object.add(f) 375 for f in UserData_methods: UserData_object.add(f) 376 for f in Media_methods: Media_object.add(f) 377 for f in Track_methods: Track_object.add(f) 378 for f in Movie_methods: Movie_object.add(f) 379 380 # generate output (open the output file as late as possible) 381 SetOutputFileName(OUTPUTFILE) 382 module.generate() 383