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