2 * This file is part of the libsigrok project.
4 * Copyright (C) 2018 James Churchill <pelrun@gmail.com>
5 * Copyright (C) 2019 Frank Stettner <frank-stettner@gmx.net>
6 * Copyright (C) 2021 Gerhard Sittig <gerhard.sittig@gmx.net>
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/>.
28 static const uint32_t scanopts[] = {
34 static const uint32_t drvopts[] = {
38 static const uint32_t devopts[] = {
40 SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
41 SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
42 SR_CONF_VOLTAGE | SR_CONF_GET,
43 SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
44 SR_CONF_CURRENT | SR_CONF_GET,
45 SR_CONF_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
46 SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
47 SR_CONF_REGULATION | SR_CONF_GET,
48 SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE | SR_CONF_GET,
49 SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
50 SR_CONF_OVER_CURRENT_PROTECTION_ACTIVE | SR_CONF_GET,
51 SR_CONF_OVER_CURRENT_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
54 static const uint32_t devopts_w_range[] = {
56 SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
57 SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
58 SR_CONF_VOLTAGE | SR_CONF_GET,
59 SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
60 SR_CONF_CURRENT | SR_CONF_GET,
61 SR_CONF_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
62 SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
63 SR_CONF_REGULATION | SR_CONF_GET,
64 SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE | SR_CONF_GET,
65 SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
66 SR_CONF_OVER_CURRENT_PROTECTION_ACTIVE | SR_CONF_GET,
67 SR_CONF_OVER_CURRENT_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
68 SR_CONF_RANGE | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
71 /* Range name, max current/voltage/power, current/voltage digits. */
72 static const struct rdtech_dps_range ranges_dps3005[] = {
73 { "5A", 5, 30, 160, 3, 2 }
76 static const struct rdtech_dps_range ranges_dps5005[] = {
77 { "5A", 5, 50, 250, 3, 2 }
80 static const struct rdtech_dps_range ranges_dps5015[] = {
81 { "15A", 15, 50, 750, 2, 2 }
84 static const struct rdtech_dps_range ranges_dps5020[] = {
85 { "20A", 20, 50, 1000, 2, 2 }
88 static const struct rdtech_dps_range ranges_dps8005[] = {
89 { "5A", 5, 80, 408, 3, 2 }
92 static const struct rdtech_dps_range ranges_rd6006[] = {
93 { "6A", 6, 60, 360, 3, 2 }
96 static const struct rdtech_dps_range ranges_rd6006p[] = {
97 { "6A", 6, 60, 360, 4, 3 }
100 static const struct rdtech_dps_range ranges_rd6012[] = {
101 { "12A", 12, 60, 720, 2, 2 }
105 * RD6012P supports multiple current ranges with differing resolution.
106 * Up to 6A with 4 digits (when RTU reg 20 == 0), up to 12A with 3 digits
107 * (when RTU reg 20 == 1).
109 static const struct rdtech_dps_range ranges_rd6012p[] = {
110 { "6A", 6, 60, 360, 4, 3 },
111 { "12A", 12, 60, 720, 3, 3 }
114 static const struct rdtech_dps_range ranges_rd6018[] = {
115 { "18A", 18, 60, 1080, 2, 2 }
118 static const struct rdtech_dps_range ranges_rd6024[] = {
119 { "24A", 24, 60, 1440, 2, 2 }
122 /* Model ID, model name, model dependent ranges. */
123 static const struct rdtech_dps_model supported_models[] = {
124 { MODEL_DPS, 3005, "DPS3005", ARRAY_AND_SIZE(ranges_dps3005), },
125 { MODEL_DPS, 5005, "DPS5005", ARRAY_AND_SIZE(ranges_dps5005), },
126 { MODEL_DPS, 5205, "DPH5005", ARRAY_AND_SIZE(ranges_dps5005), },
127 { MODEL_DPS, 5015, "DPS5015", ARRAY_AND_SIZE(ranges_dps5015), },
128 { MODEL_DPS, 5020, "DPS5020", ARRAY_AND_SIZE(ranges_dps5020), },
129 { MODEL_DPS, 8005, "DPS8005", ARRAY_AND_SIZE(ranges_dps8005), },
131 * Specs for models RD60nn taken from the 2020.12.2 instruction manual,
132 * specs for RD6006P from the 2021.2.26 (english) manual,
133 * specs for RD6012P from the 2021.10.26 (english) manual,
134 * and specs for RD6024P from the 2021.1.7 (english) manual.
136 { MODEL_RD, 60061, "RD6006" , ARRAY_AND_SIZE(ranges_rd6006), },
137 { MODEL_RD, 60062, "RD6006" , ARRAY_AND_SIZE(ranges_rd6006), },
138 { MODEL_RD, 60065, "RD6006P", ARRAY_AND_SIZE(ranges_rd6006p), },
139 { MODEL_RD, 60121, "RD6012" , ARRAY_AND_SIZE(ranges_rd6012), },
140 { MODEL_RD, 60125, "RD6012P", ARRAY_AND_SIZE(ranges_rd6012p), },
141 { MODEL_RD, 60181, "RD6018" , ARRAY_AND_SIZE(ranges_rd6018), },
142 { MODEL_RD, 60241, "RD6024" , ARRAY_AND_SIZE(ranges_rd6024), },
145 static struct sr_dev_driver rdtech_dps_driver_info;
146 static struct sr_dev_driver rdtech_rd_driver_info;
148 static struct sr_dev_inst *probe_device(struct sr_modbus_dev_inst *modbus,
149 enum rdtech_dps_model_type model_type)
151 static const char *type_prefix[] = {
156 uint16_t id, version;
159 const struct rdtech_dps_model *model, *supported;
161 struct sr_dev_inst *sdi;
162 struct dev_context *devc;
164 ret = rdtech_dps_get_model_version(modbus,
165 model_type, &id, &version, &serno);
166 sr_dbg("probe: ret %d, type %s, model %u, vers %u, snr %u.",
167 ret, type_prefix[model_type], id, version, serno);
171 for (i = 0; i < ARRAY_SIZE(supported_models); i++) {
172 supported = &supported_models[i];
173 if (model_type != supported->model_type)
175 if (id != supported->id)
181 sr_err("Unknown model: %s%u.", type_prefix[model_type], id);
185 sdi = g_malloc0(sizeof(*sdi));
186 sdi->status = SR_ST_INACTIVE;
187 sdi->vendor = g_strdup("RDTech");
188 switch (model_type) {
190 sdi->model = g_strdup(model->name);
191 sdi->version = g_strdup_printf("v%u", version);
192 sdi->driver = &rdtech_dps_driver_info;
195 sdi->model = g_strdup(model->name);
196 sdi->version = g_strdup_printf("v%u.%u",
197 version / 100, version % 100);
199 sdi->serial_num = g_strdup_printf("%u", serno);
200 sdi->driver = &rdtech_rd_driver_info;
203 sr_err("Programming error, unhandled DPS/DPH/RD device type.");
209 sdi->inst_type = SR_INST_MODBUS;
211 sr_channel_new(sdi, 0, SR_CHANNEL_ANALOG, TRUE, "V");
212 sr_channel_new(sdi, 1, SR_CHANNEL_ANALOG, TRUE, "I");
213 sr_channel_new(sdi, 2, SR_CHANNEL_ANALOG, TRUE, "P");
215 devc = g_malloc0(sizeof(*devc));
217 sr_sw_limits_init(&devc->limits);
219 ret = rdtech_dps_update_range(sdi);
226 static struct sr_dev_inst *probe_device_dps(struct sr_modbus_dev_inst *modbus)
228 return probe_device(modbus, MODEL_DPS);
231 static struct sr_dev_inst *probe_device_rd(struct sr_modbus_dev_inst *modbus)
233 return probe_device(modbus, MODEL_RD);
236 static int config_compare(gconstpointer a, gconstpointer b)
238 const struct sr_config *ac = a, *bc = b;
239 return ac->key != bc->key;
242 static GSList *scan(struct sr_dev_driver *di, GSList *options,
243 enum rdtech_dps_model_type model_type)
245 static const char *default_serialcomm_dps = "9600/8n1";
246 static const char *default_serialcomm_rd = "115200/8n1";
248 struct sr_config default_serialcomm = {
249 .key = SR_CONF_SERIALCOMM,
252 struct sr_config default_modbusaddr = {
253 .key = SR_CONF_MODBUSADDR,
254 .data = g_variant_new_uint64(1),
256 GSList *opts, *devices;
257 const char *serialcomm;
258 struct sr_dev_inst *(*probe_func)(struct sr_modbus_dev_inst *modbus);
260 /* TODO See why di->context isn't available yet at this time. */
263 if (di->context == &rdtech_dps_driver_info || model_type == MODEL_DPS) {
264 serialcomm = default_serialcomm_dps;
265 probe_func = probe_device_dps;
267 if (di->context == &rdtech_rd_driver_info || model_type == MODEL_RD) {
268 serialcomm = default_serialcomm_rd;
269 probe_func = probe_device_rd;
273 if (serialcomm && *serialcomm)
274 default_serialcomm.data = g_variant_new_string(serialcomm);
277 if (!g_slist_find_custom(options, &default_serialcomm, config_compare))
278 opts = g_slist_prepend(opts, &default_serialcomm);
279 if (!g_slist_find_custom(options, &default_modbusaddr, config_compare))
280 opts = g_slist_prepend(opts, &default_modbusaddr);
282 devices = sr_modbus_scan(di->context, opts, probe_func);
284 while (opts != options)
285 opts = g_slist_delete_link(opts, opts);
286 g_variant_unref(default_serialcomm.data);
287 g_variant_unref(default_modbusaddr.data);
292 static GSList *scan_dps(struct sr_dev_driver *di, GSList *options)
294 return scan(di, options, MODEL_DPS);
297 static GSList *scan_rd(struct sr_dev_driver *di, GSList *options)
299 return scan(di, options, MODEL_RD);
302 static int dev_open(struct sr_dev_inst *sdi)
304 struct sr_modbus_dev_inst *modbus;
305 struct rdtech_dps_state state;
309 if (sr_modbus_open(modbus) < 0)
312 memset(&state, 0, sizeof(state));
314 state.mask |= STATE_LOCK;
315 ret = rdtech_dps_set_state(sdi, &state);
322 static int dev_close(struct sr_dev_inst *sdi)
324 struct sr_modbus_dev_inst *modbus;
325 struct rdtech_dps_state state;
331 memset(&state, 0, sizeof(state));
333 state.mask |= STATE_LOCK;
334 (void)rdtech_dps_set_state(sdi, &state);
336 return sr_modbus_close(modbus);
339 static int config_get(uint32_t key, GVariant **data,
340 const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
342 struct dev_context *devc;
343 struct rdtech_dps_state state;
345 const char *cc_text, *range_text;
353 case SR_CONF_LIMIT_SAMPLES:
354 case SR_CONF_LIMIT_MSEC:
355 ret = sr_sw_limits_config_get(&devc->limits, key, data);
357 case SR_CONF_ENABLED:
358 ret = rdtech_dps_get_state(sdi, &state, ST_CTX_CONFIG);
361 if (!(state.mask & STATE_OUTPUT_ENABLED))
363 *data = g_variant_new_boolean(state.output_enabled);
365 case SR_CONF_REGULATION:
366 ret = rdtech_dps_get_state(sdi, &state, ST_CTX_CONFIG);
369 if (!(state.mask & STATE_REGULATION_CC))
371 cc_text = state.regulation_cc ? "CC" : "CV";
372 *data = g_variant_new_string(cc_text);
374 case SR_CONF_VOLTAGE:
375 ret = rdtech_dps_get_state(sdi, &state, ST_CTX_CONFIG);
378 if (!(state.mask & STATE_VOLTAGE))
380 *data = g_variant_new_double(state.voltage);
382 case SR_CONF_VOLTAGE_TARGET:
383 ret = rdtech_dps_get_state(sdi, &state, ST_CTX_CONFIG);
386 if (!(state.mask & STATE_VOLTAGE_TARGET))
388 *data = g_variant_new_double(state.voltage_target);
390 case SR_CONF_CURRENT:
391 ret = rdtech_dps_get_state(sdi, &state, ST_CTX_CONFIG);
394 if (!(state.mask & STATE_CURRENT))
396 *data = g_variant_new_double(state.current);
398 case SR_CONF_CURRENT_LIMIT:
399 ret = rdtech_dps_get_state(sdi, &state, ST_CTX_CONFIG);
402 if (!(state.mask & STATE_CURRENT_LIMIT))
404 *data = g_variant_new_double(state.current_limit);
406 case SR_CONF_OVER_VOLTAGE_PROTECTION_ENABLED:
407 ret = rdtech_dps_get_state(sdi, &state, ST_CTX_CONFIG);
410 if (!(state.mask & STATE_PROTECT_ENABLED))
412 *data = g_variant_new_boolean(state.protect_enabled);
414 case SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE:
415 ret = rdtech_dps_get_state(sdi, &state, ST_CTX_CONFIG);
418 if (!(state.mask & STATE_PROTECT_OVP))
420 *data = g_variant_new_boolean(state.protect_ovp);
422 case SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD:
423 ret = rdtech_dps_get_state(sdi, &state, ST_CTX_CONFIG);
426 if (!(state.mask & STATE_OUTPUT_ENABLED))
428 *data = g_variant_new_double(state.ovp_threshold);
430 case SR_CONF_OVER_CURRENT_PROTECTION_ENABLED:
431 ret = rdtech_dps_get_state(sdi, &state, ST_CTX_CONFIG);
434 if (!(state.mask & STATE_PROTECT_ENABLED))
436 *data = g_variant_new_boolean(state.protect_enabled);
438 case SR_CONF_OVER_CURRENT_PROTECTION_ACTIVE:
439 ret = rdtech_dps_get_state(sdi, &state, ST_CTX_CONFIG);
442 if (!(state.mask & STATE_PROTECT_OCP))
444 *data = g_variant_new_boolean(state.protect_ocp);
446 case SR_CONF_OVER_CURRENT_PROTECTION_THRESHOLD:
447 ret = rdtech_dps_get_state(sdi, &state, ST_CTX_CONFIG);
450 if (!(state.mask & STATE_OCP_THRESHOLD))
452 *data = g_variant_new_double(state.ocp_threshold);
455 ret = rdtech_dps_get_state(sdi, &state, ST_CTX_CONFIG);
458 if (!(state.mask & STATE_RANGE))
460 range_text = devc->model->ranges[state.range].range_str;
461 *data = g_variant_new_string(range_text);
470 static int config_set(uint32_t key, GVariant *data,
471 const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
473 struct dev_context *devc;
474 struct rdtech_dps_state state;
475 const char *range_str;
476 const struct rdtech_dps_range *range;
482 memset(&state, 0, sizeof(state));
485 case SR_CONF_LIMIT_SAMPLES:
486 case SR_CONF_LIMIT_MSEC:
487 return sr_sw_limits_config_set(&devc->limits, key, data);
488 case SR_CONF_ENABLED:
489 state.output_enabled = g_variant_get_boolean(data);
490 state.mask |= STATE_OUTPUT_ENABLED;
491 return rdtech_dps_set_state(sdi, &state);
492 case SR_CONF_VOLTAGE_TARGET:
493 state.voltage_target = g_variant_get_double(data);
494 state.mask |= STATE_VOLTAGE_TARGET;
495 return rdtech_dps_set_state(sdi, &state);
496 case SR_CONF_CURRENT_LIMIT:
497 state.current_limit = g_variant_get_double(data);
498 state.mask |= STATE_CURRENT_LIMIT;
499 return rdtech_dps_set_state(sdi, &state);
500 case SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD:
501 state.ovp_threshold = g_variant_get_double(data);
502 state.mask |= STATE_OVP_THRESHOLD;
503 return rdtech_dps_set_state(sdi, &state);
504 case SR_CONF_OVER_CURRENT_PROTECTION_THRESHOLD:
505 state.ocp_threshold = g_variant_get_double(data);
506 state.mask |= STATE_OCP_THRESHOLD;
507 return rdtech_dps_set_state(sdi, &state);
509 range_str = g_variant_get_string(data, NULL);
510 for (i = 0; i < devc->model->n_ranges; i++) {
511 range = &devc->model->ranges[i];
512 if (g_strcmp0(range->range_str, range_str) != 0)
515 state.mask |= STATE_RANGE;
516 return rdtech_dps_set_state(sdi, &state);
526 static int config_list(uint32_t key, GVariant **data,
527 const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
529 struct dev_context *devc;
530 const struct rdtech_dps_range *range;
535 devc = (sdi) ? sdi->priv : NULL;
538 case SR_CONF_SCAN_OPTIONS:
539 case SR_CONF_DEVICE_OPTIONS:
540 if (devc && devc->model->n_ranges > 1) {
541 return STD_CONFIG_LIST(key, data, sdi, cg,
542 scanopts, drvopts, devopts_w_range);
544 return STD_CONFIG_LIST(key, data, sdi, cg,
545 scanopts, drvopts, devopts);
547 case SR_CONF_VOLTAGE_TARGET:
548 rdtech_dps_update_range(sdi);
549 range = &devc->model->ranges[devc->curr_range];
550 *data = std_gvar_min_max_step(0.0, range->max_voltage,
551 1 / devc->voltage_multiplier);
553 case SR_CONF_CURRENT_LIMIT:
554 rdtech_dps_update_range(sdi);
555 range = &devc->model->ranges[devc->curr_range];
556 *data = std_gvar_min_max_step(0.0, range->max_current,
557 1 / devc->current_multiplier);
560 g_variant_builder_init(&gvb, G_VARIANT_TYPE_ARRAY);
561 for (i = 0; i < devc->model->n_ranges; i++) {
562 s = devc->model->ranges[i].range_str;
563 g_variant_builder_add(&gvb, "s", s);
565 *data = g_variant_builder_end(&gvb);
574 static int dev_acquisition_start(const struct sr_dev_inst *sdi)
576 struct dev_context *devc;
577 struct sr_modbus_dev_inst *modbus;
583 devc->acquisition_started = TRUE;
585 /* Seed internal state from current data. */
586 ret = rdtech_dps_seed_receive(sdi);
588 devc->acquisition_started = FALSE;
592 /* Register the periodic data reception callback. */
593 ret = sr_modbus_source_add(sdi->session, modbus, G_IO_IN, 10,
594 rdtech_dps_receive_data, (void *)sdi);
596 devc->acquisition_started = FALSE;
600 sr_sw_limits_acquisition_start(&devc->limits);
601 std_session_send_df_header(sdi);
606 static int dev_acquisition_stop(struct sr_dev_inst *sdi)
608 struct dev_context *devc;
609 struct sr_modbus_dev_inst *modbus;
613 std_session_send_df_end(sdi);
614 devc->acquisition_started = FALSE;
617 sr_modbus_source_remove(sdi->session, modbus);
622 static struct sr_dev_driver rdtech_dps_driver_info = {
623 .name = "rdtech-dps",
624 .longname = "RDTech DPS/DPH series power supply",
627 .cleanup = std_cleanup,
629 .dev_list = std_dev_list,
630 .dev_clear = std_dev_clear,
631 .config_get = config_get,
632 .config_set = config_set,
633 .config_list = config_list,
634 .dev_open = dev_open,
635 .dev_close = dev_close,
636 .dev_acquisition_start = dev_acquisition_start,
637 .dev_acquisition_stop = dev_acquisition_stop,
640 SR_REGISTER_DEV_DRIVER(rdtech_dps_driver_info);
642 static struct sr_dev_driver rdtech_rd_driver_info = {
644 .longname = "RDTech RD series power supply",
647 .cleanup = std_cleanup,
649 .dev_list = std_dev_list,
650 .dev_clear = std_dev_clear,
651 .config_get = config_get,
652 .config_set = config_set,
653 .config_list = config_list,
654 .dev_open = dev_open,
655 .dev_close = dev_close,
656 .dev_acquisition_start = dev_acquisition_start,
657 .dev_acquisition_stop = dev_acquisition_stop,
660 SR_REGISTER_DEV_DRIVER(rdtech_rd_driver_info);