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     PyVarObject_HEAD_INIT(NULL, 0)
35     "shoddy.Shoddy",         /* tp_name */
36     sizeof(Shoddy),          /* tp_basicsize */
37     0,                       /* tp_itemsize */
38     0,                       /* tp_dealloc */
39     0,                       /* tp_print */
40     0,                       /* tp_getattr */
41     0,                       /* tp_setattr */
42     0,                       /* tp_compare */
43     0,                       /* tp_repr */
44     0,                       /* tp_as_number */
45     0,                       /* tp_as_sequence */
46     0,                       /* tp_as_mapping */
47     0,                       /* tp_hash */
48     0,                       /* tp_call */
49     0,                       /* tp_str */
50     0,                       /* tp_getattro */
51     0,                       /* tp_setattro */
52     0,                       /* tp_as_buffer */
53     Py_TPFLAGS_DEFAULT |
54         Py_TPFLAGS_BASETYPE, /* tp_flags */
55     0,                       /* tp_doc */
56     0,                       /* tp_traverse */
57     0,                       /* tp_clear */
58     0,                       /* tp_richcompare */
59     0,                       /* tp_weaklistoffset */
60     0,                       /* tp_iter */
61     0,                       /* tp_iternext */
62     Shoddy_methods,          /* tp_methods */
63     0,                       /* tp_members */
64     0,                       /* tp_getset */
65     0,                       /* tp_base */
66     0,                       /* tp_dict */
67     0,                       /* tp_descr_get */
68     0,                       /* tp_descr_set */
69     0,                       /* tp_dictoffset */
70     (initproc)Shoddy_init,   /* tp_init */
71     0,                       /* tp_alloc */
72     0,                       /* tp_new */
73 };
74 
75 PyMODINIT_FUNC
initshoddy(void)76 initshoddy(void)
77 {
78     PyObject *m;
79 
80     ShoddyType.tp_base = &PyList_Type;
81     if (PyType_Ready(&ShoddyType) < 0)
82         return;
83 
84     m = Py_InitModule3("shoddy", NULL, "Shoddy module");
85     if (m == NULL)
86         return;
87 
88     Py_INCREF(&ShoddyType);
89     PyModule_AddObject(m, "Shoddy", (PyObject *) &ShoddyType);
90 }
91