/* =========================== Module _Qd =========================== */

#include "Python.h"

#ifndef __LP64__

#include "pymactoolbox.h"

/* Macro to test whether a weak-loaded CFM function exists */

#define PyMac_PRECHECK(rtn) do { if ( &rtn == NULL )  {\

        PyErr_SetString(PyExc_NotImplementedError, \

        "Not available in this shared library/OS version"); \

        return NULL; \

    }} while(0)

#include <Carbon/Carbon.h>

#ifdef USE_TOOLBOX_OBJECT_GLUE

extern PyObject *_GrafObj_New(GrafPtr);

extern int _GrafObj_Convert(PyObject *, GrafPtr *);

extern PyObject *_BMObj_New(BitMapPtr);

extern int _BMObj_Convert(PyObject *, BitMapPtr *);

extern PyObject *_QdRGB_New(RGBColorPtr);

extern int _QdRGB_Convert(PyObject *, RGBColorPtr);

#define GrafObj_New _GrafObj_New

#define GrafObj_Convert _GrafObj_Convert

#define BMObj_New _BMObj_New

#define BMObj_Convert _BMObj_Convert

#define QdRGB_New _QdRGB_New

#define QdRGB_Convert _QdRGB_Convert

#endif

static PyObject *BMObj_NewCopied(BitMapPtr);

/*

** Parse/generate RGB records

*/

PyObject *QdRGB_New(RGBColorPtr itself)

{

        return Py_BuildValue("lll", (long)itself->red, (long)itself->green, (long)itself->blue);

}

int QdRGB_Convert(PyObject *v, RGBColorPtr p_itself)

{

        long red, green, blue;

        if( !PyArg_ParseTuple(v, "lll", &red, &green, &blue) )

                return 0;

        p_itself->red = (unsigned short)red;

        p_itself->green = (unsigned short)green;

        p_itself->blue = (unsigned short)blue;

        return 1;

}

/*

** Generate FontInfo records

*/

static

PyObject *QdFI_New(FontInfo *itself)

{

        return Py_BuildValue("hhhh", itself->ascent, itself->descent,

                        itself->widMax, itself->leading);

}

static PyObject *Qd_Error;

/* ---------------------- Object type GrafPort ---------------------- */

PyTypeObject GrafPort_Type;

#define GrafObj_Check(x) ((x)->ob_type == &GrafPort_Type || PyObject_TypeCheck((x), &GrafPort_Type))

typedef struct GrafPortObject {

	PyObject_HEAD

	GrafPtr ob_itself;

} GrafPortObject;

PyObject *GrafObj_New(GrafPtr itself)

{

	GrafPortObject *it;

	if (itself == NULL) return PyMac_Error(resNotFound);

	it = PyObject_NEW(GrafPortObject, &GrafPort_Type);

	if (it == NULL) return NULL;

	it->ob_itself = itself;

	return (PyObject *)it;

}

int GrafObj_Convert(PyObject *v, GrafPtr *p_itself)

{

#if 1

	{

		WindowRef win;

		if (WinObj_Convert(v, &win) && v) {

			*p_itself = (GrafPtr)GetWindowPort(win);

			return 1;

		}

		PyErr_Clear();

	}

#else

	if (DlgObj_Check(v)) {

		DialogRef dlg = (DialogRef)((GrafPortObject *)v)->ob_itself;

		*p_itself = (GrafPtr)GetWindowPort(GetDialogWindow(dlg));

		return 1;

	}

	if (WinObj_Check(v)) {

		WindowRef win = (WindowRef)((GrafPortObject *)v)->ob_itself;

		*p_itself = (GrafPtr)GetWindowPort(win);

		return 1;

	}

#endif

	if (!GrafObj_Check(v))

	{

		PyErr_SetString(PyExc_TypeError, "GrafPort required");

		return 0;

	}

	*p_itself = ((GrafPortObject *)v)->ob_itself;

	return 1;

}

static void GrafObj_dealloc(GrafPortObject *self)

{

	/* Cleanup of self->ob_itself goes here */

	self->ob_type->tp_free((PyObject *)self);

}

static PyObject *GrafObj_MacSetPort(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

#ifndef MacSetPort

	PyMac_PRECHECK(MacSetPort);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	MacSetPort(_self->ob_itself);

	Py_INCREF(Py_None);

	_res = Py_None;

	return _res;

}

static PyObject *GrafObj_QDSwapPort(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	Boolean _rv;

	CGrafPtr outOldPort;

#ifndef QDSwapPort

	PyMac_PRECHECK(QDSwapPort);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	_rv = QDSwapPort(_self->ob_itself,

	                 &outOldPort);

	_res = Py_BuildValue("bO&",

	                     _rv,

	                     GrafObj_New, outOldPort);

	return _res;

}

