--- /dev/null
+/* Descriptors -- a new, flexible way to describe attributes */\r
+\r
+#include "Python.h"\r
+#include "structmember.h" /* Why is this not included in Python.h? */\r
+\r
+static void\r
+descr_dealloc(PyDescrObject *descr)\r
+{\r
+ _PyObject_GC_UNTRACK(descr);\r
+ Py_XDECREF(descr->d_type);\r
+ Py_XDECREF(descr->d_name);\r
+ PyObject_GC_Del(descr);\r
+}\r
+\r
+static char *\r
+descr_name(PyDescrObject *descr)\r
+{\r
+ if (descr->d_name != NULL && PyString_Check(descr->d_name))\r
+ return PyString_AS_STRING(descr->d_name);\r
+ else\r
+ return "?";\r
+}\r
+\r
+static PyObject *\r
+descr_repr(PyDescrObject *descr, char *format)\r
+{\r
+ return PyString_FromFormat(format, descr_name(descr),\r
+ descr->d_type->tp_name);\r
+}\r
+\r
+static PyObject *\r
+method_repr(PyMethodDescrObject *descr)\r
+{\r
+ return descr_repr((PyDescrObject *)descr,\r
+ "<method '%s' of '%s' objects>");\r
+}\r
+\r
+static PyObject *\r
+member_repr(PyMemberDescrObject *descr)\r
+{\r
+ return descr_repr((PyDescrObject *)descr,\r
+ "<member '%s' of '%s' objects>");\r
+}\r
+\r
+static PyObject *\r
+getset_repr(PyGetSetDescrObject *descr)\r
+{\r
+ return descr_repr((PyDescrObject *)descr,\r
+ "<attribute '%s' of '%s' objects>");\r
+}\r
+\r
+static PyObject *\r
+wrapperdescr_repr(PyWrapperDescrObject *descr)\r
+{\r
+ return descr_repr((PyDescrObject *)descr,\r
+ "<slot wrapper '%s' of '%s' objects>");\r
+}\r
+\r
+static int\r
+descr_check(PyDescrObject *descr, PyObject *obj, PyObject **pres)\r
+{\r
+ if (obj == NULL) {\r
+ Py_INCREF(descr);\r
+ *pres = (PyObject *)descr;\r
+ return 1;\r
+ }\r
+ if (!PyObject_TypeCheck(obj, descr->d_type)) {\r
+ PyErr_Format(PyExc_TypeError,\r
+ "descriptor '%s' for '%s' objects "\r
+ "doesn't apply to '%s' object",\r
+ descr_name((PyDescrObject *)descr),\r
+ descr->d_type->tp_name,\r
+ obj->ob_type->tp_name);\r
+ *pres = NULL;\r
+ return 1;\r
+ }\r
+ return 0;\r
+}\r
+\r
+static PyObject *\r
+classmethod_get(PyMethodDescrObject *descr, PyObject *obj, PyObject *type)\r
+{\r
+ /* Ensure a valid type. Class methods ignore obj. */\r
+ if (type == NULL) {\r
+ if (obj != NULL)\r
+ type = (PyObject *)obj->ob_type;\r
+ else {\r
+ /* Wot - no type?! */\r
+ PyErr_Format(PyExc_TypeError,\r
+ "descriptor '%s' for type '%s' "\r
+ "needs either an object or a type",\r
+ descr_name((PyDescrObject *)descr),\r
+ descr->d_type->tp_name);\r
+ return NULL;\r
+ }\r
+ }\r
+ if (!PyType_Check(type)) {\r
+ PyErr_Format(PyExc_TypeError,\r
+ "descriptor '%s' for type '%s' "\r
+ "needs a type, not a '%s' as arg 2",\r
+ descr_name((PyDescrObject *)descr),\r
+ descr->d_type->tp_name,\r
+ type->ob_type->tp_name);\r
+ return NULL;\r
+ }\r
+ if (!PyType_IsSubtype((PyTypeObject *)type, descr->d_type)) {\r
+ PyErr_Format(PyExc_TypeError,\r
+ "descriptor '%s' for type '%s' "\r
+ "doesn't apply to type '%s'",\r
+ descr_name((PyDescrObject *)descr),\r
+ descr->d_type->tp_name,\r
+ ((PyTypeObject *)type)->tp_name);\r
+ return NULL;\r
+ }\r
+ return PyCFunction_New(descr->d_method, type);\r
+}\r
+\r
+static PyObject *\r
+method_get(PyMethodDescrObject *descr, PyObject *obj, PyObject *type)\r
+{\r
+ PyObject *res;\r
+\r
+ if (descr_check((PyDescrObject *)descr, obj, &res))\r
+ return res;\r
+ return PyCFunction_New(descr->d_method, obj);\r
+}\r
+\r
+static PyObject *\r
+member_get(PyMemberDescrObject *descr, PyObject *obj, PyObject *type)\r
+{\r
+ PyObject *res;\r
+\r
+ if (descr_check((PyDescrObject *)descr, obj, &res))\r
+ return res;\r
+ return PyMember_GetOne((char *)obj, descr->d_member);\r
+}\r
+\r
+static PyObject *\r
+getset_get(PyGetSetDescrObject *descr, PyObject *obj, PyObject *type)\r
+{\r
+ PyObject *res;\r
+\r
+ if (descr_check((PyDescrObject *)descr, obj, &res))\r
+ return res;\r
+ if (descr->d_getset->get != NULL)\r
+ return descr->d_getset->get(obj, descr->d_getset->closure);\r
+ PyErr_Format(PyExc_AttributeError,\r
+ "attribute '%.300s' of '%.100s' objects is not readable",\r
+ descr_name((PyDescrObject *)descr),\r
+ descr->d_type->tp_name);\r
+ return NULL;\r
+}\r
+\r
+static PyObject *\r
+wrapperdescr_get(PyWrapperDescrObject *descr, PyObject *obj, PyObject *type)\r
+{\r
+ PyObject *res;\r
+\r
+ if (descr_check((PyDescrObject *)descr, obj, &res))\r
+ return res;\r
+ return PyWrapper_New((PyObject *)descr, obj);\r
+}\r
+\r
+static int\r
+descr_setcheck(PyDescrObject *descr, PyObject *obj, PyObject *value,\r
+ int *pres)\r
+{\r
+ assert(obj != NULL);\r
+ if (!PyObject_TypeCheck(obj, descr->d_type)) {\r
+ PyErr_Format(PyExc_TypeError,\r
+ "descriptor '%.200s' for '%.100s' objects "\r
+ "doesn't apply to '%.100s' object",\r
+ descr_name(descr),\r
+ descr->d_type->tp_name,\r
+ obj->ob_type->tp_name);\r
+ *pres = -1;\r
+ return 1;\r
+ }\r
+ return 0;\r
+}\r
+\r
+static int\r
+member_set(PyMemberDescrObject *descr, PyObject *obj, PyObject *value)\r
+{\r
+ int res;\r
+\r
+ if (descr_setcheck((PyDescrObject *)descr, obj, value, &res))\r
+ return res;\r
+ return PyMember_SetOne((char *)obj, descr->d_member, value);\r
+}\r
+\r
+static int\r
+getset_set(PyGetSetDescrObject *descr, PyObject *obj, PyObject *value)\r
+{\r
+ int res;\r
+\r
+ if (descr_setcheck((PyDescrObject *)descr, obj, value, &res))\r
+ return res;\r
+ if (descr->d_getset->set != NULL)\r
+ return descr->d_getset->set(obj, value,\r
+ descr->d_getset->closure);\r
+ PyErr_Format(PyExc_AttributeError,\r
+ "attribute '%.300s' of '%.100s' objects is not writable",\r
+ descr_name((PyDescrObject *)descr),\r
+ descr->d_type->tp_name);\r
+ return -1;\r
+}\r
+\r
+static PyObject *\r
+methoddescr_call(PyMethodDescrObject *descr, PyObject *args, PyObject *kwds)\r
+{\r
+ Py_ssize_t argc;\r
+ PyObject *self, *func, *result;\r
+\r
+ /* Make sure that the first argument is acceptable as 'self' */\r
+ assert(PyTuple_Check(args));\r
+ argc = PyTuple_GET_SIZE(args);\r
+ if (argc < 1) {\r
+ PyErr_Format(PyExc_TypeError,\r
+ "descriptor '%.300s' of '%.100s' "\r
+ "object needs an argument",\r
+ descr_name((PyDescrObject *)descr),\r
+ descr->d_type->tp_name);\r
+ return NULL;\r
+ }\r
+ self = PyTuple_GET_ITEM(args, 0);\r
+ if (!_PyObject_RealIsSubclass((PyObject *)Py_TYPE(self),\r
+ (PyObject *)(descr->d_type))) {\r
+ PyErr_Format(PyExc_TypeError,\r
+ "descriptor '%.200s' "\r
+ "requires a '%.100s' object "\r
+ "but received a '%.100s'",\r
+ descr_name((PyDescrObject *)descr),\r
+ descr->d_type->tp_name,\r
+ self->ob_type->tp_name);\r
+ return NULL;\r
+ }\r
+\r
+ func = PyCFunction_New(descr->d_method, self);\r
+ if (func == NULL)\r
+ return NULL;\r
+ args = PyTuple_GetSlice(args, 1, argc);\r
+ if (args == NULL) {\r
+ Py_DECREF(func);\r
+ return NULL;\r
+ }\r
+ result = PyEval_CallObjectWithKeywords(func, args, kwds);\r
+ Py_DECREF(args);\r
+ Py_DECREF(func);\r
+ return result;\r
+}\r
+\r
+static PyObject *\r
+classmethoddescr_call(PyMethodDescrObject *descr, PyObject *args,\r
+ PyObject *kwds)\r
+{\r
+ Py_ssize_t argc;\r
+ PyObject *self, *func, *result;\r
+\r
+ /* Make sure that the first argument is acceptable as 'self' */\r
+ assert(PyTuple_Check(args));\r
+ argc = PyTuple_GET_SIZE(args);\r
+ if (argc < 1) {\r
+ PyErr_Format(PyExc_TypeError,\r
+ "descriptor '%s' of '%.100s' "\r
+ "object needs an argument",\r
+ descr_name((PyDescrObject *)descr),\r
+ descr->d_type->tp_name);\r
+ return NULL;\r
+ }\r
+ self = PyTuple_GET_ITEM(args, 0);\r
+ if (!PyType_Check(self)) {\r
+ PyErr_Format(PyExc_TypeError,\r
+ "descriptor '%s' requires a type "\r
+ "but received a '%.100s'",\r
+ descr_name((PyDescrObject *)descr),\r
+ self->ob_type->tp_name);\r
+ return NULL;\r
+ }\r
+ if (!PyType_IsSubtype((PyTypeObject *)self, descr->d_type)) {\r
+ PyErr_Format(PyExc_TypeError,\r
+ "descriptor '%s' "\r
+ "requires a subtype of '%.100s' "\r
+ "but received '%.100s",\r
+ descr_name((PyDescrObject *)descr),\r
+ descr->d_type->tp_name,\r
+ self->ob_type->tp_name);\r
+ return NULL;\r
+ }\r
+\r
+ func = PyCFunction_New(descr->d_method, self);\r
+ if (func == NULL)\r
+ return NULL;\r
+ args = PyTuple_GetSlice(args, 1, argc);\r
+ if (args == NULL) {\r
+ Py_DECREF(func);\r
+ return NULL;\r
+ }\r
+ result = PyEval_CallObjectWithKeywords(func, args, kwds);\r
+ Py_DECREF(func);\r
+ Py_DECREF(args);\r
+ return result;\r
+}\r
+\r
+static PyObject *\r
+wrapperdescr_call(PyWrapperDescrObject *descr, PyObject *args, PyObject *kwds)\r
+{\r
+ Py_ssize_t argc;\r
+ PyObject *self, *func, *result;\r
+\r
+ /* Make sure that the first argument is acceptable as 'self' */\r
+ assert(PyTuple_Check(args));\r
+ argc = PyTuple_GET_SIZE(args);\r
+ if (argc < 1) {\r
+ PyErr_Format(PyExc_TypeError,\r
+ "descriptor '%.300s' of '%.100s' "\r
+ "object needs an argument",\r
+ descr_name((PyDescrObject *)descr),\r
+ descr->d_type->tp_name);\r
+ return NULL;\r
+ }\r
+ self = PyTuple_GET_ITEM(args, 0);\r
+ if (!_PyObject_RealIsSubclass((PyObject *)Py_TYPE(self),\r
+ (PyObject *)(descr->d_type))) {\r
+ PyErr_Format(PyExc_TypeError,\r
+ "descriptor '%.200s' "\r
+ "requires a '%.100s' object "\r
+ "but received a '%.100s'",\r
+ descr_name((PyDescrObject *)descr),\r
+ descr->d_type->tp_name,\r
+ self->ob_type->tp_name);\r
+ return NULL;\r
+ }\r
+\r
+ func = PyWrapper_New((PyObject *)descr, self);\r
+ if (func == NULL)\r
+ return NULL;\r
+ args = PyTuple_GetSlice(args, 1, argc);\r
+ if (args == NULL) {\r
+ Py_DECREF(func);\r
+ return NULL;\r
+ }\r
+ result = PyEval_CallObjectWithKeywords(func, args, kwds);\r
+ Py_DECREF(args);\r
+ Py_DECREF(func);\r
+ return result;\r
+}\r
+\r
+static PyObject *\r
+method_get_doc(PyMethodDescrObject *descr, void *closure)\r
+{\r
+ if (descr->d_method->ml_doc == NULL) {\r
+ Py_INCREF(Py_None);\r
+ return Py_None;\r
+ }\r
+ return PyString_FromString(descr->d_method->ml_doc);\r
+}\r
+\r
+static PyMemberDef descr_members[] = {\r
+ {"__objclass__", T_OBJECT, offsetof(PyDescrObject, d_type), READONLY},\r
+ {"__name__", T_OBJECT, offsetof(PyDescrObject, d_name), READONLY},\r
+ {0}\r
+};\r
+\r
+static PyGetSetDef method_getset[] = {\r
+ {"__doc__", (getter)method_get_doc},\r
+ {0}\r
+};\r
+\r
+static PyObject *\r
+member_get_doc(PyMemberDescrObject *descr, void *closure)\r
+{\r
+ if (descr->d_member->doc == NULL) {\r
+ Py_INCREF(Py_None);\r
+ return Py_None;\r
+ }\r
+ return PyString_FromString(descr->d_member->doc);\r
+}\r
+\r
+static PyGetSetDef member_getset[] = {\r
+ {"__doc__", (getter)member_get_doc},\r
+ {0}\r
+};\r
+\r
+static PyObject *\r
+getset_get_doc(PyGetSetDescrObject *descr, void *closure)\r
+{\r
+ if (descr->d_getset->doc == NULL) {\r
+ Py_INCREF(Py_None);\r
+ return Py_None;\r
+ }\r
+ return PyString_FromString(descr->d_getset->doc);\r
+}\r
+\r
+static PyGetSetDef getset_getset[] = {\r
+ {"__doc__", (getter)getset_get_doc},\r
+ {0}\r
+};\r
+\r
+static PyObject *\r
+wrapperdescr_get_doc(PyWrapperDescrObject *descr, void *closure)\r
+{\r
+ if (descr->d_base->doc == NULL) {\r
+ Py_INCREF(Py_None);\r
+ return Py_None;\r
+ }\r
+ return PyString_FromString(descr->d_base->doc);\r
+}\r
+\r
+static PyGetSetDef wrapperdescr_getset[] = {\r
+ {"__doc__", (getter)wrapperdescr_get_doc},\r
+ {0}\r
+};\r
+\r
+static int\r
+descr_traverse(PyObject *self, visitproc visit, void *arg)\r
+{\r
+ PyDescrObject *descr = (PyDescrObject *)self;\r
+ Py_VISIT(descr->d_type);\r
+ return 0;\r
+}\r
+\r
+static PyTypeObject PyMethodDescr_Type = {\r
+ PyVarObject_HEAD_INIT(&PyType_Type, 0)\r
+ "method_descriptor",\r
+ sizeof(PyMethodDescrObject),\r
+ 0,\r
+ (destructor)descr_dealloc, /* tp_dealloc */\r
+ 0, /* tp_print */\r
+ 0, /* tp_getattr */\r
+ 0, /* tp_setattr */\r
+ 0, /* tp_compare */\r
+ (reprfunc)method_repr, /* tp_repr */\r
+ 0, /* tp_as_number */\r
+ 0, /* tp_as_sequence */\r
+ 0, /* tp_as_mapping */\r
+ 0, /* tp_hash */\r
+ (ternaryfunc)methoddescr_call, /* tp_call */\r
+ 0, /* tp_str */\r
+ PyObject_GenericGetAttr, /* tp_getattro */\r
+ 0, /* tp_setattro */\r
+ 0, /* tp_as_buffer */\r
+ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC, /* tp_flags */\r
+ 0, /* tp_doc */\r
+ descr_traverse, /* tp_traverse */\r
+ 0, /* tp_clear */\r
+ 0, /* tp_richcompare */\r
+ 0, /* tp_weaklistoffset */\r
+ 0, /* tp_iter */\r
+ 0, /* tp_iternext */\r
+ 0, /* tp_methods */\r
+ descr_members, /* tp_members */\r
+ method_getset, /* tp_getset */\r
+ 0, /* tp_base */\r
+ 0, /* tp_dict */\r
+ (descrgetfunc)method_get, /* tp_descr_get */\r
+ 0, /* tp_descr_set */\r
+};\r
+\r
+/* This is for METH_CLASS in C, not for "f = classmethod(f)" in Python! */\r
+static PyTypeObject PyClassMethodDescr_Type = {\r
+ PyVarObject_HEAD_INIT(&PyType_Type, 0)\r
+ "classmethod_descriptor",\r
+ sizeof(PyMethodDescrObject),\r
+ 0,\r
+ (destructor)descr_dealloc, /* tp_dealloc */\r
+ 0, /* tp_print */\r
+ 0, /* tp_getattr */\r
+ 0, /* tp_setattr */\r
+ 0, /* tp_compare */\r
+ (reprfunc)method_repr, /* tp_repr */\r
+ 0, /* tp_as_number */\r
+ 0, /* tp_as_sequence */\r
+ 0, /* tp_as_mapping */\r
+ 0, /* tp_hash */\r
+ (ternaryfunc)classmethoddescr_call, /* tp_call */\r
+ 0, /* tp_str */\r
+ PyObject_GenericGetAttr, /* tp_getattro */\r
+ 0, /* tp_setattro */\r
+ 0, /* tp_as_buffer */\r
+ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC, /* tp_flags */\r
+ 0, /* tp_doc */\r
+ descr_traverse, /* tp_traverse */\r
+ 0, /* tp_clear */\r
+ 0, /* tp_richcompare */\r
+ 0, /* tp_weaklistoffset */\r
+ 0, /* tp_iter */\r
+ 0, /* tp_iternext */\r
+ 0, /* tp_methods */\r
+ descr_members, /* tp_members */\r
+ method_getset, /* tp_getset */\r
+ 0, /* tp_base */\r
+ 0, /* tp_dict */\r
+ (descrgetfunc)classmethod_get, /* tp_descr_get */\r
+ 0, /* tp_descr_set */\r
+};\r
+\r
+PyTypeObject PyMemberDescr_Type = {\r
+ PyVarObject_HEAD_INIT(&PyType_Type, 0)\r
+ "member_descriptor",\r
+ sizeof(PyMemberDescrObject),\r
+ 0,\r
+ (destructor)descr_dealloc, /* tp_dealloc */\r
+ 0, /* tp_print */\r
+ 0, /* tp_getattr */\r
+ 0, /* tp_setattr */\r
+ 0, /* tp_compare */\r
+ (reprfunc)member_repr, /* tp_repr */\r
+ 0, /* tp_as_number */\r
+ 0, /* tp_as_sequence */\r
+ 0, /* tp_as_mapping */\r
+ 0, /* tp_hash */\r
+ 0, /* tp_call */\r
+ 0, /* tp_str */\r
+ PyObject_GenericGetAttr, /* tp_getattro */\r
+ 0, /* tp_setattro */\r
+ 0, /* tp_as_buffer */\r
+ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC, /* tp_flags */\r
+ 0, /* tp_doc */\r
+ descr_traverse, /* tp_traverse */\r
+ 0, /* tp_clear */\r
+ 0, /* tp_richcompare */\r
+ 0, /* tp_weaklistoffset */\r
+ 0, /* tp_iter */\r
+ 0, /* tp_iternext */\r
+ 0, /* tp_methods */\r
+ descr_members, /* tp_members */\r
+ member_getset, /* tp_getset */\r
+ 0, /* tp_base */\r
+ 0, /* tp_dict */\r
+ (descrgetfunc)member_get, /* tp_descr_get */\r
+ (descrsetfunc)member_set, /* tp_descr_set */\r
+};\r
+\r
+PyTypeObject PyGetSetDescr_Type = {\r
+ PyVarObject_HEAD_INIT(&PyType_Type, 0)\r
+ "getset_descriptor",\r
+ sizeof(PyGetSetDescrObject),\r
+ 0,\r
+ (destructor)descr_dealloc, /* tp_dealloc */\r
+ 0, /* tp_print */\r
+ 0, /* tp_getattr */\r
+ 0, /* tp_setattr */\r
+ 0, /* tp_compare */\r
+ (reprfunc)getset_repr, /* tp_repr */\r
+ 0, /* tp_as_number */\r
+ 0, /* tp_as_sequence */\r
+ 0, /* tp_as_mapping */\r
+ 0, /* tp_hash */\r
+ 0, /* tp_call */\r
+ 0, /* tp_str */\r
+ PyObject_GenericGetAttr, /* tp_getattro */\r
+ 0, /* tp_setattro */\r
+ 0, /* tp_as_buffer */\r
+ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC, /* tp_flags */\r
+ 0, /* tp_doc */\r
+ descr_traverse, /* tp_traverse */\r
+ 0, /* tp_clear */\r
+ 0, /* tp_richcompare */\r
+ 0, /* tp_weaklistoffset */\r
+ 0, /* tp_iter */\r
+ 0, /* tp_iternext */\r
+ 0, /* tp_methods */\r
+ descr_members, /* tp_members */\r
+ getset_getset, /* tp_getset */\r
+ 0, /* tp_base */\r
+ 0, /* tp_dict */\r
+ (descrgetfunc)getset_get, /* tp_descr_get */\r
+ (descrsetfunc)getset_set, /* tp_descr_set */\r
+};\r
+\r
+PyTypeObject PyWrapperDescr_Type = {\r
+ PyVarObject_HEAD_INIT(&PyType_Type, 0)\r
+ "wrapper_descriptor",\r
+ sizeof(PyWrapperDescrObject),\r
+ 0,\r
+ (destructor)descr_dealloc, /* tp_dealloc */\r
+ 0, /* tp_print */\r
+ 0, /* tp_getattr */\r
+ 0, /* tp_setattr */\r
+ 0, /* tp_compare */\r
+ (reprfunc)wrapperdescr_repr, /* tp_repr */\r
+ 0, /* tp_as_number */\r
+ 0, /* tp_as_sequence */\r
+ 0, /* tp_as_mapping */\r
+ 0, /* tp_hash */\r
+ (ternaryfunc)wrapperdescr_call, /* tp_call */\r
+ 0, /* tp_str */\r
+ PyObject_GenericGetAttr, /* tp_getattro */\r
+ 0, /* tp_setattro */\r
+ 0, /* tp_as_buffer */\r
+ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC, /* tp_flags */\r
+ 0, /* tp_doc */\r
+ descr_traverse, /* tp_traverse */\r
+ 0, /* tp_clear */\r
+ 0, /* tp_richcompare */\r
+ 0, /* tp_weaklistoffset */\r
+ 0, /* tp_iter */\r
+ 0, /* tp_iternext */\r
+ 0, /* tp_methods */\r
+ descr_members, /* tp_members */\r
+ wrapperdescr_getset, /* tp_getset */\r
+ 0, /* tp_base */\r
+ 0, /* tp_dict */\r
+ (descrgetfunc)wrapperdescr_get, /* tp_descr_get */\r
+ 0, /* tp_descr_set */\r
+};\r
+\r
+static PyDescrObject *\r
+descr_new(PyTypeObject *descrtype, PyTypeObject *type, const char *name)\r
+{\r
+ PyDescrObject *descr;\r
+\r
+ descr = (PyDescrObject *)PyType_GenericAlloc(descrtype, 0);\r
+ if (descr != NULL) {\r
+ Py_XINCREF(type);\r
+ descr->d_type = type;\r
+ descr->d_name = PyString_InternFromString(name);\r
+ if (descr->d_name == NULL) {\r
+ Py_DECREF(descr);\r
+ descr = NULL;\r
+ }\r
+ }\r
+ return descr;\r
+}\r
+\r
+PyObject *\r
+PyDescr_NewMethod(PyTypeObject *type, PyMethodDef *method)\r
+{\r
+ PyMethodDescrObject *descr;\r
+\r
+ descr = (PyMethodDescrObject *)descr_new(&PyMethodDescr_Type,\r
+ type, method->ml_name);\r
+ if (descr != NULL)\r
+ descr->d_method = method;\r
+ return (PyObject *)descr;\r
+}\r
+\r
+PyObject *\r
+PyDescr_NewClassMethod(PyTypeObject *type, PyMethodDef *method)\r
+{\r
+ PyMethodDescrObject *descr;\r
+\r
+ descr = (PyMethodDescrObject *)descr_new(&PyClassMethodDescr_Type,\r
+ type, method->ml_name);\r
+ if (descr != NULL)\r
+ descr->d_method = method;\r
+ return (PyObject *)descr;\r
+}\r
+\r
+PyObject *\r
+PyDescr_NewMember(PyTypeObject *type, PyMemberDef *member)\r
+{\r
+ PyMemberDescrObject *descr;\r
+\r
+ descr = (PyMemberDescrObject *)descr_new(&PyMemberDescr_Type,\r
+ type, member->name);\r
+ if (descr != NULL)\r
+ descr->d_member = member;\r
+ return (PyObject *)descr;\r
+}\r
+\r
+PyObject *\r
+PyDescr_NewGetSet(PyTypeObject *type, PyGetSetDef *getset)\r
+{\r
+ PyGetSetDescrObject *descr;\r
+\r
+ descr = (PyGetSetDescrObject *)descr_new(&PyGetSetDescr_Type,\r
+ type, getset->name);\r
+ if (descr != NULL)\r
+ descr->d_getset = getset;\r
+ return (PyObject *)descr;\r
+}\r
+\r
+PyObject *\r
+PyDescr_NewWrapper(PyTypeObject *type, struct wrapperbase *base, void *wrapped)\r
+{\r
+ PyWrapperDescrObject *descr;\r
+\r
+ descr = (PyWrapperDescrObject *)descr_new(&PyWrapperDescr_Type,\r
+ type, base->name);\r
+ if (descr != NULL) {\r
+ descr->d_base = base;\r
+ descr->d_wrapped = wrapped;\r
+ }\r
+ return (PyObject *)descr;\r
+}\r
+\r
+\r
+/* --- Readonly proxy for dictionaries (actually any mapping) --- */\r
+\r
+/* This has no reason to be in this file except that adding new files is a\r
+ bit of a pain */\r
+\r
+typedef struct {\r
+ PyObject_HEAD\r
+ PyObject *dict;\r
+} proxyobject;\r
+\r
+static Py_ssize_t\r
+proxy_len(proxyobject *pp)\r
+{\r
+ return PyObject_Size(pp->dict);\r
+}\r
+\r
+static PyObject *\r
+proxy_getitem(proxyobject *pp, PyObject *key)\r
+{\r
+ return PyObject_GetItem(pp->dict, key);\r
+}\r
+\r
+static PyMappingMethods proxy_as_mapping = {\r
+ (lenfunc)proxy_len, /* mp_length */\r
+ (binaryfunc)proxy_getitem, /* mp_subscript */\r
+ 0, /* mp_ass_subscript */\r
+};\r
+\r
+static int\r
+proxy_contains(proxyobject *pp, PyObject *key)\r
+{\r
+ return PyDict_Contains(pp->dict, key);\r
+}\r
+\r
+static PySequenceMethods proxy_as_sequence = {\r
+ 0, /* sq_length */\r
+ 0, /* sq_concat */\r
+ 0, /* sq_repeat */\r
+ 0, /* sq_item */\r
+ 0, /* sq_slice */\r
+ 0, /* sq_ass_item */\r
+ 0, /* sq_ass_slice */\r
+ (objobjproc)proxy_contains, /* sq_contains */\r
+ 0, /* sq_inplace_concat */\r
+ 0, /* sq_inplace_repeat */\r
+};\r
+\r
+static PyObject *\r
+proxy_has_key(proxyobject *pp, PyObject *key)\r
+{\r
+ int res = PyDict_Contains(pp->dict, key);\r
+ if (res < 0)\r
+ return NULL;\r
+ return PyBool_FromLong(res);\r
+}\r
+\r
+static PyObject *\r
+proxy_get(proxyobject *pp, PyObject *args)\r
+{\r
+ PyObject *key, *def = Py_None;\r
+\r
+ if (!PyArg_UnpackTuple(args, "get", 1, 2, &key, &def))\r
+ return NULL;\r
+ return PyObject_CallMethod(pp->dict, "get", "(OO)", key, def);\r
+}\r
+\r
+static PyObject *\r
+proxy_keys(proxyobject *pp)\r
+{\r
+ return PyMapping_Keys(pp->dict);\r
+}\r
+\r
+static PyObject *\r
+proxy_values(proxyobject *pp)\r
+{\r
+ return PyMapping_Values(pp->dict);\r
+}\r
+\r
+static PyObject *\r
+proxy_items(proxyobject *pp)\r
+{\r
+ return PyMapping_Items(pp->dict);\r
+}\r
+\r
+static PyObject *\r
+proxy_iterkeys(proxyobject *pp)\r
+{\r
+ return PyObject_CallMethod(pp->dict, "iterkeys", NULL);\r
+}\r
+\r
+static PyObject *\r
+proxy_itervalues(proxyobject *pp)\r
+{\r
+ return PyObject_CallMethod(pp->dict, "itervalues", NULL);\r
+}\r
+\r
+static PyObject *\r
+proxy_iteritems(proxyobject *pp)\r
+{\r
+ return PyObject_CallMethod(pp->dict, "iteritems", NULL);\r
+}\r
+static PyObject *\r
+proxy_copy(proxyobject *pp)\r
+{\r
+ return PyObject_CallMethod(pp->dict, "copy", NULL);\r
+}\r
+\r
+static PyMethodDef proxy_methods[] = {\r
+ {"has_key", (PyCFunction)proxy_has_key, METH_O,\r
+ PyDoc_STR("D.has_key(k) -> True if D has a key k, else False")},\r
+ {"get", (PyCFunction)proxy_get, METH_VARARGS,\r
+ PyDoc_STR("D.get(k[,d]) -> D[k] if D.has_key(k), else d."\r
+ " d defaults to None.")},\r
+ {"keys", (PyCFunction)proxy_keys, METH_NOARGS,\r
+ PyDoc_STR("D.keys() -> list of D's keys")},\r
+ {"values", (PyCFunction)proxy_values, METH_NOARGS,\r
+ PyDoc_STR("D.values() -> list of D's values")},\r
+ {"items", (PyCFunction)proxy_items, METH_NOARGS,\r
+ PyDoc_STR("D.items() -> list of D's (key, value) pairs, as 2-tuples")},\r
+ {"iterkeys", (PyCFunction)proxy_iterkeys, METH_NOARGS,\r
+ PyDoc_STR("D.iterkeys() -> an iterator over the keys of D")},\r
+ {"itervalues",(PyCFunction)proxy_itervalues, METH_NOARGS,\r
+ PyDoc_STR("D.itervalues() -> an iterator over the values of D")},\r
+ {"iteritems", (PyCFunction)proxy_iteritems, METH_NOARGS,\r
+ PyDoc_STR("D.iteritems() ->"\r
+ " an iterator over the (key, value) items of D")},\r
+ {"copy", (PyCFunction)proxy_copy, METH_NOARGS,\r
+ PyDoc_STR("D.copy() -> a shallow copy of D")},\r
+ {0}\r
+};\r
+\r
+static void\r
+proxy_dealloc(proxyobject *pp)\r
+{\r
+ _PyObject_GC_UNTRACK(pp);\r
+ Py_DECREF(pp->dict);\r
+ PyObject_GC_Del(pp);\r
+}\r
+\r
+static PyObject *\r
+proxy_getiter(proxyobject *pp)\r
+{\r
+ return PyObject_GetIter(pp->dict);\r
+}\r
+\r
+static PyObject *\r
+proxy_str(proxyobject *pp)\r
+{\r
+ return PyObject_Str(pp->dict);\r
+}\r
+\r
+static PyObject *\r
+proxy_repr(proxyobject *pp)\r
+{\r
+ PyObject *dictrepr;\r
+ PyObject *result;\r
+\r
+ dictrepr = PyObject_Repr(pp->dict);\r
+ if (dictrepr == NULL)\r
+ return NULL;\r
+ result = PyString_FromFormat("dict_proxy(%s)", PyString_AS_STRING(dictrepr));\r
+ Py_DECREF(dictrepr);\r
+ return result;\r
+}\r
+\r
+static int\r
+proxy_traverse(PyObject *self, visitproc visit, void *arg)\r
+{\r
+ proxyobject *pp = (proxyobject *)self;\r
+ Py_VISIT(pp->dict);\r
+ return 0;\r
+}\r
+\r
+static int\r
+proxy_compare(proxyobject *v, PyObject *w)\r
+{\r
+ return PyObject_Compare(v->dict, w);\r
+}\r
+\r
+static PyObject *\r
+proxy_richcompare(proxyobject *v, PyObject *w, int op)\r
+{\r
+ return PyObject_RichCompare(v->dict, w, op);\r
+}\r
+\r
+PyTypeObject PyDictProxy_Type = {\r
+ PyVarObject_HEAD_INIT(&PyType_Type, 0)\r
+ "dictproxy", /* tp_name */\r
+ sizeof(proxyobject), /* tp_basicsize */\r
+ 0, /* tp_itemsize */\r
+ /* methods */\r
+ (destructor)proxy_dealloc, /* tp_dealloc */\r
+ 0, /* tp_print */\r
+ 0, /* tp_getattr */\r
+ 0, /* tp_setattr */\r
+ (cmpfunc)proxy_compare, /* tp_compare */\r
+ (reprfunc)proxy_repr, /* tp_repr */\r
+ 0, /* tp_as_number */\r
+ &proxy_as_sequence, /* tp_as_sequence */\r
+ &proxy_as_mapping, /* tp_as_mapping */\r
+ 0, /* tp_hash */\r
+ 0, /* tp_call */\r
+ (reprfunc)proxy_str, /* tp_str */\r
+ PyObject_GenericGetAttr, /* tp_getattro */\r
+ 0, /* tp_setattro */\r
+ 0, /* tp_as_buffer */\r
+ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC, /* tp_flags */\r
+ 0, /* tp_doc */\r
+ proxy_traverse, /* tp_traverse */\r
+ 0, /* tp_clear */\r
+ (richcmpfunc)proxy_richcompare, /* tp_richcompare */\r
+ 0, /* tp_weaklistoffset */\r
+ (getiterfunc)proxy_getiter, /* tp_iter */\r
+ 0, /* tp_iternext */\r
+ proxy_methods, /* tp_methods */\r
+ 0, /* tp_members */\r
+ 0, /* tp_getset */\r
+ 0, /* tp_base */\r
+ 0, /* tp_dict */\r
+ 0, /* tp_descr_get */\r
+ 0, /* tp_descr_set */\r
+};\r
+\r
+PyObject *\r
+PyDictProxy_New(PyObject *dict)\r
+{\r
+ proxyobject *pp;\r
+\r
+ pp = PyObject_GC_New(proxyobject, &PyDictProxy_Type);\r
+ if (pp != NULL) {\r
+ Py_INCREF(dict);\r
+ pp->dict = dict;\r
+ _PyObject_GC_TRACK(pp);\r
+ }\r
+ return (PyObject *)pp;\r
+}\r
+\r
+\r
+/* --- Wrapper object for "slot" methods --- */\r
+\r
+/* This has no reason to be in this file except that adding new files is a\r
+ bit of a pain */\r
+\r
+typedef struct {\r
+ PyObject_HEAD\r
+ PyWrapperDescrObject *descr;\r
+ PyObject *self;\r
+} wrapperobject;\r
+\r
+static void\r
+wrapper_dealloc(wrapperobject *wp)\r
+{\r
+ PyObject_GC_UnTrack(wp);\r
+ Py_TRASHCAN_SAFE_BEGIN(wp)\r
+ Py_XDECREF(wp->descr);\r
+ Py_XDECREF(wp->self);\r
+ PyObject_GC_Del(wp);\r
+ Py_TRASHCAN_SAFE_END(wp)\r
+}\r
+\r
+static int\r
+wrapper_compare(wrapperobject *a, wrapperobject *b)\r
+{\r
+ if (a->descr == b->descr)\r
+ return PyObject_Compare(a->self, b->self);\r
+ else\r
+ return (a->descr < b->descr) ? -1 : 1;\r
+}\r
+\r
+static long\r
+wrapper_hash(wrapperobject *wp)\r
+{\r
+ int x, y;\r
+ x = _Py_HashPointer(wp->descr);\r
+ if (x == -1)\r
+ return -1;\r
+ y = PyObject_Hash(wp->self);\r
+ if (y == -1)\r
+ return -1;\r
+ x = x ^ y;\r
+ if (x == -1)\r
+ x = -2;\r
+ return x;\r
+}\r
+\r
+static PyObject *\r
+wrapper_repr(wrapperobject *wp)\r
+{\r
+ return PyString_FromFormat("<method-wrapper '%s' of %s object at %p>",\r
+ wp->descr->d_base->name,\r
+ wp->self->ob_type->tp_name,\r
+ wp->self);\r
+}\r
+\r
+static PyMemberDef wrapper_members[] = {\r
+ {"__self__", T_OBJECT, offsetof(wrapperobject, self), READONLY},\r
+ {0}\r
+};\r
+\r
+static PyObject *\r
+wrapper_objclass(wrapperobject *wp)\r
+{\r
+ PyObject *c = (PyObject *)wp->descr->d_type;\r
+\r
+ Py_INCREF(c);\r
+ return c;\r
+}\r
+\r
+static PyObject *\r
+wrapper_name(wrapperobject *wp)\r
+{\r
+ char *s = wp->descr->d_base->name;\r
+\r
+ return PyString_FromString(s);\r
+}\r
+\r
+static PyObject *\r
+wrapper_doc(wrapperobject *wp)\r
+{\r
+ char *s = wp->descr->d_base->doc;\r
+\r
+ if (s == NULL) {\r
+ Py_INCREF(Py_None);\r
+ return Py_None;\r
+ }\r
+ else {\r
+ return PyString_FromString(s);\r
+ }\r
+}\r
+\r
+static PyGetSetDef wrapper_getsets[] = {\r
+ {"__objclass__", (getter)wrapper_objclass},\r
+ {"__name__", (getter)wrapper_name},\r
+ {"__doc__", (getter)wrapper_doc},\r
+ {0}\r
+};\r
+\r
+static PyObject *\r
+wrapper_call(wrapperobject *wp, PyObject *args, PyObject *kwds)\r
+{\r
+ wrapperfunc wrapper = wp->descr->d_base->wrapper;\r
+ PyObject *self = wp->self;\r
+\r
+ if (wp->descr->d_base->flags & PyWrapperFlag_KEYWORDS) {\r
+ wrapperfunc_kwds wk = (wrapperfunc_kwds)wrapper;\r
+ return (*wk)(self, args, wp->descr->d_wrapped, kwds);\r
+ }\r
+\r
+ if (kwds != NULL && (!PyDict_Check(kwds) || PyDict_Size(kwds) != 0)) {\r
+ PyErr_Format(PyExc_TypeError,\r
+ "wrapper %s doesn't take keyword arguments",\r
+ wp->descr->d_base->name);\r
+ return NULL;\r
+ }\r
+ return (*wrapper)(self, args, wp->descr->d_wrapped);\r
+}\r
+\r
+static int\r
+wrapper_traverse(PyObject *self, visitproc visit, void *arg)\r
+{\r
+ wrapperobject *wp = (wrapperobject *)self;\r
+ Py_VISIT(wp->descr);\r
+ Py_VISIT(wp->self);\r
+ return 0;\r
+}\r
+\r
+static PyTypeObject wrappertype = {\r
+ PyVarObject_HEAD_INIT(&PyType_Type, 0)\r
+ "method-wrapper", /* tp_name */\r
+ sizeof(wrapperobject), /* tp_basicsize */\r
+ 0, /* tp_itemsize */\r
+ /* methods */\r
+ (destructor)wrapper_dealloc, /* tp_dealloc */\r
+ 0, /* tp_print */\r
+ 0, /* tp_getattr */\r
+ 0, /* tp_setattr */\r
+ (cmpfunc)wrapper_compare, /* tp_compare */\r
+ (reprfunc)wrapper_repr, /* tp_repr */\r
+ 0, /* tp_as_number */\r
+ 0, /* tp_as_sequence */\r
+ 0, /* tp_as_mapping */\r
+ (hashfunc)wrapper_hash, /* tp_hash */\r
+ (ternaryfunc)wrapper_call, /* tp_call */\r
+ 0, /* tp_str */\r
+ PyObject_GenericGetAttr, /* tp_getattro */\r
+ 0, /* tp_setattro */\r
+ 0, /* tp_as_buffer */\r
+ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC, /* tp_flags */\r
+ 0, /* tp_doc */\r
+ wrapper_traverse, /* tp_traverse */\r
+ 0, /* tp_clear */\r
+ 0, /* tp_richcompare */\r
+ 0, /* tp_weaklistoffset */\r
+ 0, /* tp_iter */\r
+ 0, /* tp_iternext */\r
+ 0, /* tp_methods */\r
+ wrapper_members, /* tp_members */\r
+ wrapper_getsets, /* tp_getset */\r
+ 0, /* tp_base */\r
+ 0, /* tp_dict */\r
+ 0, /* tp_descr_get */\r
+ 0, /* tp_descr_set */\r
+};\r
+\r
+PyObject *\r
+PyWrapper_New(PyObject *d, PyObject *self)\r
+{\r
+ wrapperobject *wp;\r
+ PyWrapperDescrObject *descr;\r
+\r
+ assert(PyObject_TypeCheck(d, &PyWrapperDescr_Type));\r
+ descr = (PyWrapperDescrObject *)d;\r
+ assert(_PyObject_RealIsSubclass((PyObject *)Py_TYPE(self),\r
+ (PyObject *)(descr->d_type)));\r
+\r
+ wp = PyObject_GC_New(wrapperobject, &wrappertype);\r
+ if (wp != NULL) {\r
+ Py_INCREF(descr);\r
+ wp->descr = descr;\r
+ Py_INCREF(self);\r
+ wp->self = self;\r
+ _PyObject_GC_TRACK(wp);\r
+ }\r
+ return (PyObject *)wp;\r
+}\r
+\r
+\r
+/* A built-in 'property' type */\r
+\r
+/*\r
+ class property(object):\r
+\r
+ def __init__(self, fget=None, fset=None, fdel=None, doc=None):\r
+ if doc is None and fget is not None and hasattr(fget, "__doc__"):\r
+ doc = fget.__doc__\r
+ self.__get = fget\r
+ self.__set = fset\r
+ self.__del = fdel\r
+ self.__doc__ = doc\r
+\r
+ def __get__(self, inst, type=None):\r
+ if inst is None:\r
+ return self\r
+ if self.__get is None:\r
+ raise AttributeError, "unreadable attribute"\r
+ return self.__get(inst)\r
+\r
+ def __set__(self, inst, value):\r
+ if self.__set is None:\r
+ raise AttributeError, "can't set attribute"\r
+ return self.__set(inst, value)\r
+\r
+ def __delete__(self, inst):\r
+ if self.__del is None:\r
+ raise AttributeError, "can't delete attribute"\r
+ return self.__del(inst)\r
+\r
+*/\r
+\r
+typedef struct {\r
+ PyObject_HEAD\r
+ PyObject *prop_get;\r
+ PyObject *prop_set;\r
+ PyObject *prop_del;\r
+ PyObject *prop_doc;\r
+ int getter_doc;\r
+} propertyobject;\r
+\r
+static PyObject * property_copy(PyObject *, PyObject *, PyObject *,\r
+ PyObject *);\r
+\r
+static PyMemberDef property_members[] = {\r
+ {"fget", T_OBJECT, offsetof(propertyobject, prop_get), READONLY},\r
+ {"fset", T_OBJECT, offsetof(propertyobject, prop_set), READONLY},\r
+ {"fdel", T_OBJECT, offsetof(propertyobject, prop_del), READONLY},\r
+ {"__doc__", T_OBJECT, offsetof(propertyobject, prop_doc), READONLY},\r
+ {0}\r
+};\r
+\r
+\r
+PyDoc_STRVAR(getter_doc,\r
+ "Descriptor to change the getter on a property.");\r
+\r
+static PyObject *\r
+property_getter(PyObject *self, PyObject *getter)\r
+{\r
+ return property_copy(self, getter, NULL, NULL);\r
+}\r
+\r
+\r
+PyDoc_STRVAR(setter_doc,\r
+ "Descriptor to change the setter on a property.");\r
+\r
+static PyObject *\r
+property_setter(PyObject *self, PyObject *setter)\r
+{\r
+ return property_copy(self, NULL, setter, NULL);\r
+}\r
+\r
+\r
+PyDoc_STRVAR(deleter_doc,\r
+ "Descriptor to change the deleter on a property.");\r
+\r
+static PyObject *\r
+property_deleter(PyObject *self, PyObject *deleter)\r
+{\r
+ return property_copy(self, NULL, NULL, deleter);\r
+}\r
+\r
+\r
+static PyMethodDef property_methods[] = {\r
+ {"getter", property_getter, METH_O, getter_doc},\r
+ {"setter", property_setter, METH_O, setter_doc},\r
+ {"deleter", property_deleter, METH_O, deleter_doc},\r
+ {0}\r
+};\r
+\r
+\r
+static void\r
+property_dealloc(PyObject *self)\r
+{\r
+ propertyobject *gs = (propertyobject *)self;\r
+\r
+ _PyObject_GC_UNTRACK(self);\r
+ Py_XDECREF(gs->prop_get);\r
+ Py_XDECREF(gs->prop_set);\r
+ Py_XDECREF(gs->prop_del);\r
+ Py_XDECREF(gs->prop_doc);\r
+ self->ob_type->tp_free(self);\r
+}\r
+\r
+static PyObject *\r
+property_descr_get(PyObject *self, PyObject *obj, PyObject *type)\r
+{\r
+ propertyobject *gs = (propertyobject *)self;\r
+\r
+ if (obj == NULL || obj == Py_None) {\r
+ Py_INCREF(self);\r
+ return self;\r
+ }\r
+ if (gs->prop_get == NULL) {\r
+ PyErr_SetString(PyExc_AttributeError, "unreadable attribute");\r
+ return NULL;\r
+ }\r
+ return PyObject_CallFunction(gs->prop_get, "(O)", obj);\r
+}\r
+\r
+static int\r
+property_descr_set(PyObject *self, PyObject *obj, PyObject *value)\r
+{\r
+ propertyobject *gs = (propertyobject *)self;\r
+ PyObject *func, *res;\r
+\r
+ if (value == NULL)\r
+ func = gs->prop_del;\r
+ else\r
+ func = gs->prop_set;\r
+ if (func == NULL) {\r
+ PyErr_SetString(PyExc_AttributeError,\r
+ value == NULL ?\r
+ "can't delete attribute" :\r
+ "can't set attribute");\r
+ return -1;\r
+ }\r
+ if (value == NULL)\r
+ res = PyObject_CallFunction(func, "(O)", obj);\r
+ else\r
+ res = PyObject_CallFunction(func, "(OO)", obj, value);\r
+ if (res == NULL)\r
+ return -1;\r
+ Py_DECREF(res);\r
+ return 0;\r
+}\r
+\r
+static PyObject *\r
+property_copy(PyObject *old, PyObject *get, PyObject *set, PyObject *del)\r
+{\r
+ propertyobject *pold = (propertyobject *)old;\r
+ PyObject *new, *type, *doc;\r
+\r
+ type = PyObject_Type(old);\r
+ if (type == NULL)\r
+ return NULL;\r
+\r
+ if (get == NULL || get == Py_None) {\r
+ Py_XDECREF(get);\r
+ get = pold->prop_get ? pold->prop_get : Py_None;\r
+ }\r
+ if (set == NULL || set == Py_None) {\r
+ Py_XDECREF(set);\r
+ set = pold->prop_set ? pold->prop_set : Py_None;\r
+ }\r
+ if (del == NULL || del == Py_None) {\r
+ Py_XDECREF(del);\r
+ del = pold->prop_del ? pold->prop_del : Py_None;\r
+ }\r
+ if (pold->getter_doc && get != Py_None) {\r
+ /* make _init use __doc__ from getter */\r
+ doc = Py_None;\r
+ }\r
+ else {\r
+ doc = pold->prop_doc ? pold->prop_doc : Py_None;\r
+ }\r
+\r
+ new = PyObject_CallFunction(type, "OOOO", get, set, del, doc);\r
+ Py_DECREF(type);\r
+ if (new == NULL)\r
+ return NULL;\r
+ return new;\r
+}\r
+\r
+static int\r
+property_init(PyObject *self, PyObject *args, PyObject *kwds)\r
+{\r
+ PyObject *get = NULL, *set = NULL, *del = NULL, *doc = NULL;\r
+ static char *kwlist[] = {"fget", "fset", "fdel", "doc", 0};\r
+ propertyobject *prop = (propertyobject *)self;\r
+\r
+ if (!PyArg_ParseTupleAndKeywords(args, kwds, "|OOOO:property",\r
+ kwlist, &get, &set, &del, &doc))\r
+ return -1;\r
+\r
+ if (get == Py_None)\r
+ get = NULL;\r
+ if (set == Py_None)\r
+ set = NULL;\r
+ if (del == Py_None)\r
+ del = NULL;\r
+\r
+ Py_XINCREF(get);\r
+ Py_XINCREF(set);\r
+ Py_XINCREF(del);\r
+ Py_XINCREF(doc);\r
+\r
+ prop->prop_get = get;\r
+ prop->prop_set = set;\r
+ prop->prop_del = del;\r
+ prop->prop_doc = doc;\r
+ prop->getter_doc = 0;\r
+\r
+ /* if no docstring given and the getter has one, use that one */\r
+ if ((doc == NULL || doc == Py_None) && get != NULL) {\r
+ PyObject *get_doc = PyObject_GetAttrString(get, "__doc__");\r
+ if (get_doc) {\r
+ if (Py_TYPE(self) == &PyProperty_Type) {\r
+ Py_XDECREF(prop->prop_doc);\r
+ prop->prop_doc = get_doc;\r
+ }\r
+ else {\r
+ /* If this is a property subclass, put __doc__\r
+ in dict of the subclass instance instead,\r
+ otherwise it gets shadowed by __doc__ in the\r
+ class's dict. */\r
+ int err = PyObject_SetAttrString(self, "__doc__", get_doc);\r
+ Py_DECREF(get_doc);\r
+ if (err < 0)\r
+ return -1;\r
+ }\r
+ prop->getter_doc = 1;\r
+ }\r
+ else if (PyErr_ExceptionMatches(PyExc_Exception)) {\r
+ PyErr_Clear();\r
+ }\r
+ else {\r
+ return -1;\r
+ }\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+PyDoc_STRVAR(property_doc,\r
+"property(fget=None, fset=None, fdel=None, doc=None) -> property attribute\n"\r
+"\n"\r
+"fget is a function to be used for getting an attribute value, and likewise\n"\r
+"fset is a function for setting, and fdel a function for del'ing, an\n"\r
+"attribute. Typical use is to define a managed attribute x:\n\n"\r
+"class C(object):\n"\r
+" def getx(self): return self._x\n"\r
+" def setx(self, value): self._x = value\n"\r
+" def delx(self): del self._x\n"\r
+" x = property(getx, setx, delx, \"I'm the 'x' property.\")\n"\r
+"\n"\r
+"Decorators make defining new properties or modifying existing ones easy:\n\n"\r
+"class C(object):\n"\r
+" @property\n"\r
+" def x(self):\n"\r
+" \"I am the 'x' property.\"\n"\r
+" return self._x\n"\r
+" @x.setter\n"\r
+" def x(self, value):\n"\r
+" self._x = value\n"\r
+" @x.deleter\n"\r
+" def x(self):\n"\r
+" del self._x\n"\r
+);\r
+\r
+static int\r
+property_traverse(PyObject *self, visitproc visit, void *arg)\r
+{\r
+ propertyobject *pp = (propertyobject *)self;\r
+ Py_VISIT(pp->prop_get);\r
+ Py_VISIT(pp->prop_set);\r
+ Py_VISIT(pp->prop_del);\r
+ Py_VISIT(pp->prop_doc);\r
+ return 0;\r
+}\r
+\r
+PyTypeObject PyProperty_Type = {\r
+ PyVarObject_HEAD_INIT(&PyType_Type, 0)\r
+ "property", /* tp_name */\r
+ sizeof(propertyobject), /* tp_basicsize */\r
+ 0, /* tp_itemsize */\r
+ /* methods */\r
+ property_dealloc, /* tp_dealloc */\r
+ 0, /* tp_print */\r
+ 0, /* tp_getattr */\r
+ 0, /* tp_setattr */\r
+ 0, /* tp_compare */\r
+ 0, /* tp_repr */\r
+ 0, /* tp_as_number */\r
+ 0, /* tp_as_sequence */\r
+ 0, /* tp_as_mapping */\r
+ 0, /* tp_hash */\r
+ 0, /* tp_call */\r
+ 0, /* tp_str */\r
+ PyObject_GenericGetAttr, /* tp_getattro */\r
+ 0, /* tp_setattro */\r
+ 0, /* tp_as_buffer */\r
+ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC |\r
+ Py_TPFLAGS_BASETYPE, /* tp_flags */\r
+ property_doc, /* tp_doc */\r
+ property_traverse, /* tp_traverse */\r
+ 0, /* tp_clear */\r
+ 0, /* tp_richcompare */\r
+ 0, /* tp_weaklistoffset */\r
+ 0, /* tp_iter */\r
+ 0, /* tp_iternext */\r
+ property_methods, /* tp_methods */\r
+ property_members, /* tp_members */\r
+ 0, /* tp_getset */\r
+ 0, /* tp_base */\r
+ 0, /* tp_dict */\r
+ property_descr_get, /* tp_descr_get */\r
+ property_descr_set, /* tp_descr_set */\r
+ 0, /* tp_dictoffset */\r
+ property_init, /* tp_init */\r
+ PyType_GenericAlloc, /* tp_alloc */\r
+ PyType_GenericNew, /* tp_new */\r
+ PyObject_GC_Del, /* tp_free */\r
+};\r