cyphesis/rulesets/Py_Point3D.cpp
Olek Wojnar 7f9ff2246d Remove CVS $Id tags
The legacy tags are causing build issues in Debian.
2013-07-15 20:31:59 +02:00

333 lines
12 KiB
C++

// Cyphesis Online RPG Server and AI Engine
// Copyright (C) 2004-2006 Alistair Riddoch
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software Foundation,
// Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
#include "Py_Point3D.h"
#include "Py_Vector3D.h"
#include "Py_Message.h"
#include <Atlas/Message/Element.h>
static PyObject * Point3D_mag(PyPoint3D * self)
{
return PyFloat_FromDouble(std::sqrt(sqrMag(self->coords)));
}
static PyObject *Point3D_unit_vector_to(PyPoint3D * self, PyPoint3D * other)
{
if (!PyPoint3D_Check(other)) {
PyErr_SetString(PyExc_TypeError, "Can get unit vector to Point3D");
return NULL;
}
PyVector3D * ret = newPyVector3D();
if (ret != NULL) {
ret->coords = (other->coords - self->coords);
ret->coords.normalize();
}
return (PyObject *)ret;
}
static PyObject * Point3D_distance(PyPoint3D * self, PyPoint3D * other)
{
if (!PyPoint3D_Check(other)) {
PyErr_SetString(PyExc_TypeError, "Can get distance to other Point3D");
return NULL;
}
return PyFloat_FromDouble(distance(self->coords, other->coords));
}
static PyObject * Point3D_is_valid(PyPoint3D * self)
{
PyObject * ret = self->coords.isValid() ? Py_True : Py_False;
Py_INCREF(ret);
return ret;
}
static PyMethodDef Point3D_methods[] = {
{"mag", (PyCFunction)Point3D_mag, METH_NOARGS},
{"unit_vector_to", (PyCFunction)Point3D_unit_vector_to, METH_O},
{"distance", (PyCFunction)Point3D_distance, METH_O},
{"is_valid", (PyCFunction)Point3D_is_valid, METH_NOARGS},
{NULL, NULL} /* sentinel */
};
static void Point3D_dealloc(PyPoint3D *self)
{
self->coords.~Point3D();
self->ob_type->tp_free(self);
}
static PyObject* Point3D_repr(PyPoint3D * self)
{
char buf[64];
::snprintf(buf, 64, "(%f, %f, %f)", self->coords.x(), self->coords.y(), self->coords.z());
return PyString_FromString(buf);
}
static PyObject * Point3D_getattro(PyPoint3D *self, PyObject *oname)
{
char * name = PyString_AsString(oname);
if (strcmp(name, "x") == 0) { return PyFloat_FromDouble(self->coords.x()); }
if (strcmp(name, "y") == 0) { return PyFloat_FromDouble(self->coords.y()); }
if (strcmp(name, "z") == 0) { return PyFloat_FromDouble(self->coords.z()); }
return PyObject_GenericGetAttr((PyObject *)self, oname);
}
static int Point3D_compare(PyPoint3D * self, PyPoint3D * other)
{
if (self->coords == other->coords) {
return 0;
}
return 1;
}
/*
* Point3D sequence methods.
*/
#if PY_VERSION_HEX < 0x02050000
typedef int Py_ssize_t;
#endif
static Py_ssize_t Point3D_seq_length(PyPoint3D * self)
{
return 3;
}
static PyObject * Point3D_seq_item(PyPoint3D * self, Py_ssize_t item)
{
if (item < 0 || item >= 3) {
PyErr_SetString(PyExc_IndexError,"Point3D.[]: Index out of range.");
return 0;
}
return PyFloat_FromDouble(self->coords[item]);
}
static int Point3D_seq_ass_item(PyPoint3D * self,
Py_ssize_t item,
PyObject * val)
{
if (item < 0 || item >= 3) {
PyErr_SetString(PyExc_IndexError,"Point3D.[]: Index out of range.");
return -1;
}
if (!PyFloat_Check(val)) {
PyErr_SetString(PyExc_TypeError,"Point3D.[]: Value must be float.");
return -1;
}
self->coords[item] = PyFloat_AsDouble(val);
return 0;
}
static PyPoint3D * Point3D_num_add(PyPoint3D * self, PyVector3D*other)
{
if (!PyVector3D_Check(other)) {
PyErr_SetString(PyExc_TypeError, "Can only add Vector3D to Point3D");
return NULL;
}
PyPoint3D * ret = newPyPoint3D();
if (ret != NULL) {
ret->coords = (self->coords + other->coords);
}
return ret;
}
static PyObject * Point3D_num_sub(PyPoint3D * self, PyObject * other)
{
if (PyVector3D_Check(other)) {
PyVector3D * ovec = (PyVector3D *)other;
PyPoint3D * ret = newPyPoint3D();
if (ret != NULL) {
ret->coords = (self->coords - ovec->coords);
}
return (PyObject *)ret;
} else if (PyPoint3D_Check(other)) {
PyPoint3D * opoint = (PyPoint3D *)other;
PyVector3D * ret = newPyVector3D();
if (ret != NULL) {
ret->coords = (self->coords - opoint->coords);
}
return (PyObject *)ret;
} else {
PyErr_SetString(PyExc_TypeError, "Can only subtract Vector3D or Point3D from Point3D");
return NULL;
}
}
static int Point3D_num_coerce(PyObject ** self, PyObject ** other)
{
Py_INCREF(*self);
Py_INCREF(*other);
return 0;
}
static int Point3D_init(PyPoint3D * self, PyObject * args, PyObject * kwds)
{
PyObject * clist;
new (&(self->coords)) Point3D();
switch (PyTuple_Size(args)) {
case 0:
break;
case 1:
clist = PyTuple_GetItem(args, 0);
if (!PyList_Check(clist)) {
PyErr_SetString(PyExc_TypeError, "Point3D() from single value must be a list");
return -1;
}
if (PyList_Size(clist) != 3) {
PyErr_SetString(PyExc_ValueError, "Point3D() from a list must be 3 long");
return -1;
}
for(int i = 0; i < 3; i++) {
PyObject * item = PyList_GetItem(clist, i);
if (PyInt_Check(item)) {
self->coords[i] = (float)PyInt_AsLong(item);
} else if (PyFloat_Check(item)) {
self->coords[i] = PyFloat_AsDouble(item);
} else if (PyMessage_Check(item)) {
PyMessage * mitem = (PyMessage*)item;
if (!mitem->m_obj->isNum()) {
PyErr_SetString(PyExc_TypeError, "Point3D() must take list of floats, or ints");
return -1;
}
self->coords[i] = mitem->m_obj->asNum();
} else {
PyErr_SetString(PyExc_TypeError, "Point3D() must take list of floats, or ints");
return -1;
}
}
self->coords.setValid();
break;
case 3:
for(int i = 0; i < 3; i++) {
PyObject * item = PyTuple_GetItem(args, i);
if (PyInt_Check(item)) {
self->coords[i] = (float)PyInt_AsLong(item);
} else if (PyFloat_Check(item)) {
self->coords[i] = PyFloat_AsDouble(item);
} else {
PyErr_SetString(PyExc_TypeError, "Point3D() must take list of floats, or ints");
return -1;
}
}
self->coords.setValid();
break;
default:
PyErr_SetString(PyExc_TypeError, "Point3D must take list of floats, or ints, 3 ints or 3 floats");
return -1;
break;
}
return 0;
}
PyObject * Point3D_new(PyTypeObject * type, PyObject *, PyObject *)
{
// This looks allot like the default implementation, except we call the
// in-place constructor.
PyPoint3D * self = (PyPoint3D *)type->tp_alloc(type, 0);
if (self != NULL) {
new (&(self->coords)) Point3D();
}
return (PyObject *)self;
}
static PySequenceMethods Point3D_seq = {
(lenfunc)Point3D_seq_length, /* sq_length */
NULL, /* sq_concat */
NULL, /* sq_repeat */
(ssizeargfunc)Point3D_seq_item, /* sq_item */
NULL, /* sq_slice */
(ssizeobjargproc)Point3D_seq_ass_item, /* sq_ass_item */
NULL /* sq_ass_slice */
};
static PyNumberMethods Point3D_num = {
(binaryfunc)Point3D_num_add, /* nb_add */
(binaryfunc)Point3D_num_sub, /* nb_subtract */
0, /* nb_multiply */
0, /* nb_divide */
0, /* nb_remainder */
0, /* nb_divmod */
0, /* nb_power */
0, /* nb_negative */
0, /* nb_positive */
0, /* nb_absolute */
0, /* nb_nonzero */
0, /* nb_invert */
0, /* nb_lshift */
0, /* nb_rshift */
0, /* nb_and */
0, /* nb_xor */
0, /* nb_or */
Point3D_num_coerce, /* nb_coerce */
0, /* nb_int */
0, /* nb_long */
0, /* nb_float */
0, /* nb_oct */
0 /* nb_hex */
};
PyTypeObject PyPoint3D_Type = {
PyObject_HEAD_INIT(0)
0, // ob_size
"physics.Point3D", // tp_name
sizeof(PyPoint3D), // tp_basicsize
0, // tp_itemsize
// methods
(destructor)Point3D_dealloc, // tp_dealloc
0, // tp_print
0, // tp_getattr
0, // tp_setattr
(cmpfunc)Point3D_compare, // tp_compare
(reprfunc)Point3D_repr, // tp_repr
&Point3D_num, // tp_as_number
&Point3D_seq, // tp_as_sequence
0, // tp_as_mapping
0, // tp_hash
0, // tp_call
0, // tp_str
(getattrofunc)Point3D_getattro, // tp_getattro
0, // tp_setattro
0, // tp_as_buffer
Py_TPFLAGS_DEFAULT, // tp_flags
"Point3D objects", // tp_doc
0, // tp_travers
0, // tp_clear
0, // tp_richcompare
0, // tp_weaklistoffset
0, // tp_iter
0, // tp_iternext
Point3D_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)Point3D_init, // tp_init
0, // tp_alloc
Point3D_new, // tp_new
};
PyPoint3D * newPyPoint3D()
{
return (PyPoint3D *)PyPoint3D_Type.tp_new(&PyPoint3D_Type, 0, 0);
}