static PyObject *GrafObj_IsValidPort(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	Boolean _rv;

#ifndef IsValidPort

	PyMac_PRECHECK(IsValidPort);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	_rv = IsValidPort(_self->ob_itself);

	_res = Py_BuildValue("b",

	                     _rv);

	return _res;

}

static PyObject *GrafObj_GetPortPixMap(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	PixMapHandle _rv;

#ifndef GetPortPixMap

	PyMac_PRECHECK(GetPortPixMap);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	_rv = GetPortPixMap(_self->ob_itself);

	_res = Py_BuildValue("O&",

	                     ResObj_New, _rv);

	return _res;

}

static PyObject *GrafObj_GetPortBitMapForCopyBits(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	const BitMap * _rv;

#ifndef GetPortBitMapForCopyBits

	PyMac_PRECHECK(GetPortBitMapForCopyBits);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	_rv = GetPortBitMapForCopyBits(_self->ob_itself);

	_res = Py_BuildValue("O&",

	                     BMObj_New, _rv);

	return _res;

}

static PyObject *GrafObj_GetPortBounds(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	Rect rect;

#ifndef GetPortBounds

	PyMac_PRECHECK(GetPortBounds);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	GetPortBounds(_self->ob_itself,

	              &rect);

	_res = Py_BuildValue("O&",

	                     PyMac_BuildRect, &rect);

	return _res;

}

static PyObject *GrafObj_GetPortForeColor(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	RGBColor foreColor;

#ifndef GetPortForeColor

	PyMac_PRECHECK(GetPortForeColor);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	GetPortForeColor(_self->ob_itself,

	                 &foreColor);

	_res = Py_BuildValue("O&",

	                     QdRGB_New, &foreColor);

	return _res;

}

static PyObject *GrafObj_GetPortBackColor(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	RGBColor backColor;

#ifndef GetPortBackColor

	PyMac_PRECHECK(GetPortBackColor);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	GetPortBackColor(_self->ob_itself,

	                 &backColor);

	_res = Py_BuildValue("O&",

	                     QdRGB_New, &backColor);

	return _res;

}

static PyObject *GrafObj_GetPortOpColor(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	RGBColor opColor;

#ifndef GetPortOpColor

	PyMac_PRECHECK(GetPortOpColor);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	GetPortOpColor(_self->ob_itself,

	               &opColor);

	_res = Py_BuildValue("O&",

	                     QdRGB_New, &opColor);

	return _res;

}

static PyObject *GrafObj_GetPortHiliteColor(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	RGBColor hiliteColor;

#ifndef GetPortHiliteColor

	PyMac_PRECHECK(GetPortHiliteColor);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	GetPortHiliteColor(_self->ob_itself,

	                   &hiliteColor);

	_res = Py_BuildValue("O&",

	                     QdRGB_New, &hiliteColor);

	return _res;

}

static PyObject *GrafObj_GetPortTextFont(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	short _rv;

#ifndef GetPortTextFont

	PyMac_PRECHECK(GetPortTextFont);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	_rv = GetPortTextFont(_self->ob_itself);

	_res = Py_BuildValue("h",

	                     _rv);

	return _res;

}

static PyObject *GrafObj_GetPortTextFace(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	Style _rv;

#ifndef GetPortTextFace

	PyMac_PRECHECK(GetPortTextFace);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	_rv = GetPortTextFace(_self->ob_itself);

	_res = Py_BuildValue("b",

	                     _rv);

	return _res;

}

static PyObject *GrafObj_GetPortTextMode(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	short _rv;

#ifndef GetPortTextMode

	PyMac_PRECHECK(GetPortTextMode);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	_rv = GetPortTextMode(_self->ob_itself);

	_res = Py_BuildValue("h",

	                     _rv);

	return _res;

}

static PyObject *GrafObj_GetPortTextSize(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	short _rv;

#ifndef GetPortTextSize

	PyMac_PRECHECK(GetPortTextSize);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	_rv = GetPortTextSize(_self->ob_itself);

	_res = Py_BuildValue("h",

	                     _rv);

	return _res;

}

static PyObject *GrafObj_GetPortChExtra(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	short _rv;

#ifndef GetPortChExtra

	PyMac_PRECHECK(GetPortChExtra);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	_rv = GetPortChExtra(_self->ob_itself);

	_res = Py_BuildValue("h",

	                     _rv);

	return _res;

}

