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
= 'TextEdit.h' # The Apple header file
10 MODNAME
= '_TE' # The name of the module
11 OBJECTNAME
= 'TE' # 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
= 'TE' # The prefix for module-wide routines
16 OBJECTTYPE
= "TEHandle" # 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 TEHandle
= OpaqueByValueType("TEHandle", "TEObj")
25 CharsHandle
= OpaqueByValueType("CharsHandle", "ResObj")
26 Handle
= OpaqueByValueType("Handle", "ResObj")
27 StScrpHandle
= OpaqueByValueType("StScrpHandle", "ResObj")
28 TEStyleHandle
= OpaqueByValueType("TEStyleHandle", "ResObj")
29 RgnHandle
= OpaqueByValueType("RgnHandle", "ResObj")
31 TextStyle
= OpaqueType("TextStyle", "TextStyle")
32 TextStyle_ptr
= TextStyle
34 includestuff
= includestuff
+ """
35 #ifdef WITHOUT_FRAMEWORKS
38 #include <Carbon/Carbon.h>
41 #ifdef USE_TOOLBOX_OBJECT_GLUE
42 extern PyObject *_TEObj_New(TEHandle);
43 extern int _TEObj_Convert(PyObject *, TEHandle *);
45 #define TEObj_New _TEObj_New
46 #define TEObj_Convert _TEObj_Convert
49 #define as_TE(h) ((TEHandle)h)
50 #define as_Resource(teh) ((Handle)teh)
53 ** Parse/generate TextStyle records
56 TextStyle_New(TextStylePtr itself)
59 return Py_BuildValue("lllO&", (long)itself->tsFont, (long)itself->tsFace, (long)itself->tsSize, QdRGB_New,
64 TextStyle_Convert(PyObject *v, TextStylePtr p_itself)
66 long font, face, size;
68 if( !PyArg_ParseTuple(v, "lllO&", &font, &face, &size, QdRGB_Convert, &p_itself->tsColor) )
70 p_itself->tsFont = (short)font;
71 p_itself->tsFace = (Style)face;
72 p_itself->tsSize = (short)size;
77 initstuff
= initstuff
+ """
78 PyMac_INIT_TOOLBOX_OBJECT_NEW(TEHandle, TEObj_New);
79 PyMac_INIT_TOOLBOX_OBJECT_CONVERT(TEHandle, TEObj_Convert);
82 class TEMethodGenerator(OSErrWeakLinkMethodGenerator
):
83 """Similar to MethodGenerator, but has self as last argument"""
85 def parseArgumentList(self
, args
):
86 args
, a0
= args
[:-1], args
[-1]
89 raise ValueError, "method's 'self' must be 'InMode'"
90 self
.itself
= Variable(t0
, "_self->ob_itself", SelfMode
)
91 FunctionGenerator
.parseArgumentList(self
, args
)
92 self
.argumentList
.append(self
.itself
)
96 class MyObjectDefinition(PEP253Mixin
, GlobalObjectDefinition
):
97 # XXXX Could be subtype of Resource
98 # Attributes that can be set.
102 'return Py_BuildValue("O&", PyMac_BuildRect, &(*self->ob_itself)->destRect);',
104 'Destination rectangle'
107 'return Py_BuildValue("O&", PyMac_BuildRect, &(*self->ob_itself)->viewRect);',
112 'return Py_BuildValue("O&", PyMac_BuildRect, &(*self->ob_itself)->selRect);',
114 'Selection rectangle'
117 'return Py_BuildValue("h", (*self->ob_itself)->lineHeight);',
122 'return Py_BuildValue("h", (*self->ob_itself)->fontAscent);',
127 'return Py_BuildValue("O&", PyMac_BuildPoint, (*self->ob_itself)->selPoint);',
132 'return Py_BuildValue("h", (*self->ob_itself)->selStart);',
137 'return Py_BuildValue("h", (*self->ob_itself)->selEnd);',
142 'return Py_BuildValue("h", (*self->ob_itself)->active);',
147 'return Py_BuildValue("h", (*self->ob_itself)->just);',
152 'return Py_BuildValue("h", (*self->ob_itself)->teLength);',
157 'return Py_BuildValue("h", (*self->ob_itself)->txFont);',
162 'return Py_BuildValue("h", (*self->ob_itself)->txFace);',
164 'Current font variant'
167 'return Py_BuildValue("h", (*self->ob_itself)->txMode);',
169 'Current text-drawing mode'
172 'return Py_BuildValue("h", (*self->ob_itself)->txSize);',
177 'return Py_BuildValue("h", (*self->ob_itself)->nLines);',
182 def outputCheckNewArg(self
):
183 Output("""if (itself == NULL) {
184 PyErr_SetString(TE_Error,"Cannot create null TE");
187 def outputFreeIt(self
, itselfname
):
188 Output("TEDispose(%s);", itselfname
)
191 # From here on it's basically all boiler plate...
193 # Create the generator groups and link them
194 module
= MacModule(MODNAME
, MODPREFIX
, includestuff
, finalstuff
, initstuff
)
195 object = MyObjectDefinition(OBJECTNAME
, OBJECTPREFIX
, OBJECTTYPE
)
196 module
.addobject(object)
198 # Create the generator classes used to populate the lists
199 Function
= OSErrWeakLinkFunctionGenerator
200 Method
= TEMethodGenerator
202 # Create and populate the lists
207 # Converter from/to handle
208 f
= Function(TEHandle
, 'as_TE', (Handle
, 'h', InMode
))
210 f
= Method(Handle
, 'as_Resource', (TEHandle
, 'teh', InMode
))
213 # add the populated lists to the generator groups
214 # (in a different wordl the scan program would generate this)
215 for f
in functions
: module
.add(f
)
216 for f
in methods
: object.add(f
)
218 # generate output (open the output file as late as possible)
219 SetOutputFileName(OUTPUTFILE
)