]> sigrok.org Git - libsigrok.git/blob - hardware/zeroplus-logic-cube/api.c
637f22ce93f3896cf18e42fa5ede69e48f3cf547
[libsigrok.git] / hardware / zeroplus-logic-cube / api.c
1 /*
2  * This file is part of the libsigrok 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 "protocol.h"
21
22 #define VENDOR_NAME                     "ZEROPLUS"
23 #define USB_INTERFACE                   0
24 #define USB_CONFIGURATION               1
25 #define NUM_TRIGGER_STAGES              4
26 #define TRIGGER_TYPE                    "01"
27 #define PACKET_SIZE                     2048    /* ?? */
28
29 //#define ZP_EXPERIMENTAL
30
31 struct zp_model {
32         uint16_t vid;
33         uint16_t pid;
34         char *model_name;
35         unsigned int channels;
36         unsigned int sample_depth;      /* In Ksamples/channel */
37         unsigned int max_sampling_freq;
38 };
39
40 /*
41  * Note -- 16032, 16064 and 16128 *usually* -- but not always -- have the
42  * same 128K sample depth.
43  */
44 static const struct zp_model zeroplus_models[] = {
45         {0x0c12, 0x7002, "LAP-16128U",    16, 128,  200},
46         {0x0c12, 0x7009, "LAP-C(16064)",  16, 64,   100},
47         {0x0c12, 0x700a, "LAP-C(16128)",  16, 128,  200},
48         /* TODO: We don't know anything about these.
49         {0x0c12, 0x700b, "LAP-C(32128)",  32, 128,  200},
50         {0x0c12, 0x700c, "LAP-C(321000)", 32, 1024, 200},
51         {0x0c12, 0x700d, "LAP-C(322000)", 32, 2048, 200},
52         */
53         {0x0c12, 0x700e, "LAP-C(16032)",  16, 32,   100},
54         {0x0c12, 0x7016, "LAP-C(162000)", 16, 2048, 200},
55         { 0, 0, 0, 0, 0, 0 }
56 };
57
58 static const int32_t hwcaps[] = {
59         SR_CONF_LOGIC_ANALYZER,
60         SR_CONF_SAMPLERATE,
61         SR_CONF_CAPTURE_RATIO,
62         SR_CONF_LIMIT_SAMPLES,
63 };
64
65 /*
66  * ZEROPLUS LAP-C (16032) numbers the 16 probes A0-A7 and B0-B7.
67  * We currently ignore other untested/unsupported devices here.
68  */
69 static const char *probe_names[] = {
70         "A0", "A1", "A2", "A3", "A4", "A5", "A6", "A7",
71         "B0", "B1", "B2", "B3", "B4", "B5", "B6", "B7",
72         NULL,
73 };
74
75 SR_PRIV struct sr_dev_driver zeroplus_logic_cube_driver_info;
76 static struct sr_dev_driver *di = &zeroplus_logic_cube_driver_info;
77
78 /*
79  * The hardware supports more samplerates than these, but these are the
80  * options hardcoded into the vendor's Windows GUI.
81  */
82
83 static const uint64_t samplerates_100[] = {
84         SR_HZ(100),
85         SR_HZ(500),
86         SR_KHZ(1),
87         SR_KHZ(5),
88         SR_KHZ(25),
89         SR_KHZ(50),
90         SR_KHZ(100),
91         SR_KHZ(200),
92         SR_KHZ(400),
93         SR_KHZ(800),
94         SR_MHZ(1),
95         SR_MHZ(10),
96         SR_MHZ(25),
97         SR_MHZ(50),
98         SR_MHZ(80),
99         SR_MHZ(100),
100 };
101
102 const uint64_t samplerates_200[] = {
103         SR_HZ(100),
104         SR_HZ(500),
105         SR_KHZ(1),
106         SR_KHZ(5),
107         SR_KHZ(25),
108         SR_KHZ(50),
109         SR_KHZ(100),
110         SR_KHZ(200),
111         SR_KHZ(400),
112         SR_KHZ(800),
113         SR_MHZ(1),
114         SR_MHZ(10),
115         SR_MHZ(25),
116         SR_MHZ(50),
117         SR_MHZ(80),
118         SR_MHZ(100),
119         SR_MHZ(150),
120         SR_MHZ(200),
121 };
122
123 static int dev_close(struct sr_dev_inst *sdi);
124
125 #if 0
126 static int configure_probes(const struct sr_dev_inst *sdi)
127 {
128         struct dev_context *devc;
129         const struct sr_probe *probe;
130         const GSList *l;
131         int probe_bit, stage, i;
132         char *tc;
133
134         /* Note: sdi and sdi->priv are non-NULL, the caller checked this. */
135         devc = sdi->priv;
136
137         devc->probe_mask = 0;
138         for (i = 0; i < NUM_TRIGGER_STAGES; i++) {
139                 devc->trigger_mask[i] = 0;
140                 devc->trigger_value[i] = 0;
141         }
142
143         stage = -1;
144         for (l = sdi->probes; l; l = l->next) {
145                 probe = (struct sr_probe *)l->data;
146                 if (probe->enabled == FALSE)
147                         continue;
148                 probe_bit = 1 << (probe->index);
149                 devc->probe_mask |= probe_bit;
150
151                 if (probe->trigger) {
152                         stage = 0;
153                         for (tc = probe->trigger; *tc; tc++) {
154                                 devc->trigger_mask[stage] |= probe_bit;
155                                 if (*tc == '1')
156                                         devc->trigger_value[stage] |= probe_bit;
157                                 stage++;
158                                 if (stage > NUM_TRIGGER_STAGES)
159                                         return SR_ERR;
160                         }
161                 }
162         }
163
164         return SR_OK;
165 }
166 #endif
167
168 static int configure_probes(const struct sr_dev_inst *sdi)
169 {
170         struct dev_context *devc;
171         const GSList *l;
172         const struct sr_probe *probe;
173         char *tc;
174         int type;
175
176         /* Note: sdi and sdi->priv are non-NULL, the caller checked this. */
177         devc = sdi->priv;
178
179         for (l = sdi->probes; l; l = l->next) {
180                 probe = (struct sr_probe *)l->data;
181                 if (probe->enabled == FALSE)
182                         continue;
183
184                 if ((tc = probe->trigger)) {
185                         switch (*tc) {
186                         case '1':
187                                 type = TRIGGER_HIGH;
188                                 break;
189                         case '0':
190                                 type = TRIGGER_LOW;
191                                 break;
192 #if 0
193                         case 'r':
194                                 type = TRIGGER_POSEDGE;
195                                 break;
196                         case 'f':
197                                 type = TRIGGER_NEGEDGE;
198                                 break;
199                         case 'c':
200                                 type = TRIGGER_ANYEDGE;
201                                 break;
202 #endif
203                         default:
204                                 return SR_ERR;
205                         }
206                         analyzer_add_trigger(probe->index, type);
207                         devc->trigger = 1;
208                 }
209         }
210
211         return SR_OK;
212 }
213
214 SR_PRIV int zp_set_samplerate(struct dev_context *devc, uint64_t samplerate)
215 {
216         int i;
217
218         for (i = 0; ARRAY_SIZE(samplerates_200); i++)
219                 if (samplerate == samplerates_200[i])
220                         break;
221
222         if (i == ARRAY_SIZE(samplerates_200) || samplerate > devc->max_samplerate) {
223                 sr_err("Unsupported samplerate: %" PRIu64 "Hz.", samplerate);
224                 return SR_ERR_ARG;
225         }
226
227         sr_info("Setting samplerate to %" PRIu64 "Hz.", samplerate);
228
229         if (samplerate >= SR_MHZ(1))
230                 analyzer_set_freq(samplerate / SR_MHZ(1), FREQ_SCALE_MHZ);
231         else if (samplerate >= SR_KHZ(1))
232                 analyzer_set_freq(samplerate / SR_KHZ(1), FREQ_SCALE_KHZ);
233         else
234                 analyzer_set_freq(samplerate, FREQ_SCALE_HZ);
235
236         devc->cur_samplerate = samplerate;
237
238         return SR_OK;
239 }
240
241 static int dev_clear(void)
242 {
243         return std_dev_clear(di, NULL);
244 }
245
246 static int init(struct sr_context *sr_ctx)
247 {
248         return std_init(sr_ctx, di, LOG_PREFIX);
249 }
250
251 static GSList *scan(GSList *options)
252 {
253         struct sr_dev_inst *sdi;
254         struct sr_probe *probe;
255         struct drv_context *drvc;
256         struct dev_context *devc;
257         const struct zp_model *prof;
258         struct libusb_device_descriptor des;
259         libusb_device **devlist;
260         GSList *devices;
261         int ret, devcnt, i, j;
262
263         (void)options;
264
265         drvc = di->priv;
266
267         devices = NULL;
268
269         /* Find all ZEROPLUS analyzers and add them to device list. */
270         devcnt = 0;
271         libusb_get_device_list(drvc->sr_ctx->libusb_ctx, &devlist); /* TODO: Errors. */
272
273         for (i = 0; devlist[i]; i++) {
274                 ret = libusb_get_device_descriptor(devlist[i], &des);
275                 if (ret != 0) {
276                         sr_err("Failed to get device descriptor: %s.",
277                                libusb_error_name(ret));
278                         continue;
279                 }
280
281                 prof = NULL;
282                 for (j = 0; j < zeroplus_models[j].vid; j++) {
283                         if (des.idVendor == zeroplus_models[j].vid &&
284                                 des.idProduct == zeroplus_models[j].pid) {
285                                 prof = &zeroplus_models[j];
286                         }
287                 }
288                 /* Skip if the device was not found. */
289                 if (!prof)
290                         continue;
291                 sr_info("Found ZEROPLUS %s.", prof->model_name);
292
293                 /* Register the device with libsigrok. */
294                 if (!(sdi = sr_dev_inst_new(devcnt, SR_ST_INACTIVE,
295                                 VENDOR_NAME, prof->model_name, NULL))) {
296                         sr_err("%s: sr_dev_inst_new failed", __func__);
297                         return NULL;
298                 }
299                 sdi->driver = di;
300
301                 /* Allocate memory for our private driver context. */
302                 if (!(devc = g_try_malloc0(sizeof(struct dev_context)))) {
303                         sr_err("Device context malloc failed.");
304                         return NULL;
305                 }
306
307                 sdi->priv = devc;
308                 devc->prof = prof;
309                 devc->num_channels = prof->channels;
310 #ifdef ZP_EXPERIMENTAL
311                 devc->max_memory_size = 128 * 1024;
312                 devc->max_samplerate = 200;
313 #else
314                 devc->max_memory_size = prof->sample_depth * 1024;
315                 devc->max_samplerate = prof->max_sampling_freq;
316 #endif
317                 devc->max_samplerate *= SR_MHZ(1);
318                 devc->memory_size = MEMORY_SIZE_8K;
319                 // memset(devc->trigger_buffer, 0, NUM_TRIGGER_STAGES);
320
321                 /* Fill in probelist according to this device's profile. */
322                 for (j = 0; j < devc->num_channels; j++) {
323                         if (!(probe = sr_probe_new(j, SR_PROBE_LOGIC, TRUE,
324                                         probe_names[j])))
325                                 return NULL;
326                         sdi->probes = g_slist_append(sdi->probes, probe);
327                 }
328
329                 devices = g_slist_append(devices, sdi);
330                 drvc->instances = g_slist_append(drvc->instances, sdi);
331                 sdi->inst_type = SR_INST_USB;
332                 sdi->conn = sr_usb_dev_inst_new(
333                         libusb_get_bus_number(devlist[i]),
334                         libusb_get_device_address(devlist[i]), NULL);
335                 devcnt++;
336
337         }
338         libusb_free_device_list(devlist, 1);
339
340         return devices;
341 }
342
343 static GSList *dev_list(void)
344 {
345         return ((struct drv_context *)(di->priv))->instances;
346 }
347
348 static int dev_open(struct sr_dev_inst *sdi)
349 {
350         struct dev_context *devc;
351         struct drv_context *drvc;
352         struct sr_usb_dev_inst *usb;
353         libusb_device **devlist, *dev;
354         struct libusb_device_descriptor des;
355         int device_count, ret, i;
356
357         drvc = di->priv;
358         usb = sdi->conn;
359
360         if (!(devc = sdi->priv)) {
361                 sr_err("%s: sdi->priv was NULL", __func__);
362                 return SR_ERR_ARG;
363         }
364
365         device_count = libusb_get_device_list(drvc->sr_ctx->libusb_ctx,
366                                               &devlist);
367         if (device_count < 0) {
368                 sr_err("Failed to retrieve device list.");
369                 return SR_ERR;
370         }
371
372         dev = NULL;
373         for (i = 0; i < device_count; i++) {
374                 if ((ret = libusb_get_device_descriptor(devlist[i], &des))) {
375                         sr_err("Failed to get device descriptor: %s.",
376                                libusb_error_name(ret));
377                         continue;
378                 }
379                 if (libusb_get_bus_number(devlist[i]) == usb->bus
380                     && libusb_get_device_address(devlist[i]) == usb->address) {
381                         dev = devlist[i];
382                         break;
383                 }
384         }
385         if (!dev) {
386                 sr_err("Device on bus %d address %d disappeared!",
387                        usb->bus, usb->address);
388                 return SR_ERR;
389         }
390
391         if (!(ret = libusb_open(dev, &(usb->devhdl)))) {
392                 sdi->status = SR_ST_ACTIVE;
393                 sr_info("Opened device %d on %d.%d interface %d.",
394                         sdi->index, usb->bus, usb->address, USB_INTERFACE);
395         } else {
396                 sr_err("Failed to open device: %s.", libusb_error_name(ret));
397                 return SR_ERR;
398         }
399
400         ret = libusb_set_configuration(usb->devhdl, USB_CONFIGURATION);
401         if (ret < 0) {
402                 sr_err("Unable to set USB configuration %d: %s.",
403                        USB_CONFIGURATION, libusb_error_name(ret));
404                 return SR_ERR;
405         }
406
407         ret = libusb_claim_interface(usb->devhdl, USB_INTERFACE);
408         if (ret != 0) {
409                 sr_err("Unable to claim interface: %s.",
410                        libusb_error_name(ret));
411                 return SR_ERR;
412         }
413
414         /* Set default configuration after power on. */
415         if (analyzer_read_status(usb->devhdl) == 0)
416                 analyzer_configure(usb->devhdl);
417
418         analyzer_reset(usb->devhdl);
419         analyzer_initialize(usb->devhdl);
420
421         //analyzer_set_memory_size(MEMORY_SIZE_512K);
422         // analyzer_set_freq(g_freq, g_freq_scale);
423         analyzer_set_trigger_count(1);
424         // analyzer_set_ramsize_trigger_address((((100 - g_pre_trigger)
425         // * get_memory_size(g_memory_size)) / 100) >> 2);
426
427 #if 0
428         if (g_double_mode == 1)
429                 analyzer_set_compression(COMPRESSION_DOUBLE);
430         else if (g_compression == 1)
431                 analyzer_set_compression(COMPRESSION_ENABLE);
432         else
433 #endif
434         analyzer_set_compression(COMPRESSION_NONE);
435
436         if (devc->cur_samplerate == 0) {
437                 /* Samplerate hasn't been set. Default to 1MHz. */
438                 analyzer_set_freq(1, FREQ_SCALE_MHZ);
439                 devc->cur_samplerate = SR_MHZ(1);
440         }
441
442         return SR_OK;
443 }
444
445 static int dev_close(struct sr_dev_inst *sdi)
446 {
447         struct sr_usb_dev_inst *usb;
448
449         usb = sdi->conn;
450
451         if (!usb->devhdl)
452                 return SR_ERR;
453
454         sr_info("Closing device %d on %d.%d interface %d.", sdi->index,
455                 usb->bus, usb->address, USB_INTERFACE);
456         libusb_release_interface(usb->devhdl, USB_INTERFACE);
457         libusb_reset_device(usb->devhdl);
458         libusb_close(usb->devhdl);
459         usb->devhdl = NULL;
460         sdi->status = SR_ST_INACTIVE;
461
462         return SR_OK;
463 }
464
465 static int cleanup(void)
466 {
467         return dev_clear();
468 }
469
470 static int config_get(int id, GVariant **data, const struct sr_dev_inst *sdi)
471 {
472         struct dev_context *devc;
473
474         switch (id) {
475         case SR_CONF_SAMPLERATE:
476                 if (sdi) {
477                         devc = sdi->priv;
478                         *data = g_variant_new_uint64(devc->cur_samplerate);
479                         sr_spew("Returning samplerate: %" PRIu64 "Hz.",
480                                 devc->cur_samplerate);
481                 } else
482                         return SR_ERR;
483                 break;
484         default:
485                 return SR_ERR_NA;
486         }
487
488         return SR_OK;
489 }
490
491 static int config_set(int id, GVariant *data, const struct sr_dev_inst *sdi)
492 {
493         struct dev_context *devc;
494
495         if (sdi->status != SR_ST_ACTIVE)
496                 return SR_ERR_DEV_CLOSED;
497
498         if (!(devc = sdi->priv)) {
499                 sr_err("%s: sdi->priv was NULL", __func__);
500                 return SR_ERR_ARG;
501         }
502
503         switch (id) {
504         case SR_CONF_SAMPLERATE:
505                 return zp_set_samplerate(devc, g_variant_get_uint64(data));
506         case SR_CONF_LIMIT_SAMPLES:
507                 return set_limit_samples(devc, g_variant_get_uint64(data));
508         case SR_CONF_CAPTURE_RATIO:
509                 return set_capture_ratio(devc, g_variant_get_uint64(data));
510         default:
511                 return SR_ERR_NA;
512         }
513
514         return SR_OK;
515 }
516
517 static int config_list(int key, GVariant **data, const struct sr_dev_inst *sdi)
518 {
519         struct dev_context *devc;
520         GVariant *gvar;
521         GVariantBuilder gvb;
522
523         switch (key) {
524         case SR_CONF_DEVICE_OPTIONS:
525                 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_INT32,
526                                 hwcaps, ARRAY_SIZE(hwcaps), sizeof(int32_t));
527                 break;
528         case SR_CONF_SAMPLERATE:
529                 devc = sdi->priv;
530                 g_variant_builder_init(&gvb, G_VARIANT_TYPE("a{sv}"));
531                 if (devc->prof->max_sampling_freq == 100) {
532                         gvar = g_variant_new_fixed_array(G_VARIANT_TYPE("t"),
533                                         samplerates_100, ARRAY_SIZE(samplerates_100),
534                                         sizeof(uint64_t));
535                 } else if (devc->prof->max_sampling_freq == 200) {
536                         gvar = g_variant_new_fixed_array(G_VARIANT_TYPE("t"),
537                                         samplerates_200, ARRAY_SIZE(samplerates_200),
538                                         sizeof(uint64_t));
539                 } else {
540                         sr_err("Internal error: Unknown max. samplerate: %d.",
541                                devc->prof->max_sampling_freq);
542                         return SR_ERR_ARG;
543                 }
544                 g_variant_builder_add(&gvb, "{sv}", "samplerates", gvar);
545                 *data = g_variant_builder_end(&gvb);
546                 break;
547         case SR_CONF_TRIGGER_TYPE:
548                 *data = g_variant_new_string(TRIGGER_TYPE);
549                 break;
550         default:
551                 return SR_ERR_NA;
552         }
553
554         return SR_OK;
555 }
556
557 static int dev_acquisition_start(const struct sr_dev_inst *sdi,
558                 void *cb_data)
559 {
560         struct dev_context *devc;
561         struct sr_usb_dev_inst *usb;
562         struct sr_datafeed_packet packet;
563         struct sr_datafeed_logic logic;
564         //uint64_t samples_read;
565         int res;
566         unsigned int packet_num, n;
567         unsigned char *buf;
568
569         if (sdi->status != SR_ST_ACTIVE)
570                 return SR_ERR_DEV_CLOSED;
571
572         if (!(devc = sdi->priv)) {
573                 sr_err("%s: sdi->priv was NULL", __func__);
574                 return SR_ERR_ARG;
575         }
576
577         if (configure_probes(sdi) != SR_OK) {
578                 sr_err("Failed to configure probes.");
579                 return SR_ERR;
580         }
581
582         usb = sdi->conn;
583
584         set_triggerbar(devc);
585
586         /* Push configured settings to device. */
587         analyzer_configure(usb->devhdl);
588
589         analyzer_start(usb->devhdl);
590         sr_info("Waiting for data.");
591         analyzer_wait_data(usb->devhdl);
592
593         sr_info("Stop address    = 0x%x.",
594                 analyzer_get_stop_address(usb->devhdl));
595         sr_info("Now address     = 0x%x.",
596                 analyzer_get_now_address(usb->devhdl));
597         sr_info("Trigger address = 0x%x.",
598                 analyzer_get_trigger_address(usb->devhdl));
599
600         /* Send header packet to the session bus. */
601         std_session_send_df_header(cb_data, LOG_PREFIX);
602
603         if (!(buf = g_try_malloc(PACKET_SIZE))) {
604                 sr_err("Packet buffer malloc failed.");
605                 return SR_ERR_MALLOC;
606         }
607
608         //samples_read = 0;
609         analyzer_read_start(usb->devhdl);
610         /* Send the incoming transfer to the session bus. */
611         n = get_memory_size(devc->memory_size);
612         if (devc->max_memory_size * 4 < n)
613                 n = devc->max_memory_size * 4;
614         for (packet_num = 0; packet_num < n / PACKET_SIZE; packet_num++) {
615                 res = analyzer_read_data(usb->devhdl, buf, PACKET_SIZE);
616                 sr_info("Tried to read %d bytes, actually read %d bytes.",
617                         PACKET_SIZE, res);
618
619                 packet.type = SR_DF_LOGIC;
620                 packet.payload = &logic;
621                 logic.length = PACKET_SIZE;
622                 logic.unitsize = 4;
623                 logic.data = buf;
624                 sr_session_send(cb_data, &packet);
625                 //samples_read += res / 4;
626         }
627         analyzer_read_stop(usb->devhdl);
628         g_free(buf);
629
630         packet.type = SR_DF_END;
631         sr_session_send(cb_data, &packet);
632
633         return SR_OK;
634 }
635
636 /* TODO: This stops acquisition on ALL devices, ignoring dev_index. */
637 static int dev_acquisition_stop(struct sr_dev_inst *sdi, void *cb_data)
638 {
639         struct dev_context *devc;
640         struct sr_usb_dev_inst *usb;
641         struct sr_datafeed_packet packet;
642
643         packet.type = SR_DF_END;
644         sr_session_send(cb_data, &packet);
645
646         if (!(devc = sdi->priv)) {
647                 sr_err("%s: sdi->priv was NULL", __func__);
648                 return SR_ERR_BUG;
649         }
650
651         usb = sdi->conn;
652         analyzer_reset(usb->devhdl);
653         /* TODO: Need to cancel and free any queued up transfers. */
654
655         return SR_OK;
656 }
657
658 SR_PRIV struct sr_dev_driver zeroplus_logic_cube_driver_info = {
659         .name = "zeroplus-logic-cube",
660         .longname = "ZEROPLUS Logic Cube LAP-C series",
661         .api_version = 1,
662         .init = init,
663         .cleanup = cleanup,
664         .scan = scan,
665         .dev_list = dev_list,
666         .dev_clear = dev_clear,
667         .config_get = config_get,
668         .config_set = config_set,
669         .config_list = config_list,
670         .dev_open = dev_open,
671         .dev_close = dev_close,
672         .dev_acquisition_start = dev_acquisition_start,
673         .dev_acquisition_stop = dev_acquisition_stop,
674         .priv = NULL,
675 };