Added macro CPY_SUBSTITUTE.
[collectd.git] / src / pyconfig.c
1 /**
2  * collectd - src/pyconfig.c
3  * Copyright (C) 2009  Sven Trenkel
4  *
5  * Permission is hereby granted, free of charge, to any person obtaining a
6  * copy of this software and associated documentation files (the "Software"),
7  * to deal in the Software without restriction, including without limitation
8  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
9  * and/or sell copies of the Software, and to permit persons to whom the
10  * Software is furnished to do so, subject to the following conditions:
11  *
12  * The above copyright notice and this permission notice shall be included in
13  * all copies or substantial portions of the Software.
14  *
15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20  * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
21  * DEALINGS IN THE SOFTWARE.
22  *
23  * Authors:
24  *   Sven Trenkel <collectd at semidefinite.de>  
25  **/
26
27 #include <Python.h>
28 #include <structmember.h>
29
30 #include "collectd.h"
31 #include "common.h"
32
33 #include "cpython.h"
34
35 static char config_doc[] = "This represents a piece of collectd's config file.\n"
36                 "It is passed to scripts with config callbacks (see \"register_config\")\n"
37                 "and is of little use if created somewhere else.\n"
38                 "\n"
39                 "It has no methods beyond the bare minimum and only exists for its\n"
40                 "data members";
41
42 static char parent_doc[] = "This represents the parent of this node. On the root node\n"
43                 "of the config tree it will be None.\n";
44
45 static char key_doc[] = "This is the keyword of this item, ie the first word of any\n"
46                 "given line in the config file. It will always be a string.\n";
47
48 static char values_doc[] = "This is a tuple (which might be empty) of all value, ie words\n"
49                 "following the keyword in any given line in the config file.\n"
50                 "\n"
51                 "Every item in this tuple will be either a string or a float or a bool,\n"
52                 "depending on the contents of the configuration file.\n";
53
54 static char children_doc[] = "This is a tuple of child nodes. For most nodes this will be\n"
55                 "empty. If this node represents a block instead of a single line of the config\n"
56                 "file it will contain all nodes in this block.\n";
57
58 static PyObject *Config_new(PyTypeObject *type, PyObject *args, PyObject *kwds) {
59         Config *self;
60         
61         self = (Config *) type->tp_alloc(type, 0);
62         if (self == NULL)
63                 return NULL;
64         
65         self->parent = NULL;
66         self->key = NULL;
67         self->values = NULL;
68         self->children = NULL;
69         return (PyObject *) self;
70 }
71
72 static int Config_init(PyObject *s, PyObject *args, PyObject *kwds) {
73         PyObject *key = NULL, *parent = NULL, *values = NULL, *children = NULL, *tmp;
74         Config *self = (Config *) s;
75         static char *kwlist[] = {"key", "parent", "values", "children", NULL};
76         
77         if (!PyArg_ParseTupleAndKeywords(args, kwds, "O|OOO", kwlist,
78                         &key, &parent, &values, &children))
79                 return -1;
80         
81         if (!IS_BYTES_OR_UNICODE(key)) {
82                 PyErr_SetString(PyExc_TypeError, "argument 1 must be str");
83                 Py_XDECREF(parent);
84                 Py_XDECREF(values);
85                 Py_XDECREF(children);
86                 return -1;
87         }
88         if (values == NULL) {
89                 values = PyTuple_New(0);
90                 PyErr_Clear();
91         }
92         if (children == NULL) {
93                 children = PyTuple_New(0);
94                 PyErr_Clear();
95         }
96         tmp = self->key;
97         Py_INCREF(key);
98         self->key = key;
99         Py_XDECREF(tmp);
100         if (parent != NULL) {
101                 tmp = self->parent;
102                 Py_INCREF(parent);
103                 self->parent = parent;
104                 Py_XDECREF(tmp);
105         }
106         if (values != NULL) {
107                 tmp = self->values;
108                 Py_INCREF(values);
109                 self->values = values;
110                 Py_XDECREF(tmp);
111         }
112         if (children != NULL) {
113                 tmp = self->children;
114                 Py_INCREF(children);
115                 self->children = children;
116                 Py_XDECREF(tmp);
117         }
118         return 0;
119 }
120
121 static PyObject *Config_repr(PyObject *s) {
122         Config *self = (Config *) s;
123         PyObject *ret = NULL;
124         static PyObject *node_prefix = NULL, *root_prefix = NULL, *ending = NULL;
125         
126         /* This is ok because we have the GIL, so this is thread-save by default. */
127         if (node_prefix == NULL)
128                 node_prefix = cpy_string_to_unicode_or_bytes("<collectd.Config node '");
129         if (root_prefix == NULL)
130                 root_prefix = cpy_string_to_unicode_or_bytes("<collectd.Config root node '");
131         if (ending == NULL)
132                 ending = cpy_string_to_unicode_or_bytes("'>");
133         if (node_prefix == NULL || root_prefix == NULL || ending == NULL)
134                 return NULL;
135         
136         ret = PyObject_Str(self->key);
137         if (self->parent == NULL || self->parent == Py_None)
138                 CPY_SUBSTITUTE(CPY_STRCAT, ret, root_prefix, ret);
139         else
140                 CPY_SUBSTITUTE(CPY_STRCAT, ret, node_prefix, ret);
141         CPY_SUBSTITUTE(CPY_STRCAT, ret, ret, ending);
142         
143         return ret;
144 }
145
146 static int Config_traverse(PyObject *self, visitproc visit, void *arg) {
147         Config *c = (Config *) self;
148         Py_VISIT(c->parent);
149         Py_VISIT(c->key);
150         Py_VISIT(c->values);
151         Py_VISIT(c->children);
152         return 0;}
153
154 static int Config_clear(PyObject *self) {
155         Config *c = (Config *) self;
156         Py_CLEAR(c->parent);
157         Py_CLEAR(c->key);
158         Py_CLEAR(c->values);
159         Py_CLEAR(c->children);
160         return 0;
161 }
162
163 static void Config_dealloc(PyObject *self) {
164         Config_clear(self);
165         self->ob_type->tp_free(self);
166 }
167
168 static PyMemberDef Config_members[] = {
169         {"parent", T_OBJECT, offsetof(Config, parent), 0, parent_doc},
170         {"key", T_OBJECT_EX, offsetof(Config, key), 0, key_doc},
171         {"values", T_OBJECT_EX, offsetof(Config, values), 0, values_doc},
172         {"children", T_OBJECT_EX, offsetof(Config, children), 0, children_doc},
173         {NULL}
174 };
175
176 PyTypeObject ConfigType = {
177         CPY_INIT_TYPE
178         "collectd.Config",         /* tp_name */
179         sizeof(Config),            /* tp_basicsize */
180         0,                         /* Will be filled in later */
181         Config_dealloc,            /* tp_dealloc */
182         0,                         /* tp_print */
183         0,                         /* tp_getattr */
184         0,                         /* tp_setattr */
185         0,                         /* tp_compare */
186         Config_repr,               /* tp_repr */
187         0,                         /* tp_as_number */
188         0,                         /* tp_as_sequence */
189         0,                         /* tp_as_mapping */
190         0,                         /* tp_hash */
191         0,                         /* tp_call */
192         0,                         /* tp_str */
193         0,                         /* tp_getattro */
194         0,                         /* tp_setattro */
195         0,                         /* tp_as_buffer */
196         Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE | Py_TPFLAGS_HAVE_GC, /*tp_flags*/
197         config_doc,                /* tp_doc */
198         Config_traverse,           /* tp_traverse */
199         Config_clear,              /* tp_clear */
200         0,                         /* tp_richcompare */
201         0,                         /* tp_weaklistoffset */
202         0,                         /* tp_iter */
203         0,                         /* tp_iternext */
204         0,                         /* tp_methods */
205         Config_members,            /* tp_members */
206         0,                         /* tp_getset */
207         0,                         /* tp_base */
208         0,                         /* tp_dict */
209         0,                         /* tp_descr_get */
210         0,                         /* tp_descr_set */
211         0,                         /* tp_dictoffset */
212         Config_init,               /* tp_init */
213         0,                         /* tp_alloc */
214         Config_new                 /* tp_new */
215 };
216