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).
8 # Declarations that change for each manager
9 MACHEADERFILE
= 'Menus.h' # The Apple header file
10 MODNAME
= 'Menu' # The name of the module
11 OBJECTNAME
= 'Menu' # The basic name of the objects used here
13 # The following is *usually* unchanged but may still require tuning
14 MODPREFIX
= MODNAME
# The prefix for module-wide routines
15 OBJECTTYPE
= OBJECTNAME
+ 'Handle' # The C type used to represent them
16 OBJECTPREFIX
= MODPREFIX
+ 'Obj' # The prefix for object methods
17 INPUTFILE
= string
.lower(MODPREFIX
) + 'gen.py' # The file generated by the scanner
18 EXTRAFILE
= string
.lower(MODPREFIX
) + 'edit.py' # A similar file but hand-made
19 OUTPUTFILE
= MODNAME
+ "module.c" # The file generated by this program
21 from macsupport
import *
23 # Create the type objects
25 MenuHandle
= OpaqueByValueType(OBJECTTYPE
, OBJECTPREFIX
)
27 Handle
= OpaqueByValueType("Handle", "ResObj")
28 MenuBarHandle
= OpaqueByValueType("MenuBarHandle", "ResObj")
29 MenuID
= Type("MenuID", "h")
30 MenuItemIndex
= Type("MenuItemIndex", "h")
31 MenuCommand
= Type("MenuCommand", "l")
32 MenuAttributes
= Type("MenuAttributes", "l")
33 MenuItemAttributes
= Type("MenuItemAttributes", "l")
34 unsigned_char
= Type('unsigned char', 'b')
35 FMFontFamily
= Type("FMFontFamily", "h")
36 FMFontStyle
= Type("FMFontStyle", "h")
38 includestuff
= includestuff
+ """
39 #include <Devices.h> /* Defines OpenDeskAcc in universal headers */
40 #include <%s>""" % MACHEADERFILE
+ """
42 #if !ACCESSOR_CALLS_ARE_FUNCTIONS
43 #define GetMenuID(menu) ((*(menu))->menuID)
44 #define GetMenuWidth(menu) ((*(menu))->menuWidth)
45 #define GetMenuHeight(menu) ((*(menu))->menuHeight)
47 #define SetMenuID(menu, id) ((*(menu))->menuID = (id))
48 #define SetMenuWidth(menu, width) ((*(menu))->menuWidth = (width))
49 #define SetMenuHeight(menu, height) ((*(menu))->menuHeight = (height))
52 #define as_Menu(h) ((MenuHandle)h)
53 #define as_Resource(h) ((Handle)h)
56 class MyObjectDefinition(GlobalObjectDefinition
):
59 # Create the generator groups and link them
60 module
= MacModule(MODNAME
, MODPREFIX
, includestuff
, finalstuff
, initstuff
)
61 object = MyObjectDefinition(OBJECTNAME
, OBJECTPREFIX
, OBJECTTYPE
)
62 module
.addobject(object)
64 # Create the generator classes used to populate the lists
65 Function
= OSErrFunctionGenerator
66 Method
= OSErrMethodGenerator
68 # Create and populate the lists
74 # add the populated lists to the generator groups
75 for f
in functions
: module
.add(f
)
76 for f
in methods
: object.add(f
)
78 # generate output (open the output file as late as possible)
79 SetOutputFileName(OUTPUTFILE
)