source: trunk/essentials/dev-lang/python/Mac/Modules/ibcarbon/_IBCarbon.c

/* ======================== Module _IBCarbon ======================== */

#include "Python.h"



#include <Carbon/Carbon.h>
#include "pymactoolbox.h"

#ifdef USE_TOOLBOX_OBJECT_GLUE
extern int _CFStringRefObj_Convert(PyObject *, CFStringRef *);
#endif


static PyObject *IBCarbon_Error;

/* ---------------------- Object type IBNibRef ---------------------- */

PyTypeObject IBNibRef_Type;

#define IBNibRefObj_Check(x) ((x)->ob_type == &IBNibRef_Type || PyObject_TypeCheck((x), &IBNibRef_Type))

typedef struct IBNibRefObject {
        PyObject_HEAD
        IBNibRef ob_itself;
} IBNibRefObject;

PyObject *IBNibRefObj_New(IBNibRef itself)
{
        IBNibRefObject *it;
        it = PyObject_NEW(IBNibRefObject, &IBNibRef_Type);
        if (it == NULL) return NULL;
        it->ob_itself = itself;
        return (PyObject *)it;
}

int IBNibRefObj_Convert(PyObject *v, IBNibRef *p_itself)
{
        if (!IBNibRefObj_Check(v))
        {
                PyErr_SetString(PyExc_TypeError, "IBNibRef required");
                return 0;
        }
        *p_itself = ((IBNibRefObject *)v)->ob_itself;
        return 1;
}

static void IBNibRefObj_dealloc(IBNibRefObject *self)
{
        DisposeNibReference(self->ob_itself);
        self->ob_type->tp_free((PyObject *)self);
}

static PyObject *IBNibRefObj_CreateWindowFromNib(IBNibRefObject *_self, PyObject *_args)
{
        PyObject *_res = NULL;
        OSStatus _err;
        CFStringRef inName;
        WindowPtr outWindow;
        if (!PyArg_ParseTuple(_args, "O&",
                              CFStringRefObj_Convert, &inName))
                return NULL;
        _err = CreateWindowFromNib(_self->ob_itself,
                                   inName,
                                   &outWindow);
        if (_err != noErr) return PyMac_Error(_err);
        _res = Py_BuildValue("O&",
                             WinObj_New, outWindow);
        return _res;
}

static PyObject *IBNibRefObj_CreateMenuFromNib(IBNibRefObject *_self, PyObject *_args)
{
        PyObject *_res = NULL;
        OSStatus _err;
        CFStringRef inName;
        MenuHandle outMenuRef;
        if (!PyArg_ParseTuple(_args, "O&",
                              CFStringRefObj_Convert, &inName))
                return NULL;
        _err = CreateMenuFromNib(_self->ob_itself,
                                 inName,
                                 &outMenuRef);
        if (_err != noErr) return PyMac_Error(_err);
        _res = Py_BuildValue("O&",
                             MenuObj_New, outMenuRef);
        return _res;
}

static PyObject *IBNibRefObj_CreateMenuBarFromNib(IBNibRefObject *_self, PyObject *_args)
{
        PyObject *_res = NULL;
        OSStatus _err;
        CFStringRef inName;
        Handle outMenuBar;
        if (!PyArg_ParseTuple(_args, "O&",
                              CFStringRefObj_Convert, &inName))
                return NULL;
        _err = CreateMenuBarFromNib(_self->ob_itself,
                                    inName,
                                    &outMenuBar);
        if (_err != noErr) return PyMac_Error(_err);
        _res = Py_BuildValue("O&",
                             ResObj_New, outMenuBar);
        return _res;
}

static PyObject *IBNibRefObj_SetMenuBarFromNib(IBNibRefObject *_self, PyObject *_args)
{
        PyObject *_res = NULL;
        OSStatus _err;
        CFStringRef inName;
        if (!PyArg_ParseTuple(_args, "O&",
                              CFStringRefObj_Convert, &inName))
                return NULL;
        _err = SetMenuBarFromNib(_self->ob_itself,
                                 inName);
        if (_err != noErr) return PyMac_Error(_err);
        Py_INCREF(Py_None);
        _res = Py_None;
        return _res;
}

