7480656e41a80628427467e14eab26e8da9e0dc5
[libsigrokdecode.git] / decoder.c
1 /*
2  * This file is part of the sigrok project.
3  *
4  * Copyright (C) 2010 Uwe Hermann <uwe@hermann-uwe.de>
5  * Copyright (C) 2012 Bert Vermeulen <bert@biot.com>
6  *
7  * This program is free software: you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation, either version 3 of the License, or
10  * (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
19  */
20
21 #include "config.h"
22 #include "sigrokdecode.h" /* First, so we avoid a _POSIX_C_SOURCE warning. */
23 #include "sigrokdecode-internal.h"
24 #include <glib.h>
25
26 /* The list of protocol decoders. */
27 GSList *pd_list = NULL;
28
29 /* lives in module_sigrokdecode.c */
30 extern PyObject *mod_sigrokdecode;
31
32
33 /**
34  * Returns the list of supported/loaded protocol decoders.
35  *
36  * This is a GSList containing the names of the decoders as strings.
37  *
38  * @return List of decoders, NULL if none are supported or loaded.
39  */
40 GSList *srd_list_decoders(void)
41 {
42
43         return pd_list;
44 }
45
46
47 /**
48  * Get the decoder with the specified ID.
49  *
50  * @param id The ID string of the decoder to return.
51  * @return The decoder with the specified ID, or NULL if not found.
52  */
53 struct srd_decoder *srd_get_decoder_by_id(const char *id)
54 {
55         GSList *l;
56         struct srd_decoder *dec;
57
58         for (l = srd_list_decoders(); l; l = l->next) {
59                 dec = l->data;
60                 if (!strcmp(dec->id, id))
61                         return dec;
62         }
63
64         return NULL;
65 }
66
67
68 static int get_probes(struct srd_decoder *d, char *attr, GSList **pl)
69 {
70         PyObject *py_probelist, *py_entry;
71         struct srd_probe *p;
72         int ret, num_probes, i;
73
74         if (!PyObject_HasAttrString(d->py_dec, attr))
75                 /* No probes of this type specified. */
76                 return SRD_OK;
77
78         ret = SRD_ERR_PYTHON;
79         py_probelist = py_entry = NULL;
80
81         py_probelist = PyObject_GetAttrString(d->py_dec, attr);
82         if (!PyList_Check(py_probelist)) {
83                 srd_err("Protocol decoder %s %s attribute is not "
84                                 "a list.", d->name, attr);
85                 goto err_out;
86         }
87
88         num_probes = PyList_Size(py_probelist);
89         if (num_probes == 0)
90                 /* Empty probelist. */
91                 return SRD_OK;
92
93         for (i = 0; i < num_probes; i++) {
94                 py_entry = PyList_GetItem(py_probelist, i);
95                 if (!PyDict_Check(py_entry)) {
96                         srd_err("Protocol decoder %s %s attribute is not "
97                                         "a list with dict elements.", d->name, attr);
98                         goto err_out;
99                 }
100
101                 if (!(p = g_try_malloc(sizeof(struct srd_probe)))) {
102                         ret = SRD_ERR_MALLOC;
103                         goto err_out;
104                 }
105
106                 if ((py_dictitem_as_str(py_entry, "id", &p->id)) != SRD_OK)
107                         goto err_out;
108                 if ((py_dictitem_as_str(py_entry, "name", &p->name)) != SRD_OK)
109                         goto err_out;
110                 if ((py_dictitem_as_str(py_entry, "desc", &p->desc)) != SRD_OK)
111                         goto err_out;
112                 p->order = i;
113
114                 *pl = g_slist_append(*pl, p);
115         }
116         ret = SRD_OK;
117
118 err_out:
119         Py_DecRef(py_entry);
120         Py_DecRef(py_probelist);
121
122         return ret;
123 }
124
125 /**
126  * Load a protocol decoder module into the embedded Python interpreter.
127  *
128  * @param name The module name to be loaded.
129  * @param dec Pointer to the struct srd_decoder filled with the loaded module.
130  *
131  * @return SRD_OK upon success, a (negative) error code otherwise.
132  */
133 int srd_load_decoder(const char *name, struct srd_decoder **dec)
134 {
135         PyObject *py_basedec, *py_method, *py_attr, *py_annlist, *py_ann;
136         struct srd_decoder *d;
137         int alen, ret, i;
138         char **ann;
139
140         srd_dbg("Loading module '%s'.", name);
141
142         py_basedec = py_method = py_attr = NULL;
143
144         if (!(d = g_try_malloc0(sizeof(struct srd_decoder)))) {
145                 srd_dbg("Failed to malloc struct srd_decoder.");
146                 ret = SRD_ERR_MALLOC;
147                 goto err_out;
148         }
149
150         ret = SRD_ERR_PYTHON;
151
152         /* Import the Python module. */
153         if (!(d->py_mod = PyImport_ImportModule(name))) {
154                 catch_exception("import of '%s' failed.", name);
155                 goto err_out;
156         }
157
158         /* Get the 'Decoder' class as Python object. */
159         if (!(d->py_dec = PyObject_GetAttrString(d->py_mod, "Decoder"))) {
160                 /* This generated an AttributeError exception. */
161                 PyErr_Clear();
162                 srd_err("Decoder class not found in protocol decoder %s.", name);
163                 goto err_out;
164         }
165
166         if (!(py_basedec = PyObject_GetAttrString(mod_sigrokdecode, "Decoder"))) {
167                 srd_dbg("sigrokdecode module not loaded.");
168                 goto err_out;
169         }
170
171         if (!PyObject_IsSubclass(d->py_dec, py_basedec)) {
172                 srd_err("Decoder class in protocol decoder module %s is not "
173                                 "a subclass of sigrokdecode.Decoder.", name);
174                 goto err_out;
175         }
176         Py_CLEAR(py_basedec);
177
178         /* Check for a proper start() method. */
179         if (!PyObject_HasAttrString(d->py_dec, "start")) {
180                 srd_err("Protocol decoder %s has no start() method Decoder "
181                                 "class.", name);
182                 goto err_out;
183         }
184         py_method = PyObject_GetAttrString(d->py_dec, "start");
185         if (!PyFunction_Check(py_method)) {
186                 srd_err("Protocol decoder %s Decoder class attribute 'start' "
187                                 "is not a method.", name);
188                 goto err_out;
189         }
190         Py_CLEAR(py_method);
191
192         /* Check for a proper decode() method. */
193         if (!PyObject_HasAttrString(d->py_dec, "decode")) {
194                 srd_err("Protocol decoder %s has no decode() method Decoder "
195                                 "class.", name);
196                 goto err_out;
197         }
198         py_method = PyObject_GetAttrString(d->py_dec, "decode");
199         if (!PyFunction_Check(py_method)) {
200                 srd_err("Protocol decoder %s Decoder class attribute 'decode' "
201                                 "is not a method.", name);
202                 goto err_out;
203         }
204         Py_CLEAR(py_method);
205
206         /* If present, options must be a dictionary. */
207         if (PyObject_HasAttrString(d->py_dec, "options")) {
208                 py_attr = PyObject_GetAttrString(d->py_dec, "options");
209                 if (!PyDict_Check(py_attr)) {
210                         srd_err("Protocol decoder %s options attribute is not "
211                                         "a dictionary.", d->name);
212                         Py_DecRef(py_attr);
213                         goto err_out;
214                 }
215                 Py_DecRef(py_attr);
216         }
217
218         /* Check and import required probes. */
219         if (get_probes(d, "probes", &d->probes) != SRD_OK)
220                 goto err_out;
221
222         /* Check and import optional probes. */
223         if (get_probes(d, "extra_probes", &d->extra_probes) != SRD_OK)
224                 goto err_out;
225
226         /* Store required fields in newly allocated strings. */
227         if (py_attr_as_str(d->py_dec, "id", &(d->id)) != SRD_OK)
228                 goto err_out;
229
230         if (py_attr_as_str(d->py_dec, "name", &(d->name)) != SRD_OK)
231                 goto err_out;
232
233         if (py_attr_as_str(d->py_dec, "longname", &(d->longname)) != SRD_OK)
234                 goto err_out;
235
236         if (py_attr_as_str(d->py_dec, "desc", &(d->desc)) != SRD_OK)
237                 goto err_out;
238
239         if (py_attr_as_str(d->py_dec, "license", &(d->license)) != SRD_OK)
240                 goto err_out;
241
242         /* TODO: Handle inputformats, outputformats. */
243         d->inputformats = NULL;
244         d->outputformats = NULL;
245
246         /* Convert class annotation attribute to GSList of **char */
247         d->annotations = NULL;
248         if (PyObject_HasAttrString(d->py_dec, "annotations")) {
249                 py_annlist = PyObject_GetAttrString(d->py_dec, "annotations");
250                 if (!PyList_Check(py_annlist)) {
251                         srd_err("Protocol decoder module %s annotations should be a list.", name);
252                         goto err_out;
253                 }
254                 alen = PyList_Size(py_annlist);
255                 for (i = 0; i < alen; i++) {
256                         py_ann = PyList_GetItem(py_annlist, i);
257                         if (!PyList_Check(py_ann) || PyList_Size(py_ann) != 2) {
258                                 srd_err("Protocol decoder module %s annotation %d should "
259                                                 "be a list with two elements.", name, i+1);
260                                 goto err_out;
261                         }
262
263                         if (py_strlist_to_char(py_ann, &ann) != SRD_OK) {
264                                 goto err_out;
265                         }
266                         d->annotations = g_slist_append(d->annotations, ann);
267                 }
268         }
269
270         *dec = d;
271         ret = SRD_OK;
272
273 err_out:
274         if (ret != SRD_OK) {
275                 Py_XDECREF(py_method);
276                 Py_XDECREF(py_basedec);
277                 Py_XDECREF(d->py_dec);
278                 Py_XDECREF(d->py_mod);
279                 g_free(d);
280         }
281
282         return ret;
283 }
284
285 char *srd_decoder_doc(struct srd_decoder *dec)
286 {
287         PyObject *py_str;
288         char *doc;
289
290         if (!PyObject_HasAttrString(dec->py_mod, "__doc__"))
291                 return NULL;
292
293         if (!(py_str = PyObject_GetAttrString(dec->py_mod, "__doc__"))) {
294                 catch_exception("");
295                 return NULL;
296         }
297
298         doc = NULL;
299         if (py_str != Py_None)
300                 py_str_as_str(py_str, &doc);
301         Py_DecRef(py_str);
302
303         return doc;
304 }
305
306
307 /**
308  * Unload decoder module.
309  *
310  * @param dec The decoder struct to be unloaded.
311  *
312  * @return SRD_OK upon success, a (negative) error code otherwise.
313  */
314 int srd_unload_decoder(struct srd_decoder *dec)
315 {
316
317         g_free(dec->id);
318         g_free(dec->name);
319         g_free(dec->longname);
320         g_free(dec->desc);
321         g_free(dec->license);
322
323         /* TODO: Free everything in inputformats and outputformats. */
324         if (dec->inputformats != NULL)
325                 g_slist_free(dec->inputformats);
326         if (dec->outputformats != NULL)
327                 g_slist_free(dec->outputformats);
328
329         Py_XDECREF(dec->py_dec);
330         Py_XDECREF(dec->py_mod);
331
332         /* TODO: (g_)free dec itself? */
333
334         return SRD_OK;
335 }
336
337 int srd_load_all_decoders(void)
338 {
339         GDir *dir;
340         GError *error;
341         struct srd_decoder *dec;
342         int ret;
343         const gchar *direntry;
344         char *decodername;
345
346         if (!(dir = g_dir_open(DECODERS_DIR, 0, &error))) {
347                 return SRD_ERR_DECODERS_DIR;
348         }
349
350         while ((direntry = g_dir_read_name(dir)) != NULL) {
351                 /* The decoder name is the PD directory name (e.g. "i2c"). */
352                 decodername = g_strdup(direntry);
353
354                 if (!(dec = g_try_malloc(sizeof(struct srd_decoder))))
355                         return SRD_ERR_MALLOC;
356
357                 if ((ret = srd_load_decoder(decodername, &dec)) == SRD_OK) {
358                         /* Append it to the list of supported/loaded decoders. */
359                         pd_list = g_slist_append(pd_list, dec);
360                 }
361         }
362         g_dir_close(dir);
363
364         return SRD_OK;
365 }
366
367 /**
368  * TODO
369  */
370 int srd_unload_all_decoders(void)
371 {
372         GSList *l;
373         struct srd_decoder *dec;
374
375         for (l = srd_list_decoders(); l; l = l->next) {
376                 dec = l->data;
377                 srd_unload_decoder(dec);
378         }
379
380         return SRD_OK;
381 }
382
383
384