| 
									
										
										
										
											1999-03-04 22:54:29 +00:00
										 |  |  | # 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). | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | import string | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | # Declarations that change for each manager | 
					
						
							|  |  |  | MACHEADERFILE = 'Appearance.h'		# The Apple header file | 
					
						
							| 
									
										
										
										
											2001-08-23 13:51:46 +00:00
										 |  |  | MODNAME = '_App'				# The name of the module | 
					
						
							| 
									
										
										
										
											1999-03-04 22:54:29 +00:00
										 |  |  | OBJECTNAME = 'UNUSED'			# The basic name of the objects used here | 
					
						
							|  |  |  | KIND = 'Record'				# Usually 'Ptr' or 'Handle' | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | # The following is *usually* unchanged but may still require tuning | 
					
						
							| 
									
										
										
										
											2001-08-23 13:51:46 +00:00
										 |  |  | MODPREFIX = 'App'			# The prefix for module-wide routines | 
					
						
							| 
									
										
										
										
											1999-03-04 22:54:29 +00:00
										 |  |  | OBJECTTYPE = OBJECTNAME + KIND		# 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 | 
					
						
							|  |  |  | #MenuRef = OpaqueByValueType("MenuRef", "MenuObj") | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | #WindowPeek = OpaqueByValueType("WindowPeek", OBJECTPREFIX) | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | RgnHandle = FakeType("(RgnHandle)0") | 
					
						
							|  |  |  | # XXXX Should be next, but this will break a lot of code... | 
					
						
							|  |  |  | # RgnHandle = OpaqueByValueType("RgnHandle", "OptResObj") | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | #KeyMap = ArrayOutputBufferType("KeyMap") | 
					
						
							|  |  |  | #MacOSEventKind = Type("MacOSEventKind", "h") # Old-style | 
					
						
							|  |  |  | #MacOSEventMask = Type("MacOSEventMask", "h") # Old-style | 
					
						
							|  |  |  | #EventMask = Type("EventMask", "h") | 
					
						
							|  |  |  | #EventKind = Type("EventKind", "h") | 
					
						
							|  |  |  | ThemeBrush = Type("ThemeBrush", "h") | 
					
						
							|  |  |  | ThemeColor = Type("ThemeColor", "h") | 
					
						
							|  |  |  | ThemeTextColor = Type("ThemeTextColor", "h") | 
					
						
							| 
									
										
										
										
											2000-07-07 13:09:35 +00:00
										 |  |  | ThemeMenuBarState = Type("ThemeMenuBarState", "H") | 
					
						
							|  |  |  | ThemeMenuState = Type("ThemeMenuState", "H") | 
					
						
							|  |  |  | ThemeMenuType = Type("ThemeMenuType", "H") | 
					
						
							|  |  |  | ThemeMenuItemType = Type("ThemeMenuItemType", "H") | 
					
						
							|  |  |  | ThemeFontID = Type("ThemeFontID", "H") | 
					
						
							|  |  |  | ThemeTabStyle = Type("ThemeTabStyle", "H") | 
					
						
							|  |  |  | ThemeTabDirection = Type("ThemeTabDirection", "H") | 
					
						
							| 
									
										
										
										
											1999-03-04 22:54:29 +00:00
										 |  |  | ThemeDrawState = Type("ThemeDrawState", "l") | 
					
						
							| 
									
										
										
										
											1999-12-10 16:16:19 +00:00
										 |  |  | ThemeCursor = Type("ThemeCursor", "l") | 
					
						
							| 
									
										
										
										
											2000-07-07 13:09:35 +00:00
										 |  |  | ThemeCheckBoxStyle = Type("ThemeCheckBoxStyle", "H") | 
					
						
							|  |  |  | ThemeScrollBarArrowStyle = Type("ThemeScrollBarArrowStyle", "H") | 
					
						
							|  |  |  | ThemeScrollBarThumbStyle = Type("ThemeScrollBarThumbStyle", "H") | 
					
						
							| 
									
										
										
										
											1999-03-04 22:54:29 +00:00
										 |  |  | CTabHandle = OpaqueByValueType("CTabHandle", "ResObj") | 
					
						
							| 
									
										
										
										
											1999-12-10 16:16:19 +00:00
										 |  |  | ThemeTrackEnableState = Type("ThemeTrackEnableState", "b") | 
					
						
							|  |  |  | ThemeTrackPressState = Type("ThemeTrackPressState", "b") | 
					
						
							|  |  |  | ThemeThumbDirection = Type("ThemeThumbDirection", "b") | 
					
						
							| 
									
										
										
										
											2000-07-07 13:09:35 +00:00
										 |  |  | ThemeTrackAttributes = Type("ThemeTrackAttributes", "H") | 
					
						
							| 
									
										
										
										
											1999-12-10 16:16:19 +00:00
										 |  |  | ControlPartCode = Type("ControlPartCode", "h") | 
					
						
							|  |  |  | ThemeWindowAttributes = Type("ThemeWindowAttributes", "l") | 
					
						
							| 
									
										
										
										
											2000-07-07 13:09:35 +00:00
										 |  |  | ThemeWindowType = Type("ThemeWindowType", "H") | 
					
						
							|  |  |  | ThemeTitleBarWidget = Type("ThemeTitleBarWidget", "H") | 
					
						
							|  |  |  | ThemeArrowOrientation = Type("ThemeArrowOrientation", "H") | 
					
						
							|  |  |  | ThemePopupArrowSize = Type("ThemePopupArrowSize", "H") | 
					
						
							|  |  |  | ThemeGrowDirection = Type("ThemeGrowDirection", "H") | 
					
						
							| 
									
										
										
										
											1999-12-10 16:16:19 +00:00
										 |  |  | ThemeSoundKind = OSTypeType("ThemeSoundKind") | 
					
						
							|  |  |  | ThemeDragSoundKind = OSTypeType("ThemeDragSoundKind") | 
					
						
							|  |  |  | ThemeBackgroundKind = Type("ThemeBackgroundKind", "l") | 
					
						
							| 
									
										
										
										
											2000-12-10 23:43:49 +00:00
										 |  |  | ThemeMetric = Type("ThemeMetric", "l") | 
					
						
							| 
									
										
										
										
											1999-12-10 16:16:19 +00:00
										 |  |  | RGBColor = OpaqueType("RGBColor", "QdRGB") | 
					
						
							| 
									
										
										
										
											2001-12-16 20:18:40 +00:00
										 |  |  | CFStringRef = OpaqueByValueType("CFStringRef", "CFStringRefObj") | 
					
						
							|  |  |  | CFMutableStringRef = OpaqueByValueType("CFMutableStringRef", "CFMutableStringRefObj") | 
					
						
							|  |  |  | TruncCode = Type("TruncCode", "h") | 
					
						
							| 
									
										
										
										
											1999-03-04 22:54:29 +00:00
										 |  |  | 
 | 
					
						
							|  |  |  | includestuff = includestuff + """
 | 
					
						
							| 
									
										
										
										
											2001-05-22 21:56:42 +00:00
										 |  |  | #ifdef WITHOUT_FRAMEWORKS | 
					
						
							|  |  |  | #include <Appearance.h> | 
					
						
							|  |  |  | #else | 
					
						
							|  |  |  | #include <Carbon/Carbon.h> | 
					
						
							|  |  |  | #endif | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											1999-03-04 22:54:29 +00:00
										 |  |  | """
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | ## class MyObjectDefinition(GlobalObjectDefinition): | 
					
						
							|  |  |  | ## 	def outputCheckNewArg(self): | 
					
						
							|  |  |  | ## 		Output("if (itself == NULL) return PyMac_Error(resNotFound);") | 
					
						
							|  |  |  | ## 	def outputCheckConvertArg(self): | 
					
						
							|  |  |  | ## 		OutLbrace("if (DlgObj_Check(v))") | 
					
						
							|  |  |  | ## 		Output("*p_itself = ((WindowObject *)v)->ob_itself;") | 
					
						
							|  |  |  | ## 		Output("return 1;") | 
					
						
							|  |  |  | ## 		OutRbrace() | 
					
						
							|  |  |  | ## 		Out(""" | 
					
						
							|  |  |  | ## 		if (v == Py_None) { *p_itself = NULL; return 1; } | 
					
						
							|  |  |  | ## 		if (PyInt_Check(v)) { *p_itself = (WindowPtr)PyInt_AsLong(v); return 1; } | 
					
						
							|  |  |  | ## 		""") | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | # From here on it's basically all boiler plate... | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | # Create the generator groups and link them | 
					
						
							|  |  |  | module = MacModule(MODNAME, MODPREFIX, includestuff, finalstuff, initstuff) | 
					
						
							|  |  |  | ##object = MyObjectDefinition(OBJECTNAME, OBJECTPREFIX, OBJECTTYPE) | 
					
						
							|  |  |  | ##module.addobject(object) | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | # Create the generator classes used to populate the lists | 
					
						
							|  |  |  | Function = OSErrFunctionGenerator | 
					
						
							|  |  |  | ##Method = OSErrMethodGenerator | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | # Create and populate the lists | 
					
						
							|  |  |  | functions = [] | 
					
						
							|  |  |  | ##methods = [] | 
					
						
							|  |  |  | execfile(INPUTFILE) | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | # 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 methods: object.add(f) | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | # generate output (open the output file as late as possible) | 
					
						
							|  |  |  | SetOutputFileName(OUTPUTFILE) | 
					
						
							|  |  |  | module.generate() | 
					
						
							|  |  |  | 
 |