]>
Commit | Line | Data |
---|---|---|
1 | /* | |
2 | * This file is part of the sigrok project. | |
3 | * | |
4 | * Copyright (C) 2010-2012 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 "config.h" | |
27 | #include "sigrok.h" | |
28 | #include "sigrok-internal.h" | |
29 | #include "saleae-logic.h" | |
30 | ||
31 | static struct fx2_profile supported_fx2[] = { | |
32 | /* Saleae Logic */ | |
33 | { 0x0925, 0x3881, 0x0925, 0x3881, "Saleae", "Logic", NULL, 8 }, | |
34 | /* default Cypress FX2 without EEPROM */ | |
35 | { 0x04b4, 0x8613, 0x0925, 0x3881, "Cypress", "FX2", NULL, 16 }, | |
36 | { 0, 0, 0, 0, 0, 0, 0, 0 } | |
37 | }; | |
38 | ||
39 | static int hwcaps[] = { | |
40 | SR_HWCAP_LOGIC_ANALYZER, | |
41 | SR_HWCAP_SAMPLERATE, | |
42 | ||
43 | /* These are really implemented in the driver, not the hardware. */ | |
44 | SR_HWCAP_LIMIT_SAMPLES, | |
45 | SR_HWCAP_CONTINUOUS, | |
46 | 0, | |
47 | }; | |
48 | ||
49 | static const char *probe_names[] = { | |
50 | "0", | |
51 | "1", | |
52 | "2", | |
53 | "3", | |
54 | "4", | |
55 | "5", | |
56 | "6", | |
57 | "7", | |
58 | "8", | |
59 | "9", | |
60 | "10", | |
61 | "11", | |
62 | "12", | |
63 | "13", | |
64 | "14", | |
65 | "15", | |
66 | NULL, | |
67 | }; | |
68 | ||
69 | static uint64_t supported_samplerates[] = { | |
70 | SR_KHZ(200), | |
71 | SR_KHZ(250), | |
72 | SR_KHZ(500), | |
73 | SR_MHZ(1), | |
74 | SR_MHZ(2), | |
75 | SR_MHZ(4), | |
76 | SR_MHZ(8), | |
77 | SR_MHZ(12), | |
78 | SR_MHZ(16), | |
79 | SR_MHZ(24), | |
80 | 0, | |
81 | }; | |
82 | ||
83 | static struct sr_samplerates samplerates = { | |
84 | SR_KHZ(200), | |
85 | SR_MHZ(24), | |
86 | SR_HZ(0), | |
87 | supported_samplerates, | |
88 | }; | |
89 | ||
90 | /* List of struct sr_dev_inst, maintained by dev_open()/dev_close(). */ | |
91 | static GSList *dev_insts = NULL; | |
92 | static libusb_context *usb_context = NULL; | |
93 | ||
94 | static int new_saleae_logic_firmware = 0; | |
95 | ||
96 | static int hw_dev_config_set(int dev_index, int hwcap, void *value); | |
97 | static int hw_dev_acquisition_stop(int dev_index, gpointer session_dev_id); | |
98 | ||
99 | /** | |
100 | * Check the USB configuration to determine if this is a Saleae Logic. | |
101 | * | |
102 | * @return 1 if the device's configuration profile match the Logic firmware's | |
103 | * configuration, 0 otherwise. | |
104 | */ | |
105 | static int check_conf_profile(libusb_device *dev) | |
106 | { | |
107 | struct libusb_device_descriptor des; | |
108 | struct libusb_config_descriptor *conf_dsc = NULL; | |
109 | const struct libusb_interface_descriptor *intf_dsc; | |
110 | int ret = -1; | |
111 | ||
112 | while (ret == -1) { | |
113 | /* Assume it's not a Saleae Logic unless proven wrong. */ | |
114 | ret = 0; | |
115 | ||
116 | if (libusb_get_device_descriptor(dev, &des) != 0) | |
117 | break; | |
118 | ||
119 | if (des.bNumConfigurations != 1) | |
120 | /* Need exactly 1 configuration. */ | |
121 | break; | |
122 | ||
123 | if (libusb_get_config_descriptor(dev, 0, &conf_dsc) != 0) | |
124 | break; | |
125 | ||
126 | if (conf_dsc->bNumInterfaces != 1) | |
127 | /* Need exactly 1 interface. */ | |
128 | break; | |
129 | ||
130 | if (conf_dsc->interface[0].num_altsetting != 1) | |
131 | /* Need just one alternate setting. */ | |
132 | break; | |
133 | ||
134 | intf_dsc = &(conf_dsc->interface[0].altsetting[0]); | |
135 | if (intf_dsc->bNumEndpoints == 4) { | |
136 | /* The new Saleae Logic firmware has 4 endpoints. */ | |
137 | new_saleae_logic_firmware = 1; | |
138 | } else if (intf_dsc->bNumEndpoints == 2) { | |
139 | /* The old Saleae Logic firmware has 2 endpoints. */ | |
140 | new_saleae_logic_firmware = 0; | |
141 | } else { | |
142 | /* Other number of endpoints -> not a Saleae Logic. */ | |
143 | break; | |
144 | } | |
145 | ||
146 | if ((intf_dsc->endpoint[0].bEndpointAddress & 0x8f) != | |
147 | (1 | LIBUSB_ENDPOINT_OUT)) | |
148 | /* The first endpoint should be 1 (outbound). */ | |
149 | break; | |
150 | ||
151 | if ((intf_dsc->endpoint[1].bEndpointAddress & 0x8f) != | |
152 | (2 | LIBUSB_ENDPOINT_IN)) | |
153 | /* The second endpoint should be 2 (inbound). */ | |
154 | break; | |
155 | ||
156 | /* TODO: The new firmware has 4 endpoints... */ | |
157 | ||
158 | /* If we made it here, it must be a Saleae Logic. */ | |
159 | ret = 1; | |
160 | } | |
161 | ||
162 | if (conf_dsc) | |
163 | libusb_free_config_descriptor(conf_dsc); | |
164 | ||
165 | return ret; | |
166 | } | |
167 | ||
168 | static int sl_open_dev(int dev_index) | |
169 | { | |
170 | libusb_device **devlist; | |
171 | struct libusb_device_descriptor des; | |
172 | struct sr_dev_inst *sdi; | |
173 | struct context *ctx; | |
174 | int err, skip, i; | |
175 | ||
176 | if (!(sdi = sr_dev_inst_get(dev_insts, dev_index))) | |
177 | return SR_ERR; | |
178 | ctx = sdi->priv; | |
179 | ||
180 | if (sdi->status == SR_ST_ACTIVE) | |
181 | /* already in use */ | |
182 | return SR_ERR; | |
183 | ||
184 | skip = 0; | |
185 | libusb_get_device_list(usb_context, &devlist); | |
186 | for (i = 0; devlist[i]; i++) { | |
187 | if ((err = libusb_get_device_descriptor(devlist[i], &des))) { | |
188 | sr_err("logic: failed to get device descriptor: %d", err); | |
189 | continue; | |
190 | } | |
191 | ||
192 | if (des.idVendor != ctx->profile->fw_vid | |
193 | || des.idProduct != ctx->profile->fw_pid) | |
194 | continue; | |
195 | ||
196 | if (sdi->status == SR_ST_INITIALIZING) { | |
197 | if (skip != dev_index) { | |
198 | /* Skip devices of this type that aren't the one we want. */ | |
199 | skip += 1; | |
200 | continue; | |
201 | } | |
202 | } else if (sdi->status == SR_ST_INACTIVE) { | |
203 | /* | |
204 | * This device is fully enumerated, so we need to find | |
205 | * this device by vendor, product, bus and address. | |
206 | */ | |
207 | if (libusb_get_bus_number(devlist[i]) != ctx->usb->bus | |
208 | || libusb_get_device_address(devlist[i]) != ctx->usb->address) | |
209 | /* this is not the one */ | |
210 | continue; | |
211 | } | |
212 | ||
213 | if (!(err = libusb_open(devlist[i], &ctx->usb->devhdl))) { | |
214 | if (ctx->usb->address == 0xff) | |
215 | /* | |
216 | * first time we touch this device after firmware upload, | |
217 | * so we don't know the address yet. | |
218 | */ | |
219 | ctx->usb->address = libusb_get_device_address(devlist[i]); | |
220 | ||
221 | sdi->status = SR_ST_ACTIVE; | |
222 | sr_info("logic: opened device %d on %d.%d interface %d", | |
223 | sdi->index, ctx->usb->bus, | |
224 | ctx->usb->address, USB_INTERFACE); | |
225 | } else { | |
226 | sr_err("logic: failed to open device: %d", err); | |
227 | } | |
228 | ||
229 | /* if we made it here, we handled the device one way or another */ | |
230 | break; | |
231 | } | |
232 | libusb_free_device_list(devlist, 1); | |
233 | ||
234 | if (sdi->status != SR_ST_ACTIVE) | |
235 | return SR_ERR; | |
236 | ||
237 | return SR_OK; | |
238 | } | |
239 | ||
240 | static void close_dev(struct sr_dev_inst *sdi) | |
241 | { | |
242 | struct context *ctx; | |
243 | ||
244 | ctx = sdi->priv; | |
245 | ||
246 | if (ctx->usb->devhdl == NULL) | |
247 | return; | |
248 | ||
249 | sr_info("logic: closing device %d on %d.%d interface %d", sdi->index, | |
250 | ctx->usb->bus, ctx->usb->address, USB_INTERFACE); | |
251 | libusb_release_interface(ctx->usb->devhdl, USB_INTERFACE); | |
252 | libusb_close(ctx->usb->devhdl); | |
253 | ctx->usb->devhdl = NULL; | |
254 | sdi->status = SR_ST_INACTIVE; | |
255 | } | |
256 | ||
257 | static int configure_probes(struct context *ctx, GSList *probes) | |
258 | { | |
259 | struct sr_probe *probe; | |
260 | GSList *l; | |
261 | int probe_bit, stage, i; | |
262 | char *tc; | |
263 | ||
264 | ctx->probe_mask = 0; | |
265 | for (i = 0; i < NUM_TRIGGER_STAGES; i++) { | |
266 | ctx->trigger_mask[i] = 0; | |
267 | ctx->trigger_value[i] = 0; | |
268 | } | |
269 | ||
270 | stage = -1; | |
271 | for (l = probes; l; l = l->next) { | |
272 | probe = (struct sr_probe *)l->data; | |
273 | if (probe->enabled == FALSE) | |
274 | continue; | |
275 | probe_bit = 1 << (probe->index - 1); | |
276 | ctx->probe_mask |= probe_bit; | |
277 | if (!(probe->trigger)) | |
278 | continue; | |
279 | ||
280 | stage = 0; | |
281 | for (tc = probe->trigger; *tc; tc++) { | |
282 | ctx->trigger_mask[stage] |= probe_bit; | |
283 | if (*tc == '1') | |
284 | ctx->trigger_value[stage] |= probe_bit; | |
285 | stage++; | |
286 | if (stage > NUM_TRIGGER_STAGES) | |
287 | return SR_ERR; | |
288 | } | |
289 | } | |
290 | ||
291 | if (stage == -1) | |
292 | /* | |
293 | * We didn't configure any triggers, make sure acquisition | |
294 | * doesn't wait for any. | |
295 | */ | |
296 | ctx->trigger_stage = TRIGGER_FIRED; | |
297 | else | |
298 | ctx->trigger_stage = 0; | |
299 | ||
300 | return SR_OK; | |
301 | } | |
302 | ||
303 | static struct context *fx2_dev_new(void) | |
304 | { | |
305 | struct context *ctx; | |
306 | ||
307 | if (!(ctx = g_try_malloc0(sizeof(struct context)))) { | |
308 | sr_err("logic: %s: ctx malloc failed", __func__); | |
309 | return NULL; | |
310 | } | |
311 | ctx->trigger_stage = TRIGGER_FIRED; | |
312 | ctx->usb = NULL; | |
313 | ||
314 | return ctx; | |
315 | } | |
316 | ||
317 | ||
318 | /* | |
319 | * API callbacks | |
320 | */ | |
321 | ||
322 | static int hw_init(const char *devinfo) | |
323 | { | |
324 | struct sr_dev_inst *sdi; | |
325 | struct libusb_device_descriptor des; | |
326 | struct fx2_profile *fx2_prof; | |
327 | struct context *ctx; | |
328 | libusb_device **devlist; | |
329 | int err, devcnt, i, j; | |
330 | ||
331 | /* Avoid compiler warnings. */ | |
332 | (void)devinfo; | |
333 | ||
334 | if (libusb_init(&usb_context) != 0) { | |
335 | sr_err("logic: Failed to initialize USB."); | |
336 | return 0; | |
337 | } | |
338 | ||
339 | /* Find all Saleae Logic devices and upload firmware to all of them. */ | |
340 | devcnt = 0; | |
341 | libusb_get_device_list(usb_context, &devlist); | |
342 | for (i = 0; devlist[i]; i++) { | |
343 | fx2_prof = NULL; | |
344 | err = libusb_get_device_descriptor(devlist[i], &des); | |
345 | if (err != 0) { | |
346 | sr_err("logic: failed to get device descriptor: %d", | |
347 | err); | |
348 | continue; | |
349 | } | |
350 | ||
351 | for (j = 0; supported_fx2[j].orig_vid; j++) { | |
352 | if (des.idVendor == supported_fx2[j].orig_vid | |
353 | && des.idProduct == supported_fx2[j].orig_pid) { | |
354 | fx2_prof = &supported_fx2[j]; | |
355 | break; | |
356 | } | |
357 | } | |
358 | if (!fx2_prof) | |
359 | /* not a supported VID/PID */ | |
360 | continue; | |
361 | ||
362 | sdi = sr_dev_inst_new(devcnt, SR_ST_INITIALIZING, | |
363 | fx2_prof->vendor, fx2_prof->model, fx2_prof->model_version); | |
364 | if (!sdi) | |
365 | return 0; | |
366 | ctx = fx2_dev_new(); | |
367 | ctx->profile = fx2_prof; | |
368 | sdi->priv = ctx; | |
369 | dev_insts = g_slist_append(dev_insts, sdi); | |
370 | ||
371 | if (check_conf_profile(devlist[i])) { | |
372 | /* Already has the firmware, so fix the new address. */ | |
373 | sr_dbg("logic: Found a Saleae Logic with %s firmware.", | |
374 | new_saleae_logic_firmware ? "new" : "old"); | |
375 | sdi->status = SR_ST_INACTIVE; | |
376 | ctx->usb = sr_usb_dev_inst_new | |
377 | (libusb_get_bus_number(devlist[i]), | |
378 | libusb_get_device_address(devlist[i]), NULL); | |
379 | } else { | |
380 | if (ezusb_upload_firmware(devlist[i], USB_CONFIGURATION, FIRMWARE) == SR_OK) | |
381 | /* Remember when the firmware on this device was updated */ | |
382 | g_get_current_time(&ctx->fw_updated); | |
383 | else | |
384 | sr_err("logic: firmware upload failed for " | |
385 | "device %d", devcnt); | |
386 | ctx->usb = sr_usb_dev_inst_new | |
387 | (libusb_get_bus_number(devlist[i]), 0xff, NULL); | |
388 | } | |
389 | devcnt++; | |
390 | } | |
391 | libusb_free_device_list(devlist, 1); | |
392 | ||
393 | return devcnt; | |
394 | } | |
395 | ||
396 | static int hw_dev_open(int dev_index) | |
397 | { | |
398 | GTimeVal cur_time; | |
399 | struct sr_dev_inst *sdi; | |
400 | struct context *ctx; | |
401 | int timediff, err; | |
402 | ||
403 | if (!(sdi = sr_dev_inst_get(dev_insts, dev_index))) | |
404 | return SR_ERR; | |
405 | ctx = sdi->priv; | |
406 | ||
407 | /* | |
408 | * if the firmware was recently uploaded, wait up to MAX_RENUM_DELAY ms | |
409 | * for the FX2 to renumerate | |
410 | */ | |
411 | err = 0; | |
412 | if (GTV_TO_MSEC(ctx->fw_updated) > 0) { | |
413 | sr_info("logic: waiting for device to reset"); | |
414 | /* takes at least 300ms for the FX2 to be gone from the USB bus */ | |
415 | g_usleep(300 * 1000); | |
416 | timediff = 0; | |
417 | while (timediff < MAX_RENUM_DELAY) { | |
418 | if ((err = sl_open_dev(dev_index)) == SR_OK) | |
419 | break; | |
420 | g_usleep(100 * 1000); | |
421 | g_get_current_time(&cur_time); | |
422 | timediff = GTV_TO_MSEC(cur_time) - GTV_TO_MSEC(ctx->fw_updated); | |
423 | } | |
424 | sr_info("logic: device came back after %d ms", timediff); | |
425 | } else { | |
426 | err = sl_open_dev(dev_index); | |
427 | } | |
428 | ||
429 | if (err != SR_OK) { | |
430 | sr_err("logic: unable to open device"); | |
431 | return SR_ERR; | |
432 | } | |
433 | ctx = sdi->priv; | |
434 | ||
435 | err = libusb_claim_interface(ctx->usb->devhdl, USB_INTERFACE); | |
436 | if (err != 0) { | |
437 | sr_err("logic: Unable to claim interface: %d", err); | |
438 | return SR_ERR; | |
439 | } | |
440 | ||
441 | if (ctx->cur_samplerate == 0) { | |
442 | /* Samplerate hasn't been set; default to the slowest one. */ | |
443 | if (hw_dev_config_set(dev_index, SR_HWCAP_SAMPLERATE, | |
444 | &supported_samplerates[0]) == SR_ERR) | |
445 | return SR_ERR; | |
446 | } | |
447 | ||
448 | return SR_OK; | |
449 | } | |
450 | ||
451 | static int hw_dev_close(int dev_index) | |
452 | { | |
453 | struct sr_dev_inst *sdi; | |
454 | ||
455 | if (!(sdi = sr_dev_inst_get(dev_insts, dev_index))) { | |
456 | sr_err("logic: %s: sdi was NULL", __func__); | |
457 | return SR_ERR; /* TODO: SR_ERR_ARG? */ | |
458 | } | |
459 | ||
460 | /* TODO */ | |
461 | close_dev(sdi); | |
462 | ||
463 | return SR_OK; | |
464 | } | |
465 | ||
466 | static int hw_cleanup(void) | |
467 | { | |
468 | GSList *l; | |
469 | struct sr_dev_inst *sdi; | |
470 | struct context *ctx; | |
471 | int ret = SR_OK; | |
472 | ||
473 | /* Properly close and free all devices. */ | |
474 | for (l = dev_insts; l; l = l->next) { | |
475 | if (!(sdi = l->data)) { | |
476 | /* Log error, but continue cleaning up the rest. */ | |
477 | sr_err("logic: %s: sdi was NULL, continuing", __func__); | |
478 | ret = SR_ERR_BUG; | |
479 | continue; | |
480 | } | |
481 | if (!(ctx = sdi->priv)) { | |
482 | /* Log error, but continue cleaning up the rest. */ | |
483 | sr_err("logic: %s: sdi->priv was NULL, continuing", | |
484 | __func__); | |
485 | ret = SR_ERR_BUG; | |
486 | continue; | |
487 | } | |
488 | close_dev(sdi); | |
489 | sr_usb_dev_inst_free(ctx->usb); | |
490 | sr_dev_inst_free(sdi); | |
491 | } | |
492 | ||
493 | g_slist_free(dev_insts); | |
494 | dev_insts = NULL; | |
495 | ||
496 | if (usb_context) | |
497 | libusb_exit(usb_context); | |
498 | usb_context = NULL; | |
499 | ||
500 | return ret; | |
501 | } | |
502 | ||
503 | static void *hw_dev_info_get(int dev_index, int dev_info_id) | |
504 | { | |
505 | struct sr_dev_inst *sdi; | |
506 | struct context *ctx; | |
507 | void *info = NULL; | |
508 | ||
509 | if (!(sdi = sr_dev_inst_get(dev_insts, dev_index))) | |
510 | return NULL; | |
511 | ctx = sdi->priv; | |
512 | ||
513 | switch (dev_info_id) { | |
514 | case SR_DI_INST: | |
515 | info = sdi; | |
516 | break; | |
517 | case SR_DI_NUM_PROBES: | |
518 | info = GINT_TO_POINTER(ctx->profile->num_probes); | |
519 | break; | |
520 | case SR_DI_PROBE_NAMES: | |
521 | info = probe_names; | |
522 | break; | |
523 | case SR_DI_SAMPLERATES: | |
524 | info = &samplerates; | |
525 | break; | |
526 | case SR_DI_TRIGGER_TYPES: | |
527 | info = TRIGGER_TYPES; | |
528 | break; | |
529 | case SR_DI_CUR_SAMPLERATE: | |
530 | info = &ctx->cur_samplerate; | |
531 | break; | |
532 | } | |
533 | ||
534 | return info; | |
535 | } | |
536 | ||
537 | static int hw_dev_status_get(int dev_index) | |
538 | { | |
539 | struct sr_dev_inst *sdi; | |
540 | ||
541 | sdi = sr_dev_inst_get(dev_insts, dev_index); | |
542 | if (sdi) | |
543 | return sdi->status; | |
544 | else | |
545 | return SR_ST_NOT_FOUND; | |
546 | } | |
547 | ||
548 | static int *hw_hwcap_get_all(void) | |
549 | { | |
550 | return hwcaps; | |
551 | } | |
552 | ||
553 | static uint8_t new_firmware_divider_value(uint64_t samplerate) | |
554 | { | |
555 | switch (samplerate) { | |
556 | case SR_MHZ(24): | |
557 | return 0xe0; | |
558 | break; | |
559 | case SR_MHZ(16): | |
560 | return 0xd5; | |
561 | break; | |
562 | case SR_MHZ(12): | |
563 | return 0xe2; | |
564 | break; | |
565 | case SR_MHZ(8): | |
566 | return 0xd4; | |
567 | break; | |
568 | case SR_MHZ(4): | |
569 | return 0xda; | |
570 | break; | |
571 | case SR_MHZ(2): | |
572 | return 0xe6; | |
573 | break; | |
574 | case SR_MHZ(1): | |
575 | return 0x8e; | |
576 | break; | |
577 | case SR_KHZ(500): | |
578 | return 0xfe; | |
579 | break; | |
580 | case SR_KHZ(250): | |
581 | return 0x9e; | |
582 | break; | |
583 | case SR_KHZ(200): | |
584 | return 0x4e; | |
585 | break; | |
586 | } | |
587 | ||
588 | /* Shouldn't happen. */ | |
589 | sr_err("logic: %s: Invalid samplerate %" PRIu64 "", | |
590 | __func__, samplerate); | |
591 | return 0; | |
592 | } | |
593 | ||
594 | static int set_samplerate(struct sr_dev_inst *sdi, uint64_t samplerate) | |
595 | { | |
596 | struct context *ctx; | |
597 | uint8_t divider; | |
598 | int ret, result, i; | |
599 | unsigned char buf[2]; | |
600 | ||
601 | ctx = sdi->priv; | |
602 | for (i = 0; supported_samplerates[i]; i++) { | |
603 | if (supported_samplerates[i] == samplerate) | |
604 | break; | |
605 | } | |
606 | if (supported_samplerates[i] == 0) | |
607 | return SR_ERR_SAMPLERATE; | |
608 | ||
609 | if (new_saleae_logic_firmware) | |
610 | divider = new_firmware_divider_value(samplerate); | |
611 | else | |
612 | divider = (uint8_t) (48 / (samplerate / 1000000.0)) - 1; | |
613 | ||
614 | sr_info("logic: setting samplerate to %" PRIu64 " Hz (divider %d)", | |
615 | samplerate, divider); | |
616 | ||
617 | buf[0] = (new_saleae_logic_firmware) ? 0xd5 : 0x01; | |
618 | buf[1] = divider; | |
619 | ret = libusb_bulk_transfer(ctx->usb->devhdl, 1 | LIBUSB_ENDPOINT_OUT, | |
620 | buf, 2, &result, 500); | |
621 | if (ret != 0) { | |
622 | sr_err("logic: failed to set samplerate: %d", ret); | |
623 | return SR_ERR; | |
624 | } | |
625 | ctx->cur_samplerate = samplerate; | |
626 | ||
627 | return SR_OK; | |
628 | } | |
629 | ||
630 | static int hw_dev_config_set(int dev_index, int hwcap, void *value) | |
631 | { | |
632 | struct sr_dev_inst *sdi; | |
633 | struct context *ctx; | |
634 | int ret; | |
635 | ||
636 | if (!(sdi = sr_dev_inst_get(dev_insts, dev_index))) | |
637 | return SR_ERR; | |
638 | ctx = sdi->priv; | |
639 | ||
640 | if (hwcap == SR_HWCAP_SAMPLERATE) { | |
641 | ret = set_samplerate(sdi, *(uint64_t *)value); | |
642 | } else if (hwcap == SR_HWCAP_PROBECONFIG) { | |
643 | ret = configure_probes(ctx, (GSList *) value); | |
644 | } else if (hwcap == SR_HWCAP_LIMIT_SAMPLES) { | |
645 | ctx->limit_samples = *(uint64_t *)value; | |
646 | ret = SR_OK; | |
647 | } else { | |
648 | ret = SR_ERR; | |
649 | } | |
650 | ||
651 | return ret; | |
652 | } | |
653 | ||
654 | static int receive_data(int fd, int revents, void *user_data) | |
655 | { | |
656 | struct timeval tv; | |
657 | ||
658 | /* Avoid compiler warnings. */ | |
659 | (void)fd; | |
660 | (void)revents; | |
661 | (void)user_data; | |
662 | ||
663 | tv.tv_sec = tv.tv_usec = 0; | |
664 | libusb_handle_events_timeout(usb_context, &tv); | |
665 | ||
666 | return TRUE; | |
667 | } | |
668 | ||
669 | static void receive_transfer(struct libusb_transfer *transfer) | |
670 | { | |
671 | /* TODO: These statics have to move to the ctx struct. */ | |
672 | static int num_samples = 0; | |
673 | static int empty_transfer_count = 0; | |
674 | struct sr_datafeed_packet packet; | |
675 | struct sr_datafeed_logic logic; | |
676 | struct context *ctx; | |
677 | int cur_buflen, trigger_offset, i; | |
678 | unsigned char *cur_buf, *new_buf; | |
679 | ||
680 | /* hw_dev_acquisition_stop() is telling us to stop. */ | |
681 | if (transfer == NULL) | |
682 | num_samples = -1; | |
683 | ||
684 | /* | |
685 | * If acquisition has already ended, just free any queued up | |
686 | * transfer that come in. | |
687 | */ | |
688 | if (num_samples == -1) { | |
689 | if (transfer) | |
690 | libusb_free_transfer(transfer); | |
691 | return; | |
692 | } | |
693 | ||
694 | sr_info("logic: receive_transfer(): status %d received %d bytes", | |
695 | transfer->status, transfer->actual_length); | |
696 | ||
697 | /* Save incoming transfer before reusing the transfer struct. */ | |
698 | cur_buf = transfer->buffer; | |
699 | cur_buflen = transfer->actual_length; | |
700 | ctx = transfer->user_data; | |
701 | ||
702 | /* Fire off a new request. */ | |
703 | if (!(new_buf = g_try_malloc(4096))) { | |
704 | sr_err("logic: %s: new_buf malloc failed", __func__); | |
705 | return; /* TODO: SR_ERR_MALLOC */ | |
706 | } | |
707 | ||
708 | transfer->buffer = new_buf; | |
709 | transfer->length = 4096; | |
710 | if (libusb_submit_transfer(transfer) != 0) { | |
711 | /* TODO: Stop session? */ | |
712 | /* TODO: Better error message. */ | |
713 | sr_err("logic: %s: libusb_submit_transfer error", __func__); | |
714 | } | |
715 | ||
716 | if (cur_buflen == 0) { | |
717 | empty_transfer_count++; | |
718 | if (empty_transfer_count > MAX_EMPTY_TRANSFERS) { | |
719 | /* | |
720 | * The FX2 gave up. End the acquisition, the frontend | |
721 | * will work out that the samplecount is short. | |
722 | */ | |
723 | hw_dev_acquisition_stop(-1, ctx->session_data); | |
724 | } | |
725 | return; | |
726 | } else { | |
727 | empty_transfer_count = 0; | |
728 | } | |
729 | ||
730 | trigger_offset = 0; | |
731 | if (ctx->trigger_stage >= 0) { | |
732 | for (i = 0; i < cur_buflen; i++) { | |
733 | ||
734 | if ((cur_buf[i] & ctx->trigger_mask[ctx->trigger_stage]) == ctx->trigger_value[ctx->trigger_stage]) { | |
735 | /* Match on this trigger stage. */ | |
736 | ctx->trigger_buffer[ctx->trigger_stage] = cur_buf[i]; | |
737 | ctx->trigger_stage++; | |
738 | ||
739 | if (ctx->trigger_stage == NUM_TRIGGER_STAGES || ctx->trigger_mask[ctx->trigger_stage] == 0) { | |
740 | /* Match on all trigger stages, we're done. */ | |
741 | trigger_offset = i + 1; | |
742 | ||
743 | /* | |
744 | * TODO: Send pre-trigger buffer to session bus. | |
745 | * Tell the frontend we hit the trigger here. | |
746 | */ | |
747 | packet.type = SR_DF_TRIGGER; | |
748 | packet.payload = NULL; | |
749 | sr_session_bus(ctx->session_data, &packet); | |
750 | ||
751 | /* | |
752 | * Send the samples that triggered it, since we're | |
753 | * skipping past them. | |
754 | */ | |
755 | packet.type = SR_DF_LOGIC; | |
756 | packet.payload = &logic; | |
757 | logic.length = ctx->trigger_stage; | |
758 | logic.unitsize = 1; | |
759 | logic.data = ctx->trigger_buffer; | |
760 | sr_session_bus(ctx->session_data, &packet); | |
761 | ||
762 | ctx->trigger_stage = TRIGGER_FIRED; | |
763 | break; | |
764 | } | |
765 | return; | |
766 | } | |
767 | ||
768 | /* | |
769 | * We had a match before, but not in the next sample. However, we may | |
770 | * have a match on this stage in the next bit -- trigger on 0001 will | |
771 | * fail on seeing 00001, so we need to go back to stage 0 -- but at | |
772 | * the next sample from the one that matched originally, which the | |
773 | * counter increment at the end of the loop takes care of. | |
774 | */ | |
775 | if (ctx->trigger_stage > 0) { | |
776 | i -= ctx->trigger_stage; | |
777 | if (i < -1) | |
778 | i = -1; /* Oops, went back past this buffer. */ | |
779 | /* Reset trigger stage. */ | |
780 | ctx->trigger_stage = 0; | |
781 | } | |
782 | } | |
783 | } | |
784 | ||
785 | if (ctx->trigger_stage == TRIGGER_FIRED) { | |
786 | /* Send the incoming transfer to the session bus. */ | |
787 | packet.type = SR_DF_LOGIC; | |
788 | packet.payload = &logic; | |
789 | logic.length = cur_buflen - trigger_offset; | |
790 | logic.unitsize = 1; | |
791 | logic.data = cur_buf + trigger_offset; | |
792 | sr_session_bus(ctx->session_data, &packet); | |
793 | g_free(cur_buf); | |
794 | ||
795 | num_samples += cur_buflen; | |
796 | if (ctx->limit_samples && (unsigned int) num_samples > ctx->limit_samples) { | |
797 | hw_dev_acquisition_stop(-1, ctx->session_data); | |
798 | } | |
799 | } else { | |
800 | /* | |
801 | * TODO: Buffer pre-trigger data in capture | |
802 | * ratio-sized buffer. | |
803 | */ | |
804 | } | |
805 | } | |
806 | ||
807 | static int hw_dev_acquisition_start(int dev_index, gpointer session_data) | |
808 | { | |
809 | struct sr_dev_inst *sdi; | |
810 | struct sr_datafeed_packet *packet; | |
811 | struct sr_datafeed_header *header; | |
812 | struct context *ctx; | |
813 | struct libusb_transfer *transfer; | |
814 | const struct libusb_pollfd **lupfd; | |
815 | int size, i; | |
816 | unsigned char *buf; | |
817 | ||
818 | if (!(sdi = sr_dev_inst_get(dev_insts, dev_index))) | |
819 | return SR_ERR; | |
820 | ctx = sdi->priv; | |
821 | ctx->session_data = session_data; | |
822 | ||
823 | if (!(packet = g_try_malloc(sizeof(struct sr_datafeed_packet)))) { | |
824 | sr_err("logic: %s: packet malloc failed", __func__); | |
825 | return SR_ERR_MALLOC; | |
826 | } | |
827 | ||
828 | if (!(header = g_try_malloc(sizeof(struct sr_datafeed_header)))) { | |
829 | sr_err("logic: %s: header malloc failed", __func__); | |
830 | return SR_ERR_MALLOC; | |
831 | } | |
832 | ||
833 | /* Start with 2K transfer, subsequently increased to 4K. */ | |
834 | size = 2048; | |
835 | for (i = 0; i < NUM_SIMUL_TRANSFERS; i++) { | |
836 | if (!(buf = g_try_malloc(size))) { | |
837 | sr_err("logic: %s: buf malloc failed", __func__); | |
838 | return SR_ERR_MALLOC; | |
839 | } | |
840 | transfer = libusb_alloc_transfer(0); | |
841 | libusb_fill_bulk_transfer(transfer, ctx->usb->devhdl, | |
842 | 2 | LIBUSB_ENDPOINT_IN, buf, size, | |
843 | receive_transfer, ctx, 40); | |
844 | if (libusb_submit_transfer(transfer) != 0) { | |
845 | /* TODO: Free them all. */ | |
846 | libusb_free_transfer(transfer); | |
847 | g_free(buf); | |
848 | return SR_ERR; | |
849 | } | |
850 | size = 4096; | |
851 | } | |
852 | ||
853 | lupfd = libusb_get_pollfds(usb_context); | |
854 | for (i = 0; lupfd[i]; i++) | |
855 | sr_source_add(lupfd[i]->fd, lupfd[i]->events, 40, receive_data, | |
856 | NULL); | |
857 | free(lupfd); /* NOT g_free()! */ | |
858 | ||
859 | packet->type = SR_DF_HEADER; | |
860 | packet->payload = header; | |
861 | header->feed_version = 1; | |
862 | gettimeofday(&header->starttime, NULL); | |
863 | header->samplerate = ctx->cur_samplerate; | |
864 | header->num_logic_probes = ctx->profile->num_probes; | |
865 | sr_session_bus(session_data, packet); | |
866 | g_free(header); | |
867 | g_free(packet); | |
868 | ||
869 | return SR_OK; | |
870 | } | |
871 | ||
872 | /* This stops acquisition on ALL devices, ignoring dev_index. */ | |
873 | static int hw_dev_acquisition_stop(int dev_index, gpointer session_data) | |
874 | { | |
875 | struct sr_datafeed_packet packet; | |
876 | ||
877 | /* Avoid compiler warnings. */ | |
878 | (void)dev_index; | |
879 | ||
880 | packet.type = SR_DF_END; | |
881 | sr_session_bus(session_data, &packet); | |
882 | ||
883 | receive_transfer(NULL); | |
884 | ||
885 | /* TODO: Need to cancel and free any queued up transfers. */ | |
886 | ||
887 | return SR_OK; | |
888 | } | |
889 | ||
890 | SR_PRIV struct sr_dev_plugin saleae_logic_plugin_info = { | |
891 | .name = "saleae-logic", | |
892 | .longname = "Saleae Logic", | |
893 | .api_version = 1, | |
894 | .init = hw_init, | |
895 | .cleanup = hw_cleanup, | |
896 | .dev_open = hw_dev_open, | |
897 | .dev_close = hw_dev_close, | |
898 | .dev_info_get = hw_dev_info_get, | |
899 | .dev_status_get = hw_dev_status_get, | |
900 | .hwcap_get_all = hw_hwcap_get_all, | |
901 | .dev_config_set = hw_dev_config_set, | |
902 | .dev_acquisition_start = hw_dev_acquisition_start, | |
903 | .dev_acquisition_stop = hw_dev_acquisition_stop, | |
904 | }; |