1 /*
2 * This file is part of the libsigrok project.
3 *
4 * Copyright (C) 2014 Matthias Heidbrink <m-sigrok@heidbrink.biz>
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 "protocol.h"
22
23 #define SERIALCOMM "9600/8n1"
24
25 static const uint32_t scanopts[] = {
26 SR_CONF_CONN,
27 SR_CONF_SERIALCOMM,
28 };
29
30 static const uint32_t drvopts[] = {
31 SR_CONF_POWER_SUPPLY,
32 };
33
34 static const uint32_t devopts[] = {
35 SR_CONF_VOLTAGE_TARGET | SR_CONF_SET | SR_CONF_LIST,
36 SR_CONF_CURRENT_LIMIT | SR_CONF_SET | SR_CONF_LIST,
37 SR_CONF_OVER_CURRENT_PROTECTION_ENABLED | SR_CONF_SET,
38 };
39
scan(struct sr_dev_driver * di,GSList * options)40 static GSList *scan(struct sr_dev_driver *di, GSList *options)
41 {
42 struct dev_context *devc;
43 struct sr_dev_inst *sdi;
44 struct sr_config *src;
45 struct sr_serial_dev_inst *serial;
46 GSList *l;
47 const char *conn, *serialcomm;
48
49 conn = serialcomm = NULL;
50
51 for (l = options; l; l = l->next) {
52 src = l->data;
53 switch (src->key) {
54 case SR_CONF_CONN:
55 conn = g_variant_get_string(src->data, NULL);
56 break;
57 case SR_CONF_SERIALCOMM:
58 serialcomm = g_variant_get_string(src->data, NULL);
59 break;
60 }
61 }
62 if (!conn)
63 return NULL;
64 if (!serialcomm)
65 serialcomm = SERIALCOMM;
66
67 /*
68 * We cannot scan for this device because it is write-only.
69 * So just check that the port parameters are valid and assume that
70 * the device is there.
71 */
72
73 serial = sr_serial_dev_inst_new(conn, serialcomm);
74
75 if (serial_open(serial, SERIAL_RDWR) != SR_OK)
76 return NULL;
77
78 serial_flush(serial);
79 serial_close(serial);
80
81 sr_spew("Conrad DIGI 35 CPU assumed at %s.", conn);
82
83 sdi = g_malloc0(sizeof(struct sr_dev_inst));
84 sdi->status = SR_ST_INACTIVE;
85 sdi->vendor = g_strdup("Conrad");
86 sdi->model = g_strdup("DIGI 35 CPU");
87 devc = g_malloc0(sizeof(struct dev_context));
88 sr_sw_limits_init(&devc->limits);
89 sdi->inst_type = SR_INST_SERIAL;
90 sdi->conn = serial;
91 sdi->priv = devc;
92 sr_channel_new(sdi, 0, SR_CHANNEL_ANALOG, TRUE, "CH1");
93
94 return std_scan_complete(di, g_slist_append(NULL, sdi));
95 }
96
config_set(uint32_t key,GVariant * data,const struct sr_dev_inst * sdi,const struct sr_channel_group * cg)97 static int config_set(uint32_t key, GVariant *data,
98 const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
99 {
100 double dblval;
101
102 (void)cg;
103
104 switch (key) {
105 case SR_CONF_VOLTAGE_TARGET:
106 dblval = g_variant_get_double(data);
107 if ((dblval < 0.0) || (dblval > 35.0)) {
108 sr_err("Voltage out of range (0 - 35.0)!");
109 return SR_ERR_ARG;
110 }
111 return send_msg1(sdi, 'V', (int) (dblval * 10 + 0.5));
112 case SR_CONF_CURRENT_LIMIT:
113 dblval = g_variant_get_double(data);
114 if ((dblval < 0.00) || (dblval > 2.55)) {
115 sr_err("Current out of range (0 - 2.55)!");
116 return SR_ERR_ARG;
117 }
118 return send_msg1(sdi, 'C', (int) (dblval * 100 + 0.5));
119 case SR_CONF_OVER_CURRENT_PROTECTION_ENABLED:
120 if (g_variant_get_boolean(data))
121 return send_msg1(sdi, 'V', 900);
122 else /* Constant current mode */
123 return send_msg1(sdi, 'V', 901);
124 default:
125 return SR_ERR_NA;
126 }
127
128 return SR_OK;
129 }
130
config_list(uint32_t key,GVariant ** data,const struct sr_dev_inst * sdi,const struct sr_channel_group * cg)131 static int config_list(uint32_t key, GVariant **data,
132 const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
133 {
134 switch (key) {
135 case SR_CONF_SCAN_OPTIONS:
136 case SR_CONF_DEVICE_OPTIONS:
137 return STD_CONFIG_LIST(key, data, sdi, cg, scanopts, drvopts, devopts);
138 case SR_CONF_VOLTAGE_TARGET:
139 *data = std_gvar_min_max_step(0.0, 35.0, 0.1);
140 break;
141 case SR_CONF_CURRENT_LIMIT:
142 *data = std_gvar_min_max_step(0.0, 2.55, 0.01);
143 break;
144 default:
145 return SR_ERR_NA;
146 }
147
148 return SR_OK;
149 }
150
151 static struct sr_dev_driver conrad_digi_35_cpu_driver_info = {
152 .name = "conrad-digi-35-cpu",
153 .longname = "Conrad DIGI 35 CPU",
154 .api_version = 1,
155 .init = std_init,
156 .cleanup = std_cleanup,
157 .scan = scan,
158 .dev_list = std_dev_list,
159 .dev_clear = std_dev_clear,
160 .config_get = NULL,
161 .config_set = config_set,
162 .config_list = config_list,
163 .dev_open = std_serial_dev_open,
164 .dev_close = std_serial_dev_close,
165 .dev_acquisition_start = std_dummy_dev_acquisition_start,
166 .dev_acquisition_stop = std_dummy_dev_acquisition_stop,
167 .context = NULL,
168 };
169 SR_REGISTER_DEV_DRIVER(conrad_digi_35_cpu_driver_info);
170