/Doc/includes/shoddy.c

 1#include <Python.h>
 2
 3typedef struct {
 4    PyListObject list;
 5    int state;
 6} Shoddy;
 7
 8
 9static PyObject *
10Shoddy_increment(Shoddy *self, PyObject *unused)
11{
12    self->state++;
13    return PyInt_FromLong(self->state);
14}
15
16
17static PyMethodDef Shoddy_methods[] = {
18    {"increment", (PyCFunction)Shoddy_increment, METH_NOARGS,
19     PyDoc_STR("increment state counter")},
20    {NULL,	NULL},
21};
22
23static int
24Shoddy_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
33static 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
76PyMODINIT_FUNC
77initshoddy(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}