Georg Brandl | 116aa62 | 2007-08-15 14:28:22 +0000 | [diff] [blame] | 1 | #include <Python.h> |
| 2 | |
| 3 | typedef struct { |
| 4 | PyListObject list; |
| 5 | int state; |
| 6 | } Shoddy; |
| 7 | |
| 8 | |
| 9 | static PyObject * |
| 10 | Shoddy_increment(Shoddy *self, PyObject *unused) |
| 11 | { |
| 12 | self->state++; |
Christian Heimes | 217cfd1 | 2007-12-02 14:31:20 +0000 | [diff] [blame] | 13 | return PyLong_FromLong(self->state); |
Georg Brandl | 116aa62 | 2007-08-15 14:28:22 +0000 | [diff] [blame] | 14 | } |
| 15 | |
| 16 | |
| 17 | static PyMethodDef Shoddy_methods[] = { |
| 18 | {"increment", (PyCFunction)Shoddy_increment, METH_NOARGS, |
| 19 | PyDoc_STR("increment state counter")}, |
| 20 | {NULL, NULL}, |
| 21 | }; |
| 22 | |
| 23 | static int |
| 24 | Shoddy_init(Shoddy *self, PyObject *args, PyObject *kwds) |
| 25 | { |
| 26 | if (PyList_Type.tp_init((PyObject *)self, args, kwds) < 0) |
| 27 | return -1; |
| 28 | self->state = 0; |
| 29 | return 0; |
| 30 | } |
| 31 | |
| 32 | |
| 33 | static PyTypeObject ShoddyType = { |
| 34 | PyObject_HEAD_INIT(NULL) |
| 35 | 0, /* ob_size */ |
| 36 | "shoddy.Shoddy", /* tp_name */ |
| 37 | sizeof(Shoddy), /* tp_basicsize */ |
| 38 | 0, /* tp_itemsize */ |
| 39 | 0, /* tp_dealloc */ |
| 40 | 0, /* tp_print */ |
| 41 | 0, /* tp_getattr */ |
| 42 | 0, /* tp_setattr */ |
| 43 | 0, /* tp_compare */ |
| 44 | 0, /* tp_repr */ |
| 45 | 0, /* tp_as_number */ |
| 46 | 0, /* tp_as_sequence */ |
| 47 | 0, /* tp_as_mapping */ |
| 48 | 0, /* tp_hash */ |
| 49 | 0, /* tp_call */ |
| 50 | 0, /* tp_str */ |
| 51 | 0, /* tp_getattro */ |
| 52 | 0, /* tp_setattro */ |
| 53 | 0, /* tp_as_buffer */ |
| 54 | Py_TPFLAGS_DEFAULT | |
| 55 | Py_TPFLAGS_BASETYPE, /* tp_flags */ |
| 56 | 0, /* tp_doc */ |
| 57 | 0, /* tp_traverse */ |
| 58 | 0, /* tp_clear */ |
| 59 | 0, /* tp_richcompare */ |
| 60 | 0, /* tp_weaklistoffset */ |
| 61 | 0, /* tp_iter */ |
| 62 | 0, /* tp_iternext */ |
| 63 | Shoddy_methods, /* tp_methods */ |
| 64 | 0, /* tp_members */ |
| 65 | 0, /* tp_getset */ |
| 66 | 0, /* tp_base */ |
| 67 | 0, /* tp_dict */ |
| 68 | 0, /* tp_descr_get */ |
| 69 | 0, /* tp_descr_set */ |
| 70 | 0, /* tp_dictoffset */ |
| 71 | (initproc)Shoddy_init, /* tp_init */ |
| 72 | 0, /* tp_alloc */ |
| 73 | 0, /* tp_new */ |
| 74 | }; |
| 75 | |
| 76 | PyMODINIT_FUNC |
| 77 | initshoddy(void) |
| 78 | { |
| 79 | PyObject *m; |
| 80 | |
| 81 | ShoddyType.tp_base = &PyList_Type; |
| 82 | if (PyType_Ready(&ShoddyType) < 0) |
| 83 | return; |
| 84 | |
| 85 | m = Py_InitModule3("shoddy", NULL, "Shoddy module"); |
| 86 | if (m == NULL) |
| 87 | return; |
| 88 | |
| 89 | Py_INCREF(&ShoddyType); |
| 90 | PyModule_AddObject(m, "Shoddy", (PyObject *) &ShoddyType); |
| 91 | } |