07bf6f23296243e38da5f8de999d941e89155f1d
[libsigrokdecode.git] / controller.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 "sigrokdecode.h" /* First, so we avoid a _POSIX_C_SOURCE warning. */
22 #include "sigrokdecode-internal.h"
23 #include "config.h"
24 #include <glib.h>
25 #include <inttypes.h>
26
27
28 static GSList *di_list = NULL;
29 static GSList *callbacks = NULL;
30
31 /* lives in decoder.c */
32 extern GSList *pd_list;
33
34 /* lives in module_sigrokdecode.c */
35 extern PyMODINIT_FUNC PyInit_sigrokdecode(void);
36
37 /* lives in type_logic.c */
38 extern PyTypeObject srd_logic_type;
39
40
41 /**
42  * Initialize libsigrokdecode.
43  *
44  * This initializes the Python interpreter, and creates and initializes
45  * a "sigrok" Python module with a single put() method.
46  *
47  * Then, it searches for sigrok protocol decoder files (*.py) in the
48  * "decoders" subdirectory of the the sigrok installation directory.
49  * All decoders that are found are loaded into memory and added to an
50  * internal list of decoders, which can be queried via srd_list_decoders().
51  *
52  * The caller is responsible for calling the clean-up function srd_exit(),
53  * which will properly shut down libsigrokdecode and free its allocated memory.
54  *
55  * Multiple calls to srd_init(), without calling srd_exit() in between,
56  * are not allowed.
57  *
58  * @return SRD_OK upon success, a (negative) error code otherwise.
59  *         Upon Python errors, return SRD_ERR_PYTHON. If the sigrok decoders
60  *         directory cannot be accessed, return SRD_ERR_DECODERS_DIR.
61  *         If not enough memory could be allocated, return SRD_ERR_MALLOC.
62  */
63 int srd_init(void)
64 {
65         int ret;
66
67         PyImport_AppendInittab("sigrokdecode", PyInit_sigrokdecode);
68
69         /* Py_Initialize() returns void and usually cannot fail. */
70         Py_Initialize();
71
72         if ((ret = set_modulepath()) != SRD_OK) {
73                 Py_Finalize();
74                 return ret;
75         }
76
77         if ((ret = srd_load_all_decoders()) != SRD_OK) {
78                 Py_Finalize();
79                 return ret;
80         }
81
82         return SRD_OK;
83 }
84
85
86 /**
87  * Shutdown libsigrokdecode.
88  *
89  * This frees all the memory allocated for protocol decoders and shuts down
90  * the Python interpreter.
91  *
92  * This function should only be called if there was a (successful!) invocation
93  * of srd_init() before. Calling this function multiple times in a row, without
94  * any successful srd_init() calls in between, is not allowed.
95  *
96  * @return SRD_OK upon success, a (negative) error code otherwise.
97  */
98 int srd_exit(void)
99 {
100         /* Unload/free all decoders, and then the list of decoders itself. */
101         /* TODO: Error handling. */
102         srd_unload_all_decoders();
103         g_slist_free(pd_list);
104
105         /* Py_Finalize() returns void, any finalization errors are ignored. */
106         Py_Finalize();
107
108         return SRD_OK;
109 }
110
111
112 /**
113  * Add search directories for the protocol decoders.
114  *
115  * TODO: add path from env var SIGROKDECODE_PATH, config etc
116  */
117 int set_modulepath(void)
118 {
119         int ret;
120
121         PyRun_SimpleString("import sys");
122         ret = PyRun_SimpleString("sys.path.append(r'" DECODERS_DIR "');");
123
124         return ret;
125 }
126
127
128 /**
129  * Create a new protocol decoder instance.
130  *
131  * TODO: this should be a decoder name, as decoder ids will disappear.
132  *
133  * @param id Decoder 'id' field.
134  * @param instance_id Optional unique identifier for this instance. If NULL,
135  *        the 'id' parameter is used.
136  * @return Pointer to a newly allocated struct srd_decoder_instance, or
137  *         NULL in case of failure.
138  */
139 struct srd_decoder_instance *srd_instance_new(const char *id,
140                 const char *instance_id)
141 {
142         struct srd_decoder *dec;
143         struct srd_decoder_instance *di;
144         PyObject *py_args;
145
146         srd_dbg("%s: creating new %s instance", __func__, id);
147
148         if (!(dec = srd_get_decoder_by_id(id)))
149                 return NULL;
150
151         if (!(di = g_try_malloc(sizeof(*di)))) {
152                 srd_err("failed to malloc instance");
153                 return NULL;
154         }
155         di->decoder = dec;
156         di->instance_id = g_strdup(instance_id ? instance_id : id);
157         di->pd_output = NULL;
158         di->num_probes = 0;
159         di->unitsize = 0;
160         di->samplerate = 0;
161         di->next_di = NULL;
162
163         /* Create an empty Python tuple. */
164         if (!(py_args = PyTuple_New(0))) { /* NEWREF */
165                 if (PyErr_Occurred())
166                         PyErr_Print();
167                 return NULL;
168         }
169
170         /* Create an instance of the 'Decoder' class. */
171         di->py_instance = PyObject_Call(dec->py_decobj, py_args, NULL);
172         if (!di->py_instance) {
173                 if (PyErr_Occurred())
174                         PyErr_Print();
175                 Py_XDECREF(py_args);
176                 return NULL;
177         }
178
179         /* Instance takes input from a frontend by default. */
180         di_list = g_slist_append(di_list, di);
181
182         Py_XDECREF(py_args);
183
184         return di;
185 }
186
187 int srd_instance_stack(struct srd_decoder_instance *di_from,
188                 struct srd_decoder_instance *di_to)
189 {
190
191         if (!di_from || !di_to) {
192                 srd_err("invalid from/to instance pair");
193                 return SRD_ERR_ARG;
194         }
195
196         if (!g_slist_find(di_list, di_from)) {
197                 srd_err("unstacked instance not found");
198                 return SRD_ERR_ARG;
199         }
200
201         /* Remove from the unstacked list. */
202         di_list = g_slist_remove(di_list, di_to);
203
204         /* Stack on top of source di. */
205         di_from->next_di = g_slist_append(di_from->next_di, di_to);
206
207         return SRD_OK;
208 }
209
210
211 int srd_instance_set_probe(struct srd_decoder_instance *di,
212                            const char *probename, int num)
213 {
214         PyObject *probedict, *probenum;
215
216         probedict = PyObject_GetAttrString(di->py_instance, "probes"); /* NEWREF */
217         if (!probedict) {
218                 if (PyErr_Occurred())
219                         PyErr_Print(); /* Returns void. */
220
221                 return SRD_ERR_PYTHON; /* TODO: More specific error? */
222         }
223
224         probenum = PyLong_FromLong(num);
225         PyMapping_SetItemString(probedict, (char *)probename, probenum);
226
227         Py_XDECREF(probenum);
228         Py_XDECREF(probedict);
229
230         return SRD_OK;
231 }
232
233 struct srd_decoder_instance *srd_instance_find(char *instance_id)
234 {
235         GSList *l;
236         struct srd_decoder_instance *tmp, *di;
237
238         di = NULL;
239         for (l = di_list; l; l = l->next) {
240                 tmp = l->data;
241                 if (!strcmp(tmp->instance_id, instance_id)) {
242                         di = tmp;
243                         break;
244                 }
245         }
246
247         return di;
248 }
249
250 int srd_instance_start(struct srd_decoder_instance *di, PyObject *args)
251 {
252         PyObject *py_name, *py_res;
253
254         srd_dbg("calling start() method on protocol decoder instance %s", di->instance_id);
255
256         if (!(py_name = PyUnicode_FromString("start"))) {
257                 srd_err("unable to build python object for 'start'");
258                 if (PyErr_Occurred())
259                         PyErr_Print();
260                 return SRD_ERR_PYTHON;
261         }
262
263         if (!(py_res = PyObject_CallMethodObjArgs(di->py_instance,
264                         py_name, args, NULL))) {
265                 if (PyErr_Occurred())
266                         PyErr_Print();
267                 return SRD_ERR_PYTHON;
268         }
269
270         Py_XDECREF(py_res);
271         Py_DECREF(py_name);
272
273         return SRD_OK;
274 }
275
276 /**
277  * Run the specified decoder function.
278  *
279  * @param dec TODO
280  * @param inbuf TODO
281  * @param inbuflen TODO
282  *
283  * @return SRD_OK upon success, a (negative) error code otherwise.
284  */
285 int srd_instance_decode(uint64_t timeoffset, uint64_t duration,
286                 struct srd_decoder_instance *di, uint8_t *inbuf, uint64_t inbuflen)
287 {
288         PyObject *py_instance, *py_res;
289         srd_logic *logic;
290
291         /* Return an error upon unusable input. */
292         if (di == NULL)
293                 return SRD_ERR_ARG; /* TODO: More specific error? */
294         if (inbuf == NULL)
295                 return SRD_ERR_ARG; /* TODO: More specific error? */
296         if (inbuflen == 0) /* No point in working on empty buffers. */
297                 return SRD_ERR_ARG; /* TODO: More specific error? */
298
299         /* TODO: Error handling. */
300         py_instance = di->py_instance;
301         Py_XINCREF(py_instance);
302
303         logic = PyObject_New(srd_logic, &srd_logic_type);
304         Py_INCREF(logic);
305         logic->di = di;
306         logic->itercnt = 0;
307         logic->inbuf = inbuf;
308         logic->inbuflen = inbuflen;
309         logic->sample = PyList_New(2);
310         Py_INCREF(logic->sample);
311
312         if (!(py_res = PyObject_CallMethod(py_instance, "decode",
313                         "KKO", timeoffset, duration, logic))) {
314                 if (PyErr_Occurred())
315                         PyErr_Print(); /* Returns void. */
316
317                 return SRD_ERR_PYTHON; /* TODO: More specific error? */
318         }
319
320         Py_XDECREF(py_res);
321
322         return SRD_OK;
323 }
324
325
326 int srd_session_start(int num_probes, int unitsize, uint64_t samplerate)
327 {
328         PyObject *args;
329         GSList *d, *s;
330         struct srd_decoder_instance *di;
331         int ret;
332
333         if (!(args = Py_BuildValue("{s:l}", "samplerate", (long)samplerate))) {
334                 srd_err("unable to build python object for metadata");
335                 return SRD_ERR_PYTHON;
336         }
337
338         /* Run the start() method on all decoders receiving frontend data. */
339         for (d = di_list; d; d = d->next) {
340                 di = d->data;
341                 di->num_probes = num_probes;
342                 di->unitsize = unitsize;
343                 di->samplerate = samplerate;
344                 if ((ret = srd_instance_start(di, args) != SRD_OK))
345                         return ret;
346
347                 /* Run the start() method on all decoders up the stack from this one. */
348                 for (s = di->next_di; s; s = s->next) {
349                         /* These don't need probes, unitsize and samplerate. */
350                         di = s->data;
351                         if ((ret = srd_instance_start(di, args) != SRD_OK))
352                                 return ret;
353                 }
354         }
355
356         Py_DECREF(args);
357
358         return SRD_OK;
359 }
360
361 /* Feed logic samples to decoder session. */
362 int srd_session_feed(uint64_t timeoffset, uint64_t duration, uint8_t *inbuf,
363                 uint64_t inbuflen)
364 {
365         GSList *d;
366         int ret;
367
368         for (d = di_list; d; d = d->next) {
369                 if ((ret = srd_instance_decode(timeoffset, duration, d->data, inbuf,
370                                 inbuflen)) != SRD_OK)
371                         return ret;
372         }
373
374         return SRD_OK;
375 }
376
377
378 int pd_add(struct srd_decoder_instance *di, int output_type,
379                 char *proto_id)
380 {
381         struct srd_pd_output *pdo;
382
383         if (!(pdo = g_try_malloc(sizeof(struct srd_pd_output))))
384                 return -1;
385
386         /* pdo_id is just a simple index, nothing is deleted from this list anyway. */
387         pdo->pdo_id = g_slist_length(di->pd_output);
388         pdo->output_type = output_type;
389         pdo->decoder = di->decoder;
390         pdo->proto_id = g_strdup(proto_id);
391         di->pd_output = g_slist_append(di->pd_output, pdo);
392
393         return pdo->pdo_id;
394 }
395
396 struct srd_decoder_instance *get_di_by_decobject(void *decobject)
397 {
398         GSList *l, *s;
399         struct srd_decoder_instance *di;
400
401         for (l = di_list; l; l = l->next) {
402                 di = l->data;
403                 if (decobject == di->py_instance)
404                         return di;
405                 /* Check decoders stacked on top of this one. */
406                 for (s = di->next_di; s; s = s->next) {
407                         di = s->data;
408                         if (decobject == di->py_instance)
409                                 return di;
410                 }
411         }
412
413         return NULL;
414 }
415
416 int srd_register_callback(int output_type, void *cb)
417 {
418         struct srd_pd_callback *pd_cb;
419
420         if (!(pd_cb = g_try_malloc(sizeof(struct srd_pd_callback))))
421                 return SRD_ERR_MALLOC;
422
423         pd_cb->output_type = output_type;
424         pd_cb->callback = cb;
425         callbacks = g_slist_append(callbacks, pd_cb);
426
427         return SRD_OK;
428 }
429
430 void *srd_find_callback(int output_type)
431 {
432         GSList *l;
433         struct srd_pd_callback *pd_cb;
434         void *(cb);
435
436         cb = NULL;
437         for (l = callbacks; l; l = l->next) {
438                 pd_cb = l->data;
439                 if (pd_cb->output_type == output_type) {
440                         cb = pd_cb->callback;
441                         break;
442                 }
443         }
444
445         return cb;
446 }
447