| 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 | #error missing SetActionFilter
|
|---|
| 7 |
|
|---|
| 8 | import string
|
|---|
| 9 |
|
|---|
| 10 | # Declarations that change for each manager
|
|---|
| 11 | MODNAME = '_Mlte' # The name of the module
|
|---|
| 12 |
|
|---|
| 13 | # The following is *usually* unchanged but may still require tuning
|
|---|
| 14 | MODPREFIX = 'Mlte' # The prefix for module-wide routines
|
|---|
| 15 | INPUTFILE = string.lower(MODPREFIX) + 'gen.py' # The file generated by the scanner
|
|---|
| 16 | OUTPUTFILE = MODNAME + "module.c" # The file generated by this program
|
|---|
| 17 |
|
|---|
| 18 | from macsupport import *
|
|---|
| 19 |
|
|---|
| 20 | # Create the type objects
|
|---|
| 21 |
|
|---|
| 22 | includestuff = includestuff + """
|
|---|
| 23 | #include <Carbon/Carbon.h>
|
|---|
| 24 |
|
|---|
| 25 | /* For now we declare them forward here. They'll go to mactoolbox later */
|
|---|
| 26 | static PyObject *TXNObj_New(TXNObject);
|
|---|
| 27 | static int TXNObj_Convert(PyObject *, TXNObject *);
|
|---|
| 28 | static PyObject *TXNFontMenuObj_New(TXNFontMenuObject);
|
|---|
| 29 | static int TXNFontMenuObj_Convert(PyObject *, TXNFontMenuObject *);
|
|---|
| 30 |
|
|---|
| 31 | // ADD declarations
|
|---|
| 32 | #ifdef NOTYET_USE_TOOLBOX_OBJECT_GLUE
|
|---|
| 33 | //extern PyObject *_CFTypeRefObj_New(CFTypeRef);
|
|---|
| 34 | //extern int _CFTypeRefObj_Convert(PyObject *, CFTypeRef *);
|
|---|
| 35 |
|
|---|
| 36 | //#define CFTypeRefObj_New _CFTypeRefObj_New
|
|---|
| 37 | //#define CFTypeRefObj_Convert _CFTypeRefObj_Convert
|
|---|
| 38 | #endif
|
|---|
| 39 |
|
|---|
| 40 | /*
|
|---|
| 41 | ** Parse an optional fsspec
|
|---|
| 42 | */
|
|---|
| 43 | static int
|
|---|
| 44 | OptFSSpecPtr_Convert(PyObject *v, FSSpec **p_itself)
|
|---|
| 45 | {
|
|---|
| 46 | static FSSpec fss;
|
|---|
| 47 | if (v == Py_None)
|
|---|
| 48 | {
|
|---|
| 49 | *p_itself = NULL;
|
|---|
| 50 | return 1;
|
|---|
| 51 | }
|
|---|
| 52 | *p_itself = &fss;
|
|---|
| 53 | return PyMac_GetFSSpec(v, *p_itself);
|
|---|
| 54 | }
|
|---|
| 55 |
|
|---|
| 56 | /*
|
|---|
| 57 | ** Parse an optional rect
|
|---|
| 58 | */
|
|---|
| 59 | static int
|
|---|
| 60 | OptRectPtr_Convert(PyObject *v, Rect **p_itself)
|
|---|
| 61 | {
|
|---|
| 62 | static Rect r;
|
|---|
| 63 |
|
|---|
| 64 | if (v == Py_None)
|
|---|
| 65 | {
|
|---|
| 66 | *p_itself = NULL;
|
|---|
| 67 | return 1;
|
|---|
| 68 | }
|
|---|
| 69 | *p_itself = &r;
|
|---|
| 70 | return PyMac_GetRect(v, *p_itself);
|
|---|
| 71 | }
|
|---|
| 72 |
|
|---|
| 73 | /*
|
|---|
| 74 | ** Parse an optional GWorld
|
|---|
| 75 | */
|
|---|
| 76 | static int
|
|---|
| 77 | OptGWorldObj_Convert(PyObject *v, GWorldPtr *p_itself)
|
|---|
| 78 | {
|
|---|
| 79 | if (v == Py_None)
|
|---|
| 80 | {
|
|---|
| 81 | *p_itself = NULL;
|
|---|
| 82 | return 1;
|
|---|
| 83 | }
|
|---|
| 84 | return GWorldObj_Convert(v, p_itself);
|
|---|
| 85 | }
|
|---|
| 86 |
|
|---|
| 87 | """
|
|---|
| 88 |
|
|---|
| 89 | initstuff = initstuff + """
|
|---|
| 90 | // PyMac_INIT_TOOLBOX_OBJECT_NEW(xxxx);
|
|---|
| 91 | """
|
|---|
| 92 | TXNObject = OpaqueByValueType("TXNObject", "TXNObj")
|
|---|
| 93 | TXNFontMenuObject = OpaqueByValueType("TXNFontMenuObject", "TXNFontMenuObj")
|
|---|
| 94 |
|
|---|
| 95 | TXNFrameID = Type("TXNFrameID", "l")
|
|---|
| 96 | TXNVersionValue = Type("TXNVersionValue", "l")
|
|---|
| 97 | TXNFeatureBits = Type("TXNFeatureBits", "l")
|
|---|
| 98 | TXNInitOptions = Type("TXNInitOptions", "l")
|
|---|
| 99 | TXNFrameOptions = Type("TXNFrameOptions", "l")
|
|---|
| 100 | TXNContinuousFlags = Type("TXNContinuousFlags", "l")
|
|---|
| 101 | TXNMatchOptions = Type("TXNMatchOptions", "l")
|
|---|
| 102 | TXNFileType = OSTypeType("TXNFileType")
|
|---|
| 103 | TXNFrameType = Type("TXNFrameType", "l")
|
|---|
| 104 | TXNDataType = OSTypeType("TXNDataType")
|
|---|
| 105 | TXNControlTag = OSTypeType("TXNControlTag")
|
|---|
| 106 | TXNActionKey = Type("TXNActionKey", "l")
|
|---|
| 107 | TXNTabType = Type("TXNTabType", "b")
|
|---|
| 108 | TXNScrollBarState = Type("TXNScrollBarState", "l")
|
|---|
| 109 | TXNOffset = Type("TXNOffset", "l")
|
|---|
| 110 | TXNObjectRefcon = FakeType("(TXNObjectRefcon)0") # XXXX For now...
|
|---|
| 111 | TXNErrors = OSErrType("TXNErrors", "l")
|
|---|
| 112 | TXNTypeRunAttributes = OSTypeType("TXNTypeRunAttributes")
|
|---|
| 113 | TXNTypeRunAttributeSizes = Type("TXNTypeRunAttributeSizes", "l")
|
|---|
| 114 | TXNPermanentTextEncodingType = Type("TXNPermanentTextEncodingType", "l")
|
|---|
| 115 | TXTNTag = OSTypeType("TXTNTag")
|
|---|
| 116 | TXNBackgroundType = Type("TXNBackgroundType", "l")
|
|---|
| 117 | DragReference = OpaqueByValueType("DragReference", "DragObj")
|
|---|
| 118 | DragTrackingMessage = Type("DragTrackingMessage", "h")
|
|---|
| 119 | RgnHandle = OpaqueByValueType("RgnHandle", "ResObj")
|
|---|
| 120 | OptRgnHandle = OpaqueByValueType("RgnHandle", "OptResObj")
|
|---|
| 121 | GWorldPtr = OpaqueByValueType("GWorldPtr", "GWorldObj")
|
|---|
| 122 | OptGWorldPtr = OpaqueByValueType("GWorldPtr", "OptGWorldObj")
|
|---|
| 123 | MlteInBuffer = VarInputBufferType('void *', 'ByteCount', 'l')
|
|---|
| 124 |
|
|---|
| 125 | OptFSSpecPtr = OpaqueByValueType("FSSpec *", "OptFSSpecPtr")
|
|---|
| 126 | OptRectPtr = OpaqueByValueType("Rect *", "OptRectPtr")
|
|---|
| 127 |
|
|---|
| 128 | UniChar = Type("UniChar", "h") # XXXX For now...
|
|---|
| 129 | # ADD object type here
|
|---|
| 130 |
|
|---|
| 131 | execfile("mltetypetest.py")
|
|---|
| 132 |
|
|---|
| 133 | # Our (opaque) objects
|
|---|
| 134 |
|
|---|
| 135 | class TXNObjDefinition(PEP253Mixin, GlobalObjectDefinition):
|
|---|
| 136 | def outputCheckNewArg(self):
|
|---|
| 137 | Output("if (itself == NULL) return PyMac_Error(resNotFound);")
|
|---|
| 138 |
|
|---|
| 139 | class TXNFontMenuObjDefinition(PEP253Mixin, GlobalObjectDefinition):
|
|---|
| 140 | def outputCheckNewArg(self):
|
|---|
| 141 | Output("if (itself == NULL) return PyMac_Error(resNotFound);")
|
|---|
| 142 |
|
|---|
| 143 |
|
|---|
| 144 | # ADD object class here
|
|---|
| 145 |
|
|---|
| 146 | # From here on it's basically all boiler plate...
|
|---|
| 147 |
|
|---|
| 148 | # Create the generator groups and link them
|
|---|
| 149 | module = MacModule(MODNAME, MODPREFIX, includestuff, finalstuff, initstuff)
|
|---|
| 150 | TXNObject_object = TXNObjDefinition("TXNObject", "TXNObj", "TXNObject")
|
|---|
| 151 | TXNFontMenuObject_object = TXNFontMenuObjDefinition("TXNFontMenuObject", "TXNFontMenuObj", "TXNFontMenuObject")
|
|---|
| 152 |
|
|---|
| 153 | # ADD object here
|
|---|
| 154 |
|
|---|
| 155 | module.addobject(TXNObject_object)
|
|---|
| 156 | module.addobject(TXNFontMenuObject_object)
|
|---|
| 157 | # ADD addobject call here
|
|---|
| 158 |
|
|---|
| 159 | # Create the generator classes used to populate the lists
|
|---|
| 160 | Function = OSErrWeakLinkFunctionGenerator
|
|---|
| 161 | Method = OSErrWeakLinkMethodGenerator
|
|---|
| 162 |
|
|---|
| 163 | # Create and populate the lists
|
|---|
| 164 | functions = []
|
|---|
| 165 | TXNObject_methods = []
|
|---|
| 166 | TXNFontMenuObject_methods = []
|
|---|
| 167 |
|
|---|
| 168 | # ADD _methods initializer here
|
|---|
| 169 | execfile(INPUTFILE)
|
|---|
| 170 |
|
|---|
| 171 |
|
|---|
| 172 | # add the populated lists to the generator groups
|
|---|
| 173 | # (in a different wordl the scan program would generate this)
|
|---|
| 174 | for f in functions: module.add(f)
|
|---|
| 175 | for f in TXNObject_methods: TXNObject_object.add(f)
|
|---|
| 176 | for f in TXNFontMenuObject_methods: TXNFontMenuObject_object.add(f)
|
|---|
| 177 |
|
|---|
| 178 | # ADD Manual generators here
|
|---|
| 179 | inittextension_body = """
|
|---|
| 180 | OSStatus _err;
|
|---|
| 181 | TXNMacOSPreferredFontDescription * iDefaultFonts = NULL;
|
|---|
| 182 | ItemCount iCountDefaultFonts = 0;
|
|---|
| 183 | TXNInitOptions iUsageFlags;
|
|---|
| 184 | PyMac_PRECHECK(TXNInitTextension);
|
|---|
| 185 | if (!PyArg_ParseTuple(_args, "l", &iUsageFlags))
|
|---|
| 186 | return NULL;
|
|---|
| 187 | _err = TXNInitTextension(iDefaultFonts,
|
|---|
| 188 | iCountDefaultFonts,
|
|---|
| 189 | iUsageFlags);
|
|---|
| 190 | if (_err != noErr) return PyMac_Error(_err);
|
|---|
| 191 | Py_INCREF(Py_None);
|
|---|
| 192 | _res = Py_None;
|
|---|
| 193 | return _res;
|
|---|
| 194 | """
|
|---|
| 195 |
|
|---|
| 196 | f = ManualGenerator("TXNInitTextension", inittextension_body);
|
|---|
| 197 | f.docstring = lambda: "(TXNInitOptions) -> None"
|
|---|
| 198 | module.add(f)
|
|---|
| 199 |
|
|---|
| 200 | # generate output (open the output file as late as possible)
|
|---|
| 201 | SetOutputFileName(OUTPUTFILE)
|
|---|
| 202 | module.generate()
|
|---|