]> sigrok.org Git - libsigrok.git/blob - src/hardware/siglent-sds/api.c
siglent-sds: Fix SR_CONF_TRIGGER_SLOPE config_set() code.
[libsigrok.git] / src / hardware / siglent-sds / api.c
1 /*
2  * This file is part of the libsigrok project.
3  *
4  * Copyright (C) 2018 mhooijboer <marchelh@gmail.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 <config.h>
21 #include <fcntl.h>
22 #include <glib.h>
23 #include <math.h>
24 #include <stdlib.h>
25 #include <string.h>
26 #include <strings.h>
27 #include <unistd.h>
28 #include <libsigrok/libsigrok.h>
29 #include "libsigrok-internal.h"
30 #include "protocol.h"
31 #include "scpi.h"
32
33 static const uint32_t scanopts[] = {
34         SR_CONF_CONN,
35         SR_CONF_SERIALCOMM,
36 };
37
38 static const uint32_t devopts[] = {
39         SR_CONF_OSCILLOSCOPE,
40         SR_CONF_LOGIC_ANALYZER,
41         SR_CONF_TIMEBASE | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
42         SR_CONF_TRIGGER_SOURCE | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
43         SR_CONF_TRIGGER_SLOPE | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
44         SR_CONF_TRIGGER_LEVEL | SR_CONF_GET | SR_CONF_SET,
45         SR_CONF_HORIZ_TRIGGERPOS | SR_CONF_GET | SR_CONF_SET,
46         SR_CONF_NUM_HDIV | SR_CONF_GET | SR_CONF_LIST,
47         SR_CONF_SAMPLERATE | SR_CONF_GET,
48         SR_CONF_LIMIT_FRAMES | SR_CONF_GET | SR_CONF_SET,
49         SR_CONF_DATA_SOURCE | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
50         SR_CONF_AVERAGING | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
51         SR_CONF_AVG_SAMPLES | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
52 };
53
54 static const uint32_t analog_devopts[] = {
55         SR_CONF_NUM_VDIV | SR_CONF_GET,
56         SR_CONF_VDIV | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
57         SR_CONF_TIMEBASE | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
58         SR_CONF_COUPLING | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
59         SR_CONF_PROBE_FACTOR | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
60         SR_CONF_DATA_SOURCE | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
61 };
62
63 static const uint64_t timebases[][2] = {
64         /* nanoseconds */
65         { 1, 1000000000 },
66         { 2, 1000000000 },
67         { 5, 1000000000 },
68         { 10, 1000000000 },
69         { 20, 1000000000 },
70         { 50, 1000000000 },
71         { 100, 1000000000 },
72         { 200, 1000000000 },
73         { 500, 1000000000 },
74         /* microseconds */
75         { 1, 1000000 },
76         { 2, 1000000 },
77         { 5, 1000000 },
78         { 10, 1000000 },
79         { 20, 1000000 },
80         { 50, 1000000 },
81         { 100, 1000000 },
82         { 200, 1000000 },
83         { 500, 1000000 },
84         /* milliseconds */
85         { 1, 1000 },
86         { 2, 1000 },
87         { 5, 1000 },
88         { 10, 1000 },
89         { 20, 1000 },
90         { 50, 1000 },
91         { 100, 1000 },
92         { 200, 1000 },
93         { 500, 1000 },
94         /* seconds */
95         { 1, 1 },
96         { 2, 1 },
97         { 5, 1 },
98         { 10, 1 },
99         { 20, 1 },
100         { 50, 1 },
101         { 100, 1 },
102 };
103
104 static const uint64_t vdivs[][2] = {
105         /* microvolts */
106         { 500, 100000 },
107         /* millivolts */
108         { 1, 1000 },
109         { 2, 1000 },
110         { 5, 1000 },
111         { 10, 1000 },
112         { 20, 1000 },
113         { 50, 1000 },
114         { 100, 1000 },
115         { 200, 1000 },
116         { 500, 1000 },
117         /* volts */
118         { 1, 1 },
119         { 2, 1 },
120         { 5, 1 },
121         { 10, 1 },
122         { 20, 1 },
123         { 50, 1 },
124         { 100, 1 },
125 };
126
127 #define NUM_TIMEBASE    ARRAY_SIZE(timebases)
128 #define NUM_VDIV        ARRAY_SIZE(vdivs)
129
130 static const char *trigger_sources[] = {
131         "CH1", "CH2", "Ext", "Ext /5", "AC Line",
132         "D0", "D1", "D2", "D3", "D4", "D5", "D6", "D7",
133         "D8", "D9", "D10", "D11", "D12", "D13", "D14", "D15",
134 };
135
136 static const char *trigger_slopes[] = {
137         "r", "f",
138 };
139
140 static const char *coupling[] = {
141         "A1M AC 1 Meg",
142         "A50 AC 50 Ohm",
143         "D1M DC 1 Meg",
144         "D50 DC 50 Ohm",
145         "GND",
146 };
147
148 static const uint64_t probe_factor[] = {
149         1, 2, 5, 10, 20, 50, 100, 200, 500, 1000, 2000, 5000, 10000,
150 };
151
152 /* Do not change the order of entries. */
153 static const char *data_sources[] = {
154         "Display",
155         "History",
156 };
157
158 enum vendor {
159         SIGLENT,
160 };
161
162 enum series {
163         SDS1000CML,
164         SDS1000CNL,
165         SDS1000DL,
166         SDS1000X,
167         SDS1000XP,
168         SDS1000XE,
169         SDS2000X,
170 };
171
172 /* short name, full name, USB name */
173 static const struct siglent_sds_vendor supported_vendors[] = {
174         [SIGLENT] = {
175                 "Siglent", "Siglent Technologies", "Siglent Technologies Co,. Ltd.",
176         },
177 };
178
179 #define VENDOR(x) &supported_vendors[x]
180 /* vendor, series, protocol, max timebase, min vdiv, number of horizontal divs,
181  * number of vertical divs, live waveform samples, memory buffer samples */
182 static const struct siglent_sds_series supported_series[] = {
183         [SDS1000CML] = {VENDOR(SIGLENT), "SDS1000CML", NON_SPO_MODEL,
184                 { 50, 1 }, { 2, 1000 }, 18, 8, 1400363},
185         [SDS1000CNL] = {VENDOR(SIGLENT), "SDS1000CNL", NON_SPO_MODEL,
186                 { 50, 1 }, { 2, 1000 }, 18, 8, 1400363},
187         [SDS1000DL] = {VENDOR(SIGLENT), "SDS1000DL", NON_SPO_MODEL,
188                 { 50, 1 }, { 2, 1000 }, 18, 8, 1400363},
189         [SDS1000X] = {VENDOR(SIGLENT), "SDS1000X", SPO_MODEL,
190                 { 50, 1 }, { 500, 100000 }, 14, 8, 14000363},
191         [SDS1000XP] = {VENDOR(SIGLENT), "SDS1000X+", SPO_MODEL,
192                 { 50, 1 }, { 500, 100000 }, 14, 8, 14000363},
193         [SDS1000XE] = {VENDOR(SIGLENT), "SDS1000XE", SPO_MODEL,
194                 { 50, 1 }, { 500, 100000 }, 14, 8, 14000363},
195         [SDS2000X] = {VENDOR(SIGLENT), "SDS2000X", SPO_MODEL,
196                 { 50, 1 }, { 500, 100000 }, 14, 8, 14000363},
197 };
198
199 #define SERIES(x) &supported_series[x]
200 /* series, model, min timebase, analog channels, digital */
201 static const struct siglent_sds_model supported_models[] = {
202         { SERIES(SDS1000CML), "SDS1152CML", { 20, 1000000000 }, 2, false, 0 },
203         { SERIES(SDS1000CML), "SDS1102CML", { 10, 1000000000 }, 2, false, 0 },
204         { SERIES(SDS1000CML), "SDS1072CML", { 5, 1000000000 }, 2, false, 0 },
205         { SERIES(SDS1000CNL), "SDS1202CNL", { 20, 1000000000 }, 2, false, 0 },
206         { SERIES(SDS1000CNL), "SDS1102CNL", { 10, 1000000000 }, 2, false, 0 },
207         { SERIES(SDS1000CNL), "SDS1072CNL", { 5, 1000000000 }, 2, false, 0 },
208         { SERIES(SDS1000DL), "SDS1202DL", { 20, 1000000000 }, 2, false, 0 },
209         { SERIES(SDS1000DL), "SDS1102DL", { 10, 1000000000 }, 2, false, 0 },
210         { SERIES(SDS1000DL), "SDS1022DL", { 5, 1000000000 }, 2, false, 0 },
211         { SERIES(SDS1000DL), "SDS1052DL", { 5, 1000000000 }, 2, false, 0 },
212         { SERIES(SDS1000DL), "SDS1052DL+", { 5, 1000000000 }, 2, false, 0 },
213         { SERIES(SDS1000X), "SDS1102X", { 2, 1000000000 }, 2, false, 0 },
214         { SERIES(SDS1000XP), "SDS1102X+", { 2, 1000000000 }, 2, false, 0 },
215         { SERIES(SDS1000X), "SDS1202X", { 2, 1000000000 }, 2, false, 0 },
216         { SERIES(SDS1000XP), "SDS1202X+", { 2, 1000000000 }, 2, false, 0 },
217         { SERIES(SDS1000XE), "SDS1202X-E", { 1, 1000000000 }, 2, false, 0 },
218         { SERIES(SDS1000XE), "SDS1104X-E", { 1, 1000000000 }, 4, true, 16 },
219         { SERIES(SDS1000XE), "SDS1204X-E", { 1, 1000000000 }, 4, true, 16 },
220         { SERIES(SDS2000X), "SDS2072X", { 2, 1000000000 }, 2, false, 0 },
221         { SERIES(SDS2000X), "SDS2074X", { 2, 1000000000 }, 4, false, 0 },
222         { SERIES(SDS2000X), "SDS2102X", { 2, 1000000000 }, 2, false, 0 },
223         { SERIES(SDS2000X), "SDS2104X", { 2, 1000000000 }, 4, false, 0 },
224         { SERIES(SDS2000X), "SDS2202X", { 2, 1000000000 }, 2, false, 0 },
225         { SERIES(SDS2000X), "SDS2204X", { 2, 1000000000 }, 4, false, 0 },
226         { SERIES(SDS2000X), "SDS2302X", { 2, 1000000000 }, 2, false, 0 },
227         { SERIES(SDS2000X), "SDS2304X", { 2, 1000000000 }, 4, false, 0 },
228 };
229
230 SR_PRIV struct sr_dev_driver siglent_sds_driver_info;
231
232 static void clear_helper(void *priv)
233 {
234         struct dev_context *devc;
235
236         devc = priv;
237         if (!devc)
238                 return;
239         g_free(devc->analog_groups);
240         g_free(devc->enabled_channels);
241 }
242
243 static int dev_clear(const struct sr_dev_driver *di)
244 {
245         return std_dev_clear_with_callback(di, clear_helper);
246 }
247
248 static struct sr_dev_inst *probe_device(struct sr_scpi_dev_inst *scpi)
249 {
250         struct dev_context *devc;
251         struct sr_dev_inst *sdi;
252         struct sr_scpi_hw_info *hw_info;
253         struct sr_channel *ch;
254         unsigned int i;
255         const struct siglent_sds_model *model;
256         gchar *channel_name;
257
258         sr_dbg("Setting Communication Headers to off.");
259         if (sr_scpi_send(scpi, "CHDR OFF") != SR_OK)
260                 return NULL;
261
262         if (sr_scpi_get_hw_id(scpi, &hw_info) != SR_OK) {
263                 sr_info("Couldn't get IDN response, retrying.");
264                 sr_scpi_close(scpi);
265                 sr_scpi_open(scpi);
266                 if (sr_scpi_get_hw_id(scpi, &hw_info) != SR_OK) {
267                         sr_info("Couldn't get IDN response.");
268                         return NULL;
269                 }
270         }
271
272         model = NULL;
273         for (i = 0; i < ARRAY_SIZE(supported_models); i++) {
274                 if (!strcmp(hw_info->model, supported_models[i].name)) {
275                         model = &supported_models[i];
276                         break;
277                 }
278         }
279
280         if (!model) {
281                 sr_scpi_hw_info_free(hw_info);
282                 return NULL;
283         }
284
285         sdi = g_malloc0(sizeof(struct sr_dev_inst));
286         sdi->vendor = g_strdup(model->series->vendor->name);
287         sdi->model = g_strdup(model->name);
288         sdi->version = g_strdup(hw_info->firmware_version);
289         sdi->conn = scpi;
290         sdi->driver = &siglent_sds_driver_info;
291         sdi->inst_type = SR_INST_SCPI;
292         sdi->serial_num = g_strdup(hw_info->serial_number);
293         devc = g_malloc0(sizeof(struct dev_context));
294         devc->limit_frames = 1;
295         devc->model = model;
296
297         sr_scpi_hw_info_free(hw_info);
298
299         devc->analog_groups = g_malloc0(sizeof(struct sr_channel_group *) *
300                 model->analog_channels);
301
302         for (i = 0; i < model->analog_channels; i++) {
303                 channel_name = g_strdup_printf("CH%d", i + 1);
304                 ch = sr_channel_new(sdi, i, SR_CHANNEL_ANALOG, TRUE, channel_name);
305
306                 devc->analog_groups[i] = g_malloc0(sizeof(struct sr_channel_group));
307
308                 devc->analog_groups[i]->name = channel_name;
309                 devc->analog_groups[i]->channels = g_slist_append(NULL, ch);
310                 sdi->channel_groups = g_slist_append(sdi->channel_groups,
311                         devc->analog_groups[i]);
312         }
313
314         if (devc->model->has_digital) {
315                 devc->digital_group = g_malloc0(sizeof(struct sr_channel_group));
316
317                 for (i = 0; i < ARRAY_SIZE(devc->digital_channels); i++) {
318                         channel_name = g_strdup_printf("D%d", i);
319                         ch = sr_channel_new(sdi, i, SR_CHANNEL_LOGIC, TRUE, channel_name);
320                         g_free(channel_name);
321                         devc->digital_group->channels = g_slist_append(
322                                 devc->digital_group->channels, ch);
323                 }
324                 devc->digital_group->name = g_strdup("LA");
325                 sdi->channel_groups = g_slist_append(sdi->channel_groups,
326                         devc->digital_group);
327         }
328
329         for (i = 0; i < NUM_TIMEBASE; i++) {
330                 if (!memcmp(&devc->model->min_timebase, &timebases[i], sizeof(uint64_t[2])))
331                         devc->timebases = &timebases[i];
332
333                 if (!memcmp(&devc->model->series->max_timebase, &timebases[i], sizeof(uint64_t[2])))
334                         devc->num_timebases = &timebases[i] - devc->timebases + 1;
335         }
336
337         for (i = 0; i < NUM_VDIV; i++) {
338                 devc->vdivs = &vdivs[i];
339                 if (!memcmp(&devc->model->series->min_vdiv,
340                         &vdivs[i], sizeof(uint64_t[2]))) {
341                         devc->vdivs = &vdivs[i];
342                         devc->num_vdivs = NUM_VDIV - i;
343                         break;
344                 }
345         }
346
347         devc->buffer = g_malloc(devc->model->series->buffer_samples);
348         sr_dbg("Setting device context buffer size: %i.", devc->model->series->buffer_samples);
349         devc->data = g_malloc(devc->model->series->buffer_samples * sizeof(float));
350
351         devc->data_source = DATA_SOURCE_SCREEN;
352
353         sdi->priv = devc;
354
355         return sdi;
356 }
357
358 static GSList *scan(struct sr_dev_driver *di, GSList *options)
359 {
360         /* TODO: Implement RPC call for LXI device discovery. */
361         return sr_scpi_scan(di->context, options, probe_device);
362 }
363
364 static int dev_open(struct sr_dev_inst *sdi)
365 {
366         int ret;
367         struct sr_scpi_dev_inst *scpi = sdi->conn;
368
369         if ((ret = sr_scpi_open(scpi)) < 0) {
370                 sr_err("Failed to open SCPI device: %s.", sr_strerror(ret));
371                 return SR_ERR;
372         }
373
374         if ((ret = siglent_sds_get_dev_cfg(sdi)) < 0) {
375                 sr_err("Failed to get device config: %s.", sr_strerror(ret));
376                 return SR_ERR;
377         }
378
379         sdi->status = SR_ST_ACTIVE;
380
381         return SR_OK;
382 }
383
384 static int dev_close(struct sr_dev_inst *sdi)
385 {
386         return sr_scpi_close(sdi->conn);
387 }
388
389 static int config_get(uint32_t key, GVariant **data,
390         const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
391 {
392         struct dev_context *devc;
393         struct sr_channel *ch;
394         const char *tmp_str;
395         int analog_channel = -1;
396         float smallest_diff = INFINITY;
397         int idx = -1;
398         unsigned i;
399
400         if (!sdi)
401                 return SR_ERR_ARG;
402
403         devc = sdi->priv;
404
405         /* If a channel group is specified, it must be a valid one. */
406         if (cg && !g_slist_find(sdi->channel_groups, cg)) {
407                 sr_err("Invalid channel group specified.");
408                 return SR_ERR;
409         }
410
411         if (cg) {
412                 ch = g_slist_nth_data(cg->channels, 0);
413                 if (!ch)
414                         return SR_ERR;
415                 if (ch->type == SR_CHANNEL_ANALOG) {
416                         if (ch->name[2] < '1' || ch->name[2] > '4')
417                                 return SR_ERR;
418                         analog_channel = ch->name[2] - '1';
419                 }
420         }
421
422         switch (key) {
423         case SR_CONF_NUM_HDIV:
424                 *data = g_variant_new_int32(devc->model->series->num_horizontal_divs);
425                 break;
426         case SR_CONF_NUM_VDIV:
427                 *data = g_variant_new_int32(devc->num_vdivs);
428                 break;
429         case SR_CONF_LIMIT_FRAMES:
430                 *data = g_variant_new_uint64(devc->limit_frames);
431                 break;
432         case SR_CONF_DATA_SOURCE:
433                 if (devc->data_source == DATA_SOURCE_SCREEN)
434                         *data = g_variant_new_string("Screen");
435                 else if (devc->data_source == DATA_SOURCE_HISTORY)
436                         *data = g_variant_new_string("History");
437                 break;
438         case SR_CONF_SAMPLERATE:
439                 siglent_sds_get_dev_cfg_horizontal(sdi);
440                 *data = g_variant_new_uint64(devc->sampleRate);
441                 break;
442         case SR_CONF_TRIGGER_SOURCE:
443                 if (!strcmp(devc->trigger_source, "ACL"))
444                         tmp_str = "AC Line";
445                 else if (!strcmp(devc->trigger_source, "CHAN1"))
446                         tmp_str = "CH1";
447                 else if (!strcmp(devc->trigger_source, "CHAN2"))
448                         tmp_str = "CH2";
449                 else
450                         tmp_str = devc->trigger_source;
451                 *data = g_variant_new_string(tmp_str);
452                 break;
453         case SR_CONF_TRIGGER_SLOPE:
454                 if (!strncmp(devc->trigger_slope, "POS", 3)) {
455                         tmp_str = "r";
456                 } else if (!strncmp(devc->trigger_slope, "NEG", 3)) {
457                         tmp_str = "f";
458                 } else {
459                         sr_dbg("Unknown trigger slope: '%s'.", devc->trigger_slope);
460                         return SR_ERR_NA;
461                 }
462                 *data = g_variant_new_string(tmp_str);
463                 break;
464         case SR_CONF_TRIGGER_LEVEL:
465                 *data = g_variant_new_double(devc->trigger_level);
466                 break;
467         case SR_CONF_HORIZ_TRIGGERPOS:
468                 *data = g_variant_new_double(devc->horiz_triggerpos);
469                 break;
470         case SR_CONF_TIMEBASE:
471                 for (i = 0; i < devc->num_timebases; i++) {
472                         float tb, diff;
473
474                         tb = (float)devc->timebases[i][0] / devc->timebases[i][1];
475                         diff = fabs(devc->timebase - tb);
476                         if (diff < smallest_diff) {
477                                 smallest_diff = diff;
478                                 idx = i;
479                         }
480                 }
481                 if (idx < 0) {
482                         sr_dbg("Negative timebase index: %d.", idx);
483                         return SR_ERR_NA;
484                 }
485                 *data = g_variant_new("(tt)", devc->timebases[idx][0],
486                         devc->timebases[idx][1]);
487                 break;
488         case SR_CONF_VDIV:
489                 if (analog_channel < 0) {
490                         sr_dbg("Negative analog channel: %d.", analog_channel);
491                         return SR_ERR_NA;
492                 }
493                 for (i = 0; i < ARRAY_SIZE(vdivs); i++) {
494                         float vdiv, diff;
495
496                         vdiv = (float)vdivs[i][0] / vdivs[i][1];
497                         diff = fabsf(devc->vdiv[analog_channel] - vdiv);
498                         if (diff < smallest_diff) {
499                                 smallest_diff = diff;
500                                 idx = i;
501                         }
502                 }
503                 if (idx < 0) {
504                         sr_dbg("Negative vdiv index: %d.", idx);
505                         return SR_ERR_NA;
506                 }
507                 *data = g_variant_new("(tt)", vdivs[idx][0], vdivs[idx][1]);
508                 break;
509         case SR_CONF_COUPLING:
510                 if (analog_channel < 0) {
511                         sr_dbg("Negative analog channel: %d.", analog_channel);
512                         return SR_ERR_NA;
513                 }
514                 *data = g_variant_new_string(devc->coupling[analog_channel]);
515                 break;
516         case SR_CONF_PROBE_FACTOR:
517                 if (analog_channel < 0) {
518                         sr_dbg("Negative analog channel: %d.", analog_channel);
519                         return SR_ERR_NA;
520                 }
521                 *data = g_variant_new_uint64(devc->attenuation[analog_channel]);
522                 break;
523         default:
524                 return SR_ERR_NA;
525         }
526
527         return SR_OK;
528 }
529
530 static int config_set(uint32_t key, GVariant *data,
531         const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
532 {
533         struct dev_context *devc;
534         uint64_t p, q;
535         double t_dbl;
536         unsigned int i, j;
537         int ret, idx;
538         const char *tmp_str;
539         char buffer[16];
540
541         devc = sdi->priv;
542
543         if (sdi->status != SR_ST_ACTIVE)
544                 return SR_ERR_DEV_CLOSED;
545
546         /* If a channel group is specified, it must be a valid one. */
547         if (cg && !g_slist_find(sdi->channel_groups, cg)) {
548                 sr_err("Invalid channel group specified.");
549                 return SR_ERR;
550         }
551
552         ret = SR_OK;
553         switch (key) {
554         case SR_CONF_LIMIT_FRAMES:
555                 devc->limit_frames = g_variant_get_uint64(data);
556                 break;
557         case SR_CONF_TRIGGER_SLOPE:
558                 if ((idx = std_str_idx(data, ARRAY_AND_SIZE(trigger_slopes))) < 0)
559                         return SR_ERR_ARG;
560                 g_free(devc->trigger_slope);
561                 devc->trigger_slope = g_strdup((trigger_slopes[idx][0] == 'r') ? "POS" : "NEG");
562                 ret = siglent_sds_config_set(sdi, "%s:TRSL %s",
563                         devc->trigger_source, devc->trigger_slope);
564                 break;
565         case SR_CONF_HORIZ_TRIGGERPOS:
566                 t_dbl = g_variant_get_double(data);
567                 if (t_dbl < 0.0 || t_dbl > 1.0) {
568                         sr_err("Invalid horiz. trigger position: %g.", t_dbl);
569                         return SR_ERR;
570                 }
571                 devc->horiz_triggerpos = t_dbl;
572                 /* We have the trigger offset as a percentage of the frame, but
573                  * need to express this in seconds. */
574                 t_dbl = -(devc->horiz_triggerpos - 0.5) * devc->timebase * devc->num_timebases;
575                 g_ascii_formatd(buffer, sizeof(buffer), "%.6f", t_dbl);
576                 ret = siglent_sds_config_set(sdi, ":TIM:OFFS %s", buffer);
577                 break;
578         case SR_CONF_TRIGGER_LEVEL:
579                 t_dbl = g_variant_get_double(data);
580                 g_ascii_formatd(buffer, sizeof(buffer), "%.3f", t_dbl);
581                 ret = siglent_sds_config_set(sdi, ":TRIG:EDGE:LEV %s", buffer);
582                 if (ret == SR_OK)
583                         devc->trigger_level = t_dbl;
584                 break;
585         case SR_CONF_TIMEBASE:
586                 sr_dbg("Setting device Timebase");
587                 g_variant_get(data, "(tt)", &p, &q);
588                 for (i = 0; i < devc->num_timebases; i++) {
589                         char *cmd;
590                         if (devc->timebases[i][0] == p && devc->timebases[i][1] == q) {
591                                 cmd = "";
592                                 devc->timebase = (float) p / q;
593                                 switch (q) {
594                                 case 1:
595                                         cmd = g_strdup_printf("%luS", p);
596                                         break;
597                                 case 1000:
598                                         cmd = g_strdup_printf("%luMS", p);
599                                         break;
600                                 case 1000000:
601                                         cmd = g_strdup_printf("%luUS", p);
602                                         break;
603                                 case 100000000:
604                                         cmd = g_strdup_printf("%luNS", p);
605                                         break;
606                                 }
607                                 sr_dbg("Setting device timebase: TDIV %s.", cmd);
608                                 ret = siglent_sds_config_set(sdi, "TDIV %s", cmd);
609                                 break;
610                         }
611                 }
612                 if (i == devc->num_timebases) {
613                         sr_err("Invalid timebase index: %d.", i);
614                         ret = SR_ERR_ARG;
615                 }
616                 break;
617         case SR_CONF_TRIGGER_SOURCE:
618                 tmp_str = g_variant_get_string(data, NULL);
619                 for (i = 0; i < ARRAY_SIZE(trigger_sources); i++) {
620                         if (!strcmp(trigger_sources[i], tmp_str)) {
621                                 g_free(devc->trigger_source);
622                                 devc->trigger_source = g_strdup(trigger_sources[i]);
623                                 if (!strcmp(devc->trigger_source, "AC Line"))
624                                         tmp_str = "LINE";
625                                 else if (!strcmp(devc->trigger_source, "CH1"))
626                                         tmp_str = "C1";
627                                 else if (!strcmp(devc->trigger_source, "CH2"))
628                                         tmp_str = "C2";
629                                 else if (!strcmp(devc->trigger_source, "CH3"))
630                                         tmp_str = "C3";
631                                 else if (!strcmp(devc->trigger_source, "CH4"))
632                                         tmp_str = "C4";
633                                 else if (!strcmp(devc->trigger_source, "Ext"))
634                                         tmp_str = "EX";
635                                 else if (!strcmp(devc->trigger_source, "Ext /5"))
636                                         tmp_str = "EX5";
637                                 else
638                                         tmp_str = (char *) devc->trigger_source;
639                                 ret = siglent_sds_config_set(sdi, "TRSE EDGE,SR,%s,OFF", tmp_str);
640                                 break;
641                         }
642                 }
643                 if (i == ARRAY_SIZE(trigger_sources)) {
644                         sr_err("Invalid trigger source index: %d.", i);
645                         ret = SR_ERR_ARG;
646                 }
647                 break;
648         case SR_CONF_VDIV:
649                 if (!cg)
650                         return SR_ERR_CHANNEL_GROUP;
651                 g_variant_get(data, "(tt)", &p, &q);
652                 for (i = 0; i < devc->model->analog_channels; i++) {
653                         char *cmd;
654                         if (cg == devc->analog_groups[i]) {
655                                 for (j = 0; j < ARRAY_SIZE(vdivs); j++) {
656                                         if (vdivs[j][0] != p || vdivs[j][1] != q)
657                                                 continue;
658                                         cmd = "";
659                                         switch (q) {
660                                         case 1:
661                                                 cmd = g_strdup_printf("%luV", p);
662                                                 break;
663                                         case 1000:
664                                                 cmd = g_strdup_printf("%luMV", p);
665                                                 break;
666                                         case 100000:
667                                                 cmd = g_strdup_printf("%luUV", p);
668                                                 break;
669                                         }
670                                         return siglent_sds_config_set(sdi, "C%d:VDIV %s", i + 1, cmd);
671                                 }
672                                 sr_err("Invalid vdiv index: %d.", j);
673                                 return SR_ERR_ARG;
674                         }
675                 }
676                 sr_dbg("Didn't set vdiv, unknown channel(group).");
677                 return SR_ERR_NA;
678         case SR_CONF_COUPLING:
679                 if (!cg)
680                         return SR_ERR_CHANNEL_GROUP;
681                 tmp_str = g_variant_get_string(data, NULL);
682                 for (i = 0; i < devc->model->analog_channels; i++) {
683                         char cmd[4];
684                         if (cg == devc->analog_groups[i]) {
685                                 for (j = 0; j < ARRAY_SIZE(coupling); j++) {
686                                         if (!strcmp(tmp_str, coupling[j])) {
687                                                 g_free(devc->coupling[i]);
688                                                 devc->coupling[i] = g_strdup(coupling[j]);
689                                                 strncpy(cmd, devc->coupling[i], 3);
690                                                 cmd[3] = 0;
691                                                 return siglent_sds_config_set(sdi, "C%d:CPL %s", i + 1, cmd);
692                                         }
693                                 }
694                                 sr_err("Invalid coupling index: %d.", j);
695                                 return SR_ERR_ARG;
696                         }
697                 }
698                 sr_dbg("Didn't set coupling, unknown channel(group).");
699                 return SR_ERR_NA;
700         case SR_CONF_PROBE_FACTOR:
701                 if (!cg)
702                         return SR_ERR_CHANNEL_GROUP;
703                 p = g_variant_get_uint64(data);
704                 for (i = 0; i < devc->model->analog_channels; i++) {
705                         if (cg == devc->analog_groups[i]) {
706                                 for (j = 0; j < ARRAY_SIZE(probe_factor); j++) {
707                                         if (p == probe_factor[j]) {
708                                                 devc->attenuation[i] = p;
709                                                 ret = siglent_sds_config_set(sdi, "C%d:ATTN %" PRIu64, i + 1, p);
710                                                 if (ret == SR_OK)
711                                                         siglent_sds_get_dev_cfg_vertical(sdi);
712                                                 return ret;
713                                         }
714                                 }
715                                 sr_err("Invalid probe factor: %"PRIu64".", p);
716                                 return SR_ERR_ARG;
717                         }
718                 }
719                 sr_dbg("Didn't set probe factor, unknown channel(group).");
720                 return SR_ERR_NA;
721         case SR_CONF_DATA_SOURCE:
722                 tmp_str = g_variant_get_string(data, NULL);
723                 if (!strcmp(tmp_str, "Display"))
724                         devc->data_source = DATA_SOURCE_SCREEN;
725                 else if (devc->model->series->protocol >= SPO_MODEL
726                         && !strcmp(tmp_str, "History"))
727                         devc->data_source = DATA_SOURCE_HISTORY;
728                 else {
729                         sr_err("Unknown data source: '%s'.", tmp_str);
730                         return SR_ERR;
731                 }
732                 break;
733         case SR_CONF_SAMPLERATE:
734                 siglent_sds_get_dev_cfg_horizontal(sdi);
735                 data = g_variant_new_uint64(devc->sampleRate);
736                 break;
737         default:
738                 return SR_ERR_NA;
739         }
740
741         return ret;
742 }
743
744 static int config_list(uint32_t key, GVariant **data,
745         const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
746 {
747         GVariant *tuple, *rational[2];
748         GVariantBuilder gvb;
749         unsigned int i;
750         struct dev_context *devc = NULL;
751
752         if (key == SR_CONF_SCAN_OPTIONS) {
753                 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
754                         scanopts, ARRAY_SIZE(scanopts), sizeof(uint32_t));
755                 return SR_OK;
756         } else if (key == SR_CONF_DEVICE_OPTIONS && !cg) {
757                 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
758                         devopts, ARRAY_SIZE(devopts), sizeof(uint32_t));
759                 return SR_OK;
760         }
761
762         /* Every other option requires a valid device instance. */
763         if (!sdi)
764                 return SR_ERR_ARG;
765         devc = sdi->priv;
766
767         /* If a channel group is specified, it must be a valid one. */
768         if (cg && !g_slist_find(sdi->channel_groups, cg)) {
769                 sr_err("Invalid channel group specified.");
770                 return SR_ERR;
771         }
772
773         switch (key) {
774         case SR_CONF_DEVICE_OPTIONS:
775                 if (!cg)
776                         return SR_ERR_CHANNEL_GROUP;
777                 if (cg == devc->digital_group) {
778                         *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
779                                 NULL, 0, sizeof(uint32_t));
780                         return SR_OK;
781                 } else {
782                         for (i = 0; i < devc->model->analog_channels; i++) {
783                                 if (cg == devc->analog_groups[i]) {
784                                         *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
785                                                 analog_devopts, ARRAY_SIZE(analog_devopts), sizeof(uint32_t));
786                                         return SR_OK;
787                                 }
788                         }
789                         return SR_ERR_NA;
790                 }
791                 break;
792         case SR_CONF_COUPLING:
793                 if (!cg)
794                         return SR_ERR_CHANNEL_GROUP;
795                 *data = g_variant_new_strv(coupling, ARRAY_SIZE(coupling));
796                 break;
797         case SR_CONF_PROBE_FACTOR:
798                 if (!cg)
799                         return SR_ERR_CHANNEL_GROUP;
800                 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT64,
801                         probe_factor, ARRAY_SIZE(probe_factor), sizeof(uint64_t));
802                 break;
803         case SR_CONF_VDIV:
804                 if (!devc)
805                         /* Can't know this until we have the exact model. */
806                         return SR_ERR_ARG;
807                 if (!cg)
808                         return SR_ERR_CHANNEL_GROUP;
809                 g_variant_builder_init(&gvb, G_VARIANT_TYPE_ARRAY);
810                 for (i = 0; i < devc->num_vdivs; i++) {
811                         rational[0] = g_variant_new_uint64(devc->vdivs[i][0]);
812                         rational[1] = g_variant_new_uint64(devc->vdivs[i][1]);
813                         tuple = g_variant_new_tuple(rational, 2);
814                         g_variant_builder_add_value(&gvb, tuple);
815                 }
816                 *data = g_variant_builder_end(&gvb);
817                 break;
818         case SR_CONF_TIMEBASE:
819                 if (!devc)
820                         /* Can't know this until we have the exact model. */
821                         return SR_ERR_ARG;
822                 if (devc->num_timebases <= 0)
823                         return SR_ERR_NA;
824                 g_variant_builder_init(&gvb, G_VARIANT_TYPE_ARRAY);
825                 for (i = 0; i < devc->num_timebases; i++) {
826                         rational[0] = g_variant_new_uint64(devc->timebases[i][0]);
827                         rational[1] = g_variant_new_uint64(devc->timebases[i][1]);
828                         tuple = g_variant_new_tuple(rational, 2);
829                         g_variant_builder_add_value(&gvb, tuple);
830                 }
831                 *data = g_variant_builder_end(&gvb);
832                 break;
833         case SR_CONF_TRIGGER_SOURCE:
834                 if (!devc)
835                         /* Can't know this until we have the exact model. */
836                         return SR_ERR_ARG;
837                 *data = g_variant_new_strv(trigger_sources,
838                         devc->model->has_digital ? ARRAY_SIZE(trigger_sources) : 5);
839                 break;
840         case SR_CONF_TRIGGER_SLOPE:
841                 *data = g_variant_new_strv(trigger_slopes, ARRAY_SIZE(trigger_slopes));
842                 break;
843         case SR_CONF_DATA_SOURCE:
844                 if (!devc)
845                         /* Can't know this until we have the exact model. */
846                         return SR_ERR_ARG;
847                 switch (devc->model->series->protocol) {
848                 /* TODO: Check what must be done here for the data source buffer sizes. */
849                 case NON_SPO_MODEL:
850                         *data = g_variant_new_strv(data_sources, ARRAY_SIZE(data_sources) - 1);
851                         break;
852                 case SPO_MODEL:
853                         *data = g_variant_new_strv(data_sources, ARRAY_SIZE(data_sources));
854                         break;
855                 }
856                 break;
857         case SR_CONF_NUM_HDIV:
858                 *data = g_variant_new_int32(devc->model->series->num_horizontal_divs);
859                 break;
860         case SR_CONF_AVERAGING:
861                 /* TODO: Implement averaging. */
862                 break;
863         default:
864                 return SR_ERR_NA;
865         }
866
867         return SR_OK;
868 }
869
870 static int dev_acquisition_start(const struct sr_dev_inst *sdi)
871 {
872         struct sr_scpi_dev_inst *scpi;
873         struct dev_context *devc;
874         struct sr_channel *ch;
875         struct sr_datafeed_packet packet;
876         gboolean some_digital;
877         GSList *l;
878         GSList *d;
879
880         if (sdi->status != SR_ST_ACTIVE)
881                 return SR_ERR_DEV_CLOSED;
882
883         scpi = sdi->conn;
884         devc = sdi->priv;
885
886         devc->num_frames = 0;
887         some_digital = FALSE;
888
889         /*
890          * Check if there are any logic channels enabled, if so then enable
891          * the MSO, otherwise skip the digital channel setup. Enable and
892          * disable channels on the device is very slow and it is faster when
893          * checked in a small loop without the actual actions.
894          */
895         for (d = sdi->channels; d; d = d->next) {
896                 ch = d->data;
897                 if (ch->type == SR_CHANNEL_LOGIC && ch->enabled)
898                         some_digital = TRUE;
899         }
900
901         for (l = sdi->channels; l; l = l->next) {
902                 ch = l->data;
903                 if (ch->type == SR_CHANNEL_ANALOG) {
904                         if (ch->enabled)
905                                 devc->enabled_channels = g_slist_append(
906                                         devc->enabled_channels, ch);
907                         if (ch->enabled != devc->analog_channels[ch->index]) {
908                                 /* Enabled channel is currently disabled, or vice versa. */
909                                 if (siglent_sds_config_set(sdi, "C%d:TRA %s", ch->index + 1,
910                                         ch->enabled ? "ON" : "OFF") != SR_OK)
911                                         return SR_ERR;
912                                 devc->analog_channels[ch->index] = ch->enabled;
913                         }
914                 } else if (ch->type == SR_CHANNEL_LOGIC && some_digital) {
915                         if (ch->enabled) {
916                                 /* Turn on LA module if currently off and digital channels are enabled. */
917                                 if (!devc->la_enabled) {
918                                         if (siglent_sds_config_set(sdi, "DGST ON") != SR_OK)
919                                                 return SR_ERR;
920                                         g_usleep(630000);
921                                         devc->la_enabled = TRUE;
922                                 }
923                                 devc->enabled_channels = g_slist_append(
924                                         devc->enabled_channels, ch);
925                         }
926                         /* Enabled channel is currently disabled, or vice versa. */
927                         if (siglent_sds_config_set(sdi, "D%d:DGCH %s", ch->index,
928                                 ch->enabled ? "ON" : "OFF") != SR_OK)
929                                 return SR_ERR;
930                         /* Slowing the command sequence down to let the device handle it. */
931                         g_usleep(630000);
932                         devc->digital_channels[ch->index] = ch->enabled;
933                 }
934         }
935         if (!devc->enabled_channels)
936                 return SR_ERR;
937         /* Turn off LA module if on and no digital channels selected. */
938         if (devc->la_enabled && !some_digital)
939                 if (siglent_sds_config_set(sdi, "DGST OFF") != SR_OK) {
940                         devc->la_enabled = FALSE;
941                         g_usleep(500000);
942                         return SR_ERR;
943                 }
944
945         // devc->analog_frame_size = devc->model->series->buffer_samples;
946         // devc->digital_frame_size = devc->model->series->buffer_samples;
947
948         switch (devc->model->series->protocol) {
949         case SPO_MODEL:
950                 if (siglent_sds_config_set(sdi, "WFSU SP,0,TYPE,1") != SR_OK)
951                         return SR_ERR;
952                 if (siglent_sds_config_set(sdi, "ACQW SAMPLING") != SR_OK)
953                         return SR_ERR;
954                 break;
955         case NON_SPO_MODEL:
956                 /* TODO: Implement CML/CNL/DL models. */
957                 if (siglent_sds_config_set(sdi, "WFSU SP,0,TYPE,1") != SR_OK)
958                         return SR_ERR;
959                 if (siglent_sds_config_set(sdi, "ACQW SAMPLING") != SR_OK)
960                         return SR_ERR;
961                 break;
962         default:
963                 break;
964         }
965
966         sr_scpi_source_add(sdi->session, scpi, G_IO_IN, 50,
967                 siglent_sds_receive, (void *) sdi);
968
969         std_session_send_df_header(sdi);
970
971         devc->channel_entry = devc->enabled_channels;
972
973         if (siglent_sds_capture_start(sdi) != SR_OK)
974                 return SR_ERR;
975
976         /* Start of first frame. */
977         packet.type = SR_DF_FRAME_BEGIN;
978         sr_session_send(sdi, &packet);
979
980         return SR_OK;
981 }
982
983 static int dev_acquisition_stop(struct sr_dev_inst *sdi)
984 {
985         struct dev_context *devc;
986         struct sr_scpi_dev_inst *scpi;
987
988         devc = sdi->priv;
989
990         if (sdi->status != SR_ST_ACTIVE) {
991                 sr_err("Device inactive, can't stop acquisition.");
992                 return SR_ERR;
993         }
994
995         std_session_send_df_end(sdi);
996
997         g_slist_free(devc->enabled_channels);
998         devc->enabled_channels = NULL;
999         scpi = sdi->conn;
1000         sr_scpi_source_remove(sdi->session, scpi);
1001
1002         return SR_OK;
1003 }
1004
1005 SR_PRIV struct sr_dev_driver siglent_sds_driver_info = {
1006         .name = "siglent-sds",
1007         .longname = "Siglent SDS1000/SDS2000",
1008         .api_version = 1,
1009         .init = std_init,
1010         .cleanup = std_cleanup,
1011         .scan = scan,
1012         .dev_list = std_dev_list,
1013         .dev_clear = dev_clear,
1014         .config_get = config_get,
1015         .config_set = config_set,
1016         .config_list = config_list,
1017         .dev_open = dev_open,
1018         .dev_close = dev_close,
1019         .dev_acquisition_start = dev_acquisition_start,
1020         .dev_acquisition_stop = dev_acquisition_stop,
1021         .context = NULL,
1022 };
1023
1024 SR_REGISTER_DEV_DRIVER(siglent_sds_driver_info);