]>
Commit | Line | Data |
---|---|---|
1 | /* | |
2 | * This file is part of the libsigrok project. | |
3 | * | |
4 | * Copyright (C) 2014 Daniel Elstner <daniel.kitta@gmail.com> | |
5 | * | |
6 | * This program is free software: you can redistribute it and/or modify | |
7 | * it under the terms of the GNU General Public License as published by | |
8 | * the Free Software Foundation, either version 3 of the License, or | |
9 | * (at your option) any later version. | |
10 | * | |
11 | * This program is distributed in the hope that it will be useful, | |
12 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 | * GNU General Public License for more details. | |
15 | * | |
16 | * You should have received a copy of the GNU General Public License | |
17 | * along with this program. If not, see <http://www.gnu.org/licenses/>. | |
18 | */ | |
19 | ||
20 | #include <config.h> | |
21 | #include <glib.h> | |
22 | #include <libusb.h> | |
23 | #include <stdlib.h> | |
24 | #include <string.h> | |
25 | #include <libsigrok/libsigrok.h> | |
26 | #include <libsigrok-internal.h> | |
27 | #include "protocol.h" | |
28 | ||
29 | /* Supported device scan options. | |
30 | */ | |
31 | static const uint32_t scanopts[] = { | |
32 | SR_CONF_CONN, | |
33 | }; | |
34 | ||
35 | /* Driver capabilities. | |
36 | */ | |
37 | static const uint32_t drvopts[] = { | |
38 | SR_CONF_LOGIC_ANALYZER, | |
39 | }; | |
40 | ||
41 | /* Supported trigger match conditions. | |
42 | */ | |
43 | static const int32_t trigger_matches[] = { | |
44 | SR_TRIGGER_ZERO, | |
45 | SR_TRIGGER_ONE, | |
46 | SR_TRIGGER_RISING, | |
47 | SR_TRIGGER_FALLING, | |
48 | }; | |
49 | ||
50 | /* Names assigned to available trigger sources. | |
51 | */ | |
52 | static const char *const trigger_source_names[] = { | |
53 | [TRIGGER_CHANNELS] = "CH", | |
54 | [TRIGGER_EXT_TRG] = "TRG", | |
55 | }; | |
56 | ||
57 | /* Names assigned to available edge slope choices. | |
58 | */ | |
59 | static const char *const signal_edge_names[] = { | |
60 | [EDGE_POSITIVE] = "r", | |
61 | [EDGE_NEGATIVE] = "f", | |
62 | }; | |
63 | ||
64 | /* Create a new sigrok device instance for the indicated LWLA model. | |
65 | */ | |
66 | static struct sr_dev_inst *dev_inst_new(const struct model_info *model) | |
67 | { | |
68 | struct sr_dev_inst *sdi; | |
69 | struct dev_context *devc; | |
70 | int i; | |
71 | char name[8]; | |
72 | ||
73 | /* Initialize private device context. */ | |
74 | devc = g_malloc0(sizeof(struct dev_context)); | |
75 | devc->model = model; | |
76 | devc->active_fpga_config = FPGA_NOCONF; | |
77 | devc->cfg_rle = TRUE; | |
78 | devc->samplerate = model->samplerates[0]; | |
79 | devc->channel_mask = (UINT64_C(1) << model->num_channels) - 1; | |
80 | ||
81 | /* Create sigrok device instance. */ | |
82 | sdi = g_malloc0(sizeof(struct sr_dev_inst)); | |
83 | sdi->status = SR_ST_INACTIVE; | |
84 | sdi->vendor = g_strdup(VENDOR_NAME); | |
85 | sdi->model = g_strdup(model->name); | |
86 | sdi->priv = devc; | |
87 | ||
88 | /* Generate list of logic channels. */ | |
89 | for (i = 0; i < model->num_channels; i++) { | |
90 | /* The LWLA series simply number channels from CH1 to CHxx. */ | |
91 | g_snprintf(name, sizeof(name), "CH%d", i + 1); | |
92 | sr_channel_new(sdi, i, SR_CHANNEL_LOGIC, TRUE, name); | |
93 | } | |
94 | ||
95 | return sdi; | |
96 | } | |
97 | ||
98 | /* Create a new device instance for a libusb device if it is a SysClk LWLA | |
99 | * device and also matches the connection specification. | |
100 | */ | |
101 | static struct sr_dev_inst *dev_inst_new_matching(GSList *conn_matches, | |
102 | libusb_device *dev) | |
103 | { | |
104 | GSList *node; | |
105 | struct sr_usb_dev_inst *usb; | |
106 | const struct model_info *model; | |
107 | struct sr_dev_inst *sdi; | |
108 | struct libusb_device_descriptor des; | |
109 | int bus, address, ret; | |
110 | unsigned int vid, pid; | |
111 | ||
112 | bus = libusb_get_bus_number(dev); | |
113 | address = libusb_get_device_address(dev); | |
114 | ||
115 | for (node = conn_matches; node != NULL; node = node->next) { | |
116 | usb = node->data; | |
117 | if (usb && usb->bus == bus && usb->address == address) | |
118 | break; /* found */ | |
119 | } | |
120 | if (conn_matches && !node) | |
121 | return NULL; /* no match */ | |
122 | ||
123 | ret = libusb_get_device_descriptor(dev, &des); | |
124 | if (ret != 0) { | |
125 | sr_err("Failed to get USB device descriptor: %s.", | |
126 | libusb_error_name(ret)); | |
127 | return NULL; | |
128 | } | |
129 | vid = des.idVendor; | |
130 | pid = des.idProduct; | |
131 | ||
132 | /* Create sigrok device instance. */ | |
133 | if (vid == USB_VID_SYSCLK && pid == USB_PID_LWLA1016) { | |
134 | model = &lwla1016_info; | |
135 | } else if (vid == USB_VID_SYSCLK && pid == USB_PID_LWLA1034) { | |
136 | model = &lwla1034_info; | |
137 | } else { | |
138 | if (conn_matches) | |
139 | sr_warn("USB device %d.%d (%04x:%04x) is not a" | |
140 | " SysClk LWLA.", bus, address, vid, pid); | |
141 | return NULL; | |
142 | } | |
143 | sdi = dev_inst_new(model); | |
144 | ||
145 | sdi->inst_type = SR_INST_USB; | |
146 | sdi->conn = sr_usb_dev_inst_new(bus, address, NULL); | |
147 | ||
148 | return sdi; | |
149 | } | |
150 | ||
151 | /* Scan for SysClk LWLA devices and create a device instance for each one. | |
152 | */ | |
153 | static GSList *scan(struct sr_dev_driver *di, GSList *options) | |
154 | { | |
155 | GSList *conn_devices, *devices, *node; | |
156 | struct drv_context *drvc; | |
157 | struct sr_dev_inst *sdi; | |
158 | struct sr_config *src; | |
159 | const char *conn; | |
160 | libusb_device **devlist; | |
161 | ssize_t num_devs, i; | |
162 | ||
163 | drvc = di->context; | |
164 | conn = NULL; | |
165 | conn_devices = NULL; | |
166 | devices = NULL; | |
167 | ||
168 | for (node = options; node != NULL; node = node->next) { | |
169 | src = node->data; | |
170 | if (src->key == SR_CONF_CONN) { | |
171 | conn = g_variant_get_string(src->data, NULL); | |
172 | break; | |
173 | } | |
174 | } | |
175 | if (conn) { | |
176 | /* Find devices matching the connection specification. */ | |
177 | conn_devices = sr_usb_find(drvc->sr_ctx->libusb_ctx, conn); | |
178 | } | |
179 | ||
180 | /* List all libusb devices. */ | |
181 | num_devs = libusb_get_device_list(drvc->sr_ctx->libusb_ctx, &devlist); | |
182 | if (num_devs < 0) { | |
183 | sr_err("Failed to list USB devices: %s.", | |
184 | libusb_error_name(num_devs)); | |
185 | g_slist_free_full(conn_devices, | |
186 | (GDestroyNotify)&sr_usb_dev_inst_free); | |
187 | return NULL; | |
188 | } | |
189 | ||
190 | /* Scan the USB device list for matching LWLA devices. */ | |
191 | for (i = 0; i < num_devs; i++) { | |
192 | sdi = dev_inst_new_matching(conn_devices, devlist[i]); | |
193 | if (!sdi) | |
194 | continue; /* no match */ | |
195 | ||
196 | /* Register device instance with driver. */ | |
197 | sdi->driver = di; | |
198 | drvc->instances = g_slist_append(drvc->instances, sdi); | |
199 | devices = g_slist_append(devices, sdi); | |
200 | } | |
201 | ||
202 | libusb_free_device_list(devlist, 1); | |
203 | g_slist_free_full(conn_devices, (GDestroyNotify)&sr_usb_dev_inst_free); | |
204 | ||
205 | return devices; | |
206 | } | |
207 | ||
208 | /* Destroy the private device context. | |
209 | */ | |
210 | static void clear_dev_context(void *priv) | |
211 | { | |
212 | struct dev_context *devc; | |
213 | ||
214 | devc = priv; | |
215 | ||
216 | if (devc->acquisition) { | |
217 | sr_err("Cannot clear device context during acquisition!"); | |
218 | return; /* Leak and pray. */ | |
219 | } | |
220 | sr_dbg("Device context cleared."); | |
221 | ||
222 | g_free(devc); | |
223 | } | |
224 | ||
225 | /* Destroy all device instances. | |
226 | */ | |
227 | static int dev_clear(const struct sr_dev_driver *di) | |
228 | { | |
229 | return std_dev_clear(di, &clear_dev_context); | |
230 | } | |
231 | ||
232 | /* Drain any pending data from the USB transfer buffers on the device. | |
233 | * This may be necessary e.g. after a crash or generally to clean up after | |
234 | * an abnormal condition. | |
235 | */ | |
236 | static int drain_usb(struct sr_usb_dev_inst *usb, unsigned int endpoint) | |
237 | { | |
238 | int drained, xfer_len, ret; | |
239 | unsigned char buf[512]; | |
240 | const unsigned int drain_timeout_ms = 10; | |
241 | ||
242 | drained = 0; | |
243 | do { | |
244 | xfer_len = 0; | |
245 | ret = libusb_bulk_transfer(usb->devhdl, endpoint, | |
246 | buf, sizeof(buf), &xfer_len, | |
247 | drain_timeout_ms); | |
248 | drained += xfer_len; | |
249 | } while (ret == LIBUSB_SUCCESS && xfer_len != 0); | |
250 | ||
251 | if (ret != LIBUSB_SUCCESS && ret != LIBUSB_ERROR_TIMEOUT) { | |
252 | sr_err("Failed to drain USB endpoint %u: %s.", | |
253 | endpoint & (LIBUSB_ENDPOINT_IN - 1), | |
254 | libusb_error_name(ret)); | |
255 | return SR_ERR; | |
256 | } | |
257 | if (drained > 0) { | |
258 | sr_warn("Drained %d bytes from USB endpoint %u.", | |
259 | drained, endpoint & (LIBUSB_ENDPOINT_IN - 1)); | |
260 | } | |
261 | ||
262 | return SR_OK; | |
263 | } | |
264 | ||
265 | /* Open and initialize device. | |
266 | */ | |
267 | static int dev_open(struct sr_dev_inst *sdi) | |
268 | { | |
269 | struct drv_context *drvc; | |
270 | struct dev_context *devc; | |
271 | struct sr_usb_dev_inst *usb; | |
272 | int i, ret; | |
273 | ||
274 | drvc = sdi->driver->context; | |
275 | devc = sdi->priv; | |
276 | usb = sdi->conn; | |
277 | ||
278 | if (sdi->status != SR_ST_INACTIVE) { | |
279 | sr_err("Device already open."); | |
280 | return SR_ERR; | |
281 | } | |
282 | ||
283 | /* Try the whole shebang three times, fingers crossed. */ | |
284 | for (i = 0; i < 3; i++) { | |
285 | ret = sr_usb_open(drvc->sr_ctx->libusb_ctx, usb); | |
286 | if (ret != SR_OK) | |
287 | return ret; | |
288 | ||
289 | ret = libusb_set_configuration(usb->devhdl, USB_CONFIG); | |
290 | if (ret != LIBUSB_SUCCESS) { | |
291 | sr_err("Failed to set USB configuration: %s.", | |
292 | libusb_error_name(ret)); | |
293 | sr_usb_close(usb); | |
294 | return SR_ERR; | |
295 | } | |
296 | ||
297 | ret = libusb_claim_interface(usb->devhdl, USB_INTERFACE); | |
298 | if (ret != LIBUSB_SUCCESS) { | |
299 | sr_err("Failed to claim interface: %s.", | |
300 | libusb_error_name(ret)); | |
301 | sr_usb_close(usb); | |
302 | return SR_ERR; | |
303 | } | |
304 | ||
305 | ret = drain_usb(usb, EP_REPLY); | |
306 | if (ret != SR_OK) { | |
307 | sr_usb_close(usb); | |
308 | return ret; | |
309 | } | |
310 | /* This delay appears to be necessary for reliable operation. */ | |
311 | g_usleep(30 * 1000); | |
312 | ||
313 | sdi->status = SR_ST_ACTIVE; | |
314 | ||
315 | devc->active_fpga_config = FPGA_NOCONF; | |
316 | devc->short_transfer_quirk = FALSE; | |
317 | devc->state = STATE_IDLE; | |
318 | ||
319 | ret = (*devc->model->apply_fpga_config)(sdi); | |
320 | ||
321 | if (ret == SR_OK) | |
322 | ret = (*devc->model->device_init_check)(sdi); | |
323 | if (ret == SR_OK) | |
324 | break; | |
325 | ||
326 | /* Rinse and repeat. */ | |
327 | sdi->status = SR_ST_INACTIVE; | |
328 | sr_usb_close(usb); | |
329 | } | |
330 | ||
331 | if (ret == SR_OK && devc->short_transfer_quirk) | |
332 | sr_warn("Short transfer quirk detected! " | |
333 | "Memory reads will be slow."); | |
334 | return ret; | |
335 | } | |
336 | ||
337 | /* Shutdown and close device. | |
338 | */ | |
339 | static int dev_close(struct sr_dev_inst *sdi) | |
340 | { | |
341 | struct dev_context *devc; | |
342 | struct sr_usb_dev_inst *usb; | |
343 | int ret; | |
344 | ||
345 | devc = sdi->priv; | |
346 | usb = sdi->conn; | |
347 | ||
348 | if (sdi->status == SR_ST_INACTIVE) { | |
349 | sr_dbg("Device already closed."); | |
350 | return SR_OK; | |
351 | } | |
352 | if (devc->acquisition) { | |
353 | sr_err("Cannot close device during acquisition!"); | |
354 | /* Request stop, leak handle, and prepare for the worst. */ | |
355 | devc->cancel_requested = TRUE; | |
356 | return SR_ERR_BUG; | |
357 | } | |
358 | ||
359 | sdi->status = SR_ST_INACTIVE; | |
360 | ||
361 | /* Download of the shutdown bitstream, if any. */ | |
362 | ret = (*devc->model->apply_fpga_config)(sdi); | |
363 | if (ret != SR_OK) | |
364 | sr_warn("Unable to shut down device."); | |
365 | ||
366 | libusb_release_interface(usb->devhdl, USB_INTERFACE); | |
367 | sr_usb_close(usb); | |
368 | ||
369 | return ret; | |
370 | } | |
371 | ||
372 | /* Check whether the device options contain a specific key. | |
373 | * Also match against get/set/list bits if specified. | |
374 | */ | |
375 | static int has_devopt(const struct model_info *model, uint32_t key) | |
376 | { | |
377 | unsigned int i; | |
378 | ||
379 | for (i = 0; i < model->num_devopts; i++) { | |
380 | if ((model->devopts[i] & (SR_CONF_MASK | key)) == key) | |
381 | return TRUE; | |
382 | } | |
383 | ||
384 | return FALSE; | |
385 | } | |
386 | ||
387 | /* Read device configuration setting. | |
388 | */ | |
389 | static int config_get(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi, | |
390 | const struct sr_channel_group *cg) | |
391 | { | |
392 | struct dev_context *devc; | |
393 | unsigned int idx; | |
394 | ||
395 | (void)cg; | |
396 | ||
397 | if (!sdi) | |
398 | return SR_ERR_ARG; | |
399 | ||
400 | devc = sdi->priv; | |
401 | ||
402 | if (!has_devopt(devc->model, key | SR_CONF_GET)) | |
403 | return SR_ERR_NA; | |
404 | ||
405 | switch (key) { | |
406 | case SR_CONF_SAMPLERATE: | |
407 | *data = g_variant_new_uint64(devc->samplerate); | |
408 | break; | |
409 | case SR_CONF_LIMIT_MSEC: | |
410 | *data = g_variant_new_uint64(devc->limit_msec); | |
411 | break; | |
412 | case SR_CONF_LIMIT_SAMPLES: | |
413 | *data = g_variant_new_uint64(devc->limit_samples); | |
414 | break; | |
415 | case SR_CONF_RLE: | |
416 | *data = g_variant_new_boolean(devc->cfg_rle); | |
417 | break; | |
418 | case SR_CONF_EXTERNAL_CLOCK: | |
419 | *data = g_variant_new_boolean(devc->cfg_clock_source | |
420 | == CLOCK_EXT_CLK); | |
421 | break; | |
422 | case SR_CONF_CLOCK_EDGE: | |
423 | idx = devc->cfg_clock_edge; | |
424 | if (idx >= ARRAY_SIZE(signal_edge_names)) | |
425 | return SR_ERR_BUG; | |
426 | *data = g_variant_new_string(signal_edge_names[idx]); | |
427 | break; | |
428 | case SR_CONF_TRIGGER_SOURCE: | |
429 | idx = devc->cfg_trigger_source; | |
430 | if (idx >= ARRAY_SIZE(trigger_source_names)) | |
431 | return SR_ERR_BUG; | |
432 | *data = g_variant_new_string(trigger_source_names[idx]); | |
433 | break; | |
434 | case SR_CONF_TRIGGER_SLOPE: | |
435 | idx = devc->cfg_trigger_slope; | |
436 | if (idx >= ARRAY_SIZE(signal_edge_names)) | |
437 | return SR_ERR_BUG; | |
438 | *data = g_variant_new_string(signal_edge_names[idx]); | |
439 | break; | |
440 | default: | |
441 | /* Must not happen for a key listed in devopts. */ | |
442 | return SR_ERR_BUG; | |
443 | } | |
444 | ||
445 | return SR_OK; | |
446 | } | |
447 | ||
448 | /* Helper for mapping a string-typed configuration value to an index | |
449 | * within a table of possible values. | |
450 | */ | |
451 | static int lookup_index(GVariant *value, const char *const *table, int len) | |
452 | { | |
453 | const char *entry; | |
454 | int i; | |
455 | ||
456 | entry = g_variant_get_string(value, NULL); | |
457 | if (!entry) | |
458 | return -1; | |
459 | ||
460 | /* Linear search is fine for very small tables. */ | |
461 | for (i = 0; i < len; i++) { | |
462 | if (strcmp(entry, table[i]) == 0) | |
463 | return i; | |
464 | } | |
465 | ||
466 | return -1; | |
467 | } | |
468 | ||
469 | /* Write device configuration setting. | |
470 | */ | |
471 | static int config_set(uint32_t key, GVariant *data, const struct sr_dev_inst *sdi, | |
472 | const struct sr_channel_group *cg) | |
473 | { | |
474 | uint64_t value; | |
475 | struct dev_context *devc; | |
476 | int idx; | |
477 | ||
478 | (void)cg; | |
479 | ||
480 | if (!sdi) | |
481 | return SR_ERR_ARG; | |
482 | ||
483 | devc = sdi->priv; | |
484 | ||
485 | if (!has_devopt(devc->model, key | SR_CONF_SET)) | |
486 | return SR_ERR_NA; | |
487 | ||
488 | switch (key) { | |
489 | case SR_CONF_SAMPLERATE: | |
490 | value = g_variant_get_uint64(data); | |
491 | if (value < devc->model->samplerates[devc->model->num_samplerates - 1] | |
492 | || value > devc->model->samplerates[0]) | |
493 | return SR_ERR_SAMPLERATE; | |
494 | devc->samplerate = value; | |
495 | break; | |
496 | case SR_CONF_LIMIT_MSEC: | |
497 | value = g_variant_get_uint64(data); | |
498 | if (value > MAX_LIMIT_MSEC) | |
499 | return SR_ERR_ARG; | |
500 | devc->limit_msec = value; | |
501 | break; | |
502 | case SR_CONF_LIMIT_SAMPLES: | |
503 | value = g_variant_get_uint64(data); | |
504 | if (value > MAX_LIMIT_SAMPLES) | |
505 | return SR_ERR_ARG; | |
506 | devc->limit_samples = value; | |
507 | break; | |
508 | case SR_CONF_RLE: | |
509 | devc->cfg_rle = g_variant_get_boolean(data); | |
510 | break; | |
511 | case SR_CONF_EXTERNAL_CLOCK: | |
512 | devc->cfg_clock_source = (g_variant_get_boolean(data)) | |
513 | ? CLOCK_EXT_CLK : CLOCK_INTERNAL; | |
514 | break; | |
515 | case SR_CONF_CLOCK_EDGE: | |
516 | idx = lookup_index(data, signal_edge_names, | |
517 | ARRAY_SIZE(signal_edge_names)); | |
518 | if (idx < 0) | |
519 | return SR_ERR_ARG; | |
520 | devc->cfg_clock_edge = idx; | |
521 | break; | |
522 | case SR_CONF_TRIGGER_SOURCE: | |
523 | idx = lookup_index(data, trigger_source_names, | |
524 | ARRAY_SIZE(trigger_source_names)); | |
525 | if (idx < 0) | |
526 | return SR_ERR_ARG; | |
527 | devc->cfg_trigger_source = idx; | |
528 | break; | |
529 | case SR_CONF_TRIGGER_SLOPE: | |
530 | idx = lookup_index(data, signal_edge_names, | |
531 | ARRAY_SIZE(signal_edge_names)); | |
532 | if (idx < 0) | |
533 | return SR_ERR_ARG; | |
534 | devc->cfg_trigger_slope = idx; | |
535 | break; | |
536 | default: | |
537 | /* Must not happen for a key listed in devopts. */ | |
538 | return SR_ERR_BUG; | |
539 | } | |
540 | ||
541 | return SR_OK; | |
542 | } | |
543 | ||
544 | /* Apply channel configuration change. | |
545 | */ | |
546 | static int config_channel_set(const struct sr_dev_inst *sdi, | |
547 | struct sr_channel *ch, unsigned int changes) | |
548 | { | |
549 | uint64_t channel_bit; | |
550 | struct dev_context *devc; | |
551 | ||
552 | if (!sdi) | |
553 | return SR_ERR_ARG; | |
554 | ||
555 | devc = sdi->priv; | |
556 | ||
557 | if (ch->index < 0 || ch->index >= devc->model->num_channels) { | |
558 | sr_err("Channel index %d out of range.", ch->index); | |
559 | return SR_ERR_BUG; | |
560 | } | |
561 | ||
562 | if ((changes & SR_CHANNEL_SET_ENABLED) != 0) { | |
563 | channel_bit = UINT64_C(1) << ch->index; | |
564 | ||
565 | /* Enable or disable logic input for this channel. */ | |
566 | if (ch->enabled) | |
567 | devc->channel_mask |= channel_bit; | |
568 | else | |
569 | devc->channel_mask &= ~channel_bit; | |
570 | } | |
571 | ||
572 | return SR_OK; | |
573 | } | |
574 | ||
575 | /* Derive trigger masks from the session's trigger configuration. | |
576 | */ | |
577 | static int prepare_trigger_masks(const struct sr_dev_inst *sdi) | |
578 | { | |
579 | uint64_t trigger_mask, trigger_values, trigger_edge_mask; | |
580 | uint64_t level_bit, type_bit; | |
581 | struct dev_context *devc; | |
582 | struct sr_trigger *trigger; | |
583 | struct sr_trigger_stage *stage; | |
584 | struct sr_trigger_match *match; | |
585 | const GSList *node; | |
586 | int idx; | |
587 | enum sr_trigger_matches trg; | |
588 | ||
589 | devc = sdi->priv; | |
590 | ||
591 | trigger = sr_session_trigger_get(sdi->session); | |
592 | if (!trigger || !trigger->stages) | |
593 | return SR_OK; | |
594 | ||
595 | if (trigger->stages->next) { | |
596 | sr_err("This device only supports 1 trigger stage."); | |
597 | return SR_ERR_ARG; | |
598 | } | |
599 | stage = trigger->stages->data; | |
600 | ||
601 | trigger_mask = 0; | |
602 | trigger_values = 0; | |
603 | trigger_edge_mask = 0; | |
604 | ||
605 | for (node = stage->matches; node; node = node->next) { | |
606 | match = node->data; | |
607 | ||
608 | if (!match->channel->enabled) | |
609 | continue; /* Ignore disabled channel. */ | |
610 | ||
611 | idx = match->channel->index; | |
612 | trg = match->match; | |
613 | ||
614 | if (idx < 0 || idx >= devc->model->num_channels) { | |
615 | sr_err("Channel index %d out of range.", idx); | |
616 | return SR_ERR_BUG; /* Should not happen. */ | |
617 | } | |
618 | if (trg != SR_TRIGGER_ZERO | |
619 | && trg != SR_TRIGGER_ONE | |
620 | && trg != SR_TRIGGER_RISING | |
621 | && trg != SR_TRIGGER_FALLING) { | |
622 | sr_err("Unsupported trigger match for CH%d.", idx + 1); | |
623 | return SR_ERR_ARG; | |
624 | } | |
625 | level_bit = (trg == SR_TRIGGER_ONE | |
626 | || trg == SR_TRIGGER_RISING) ? 1 : 0; | |
627 | type_bit = (trg == SR_TRIGGER_RISING | |
628 | || trg == SR_TRIGGER_FALLING) ? 1 : 0; | |
629 | ||
630 | trigger_mask |= UINT64_C(1) << idx; | |
631 | trigger_values |= level_bit << idx; | |
632 | trigger_edge_mask |= type_bit << idx; | |
633 | } | |
634 | devc->trigger_mask = trigger_mask; | |
635 | devc->trigger_values = trigger_values; | |
636 | devc->trigger_edge_mask = trigger_edge_mask; | |
637 | ||
638 | return SR_OK; | |
639 | } | |
640 | ||
641 | /* Apply current device configuration to the hardware. | |
642 | */ | |
643 | static int config_commit(const struct sr_dev_inst *sdi) | |
644 | { | |
645 | struct dev_context *devc; | |
646 | int ret; | |
647 | ||
648 | devc = sdi->priv; | |
649 | ||
650 | if (sdi->status != SR_ST_ACTIVE) | |
651 | return SR_ERR_DEV_CLOSED; | |
652 | ||
653 | if (devc->acquisition) { | |
654 | sr_err("Acquisition still in progress?"); | |
655 | return SR_ERR; | |
656 | } | |
657 | ||
658 | ret = prepare_trigger_masks(sdi); | |
659 | if (ret != SR_OK) | |
660 | return ret; | |
661 | ||
662 | ret = (*devc->model->apply_fpga_config)(sdi); | |
663 | if (ret != SR_OK) { | |
664 | sr_err("Failed to apply FPGA configuration."); | |
665 | return ret; | |
666 | } | |
667 | ||
668 | return SR_OK; | |
669 | } | |
670 | ||
671 | /* List available choices for a configuration setting. | |
672 | */ | |
673 | static int config_list(uint32_t key, GVariant **data, | |
674 | const struct sr_dev_inst *sdi, | |
675 | const struct sr_channel_group *cg) | |
676 | { | |
677 | struct dev_context *devc; | |
678 | GVariant *gvar; | |
679 | GVariantBuilder gvb; | |
680 | ||
681 | (void)cg; | |
682 | ||
683 | if (key == SR_CONF_SCAN_OPTIONS) { | |
684 | *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32, | |
685 | scanopts, ARRAY_SIZE(scanopts), sizeof(scanopts[0])); | |
686 | return SR_OK; | |
687 | } | |
688 | if (!sdi) { | |
689 | if (key != SR_CONF_DEVICE_OPTIONS) | |
690 | return SR_ERR_ARG; | |
691 | ||
692 | /* List driver capabilities. */ | |
693 | *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32, | |
694 | drvopts, ARRAY_SIZE(drvopts), sizeof(drvopts[0])); | |
695 | return SR_OK; | |
696 | } | |
697 | ||
698 | devc = sdi->priv; | |
699 | ||
700 | /* List the model's device options. */ | |
701 | if (key == SR_CONF_DEVICE_OPTIONS) { | |
702 | *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32, | |
703 | devc->model->devopts, devc->model->num_devopts, | |
704 | sizeof(devc->model->devopts[0])); | |
705 | return SR_OK; | |
706 | } | |
707 | ||
708 | if (!has_devopt(devc->model, key | SR_CONF_LIST)) | |
709 | return SR_ERR_NA; | |
710 | ||
711 | switch (key) { | |
712 | case SR_CONF_SAMPLERATE: | |
713 | g_variant_builder_init(&gvb, G_VARIANT_TYPE_VARDICT); | |
714 | gvar = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT64, | |
715 | devc->model->samplerates, devc->model->num_samplerates, | |
716 | sizeof(devc->model->samplerates[0])); | |
717 | g_variant_builder_add(&gvb, "{sv}", "samplerates", gvar); | |
718 | *data = g_variant_builder_end(&gvb); | |
719 | break; | |
720 | case SR_CONF_TRIGGER_MATCH: | |
721 | *data = g_variant_new_fixed_array(G_VARIANT_TYPE_INT32, | |
722 | trigger_matches, ARRAY_SIZE(trigger_matches), | |
723 | sizeof(trigger_matches[0])); | |
724 | break; | |
725 | case SR_CONF_TRIGGER_SOURCE: | |
726 | *data = g_variant_new_strv(trigger_source_names, | |
727 | ARRAY_SIZE(trigger_source_names)); | |
728 | break; | |
729 | case SR_CONF_TRIGGER_SLOPE: | |
730 | case SR_CONF_CLOCK_EDGE: | |
731 | *data = g_variant_new_strv(signal_edge_names, | |
732 | ARRAY_SIZE(signal_edge_names)); | |
733 | break; | |
734 | default: | |
735 | /* Must not happen for a key listed in devopts. */ | |
736 | return SR_ERR_BUG; | |
737 | } | |
738 | ||
739 | return SR_OK; | |
740 | } | |
741 | ||
742 | /* Set up the device hardware to begin capturing samples as soon as the | |
743 | * configured trigger conditions are met, or immediately if no triggers | |
744 | * are configured. | |
745 | */ | |
746 | static int dev_acquisition_start(const struct sr_dev_inst *sdi) | |
747 | { | |
748 | if (sdi->status != SR_ST_ACTIVE) | |
749 | return SR_ERR_DEV_CLOSED; | |
750 | ||
751 | sr_info("Starting acquisition."); | |
752 | ||
753 | return lwla_start_acquisition(sdi); | |
754 | } | |
755 | ||
756 | /* Request that a running capture operation be stopped. | |
757 | */ | |
758 | static int dev_acquisition_stop(struct sr_dev_inst *sdi) | |
759 | { | |
760 | struct dev_context *devc; | |
761 | ||
762 | devc = sdi->priv; | |
763 | ||
764 | if (sdi->status != SR_ST_ACTIVE) | |
765 | return SR_ERR_DEV_CLOSED; | |
766 | ||
767 | if (devc->state != STATE_IDLE && !devc->cancel_requested) { | |
768 | devc->cancel_requested = TRUE; | |
769 | sr_dbg("Stopping acquisition."); | |
770 | } | |
771 | ||
772 | return SR_OK; | |
773 | } | |
774 | ||
775 | /* SysClk LWLA driver descriptor. | |
776 | */ | |
777 | SR_PRIV struct sr_dev_driver sysclk_lwla_driver_info = { | |
778 | .name = "sysclk-lwla", | |
779 | .longname = "SysClk LWLA series", | |
780 | .api_version = 1, | |
781 | .init = std_init, | |
782 | .cleanup = std_cleanup, | |
783 | .scan = scan, | |
784 | .dev_list = std_dev_list, | |
785 | .dev_clear = dev_clear, | |
786 | .config_get = config_get, | |
787 | .config_set = config_set, | |
788 | .config_channel_set = config_channel_set, | |
789 | .config_commit = config_commit, | |
790 | .config_list = config_list, | |
791 | .dev_open = dev_open, | |
792 | .dev_close = dev_close, | |
793 | .dev_acquisition_start = dev_acquisition_start, | |
794 | .dev_acquisition_stop = dev_acquisition_stop, | |
795 | .context = NULL, | |
796 | }; |