]> sigrok.org Git - libsigrok.git/blame - hardware/kecheng-kc-330b/api.c
kecheng-kc-330b: Acquisition from stored logs
[libsigrok.git] / hardware / kecheng-kc-330b / api.c
CommitLineData
ed759a08
BV
1/*
2 * This file is part of the libsigrok project.
3 *
4 * Copyright (C) 2013 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
bc7be4a9 20#include <string.h>
ed759a08
BV
21#include "protocol.h"
22
a8806f03
BV
23#define USB_CONN "1041.8101"
24#define VENDOR "Kecheng"
25#define USB_INTERFACE 0
a8806f03
BV
26
27static const int32_t hwcaps[] = {
28 SR_CONF_SOUNDLEVELMETER,
29 SR_CONF_LIMIT_SAMPLES,
30 SR_CONF_CONTINUOUS,
bc7be4a9
BV
31 SR_CONF_DATALOG,
32 SR_CONF_SPL_WEIGHT_FREQ,
33 SR_CONF_SPL_WEIGHT_TIME,
34 SR_CONF_DATA_SOURCE,
35};
36
df035528 37SR_PRIV const uint64_t kecheng_kc_330b_sample_intervals[][2] = {
bc7be4a9
BV
38 { 1, 8 },
39 { 1, 2 },
40 { 1, 1 },
41 { 2, 1 },
42 { 5, 1 },
43 { 10, 1 },
44 { 60, 1 },
45};
46
47static const char *weight_freq[] = {
48 "A",
49 "C",
50};
51
52static const char *weight_time[] = {
53 "F",
54 "S",
55};
56
57static const char *data_sources[] = {
58 "Live",
59 "Memory",
a8806f03
BV
60};
61
ed759a08
BV
62SR_PRIV struct sr_dev_driver kecheng_kc_330b_driver_info;
63static struct sr_dev_driver *di = &kecheng_kc_330b_driver_info;
64
65
66static int init(struct sr_context *sr_ctx)
67{
68 return std_init(sr_ctx, di, LOG_PREFIX);
69}
70
a8806f03
BV
71static int scan_kecheng(struct sr_usb_dev_inst *usb, char **model)
72{
73 struct drv_context *drvc;
74 int len, ret;
75 unsigned char cmd, buf[32];
76
77 drvc = di->priv;
78 if (sr_usb_open(drvc->sr_ctx->libusb_ctx, usb) != SR_OK)
79 return SR_ERR;
80
81 cmd = CMD_IDENTIFY;
82 ret = libusb_bulk_transfer(usb->devhdl, EP_OUT, &cmd, 1, &len, 5);
83 if (ret != 0) {
84 libusb_close(usb->devhdl);
85 sr_dbg("Failed to send Identify command: %s", libusb_error_name(ret));
86 return SR_ERR;
87 }
88
89 ret = libusb_bulk_transfer(usb->devhdl, EP_IN, buf, 32, &len, 10);
90 if (ret != 0) {
91 libusb_close(usb->devhdl);
92 sr_dbg("Failed to receive response: %s", libusb_error_name(ret));
93 return SR_ERR;
94 }
95
96 libusb_close(usb->devhdl);
97 usb->devhdl = NULL;
98
99 if (len < 2 || buf[0] != (CMD_IDENTIFY | 0x80) || buf[1] > 30) {
100 sr_dbg("Invalid response to Identify command");
101 return SR_ERR;
102 }
103
104 buf[buf[1] + 2] = '\x0';
105 *model = g_strndup((const gchar *)buf + 2, 30);
a8806f03
BV
106
107 return SR_OK;
108}
109
ed759a08
BV
110static GSList *scan(GSList *options)
111{
112 struct drv_context *drvc;
a8806f03
BV
113 struct dev_context *devc;
114 struct sr_dev_inst *sdi;
115 struct sr_probe *probe;
116 GSList *usb_devices, *devices, *l;
117 char *model;
ed759a08
BV
118
119 (void)options;
120
ed759a08
BV
121 drvc = di->priv;
122 drvc->instances = NULL;
123
a8806f03
BV
124 devices = NULL;
125 if ((usb_devices = sr_usb_find(drvc->sr_ctx->libusb_ctx, USB_CONN))) {
126 /* We have a list of sr_usb_dev_inst matching the connection
127 * string. Wrap them in sr_dev_inst and we're done. */
128 for (l = usb_devices; l; l = l->next) {
129 if (scan_kecheng(l->data, &model) != SR_OK)
130 continue;
131 if (!(sdi = sr_dev_inst_new(0, SR_ST_INACTIVE, VENDOR,
132 model, NULL)))
133 return NULL;
134 g_free(model);
135 sdi->driver = di;
136 sdi->inst_type = SR_INST_USB;
137 sdi->conn = l->data;
138 if (!(probe = sr_probe_new(0, SR_PROBE_ANALOG, TRUE, "SPL")))
139 return NULL;
140 sdi->probes = g_slist_append(sdi->probes, probe);
141
142 if (!(devc = g_try_malloc(sizeof(struct dev_context)))) {
143 sr_dbg("Device context malloc failed.");
144 return NULL;
145 }
146 sdi->priv = devc;
147 devc->limit_samples = 0;
bc7be4a9
BV
148 /* The protocol provides no way to read the current
149 * settings, so we'll enforce these. */
150 devc->sample_interval = DEFAULT_SAMPLE_INTERVAL;
151 devc->alarm_low = DEFAULT_ALARM_LOW;
152 devc->alarm_high = DEFAULT_ALARM_HIGH;
153 devc->mqflags = DEFAULT_WEIGHT_TIME | DEFAULT_WEIGHT_FREQ;
154 devc->data_source = DEFAULT_DATA_SOURCE;
85ed4ab3 155 devc->config_dirty = FALSE;
bc7be4a9
BV
156
157 /* TODO: Set date/time? */
a8806f03
BV
158
159 drvc->instances = g_slist_append(drvc->instances, sdi);
160 devices = g_slist_append(devices, sdi);
161 }
162 g_slist_free(usb_devices);
163 } else
164 g_slist_free_full(usb_devices, g_free);
ed759a08
BV
165
166 return devices;
167}
168
169static GSList *dev_list(void)
170{
171 struct drv_context *drvc;
172
173 drvc = di->priv;
174
175 return drvc->instances;
176}
177
178static int dev_clear(void)
179{
180 return std_dev_clear(di, NULL);
181}
182
183static int dev_open(struct sr_dev_inst *sdi)
184{
a8806f03
BV
185 struct drv_context *drvc;
186 struct sr_usb_dev_inst *usb;
187 int ret;
188
189 if (!(drvc = di->priv)) {
190 sr_err("Driver was not initialized.");
191 return SR_ERR;
192 }
193
194 usb = sdi->conn;
ed759a08 195
a8806f03
BV
196 if (sr_usb_open(drvc->sr_ctx->libusb_ctx, usb) != SR_OK)
197 return SR_ERR;
ed759a08 198
85ed4ab3
BV
199 if ((ret = libusb_set_configuration(usb->devhdl, 1))) {
200 sr_err("Failed to set configuration: %s.", libusb_error_name(ret));
201 return SR_ERR;
202 }
203
a8806f03
BV
204 if ((ret = libusb_claim_interface(usb->devhdl, USB_INTERFACE))) {
205 sr_err("Failed to claim interface: %s.", libusb_error_name(ret));
206 return SR_ERR;
207 }
ed759a08
BV
208 sdi->status = SR_ST_ACTIVE;
209
a8806f03 210 return ret;
ed759a08
BV
211}
212
213static int dev_close(struct sr_dev_inst *sdi)
214{
85ed4ab3 215 struct dev_context *devc;
a8806f03
BV
216 struct sr_usb_dev_inst *usb;
217
218 if (!di->priv) {
219 sr_err("Driver was not initialized.");
220 return SR_ERR;
221 }
222
223 usb = sdi->conn;
ed759a08 224
a8806f03
BV
225 if (!usb->devhdl)
226 /* Nothing to do. */
227 return SR_OK;
ed759a08 228
85ed4ab3
BV
229 /* This allows a frontend to configure the device without ever
230 * doing an acquisition step. */
231 devc = sdi->priv;
232 if (!devc->config_dirty)
233 kecheng_kc_330b_configure(sdi);
234
a8806f03
BV
235 libusb_release_interface(usb->devhdl, USB_INTERFACE);
236 libusb_close(usb->devhdl);
237 usb->devhdl = NULL;
ed759a08
BV
238 sdi->status = SR_ST_INACTIVE;
239
240 return SR_OK;
241}
242
243static int cleanup(void)
244{
a8806f03
BV
245 int ret;
246 struct drv_context *drvc;
ed759a08 247
a8806f03
BV
248 if (!(drvc = di->priv))
249 /* Can get called on an unused driver, doesn't matter. */
250 return SR_OK;
ed759a08 251
a8806f03
BV
252 ret = dev_clear();
253 g_free(drvc);
254 di->priv = NULL;
255
256 return ret;
ed759a08
BV
257}
258
259static int config_get(int key, GVariant **data, const struct sr_dev_inst *sdi)
260{
a8806f03 261 struct dev_context *devc;
bc7be4a9
BV
262 GVariant *rational[2];
263 const uint64_t *si;
264 int tmp, ret;
ed759a08 265
a8806f03 266 devc = sdi->priv;
ed759a08 267 switch (key) {
a8806f03
BV
268 case SR_CONF_LIMIT_SAMPLES:
269 *data = g_variant_new_uint64(devc->limit_samples);
270 break;
bc7be4a9 271 case SR_CONF_SAMPLE_INTERVAL:
df035528 272 si = kecheng_kc_330b_sample_intervals[devc->sample_interval];
bc7be4a9
BV
273 rational[0] = g_variant_new_uint64(si[0]);
274 rational[1] = g_variant_new_uint64(si[1]);
275 *data = g_variant_new_tuple(rational, 2);
276 break;
277 case SR_CONF_DATALOG:
85ed4ab3
BV
278 /* There really isn't a way to be sure the device is logging. */
279 return SR_ERR_NA;
bc7be4a9
BV
280 break;
281 case SR_CONF_SPL_WEIGHT_FREQ:
282 if (devc->mqflags & SR_MQFLAG_SPL_FREQ_WEIGHT_A)
283 *data = g_variant_new_string("A");
284 else
285 *data = g_variant_new_string("C");
286 break;
287 case SR_CONF_SPL_WEIGHT_TIME:
288 if (devc->mqflags & SR_MQFLAG_SPL_TIME_WEIGHT_F)
289 *data = g_variant_new_string("F");
290 else
291 *data = g_variant_new_string("S");
292 break;
293 case SR_CONF_DATA_SOURCE:
294 if (devc->data_source == DATA_SOURCE_LIVE)
295 *data = g_variant_new_string("Live");
296 else
297 *data = g_variant_new_string("Memory");
298 break;
ed759a08
BV
299 default:
300 return SR_ERR_NA;
301 }
302
a8806f03 303 return SR_OK;
ed759a08
BV
304}
305
306static int config_set(int key, GVariant *data, const struct sr_dev_inst *sdi)
307{
a8806f03 308 struct dev_context *devc;
bc7be4a9
BV
309 uint64_t p, q;
310 unsigned int i;
311 int tmp, ret;
312 const char *tmp_str;
ed759a08 313
ed759a08
BV
314 if (sdi->status != SR_ST_ACTIVE)
315 return SR_ERR_DEV_CLOSED;
316
a8806f03
BV
317 if (!di->priv) {
318 sr_err("Driver was not initialized.");
319 return SR_ERR;
320 }
321
322 devc = sdi->priv;
ed759a08
BV
323 ret = SR_OK;
324 switch (key) {
a8806f03
BV
325 case SR_CONF_LIMIT_SAMPLES:
326 devc->limit_samples = g_variant_get_uint64(data);
327 sr_dbg("Setting sample limit to %" PRIu64 ".",
328 devc->limit_samples);
329 break;
bc7be4a9
BV
330 case SR_CONF_SAMPLE_INTERVAL:
331 g_variant_get(data, "(tt)", &p, &q);
df035528
BV
332 for (i = 0; i < ARRAY_SIZE(kecheng_kc_330b_sample_intervals); i++) {
333 if (kecheng_kc_330b_sample_intervals[i][0] != p || kecheng_kc_330b_sample_intervals[i][1] != q)
bc7be4a9
BV
334 continue;
335 devc->sample_interval = i;
85ed4ab3 336 devc->config_dirty = TRUE;
bc7be4a9
BV
337 break;
338 }
df035528 339 if (i == ARRAY_SIZE(kecheng_kc_330b_sample_intervals))
bc7be4a9
BV
340 ret = SR_ERR_ARG;
341 break;
342 case SR_CONF_SPL_WEIGHT_FREQ:
343 tmp_str = g_variant_get_string(data, NULL);
344 if (!strcmp(tmp_str, "A"))
345 tmp = SR_MQFLAG_SPL_FREQ_WEIGHT_A;
346 else if (!strcmp(tmp_str, "C"))
347 tmp = SR_MQFLAG_SPL_FREQ_WEIGHT_C;
348 else
349 return SR_ERR_ARG;
350 devc->mqflags &= ~(SR_MQFLAG_SPL_FREQ_WEIGHT_A | SR_MQFLAG_SPL_FREQ_WEIGHT_C);
351 devc->mqflags |= tmp;
85ed4ab3 352 devc->config_dirty = TRUE;
bc7be4a9
BV
353 break;
354 case SR_CONF_SPL_WEIGHT_TIME:
355 tmp_str = g_variant_get_string(data, NULL);
356 if (!strcmp(tmp_str, "F"))
357 tmp = SR_MQFLAG_SPL_TIME_WEIGHT_F;
358 else if (!strcmp(tmp_str, "S"))
359 tmp = SR_MQFLAG_SPL_TIME_WEIGHT_S;
360 else
361 return SR_ERR_ARG;
362 devc->mqflags &= ~(SR_MQFLAG_SPL_TIME_WEIGHT_F | SR_MQFLAG_SPL_TIME_WEIGHT_S);
363 devc->mqflags |= tmp;
85ed4ab3 364 devc->config_dirty = TRUE;
bc7be4a9
BV
365 break;
366 case SR_CONF_DATA_SOURCE:
367 tmp_str = g_variant_get_string(data, NULL);
368 if (!strcmp(tmp_str, "Live"))
369 devc->data_source = DATA_SOURCE_LIVE;
370 else if (!strcmp(tmp_str, "Memory"))
371 devc->data_source = DATA_SOURCE_MEMORY;
372 else
373 return SR_ERR;
85ed4ab3 374 devc->config_dirty = TRUE;
bc7be4a9 375 break;
ed759a08
BV
376 default:
377 ret = SR_ERR_NA;
378 }
379
380 return ret;
381}
382
383static int config_list(int key, GVariant **data, const struct sr_dev_inst *sdi)
384{
bc7be4a9
BV
385 GVariant *tuple, *rational[2];
386 GVariantBuilder gvb;
387 unsigned int i;
ed759a08
BV
388
389 (void)sdi;
ed759a08 390
ed759a08 391 switch (key) {
a8806f03
BV
392 case SR_CONF_DEVICE_OPTIONS:
393 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_INT32,
394 hwcaps, ARRAY_SIZE(hwcaps), sizeof(int32_t));
395 break;
bc7be4a9
BV
396 case SR_CONF_SAMPLE_INTERVAL:
397 g_variant_builder_init(&gvb, G_VARIANT_TYPE_ARRAY);
df035528
BV
398 for (i = 0; i < ARRAY_SIZE(kecheng_kc_330b_sample_intervals); i++) {
399 rational[0] = g_variant_new_uint64(kecheng_kc_330b_sample_intervals[i][0]);
400 rational[1] = g_variant_new_uint64(kecheng_kc_330b_sample_intervals[i][1]);
bc7be4a9
BV
401 tuple = g_variant_new_tuple(rational, 2);
402 g_variant_builder_add_value(&gvb, tuple);
403 }
404 *data = g_variant_builder_end(&gvb);
405 break;
406 case SR_CONF_SPL_WEIGHT_FREQ:
407 *data = g_variant_new_strv(weight_freq, ARRAY_SIZE(weight_freq));
408 break;
409 case SR_CONF_SPL_WEIGHT_TIME:
410 *data = g_variant_new_strv(weight_time, ARRAY_SIZE(weight_time));
411 break;
412 case SR_CONF_DATA_SOURCE:
413 *data = g_variant_new_strv(data_sources, ARRAY_SIZE(data_sources));
414 break;
ed759a08
BV
415 default:
416 return SR_ERR_NA;
417 }
418
a8806f03 419 return SR_OK;
ed759a08
BV
420}
421
422static int dev_acquisition_start(const struct sr_dev_inst *sdi,
85ed4ab3 423 void *cb_data)
ed759a08 424{
bc7be4a9
BV
425 struct drv_context *drvc;
426 struct dev_context *devc;
85ed4ab3
BV
427 struct sr_datafeed_packet packet;
428 struct sr_datafeed_meta meta;
429 struct sr_config *src;
bc7be4a9 430 struct sr_usb_dev_inst *usb;
85ed4ab3 431 GVariant *gvar, *rational[2];
bc7be4a9 432 const struct libusb_pollfd **pfd;
85ed4ab3
BV
433 const uint64_t *si;
434 int stored_mqflags, req_len, buf_len, len, ret, i;
435 unsigned char buf[9];
ed759a08
BV
436
437 if (sdi->status != SR_ST_ACTIVE)
438 return SR_ERR_DEV_CLOSED;
439
bc7be4a9
BV
440 drvc = di->priv;
441 devc = sdi->priv;
442 usb = sdi->conn;
443
444 devc->cb_data = cb_data;
445 devc->num_samples = 0;
446
85ed4ab3
BV
447 /* Send header packet to the session bus. */
448 std_session_send_df_header(cb_data, LOG_PREFIX);
449
f336618c 450 if (devc->data_source == DATA_SOURCE_LIVE) {
85ed4ab3
BV
451 /* Force configuration. */
452 kecheng_kc_330b_configure(sdi);
453
f336618c
BV
454 if (kecheng_kc_330b_status_get(sdi, &ret) != SR_OK)
455 return SR_ERR;
f336618c
BV
456 if (ret != DEVICE_ACTIVE) {
457 sr_err("Device is inactive");
458 /* Still continue though, since the device will
459 * just return 30.0 until the user hits the button
460 * on the device -- and then start feeding good
461 * samples back. */
462 }
85ed4ab3
BV
463 } else {
464 if (kecheng_kc_330b_log_info_get(sdi, buf) != SR_OK)
465 return SR_ERR;
466 stored_mqflags = buf[4] ? SR_MQFLAG_SPL_TIME_WEIGHT_S : SR_MQFLAG_SPL_TIME_WEIGHT_F;
467 stored_mqflags |= buf[5] ? SR_MQFLAG_SPL_FREQ_WEIGHT_C : SR_MQFLAG_SPL_FREQ_WEIGHT_A;
468 devc->stored_samples = (buf[7] << 8) | buf[8];
469 if (devc->stored_samples == 0) {
470 /* Notify frontend of empty log by sending start/end packets. */
471 packet.type = SR_DF_END;
472 sr_session_send(cb_data, &packet);
473 return SR_OK;
474 }
475
476 if (devc->limit_samples && devc->limit_samples < devc->stored_samples)
477 devc->stored_samples = devc->limit_samples;
478
479 si = kecheng_kc_330b_sample_intervals[buf[1]];
480 rational[0] = g_variant_new_uint64(si[0]);
481 rational[1] = g_variant_new_uint64(si[1]);
482 gvar = g_variant_new_tuple(rational, 2);
483 src = sr_config_new(SR_CONF_SAMPLE_INTERVAL, gvar);
484 packet.type = SR_DF_META;
485 packet.payload = &meta;
486 meta.config = g_slist_append(NULL, src);
487 sr_session_send(devc->cb_data, &packet);
488 g_free(src);
f336618c
BV
489 }
490
df035528
BV
491 if (!(devc->xfer = libusb_alloc_transfer(0)))
492 return SR_ERR;
493
bc7be4a9
BV
494 pfd = libusb_get_pollfds(drvc->sr_ctx->libusb_ctx);
495 for (i = 0; pfd[i]; i++) {
df035528
BV
496 /* Handle USB events every 10ms. */
497 sr_source_add(pfd[i]->fd, pfd[i]->events, 10,
bc7be4a9
BV
498 kecheng_kc_330b_handle_events, (void *)sdi);
499 /* We'll need to remove this fd later. */
500 devc->usbfd[i] = pfd[i]->fd;
501 }
502 devc->usbfd[i] = -1;
503
85ed4ab3
BV
504 if (devc->data_source == DATA_SOURCE_LIVE) {
505 buf[0] = CMD_GET_LIVE_SPL;
506 buf_len = 1;
507 devc->state = LIVE_SPL_WAIT;
508 devc->last_live_request = g_get_monotonic_time() / 1000;
509 req_len = 3;
510 } else {
511 buf[0] = CMD_GET_LOG_DATA;
512 buf[1] = 0;
513 buf[2] = 0;
514 buf_len = 4;
515 devc->state = LOG_DATA_WAIT;
516 if (devc->stored_samples < 63)
517 buf[3] = devc->stored_samples;
518 else
519 buf[3] = 63;
520 /* Command ack byte + 2 bytes per sample. */
521 req_len = 1 + buf[3] * 2;
522 }
523
524 ret = libusb_bulk_transfer(usb->devhdl, EP_OUT, buf, buf_len, &len, 5);
bc7be4a9
BV
525 if (ret != 0 || len != 1) {
526 sr_dbg("Failed to start acquisition: %s", libusb_error_name(ret));
df035528
BV
527 libusb_free_transfer(devc->xfer);
528 return SR_ERR;
529 }
df035528
BV
530
531 libusb_fill_bulk_transfer(devc->xfer, usb->devhdl, EP_IN, devc->buf,
85ed4ab3 532 req_len, kecheng_kc_330b_receive_transfer, (void *)sdi, 15);
df035528
BV
533 if (libusb_submit_transfer(devc->xfer) != 0) {
534 libusb_free_transfer(devc->xfer);
bc7be4a9
BV
535 return SR_ERR;
536 }
ed759a08
BV
537
538 return SR_OK;
539}
540
541static int dev_acquisition_stop(struct sr_dev_inst *sdi, void *cb_data)
542{
85ed4ab3
BV
543 struct dev_context *devc;
544
ed759a08
BV
545 (void)cb_data;
546
547 if (sdi->status != SR_ST_ACTIVE)
548 return SR_ERR_DEV_CLOSED;
549
df035528
BV
550 /* Signal USB transfer handler to clean up and stop. */
551 sdi->status = SR_ST_STOPPING;
ed759a08 552
85ed4ab3
BV
553 devc = sdi->priv;
554 if (devc->data_source == DATA_SOURCE_MEMORY && devc->config_dirty) {
555 /* The protocol doesn't have a command to clear stored data;
556 * it clears it whenever new configuration is set. That means
557 * we can't just configure the device any time we want when
558 * it's in DATA_SOURCE_MEMORY mode. The only safe time to do
559 * it is now, when we're sure we've pulled in all the stored
560 * data. */
561 kecheng_kc_330b_configure(sdi);
562 }
563
ed759a08
BV
564 return SR_OK;
565}
566
567SR_PRIV struct sr_dev_driver kecheng_kc_330b_driver_info = {
568 .name = "kecheng-kc-330b",
569 .longname = "Kecheng KC-330B",
570 .api_version = 1,
571 .init = init,
572 .cleanup = cleanup,
573 .scan = scan,
574 .dev_list = dev_list,
575 .dev_clear = dev_clear,
576 .config_get = config_get,
577 .config_set = config_set,
578 .config_list = config_list,
579 .dev_open = dev_open,
580 .dev_close = dev_close,
581 .dev_acquisition_start = dev_acquisition_start,
582 .dev_acquisition_stop = dev_acquisition_stop,
583 .priv = NULL,
584};