| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | # Scan an Apple header file, generating a Python file of generator calls. | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											1998-04-17 14:07:56 +00:00
										 |  |  | import sys | 
					
						
							|  |  |  | import os | 
					
						
							|  |  |  | BGENDIR=os.path.join(sys.prefix, ':Tools:bgen:bgen') | 
					
						
							|  |  |  | sys.path.append(BGENDIR) | 
					
						
							| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | from scantools import Scanner | 
					
						
							| 
									
										
										
										
											1996-04-12 16:29:23 +00:00
										 |  |  | from bgenlocations import TOOLBOXDIR | 
					
						
							| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | 
 | 
					
						
							|  |  |  | LONG = "QuickTime" | 
					
						
							|  |  |  | SHORT = "qt" | 
					
						
							| 
									
										
										
										
											1995-12-09 14:05:56 +00:00
										 |  |  | OBJECTS = ("Movie", "Track", "Media", "UserData", "TimeBase", "MovieController") | 
					
						
							| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | 
 | 
					
						
							|  |  |  | def main(): | 
					
						
							|  |  |  | 	input = "Movies.h" | 
					
						
							|  |  |  | 	output = SHORT + "gen.py" | 
					
						
							| 
									
										
										
										
											1996-04-12 16:29:23 +00:00
										 |  |  | 	defsoutput = TOOLBOXDIR + LONG + ".py" | 
					
						
							| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | 	scanner = MyScanner(input, output, defsoutput) | 
					
						
							|  |  |  | 	scanner.scan() | 
					
						
							|  |  |  | 	scanner.close() | 
					
						
							|  |  |  | 	print "=== Done scanning and generating, now importing the generated code... ===" | 
					
						
							|  |  |  | 	exec "import " + SHORT + "support" | 
					
						
							|  |  |  | 	print "=== Done.  It's up to you to compile it now! ===" | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | class MyScanner(Scanner): | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 	def destination(self, type, name, arglist): | 
					
						
							|  |  |  | 		classname = "Function" | 
					
						
							|  |  |  | 		listname = "functions" | 
					
						
							|  |  |  | 		if arglist: | 
					
						
							|  |  |  | 			t, n, m = arglist[0] | 
					
						
							| 
									
										
										
										
											1995-11-30 17:42:08 +00:00
										 |  |  | 			if t in OBJECTS and m == "InMode": | 
					
						
							| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | 				classname = "Method" | 
					
						
							| 
									
										
										
										
											1995-11-30 17:42:08 +00:00
										 |  |  | 				listname = t + "_methods" | 
					
						
							| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | 		return classname, listname | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											1998-02-20 16:02:09 +00:00
										 |  |  | 	def writeinitialdefs(self): | 
					
						
							|  |  |  | 		self.defsfile.write("def FOUR_CHAR_CODE(x): return x\n") | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | 	def makeblacklistnames(self): | 
					
						
							|  |  |  | 		return [ | 
					
						
							|  |  |  | 			"DisposeMovie",		# Done on python-object disposal | 
					
						
							| 
									
										
										
										
											1995-11-30 17:42:08 +00:00
										 |  |  | 			"DisposeMovieTrack",	# ditto | 
					
						
							|  |  |  | 			"DisposeTrackMedia",	# ditto | 
					
						
							|  |  |  | 			"DisposeUserData",		# ditto | 
					
						
							| 
									
										
										
										
											1998-04-23 13:22:44 +00:00
										 |  |  | #			"DisposeTimeBase",		# ditto | 
					
						
							| 
									
										
										
										
											1995-12-09 14:05:56 +00:00
										 |  |  | 			"DisposeMovieController", # ditto | 
					
						
							| 
									
										
										
										
											1997-09-01 15:38:24 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											1995-11-30 17:42:08 +00:00
										 |  |  | 			# The following 4 use 'void *' in an uncontrolled way | 
					
						
							|  |  |  | 			# TBD when I've read the manual... | 
					
						
							|  |  |  | 			"GetUserDataItem", | 
					
						
							|  |  |  | 			"SetUserDataItem", | 
					
						
							|  |  |  | 			"SetTextSampleData", | 
					
						
							| 
									
										
										
										
											1997-04-09 15:53:46 +00:00
										 |  |  | 			"BeginFullScreen", | 
					
						
							| 
									
										
										
										
											1995-11-30 17:42:08 +00:00
										 |  |  | 			# bgen gets the argument in/out wrong.. | 
					
						
							|  |  |  | 			"AddTextSample", | 
					
						
							|  |  |  | 			"AddTESample", | 
					
						
							|  |  |  | 			"AddHiliteSample", | 
					
						
							|  |  |  | 			"HiliteTextSample", | 
					
						
							| 
									
										
										
										
											1998-04-21 15:23:55 +00:00
										 |  |  | 			 | 
					
						
							|  |  |  | 			"MakeTrackTimeTable", # Uses long * return? | 
					
						
							|  |  |  | 			"MakeMediaTimeTable", # ditto | 
					
						
							| 
									
										
										
										
											1999-12-12 21:41:51 +00:00
										 |  |  | ##			"VideoMediaGetStallCount", # Undefined in CW Pro 3 library | 
					
						
							| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | 			] | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2000-06-21 22:07:06 +00:00
										 |  |  | 	def makegreylist(self): | 
					
						
							|  |  |  | 		return [ | 
					
						
							| 
									
										
										
										
											2000-07-14 22:37:27 +00:00
										 |  |  | 			('#if !TARGET_API_MAC_CARBON', [ | 
					
						
							| 
									
										
										
										
											2000-06-21 22:07:06 +00:00
										 |  |  | 				'SpriteMediaGetIndImageProperty',	# XXXX Why isn't this in carbon? | 
					
						
							|  |  |  | 				'CheckQuickTimeRegistration', | 
					
						
							| 
									
										
										
										
											2001-01-09 22:09:31 +00:00
										 |  |  | 				'SetMovieAnchorDataRef', | 
					
						
							|  |  |  | 				'GetMovieAnchorDataRef', | 
					
						
							|  |  |  | 				'GetMovieLoadState', | 
					
						
							|  |  |  | 				'OpenADataHandler', | 
					
						
							|  |  |  | 				'MovieMediaGetCurrentMovieProperty', | 
					
						
							|  |  |  | 				'MovieMediaGetCurrentTrackProperty', | 
					
						
							|  |  |  | 				'MovieMediaGetChildMovieDataReference', | 
					
						
							|  |  |  | 				'MovieMediaSetChildMovieDataReference', | 
					
						
							|  |  |  | 				'MovieMediaLoadChildMovieFromDataReference', | 
					
						
							|  |  |  | 				'Media3DGetViewObject', | 
					
						
							| 
									
										
										
										
											2000-06-21 22:07:06 +00:00
										 |  |  | 			])] | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | 	def makeblacklisttypes(self): | 
					
						
							|  |  |  | 		return [ | 
					
						
							| 
									
										
										
										
											1995-11-30 17:42:08 +00:00
										 |  |  | 			# I don't think we want to do these | 
					
						
							|  |  |  | 			"QTSyncTaskPtr", | 
					
						
							|  |  |  | 			# We dont do callbacks yet, so no need for these | 
					
						
							| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | 			"QTCallBack", | 
					
						
							| 
									
										
										
										
											1995-11-30 17:42:08 +00:00
										 |  |  | 			# Skipped for now, due to laziness | 
					
						
							| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | 			"TrackEditState", | 
					
						
							|  |  |  | 			"MovieEditState", | 
					
						
							| 
									
										
										
										
											1995-11-30 17:42:08 +00:00
										 |  |  | 			"MatrixRecord", | 
					
						
							|  |  |  | 			"MatrixRecord_ptr", | 
					
						
							|  |  |  | 			"SampleReferencePtr", | 
					
						
							| 
									
										
										
										
											1998-04-21 15:23:55 +00:00
										 |  |  | 			"QTTweener", | 
					
						
							| 
									
										
										
										
											1997-09-01 15:38:24 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											1995-11-30 17:42:08 +00:00
										 |  |  | 			# Routine pointers, not yet. | 
					
						
							|  |  |  | 			"MoviesErrorUPP", | 
					
						
							|  |  |  | 			"MoviePreviewCallOutUPP", | 
					
						
							| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | 			"MovieDrawingCompleteUPP", | 
					
						
							|  |  |  | 			"QTCallBackUPP", | 
					
						
							|  |  |  | 			"TextMediaUPP", | 
					
						
							|  |  |  | 			"MovieProgressUPP", | 
					
						
							|  |  |  | 			"MovieRgnCoverUPP", | 
					
						
							|  |  |  | 			"MCActionFilterUPP", | 
					
						
							|  |  |  | 			"MCActionFilterWithRefConUPP", | 
					
						
							| 
									
										
										
										
											1995-11-30 17:42:08 +00:00
										 |  |  | 			"GetMovieUPP", | 
					
						
							|  |  |  | 			"ModalFilterUPP", | 
					
						
							| 
									
										
										
										
											1997-04-09 15:53:46 +00:00
										 |  |  | 			"TrackTransferUPP", | 
					
						
							| 
									
										
										
										
											2000-12-12 22:10:21 +00:00
										 |  |  | 			"MoviePrePrerollCompleteUPP", | 
					
						
							|  |  |  | 			"MovieExecuteWiredActionsUPP", | 
					
						
							|  |  |  | 			"QTBandwidthNotificationUPP", | 
					
						
							|  |  |  | 			"DoMCActionUPP", | 
					
						
							|  |  |  | 			 | 
					
						
							|  |  |  | 			"SampleReference64Ptr",	# Don't know what this does, yet | 
					
						
							|  |  |  | 			"QTRuntimeSpriteDescPtr", | 
					
						
							|  |  |  | 			"QTBandwidthReference", | 
					
						
							|  |  |  | 			"QTScheduledBandwidthReference", | 
					
						
							| 
									
										
										
										
											1997-02-24 13:56:59 +00:00
										 |  |  | 			"QTAtomContainer", | 
					
						
							|  |  |  | 			"SpriteWorld", | 
					
						
							|  |  |  | 			"Sprite", | 
					
						
							| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | 			] | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 	def makerepairinstructions(self): | 
					
						
							|  |  |  | 		return [ | 
					
						
							| 
									
										
										
										
											1995-11-30 17:42:08 +00:00
										 |  |  | 			([('FSSpec', '*', 'OutMode')], [('FSSpec_ptr', '*', 'InMode')]), | 
					
						
							| 
									
										
										
										
											1995-12-09 14:05:56 +00:00
										 |  |  | 			 | 
					
						
							|  |  |  | 			# Movie controller creation | 
					
						
							|  |  |  | 			([('ComponentInstance', 'NewMovieController', 'ReturnMode')], | 
					
						
							|  |  |  | 			 [('MovieController', '*', 'ReturnMode')]), | 
					
						
							|  |  |  | 			  | 
					
						
							|  |  |  | 			# NewMovieFromFile | 
					
						
							|  |  |  | 			([('short', 'resId', 'OutMode'), ('StringPtr', 'resName', 'InMode')], | 
					
						
							| 
									
										
										
										
											1997-04-09 15:53:46 +00:00
										 |  |  | 			 [('short', 'resId', 'InOutMode'), ('dummyStringPtr', 'resName', 'InMode')]), | 
					
						
							| 
									
										
										
										
											1995-12-09 14:05:56 +00:00
										 |  |  | 			  | 
					
						
							| 
									
										
										
										
											1997-02-24 13:56:59 +00:00
										 |  |  | 			# MCDoAction and more | 
					
						
							|  |  |  | 			([('void', '*', 'OutMode')], [('mcactionparams', '*', 'InMode')]), | 
					
						
							|  |  |  | 			 | 
					
						
							| 
									
										
										
										
											2000-03-03 17:06:13 +00:00
										 |  |  | 			# SetTimeBaseZero. Does not handle NULLs, unfortunately | 
					
						
							|  |  |  | 			([('TimeRecord', 'zero', 'OutMode')], [('TimeRecord', 'zero', 'InMode')]), | 
					
						
							|  |  |  | 			 | 
					
						
							|  |  |  | 			# ConvertTime and ConvertTimeScale | 
					
						
							|  |  |  | 			([('TimeRecord', 'inout', 'OutMode')], [('TimeRecord', 'inout', 'InOutMode')]), | 
					
						
							|  |  |  | 			 | 
					
						
							|  |  |  | 			# AddTime and SubtractTime | 
					
						
							|  |  |  | 			([('TimeRecord', 'dst', 'OutMode')], [('TimeRecord', 'dst', 'InOutMode')]), | 
					
						
							| 
									
										
										
										
											2001-12-18 15:39:38 +00:00
										 |  |  | 			 | 
					
						
							|  |  |  | 			# Funny definitions | 
					
						
							|  |  |  | 			([('char_ptr', '*', 'InMode')], [('stringptr', '*', 'InMode')]), | 
					
						
							|  |  |  | 			([('FSSpecPtr', '*', 'InMode')], [('FSSpec_ptr', '*', 'InMode')]), | 
					
						
							|  |  |  | 			([('unsigned_char', 'swfVersion', 'OutMode')], [('UInt8', 'swfVersion', 'OutMode')]), | 
					
						
							| 
									
										
										
										
											1995-11-30 15:03:59 +00:00
										 |  |  | 			] | 
					
						
							|  |  |  | 			 | 
					
						
							|  |  |  | if __name__ == "__main__": | 
					
						
							|  |  |  | 	main() |