static PyObject *GrafObj_GetPortFracHPenLocation(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	short _rv;

#ifndef GetPortFracHPenLocation

	PyMac_PRECHECK(GetPortFracHPenLocation);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	_rv = GetPortFracHPenLocation(_self->ob_itself);

	_res = Py_BuildValue("h",

	                     _rv);

	return _res;

}

static PyObject *GrafObj_GetPortSpExtra(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	Fixed _rv;

#ifndef GetPortSpExtra

	PyMac_PRECHECK(GetPortSpExtra);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	_rv = GetPortSpExtra(_self->ob_itself);

	_res = Py_BuildValue("O&",

	                     PyMac_BuildFixed, _rv);

	return _res;

}

static PyObject *GrafObj_GetPortPenVisibility(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	short _rv;

#ifndef GetPortPenVisibility

	PyMac_PRECHECK(GetPortPenVisibility);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	_rv = GetPortPenVisibility(_self->ob_itself);

	_res = Py_BuildValue("h",

	                     _rv);

	return _res;

}

static PyObject *GrafObj_GetPortVisibleRegion(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	RgnHandle _rv;

	RgnHandle visRgn;

#ifndef GetPortVisibleRegion

	PyMac_PRECHECK(GetPortVisibleRegion);

#endif

	if (!PyArg_ParseTuple(_args, "O&",

	                      ResObj_Convert, &visRgn))

		return NULL;

	_rv = GetPortVisibleRegion(_self->ob_itself,

	                           visRgn);

	_res = Py_BuildValue("O&",

	                     ResObj_New, _rv);

	return _res;

}

static PyObject *GrafObj_GetPortClipRegion(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	RgnHandle _rv;

	RgnHandle clipRgn;

#ifndef GetPortClipRegion

	PyMac_PRECHECK(GetPortClipRegion);

#endif

	if (!PyArg_ParseTuple(_args, "O&",

	                      ResObj_Convert, &clipRgn))

		return NULL;

	_rv = GetPortClipRegion(_self->ob_itself,

	                        clipRgn);

	_res = Py_BuildValue("O&",

	                     ResObj_New, _rv);

	return _res;

}

static PyObject *GrafObj_GetPortBackPixPat(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	PixPatHandle _rv;

	PixPatHandle backPattern;

#ifndef GetPortBackPixPat

	PyMac_PRECHECK(GetPortBackPixPat);

#endif

	if (!PyArg_ParseTuple(_args, "O&",

	                      ResObj_Convert, &backPattern))

		return NULL;

	_rv = GetPortBackPixPat(_self->ob_itself,

	                        backPattern);

	_res = Py_BuildValue("O&",

	                     ResObj_New, _rv);

	return _res;

}

static PyObject *GrafObj_GetPortPenPixPat(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	PixPatHandle _rv;

	PixPatHandle penPattern;

#ifndef GetPortPenPixPat

	PyMac_PRECHECK(GetPortPenPixPat);

#endif

	if (!PyArg_ParseTuple(_args, "O&",

	                      ResObj_Convert, &penPattern))

		return NULL;

	_rv = GetPortPenPixPat(_self->ob_itself,

	                       penPattern);

	_res = Py_BuildValue("O&",

	                     ResObj_New, _rv);

	return _res;

}

static PyObject *GrafObj_GetPortFillPixPat(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	PixPatHandle _rv;

	PixPatHandle fillPattern;

#ifndef GetPortFillPixPat

	PyMac_PRECHECK(GetPortFillPixPat);

#endif

	if (!PyArg_ParseTuple(_args, "O&",

	                      ResObj_Convert, &fillPattern))

		return NULL;

	_rv = GetPortFillPixPat(_self->ob_itself,

	                        fillPattern);

	_res = Py_BuildValue("O&",

	                     ResObj_New, _rv);

	return _res;

}

static PyObject *GrafObj_GetPortPenSize(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	Point penSize;

#ifndef GetPortPenSize

	PyMac_PRECHECK(GetPortPenSize);

#endif

	if (!PyArg_ParseTuple(_args, "O&",

	                      PyMac_GetPoint, &penSize))

		return NULL;

	GetPortPenSize(_self->ob_itself,

	               &penSize);

	_res = Py_BuildValue("O&",

	                     PyMac_BuildPoint, penSize);

	return _res;

}

static PyObject *GrafObj_GetPortPenMode(GrafPortObject *_self, PyObject *_args)

{

	PyObject *_res = NULL;

	SInt32 _rv;

#ifndef GetPortPenMode

	PyMac_PRECHECK(GetPortPenMode);

#endif

	if (!PyArg_ParseTuple(_args, ""))

		return NULL;

	_rv = GetPortPenMode(_self->ob_itself);

	_res = Py_BuildValue("l",

	                     _rv);

	return _res;