/Mac/Modules/dlg/dlgsupport.py
http://unladen-swallow.googlecode.com/ · Python · 278 lines · 238 code · 24 blank · 16 comment · 2 complexity · c9479ead2109875df22ed4cc7f632255 MD5 · raw file
- # 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
- DialogPtr = OpaqueByValueType("DialogPtr", "DlgObj")
- DialogRef = DialogPtr
- # 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: "Dlg_PassFilterProc(%s)" % name
- ModalFilterUPP = ModalFilterProcPtr
- RgnHandle = OpaqueByValueType("RgnHandle", "ResObj")
- TEHandle = OpaqueByValueType("TEHandle", "ResObj")
- CGrafPtr = OpaqueByValueType("CGrafPtr", "GrafObj")
- 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 <Carbon/Carbon.h>
- #ifdef USE_TOOLBOX_OBJECT_GLUE
- extern PyObject *_DlgObj_New(DialogRef);
- extern PyObject *_DlgObj_WhichDialog(DialogRef);
- extern int _DlgObj_Convert(PyObject *, DialogRef *);
- #define DlgObj_New _DlgObj_New
- #define DlgObj_WhichDialog _DlgObj_WhichDialog
- #define DlgObj_Convert _DlgObj_Convert
- #endif
- /* XXX Shouldn't this be a stack? */
- static PyObject *Dlg_FilterProc_callback = NULL;
- 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&", DlgObj_WhichDialog, 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 ModalFilterUPP
- Dlg_PassFilterProc(PyObject *callback)
- {
- PyObject *tmp = Dlg_FilterProc_callback;
- static ModalFilterUPP UnivFilterUpp = NULL;
- Dlg_FilterProc_callback = NULL;
- if (callback == Py_None) {
- Py_XDECREF(tmp);
- return NULL;
- }
- Py_INCREF(callback);
- Dlg_FilterProc_callback = callback;
- Py_XDECREF(tmp);
- if ( UnivFilterUpp == NULL )
- UnivFilterUpp = NewModalFilterUPP(&Dlg_UnivFilterProc);
- return UnivFilterUpp;
- }
- 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", DlgObj_WhichDialog, 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;
- }
- #if 0
- /*
- ** Treating DialogObjects as WindowObjects is (I think) illegal under Carbon.
- ** However, as they are still identical under MacOS9 Carbon this is a problem, even
- ** if we neatly call GetDialogWindow() at the right places: there's one refcon field
- ** and it points to the DialogObject, so WinObj_WhichWindow will smartly return the
- ** dialog object, and therefore we still don't have a WindowObject.
- ** I'll leave the chaining code in place for now, with this comment to warn the
- ** unsuspecting victims (i.e. me, probably, in a few weeks:-)
- */
- extern PyMethodChain WinObj_chain;
- #endif
- """
- finalstuff = finalstuff + """
- /* Return the WindowPtr corresponding to a DialogObject */
- #if 0
- WindowPtr
- DlgObj_ConvertToWindow(PyObject *self)
- {
- if ( DlgObj_Check(self) )
- return GetDialogWindow(((DialogObject *)self)->ob_itself);
- return NULL;
- }
- #endif
- /* Return the object corresponding to the dialog, or None */
- PyObject *
- DlgObj_WhichDialog(DialogPtr d)
- {
- PyObject *it;
- if (d == NULL) {
- it = Py_None;
- Py_INCREF(it);
- } else {
- WindowPtr w = GetDialogWindow(d);
- it = (PyObject *) GetWRefCon(w);
- if (it == NULL || ((DialogObject *)it)->ob_itself != d || !DlgObj_Check(it)) {
- #if 0
- /* Should do this, but we don't have an ob_freeit for dialogs yet. */
- it = WinObj_New(w);
- ((WindowObject *)it)->ob_freeit = NULL;
- #else
- it = Py_None;
- Py_INCREF(it);
- #endif
- } else {
- Py_INCREF(it);
- }
- }
- return it;
- }
- """
- initstuff = initstuff + """
- PyMac_INIT_TOOLBOX_OBJECT_NEW(DialogPtr, DlgObj_New);
- PyMac_INIT_TOOLBOX_OBJECT_NEW(DialogPtr, DlgObj_WhichDialog);
- PyMac_INIT_TOOLBOX_OBJECT_CONVERT(DialogPtr, DlgObj_Convert);
- """
- # Define a class which specializes our object definition
- class MyObjectDefinition(PEP253Mixin, GlobalObjectDefinition):
- def __init__(self, name, prefix = None, itselftype = None):
- GlobalObjectDefinition.__init__(self, name, prefix, itselftype)
- ## This won't work in Carbon, so we disable it for all MacPythons:-(
- ## But see the comment above:-((
- ## self.basechain = "&WinObj_chain"
- def outputInitStructMembers(self):
- GlobalObjectDefinition.outputInitStructMembers(self)
- Output("SetWRefCon(GetDialogWindow(itself), (long)it);")
- def outputCheckNewArg(self):
- Output("if (itself == NULL) { Py_INCREF(Py_None); 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 outputCompare(self):
- Output()
- Output("static int %s_compare(%s *self, %s *other)", self.prefix, self.objecttype, self.objecttype)
- OutLbrace()
- Output("if ( self->ob_itself > other->ob_itself ) return 1;")
- Output("if ( self->ob_itself < other->ob_itself ) return -1;")
- Output("return 0;")
- OutRbrace()
- def outputHash(self):
- Output()
- Output("static int %s_hash(%s *self)", self.prefix, self.objecttype)
- OutLbrace()
- Output("return (int)self->ob_itself;")
- OutRbrace()
- def outputFreeIt(self, itselfname):
- Output("DisposeDialog(%s);", itselfname)
- # Create the generator groups and link them
- module = MacModule('_Dlg', 'Dlg', includestuff, finalstuff, initstuff)
- object = MyObjectDefinition('Dialog', 'DlgObj', 'DialogPtr')
- module.addobject(object)
- # Create the generator classes used to populate the lists
- Function = OSErrWeakLinkFunctionGenerator
- Method = OSErrWeakLinkMethodGenerator
- # Create and populate the lists
- functions = []
- methods = []
- execfile("dlggen.py")
- # add the populated lists to the generator groups
- for f in functions: module.add(f)
- for f in methods: 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 == NULL || new == Py_None) {
- new = NULL;
- _res = Py_None;
- Py_INCREF(Py_None);
- } else {
- Py_INCREF(new);
- _res = Py_BuildValue("O&", ResObj_New, (Handle)NewUserItemUPP(Dlg_UnivUserItemProc));
- }
- Dlg_UserItemProc_callback = new;
- return _res;
- """
- f = ManualGenerator("SetUserItemHandler", setuseritembody)
- module.add(f)
- # generate output
- SetOutputFileName('_Dlgmodule.c')
- module.generate()