]> git.proxmox.com Git - mirror_edk2.git/blobdiff - AppPkg/Applications/Python/Python-2.7.10/Objects/descrobject.c
AppPkg/Applications/Python/Python-2.7.10: Initial Checkin part 3/5.
[mirror_edk2.git] / AppPkg / Applications / Python / Python-2.7.10 / Objects / descrobject.c
diff --git a/AppPkg/Applications/Python/Python-2.7.10/Objects/descrobject.c b/AppPkg/Applications/Python/Python-2.7.10/Objects/descrobject.c
new file mode 100644 (file)
index 0000000..62daf49
--- /dev/null
@@ -0,0 +1,1440 @@
+/* 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