Mac/Modules/qdoffs/qdoffssupport.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 = 'QDOffscreen.h'         # The Apple header file
  10 MODNAME = '_Qdoffs'                             # The name of the module
  11 OBJECTNAME = 'GWorld'                   # The basic name of the objects used here
  12
  13 # The following is *usually* unchanged but may still require tuning
  14 MODPREFIX = 'Qdoffs'                    # The prefix for module-wide routines
  15 OBJECTTYPE = OBJECTNAME + 'Ptr'         # The C type used to represent them
  16 OBJECTPREFIX = OBJECTNAME + 'Obj'       # The prefix for object methods
  17 INPUTFILE = string.lower(MODPREFIX) + 'gen.py' # The file generated by the scanner
  18 #EDITFILE = string.lower(MODPREFIX) + 'edit.py' # The manual definitions
  19 OUTPUTFILE = MODNAME + "module.c"       # The file generated by this program
  20
  21 from macsupport import *
  22
  23 # Create the type objects
  24
  25 GWorldPtr = OpaqueByValueType(OBJECTTYPE, OBJECTPREFIX)
  26 GWorldFlags = Type("GWorldFlags", "l")
  27 GDHandle = OpaqueByValueType("GDHandle", "ResObj")
  28 OptGDHandle = OpaqueByValueType("GDHandle", "OptResObj")
  29 CTabHandle = OpaqueByValueType("CTabHandle", "OptResObj")
  30 PixPatHandle = OpaqueByValueType("PixPatHandle", "ResObj")
  31 PixMapHandle = OpaqueByValueType("PixMapHandle", "ResObj")
  32 CGrafPtr = OpaqueByValueType("CGrafPtr", "GrafObj")
  33 GrafPtr = OpaqueByValueType("GrafPtr", "GrafObj")
  34 QDErr = OSErrType("QDErr", 'h')
  35
  36 includestuff = includestuff + """
  37 #include <Carbon/Carbon.h>
  38
  39 #ifdef USE_TOOLBOX_OBJECT_GLUE
  40 extern PyObject *_GWorldObj_New(GWorldPtr);
  41 extern int _GWorldObj_Convert(PyObject *, GWorldPtr *);
  42
  43 #define GWorldObj_New _GWorldObj_New
  44 #define GWorldObj_Convert _GWorldObj_Convert
  45 #endif
  46
  47 #define as_GrafPtr(gworld) ((GrafPtr)(gworld))
  48
  49 """
  50
  51 initstuff = initstuff + """
  52         PyMac_INIT_TOOLBOX_OBJECT_NEW(GWorldPtr, GWorldObj_New);
  53         PyMac_INIT_TOOLBOX_OBJECT_CONVERT(GWorldPtr, GWorldObj_Convert);
  54 """
  55
  56 class MyObjectDefinition(PEP253Mixin, GlobalObjectDefinition):
  57     # XXXX Should inherit from GrafPtr?
  58     def outputCheckNewArg(self):
  59         Output("if (itself == NULL) return PyMac_Error(resNotFound);")
  60 ##      def outputInitStructMembers(self):
  61 ##              GlobalObjectDefinition.outputInitStructMembers(self)
  62 ##              Output("SetWRefCon(itself, (long)it);")
  63 ##      def outputCheckConvertArg(self):
  64 ##              OutLbrace("if (DlgObj_Check(v))")
  65 ##              Output("*p_itself = ((WindowObject *)v)->ob_itself;")
  66 ##              Output("return 1;")
  67 ##              OutRbrace()
  68 ##              Out("""
  69 ##              if (v == Py_None) { *p_itself = NULL; return 1; }
  70 ##              if (PyInt_Check(v)) { *p_itself = (WindowPtr)PyInt_AsLong(v); return 1; }
  71 ##              """)
  72     def outputFreeIt(self, itselfname):
  73         Output("DisposeGWorld(%s);", itselfname)
  74 # From here on it's basically all boiler plate...
  75
  76 # Create the generator groups and link them
  77 module = MacModule(MODNAME, MODPREFIX, includestuff, finalstuff, initstuff)
  78 object = MyObjectDefinition(OBJECTNAME, OBJECTPREFIX, OBJECTTYPE)
  79 module.addobject(object)
  80
  81
  82 # Create the generator classes used to populate the lists
  83 Function = OSErrWeakLinkFunctionGenerator
  84 Method = OSErrWeakLinkMethodGenerator
  85
  86 # Create and populate the lists
  87 functions = []
  88 methods = []
  89 execfile(INPUTFILE)
  90
  91 # A method to convert a GWorldPtr to a GrafPtr
  92 f = Method(GrafPtr, 'as_GrafPtr', (GWorldPtr, 'p', InMode))
  93 methods.append(f)
  94
  95 #
  96 # Manual generator: get data out of a pixmap
  97 pixmapgetbytes_body = """
  98 PixMapHandle pm;
  99 int from, length;
 100 char *cp;
 101
 102 if ( !PyArg_ParseTuple(_args, "O&ii", ResObj_Convert, &pm, &from, &length) )
 103         return NULL;
 104 cp = GetPixBaseAddr(pm)+from;
 105 _res = PyString_FromStringAndSize(cp, length);
 106 return _res;
 107 """
 108 f = ManualGenerator("GetPixMapBytes", pixmapgetbytes_body)
 109 f.docstring = lambda: """(pixmap, int start, int size) -> string. Return bytes from the pixmap"""
 110 functions.append(f)
 111
 112 # Manual generator: store data in a pixmap
 113 pixmapputbytes_body = """
 114 PixMapHandle pm;
 115 int from, length;
 116 char *cp, *icp;
 117
 118 if ( !PyArg_ParseTuple(_args, "O&is#", ResObj_Convert, &pm, &from, &icp, &length) )
 119         return NULL;
 120 cp = GetPixBaseAddr(pm)+from;
 121 memcpy(cp, icp, length);
 122 Py_INCREF(Py_None);
 123 _res = Py_None;
 124 return _res;
 125 """
 126 f = ManualGenerator("PutPixMapBytes", pixmapputbytes_body)
 127 f.docstring = lambda: """(pixmap, int start, string data). Store bytes into the pixmap"""
 128 functions.append(f)
 129
 130 # add the populated lists to the generator groups
 131 # (in a different wordl the scan program would generate this)
 132 for f in functions: module.add(f)
 133 for f in methods: object.add(f)
 134
 135
 136
 137 # generate output (open the output file as late as possible)
 138 SetOutputFileName(OUTPUTFILE)
 139 module.generate()