1 #include <Python.h>
2
3 typedef struct {
4 PyListObject list;
5 int state;
6 } Shoddy;
7
8
9 static PyObject *
Shoddy_increment(Shoddy * self,PyObject * unused)10 Shoddy_increment(Shoddy *self, PyObject *unused)
11 {
12 self->state++;
13 return PyInt_FromLong(self->state);
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
Shoddy_init(Shoddy * self,PyObject * args,PyObject * kwds)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
initshoddy(void)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 }
92