]>
Commit | Line | Data |
---|---|---|
1 | /* | |
2 | * This file is part of the sigrok project. | |
3 | * | |
4 | * Copyright (C) 2010 Bert Vermeulen <bert@biot.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 <stdio.h> | |
21 | #include <stdlib.h> | |
22 | #include <sys/time.h> | |
23 | #include <inttypes.h> | |
24 | #include <glib.h> | |
25 | #include <libusb.h> | |
26 | #include <sigrok.h> | |
27 | #include "config.h" | |
28 | ||
29 | #define USB_VENDOR 0x0925 | |
30 | #define USB_PRODUCT 0x3881 | |
31 | #define USB_VENDOR_NAME "Saleae" | |
32 | #define USB_MODEL_NAME "Logic" | |
33 | #define USB_MODEL_VERSION "" | |
34 | ||
35 | #define USB_INTERFACE 0 | |
36 | #define USB_CONFIGURATION 1 | |
37 | #define NUM_PROBES 8 | |
38 | #define NUM_TRIGGER_STAGES 4 | |
39 | #define TRIGGER_TYPES "01" | |
40 | #define FIRMWARE FIRMWARE_DIR "/saleae-logic.firmware" | |
41 | ||
42 | /* delay in ms */ | |
43 | #define FIRMWARE_RENUM_DELAY 2000 | |
44 | #define NUM_SIMUL_TRANSFERS 10 | |
45 | #define MAX_EMPTY_TRANSFERS (NUM_SIMUL_TRANSFERS * 2) | |
46 | ||
47 | /* Software trigger implementation: positive values indicate trigger stage. */ | |
48 | #define TRIGGER_FIRED -1 | |
49 | ||
50 | /* There is only one model Saleae Logic, and this is what it supports: */ | |
51 | static int capabilities[] = { | |
52 | HWCAP_LOGIC_ANALYZER, | |
53 | HWCAP_SAMPLERATE, | |
54 | ||
55 | /* These are really implemented in the driver, not the hardware. */ | |
56 | HWCAP_LIMIT_SAMPLES, | |
57 | 0, | |
58 | }; | |
59 | ||
60 | /* List of struct sigrok_device_instance, maintained by opendev()/closedev(). */ | |
61 | static GSList *device_instances = NULL; | |
62 | ||
63 | /* | |
64 | * Since we can't keep track of a Saleae Logic device after upgrading the | |
65 | * firmware -- it re-enumerates into a different device address after the | |
66 | * upgrade -- this is like a global lock. No device will open until a proper | |
67 | * delay after the last device was upgraded. | |
68 | */ | |
69 | GTimeVal firmware_updated = { 0, 0 }; | |
70 | ||
71 | static libusb_context *usb_context = NULL; | |
72 | ||
73 | static uint64_t supported_samplerates[] = { | |
74 | KHZ(200), | |
75 | KHZ(250), | |
76 | KHZ(500), | |
77 | MHZ(1), | |
78 | MHZ(2), | |
79 | MHZ(4), | |
80 | MHZ(8), | |
81 | MHZ(12), | |
82 | MHZ(16), | |
83 | MHZ(24), | |
84 | 0, | |
85 | }; | |
86 | ||
87 | static struct samplerates samplerates = { | |
88 | KHZ(200), | |
89 | MHZ(24), | |
90 | 0, | |
91 | supported_samplerates, | |
92 | }; | |
93 | ||
94 | /* TODO: All of these should go in a device-specific struct. */ | |
95 | static uint64_t cur_samplerate = 0; | |
96 | static uint64_t limit_samples = 0; | |
97 | static uint8_t probe_mask = 0; | |
98 | static uint8_t trigger_mask[NUM_TRIGGER_STAGES] = { 0 }; | |
99 | static uint8_t trigger_value[NUM_TRIGGER_STAGES] = { 0 }; | |
100 | static uint8_t trigger_buffer[NUM_TRIGGER_STAGES] = { 0 }; | |
101 | ||
102 | int trigger_stage = TRIGGER_FIRED; | |
103 | ||
104 | static int hw_set_configuration(int device_index, int capability, void *value); | |
105 | ||
106 | /* | |
107 | * Returns 1 if the device's configuration profile match the Logic firmware's | |
108 | * configuration, 0 otherwise. | |
109 | */ | |
110 | int check_conf_profile(libusb_device *dev) | |
111 | { | |
112 | struct libusb_device_descriptor des; | |
113 | struct libusb_config_descriptor *conf_dsc = NULL; | |
114 | const struct libusb_interface_descriptor *intf_dsc; | |
115 | int ret = -1; | |
116 | ||
117 | while (ret == -1) { | |
118 | /* Assume it's not a Saleae Logic unless proven wrong. */ | |
119 | ret = 0; | |
120 | ||
121 | if (libusb_get_device_descriptor(dev, &des) != 0) | |
122 | break; | |
123 | ||
124 | if (des.bNumConfigurations != 1) | |
125 | /* Need exactly 1 configuration. */ | |
126 | break; | |
127 | ||
128 | if (libusb_get_config_descriptor(dev, 0, &conf_dsc) != 0) | |
129 | break; | |
130 | ||
131 | if (conf_dsc->bNumInterfaces != 1) | |
132 | /* Need exactly 1 interface. */ | |
133 | break; | |
134 | ||
135 | if (conf_dsc->interface[0].num_altsetting != 1) | |
136 | /* Need just one alternate setting. */ | |
137 | break; | |
138 | ||
139 | intf_dsc = &(conf_dsc->interface[0].altsetting[0]); | |
140 | if (intf_dsc->bNumEndpoints != 2) | |
141 | /* Need 2 endpoints. */ | |
142 | break; | |
143 | ||
144 | if ((intf_dsc->endpoint[0].bEndpointAddress & 0x8f) != | |
145 | (1 | LIBUSB_ENDPOINT_OUT)) | |
146 | /* First endpoint should be 1 (outbound). */ | |
147 | break; | |
148 | ||
149 | if ((intf_dsc->endpoint[1].bEndpointAddress & 0x8f) != | |
150 | (2 | LIBUSB_ENDPOINT_IN)) | |
151 | /* First endpoint should be 2 (inbound). */ | |
152 | break; | |
153 | ||
154 | /* If we made it here, it must be a Saleae Logic. */ | |
155 | ret = 1; | |
156 | } | |
157 | ||
158 | if (conf_dsc) | |
159 | libusb_free_config_descriptor(conf_dsc); | |
160 | ||
161 | return ret; | |
162 | } | |
163 | ||
164 | static int opendev2(int device_index, struct sigrok_device_instance **sdi, | |
165 | libusb_device *dev, struct libusb_device_descriptor *des, | |
166 | int *skip) | |
167 | { | |
168 | int err; | |
169 | ||
170 | if ((err = libusb_get_device_descriptor(dev, des))) { | |
171 | g_warning("failed to get device descriptor: %d", err); | |
172 | return -1; | |
173 | } | |
174 | ||
175 | if (des->idVendor != USB_VENDOR || des->idProduct != USB_PRODUCT) | |
176 | return 0; | |
177 | ||
178 | if (*skip != device_index) { | |
179 | /* Skip devices of this type that aren't the one we want. */ | |
180 | *skip += 1; | |
181 | return 0; | |
182 | } | |
183 | ||
184 | /* | |
185 | * Should check the bus here, since we know that already. But what are | |
186 | * we going to do if it doesn't match after the right number of skips? | |
187 | */ | |
188 | if (!(err = libusb_open(dev, &((*sdi)->usb->devhdl)))) { | |
189 | (*sdi)->usb->address = libusb_get_device_address(dev); | |
190 | (*sdi)->status = ST_ACTIVE; | |
191 | g_message("opened device %d on %d.%d interface %d", | |
192 | (*sdi)->index, (*sdi)->usb->bus, | |
193 | (*sdi)->usb->address, USB_INTERFACE); | |
194 | } else { | |
195 | g_warning("failed to open device: %d", err); | |
196 | *sdi = NULL; | |
197 | } | |
198 | ||
199 | return 0; | |
200 | } | |
201 | ||
202 | static int opendev3(struct sigrok_device_instance **sdi, libusb_device *dev, | |
203 | struct libusb_device_descriptor *des) | |
204 | { | |
205 | int err; | |
206 | ||
207 | if ((err = libusb_get_device_descriptor(dev, des))) { | |
208 | g_warning("failed to get device descriptor: %d", err); | |
209 | return -1; | |
210 | } | |
211 | ||
212 | if (des->idVendor != USB_VENDOR || des->idProduct != USB_PRODUCT) | |
213 | return 0; | |
214 | ||
215 | if (libusb_get_bus_number(dev) == (*sdi)->usb->bus | |
216 | && libusb_get_device_address(dev) == (*sdi)->usb->address) { | |
217 | /* Found it. */ | |
218 | if (!(err = libusb_open(dev, &((*sdi)->usb->devhdl)))) { | |
219 | (*sdi)->status = ST_ACTIVE; | |
220 | g_message("opened device %d on %d.%d interface %d", | |
221 | (*sdi)->index, (*sdi)->usb->bus, | |
222 | (*sdi)->usb->address, USB_INTERFACE); | |
223 | } else { | |
224 | g_warning("failed to open device: %d", err); | |
225 | *sdi = NULL; | |
226 | } | |
227 | } | |
228 | ||
229 | return 0; | |
230 | } | |
231 | ||
232 | struct sigrok_device_instance *sl_open_device(int device_index) | |
233 | { | |
234 | struct sigrok_device_instance *sdi; | |
235 | libusb_device **devlist; | |
236 | struct libusb_device_descriptor des; | |
237 | int err, skip, i; | |
238 | ||
239 | if (!(sdi = get_sigrok_device_instance(device_instances, device_index))) | |
240 | return NULL; | |
241 | ||
242 | libusb_get_device_list(usb_context, &devlist); | |
243 | if (sdi->status == ST_INITIALIZING) { | |
244 | /* | |
245 | * This device was renumerating last time we touched it. | |
246 | * opendev() guarantees we've waited long enough for it to | |
247 | * have booted properly, so now we need to find it on | |
248 | * the bus and record its new address. | |
249 | */ | |
250 | skip = 0; | |
251 | for (i = 0; devlist[i]; i++) { | |
252 | /* TODO: Error handling. */ | |
253 | err = opendev2(device_index, &sdi, devlist[i], &des, | |
254 | &skip); | |
255 | } | |
256 | } else if (sdi->status == ST_INACTIVE) { | |
257 | /* | |
258 | * This device is fully enumerated, so we need to find this | |
259 | * device by vendor, product, bus and address. | |
260 | */ | |
261 | libusb_get_device_list(usb_context, &devlist); | |
262 | for (i = 0; devlist[i]; i++) { | |
263 | /* TODO: Error handling. */ | |
264 | err = opendev3(&sdi, devlist[i], &des); | |
265 | } | |
266 | } else { | |
267 | /* Status must be ST_ACTIVE, i.e. already in use... */ | |
268 | sdi = NULL; | |
269 | } | |
270 | libusb_free_device_list(devlist, 1); | |
271 | ||
272 | if (sdi && sdi->status != ST_ACTIVE) | |
273 | sdi = NULL; | |
274 | ||
275 | return sdi; | |
276 | } | |
277 | ||
278 | int upload_firmware(libusb_device *dev) | |
279 | { | |
280 | int ret; | |
281 | ||
282 | ret = ezusb_upload_firmware(dev, USB_CONFIGURATION, FIRMWARE); | |
283 | if (ret != 0) | |
284 | return 1; | |
285 | ||
286 | /* Remember when the last firmware update was done. */ | |
287 | g_get_current_time(&firmware_updated); | |
288 | ||
289 | return 0; | |
290 | } | |
291 | ||
292 | static void close_device(struct sigrok_device_instance *sdi) | |
293 | { | |
294 | if (sdi->usb->devhdl == NULL) | |
295 | return; | |
296 | ||
297 | g_message("closing device %d on %d.%d interface %d", sdi->index, | |
298 | sdi->usb->bus, sdi->usb->address, USB_INTERFACE); | |
299 | libusb_release_interface(sdi->usb->devhdl, USB_INTERFACE); | |
300 | libusb_close(sdi->usb->devhdl); | |
301 | sdi->usb->devhdl = NULL; | |
302 | sdi->status = ST_INACTIVE; | |
303 | } | |
304 | ||
305 | static int configure_probes(GSList *probes) | |
306 | { | |
307 | struct probe *probe; | |
308 | GSList *l; | |
309 | int probe_bit, stage, i; | |
310 | char *tc; | |
311 | ||
312 | probe_mask = 0; | |
313 | for (i = 0; i < NUM_TRIGGER_STAGES; i++) { | |
314 | trigger_mask[i] = 0; | |
315 | trigger_value[i] = 0; | |
316 | } | |
317 | ||
318 | stage = -1; | |
319 | for (l = probes; l; l = l->next) { | |
320 | probe = (struct probe *)l->data; | |
321 | if (probe->enabled == FALSE) | |
322 | continue; | |
323 | probe_bit = 1 << (probe->index - 1); | |
324 | probe_mask |= probe_bit; | |
325 | if (probe->trigger) { | |
326 | stage = 0; | |
327 | for (tc = probe->trigger; *tc; tc++) { | |
328 | trigger_mask[stage] |= probe_bit; | |
329 | if (*tc == '1') | |
330 | trigger_value[stage] |= probe_bit; | |
331 | stage++; | |
332 | if (stage > NUM_TRIGGER_STAGES) | |
333 | return SIGROK_ERR; | |
334 | } | |
335 | } | |
336 | } | |
337 | ||
338 | if (stage == -1) | |
339 | /* | |
340 | * We didn't configure any triggers, make sure acquisition | |
341 | * doesn't wait for any. | |
342 | */ | |
343 | trigger_stage = TRIGGER_FIRED; | |
344 | else | |
345 | trigger_stage = 0; | |
346 | ||
347 | return SIGROK_OK; | |
348 | } | |
349 | ||
350 | /* | |
351 | * API callbacks | |
352 | */ | |
353 | ||
354 | static int hw_init(char *deviceinfo) | |
355 | { | |
356 | struct sigrok_device_instance *sdi; | |
357 | struct libusb_device_descriptor des; | |
358 | libusb_device **devlist; | |
359 | int err, devcnt, i; | |
360 | ||
361 | /* QUICK HACK */ | |
362 | deviceinfo = deviceinfo; | |
363 | ||
364 | if (libusb_init(&usb_context) != 0) { | |
365 | g_warning("Failed to initialize USB."); | |
366 | return 0; | |
367 | } | |
368 | libusb_set_debug(usb_context, 3); | |
369 | ||
370 | /* Find all Saleae Logic devices and upload firmware to all of them. */ | |
371 | devcnt = 0; | |
372 | libusb_get_device_list(usb_context, &devlist); | |
373 | for (i = 0; devlist[i]; i++) { | |
374 | err = libusb_get_device_descriptor(devlist[i], &des); | |
375 | if (err != 0) { | |
376 | g_warning("failed to get device descriptor: %d", err); | |
377 | continue; | |
378 | } | |
379 | ||
380 | if (des.idVendor != USB_VENDOR || des.idProduct != USB_PRODUCT) | |
381 | continue; /* Not a Saleae Logic... */ | |
382 | ||
383 | sdi = sigrok_device_instance_new(devcnt, ST_INITIALIZING, | |
384 | USB_VENDOR_NAME, USB_MODEL_NAME, USB_MODEL_VERSION); | |
385 | if (!sdi) | |
386 | return 0; | |
387 | device_instances = g_slist_append(device_instances, sdi); | |
388 | ||
389 | if (check_conf_profile(devlist[i]) == 0) { | |
390 | /* | |
391 | * Continue on the off chance that the device is in a | |
392 | * working state. TODO: Could maybe try a USB reset, | |
393 | * or uploading the firmware again. | |
394 | */ | |
395 | if (upload_firmware(devlist[i]) > 0) | |
396 | g_warning("firmware upload failed for " | |
397 | "device %d", devcnt); | |
398 | ||
399 | sdi->usb = usb_device_instance_new | |
400 | (libusb_get_bus_number(devlist[i]), 0, NULL); | |
401 | } else { | |
402 | /* Already has the firmware, so fix the new address. */ | |
403 | sdi->usb = usb_device_instance_new | |
404 | (libusb_get_bus_number(devlist[i]), | |
405 | libusb_get_device_address(devlist[i]), NULL); | |
406 | } | |
407 | devcnt++; | |
408 | } | |
409 | libusb_free_device_list(devlist, 1); | |
410 | ||
411 | return devcnt; | |
412 | } | |
413 | ||
414 | static int hw_opendev(int device_index) | |
415 | { | |
416 | GTimeVal cur_time; | |
417 | struct sigrok_device_instance *sdi; | |
418 | int timediff, err; | |
419 | unsigned int cur, upd; | |
420 | ||
421 | if (firmware_updated.tv_sec > 0) { | |
422 | /* Firmware was recently uploaded. */ | |
423 | g_get_current_time(&cur_time); | |
424 | cur = cur_time.tv_sec * 1000 + cur_time.tv_usec / 1000; | |
425 | upd = firmware_updated.tv_sec * 1000 + | |
426 | firmware_updated.tv_usec / 1000; | |
427 | timediff = cur - upd; | |
428 | if (timediff < FIRMWARE_RENUM_DELAY) { | |
429 | timediff = FIRMWARE_RENUM_DELAY - timediff; | |
430 | g_message("waiting %d ms for device to reset", | |
431 | timediff); | |
432 | g_usleep(timediff * 1000); | |
433 | firmware_updated.tv_sec = 0; | |
434 | } | |
435 | } | |
436 | ||
437 | if (!(sdi = sl_open_device(device_index))) { | |
438 | g_warning("unable to open device"); | |
439 | return SIGROK_ERR; | |
440 | } | |
441 | ||
442 | err = libusb_claim_interface(sdi->usb->devhdl, USB_INTERFACE); | |
443 | if (err != 0) { | |
444 | g_warning("Unable to claim interface: %d", err); | |
445 | return SIGROK_ERR; | |
446 | } | |
447 | ||
448 | if (cur_samplerate == 0) { | |
449 | /* Samplerate hasn't been set; default to the slowest one. */ | |
450 | if (hw_set_configuration(device_index, HWCAP_SAMPLERATE, | |
451 | &supported_samplerates[0]) == SIGROK_ERR) | |
452 | return SIGROK_ERR; | |
453 | } | |
454 | ||
455 | return SIGROK_OK; | |
456 | } | |
457 | ||
458 | static void hw_closedev(int device_index) | |
459 | { | |
460 | struct sigrok_device_instance *sdi; | |
461 | ||
462 | if ((sdi = get_sigrok_device_instance(device_instances, device_index))) | |
463 | close_device(sdi); | |
464 | } | |
465 | ||
466 | static void hw_cleanup(void) | |
467 | { | |
468 | GSList *l; | |
469 | ||
470 | /* Properly close all devices... */ | |
471 | for (l = device_instances; l; l = l->next) | |
472 | close_device((struct sigrok_device_instance *)l->data); | |
473 | ||
474 | /* ...and free all their memory. */ | |
475 | for (l = device_instances; l; l = l->next) | |
476 | g_free(l->data); | |
477 | g_slist_free(device_instances); | |
478 | device_instances = NULL; | |
479 | ||
480 | if (usb_context) | |
481 | libusb_exit(usb_context); | |
482 | usb_context = NULL; | |
483 | } | |
484 | ||
485 | static void *hw_get_device_info(int device_index, int device_info_id) | |
486 | { | |
487 | struct sigrok_device_instance *sdi; | |
488 | void *info = NULL; | |
489 | ||
490 | if (!(sdi = get_sigrok_device_instance(device_instances, device_index))) | |
491 | return NULL; | |
492 | ||
493 | switch (device_info_id) { | |
494 | case DI_INSTANCE: | |
495 | info = sdi; | |
496 | break; | |
497 | case DI_NUM_PROBES: | |
498 | info = GINT_TO_POINTER(NUM_PROBES); | |
499 | break; | |
500 | case DI_SAMPLERATES: | |
501 | info = &samplerates; | |
502 | break; | |
503 | case DI_TRIGGER_TYPES: | |
504 | info = TRIGGER_TYPES; | |
505 | break; | |
506 | case DI_CUR_SAMPLERATE: | |
507 | info = &cur_samplerate; | |
508 | break; | |
509 | } | |
510 | ||
511 | return info; | |
512 | } | |
513 | ||
514 | static int hw_get_status(int device_index) | |
515 | { | |
516 | struct sigrok_device_instance *sdi; | |
517 | ||
518 | sdi = get_sigrok_device_instance(device_instances, device_index); | |
519 | if (sdi) | |
520 | return sdi->status; | |
521 | else | |
522 | return ST_NOT_FOUND; | |
523 | } | |
524 | ||
525 | static int *hw_get_capabilities(void) | |
526 | { | |
527 | return capabilities; | |
528 | } | |
529 | ||
530 | static int set_configuration_samplerate(struct sigrok_device_instance *sdi, | |
531 | uint64_t samplerate) | |
532 | { | |
533 | uint8_t divider; | |
534 | int ret, result, i; | |
535 | unsigned char buf[2]; | |
536 | ||
537 | for (i = 0; supported_samplerates[i]; i++) { | |
538 | if (supported_samplerates[i] == samplerate) | |
539 | break; | |
540 | } | |
541 | if (supported_samplerates[i] == 0) | |
542 | return SIGROK_ERR_SAMPLERATE; | |
543 | ||
544 | divider = (uint8_t) (48 / (float)(samplerate / 1000000)) - 1; | |
545 | ||
546 | g_message("setting samplerate to %" PRIu64 " Hz (divider %d)", | |
547 | samplerate, divider); | |
548 | buf[0] = 0x01; | |
549 | buf[1] = divider; | |
550 | ret = libusb_bulk_transfer(sdi->usb->devhdl, 1 | LIBUSB_ENDPOINT_OUT, | |
551 | buf, 2, &result, 500); | |
552 | if (ret != 0) { | |
553 | g_warning("failed to set samplerate: %d", ret); | |
554 | return SIGROK_ERR; | |
555 | } | |
556 | cur_samplerate = samplerate; | |
557 | ||
558 | return SIGROK_OK; | |
559 | } | |
560 | ||
561 | static int hw_set_configuration(int device_index, int capability, void *value) | |
562 | { | |
563 | struct sigrok_device_instance *sdi; | |
564 | int ret; | |
565 | uint64_t *tmp_u64; | |
566 | ||
567 | if (!(sdi = get_sigrok_device_instance(device_instances, device_index))) | |
568 | return SIGROK_ERR; | |
569 | ||
570 | if (capability == HWCAP_SAMPLERATE) { | |
571 | tmp_u64 = value; | |
572 | ret = set_configuration_samplerate(sdi, *tmp_u64); | |
573 | } else if (capability == HWCAP_PROBECONFIG) { | |
574 | ret = configure_probes((GSList *) value); | |
575 | } else if (capability == HWCAP_LIMIT_SAMPLES) { | |
576 | limit_samples = strtoull(value, NULL, 10); | |
577 | ret = SIGROK_OK; | |
578 | } else { | |
579 | ret = SIGROK_ERR; | |
580 | } | |
581 | ||
582 | return ret; | |
583 | } | |
584 | ||
585 | static int receive_data(int fd, int revents, void *user_data) | |
586 | { | |
587 | struct timeval tv; | |
588 | ||
589 | /* QUICK HACK */ | |
590 | fd = fd; | |
591 | revents = revents; | |
592 | user_data = user_data; | |
593 | ||
594 | tv.tv_sec = tv.tv_usec = 0; | |
595 | libusb_handle_events_timeout(usb_context, &tv); | |
596 | ||
597 | return TRUE; | |
598 | } | |
599 | ||
600 | static void trigger_helper(int i, unsigned char *cur_buf, | |
601 | struct datafeed_packet *packet, void *user_data, | |
602 | int *trigger_offset) | |
603 | { | |
604 | if ((cur_buf[i] & trigger_mask[trigger_stage]) | |
605 | == trigger_value[trigger_stage]) { | |
606 | /* Match on this trigger stage. */ | |
607 | trigger_buffer[trigger_stage] = cur_buf[i]; | |
608 | trigger_stage++; | |
609 | if (trigger_stage == NUM_TRIGGER_STAGES | |
610 | || trigger_mask[trigger_stage] == 0) { | |
611 | /* Match on all trigger stages, we're done. */ | |
612 | *trigger_offset = i + 1; | |
613 | ||
614 | /* | |
615 | * TODO: Send pre-trigger buffer to session bus. | |
616 | * Tell the frontend we hit the trigger here. | |
617 | */ | |
618 | packet->type = DF_TRIGGER; | |
619 | packet->length = 0; | |
620 | session_bus(user_data, packet); | |
621 | ||
622 | /* | |
623 | * Send the samples that triggered it, since we're | |
624 | * skipping past them. | |
625 | */ | |
626 | packet->type = DF_LOGIC8; | |
627 | packet->length = trigger_stage; | |
628 | packet->payload = trigger_buffer; | |
629 | session_bus(user_data, packet); | |
630 | // break; // FIXME??? | |
631 | ||
632 | trigger_stage = TRIGGER_FIRED; | |
633 | } | |
634 | return; | |
635 | } | |
636 | ||
637 | /* | |
638 | * We had a match before, but not in the next sample. However, we may | |
639 | * have a match on this stage in the next bit -- trigger on 0001 will | |
640 | * fail on seeing 00001, so we need to go back to stage 0 -- but at | |
641 | * the next sample from the one that matched originally, which the | |
642 | * counter increment at the end of the loop takes care of. | |
643 | */ | |
644 | if (trigger_stage > 0) { | |
645 | i -= trigger_stage; | |
646 | if (i < -1) | |
647 | i = -1; /* Oops, went back past this buffer. */ | |
648 | /* Reset trigger stage. */ | |
649 | trigger_stage = 0; | |
650 | } | |
651 | } | |
652 | ||
653 | void receive_transfer(struct libusb_transfer *transfer) | |
654 | { | |
655 | static int num_samples = 0; | |
656 | static int empty_transfer_count = 0; | |
657 | struct datafeed_packet packet; | |
658 | void *user_data; | |
659 | int cur_buflen, trigger_offset, i; | |
660 | unsigned char *cur_buf, *new_buf; | |
661 | ||
662 | /* hw_stop_acquisition() is telling us to stop. */ | |
663 | if (transfer == NULL) | |
664 | num_samples = -1; | |
665 | ||
666 | /* | |
667 | * If acquisition has already ended, just free any queued up | |
668 | * transfer that come in. | |
669 | */ | |
670 | if (num_samples == -1) { | |
671 | libusb_free_transfer(transfer); | |
672 | return; | |
673 | } | |
674 | ||
675 | g_message("receive_transfer(): status %d received %d bytes", | |
676 | transfer->status, transfer->actual_length); | |
677 | ||
678 | /* Save incoming transfer before reusing the transfer struct. */ | |
679 | cur_buf = transfer->buffer; | |
680 | cur_buflen = transfer->actual_length; | |
681 | user_data = transfer->user_data; | |
682 | ||
683 | /* Fire off a new request. */ | |
684 | new_buf = g_malloc(4096); | |
685 | transfer->buffer = new_buf; | |
686 | transfer->length = 4096; | |
687 | if (libusb_submit_transfer(transfer) != 0) { | |
688 | /* TODO: Stop session? */ | |
689 | g_warning("eek"); | |
690 | } | |
691 | ||
692 | if (cur_buflen == 0) { | |
693 | empty_transfer_count++; | |
694 | if (empty_transfer_count > MAX_EMPTY_TRANSFERS) { | |
695 | /* | |
696 | * The FX2 gave up. End the acquisition, the frontend | |
697 | * will work out that the samplecount is short. | |
698 | */ | |
699 | packet.type = DF_END; | |
700 | session_bus(user_data, &packet); | |
701 | num_samples = -1; | |
702 | } | |
703 | return; | |
704 | } else { | |
705 | empty_transfer_count = 0; | |
706 | } | |
707 | ||
708 | trigger_offset = 0; | |
709 | if (trigger_stage >= 0) { | |
710 | for (i = 0; i < cur_buflen; i++) { | |
711 | trigger_helper(i, cur_buf, &packet, user_data, | |
712 | &trigger_offset); | |
713 | } | |
714 | } | |
715 | ||
716 | if (trigger_stage == TRIGGER_FIRED) { | |
717 | /* Send the incoming transfer to the session bus. */ | |
718 | packet.type = DF_LOGIC8; | |
719 | packet.length = cur_buflen - trigger_offset; | |
720 | packet.payload = cur_buf + trigger_offset; | |
721 | session_bus(user_data, &packet); | |
722 | g_free(cur_buf); | |
723 | ||
724 | num_samples += cur_buflen; | |
725 | if ((unsigned int)num_samples > limit_samples) { | |
726 | /* End the acquisition. */ | |
727 | packet.type = DF_END; | |
728 | session_bus(user_data, &packet); | |
729 | num_samples = -1; | |
730 | } | |
731 | } else { | |
732 | /* | |
733 | * TODO: Buffer pre-trigger data in capture | |
734 | * ratio-sized buffer. | |
735 | */ | |
736 | } | |
737 | } | |
738 | ||
739 | static int hw_start_acquisition(int device_index, gpointer session_device_id) | |
740 | { | |
741 | struct sigrok_device_instance *sdi; | |
742 | struct datafeed_packet *packet; | |
743 | struct datafeed_header *header; | |
744 | struct libusb_transfer *transfer; | |
745 | const struct libusb_pollfd **lupfd; | |
746 | int size, i; | |
747 | unsigned char *buf; | |
748 | ||
749 | if (!(sdi = get_sigrok_device_instance(device_instances, device_index))) | |
750 | return SIGROK_ERR; | |
751 | ||
752 | packet = g_malloc(sizeof(struct datafeed_packet)); | |
753 | header = g_malloc(sizeof(struct datafeed_header)); | |
754 | if (!packet || !header) | |
755 | return SIGROK_ERR; | |
756 | ||
757 | /* Start with 2K transfer, subsequently increased to 4K. */ | |
758 | size = 2048; | |
759 | for (i = 0; i < NUM_SIMUL_TRANSFERS; i++) { | |
760 | buf = g_malloc(size); | |
761 | transfer = libusb_alloc_transfer(0); | |
762 | libusb_fill_bulk_transfer(transfer, sdi->usb->devhdl, | |
763 | 2 | LIBUSB_ENDPOINT_IN, buf, size, | |
764 | receive_transfer, session_device_id, 40); | |
765 | if (libusb_submit_transfer(transfer) != 0) { | |
766 | /* TODO: Free them all. */ | |
767 | libusb_free_transfer(transfer); | |
768 | g_free(buf); | |
769 | return SIGROK_ERR; | |
770 | } | |
771 | size = 4096; | |
772 | } | |
773 | ||
774 | lupfd = libusb_get_pollfds(usb_context); | |
775 | for (i = 0; lupfd[i]; i++) | |
776 | source_add(lupfd[i]->fd, lupfd[i]->events, -1, receive_data, | |
777 | NULL); | |
778 | free(lupfd); | |
779 | ||
780 | packet->type = DF_HEADER; | |
781 | packet->length = sizeof(struct datafeed_header); | |
782 | packet->payload = (unsigned char *)header; | |
783 | header->feed_version = 1; | |
784 | gettimeofday(&header->starttime, NULL); | |
785 | header->samplerate = cur_samplerate; | |
786 | header->protocol_id = PROTO_RAW; | |
787 | header->num_probes = NUM_PROBES; | |
788 | session_bus(session_device_id, packet); | |
789 | g_free(header); | |
790 | g_free(packet); | |
791 | ||
792 | return SIGROK_OK; | |
793 | } | |
794 | ||
795 | /* This stops acquisition on ALL devices, ignoring device_index. */ | |
796 | static void hw_stop_acquisition(int device_index, gpointer session_device_id) | |
797 | { | |
798 | struct datafeed_packet packet; | |
799 | ||
800 | /* QUICK HACK */ | |
801 | device_index = device_index; | |
802 | ||
803 | packet.type = DF_END; | |
804 | session_bus(session_device_id, &packet); | |
805 | ||
806 | receive_transfer(NULL); | |
807 | ||
808 | /* TODO: Need to cancel and free any queued up transfers. */ | |
809 | } | |
810 | ||
811 | struct device_plugin saleae_logic_plugin_info = { | |
812 | "saleae-logic", | |
813 | 1, | |
814 | hw_init, | |
815 | hw_cleanup, | |
816 | ||
817 | hw_opendev, | |
818 | hw_closedev, | |
819 | hw_get_device_info, | |
820 | hw_get_status, | |
821 | hw_get_capabilities, | |
822 | hw_set_configuration, | |
823 | hw_start_acquisition, | |
824 | hw_stop_acquisition, | |
825 | }; |