Apparently the code to forestall Tk eating events was too aggressive (Tk user input...
[python/dscho.git] / Mac / Modules / icn / icnsupport.py
blob5ea6a455630a9d355fffb772f88fffede5593c2c
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).
6 import string
8 # Declarations that change for each manager
9 MACHEADERFILE = 'Icons.h' # The Apple header file
10 MODNAME = 'Icn' # The name of the module
11 OBJECTNAME = 'Icon' # The basic name of the objects used here
12 KIND = 'Handle' # Usually 'Ptr' or 'Handle'
14 # The following is *usually* unchanged but may still require tuning
15 MODPREFIX = MODNAME # The prefix for module-wide routines
16 OBJECTTYPE = OBJECTNAME + KIND # The C type used to represent them
17 OBJECTPREFIX = MODPREFIX + 'Obj' # The prefix for object methods
18 INPUTFILE = string.lower(MODPREFIX) + 'gen.py' # The file generated by the scanner
19 OUTPUTFILE = MODNAME + "module.c" # The file generated by this program
21 from macsupport import *
23 # Create the type objects
24 CIconHandle = OpaqueByValueType("CIconHandle", "ResObj")
25 IconSuiteRef = OpaqueByValueType("IconSuiteRef", "ResObj")
26 IconCacheRef = OpaqueByValueType("IconCacheRef", "ResObj")
27 IconRef = OpaqueByValueType("IconRef", "ResObj")
28 IconFamilyHandle = OpaqueByValueType("IconFamilyHandle", "ResObj")
29 RgnHandle = OpaqueByValueType("RgnHandle", "ResObj")
30 IconAlignmentType = Type("IconAlignmentType", "h")
31 IconTransformType = Type("IconTransformType", "h")
32 IconSelectorValue = Type("IconSelectorValue", "l")
33 IconServicesUsageFlags = Type("IconServicesUsageFlags", "l")
34 RGBColor = OpaqueType("RGBColor", "QdRGB")
36 #WindowPeek = OpaqueByValueType("WindowPeek", OBJECTPREFIX)
38 # RgnHandle = FakeType("(RgnHandle)0")
39 # XXXX Should be next, but this will break a lot of code...
40 # RgnHandle = OpaqueByValueType("RgnHandle", "OptResObj")
42 # KeyMap = ArrayOutputBufferType("KeyMap")
43 #MacOSEventKind = Type("MacOSEventKind", "h") # Old-style
44 #MacOSEventMask = Type("MacOSEventMask", "h") # Old-style
45 #EventMask = Type("EventMask", "H")
46 #EventKind = Type("EventKind", "H")
48 includestuff = includestuff + """
49 #include <%s>""" % MACHEADERFILE + """
50 """
52 class MyObjectDefinition(GlobalObjectDefinition):
53 def outputCheckNewArg(self):
54 Output("if (itself == NULL) return PyMac_Error(resNotFound);")
55 def outputCheckConvertArg(self):
56 OutLbrace("if (DlgObj_Check(v))")
57 Output("*p_itself = ((WindowObject *)v)->ob_itself;")
58 Output("return 1;")
59 OutRbrace()
60 Out("""
61 if (v == Py_None) { *p_itself = NULL; return 1; }
62 if (PyInt_Check(v)) { *p_itself = (WindowPtr)PyInt_AsLong(v); return 1; }
63 """)
65 # From here on it's basically all boiler plate...
67 # Create the generator groups and link them
68 module = MacModule(MODNAME, MODPREFIX, includestuff, finalstuff, initstuff)
69 ##object = MyObjectDefinition(OBJECTNAME, OBJECTPREFIX, OBJECTTYPE)
70 ##module.addobject(object)
72 # Create the generator classes used to populate the lists
73 Function = OSErrFunctionGenerator
74 ##Method = OSErrMethodGenerator
76 # Create and populate the lists
77 functions = []
78 ##methods = []
79 execfile(INPUTFILE)
81 # add the populated lists to the generator groups
82 # (in a different wordl the scan program would generate this)
83 for f in functions: module.add(f)
84 ##for f in methods: object.add(f)
86 # generate output (open the output file as late as possible)
87 SetOutputFileName(OUTPUTFILE)
88 module.generate()