#include "BPy_BinaryPredicate1D.h"

#include "BPy_Convert.h"
#include "BPy_Interface1D.h"

#include "BinaryPredicate1D/BPy_FalseBP1D.h"
#include "BinaryPredicate1D/BPy_Length2DBP1D.h"
#include "BinaryPredicate1D/BPy_SameShapeIdBP1D.h"
#include "BinaryPredicate1D/BPy_TrueBP1D.h"
#include "BinaryPredicate1D/BPy_ViewMapGradientNormBP1D.h"

#ifdef __cplusplus
extern "C" {
#endif

///////////////////////////////////////////////////////////////////////////////////////////

//-------------------MODULE INITIALIZATION--------------------------------
int BinaryPredicate1D_Init( PyObject *module )
{
	if( module == NULL )
		return -1;

	if( PyType_Ready( &BinaryPredicate1D_Type ) < 0 )
		return -1;
	Py_INCREF( &BinaryPredicate1D_Type );
	PyModule_AddObject(module, "BinaryPredicate1D", (PyObject *)&BinaryPredicate1D_Type);
	
	if( PyType_Ready( &FalseBP1D_Type ) < 0 )
		return -1;
	Py_INCREF( &FalseBP1D_Type );
	PyModule_AddObject(module, "FalseBP1D", (PyObject *)&FalseBP1D_Type);
	
	if( PyType_Ready( &Length2DBP1D_Type ) < 0 )
		return -1;
	Py_INCREF( &Length2DBP1D_Type );
	PyModule_AddObject(module, "Length2DBP1D", (PyObject *)&Length2DBP1D_Type);
	
	if( PyType_Ready( &SameShapeIdBP1D_Type ) < 0 )
		return -1;
	Py_INCREF( &SameShapeIdBP1D_Type );
	PyModule_AddObject(module, "SameShapeIdBP1D", (PyObject *)&SameShapeIdBP1D_Type);
	
	if( PyType_Ready( &TrueBP1D_Type ) < 0 )
		return -1;
	Py_INCREF( &TrueBP1D_Type );
	PyModule_AddObject(module, "TrueBP1D", (PyObject *)&TrueBP1D_Type);
	
	if( PyType_Ready( &ViewMapGradientNormBP1D_Type ) < 0 )
		return -1;
	Py_INCREF( &ViewMapGradientNormBP1D_Type );
	PyModule_AddObject(module, "ViewMapGradientNormBP1D", (PyObject *)&ViewMapGradientNormBP1D_Type);
	
	return 0;
}

//------------------------INSTANCE METHODS ----------------------------------

static char BinaryPredicate1D___doc__[] =
"Base class for binary predicates working on :class:`Interface1D`\n"
"objects.  A BinaryPredicate1D is typically an ordering relation\n"
"between two Interface1D objects.  The predicate evaluates a relation\n"
"between the two Interface1D instances and returns a boolean value (true\n"
"or false).  It is used by invoking the __call__() method.\n"
"\n"
".. method:: __init__()\n"
"\n"
"   Default constructor.\n"
"\n"
".. method:: __call__(inter1, inter2)\n"
"\n"
"   Must be overload by inherited classes. It evaluates a relation\n"
"   between two Interface1D objects.\n"
"\n"
"   :arg inter1: The first Interface1D object.\n"
"   :type inter1: :class:`Interface1D`\n"
"   :arg inter2: The second Interface1D object.\n"
"   :type inter2: :class:`Interface1D`\n"
"   :return: True or false.\n"
"   :rtype: bool\n";

static int BinaryPredicate1D___init__(BPy_BinaryPredicate1D *self, PyObject *args, PyObject *kwds)
{
    if ( !PyArg_ParseTuple(args, "") )
        return -1;
	self->bp1D = new BinaryPredicate1D();
	self->bp1D->py_bp1D = (PyObject *) self;	
	return 0;
}

static void BinaryPredicate1D___dealloc__(BPy_BinaryPredicate1D* self)
{
	if (self->bp1D)
		delete self->bp1D;
    Py_TYPE(self)->tp_free((PyObject*)self);
}

static PyObject * BinaryPredicate1D___repr__(BPy_BinaryPredicate1D* self)
{
    return PyUnicode_FromFormat("type: %s - address: %p", self->bp1D->getName().c_str(), self->bp1D );
}

static char BinaryPredicate1D_getName___doc__[] =
".. method:: getName()\n"
"\n"
"   Returns the name of the binary 1D predicate.\n"
"\n"
"   :return: The name of the binary 1D predicate.\n"
"   :rtype: str\n";

static PyObject *BinaryPredicate1D_getName( BPy_BinaryPredicate1D *self, PyObject *args)
{
	return PyUnicode_FromString( self->bp1D->getName().c_str() );
}

static PyObject *BinaryPredicate1D___call__( BPy_BinaryPredicate1D *self, PyObject *args, PyObject *kwds)
{
	BPy_Interface1D *obj1, *obj2;
	
	if( kwds != NULL ) {
		PyErr_SetString(PyExc_TypeError, "keyword argument(s) not supported");
		return NULL;
	}
	if( !PyArg_ParseTuple(args, "O!O!", &Interface1D_Type, &obj1, &Interface1D_Type, &obj2) )
		return NULL;
	
	if( typeid(*(self->bp1D)) == typeid(BinaryPredicate1D) ) {
		PyErr_SetString(PyExc_TypeError, "__call__ method not properly overridden");
		return NULL;
	}
	if (self->bp1D->operator()( *(obj1->if1D) , *(obj2->if1D) ) < 0) {
		if (!PyErr_Occurred()) {
			string msg(self->bp1D->getName() + " __call__ method failed");
			PyErr_SetString(PyExc_RuntimeError, msg.c_str());
		}
		return NULL;
	}
	return PyBool_from_bool( self->bp1D->result );
}

/*----------------------BinaryPredicate1D instance definitions ----------------------------*/
static PyMethodDef BPy_BinaryPredicate1D_methods[] = {
	{"getName", ( PyCFunction ) BinaryPredicate1D_getName, METH_NOARGS, BinaryPredicate1D_getName___doc__},
	{NULL, NULL, 0, NULL}
};

/*-----------------------BPy_BinaryPredicate1D type definition ------------------------------*/
PyTypeObject BinaryPredicate1D_Type = {
	PyVarObject_HEAD_INIT(NULL, 0)
	"BinaryPredicate1D",            /* tp_name */
	sizeof(BPy_BinaryPredicate1D),  /* tp_basicsize */
	0,                              /* tp_itemsize */
	(destructor)BinaryPredicate1D___dealloc__, /* tp_dealloc */
	0,                              /* tp_print */
	0,                              /* tp_getattr */
	0,                              /* tp_setattr */
	0,                              /* tp_reserved */
	(reprfunc)BinaryPredicate1D___repr__, /* tp_repr */
	0,                              /* tp_as_number */
	0,                              /* tp_as_sequence */
	0,                              /* tp_as_mapping */
	0,                              /* tp_hash  */
	(ternaryfunc)BinaryPredicate1D___call__, /* tp_call */
	0,                              /* tp_str */
	0,                              /* tp_getattro */
	0,                              /* tp_setattro */
	0,                              /* tp_as_buffer */
	Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE, /* tp_flags */
	BinaryPredicate1D___doc__,      /* tp_doc */
	0,                              /* tp_traverse */
	0,                              /* tp_clear */
	0,                              /* tp_richcompare */
	0,                              /* tp_weaklistoffset */
	0,                              /* tp_iter */
	0,                              /* tp_iternext */
	BPy_BinaryPredicate1D_methods,  /* tp_methods */
	0,                              /* tp_members */
	0,                              /* tp_getset */
	0,                              /* tp_base */
	0,                              /* tp_dict */
	0,                              /* tp_descr_get */
	0,                              /* tp_descr_set */
	0,                              /* tp_dictoffset */
	(initproc)BinaryPredicate1D___init__, /* tp_init */
	0,                              /* tp_alloc */
	PyType_GenericNew,              /* tp_new */
};

///////////////////////////////////////////////////////////////////////////////////////////

#ifdef __cplusplus
}
#endif