static PyMethodDef IBNibRefObj_methods[] = {
        {"CreateWindowFromNib", (PyCFunction)IBNibRefObj_CreateWindowFromNib, 1,
         PyDoc_STR("(CFStringRef inName) -> (WindowPtr outWindow)")},
        {"CreateMenuFromNib", (PyCFunction)IBNibRefObj_CreateMenuFromNib, 1,
         PyDoc_STR("(CFStringRef inName) -> (MenuHandle outMenuRef)")},
        {"CreateMenuBarFromNib", (PyCFunction)IBNibRefObj_CreateMenuBarFromNib, 1,
         PyDoc_STR("(CFStringRef inName) -> (Handle outMenuBar)")},
        {"SetMenuBarFromNib", (PyCFunction)IBNibRefObj_SetMenuBarFromNib, 1,
         PyDoc_STR("(CFStringRef inName) -> None")},
        {NULL, NULL, 0}
};

#define IBNibRefObj_getsetlist NULL


#define IBNibRefObj_compare NULL

#define IBNibRefObj_repr NULL

#define IBNibRefObj_hash NULL
#define IBNibRefObj_tp_init 0

#define IBNibRefObj_tp_alloc PyType_GenericAlloc

static PyObject *IBNibRefObj_tp_new(PyTypeObject *type, PyObject *_args, PyObject *_kwds)
{
        PyObject *_self;
        IBNibRef itself;
        char *kw[] = {"itself", 0};

        if (!PyArg_ParseTupleAndKeywords(_args, _kwds, "O&", kw, IBNibRefObj_Convert, &itself)) return NULL;
        if ((_self = type->tp_alloc(type, 0)) == NULL) return NULL;
        ((IBNibRefObject *)_self)->ob_itself = itself;
        return _self;
}

#define IBNibRefObj_tp_free PyObject_Del


PyTypeObject IBNibRef_Type = {
        PyObject_HEAD_INIT(NULL)
        0, /*ob_size*/
        "_IBCarbon.IBNibRef", /*tp_name*/
        sizeof(IBNibRefObject), /*tp_basicsize*/
        0, /*tp_itemsize*/
        /* methods */
        (destructor) IBNibRefObj_dealloc, /*tp_dealloc*/
        0, /*tp_print*/
        (getattrfunc)0, /*tp_getattr*/
        (setattrfunc)0, /*tp_setattr*/
        (cmpfunc) IBNibRefObj_compare, /*tp_compare*/
        (reprfunc) IBNibRefObj_repr, /*tp_repr*/
        (PyNumberMethods *)0, /* tp_as_number */
        (PySequenceMethods *)0, /* tp_as_sequence */
        (PyMappingMethods *)0, /* tp_as_mapping */
        (hashfunc) IBNibRefObj_hash, /*tp_hash*/
        0, /*tp_call*/
        0, /*tp_str*/
        PyObject_GenericGetAttr, /*tp_getattro*/
        PyObject_GenericSetAttr, /*tp_setattro */
        0, /*tp_as_buffer*/
        Py_TPFLAGS_DEFAULT|Py_TPFLAGS_BASETYPE, /* tp_flags */
        0, /*tp_doc*/
        0, /*tp_traverse*/
        0, /*tp_clear*/
        0, /*tp_richcompare*/
        0, /*tp_weaklistoffset*/
        0, /*tp_iter*/
        0, /*tp_iternext*/
        IBNibRefObj_methods, /* tp_methods */
        0, /*tp_members*/
        IBNibRefObj_getsetlist, /*tp_getset*/
        0, /*tp_base*/
        0, /*tp_dict*/
        0, /*tp_descr_get*/
        0, /*tp_descr_set*/
        0, /*tp_dictoffset*/
        IBNibRefObj_tp_init, /* tp_init */
        IBNibRefObj_tp_alloc, /* tp_alloc */
        IBNibRefObj_tp_new, /* tp_new */
        IBNibRefObj_tp_free, /* tp_free */
};

/* -------------------- End object type IBNibRef -------------------- */


static PyObject *IBCarbon_CreateNibReference(PyObject *_self, PyObject *_args)
{
        PyObject *_res = NULL;
        OSStatus _err;
        CFStringRef inNibName;
        IBNibRef outNibRef;
        if (!PyArg_ParseTuple(_args, "O&",
                              CFStringRefObj_Convert, &inNibName))
                return NULL;
        _err = CreateNibReference(inNibName,
                                  &outNibRef);
        if (_err != noErr) return PyMac_Error(_err);
        _res = Py_BuildValue("O&",
                             IBNibRefObj_New, outNibRef);
        return _res;
}