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

#include "Python.h"

#ifndef __LP64__

#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;

}

#endif /* __LP64__ */

static PyMethodDef IBCarbon_methods[] = {

#ifndef __LP64__

	{"CreateNibReference", (PyCFunction)IBCarbon_CreateNibReference, 1,

	 PyDoc_STR("(CFStringRef inNibName) -> (IBNibRef outNibRef)")},

#endif /* __LP64__ */

	{NULL, NULL, 0}

};

void init_IBCarbon(void)

{

	PyObject *m;

#ifndef __LP64__

	PyObject *d;

#endif /* __LP64__ */

	m = Py_InitModule("_IBCarbon", IBCarbon_methods);

#ifndef __LP64__

	d = PyModule_GetDict(m);

	IBCarbon_Error = PyMac_GetOSErrException();

	if (IBCarbon_Error == NULL ||

	    PyDict_SetItemString(d, "Error", IBCarbon_Error) != 0)

		return;

	IBNibRef_Type.ob_type = &PyType_Type;

	if (PyType_Ready(&IBNibRef_Type) < 0) return;

	Py_INCREF(&IBNibRef_Type);

	PyModule_AddObject(m, "IBNibRef", (PyObject *)&IBNibRef_Type);

	/* Backward-compatible name */

	Py_INCREF(&IBNibRef_Type);

	PyModule_AddObject(m, "IBNibRefType", (PyObject *)&IBNibRef_Type);

#endif /* __LP64__ */

}

/* ====================== End module _IBCarbon ====================== */