2 * This file is part of the sigrok project.
4 * Copyright (C) 2012 Bert Vermeulen <bert@biot.com>
5 * Copyright (C) 2012 Alexandru Gagniuc <mr.nuke.me@gmail.com>
6 * Copyright (C) 2012 Uwe Hermann <uwe@hermann-uwe.de>
8 * This program is free software: you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation, either version 3 of the License, or
11 * (at your option) any later version.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program. If not, see <http://www.gnu.org/licenses/>.
23 #include <sys/types.h>
28 #include "libsigrok.h"
29 #include "libsigrok-internal.h"
32 static const int hwopts[] = {
38 static const int hwcaps[] = {
40 SR_HWCAP_LIMIT_SAMPLES,
45 static const char *probe_names[] = {
50 SR_PRIV struct sr_dev_driver digitek_dt4000zc_driver_info;
51 SR_PRIV struct sr_dev_driver tekpower_tp4000zc_driver_info;
52 SR_PRIV struct sr_dev_driver metex_me31_driver_info;
53 SR_PRIV struct sr_dev_driver peaktech_3410_driver_info;
54 SR_PRIV struct sr_dev_driver mastech_mas345_driver_info;
55 SR_PRIV struct sr_dev_driver va_va18b_driver_info;
56 SR_PRIV struct sr_dev_driver metex_m3640d_driver_info;
58 static struct sr_dev_driver *di_dt4000zc = &digitek_dt4000zc_driver_info;
59 static struct sr_dev_driver *di_tp4000zc = &tekpower_tp4000zc_driver_info;
60 static struct sr_dev_driver *di_me31 = &metex_me31_driver_info;
61 static struct sr_dev_driver *di_3410 = &peaktech_3410_driver_info;
62 static struct sr_dev_driver *di_mas345 = &mastech_mas345_driver_info;
63 static struct sr_dev_driver *di_va18b = &va_va18b_driver_info;
64 static struct sr_dev_driver *di_m3640d = &metex_m3640d_driver_info;
66 /* After hw_init() this will point to a device-specific entry (see above). */
67 static struct sr_dev_driver *di = NULL;
69 SR_PRIV struct dmm_info dmms[] = {
71 "Digitek", "DT4000ZC", "2400/8n1", 2400,
72 FS9721_PACKET_SIZE, NULL,
73 sr_fs9721_packet_valid, sr_fs9721_parse,
77 "TekPower", "TP4000ZC", "2400/8n1", 2400,
78 FS9721_PACKET_SIZE, NULL,
79 sr_fs9721_packet_valid, sr_fs9721_parse,
83 "Metex", "ME-31", "600/7n2/rts=0/dtr=1", 600,
84 METEX14_PACKET_SIZE, sr_metex14_packet_request,
85 sr_metex14_packet_valid, sr_metex14_parse,
89 "Peaktech", "3410", "600/7n2/rts=0/dtr=1", 600,
90 METEX14_PACKET_SIZE, sr_metex14_packet_request,
91 sr_metex14_packet_valid, sr_metex14_parse,
95 "MASTECH", "MAS345", "600/7n2/rts=0/dtr=1", 600,
96 METEX14_PACKET_SIZE, sr_metex14_packet_request,
97 sr_metex14_packet_valid, sr_metex14_parse,
101 "V&A", "VA18B", "2400/8n1", 2400,
102 FS9721_PACKET_SIZE, NULL,
103 sr_fs9721_packet_valid, sr_fs9721_parse,
107 "Metex", "M-3640D", "1200/7n2/rts=0/dtr=1", 1200,
108 METEX14_PACKET_SIZE, sr_metex14_packet_request,
109 sr_metex14_packet_valid, sr_metex14_parse,
114 /* Properly close and free all devices. */
115 static int clear_instances(void)
117 struct sr_dev_inst *sdi;
118 struct drv_context *drvc;
119 struct dev_context *devc;
122 if (!(drvc = di->priv))
126 for (l = drvc->instances; l; l = l->next) {
127 if (!(sdi = l->data))
129 if (!(devc = sdi->priv))
131 sr_serial_dev_inst_free(devc->serial);
132 sr_dev_inst_free(sdi);
134 g_slist_free(drvc->instances);
135 drvc->instances = NULL;
140 static int hw_init(int dmm)
142 struct drv_context *drvc;
144 if (!(drvc = g_try_malloc0(sizeof(struct drv_context)))) {
145 sr_err("Driver context malloc failed.");
146 return SR_ERR_MALLOC;
149 if (dmm == DIGITEK_DT4000ZC)
151 if (dmm == TEKPOWER_TP4000ZC)
153 if (dmm == METEX_ME31)
155 if (dmm == PEAKTECH_3410)
157 if (dmm == MASTECH_MAS345)
161 if (dmm == METEX_M3640D)
163 sr_dbg("Selected '%s' subdriver.", di->name);
170 static int hw_init_digitek_dt4000zc(void)
172 return hw_init(DIGITEK_DT4000ZC);
175 static int hw_init_tekpower_tp4000zc(void)
177 return hw_init(TEKPOWER_TP4000ZC);
180 static int hw_init_metex_me31(void)
182 return hw_init(METEX_ME31);
185 static int hw_init_peaktech_3410(void)
187 return hw_init(PEAKTECH_3410);
190 static int hw_init_mastech_mas345(void)
192 return hw_init(MASTECH_MAS345);
195 static int hw_init_va_va18b(void)
197 return hw_init(VA_VA18B);
200 static int hw_init_metex_m3640d(void)
202 return hw_init(METEX_M3640D);
205 static GSList *scan(const char *conn, const char *serialcomm, int dmm)
207 struct sr_dev_inst *sdi;
208 struct drv_context *drvc;
209 struct dev_context *devc;
210 struct sr_probe *probe;
211 struct sr_serial_dev_inst *serial;
217 if (!(serial = sr_serial_dev_inst_new(conn, serialcomm)))
220 if (serial_open(serial, SERIAL_RDWR | SERIAL_NONBLOCK) != SR_OK)
223 sr_info("Probing port %s.", conn);
227 serial_flush(serial);
230 * There's no way to get an ID from the multimeter. It just sends data
231 * periodically, so the best we can do is check if the packets match
232 * the expected format.
235 /* Let's get a bit of data and see if we can find a packet. */
238 /* Request a packet if the DMM requires this. */
239 if (dmms[dmm].packet_request) {
240 if ((ret = dmms[dmm].packet_request(serial)) < 0) {
241 sr_err("Failed to request packet: %d.", ret);
246 ret = serial_stream_detect(serial, buf, &len, dmms[dmm].packet_size,
247 dmms[dmm].packet_valid, 1000,
253 * If we dropped more than two packets worth of data, something is
254 * wrong. We shouldn't quit however, since the dropped bytes might be
255 * just zeroes at the beginning of the stream. Those can occur as a
256 * combination of the nonstandard cable that ships with this device and
257 * the serial port or USB to serial adapter.
259 dropped = len - dmms[dmm].packet_size;
260 if (dropped > 2 * dmms[dmm].packet_size)
261 sr_warn("Had to drop too much data.");
263 sr_info("Found device on port %s.", conn);
265 if (!(sdi = sr_dev_inst_new(0, SR_ST_INACTIVE, dmms[dmm].vendor,
266 dmms[dmm].device, "")))
269 if (!(devc = g_try_malloc0(sizeof(struct dev_context)))) {
270 sr_err("Device context malloc failed.");
274 devc->serial = serial;
278 if (!(probe = sr_probe_new(0, SR_PROBE_ANALOG, TRUE, "P1")))
280 sdi->probes = g_slist_append(sdi->probes, probe);
281 drvc->instances = g_slist_append(drvc->instances, sdi);
282 devices = g_slist_append(devices, sdi);
285 serial_close(serial);
290 static GSList *hw_scan(GSList *options)
292 struct sr_hwopt *opt;
294 const char *conn, *serialcomm;
297 conn = serialcomm = NULL;
298 for (l = options; l; l = l->next) {
300 switch (opt->hwopt) {
304 case SR_HWOPT_SERIALCOMM:
305 serialcomm = opt->value;
312 if (!strcmp(di->name, "digitek-dt4000zc"))
314 if (!strcmp(di->name, "tekpower-tp4000zc"))
316 if (!strcmp(di->name, "metex-me31"))
318 if (!strcmp(di->name, "peaktech-3410"))
320 if (!strcmp(di->name, "mastech-mas345"))
322 if (!strcmp(di->name, "va-va18b"))
324 if (!strcmp(di->name, "metex-m3640d"))
328 /* Use the provided comm specs. */
329 devices = scan(conn, serialcomm, dmm);
331 /* Try the default. */
332 devices = scan(conn, dmms[dmm].conn, dmm);
338 static GSList *hw_dev_list(void)
340 struct drv_context *drvc;
344 return drvc->instances;
347 static int hw_dev_open(struct sr_dev_inst *sdi)
349 struct dev_context *devc;
351 if (!(devc = sdi->priv)) {
352 sr_err("sdi->priv was NULL.");
356 if (serial_open(devc->serial, SERIAL_RDWR | SERIAL_NONBLOCK) != SR_OK)
359 sdi->status = SR_ST_ACTIVE;
364 static int hw_dev_close(struct sr_dev_inst *sdi)
366 struct dev_context *devc;
368 if (!(devc = sdi->priv)) {
369 sr_err("sdi->priv was NULL.");
373 if (devc->serial && devc->serial->fd != -1) {
374 serial_close(devc->serial);
375 sdi->status = SR_ST_INACTIVE;
381 static int hw_cleanup(void)
388 static int hw_info_get(int info_id, const void **data,
389 const struct sr_dev_inst *sdi)
400 case SR_DI_NUM_PROBES:
401 *data = GINT_TO_POINTER(1);
403 case SR_DI_PROBE_NAMES:
413 static int hw_dev_config_set(const struct sr_dev_inst *sdi, int hwcap,
416 struct dev_context *devc;
418 if (sdi->status != SR_ST_ACTIVE)
421 if (!(devc = sdi->priv)) {
422 sr_err("sdi->priv was NULL.");
427 case SR_HWCAP_LIMIT_SAMPLES:
428 devc->limit_samples = *(const uint64_t *)value;
429 sr_dbg("Setting sample limit to %" PRIu64 ".",
430 devc->limit_samples);
433 sr_err("Unknown capability: %d.", hwcap);
441 static int hw_dev_acquisition_start(const struct sr_dev_inst *sdi,
444 struct sr_datafeed_packet packet;
445 struct sr_datafeed_header header;
446 struct sr_datafeed_meta_analog meta;
447 struct dev_context *devc;
448 int (*receive_data)(int, int, void *) = NULL;
450 if (!(devc = sdi->priv)) {
451 sr_err("sdi->priv was NULL.");
455 sr_dbg("Starting acquisition.");
457 devc->cb_data = cb_data;
460 * Reset the number of samples to take. If we've already collected our
461 * quota, but we start a new session, and don't reset this, we'll just
462 * quit without acquiring any new samples.
464 devc->num_samples = 0;
466 /* Send header packet to the session bus. */
467 sr_dbg("Sending SR_DF_HEADER.");
468 packet.type = SR_DF_HEADER;
469 packet.payload = (uint8_t *)&header;
470 header.feed_version = 1;
471 gettimeofday(&header.starttime, NULL);
472 sr_session_send(devc->cb_data, &packet);
474 /* Send metadata about the SR_DF_ANALOG packets to come. */
475 sr_dbg("Sending SR_DF_META_ANALOG.");
476 packet.type = SR_DF_META_ANALOG;
477 packet.payload = &meta;
479 sr_session_send(devc->cb_data, &packet);
481 if (!strcmp(di->name, "digitek-dt4000zc"))
482 receive_data = digitek_dt4000zc_receive_data;
483 if (!strcmp(di->name, "tekpower-tp4000zc"))
484 receive_data = tekpower_tp4000zc_receive_data;
485 if (!strcmp(di->name, "metex-me31"))
486 receive_data = metex_me31_receive_data;
487 if (!strcmp(di->name, "peaktech-3410"))
488 receive_data = peaktech_3410_receive_data;
489 if (!strcmp(di->name, "mastech-mas345"))
490 receive_data = mastech_mas345_receive_data;
491 if (!strcmp(di->name, "va-va18b"))
492 receive_data = va_va18b_receive_data;
493 if (!strcmp(di->name, "metex-m3640d"))
494 receive_data = metex_m3640d_receive_data;
496 /* Poll every 50ms, or whenever some data comes in. */
497 sr_source_add(devc->serial->fd, G_IO_IN, 50,
498 receive_data, (void *)sdi);
503 static int hw_dev_acquisition_stop(struct sr_dev_inst *sdi, void *cb_data)
505 struct sr_datafeed_packet packet;
506 struct dev_context *devc;
508 if (sdi->status != SR_ST_ACTIVE)
511 if (!(devc = sdi->priv)) {
512 sr_err("sdi->priv was NULL.");
516 sr_dbg("Stopping acquisition.");
518 sr_source_remove(devc->serial->fd);
519 hw_dev_close((struct sr_dev_inst *)sdi);
521 /* Send end packet to the session bus. */
522 sr_dbg("Sending SR_DF_END.");
523 packet.type = SR_DF_END;
524 sr_session_send(cb_data, &packet);
529 SR_PRIV struct sr_dev_driver digitek_dt4000zc_driver_info = {
530 .name = "digitek-dt4000zc",
531 .longname = "Digitek DT4000ZC",
533 .init = hw_init_digitek_dt4000zc,
534 .cleanup = hw_cleanup,
536 .dev_list = hw_dev_list,
537 .dev_clear = clear_instances,
538 .dev_open = hw_dev_open,
539 .dev_close = hw_dev_close,
540 .info_get = hw_info_get,
541 .dev_config_set = hw_dev_config_set,
542 .dev_acquisition_start = hw_dev_acquisition_start,
543 .dev_acquisition_stop = hw_dev_acquisition_stop,
547 SR_PRIV struct sr_dev_driver tekpower_tp4000zc_driver_info = {
548 .name = "tekpower-tp4000zc",
549 .longname = "TekPower TP4000ZC",
551 .init = hw_init_tekpower_tp4000zc,
552 .cleanup = hw_cleanup,
554 .dev_list = hw_dev_list,
555 .dev_clear = clear_instances,
556 .dev_open = hw_dev_open,
557 .dev_close = hw_dev_close,
558 .info_get = hw_info_get,
559 .dev_config_set = hw_dev_config_set,
560 .dev_acquisition_start = hw_dev_acquisition_start,
561 .dev_acquisition_stop = hw_dev_acquisition_stop,
565 SR_PRIV struct sr_dev_driver metex_me31_driver_info = {
566 .name = "metex-me31",
567 .longname = "Metex ME-31",
569 .init = hw_init_metex_me31,
570 .cleanup = hw_cleanup,
572 .dev_list = hw_dev_list,
573 .dev_clear = clear_instances,
574 .dev_open = hw_dev_open,
575 .dev_close = hw_dev_close,
576 .info_get = hw_info_get,
577 .dev_config_set = hw_dev_config_set,
578 .dev_acquisition_start = hw_dev_acquisition_start,
579 .dev_acquisition_stop = hw_dev_acquisition_stop,
583 SR_PRIV struct sr_dev_driver peaktech_3410_driver_info = {
584 .name = "peaktech-3410",
585 .longname = "PeakTech 3410",
587 .init = hw_init_peaktech_3410,
588 .cleanup = hw_cleanup,
590 .dev_list = hw_dev_list,
591 .dev_clear = clear_instances,
592 .dev_open = hw_dev_open,
593 .dev_close = hw_dev_close,
594 .info_get = hw_info_get,
595 .dev_config_set = hw_dev_config_set,
596 .dev_acquisition_start = hw_dev_acquisition_start,
597 .dev_acquisition_stop = hw_dev_acquisition_stop,
601 SR_PRIV struct sr_dev_driver mastech_mas345_driver_info = {
602 .name = "mastech-mas345",
603 .longname = "MASTECH MAS345",
605 .init = hw_init_mastech_mas345,
606 .cleanup = hw_cleanup,
608 .dev_list = hw_dev_list,
609 .dev_clear = clear_instances,
610 .dev_open = hw_dev_open,
611 .dev_close = hw_dev_close,
612 .info_get = hw_info_get,
613 .dev_config_set = hw_dev_config_set,
614 .dev_acquisition_start = hw_dev_acquisition_start,
615 .dev_acquisition_stop = hw_dev_acquisition_stop,
619 SR_PRIV struct sr_dev_driver va_va18b_driver_info = {
621 .longname = "V&A VA18B",
623 .init = hw_init_va_va18b,
624 .cleanup = hw_cleanup,
626 .dev_list = hw_dev_list,
627 .dev_clear = clear_instances,
628 .dev_open = hw_dev_open,
629 .dev_close = hw_dev_close,
630 .info_get = hw_info_get,
631 .dev_config_set = hw_dev_config_set,
632 .dev_acquisition_start = hw_dev_acquisition_start,
633 .dev_acquisition_stop = hw_dev_acquisition_stop,
637 SR_PRIV struct sr_dev_driver metex_m3640d_driver_info = {
638 .name = "metex-m3640d",
639 .longname = "Metex M-3640D",
641 .init = hw_init_metex_m3640d,
642 .cleanup = hw_cleanup,
644 .dev_list = hw_dev_list,
645 .dev_clear = clear_instances,
646 .dev_open = hw_dev_open,
647 .dev_close = hw_dev_close,
648 .info_get = hw_info_get,
649 .dev_config_set = hw_dev_config_set,
650 .dev_acquisition_start = hw_dev_acquisition_start,
651 .dev_acquisition_stop = hw_dev_acquisition_stop,