Mac/Modules/te/tesupport.py

   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
   6 import string
   7
   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'
  13
  14 # The following is *usually* unchanged but may still require tuning
  15 MODPREFIX = MODNAME                     # 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
  20
  21 from macsupport import *
  22
  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")
  30
  31 TextStyle = OpaqueType("TextStyle", "TextStyle")
  32 TextStyle_ptr = TextStyle
  33
  34 includestuff = includestuff + """
  35 #include <%s>""" % MACHEADERFILE + """
  36
  37 #define as_TE(h) ((TEHandle)h)
  38 #define as_Resource(teh) ((Handle)teh)
  39
  40 /* Exported by Qdmodule.c: */
  41 extern PyObject *QdRGB_New(RGBColor *);
  42 extern int QdRGB_Convert(PyObject *, RGBColor *);
  43
  44 /*
  45 ** Parse/generate TextStyle records
  46 */
  47 PyObject *TextStyle_New(itself)
  48         TextStylePtr itself;
  49 {
  50
  51         return Py_BuildValue("lllO&", (long)itself->tsFont, (long)itself->tsFace, (long)itself->tsSize, QdRGB_New,
  52                                 &itself->tsColor);
  53 }
  54
  55 TextStyle_Convert(v, p_itself)
  56         PyObject *v;
  57         TextStylePtr p_itself;
  58 {
  59         long font, face, size;
  60
  61         if( !PyArg_ParseTuple(v, "lllO&", &font, &face, &size, QdRGB_Convert, &p_itself->tsColor) )
  62                 return 0;
  63         p_itself->tsFont = (short)font;
  64         p_itself->tsFace = (Style)face;
  65         p_itself->tsSize = (short)size;
  66         return 1;
  67 }
  68 """
  69
  70 class TEMethodGenerator(OSErrMethodGenerator):
  71         """Similar to MethodGenerator, but has self as last argument"""
  72
  73         def parseArgumentList(self, args):
  74                 args, a0 = args[:-1], args[-1]
  75                 t0, n0, m0 = a0
  76                 if m0 != InMode:
  77                         raise ValueError, "method's 'self' must be 'InMode'"
  78                 self.itself = Variable(t0, "_self->ob_itself", SelfMode)
  79                 FunctionGenerator.parseArgumentList(self, args)
  80                 self.argumentList.append(self.itself)
  81
  82
  83
  84 class MyObjectDefinition(GlobalObjectDefinition):
  85         def outputCheckNewArg(self):
  86                 Output("""if (itself == NULL) {
  87                                         PyErr_SetString(TE_Error,"Cannot create null TE");
  88                                         return NULL;
  89                                 }""")
  90         def outputFreeIt(self, itselfname):
  91                 Output("TEDispose(%s);", itselfname)
  92
  93         def outputGetattrHook(self):
  94                 Output("""
  95                         if( strcmp(name, "destRect") == 0 )
  96                                 return Py_BuildValue("O&", PyMac_BuildRect,
  97                                                 &(*self->ob_itself)->destRect);
  98                         if( strcmp(name, "viewRect") == 0 )
  99                                 return Py_BuildValue("O&", PyMac_BuildRect,
 100                                                 &(*self->ob_itself)->viewRect);
 101                         if( strcmp(name, "selRect") == 0 )
 102                                 return Py_BuildValue("O&", PyMac_BuildRect,
 103                                                 &(*self->ob_itself)->selRect);
 104                         if( strcmp(name, "lineHeight") == 0 )
 105                                 return Py_BuildValue("h", (*self->ob_itself)->lineHeight);
 106                         if( strcmp(name, "fontAscent") == 0 )
 107                                 return Py_BuildValue("h", (*self->ob_itself)->fontAscent);
 108                         if( strcmp(name, "selPoint") == 0 )
 109                                 return Py_BuildValue("O&", PyMac_BuildPoint,
 110                                                 &(*self->ob_itself)->selPoint);
 111                         if( strcmp(name, "selStart") == 0 )
 112                                 return Py_BuildValue("h", (*self->ob_itself)->selStart);
 113                         if( strcmp(name, "selEnd") == 0 )
 114                                 return Py_BuildValue("h", (*self->ob_itself)->selEnd);
 115                         if( strcmp(name, "active") == 0 )
 116                                 return Py_BuildValue("h", (*self->ob_itself)->active);
 117                         if( strcmp(name, "just") == 0 )
 118                                 return Py_BuildValue("h", (*self->ob_itself)->just);
 119                         if( strcmp(name, "teLength") == 0 )
 120                                 return Py_BuildValue("h", (*self->ob_itself)->teLength);
 121                         if( strcmp(name, "txFont") == 0 )
 122                                 return Py_BuildValue("h", (*self->ob_itself)->txFont);
 123                         if( strcmp(name, "txFace") == 0 )
 124                                 return Py_BuildValue("h", (*self->ob_itself)->txFace);
 125                         if( strcmp(name, "txMode") == 0 )
 126                                 return Py_BuildValue("h", (*self->ob_itself)->txMode);
 127                         if( strcmp(name, "txSize") == 0 )
 128                                 return Py_BuildValue("h", (*self->ob_itself)->txSize);
 129                         if( strcmp(name, "nLines") == 0 )
 130                                 return Py_BuildValue("h", (*self->ob_itself)->nLines);
 131                 """)
 132
 133 # From here on it's basically all boiler plate...
 134
 135 # Create the generator groups and link them
 136 module = MacModule(MODNAME, MODPREFIX, includestuff, finalstuff, initstuff)
 137 object = MyObjectDefinition(OBJECTNAME, OBJECTPREFIX, OBJECTTYPE)
 138 module.addobject(object)
 139
 140 # Create the generator classes used to populate the lists
 141 Function = OSErrFunctionGenerator
 142 Method = TEMethodGenerator
 143
 144 # Create and populate the lists
 145 functions = []
 146 methods = []
 147 execfile(INPUTFILE)
 148
 149 # Converter from/to handle
 150 f = Function(TEHandle, 'as_TE', (Handle, 'h', InMode))
 151 functions.append(f)
 152 f = Method(Handle, 'as_Resource', (TEHandle, 'teh', InMode))
 153 methods.append(f)
 154
 155 # add the populated lists to the generator groups
 156 # (in a different wordl the scan program would generate this)
 157 for f in functions: module.add(f)
 158 for f in methods: object.add(f)
 159
 160 # generate output (open the output file as late as possible)
 161 SetOutputFileName(OUTPUTFILE)
 162 module.generate()
 163