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).
5
6import string
7
8# Declarations that change for each manager
9MACHEADERFILE = 'TextEdit.h'            # The Apple header file
10MODNAME = '_TE'                         # The name of the module
11OBJECTNAME = 'TE'                       # The basic name of the objects used here
12KIND = 'Handle'                         # Usually 'Ptr' or 'Handle'
13
14# The following is *usually* unchanged but may still require tuning
15MODPREFIX = 'TE'                        # The prefix for module-wide routines
16OBJECTTYPE = "TEHandle"         # The C type used to represent them
17OBJECTPREFIX = MODPREFIX + 'Obj'        # The prefix for object methods
18INPUTFILE = string.lower(MODPREFIX) + 'gen.py' # The file generated by the scanner
19OUTPUTFILE = MODNAME + "module.c"       # The file generated by this program
20
21from macsupport import *
22
23# Create the type objects
24TEHandle = OpaqueByValueType("TEHandle", "TEObj")
25CharsHandle = OpaqueByValueType("CharsHandle", "ResObj")
26Handle = OpaqueByValueType("Handle", "ResObj")
27StScrpHandle = OpaqueByValueType("StScrpHandle", "ResObj")
28TEStyleHandle = OpaqueByValueType("TEStyleHandle", "ResObj")
29RgnHandle = OpaqueByValueType("RgnHandle", "ResObj")
30
31TextStyle = OpaqueType("TextStyle", "TextStyle")
32TextStyle_ptr = TextStyle
33
34includestuff = includestuff + """
35#include <Carbon/Carbon.h>
36
37#ifdef USE_TOOLBOX_OBJECT_GLUE
38extern PyObject *_TEObj_New(TEHandle);
39extern int _TEObj_Convert(PyObject *, TEHandle *);
40
41#define TEObj_New _TEObj_New
42#define TEObj_Convert _TEObj_Convert
43#endif
44
45#define as_TE(h) ((TEHandle)h)
46#define as_Resource(teh) ((Handle)teh)
47
48/*
49** Parse/generate TextStyle records
50*/
51static PyObject *
52TextStyle_New(TextStylePtr itself)
53{
54
55        return Py_BuildValue("lllO&", (long)itself->tsFont, (long)itself->tsFace, (long)itself->tsSize, QdRGB_New,
56                                &itself->tsColor);
57}
58
59static int
60TextStyle_Convert(PyObject *v, TextStylePtr p_itself)
61{
62        long font, face, size;
63
64        if( !PyArg_ParseTuple(v, "lllO&", &font, &face, &size, QdRGB_Convert, &p_itself->tsColor) )
65                return 0;
66        p_itself->tsFont = (short)font;
67        p_itself->tsFace = (Style)face;
68        p_itself->tsSize = (short)size;
69        return 1;
70}
71"""
72
73initstuff = initstuff + """
74        PyMac_INIT_TOOLBOX_OBJECT_NEW(TEHandle, TEObj_New);
75        PyMac_INIT_TOOLBOX_OBJECT_CONVERT(TEHandle, TEObj_Convert);
76"""
77
78class TEMethodGenerator(OSErrWeakLinkMethodGenerator):
79    """Similar to MethodGenerator, but has self as last argument"""
80
81    def parseArgumentList(self, args):
82        args, a0 = args[:-1], args[-1]
83        t0, n0, m0 = a0
84        if m0 != InMode:
85            raise ValueError, "method's 'self' must be 'InMode'"
86        self.itself = Variable(t0, "_self->ob_itself", SelfMode)
87        FunctionGenerator.parseArgumentList(self, args)
88        self.argumentList.append(self.itself)
89
90
91
92class MyObjectDefinition(PEP253Mixin, GlobalObjectDefinition):
93    # XXXX Could be subtype of Resource
94    # Attributes that can be set.
95    getsetlist = [
96            (
97            'destRect',
98            'return Py_BuildValue("O&", PyMac_BuildRect, &(*self->ob_itself)->destRect);',
99            None,
100            'Destination rectangle'
101            ), (
102            'viewRect',
103            'return Py_BuildValue("O&", PyMac_BuildRect, &(*self->ob_itself)->viewRect);',
104            None,
105            'Viewing rectangle'
106            ), (
107            'selRect',
108            'return Py_BuildValue("O&", PyMac_BuildRect, &(*self->ob_itself)->selRect);',
109            None,
110            'Selection rectangle'
111            ), (
112            'lineHeight',
113            'return Py_BuildValue("h", (*self->ob_itself)->lineHeight);',
114            None,
115            'Height of a line'
116            ), (
117            'fontAscent',
118            'return Py_BuildValue("h", (*self->ob_itself)->fontAscent);',
119            None,
120            'Ascent of a line'
121            ), (
122            "selPoint",
123            'return Py_BuildValue("O&", PyMac_BuildPoint, (*self->ob_itself)->selPoint);',
124            None,
125            'Selection Point'
126            ), (
127            'selStart',
128            'return Py_BuildValue("h", (*self->ob_itself)->selStart);',
129            None,
130            'Start of selection'
131            ), (
132            'selEnd',
133            'return Py_BuildValue("h", (*self->ob_itself)->selEnd);',
134            None,
135            'End of selection'
136            ), (
137            'active',
138            'return Py_BuildValue("h", (*self->ob_itself)->active);',
139            None,
140            'TBD'
141            ), (
142            'just',
143            'return Py_BuildValue("h", (*self->ob_itself)->just);',
144            None,
145            'Justification'
146            ), (
147            'teLength',
148            'return Py_BuildValue("h", (*self->ob_itself)->teLength);',
149            None,
150            'TBD'
151            ), (
152            'txFont',
153            'return Py_BuildValue("h", (*self->ob_itself)->txFont);',
154            None,
155            'Current font'
156            ), (
157            'txFace',
158            'return Py_BuildValue("h", (*self->ob_itself)->txFace);',
159            None,
160            'Current font variant'
161            ), (
162            'txMode',
163            'return Py_BuildValue("h", (*self->ob_itself)->txMode);',
164            None,
165            'Current text-drawing mode'
166            ), (
167            'txSize',
168            'return Py_BuildValue("h", (*self->ob_itself)->txSize);',
169            None,
170            'Current font size'
171            ), (
172            'nLines',
173            'return Py_BuildValue("h", (*self->ob_itself)->nLines);',
174            None,
175            'TBD'
176            )]
177
178    def outputCheckNewArg(self):
179        Output("""if (itself == NULL) {
180                                PyErr_SetString(TE_Error,"Cannot create null TE");
181                                return NULL;
182                        }""")
183    def outputFreeIt(self, itselfname):
184        Output("TEDispose(%s);", itselfname)
185
186
187# From here on it's basically all boiler plate...
188
189# Create the generator groups and link them
190module = MacModule(MODNAME, MODPREFIX, includestuff, finalstuff, initstuff)
191object = MyObjectDefinition(OBJECTNAME, OBJECTPREFIX, OBJECTTYPE)
192module.addobject(object)
193
194# Create the generator classes used to populate the lists
195Function = OSErrWeakLinkFunctionGenerator
196Method = TEMethodGenerator
197
198# Create and populate the lists
199functions = []
200methods = []
201execfile(INPUTFILE)
202
203# Converter from/to handle
204f = Function(TEHandle, 'as_TE', (Handle, 'h', InMode))
205functions.append(f)
206f = Method(Handle, 'as_Resource', (TEHandle, 'teh', InMode))
207methods.append(f)
208
209# add the populated lists to the generator groups
210# (in a different wordl the scan program would generate this)
211for f in functions: module.add(f)
212for f in methods: object.add(f)
213
214# generate output (open the output file as late as possible)
215SetOutputFileName(OUTPUTFILE)
216module.generate()
217