| # This script generates the Dialogs interface for Python. |
| # It uses the "bgen" package to generate C code. |
| # It execs the file dlggen.py which contain the function definitions |
| # (dlggen.py was generated by dlgscan.py, scanning the <Dialogs.h> header file). |
| |
| from macsupport import * |
| |
| # Create the type objects |
| |
| HRReference = OpaqueByValueType("HRReference", "HtmlObj") |
| |
| HRScrollbarState = Type("HRScrollbarState", "h") |
| URLSourceType = Type("URLSourceType", "H") |
| GrafPtr = OpaqueByValueType("GrafPtr", "GrafObj") |
| RgnHandle = OpaqueByValueType("RgnHandle", "ResObj") |
| char_ptr = Type("char *", "s") |
| StringPtr = Type("StringPtr", "s") |
| |
| ### An OptHandle is either a handle or None (in case NULL is passed in). |
| ### This is needed for GetDialogItem(). |
| ##OptHandle = OpaqueByValueType("Handle", "OptResObj") |
| ## |
| ##ModalFilterProcPtr = InputOnlyType("PyObject*", "O") |
| ##ModalFilterProcPtr.passInput = lambda name: "NewModalFilterProc(Dlg_PassFilterProc(%s))" % name |
| ##ModalFilterUPP = ModalFilterProcPtr |
| ## |
| ## |
| ##DITLMethod = Type("DITLMethod", "h") |
| ##DialogItemIndex = Type("DialogItemIndex", "h") |
| ##DialogItemType = Type("DialogItemType", "h") |
| ##DialogItemIndexZeroBased = Type("DialogItemIndexZeroBased", "h") |
| ##AlertType = Type("AlertType", "h") |
| ##StringPtr = Str255 |
| ##EventMask = Type("EventMask", "h") |
| ## |
| includestuff = includestuff + """ |
| #include <HTMLRendering.h> |
| """ |
| ## |
| ###ifndef HAVE_UNIVERSAL_HEADERS |
| ###define NewModalFilterProc(x) (x) |
| ###endif |
| ## |
| ###define resNotFound -192 /* Can't include <Errors.h> because of Python's "errors.h" */ |
| ## |
| ##/* XXX Shouldn't this be a stack? */ |
| ##static PyObject *Dlg_FilterProc_callback = NULL; |
| ## |
| ##static PyObject *DlgObj_New(DialogPtr); /* Forward */ |
| ## |
| ##static pascal Boolean Dlg_UnivFilterProc(DialogPtr dialog, |
| ## EventRecord *event, |
| ## short *itemHit) |
| ##{ |
| ## Boolean rv; |
| ## PyObject *args, *res; |
| ## PyObject *callback = Dlg_FilterProc_callback; |
| ## if (callback == NULL) |
| ## return 0; /* Default behavior */ |
| ## Dlg_FilterProc_callback = NULL; /* We'll restore it when call successful */ |
| ## args = Py_BuildValue("O&O&", WinObj_WhichWindow, dialog, PyMac_BuildEventRecord, event); |
| ## if (args == NULL) |
| ## res = NULL; |
| ## else { |
| ## res = PyEval_CallObject(callback, args); |
| ## Py_DECREF(args); |
| ## } |
| ## if (res == NULL) { |
| ## PySys_WriteStderr("Exception in Dialog Filter\\n"); |
| ## PyErr_Print(); |
| ## *itemHit = -1; /* Fake return item */ |
| ## return 1; /* We handled it */ |
| ## } |
| ## else { |
| ## Dlg_FilterProc_callback = callback; |
| ## if (PyInt_Check(res)) { |
| ## *itemHit = PyInt_AsLong(res); |
| ## rv = 1; |
| ## } |
| ## else |
| ## rv = PyObject_IsTrue(res); |
| ## } |
| ## Py_DECREF(res); |
| ## return rv; |
| ##} |
| ## |
| ##static ModalFilterProcPtr |
| ##Dlg_PassFilterProc(PyObject *callback) |
| ##{ |
| ## PyObject *tmp = Dlg_FilterProc_callback; |
| ## Dlg_FilterProc_callback = NULL; |
| ## if (callback == Py_None) { |
| ## Py_XDECREF(tmp); |
| ## return NULL; |
| ## } |
| ## Py_INCREF(callback); |
| ## Dlg_FilterProc_callback = callback; |
| ## Py_XDECREF(tmp); |
| ## return &Dlg_UnivFilterProc; |
| ##} |
| ## |
| ##static PyObject *Dlg_UserItemProc_callback = NULL; |
| ## |
| ##static pascal void Dlg_UnivUserItemProc(DialogPtr dialog, |
| ## short item) |
| ##{ |
| ## PyObject *args, *res; |
| ## |
| ## if (Dlg_UserItemProc_callback == NULL) |
| ## return; /* Default behavior */ |
| ## Dlg_FilterProc_callback = NULL; /* We'll restore it when call successful */ |
| ## args = Py_BuildValue("O&h", WinObj_WhichWindow, dialog, item); |
| ## if (args == NULL) |
| ## res = NULL; |
| ## else { |
| ## res = PyEval_CallObject(Dlg_UserItemProc_callback, args); |
| ## Py_DECREF(args); |
| ## } |
| ## if (res == NULL) { |
| ## PySys_WriteStderr("Exception in Dialog UserItem proc\\n"); |
| ## PyErr_Print(); |
| ## } |
| ## Py_XDECREF(res); |
| ## return; |
| ##} |
| ## |
| ##extern PyMethodChain WinObj_chain; |
| ##""" |
| ## |
| |
| # Define a class which specializes our object definition |
| class MyObjectDefinition(GlobalObjectDefinition): |
| pass |
| ## def __init__(self, name, prefix = None, itselftype = None): |
| ## GlobalObjectDefinition.__init__(self, name, prefix, itselftype) |
| ## self.basechain = "&WinObj_chain" |
| ## def outputInitStructMembers(self): |
| ## GlobalObjectDefinition.outputInitStructMembers(self) |
| ## Output("SetWRefCon(itself, (long)it);") |
| ## def outputCheckNewArg(self): |
| ## Output("if (itself == NULL) return Py_None;") |
| ## def outputCheckConvertArg(self): |
| ## Output("if (v == Py_None) { *p_itself = NULL; return 1; }") |
| ## Output("if (PyInt_Check(v)) { *p_itself = (DialogPtr)PyInt_AsLong(v);") |
| ## Output(" return 1; }") |
| def outputFreeIt(self, itselfname): |
| Output("HRDisposeReference(%s);", itselfname) |
| |
| # Create the generator groups and link them |
| module = MacModule('HtmlRender', 'Html', includestuff, finalstuff, initstuff) |
| object = MyObjectDefinition('HtmlObject', 'HtmlObj', 'HRReference') |
| module.addobject(object) |
| |
| # Create the generator classes used to populate the lists |
| Function = OSErrFunctionGenerator |
| Method = OSErrMethodGenerator |
| |
| # Create and populate the lists |
| functions = [] |
| methods = [] |
| execfile("htmlgen.py") |
| |
| f = Function(int, 'HRHTMLRenderingLibAvailable') |
| functions.append(f) |
| |
| # add the populated lists to the generator groups |
| for f in functions: module.add(f) |
| for f in methods: object.add(f) |
| |
| ### Some methods that are currently macro's in C, but will be real routines |
| ### in MacOS 8. |
| ## |
| ##f = Method(ExistingDialogPtr, 'GetDialogWindow', (DialogRef, 'dialog', InMode)) |
| ##object.add(f) |
| ##f = Method(SInt16, 'GetDialogDefaultItem', (DialogRef, 'dialog', InMode)) |
| ##object.add(f) |
| ##f = Method(SInt16, 'GetDialogCancelItem', (DialogRef, 'dialog', InMode)) |
| ##object.add(f) |
| ##f = Method(SInt16, 'GetDialogKeyboardFocusItem', (DialogRef, 'dialog', InMode)) |
| ##object.add(f) |
| ##f = Method(void, 'SetGrafPortOfDialog', (DialogRef, 'dialog', InMode)) |
| ##object.add(f) |
| ## |
| ##setuseritembody = """ |
| ## PyObject *new = NULL; |
| ## |
| ## |
| ## if (!PyArg_ParseTuple(_args, "|O", &new)) |
| ## return NULL; |
| ## |
| ## if (Dlg_UserItemProc_callback && new && new != Py_None) { |
| ## PyErr_SetString(Dlg_Error, "Another UserItemProc is already installed"); |
| ## return NULL; |
| ## } |
| ## |
| ## if (new == Py_None) { |
| ## new = NULL; |
| ## _res = Py_None; |
| ## Py_INCREF(Py_None); |
| ## } else { |
| ## Py_INCREF(new); |
| ## _res = Py_BuildValue("O&", ResObj_New, (Handle)NewUserItemProc(Dlg_UnivUserItemProc)); |
| ## } |
| ## |
| ## Dlg_UserItemProc_callback = new; |
| ## return _res; |
| ##""" |
| ##f = ManualGenerator("SetUserItemHandler", setuseritembody) |
| ##module.add(f) |
| |
| # generate output |
| SetOutputFileName('HtmlRendermodule.c') |
| module.generate() |