d5dfb074f1bc1b7aaa3a9d6ea30f35bc8a044847
[libsigrok.git] / src / hardware / scpi-pps / profiles.c
1 /*
2  * This file is part of the libsigrok project.
3  *
4  * Copyright (C) 2014 Bert Vermeulen <bert@biot.com>
5  * Copyright (C) 2015 Google, Inc.
6  * (Written by Alexandru Gagniuc <mrnuke@google.com> for Google, Inc.)
7  * Copyright (C) 2017,2019 Frank Stettner <frank-stettner@gmx.net>
8  *
9  * This program is free software: you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation, either version 3 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
21  */
22
23 #include <config.h>
24 #include <string.h>
25 #include <strings.h>
26 #include "protocol.h"
27
28 #define CH_IDX(x) (1 << x)
29 #define FREQ_DC_ONLY {0, 0, 0, 0, 0}
30 #define NO_OVP_LIMITS {0, 0, 0, 0, 0}
31 #define NO_OCP_LIMITS {0, 0, 0, 0, 0}
32
33 /* Agilent/Keysight N5700A series */
34 static const uint32_t agilent_n5700a_devopts[] = {
35         SR_CONF_CONTINUOUS,
36         SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
37         SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
38 };
39
40 static const uint32_t agilent_n5700a_devopts_cg[] = {
41         SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
42         SR_CONF_OVER_CURRENT_PROTECTION_ENABLED | SR_CONF_GET | SR_CONF_SET,
43         SR_CONF_OVER_CURRENT_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
44         SR_CONF_VOLTAGE | SR_CONF_GET,
45         SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
46         SR_CONF_CURRENT | SR_CONF_GET,
47         SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
48 };
49
50 static const struct channel_group_spec agilent_n5700a_cg[] = {
51         { "1", CH_IDX(0), PPS_OVP | PPS_OCP, SR_MQFLAG_DC },
52 };
53
54 static const struct channel_spec agilent_n5767a_ch[] = {
55         { "1", { 0, 60, 0.0072, 3, 4 }, { 0, 25, 0.003, 3, 4 }, { 0, 1500 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
56 };
57
58 static const struct channel_spec agilent_n5763a_ch[] = {
59         { "1", { 0, 12.5, 0.0015, 3, 4 }, { 0, 120, 0.0144, 3, 4 }, { 0, 1500 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
60 };
61
62 /*
63  * TODO: OVER_CURRENT_PROTECTION_ACTIVE status can be determined by the OC bit
64  * in STAT:QUES:EVEN?, but this is not implemented.
65  */
66 static const struct scpi_command agilent_n5700a_cmd[] = {
67         { SCPI_CMD_REMOTE, "SYST:COMM:RLST REM" },
68         { SCPI_CMD_LOCAL, "SYST:COMM:RLST LOC" },
69         { SCPI_CMD_GET_MEAS_VOLTAGE, ":MEAS:VOLT?" },
70         { SCPI_CMD_GET_MEAS_CURRENT, "MEAS:CURR?" },
71         { SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT?" },
72         { SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT %.6f" },
73         { SCPI_CMD_GET_CURRENT_LIMIT, ":SOUR:CURR?" },
74         { SCPI_CMD_SET_CURRENT_LIMIT, ":SOUR:CURR %.6f" },
75         { SCPI_CMD_GET_OUTPUT_ENABLED, ":OUTP:STAT?" },
76         { SCPI_CMD_SET_OUTPUT_ENABLE, ":OUTP ON" },
77         { SCPI_CMD_SET_OUTPUT_DISABLE, ":OUTP OFF" },
78         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":VOLT:PROT?" },
79         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":VOLT:PROT %.6f" },
80         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ENABLED, ":CURR:PROT:STAT?" },
81         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_ENABLE, ":CURR:PROT:STAT ON?"},
82         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_DISABLE, ":CURR:PROT:STAT OFF?"},
83         /* Current limit (CC mode) and OCP are set using the same command. */
84         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_THRESHOLD, ":SOUR:CURR?" },
85         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_THRESHOLD, ":SOUR:CURR %.6f" },
86         ALL_ZERO
87 };
88
89 /* BK Precision 9130 series */
90 static const uint32_t bk_9130_devopts[] = {
91         SR_CONF_CONTINUOUS,
92         SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
93         SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
94 };
95
96 static const uint32_t bk_9130_devopts_cg[] = {
97         SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
98         SR_CONF_VOLTAGE | SR_CONF_GET,
99         SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
100         SR_CONF_CURRENT | SR_CONF_GET,
101         SR_CONF_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
102         SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
103 };
104
105 static const struct channel_spec bk_9130_ch[] = {
106         { "1", { 0, 30, 0.001, 3, 3 }, { 0, 3, 0.001, 3, 3 }, { 0, 90, 0, 3, 3 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
107         { "2", { 0, 30, 0.001, 3, 3 }, { 0, 3, 0.001, 3, 3 }, { 0, 90, 0, 3, 3 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
108         { "3", { 0,  5, 0.001, 3, 3 }, { 0, 3, 0.001, 3, 3 }, { 0, 15, 0, 3, 3 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
109 };
110
111 static const struct channel_group_spec bk_9130_cg[] = {
112         { "1", CH_IDX(0), PPS_OVP, SR_MQFLAG_DC },
113         { "2", CH_IDX(1), PPS_OVP, SR_MQFLAG_DC },
114         { "3", CH_IDX(2), PPS_OVP, SR_MQFLAG_DC },
115 };
116
117 static const struct scpi_command bk_9130_cmd[] = {
118         { SCPI_CMD_REMOTE, "SYST:REMOTE" },
119         { SCPI_CMD_LOCAL, "SYST:LOCAL" },
120         { SCPI_CMD_SELECT_CHANNEL, ":INST:NSEL %s" },
121         { SCPI_CMD_GET_MEAS_VOLTAGE, ":MEAS:VOLT?" },
122         { SCPI_CMD_GET_MEAS_CURRENT, ":MEAS:CURR?" },
123         { SCPI_CMD_GET_MEAS_POWER, ":MEAS:POWER?" },
124         { SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT?" },
125         { SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT %.6f" },
126         { SCPI_CMD_GET_CURRENT_LIMIT, ":SOUR:CURR?" },
127         { SCPI_CMD_SET_CURRENT_LIMIT, ":SOUR:CURR %.6f" },
128         { SCPI_CMD_GET_OUTPUT_ENABLED, ":OUTP?" },
129         { SCPI_CMD_SET_OUTPUT_ENABLE, ":OUTP 1" },
130         { SCPI_CMD_SET_OUTPUT_DISABLE, ":OUTP 0" },
131         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:PROT?" },
132         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:PROT %.6f" },
133         ALL_ZERO
134 };
135
136 /* Chroma 61600 series AC source */
137 static const uint32_t chroma_61604_devopts[] = {
138         SR_CONF_CONTINUOUS,
139         SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
140         SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
141 };
142
143 static const uint32_t chroma_61604_devopts_cg[] = {
144         SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
145         SR_CONF_OVER_CURRENT_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
146         SR_CONF_VOLTAGE | SR_CONF_GET,
147         SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
148         SR_CONF_OUTPUT_FREQUENCY | SR_CONF_GET,
149         SR_CONF_OUTPUT_FREQUENCY_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
150         SR_CONF_CURRENT | SR_CONF_GET,
151         SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
152 };
153
154 static const struct channel_spec chroma_61604_ch[] = {
155         { "1", { 0, 300, 0.1, 1, 1 }, { 0, 16, 0.1, 2, 2 }, { 0, 2000, 0, 1, 1 }, { 1.0, 1000.0, 0.01 }, NO_OVP_LIMITS, NO_OCP_LIMITS },
156 };
157
158 static const struct channel_group_spec chroma_61604_cg[] = {
159         { "1", CH_IDX(0), PPS_OVP | PPS_OCP, SR_MQFLAG_AC },
160 };
161
162 static const struct scpi_command chroma_61604_cmd[] = {
163         { SCPI_CMD_REMOTE, "SYST:REM" },
164         { SCPI_CMD_LOCAL, "SYST:LOC" },
165         { SCPI_CMD_GET_MEAS_VOLTAGE, ":FETC:VOLT:ACDC?" },
166         { SCPI_CMD_GET_MEAS_FREQUENCY, ":FETC:FREQ?" },
167         { SCPI_CMD_GET_MEAS_CURRENT, ":FETC:CURR:AC?" },
168         { SCPI_CMD_GET_MEAS_POWER, ":FETC:POW:AC?" },
169         { SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT:AC?" },
170         { SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT:AC %.1f" },
171         { SCPI_CMD_GET_FREQUENCY_TARGET, ":SOUR:FREQ?" },
172         { SCPI_CMD_SET_FREQUENCY_TARGET, ":SOUR:FREQ %.2f" },
173         { SCPI_CMD_GET_OUTPUT_ENABLED, ":OUTP?" },
174         { SCPI_CMD_SET_OUTPUT_ENABLE, ":OUTP ON" },
175         { SCPI_CMD_SET_OUTPUT_DISABLE, ":OUTP OFF" },
176         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:LIM:AC?" },
177         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:LIM:AC %.1f" },
178         /* This is not a current limit mode. It is overcurrent protection. */
179         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_THRESHOLD, ":SOUR:CURR:LIM?" },
180         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_THRESHOLD, ":SOUR:CURR:LIM %.2f" },
181         ALL_ZERO
182 };
183
184 /* Chroma 62000 series DC source */
185 static const uint32_t chroma_62000_devopts[] = {
186         SR_CONF_CONTINUOUS,
187         SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
188         SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
189 };
190
191 static const uint32_t chroma_62000_devopts_cg[] = {
192         SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
193         SR_CONF_OVER_CURRENT_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
194         SR_CONF_VOLTAGE | SR_CONF_GET,
195         SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
196         SR_CONF_CURRENT | SR_CONF_GET,
197         SR_CONF_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
198         SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
199 };
200
201 static const struct channel_group_spec chroma_62000_cg[] = {
202         { "1", CH_IDX(0), PPS_OVP | PPS_OCP, SR_MQFLAG_DC },
203 };
204
205 static const struct scpi_command chroma_62000_cmd[] = {
206         { SCPI_CMD_REMOTE, ":CONF:REM ON" },
207         { SCPI_CMD_LOCAL, ":CONF:REM OFF" },
208         { SCPI_CMD_BEEPER, ":CONF:BEEP?" },
209         { SCPI_CMD_BEEPER_ENABLE, ":CONF:BEEP ON" },
210         { SCPI_CMD_BEEPER_DISABLE, ":CONF:BEEP OFF" },
211         { SCPI_CMD_GET_MEAS_VOLTAGE, ":MEAS:VOLT?" },
212         { SCPI_CMD_GET_MEAS_CURRENT, ":MEAS:CURR?" },
213         { SCPI_CMD_GET_MEAS_POWER, ":MEAS:POW?" },
214         { SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT?" },
215         { SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT %.2f" },
216         { SCPI_CMD_GET_CURRENT_LIMIT, ":SOUR:CURR?" },
217         { SCPI_CMD_SET_CURRENT_LIMIT, ":SOUR:CURR %.6f" },
218         { SCPI_CMD_GET_OUTPUT_ENABLED, ":CONF:OUTP?" },
219         { SCPI_CMD_SET_OUTPUT_ENABLE, ":CONF:OUTP ON" },
220         { SCPI_CMD_SET_OUTPUT_DISABLE, ":CONF:OUTP OFF" },
221         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:PROT:HIGH?" },
222         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:PROT:HIGH %.6f" },
223         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_THRESHOLD, ":SOUR:CURR:PROT:HIGH?" },
224         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_THRESHOLD, ":SOUR:CURR:PROT:HIGH %.6f" },
225         ALL_ZERO
226 };
227
228 static int chroma_62000p_probe_channels(struct sr_dev_inst *sdi,
229                 struct sr_scpi_hw_info *hw_info,
230                 struct channel_spec **channels, unsigned int *num_channels,
231                 struct channel_group_spec **channel_groups,
232                 unsigned int *num_channel_groups)
233 {
234         unsigned int volts, amps, watts;
235         struct channel_spec *channel;
236
237         (void)sdi;
238
239         sscanf(hw_info->model, "620%uP-%u-%u", &watts, &volts, &amps);
240         watts *= 100;
241         sr_dbg("Found device rated for %d V, %d A and %d W", volts, amps, watts);
242
243         if (volts > 600) {
244                 sr_err("Probed max voltage of %u V is out of spec.", volts);
245                 return SR_ERR_BUG;
246         }
247
248         if (amps > 120) {
249                 sr_err("Probed max current of %u A is out of spec.", amps);
250                 return SR_ERR_BUG;
251         }
252
253         if (watts > 5000) {
254                 sr_err("Probed max power of %u W is out of spec.", watts);
255                 return SR_ERR_BUG;
256         }
257
258         channel = g_malloc0(sizeof(struct channel_spec));
259         channel->name = "1";
260         channel->voltage[0] = channel->current[0] = channel->power[0] = 0.0;
261         channel->voltage[1] = volts;
262         channel->current[1] = amps;
263         channel->power[1]   = watts;
264         channel->voltage[2] = channel->current[2] = 0.01;
265         channel->voltage[3] = channel->voltage[4] = 3;
266         channel->current[3] = channel->current[4] = 4;
267         *channels = channel;
268         *num_channels = 1;
269
270         *channel_groups = g_malloc(sizeof(struct channel_group_spec));
271         **channel_groups = chroma_62000_cg[0];
272         *num_channel_groups = 1;
273
274         return SR_OK;
275 }
276
277 /* Rigol DP700 series */
278 static const uint32_t rigol_dp700_devopts[] = {
279         SR_CONF_CONTINUOUS,
280         SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
281         SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
282 };
283
284 static const uint32_t rigol_dp700_devopts_cg[] = {
285         SR_CONF_REGULATION | SR_CONF_GET,
286         SR_CONF_OVER_VOLTAGE_PROTECTION_ENABLED | SR_CONF_GET | SR_CONF_SET,
287         SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE | SR_CONF_GET,
288         SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
289         SR_CONF_OVER_CURRENT_PROTECTION_ENABLED | SR_CONF_GET | SR_CONF_SET,
290         SR_CONF_OVER_CURRENT_PROTECTION_ACTIVE | SR_CONF_GET,
291         SR_CONF_OVER_CURRENT_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
292         SR_CONF_VOLTAGE | SR_CONF_GET,
293         SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
294         SR_CONF_CURRENT | SR_CONF_GET,
295         SR_CONF_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
296         SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
297 };
298
299 static const struct channel_spec rigol_dp711_ch[] = {
300         { "1", { 0, 30, 0.01, 3, 3 }, { 0, 5, 0.01, 3, 3 }, { 0, 150, 0, 3, 3 }, FREQ_DC_ONLY, { 0.01, 33, 0.01}, { 0.01, 5.5, 0.01 } },
301 };
302
303 static const struct channel_spec rigol_dp712_ch[] = {
304         { "1", { 0, 50, 0.01, 3, 3 }, { 0, 3, 0.01, 3, 3 }, { 0, 150, 0, 3, 3 }, FREQ_DC_ONLY, { 0.01, 55, 0.01}, { 0.01, 3.3, 0.01 } },
305 };
306
307 static const struct channel_group_spec rigol_dp700_cg[] = {
308         { "1", CH_IDX(0), PPS_OVP | PPS_OCP, SR_MQFLAG_DC },
309 };
310
311 /* Same as the DP800 series, except for the missing :SYST:OTP* commands. */
312 static const struct scpi_command rigol_dp700_cmd[] = {
313         { SCPI_CMD_REMOTE, "SYST:REMOTE" },
314         { SCPI_CMD_LOCAL, "SYST:LOCAL" },
315         { SCPI_CMD_BEEPER, "SYST:BEEP:STAT?" },
316         { SCPI_CMD_BEEPER_ENABLE, "SYST:BEEP:STAT ON" },
317         { SCPI_CMD_BEEPER_DISABLE, "SYST:BEEP:STAT OFF" },
318         { SCPI_CMD_SELECT_CHANNEL, ":INST:NSEL %s" },
319         { SCPI_CMD_GET_MEAS_VOLTAGE, ":MEAS:VOLT?" },
320         { SCPI_CMD_GET_MEAS_CURRENT, ":MEAS:CURR?" },
321         { SCPI_CMD_GET_MEAS_POWER, ":MEAS:POWE?" },
322         { SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT?" },
323         { SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT %.6f" },
324         { SCPI_CMD_GET_CURRENT_LIMIT, ":SOUR:CURR?" },
325         { SCPI_CMD_SET_CURRENT_LIMIT, ":SOUR:CURR %.6f" },
326         { SCPI_CMD_GET_OUTPUT_ENABLED, ":OUTP?" },
327         { SCPI_CMD_SET_OUTPUT_ENABLE, ":OUTP ON" },
328         { SCPI_CMD_SET_OUTPUT_DISABLE, ":OUTP OFF" },
329         { SCPI_CMD_GET_OUTPUT_REGULATION, ":OUTP:MODE?" },
330         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ENABLED, ":OUTP:OVP?" },
331         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_ENABLE, ":OUTP:OVP ON" },
332         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_DISABLE, ":OUTP:OVP OFF" },
333         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ACTIVE, ":OUTP:OVP:QUES?" },
334         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":OUTP:OVP:VAL?" },
335         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":OUTP:OVP:VAL %.6f" },
336         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ENABLED, ":OUTP:OCP?" },
337         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_ENABLE, ":OUTP:OCP:STAT ON" },
338         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_DISABLE, ":OUTP:OCP:STAT OFF" },
339         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ACTIVE, ":OUTP:OCP:QUES?" },
340         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_THRESHOLD, ":OUTP:OCP:VAL?" },
341         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_THRESHOLD, ":OUTP:OCP:VAL %.6f" },
342         ALL_ZERO
343 };
344
345 /* Rigol DP800 series */
346 static const uint32_t rigol_dp800_devopts[] = {
347         SR_CONF_CONTINUOUS,
348         SR_CONF_OVER_TEMPERATURE_PROTECTION | SR_CONF_GET | SR_CONF_SET,
349         SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
350         SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
351 };
352
353 static const uint32_t rigol_dp800_devopts_cg[] = {
354         SR_CONF_REGULATION | SR_CONF_GET,
355         SR_CONF_OVER_VOLTAGE_PROTECTION_ENABLED | SR_CONF_GET | SR_CONF_SET,
356         SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE | SR_CONF_GET,
357         SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
358         SR_CONF_OVER_CURRENT_PROTECTION_ENABLED | SR_CONF_GET | SR_CONF_SET,
359         SR_CONF_OVER_CURRENT_PROTECTION_ACTIVE | SR_CONF_GET,
360         SR_CONF_OVER_CURRENT_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
361         SR_CONF_VOLTAGE | SR_CONF_GET,
362         SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
363         SR_CONF_CURRENT | SR_CONF_GET,
364         SR_CONF_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
365         SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
366 };
367
368 static const struct channel_spec rigol_dp821a_ch[] = {
369         { "1", { 0, 60, 0.001, 3, 3 }, { 0, 1, 0.0001, 4, 4 }, { 0, 60, 0, 3, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
370         { "2", { 0,  8, 0.001, 3, 3 }, { 0, 10, 0.001, 3, 3 }, { 0, 80, 0, 3, 3 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
371 };
372
373 static const struct channel_spec rigol_dp831_ch[] = {
374         { "1", { 0,   8, 0.001, 3, 4 }, { 0, 5, 0.0003, 3, 4 }, { 0, 40, 0, 3, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
375         { "2", { 0,  30, 0.001, 3, 4 }, { 0, 2, 0.0001, 3, 4 }, { 0, 60, 0, 3, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
376         { "3", { 0, -30, 0.001, 3, 4 }, { 0, 2, 0.0001, 3, 4 }, { 0, 60, 0, 3, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
377 };
378
379 static const struct channel_spec rigol_dp832_ch[] = {
380         { "1", { 0, 30, 0.001, 3, 4 }, { 0, 3, 0.001, 3, 4 }, { 0, 90, 0, 3, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
381         { "2", { 0, 30, 0.001, 3, 4 }, { 0, 3, 0.001, 3, 4 }, { 0, 90, 0, 3, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
382         { "3", { 0,  5, 0.001, 3, 4 }, { 0, 3, 0.001, 3, 4 }, { 0, 90, 0, 3, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
383 };
384
385 static const struct channel_group_spec rigol_dp820_cg[] = {
386         { "1", CH_IDX(0), PPS_OVP | PPS_OCP, SR_MQFLAG_DC },
387         { "2", CH_IDX(1), PPS_OVP | PPS_OCP, SR_MQFLAG_DC },
388 };
389
390 static const struct channel_group_spec rigol_dp830_cg[] = {
391         { "1", CH_IDX(0), PPS_OVP | PPS_OCP, SR_MQFLAG_DC },
392         { "2", CH_IDX(1), PPS_OVP | PPS_OCP, SR_MQFLAG_DC },
393         { "3", CH_IDX(2), PPS_OVP | PPS_OCP, SR_MQFLAG_DC },
394 };
395
396 static const struct scpi_command rigol_dp800_cmd[] = {
397         { SCPI_CMD_REMOTE, "SYST:REMOTE" },
398         { SCPI_CMD_LOCAL, "SYST:LOCAL" },
399         { SCPI_CMD_BEEPER, "SYST:BEEP:STAT?" },
400         { SCPI_CMD_BEEPER_ENABLE, "SYST:BEEP:STAT ON" },
401         { SCPI_CMD_BEEPER_DISABLE, "SYST:BEEP:STAT OFF" },
402         { SCPI_CMD_SELECT_CHANNEL, ":INST:NSEL %s" },
403         { SCPI_CMD_GET_MEAS_VOLTAGE, ":MEAS:VOLT?" },
404         { SCPI_CMD_GET_MEAS_CURRENT, ":MEAS:CURR?" },
405         { SCPI_CMD_GET_MEAS_POWER, ":MEAS:POWE?" },
406         { SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT?" },
407         { SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT %.6f" },
408         { SCPI_CMD_GET_CURRENT_LIMIT, ":SOUR:CURR?" },
409         { SCPI_CMD_SET_CURRENT_LIMIT, ":SOUR:CURR %.6f" },
410         { SCPI_CMD_GET_OUTPUT_ENABLED, ":OUTP?" },
411         { SCPI_CMD_SET_OUTPUT_ENABLE, ":OUTP ON" },
412         { SCPI_CMD_SET_OUTPUT_DISABLE, ":OUTP OFF" },
413         { SCPI_CMD_GET_OUTPUT_REGULATION, ":OUTP:MODE?" },
414         { SCPI_CMD_GET_OVER_TEMPERATURE_PROTECTION, ":SYST:OTP?" },
415         { SCPI_CMD_SET_OVER_TEMPERATURE_PROTECTION_ENABLE, ":SYST:OTP ON" },
416         { SCPI_CMD_SET_OVER_TEMPERATURE_PROTECTION_DISABLE, ":SYST:OTP OFF" },
417         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ENABLED, ":OUTP:OVP?" },
418         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_ENABLE, ":OUTP:OVP ON" },
419         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_DISABLE, ":OUTP:OVP OFF" },
420         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ACTIVE, ":OUTP:OVP:QUES?" },
421         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":OUTP:OVP:VAL?" },
422         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":OUTP:OVP:VAL %.6f" },
423         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ENABLED, ":OUTP:OCP?" },
424         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_ENABLE, ":OUTP:OCP:STAT ON" },
425         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_DISABLE, ":OUTP:OCP:STAT OFF" },
426         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ACTIVE, ":OUTP:OCP:QUES?" },
427         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_THRESHOLD, ":OUTP:OCP:VAL?" },
428         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_THRESHOLD, ":OUTP:OCP:VAL %.6f" },
429         ALL_ZERO
430 };
431
432 /* HP 663xA series */
433 static const uint32_t hp_6630a_devopts[] = {
434         SR_CONF_CONTINUOUS,
435         SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
436         SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
437 };
438
439 static const uint32_t hp_6630a_devopts_cg[] = {
440         SR_CONF_ENABLED | SR_CONF_SET,
441         SR_CONF_VOLTAGE | SR_CONF_GET,
442         SR_CONF_CURRENT | SR_CONF_GET,
443         SR_CONF_VOLTAGE_TARGET | SR_CONF_SET | SR_CONF_LIST,
444         SR_CONF_CURRENT_LIMIT | SR_CONF_SET | SR_CONF_LIST,
445         SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE | SR_CONF_GET,
446         SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_SET | SR_CONF_LIST,
447         SR_CONF_OVER_CURRENT_PROTECTION_ENABLED | SR_CONF_SET,
448         SR_CONF_OVER_CURRENT_PROTECTION_ACTIVE | SR_CONF_GET,
449         SR_CONF_OVER_TEMPERATURE_PROTECTION_ACTIVE | SR_CONF_GET,
450         SR_CONF_REGULATION | SR_CONF_GET,
451 };
452
453 static const struct channel_spec hp_6632a_ch[] = {
454         { "1", { 0, 20.475, 0.005, 3, 4 }, { 0, 5.1188, 0.00125, 4, 5 }, { 0, 104.80743 }, FREQ_DC_ONLY, { 0, 22, 0.1 }, NO_OCP_LIMITS },
455 };
456
457 static const struct channel_spec hp_6633a_ch[] = {
458         { "1", { 0, 51.188, 0.0125, 3, 4 }, { 0, 2.0475, 0.0005, 4, 5 }, { 0, 104.80743 }, FREQ_DC_ONLY, { 0, 55, 0.25 }, NO_OCP_LIMITS },
459 };
460
461 static const struct channel_spec hp_6634a_ch[] = {
462         { "1", { 0, 102.38, 0.025, 3, 4 }, { 0, 1.0238, 0.00025, 4, 5 }, { 0, 104.81664 }, FREQ_DC_ONLY, { 0, 110, 0.5 }, NO_OCP_LIMITS },
463 };
464
465 static const struct channel_group_spec hp_6630a_cg[] = {
466         { "1", CH_IDX(0), PPS_OVP | PPS_OCP, SR_MQFLAG_DC },
467 };
468
469 static const struct scpi_command hp_6630a_cmd[] = {
470         { SCPI_CMD_SET_OUTPUT_ENABLE, "OUT 1" },
471         { SCPI_CMD_SET_OUTPUT_DISABLE, "OUT 0" },
472         { SCPI_CMD_GET_MEAS_VOLTAGE, "VOUT?" },
473         { SCPI_CMD_GET_MEAS_CURRENT, "IOUT?" },
474         { SCPI_CMD_SET_VOLTAGE_TARGET, "VSET %.4f" },
475         { SCPI_CMD_SET_CURRENT_LIMIT, "ISET %.4f" },
476         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ACTIVE, "STS?" },
477         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, "OVSET %.4f" },
478         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_ENABLE, "OCP 1" },
479         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_DISABLE, "OCP 0" },
480         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ACTIVE, "STS?" },
481         { SCPI_CMD_GET_OVER_TEMPERATURE_PROTECTION_ACTIVE, "STS?" },
482         { SCPI_CMD_GET_OUTPUT_REGULATION, "STS?" },
483         ALL_ZERO
484 };
485
486 static int hp_6630a_init_acquisition(const struct sr_dev_inst *sdi)
487 {
488         struct sr_scpi_dev_inst *scpi;
489
490         scpi = sdi->conn;
491
492         /*
493          * Monitor CV (1), CC+ (2), UR (4), OVP (8), OTP (16), OCP (64) and
494          * CC- (256) bits of the Status Register for the FAULT? query.
495          */
496         return sr_scpi_send(scpi, "UNMASK 607");
497 }
498
499 static int hp_6630a_update_status(const struct sr_dev_inst *sdi)
500 {
501         struct sr_scpi_dev_inst *scpi;
502         int ret;
503         int fault;
504         gboolean cv, cc_pos, unreg, cc_neg;
505         gboolean regulation_changed;
506         char *regulation;
507
508         scpi = sdi->conn;
509
510         /*
511          * Use the FAULT register (only 0->1 transitions), this way multiple set
512          * regulation bits in the STS/ASTS registers are ignored. In rare cases
513          * we will miss some changes (1->0 transitions, e.g. no regulation at all),
514          * but SPS/ASPS doesn't work either, unless all states are stored and
515          * compared to the states in STS/ASTS.
516          * TODO: Use SPoll or SRQ when SCPI over GPIB is used.
517          */
518         ret = sr_scpi_get_int(scpi, "FAULT?", &fault);
519         if (ret != SR_OK)
520                 return ret;
521
522         /* OVP */
523         if (fault & (1 << 3))
524                 sr_session_send_meta(sdi, SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE,
525                         g_variant_new_boolean(fault & (1 << 3)));
526
527         /* OCP */
528         if (fault & (1 << 6))
529                 sr_session_send_meta(sdi, SR_CONF_OVER_CURRENT_PROTECTION_ACTIVE,
530                         g_variant_new_boolean(fault & (1 << 6)));
531
532         /* OTP */
533         if (fault & (1 << 4))
534                 sr_session_send_meta(sdi, SR_CONF_OVER_TEMPERATURE_PROTECTION_ACTIVE,
535                         g_variant_new_boolean(fault & (1 << 4)));
536
537         /* CV */
538         cv = (fault & (1 << 0));
539         regulation_changed = (fault & (1 << 0));
540         /* CC+ */
541         cc_pos = (fault & (1 << 1));
542         regulation_changed = (fault & (1 << 1)) | regulation_changed;
543         /* UNREG */
544         unreg = (fault & (1 << 2));
545         regulation_changed = (fault & (1 << 2)) | regulation_changed;
546         /* CC- */
547         cc_neg = (fault & (1 << 9));
548         regulation_changed = (fault & (1 << 9)) | regulation_changed;
549
550         if (regulation_changed) {
551                 if (cv && !cc_pos && !cc_neg && !unreg)
552                         regulation = "CV";
553                 else if (cc_pos && !cv && !cc_neg && !unreg)
554                         regulation = "CC";
555                 else if (cc_neg && !cv && !cc_pos && !unreg)
556                         regulation = "CC-";
557                 else if (unreg && !cv && !cc_pos && !cc_neg)
558                         regulation = "UR";
559                 else if (!cv && !cc_pos && !cc_neg && !unreg)
560                         regulation = "";
561                 else {
562                         sr_dbg("Undefined regulation for HP 66xxA "
563                                 "(CV=%i, CC+=%i, CC-=%i, UR=%i).",
564                                 cv, cc_pos, cc_neg, unreg);
565                         return FALSE;
566                 }
567                 sr_session_send_meta(sdi, SR_CONF_REGULATION,
568                         g_variant_new_string(regulation));
569         }
570
571         return SR_OK;
572 }
573
574 /* HP 663xB series */
575 static const uint32_t hp_6630b_devopts[] = {
576         SR_CONF_CONTINUOUS,
577         SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
578         SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
579 };
580
581 static const uint32_t hp_6630b_devopts_cg[] = {
582         SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
583         SR_CONF_VOLTAGE | SR_CONF_GET,
584         SR_CONF_CURRENT | SR_CONF_GET,
585         SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
586         SR_CONF_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
587         SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE | SR_CONF_GET,
588         SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
589         SR_CONF_OVER_CURRENT_PROTECTION_ENABLED | SR_CONF_GET | SR_CONF_SET,
590         SR_CONF_OVER_CURRENT_PROTECTION_ACTIVE | SR_CONF_GET,
591         SR_CONF_OVER_TEMPERATURE_PROTECTION_ACTIVE | SR_CONF_GET,
592         SR_CONF_REGULATION | SR_CONF_GET,
593 };
594
595 static const struct channel_spec hp_6611c_ch[] = {
596         { "1", { 0, 8.19, 0.002, 3, 4 }, { 0, 5.1188, 0.00125, 4, 5 }, { 0, 41.92297 }, FREQ_DC_ONLY, { 0, 12, 0.06 }, NO_OCP_LIMITS },
597 };
598
599 static const struct channel_spec hp_6612c_ch[] = {
600         { "1", { 0, 20.475, 0.005, 3, 4 }, { 0, 2.0475, 0.0005, 4, 5 }, { 0, 41.92256 }, FREQ_DC_ONLY, { 0, 22, 0.1 }, NO_OCP_LIMITS },
601 };
602
603 static const struct channel_spec hp_6613c_ch[] = {
604         { "1", { 0, 51.188, 0.0125, 3, 4 }, { 0, 1.0238, 0.00025, 4, 5 }, { 0, 52.40627 }, FREQ_DC_ONLY, { 0, 55, 0.25 }, NO_OCP_LIMITS },
605 };
606
607 static const struct channel_spec hp_6614c_ch[] = {
608         { "1", { 0, 102.38, 0.025, 3, 4 }, { 0, 0.5118, 0.000125, 4, 5 }, { 0, 52.39808 }, FREQ_DC_ONLY, { 0, 110, 0.5 }, NO_OCP_LIMITS },
609 };
610
611 static const struct channel_spec hp_6631b_ch[] = {
612         { "1", { 0, 8.19, 0.002, 3, 4 }, { 0, 10.237, 0.00263, 4, 5 }, { 0, 83.84103 }, FREQ_DC_ONLY, { 0, 12, 0.06 }, NO_OCP_LIMITS },
613 };
614
615 static const struct channel_spec hp_6632b_ch[] = {
616         { "1", { 0, 20.475, 0.005, 3, 4 }, { 0, 5.1188, 0.00132, 4, 5 }, { 0, 104.80743 }, FREQ_DC_ONLY, { 0, 22, 0.1 }, NO_OCP_LIMITS },
617 };
618
619 static const struct channel_spec hp_66312a_ch[] = {
620         { "1", { 0, 20.475, 0.0001, 4, 5 }, { 0, 2.0475, 0.0001, 4, 5 }, { 0, 41.92256 }, FREQ_DC_ONLY, { 0, 22, 0.01 }, NO_OCP_LIMITS },
621 };
622
623 static const struct channel_spec hp_66332a_ch[] = {
624         { "1", { 0, 20.475, 0.005, 3, 4 }, { 0, 5.1188, 0.00132, 4, 5 }, { 0, 104.80743 }, FREQ_DC_ONLY, { 0, 22, 0.1 }, NO_OCP_LIMITS },
625 };
626
627 static const struct channel_spec hp_6633b_ch[] = {
628         { "1", { 0, 51.188, 0.0125, 3, 4 }, { 0, 2.0475, 0.000526, 4, 5 }, { 0, 104.80743 }, FREQ_DC_ONLY, { 0, 55, 0.25 }, NO_OCP_LIMITS },
629 };
630
631 static const struct channel_spec hp_6634b_ch[] = {
632         { "1", { 0, 102.38, 0.025, 3, 4 }, { 0, 1.0238, 0.000263, 4, 5 }, { 0, 104.81664 }, FREQ_DC_ONLY, { 0, 110, 0.5 }, NO_OCP_LIMITS },
633 };
634
635 static const struct channel_group_spec hp_6630b_cg[] = {
636         { "1", CH_IDX(0), PPS_OVP | PPS_OCP, SR_MQFLAG_DC },
637 };
638
639 static const struct scpi_command hp_6630b_cmd[] = {
640         /*
641          * SCPI_CMD_REMOTE and SCPI_CMD_LOCAL are not used when GPIB is used,
642          * otherwise the device will report (non critical) error 602.
643          */
644         { SCPI_CMD_REMOTE, "SYST:REM" },
645         { SCPI_CMD_LOCAL, "SYST:LOC" },
646         { SCPI_CMD_GET_OUTPUT_ENABLED, "OUTP:STAT?" },
647         { SCPI_CMD_SET_OUTPUT_ENABLE, "OUTP:STAT ON" },
648         { SCPI_CMD_SET_OUTPUT_DISABLE, "OUTP:STAT OFF" },
649         { SCPI_CMD_GET_MEAS_VOLTAGE, ":MEAS:VOLT?" },
650         { SCPI_CMD_GET_MEAS_CURRENT, ":MEAS:CURR?" },
651         { SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT?" },
652         { SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT %.6f" },
653         { SCPI_CMD_GET_CURRENT_LIMIT, ":SOUR:CURR?" },
654         { SCPI_CMD_SET_CURRENT_LIMIT, ":SOUR:CURR %.6f" },
655         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ENABLED, ":CURR:PROT:STAT?" },
656         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_ENABLE, ":CURR:PROT:STAT 1" },
657         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_DISABLE, ":CURR:PROT:STAT 0" },
658         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ACTIVE, "STAT:QUES:COND?" },
659         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ACTIVE, "STAT:QUES:COND?" },
660         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":VOLT:PROT?" },
661         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":VOLT:PROT %.6f" },
662         { SCPI_CMD_GET_OVER_TEMPERATURE_PROTECTION_ACTIVE, "STAT:QUES:COND?" },
663         { SCPI_CMD_GET_OUTPUT_REGULATION, "STAT:OPER:COND?" },
664         ALL_ZERO
665 };
666
667 static int hp_6630b_init_acquisition(const struct sr_dev_inst *sdi)
668 {
669         struct sr_scpi_dev_inst *scpi;
670         int ret;
671
672         scpi = sdi->conn;
673
674         /*
675          * Monitor CV (256), CC+ (1024) and CC- (2048) bits of the
676          * Operational Status Register.
677          * Use both positive and negative transitions of the status bits.
678          */
679         ret = sr_scpi_send(scpi, "STAT:OPER:PTR 3328;NTR 3328;ENAB 3328");
680         if (ret != SR_OK)
681                 return ret;
682
683         /*
684          * Monitor OVP (1), OCP (2), OTP (16) and Unreg (1024) bits of the
685          * Questionable Status Register.
686          * Use both positive and negative transitions of the status bits.
687          */
688         ret = sr_scpi_send(scpi, "STAT:QUES:PTR 1043;NTR 1043;ENAB 1043");
689         if (ret != SR_OK)
690                 return ret;
691
692         /*
693          * Service Request Enable Register set for Operational Status Register
694          * bits (128) and Questionable Status Register bits (8).
695          * This masks the Status Register generating a SRQ/RQS. Not implemented yet!
696          */
697         /*
698         ret = sr_scpi_send(scpi, "*SRE 136");
699         if (ret != SR_OK)
700                 return ret;
701         */
702
703         return SR_OK;
704 }
705
706 static int hp_6630b_update_status(const struct sr_dev_inst *sdi)
707 {
708         struct sr_scpi_dev_inst *scpi;
709         int ret;
710         int stb;
711         int ques_even, ques_cond;
712         int oper_even, oper_cond;
713         gboolean output_enabled;
714         gboolean unreg, cv, cc_pos, cc_neg;
715         gboolean regulation_changed;
716         char *regulation;
717
718         scpi = sdi->conn;
719
720         unreg = FALSE;
721         cv = FALSE;
722         cc_pos = FALSE;
723         cc_neg = FALSE;
724         regulation_changed = FALSE;
725
726         /*
727          * Use SPoll when SCPI uses GPIB as transport layer.
728          * SPoll is approx. twice as fast as a normal GPIB write + read would be!
729          */
730 #ifdef HAVE_LIBGPIB
731         char spoll_buf;
732
733         if (scpi->transport == SCPI_TRANSPORT_LIBGPIB) {
734                 ret = sr_scpi_gpib_spoll(scpi, &spoll_buf);
735                 if (ret != SR_OK)
736                         return ret;
737                 stb = (uint8_t)spoll_buf;
738         }
739         else {
740 #endif
741                 ret = sr_scpi_get_int(scpi, "*STB?", &stb);
742                 if (ret != SR_OK)
743                         return ret;
744 #ifdef HAVE_LIBGPIB
745         }
746 #endif
747
748         /* Questionable status summary bit */
749         if (stb & (1 << 3)) {
750                 /* Read the event register to clear it! */
751                 ret = sr_scpi_get_int(scpi, "STAT:QUES:EVEN?", &ques_even);
752                 if (ret != SR_OK)
753                         return ret;
754                 /* Now get the values. */
755                 ret = sr_scpi_get_int(scpi, "STAT:QUES:COND?", &ques_cond);
756                 if (ret != SR_OK)
757                         return ret;
758
759                 /* OVP */
760                 if (ques_even & (1 << 0))
761                         sr_session_send_meta(sdi, SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE,
762                                 g_variant_new_boolean(ques_cond & (1 << 0)));
763
764                 /* OCP */
765                 if (ques_even & (1 << 1))
766                         sr_session_send_meta(sdi, SR_CONF_OVER_CURRENT_PROTECTION_ACTIVE,
767                                 g_variant_new_boolean(ques_cond & (1 << 1)));
768
769                 /* OTP */
770                 if (ques_even & (1 << 4))
771                         sr_session_send_meta(sdi, SR_CONF_OVER_TEMPERATURE_PROTECTION_ACTIVE,
772                                 g_variant_new_boolean(ques_cond & (1 << 4)));
773
774                 /* UNREG */
775                 unreg = (ques_cond & (1 << 10));
776                 regulation_changed = (ques_even & (1 << 10)) | regulation_changed;
777
778                 /*
779                  * Check if output state has changed, due to one of the
780                  * questionable states changed.
781                  * NOTE: The output state is sent even if it hasn't changed,
782                  * but that only happens rarely.
783                  */
784                 ret = sr_scpi_get_bool(scpi, "OUTP:STAT?", &output_enabled);
785                 if (ret != SR_OK)
786                         return ret;
787                 sr_session_send_meta(sdi, SR_CONF_ENABLED,
788                         g_variant_new_boolean(output_enabled));
789         }
790
791         /* Operation status summary bit */
792         if (stb & (1 << 7)) {
793                 /* Read the event register to clear it! */
794                 ret = sr_scpi_get_int(scpi, "STAT:OPER:EVEN?", &oper_even);
795                 if (ret != SR_OK)
796                         return ret;
797                 /* Now get the values. */
798                 ret = sr_scpi_get_int(scpi, "STAT:OPER:COND?", &oper_cond);
799                 if (ret != SR_OK)
800                         return ret;
801
802                 /* CV */
803                 cv = (oper_cond & (1 << 8));
804                 regulation_changed = (oper_even & (1 << 8)) | regulation_changed;
805                 /* CC+ */
806                 cc_pos = (oper_cond & (1 << 10));
807                 regulation_changed = (oper_even & (1 << 10)) | regulation_changed;
808                 /* CC- */
809                 cc_neg = (oper_cond & (1 << 11));
810                 regulation_changed = (oper_even & (1 << 11)) | regulation_changed;
811         }
812
813         if (regulation_changed) {
814                 if (cv && !cc_pos && !cc_neg && !unreg)
815                         regulation = "CV";
816                 else if (cc_pos && !cv && !cc_neg && !unreg)
817                         regulation = "CC";
818                 else if (cc_neg && !cv && !cc_pos && !unreg)
819                         regulation = "CC-";
820                 else if (unreg && !cv && !cc_pos && !cc_neg)
821                         regulation = "UR";
822                 else if (!cv && !cc_pos && !cc_neg && !unreg)
823                         /* This happens in case of OCP active. */
824                         regulation = "";
825                 else {
826                         /* This happens from time to time (CV and CC+ active). */
827                         sr_dbg("Undefined regulation for HP 66xxB "
828                                 "(CV=%i, CC+=%i, CC-=%i, UR=%i).",
829                                 cv, cc_pos, cc_neg, unreg);
830                         return FALSE;
831                 }
832                 sr_session_send_meta(sdi, SR_CONF_REGULATION,
833                         g_variant_new_string(regulation));
834         }
835
836         return SR_OK;
837 }
838
839 /* Philips/Fluke PM2800 series */
840 static const uint32_t philips_pm2800_devopts[] = {
841         SR_CONF_CONTINUOUS,
842         SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
843         SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
844 };
845
846 static const uint32_t philips_pm2800_devopts_cg[] = {
847         SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
848         SR_CONF_VOLTAGE | SR_CONF_GET,
849         SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
850         SR_CONF_CURRENT | SR_CONF_GET,
851         SR_CONF_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
852         SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE | SR_CONF_GET,
853         SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
854         SR_CONF_OVER_CURRENT_PROTECTION_ENABLED | SR_CONF_GET | SR_CONF_SET,
855         SR_CONF_OVER_CURRENT_PROTECTION_ACTIVE | SR_CONF_GET,
856         SR_CONF_REGULATION | SR_CONF_GET,
857 };
858
859 enum philips_pm2800_modules {
860         PM2800_MOD_30V_10A = 1,
861         PM2800_MOD_60V_5A,
862         PM2800_MOD_60V_10A,
863         PM2800_MOD_8V_15A,
864         PM2800_MOD_60V_2A,
865         PM2800_MOD_120V_1A,
866 };
867
868 static const struct philips_pm2800_module_spec {
869         /* Min, max, programming resolution. */
870         double voltage[5];
871         double current[5];
872         double power[5];
873 } philips_pm2800_module_specs[] = {
874         /* Autoranging modules. */
875         [PM2800_MOD_30V_10A] = { { 0, 30, 0.0075, 2, 4 }, { 0, 10, 0.0025, 2, 4 }, { 0, 60 } },
876         [PM2800_MOD_60V_5A] = { { 0, 60, 0.015, 2, 3 }, { 0, 5, 0.00125, 2, 5 }, { 0, 60 } },
877         [PM2800_MOD_60V_10A] = { { 0, 60, 0.015, 2, 3 }, { 0, 10, 0.0025, 2, 5 }, { 0, 120 } },
878         /* Linear modules. */
879         [PM2800_MOD_8V_15A] = { { 0, 8, 0.002, 3, 3 }, { -15, 15, 0.00375, 3, 5 }, { 0, 120 } },
880         [PM2800_MOD_60V_2A] = { { 0, 60, 0.015, 2, 3 }, { -2, 2, 0.0005, 3, 4 }, { 0, 120 } },
881         [PM2800_MOD_120V_1A] = { { 0, 120, 0.030, 2, 2 }, { -1, 1, 0.00025, 3, 5 }, { 0, 120 } },
882 };
883
884 static const struct philips_pm2800_model {
885         unsigned int chassis;
886         unsigned int num_modules;
887         unsigned int set;
888         unsigned int modules[3];
889 } philips_pm2800_matrix[] = {
890         /* Autoranging chassis. */
891         { 1, 1, 0, { PM2800_MOD_30V_10A, 0, 0 } },
892         { 1, 1, 1, { PM2800_MOD_60V_5A, 0, 0 } },
893         { 1, 2, 0, { PM2800_MOD_30V_10A, PM2800_MOD_30V_10A, 0 } },
894         { 1, 2, 1, { PM2800_MOD_60V_5A, PM2800_MOD_60V_5A, 0 } },
895         { 1, 2, 2, { PM2800_MOD_30V_10A, PM2800_MOD_60V_5A, 0 } },
896         { 1, 2, 3, { PM2800_MOD_30V_10A, PM2800_MOD_60V_10A, 0 } },
897         { 1, 2, 4, { PM2800_MOD_60V_5A, PM2800_MOD_60V_10A, 0 } },
898         { 1, 3, 0, { PM2800_MOD_30V_10A, PM2800_MOD_30V_10A, PM2800_MOD_30V_10A } },
899         { 1, 3, 1, { PM2800_MOD_60V_5A, PM2800_MOD_60V_5A, PM2800_MOD_60V_5A } },
900         { 1, 3, 2, { PM2800_MOD_30V_10A, PM2800_MOD_30V_10A, PM2800_MOD_60V_5A } },
901         { 1, 3, 3, { PM2800_MOD_30V_10A, PM2800_MOD_60V_5A, PM2800_MOD_60V_5A } },
902         /* Linear chassis. */
903         { 3, 1, 0, { PM2800_MOD_60V_2A, 0, 0 } },
904         { 3, 1, 1, { PM2800_MOD_120V_1A, 0, 0 } },
905         { 3, 1, 2, { PM2800_MOD_8V_15A, 0, 0 } },
906         { 3, 2, 0, { PM2800_MOD_60V_2A, 0, 0 } },
907         { 3, 2, 1, { PM2800_MOD_120V_1A, 0, 0 } },
908         { 3, 2, 2, { PM2800_MOD_60V_2A, PM2800_MOD_120V_1A, 0 } },
909         { 3, 2, 3, { PM2800_MOD_8V_15A, PM2800_MOD_8V_15A, 0 } },
910 };
911
912 static const char *philips_pm2800_names[] = { "1", "2", "3" };
913
914 static int philips_pm2800_probe_channels(struct sr_dev_inst *sdi,
915                 struct sr_scpi_hw_info *hw_info,
916                 struct channel_spec **channels, unsigned int *num_channels,
917                 struct channel_group_spec **channel_groups, unsigned int *num_channel_groups)
918 {
919         const struct philips_pm2800_model *model;
920         const struct philips_pm2800_module_spec *spec;
921         unsigned int chassis, num_modules, set, module, m, i;
922
923         (void)sdi;
924
925         /*
926          * The model number as reported by *IDN? looks like e.g. PM2813/11,
927          * Where "PM28" is fixed, followed by the chassis code (1 = autoranging,
928          * 3 = linear series) and the number of modules: 1-3 for autoranging,
929          * 1-2 for linear.
930          * After the slash, the first digit denotes the module set. The
931          * digit after that denotes front (5) or rear (1) binding posts.
932          */
933         chassis = hw_info->model[4] - 0x30;
934         num_modules = hw_info->model[5] - 0x30;
935         set = hw_info->model[7] - 0x30;
936         for (m = 0; m < ARRAY_SIZE(philips_pm2800_matrix); m++) {
937                 model = &philips_pm2800_matrix[m];
938                 if (model->chassis == chassis && model->num_modules == num_modules
939                                 && model->set == set)
940                         break;
941         }
942         if (m == ARRAY_SIZE(philips_pm2800_matrix)) {
943                 sr_dbg("Model %s not found in matrix.", hw_info->model);
944                 return SR_ERR;
945         }
946
947         sr_dbg("Found %d output channel%s:", num_modules, num_modules > 1 ? "s" : "");
948         *channels = g_malloc0(sizeof(struct channel_spec) * num_modules);
949         *channel_groups = g_malloc0(sizeof(struct channel_group_spec) * num_modules);
950         for (i = 0; i < num_modules; i++) {
951                 module = model->modules[i];
952                 spec = &philips_pm2800_module_specs[module];
953                 sr_dbg("output %d: %.0f - %.0fV, %.0f - %.0fA, %.0f - %.0fW", i + 1,
954                                 spec->voltage[0], spec->voltage[1],
955                                 spec->current[0], spec->current[1],
956                                 spec->power[0], spec->power[1]);
957                 (*channels)[i].name = (char *)philips_pm2800_names[i];
958                 memcpy(&((*channels)[i].voltage), spec, sizeof(double) * 15);
959                 (*channel_groups)[i].name = (char *)philips_pm2800_names[i];
960                 (*channel_groups)[i].channel_index_mask = 1 << i;
961                 (*channel_groups)[i].features = PPS_OTP | PPS_OVP | PPS_OCP;
962                 (*channel_groups)[i].mqflags = SR_MQFLAG_DC;
963         }
964         *num_channels = *num_channel_groups = num_modules;
965
966         return SR_OK;
967 }
968
969 static const struct scpi_command philips_pm2800_cmd[] = {
970         { SCPI_CMD_SELECT_CHANNEL, ":INST:NSEL %s" },
971         { SCPI_CMD_GET_MEAS_VOLTAGE, ":MEAS:VOLT?" },
972         { SCPI_CMD_GET_MEAS_CURRENT, ":MEAS:CURR?" },
973         { SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT?" },
974         { SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT %.6f" },
975         { SCPI_CMD_GET_CURRENT_LIMIT, ":SOUR:CURR?" },
976         { SCPI_CMD_SET_CURRENT_LIMIT, ":SOUR:CURR %.6f" },
977         { SCPI_CMD_GET_OUTPUT_ENABLED, ":OUTP?" },
978         { SCPI_CMD_SET_OUTPUT_ENABLE, ":OUTP ON" },
979         { SCPI_CMD_SET_OUTPUT_DISABLE, ":OUTP OFF" },
980         { SCPI_CMD_GET_OUTPUT_REGULATION, ":SOUR:FUNC:MODE?" },
981         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ACTIVE, ":SOUR:VOLT:PROT:TRIP?" },
982         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:PROT:LEV?" },
983         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:PROT:LEV %.6f" },
984         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ENABLED, ":SOUR:CURR:PROT:STAT?" },
985         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_ENABLE, ":SOUR:CURR:PROT:STAT ON" },
986         { SCPI_CMD_SET_OVER_CURRENT_PROTECTION_DISABLE, ":SOUR:CURR:PROT:STAT OFF" },
987         { SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ACTIVE, ":SOUR:CURR:PROT:TRIP?" },
988         ALL_ZERO
989 };
990
991 static const uint32_t rs_hmc8043_devopts[] = {
992         SR_CONF_CONTINUOUS,
993         SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
994         SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
995 };
996
997 static const uint32_t rs_hmc8043_devopts_cg[] = {
998         SR_CONF_OVER_VOLTAGE_PROTECTION_ENABLED | SR_CONF_GET | SR_CONF_SET,
999         SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE | SR_CONF_GET,
1000         SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
1001         SR_CONF_VOLTAGE | SR_CONF_GET,
1002         SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
1003         SR_CONF_CURRENT | SR_CONF_GET,
1004         SR_CONF_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
1005         SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
1006 };
1007
1008 static const struct channel_spec rs_hmc8043_ch[] = {
1009         { "1", { 0, 32.050, 0.001, 3, 4 }, { 0.001, 3, 0.001, 3, 4 }, { 0, 0, 0, 0, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
1010         { "2", { 0, 32.050, 0.001, 3, 4 }, { 0.001, 3, 0.001, 3, 4 }, { 0, 0, 0, 0, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
1011         { "3", { 0, 32.050, 0.001, 3, 4 }, { 0.001, 3, 0.001, 3, 4 }, { 0, 0, 0, 0, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
1012 };
1013
1014 static const struct channel_group_spec rs_hmc8043_cg[] = {
1015         { "1", CH_IDX(0), PPS_OVP, SR_MQFLAG_DC },
1016         { "2", CH_IDX(1), PPS_OVP, SR_MQFLAG_DC },
1017         { "3", CH_IDX(2), PPS_OVP, SR_MQFLAG_DC },
1018 };
1019
1020 static const struct scpi_command rs_hmc8043_cmd[] = {
1021         { SCPI_CMD_SELECT_CHANNEL, "INST:NSEL %s" },
1022         { SCPI_CMD_GET_MEAS_VOLTAGE, "MEAS:VOLT?" },
1023         { SCPI_CMD_GET_MEAS_CURRENT, "MEAS:CURR?" },
1024         { SCPI_CMD_GET_VOLTAGE_TARGET, "VOLT?" },
1025         { SCPI_CMD_SET_VOLTAGE_TARGET, "VOLT %.6f" },
1026         { SCPI_CMD_GET_CURRENT_LIMIT, "CURR?" },
1027         { SCPI_CMD_SET_CURRENT_LIMIT, "CURR %.6f" },
1028         { SCPI_CMD_GET_OUTPUT_ENABLED, "OUTP?" },
1029         { SCPI_CMD_SET_OUTPUT_ENABLE, "OUTP ON" },
1030         { SCPI_CMD_SET_OUTPUT_DISABLE, "OUTP OFF" },
1031         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ACTIVE, "VOLT:PROT:TRIP?" },
1032         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, "VOLT:PROT:LEV?" },
1033         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, "VOLT:PROT:LEV %.6f" },
1034         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ENABLED, "VOLT:PROT:STAT?" },
1035         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_ENABLE, "VOLT:PROT:STAT ON" },
1036         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_DISABLE, "VOLT:PROT:STAT OFF" },
1037         ALL_ZERO
1038 };
1039
1040 static const uint32_t rs_hmp4040_devopts[] = {
1041         SR_CONF_CONTINUOUS,
1042         SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
1043         SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
1044 };
1045
1046 static const uint32_t rs_hmp4040_devopts_cg[] = {
1047         SR_CONF_OVER_VOLTAGE_PROTECTION_ENABLED | SR_CONF_GET,
1048         SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE | SR_CONF_GET,
1049         SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
1050         SR_CONF_VOLTAGE | SR_CONF_GET,
1051         SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
1052         SR_CONF_CURRENT | SR_CONF_GET,
1053         SR_CONF_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
1054         SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
1055         SR_CONF_OVER_TEMPERATURE_PROTECTION_ACTIVE | SR_CONF_GET,
1056         SR_CONF_REGULATION | SR_CONF_GET,
1057 };
1058
1059 static const struct channel_spec rs_hmp2020_ch[] = {
1060         { "1", { 0, 32.050, 0.001, 3, 4 }, { 0.001, 10.01, 0.0002, 3, 4 }, { 0, 0, 0, 0, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
1061         { "2", { 0, 32.050, 0.001, 3, 4 }, { 0.001,  5.01, 0.0001, 3, 4 }, { 0, 0, 0, 0, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
1062 };
1063
1064 static const struct channel_spec rs_hmp2030_ch[] = {
1065         { "1", { 0, 32.050, 0.001, 3, 4 }, { 0.001,  5.01, 0.0001, 3, 4 }, { 0, 0, 0, 0, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
1066         { "2", { 0, 32.050, 0.001, 3, 4 }, { 0.001,  5.01, 0.0001, 3, 4 }, { 0, 0, 0, 0, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
1067         { "3", { 0, 32.050, 0.001, 3, 4 }, { 0.001,  5.01, 0.0001, 3, 4 }, { 0, 0, 0, 0, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
1068 };
1069
1070 static const struct channel_spec rs_hmp4040_ch[] = {
1071         { "1", { 0, 32.050, 0.001, 3, 4 }, { 0.001, 10.01, 0.0002, 3, 4 }, { 0, 0, 0, 0, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
1072         { "2", { 0, 32.050, 0.001, 3, 4 }, { 0.001, 10.01, 0.0002, 3, 4 }, { 0, 0, 0, 0, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
1073         { "3", { 0, 32.050, 0.001, 3, 4 }, { 0.001, 10.01, 0.0002, 3, 4 }, { 0, 0, 0, 0, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
1074         { "4", { 0, 32.050, 0.001, 3, 4 }, { 0.001, 10.01, 0.0002, 3, 4 }, { 0, 0, 0, 0, 4 }, FREQ_DC_ONLY, NO_OVP_LIMITS, NO_OCP_LIMITS },
1075 };
1076
1077 static const struct channel_group_spec rs_hmp4040_cg[] = {
1078         { "1", CH_IDX(0), PPS_OVP | PPS_OTP, SR_MQFLAG_DC },
1079         { "2", CH_IDX(1), PPS_OVP | PPS_OTP, SR_MQFLAG_DC },
1080         { "3", CH_IDX(2), PPS_OVP | PPS_OTP, SR_MQFLAG_DC },
1081         { "4", CH_IDX(3), PPS_OVP | PPS_OTP, SR_MQFLAG_DC },
1082 };
1083
1084 /*
1085  * Developer's note: Currently unused device commands. Some of them
1086  * are not in use because SCPI_CMD codes are not defined yet.
1087  *   OUTP:GEN
1088  *   VOLT? MAX, CURR? MAX
1089  *   VOLT:PROT:CLE (could set SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE)
1090  *   VOLT:PROT:MODE
1091  *   FUSE:STAT, FUSE:TRIP?, FUSE:LINK, FUSE:UNL
1092  *   ARB:...
1093  *   SYST:LOC, SYST:REM, SYST:RWL, SYST:MIX
1094  *   SYST:BEEP:IMM
1095  */
1096 static const struct scpi_command rs_hmp4040_cmd[] = {
1097         { SCPI_CMD_REMOTE, "SYST:REM" },
1098         { SCPI_CMD_LOCAL, "SYST:LOC" },
1099         { SCPI_CMD_SELECT_CHANNEL, "INST:NSEL %s" },
1100         { SCPI_CMD_GET_MEAS_VOLTAGE, "MEAS:VOLT?" },
1101         { SCPI_CMD_GET_MEAS_CURRENT, "MEAS:CURR?" },
1102         { SCPI_CMD_GET_VOLTAGE_TARGET, "VOLT?" },
1103         { SCPI_CMD_SET_VOLTAGE_TARGET, "VOLT %.6f" },
1104         { SCPI_CMD_GET_CURRENT_LIMIT, "CURR?" },
1105         { SCPI_CMD_SET_CURRENT_LIMIT, "CURR %.6f" },
1106         { SCPI_CMD_GET_OUTPUT_ENABLED, "OUTP?" },
1107         { SCPI_CMD_SET_OUTPUT_ENABLE, "OUTP ON" },
1108         { SCPI_CMD_SET_OUTPUT_DISABLE, "OUTP OFF" },
1109         { SCPI_CMD_GET_OUTPUT_REGULATION, "STAT:QUES:INST:ISUM%s:COND?" },
1110         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ACTIVE, "VOLT:PROT:TRIP?" },
1111         { SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, "VOLT:PROT:LEV?" },
1112         { SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, "VOLT:PROT:LEV %.6f" },
1113         { SCPI_CMD_GET_OVER_TEMPERATURE_PROTECTION_ACTIVE, "STAT:QUES:INST:ISUM%s:COND?" },
1114         ALL_ZERO
1115 };
1116
1117 SR_PRIV const struct scpi_pps pps_profiles[] = {
1118         /* Agilent N5763A */
1119         { "Agilent", "N5763A", SCPI_DIALECT_UNKNOWN, 0,
1120                 ARRAY_AND_SIZE(agilent_n5700a_devopts),
1121                 ARRAY_AND_SIZE(agilent_n5700a_devopts_cg),
1122                 ARRAY_AND_SIZE(agilent_n5763a_ch),
1123                 ARRAY_AND_SIZE(agilent_n5700a_cg),
1124                 agilent_n5700a_cmd,
1125                 .probe_channels = NULL,
1126                 .init_acquisition = NULL,
1127                 .update_status = NULL,
1128         },
1129
1130         /* Agilent N5767A */
1131         { "Agilent", "N5767A", SCPI_DIALECT_UNKNOWN, 0,
1132                 ARRAY_AND_SIZE(agilent_n5700a_devopts),
1133                 ARRAY_AND_SIZE(agilent_n5700a_devopts_cg),
1134                 ARRAY_AND_SIZE(agilent_n5767a_ch),
1135                 ARRAY_AND_SIZE(agilent_n5700a_cg),
1136                 agilent_n5700a_cmd,
1137                 .probe_channels = NULL,
1138                 .init_acquisition = NULL,
1139                 .update_status = NULL,
1140         },
1141
1142         /* BK Precision 9310 */
1143         { "BK", "^9130$", SCPI_DIALECT_UNKNOWN, 0,
1144                 ARRAY_AND_SIZE(bk_9130_devopts),
1145                 ARRAY_AND_SIZE(bk_9130_devopts_cg),
1146                 ARRAY_AND_SIZE(bk_9130_ch),
1147                 ARRAY_AND_SIZE(bk_9130_cg),
1148                 bk_9130_cmd,
1149                 .probe_channels = NULL,
1150                 .init_acquisition = NULL,
1151                 .update_status = NULL,
1152         },
1153
1154         /* Chroma 61604 */
1155         { "Chroma", "61604", SCPI_DIALECT_UNKNOWN, 0,
1156                 ARRAY_AND_SIZE(chroma_61604_devopts),
1157                 ARRAY_AND_SIZE(chroma_61604_devopts_cg),
1158                 ARRAY_AND_SIZE(chroma_61604_ch),
1159                 ARRAY_AND_SIZE(chroma_61604_cg),
1160                 chroma_61604_cmd,
1161                 .probe_channels = NULL,
1162                 .init_acquisition = NULL,
1163                 .update_status = NULL,
1164         },
1165
1166         /* Chroma 62000 series */
1167         { "Chroma", "620[0-9]{2}P-[0-9]{2,3}-[0-9]{1,3}", SCPI_DIALECT_UNKNOWN, 0,
1168                 ARRAY_AND_SIZE(chroma_62000_devopts),
1169                 ARRAY_AND_SIZE(chroma_62000_devopts_cg),
1170                 NULL, 0,
1171                 NULL, 0,
1172                 chroma_62000_cmd,
1173                 .probe_channels = chroma_62000p_probe_channels,
1174                 .init_acquisition = NULL,
1175                 .update_status = NULL,
1176         },
1177
1178         /*
1179          * This entry is for testing the HP COMP language with a HP 6632B power
1180          * supply switched to the COMP language ("SYST:LANG COMP"). When used,
1181          * disable the entry for the HP 6632B below!
1182          */
1183         /*
1184         { "HP", "6632B", SCPI_DIALECT_HP_COMP, 0,
1185                 ARRAY_AND_SIZE(hp_6630a_devopts),
1186                 ARRAY_AND_SIZE(hp_6630a_devopts_cg),
1187                 ARRAY_AND_SIZE(hp_6632a_ch),
1188                 ARRAY_AND_SIZE(hp_6630a_cg),
1189                 hp_6630a_cmd,
1190                 .probe_channels = NULL,
1191                 hp_6630a_init_acquisition,
1192                 hp_6630a_update_status,
1193         },
1194         */
1195
1196         /* HP 6632A */
1197         { "HP", "6632A", SCPI_DIALECT_HP_COMP, 0,
1198                 ARRAY_AND_SIZE(hp_6630a_devopts),
1199                 ARRAY_AND_SIZE(hp_6630a_devopts_cg),
1200                 ARRAY_AND_SIZE(hp_6632a_ch),
1201                 ARRAY_AND_SIZE(hp_6630a_cg),
1202                 hp_6630a_cmd,
1203                 .probe_channels = NULL,
1204                 hp_6630a_init_acquisition,
1205                 hp_6630a_update_status,
1206         },
1207
1208         /* HP 6633A */
1209         { "HP", "6633A", SCPI_DIALECT_HP_COMP, 0,
1210                 ARRAY_AND_SIZE(hp_6630a_devopts),
1211                 ARRAY_AND_SIZE(hp_6630a_devopts_cg),
1212                 ARRAY_AND_SIZE(hp_6633a_ch),
1213                 ARRAY_AND_SIZE(hp_6630a_cg),
1214                 hp_6630a_cmd,
1215                 .probe_channels = NULL,
1216                 hp_6630a_init_acquisition,
1217                 hp_6630a_update_status,
1218         },
1219
1220         /* HP 6634A */
1221         { "HP", "6634A", SCPI_DIALECT_HP_COMP, 0,
1222                 ARRAY_AND_SIZE(hp_6630a_devopts),
1223                 ARRAY_AND_SIZE(hp_6630a_devopts_cg),
1224                 ARRAY_AND_SIZE(hp_6634a_ch),
1225                 ARRAY_AND_SIZE(hp_6630a_cg),
1226                 hp_6630a_cmd,
1227                 .probe_channels = NULL,
1228                 hp_6630a_init_acquisition,
1229                 hp_6630a_update_status,
1230         },
1231
1232         /* HP 6611C */
1233         { "HP", "6611C", SCPI_DIALECT_HP_66XXB, PPS_OTP,
1234                 ARRAY_AND_SIZE(hp_6630b_devopts),
1235                 ARRAY_AND_SIZE(hp_6630b_devopts_cg),
1236                 ARRAY_AND_SIZE(hp_6611c_ch),
1237                 ARRAY_AND_SIZE(hp_6630b_cg),
1238                 hp_6630b_cmd,
1239                 .probe_channels = NULL,
1240                 hp_6630b_init_acquisition,
1241                 hp_6630b_update_status,
1242         },
1243
1244         /* HP 6612C */
1245         { "HP", "6612C", SCPI_DIALECT_HP_66XXB, PPS_OTP,
1246                 ARRAY_AND_SIZE(hp_6630b_devopts),
1247                 ARRAY_AND_SIZE(hp_6630b_devopts_cg),
1248                 ARRAY_AND_SIZE(hp_6612c_ch),
1249                 ARRAY_AND_SIZE(hp_6630b_cg),
1250                 hp_6630b_cmd,
1251                 .probe_channels = NULL,
1252                 hp_6630b_init_acquisition,
1253                 hp_6630b_update_status,
1254         },
1255
1256         /* HP 6613C */
1257         { "HP", "6613C", SCPI_DIALECT_HP_66XXB, PPS_OTP,
1258                 ARRAY_AND_SIZE(hp_6630b_devopts),
1259                 ARRAY_AND_SIZE(hp_6630b_devopts_cg),
1260                 ARRAY_AND_SIZE(hp_6613c_ch),
1261                 ARRAY_AND_SIZE(hp_6630b_cg),
1262                 hp_6630b_cmd,
1263                 .probe_channels = NULL,
1264                 hp_6630b_init_acquisition,
1265                 hp_6630b_update_status,
1266         },
1267
1268         /* HP 6614C */
1269         { "HP", "6614C", SCPI_DIALECT_HP_66XXB, PPS_OTP,
1270                 ARRAY_AND_SIZE(hp_6630b_devopts),
1271                 ARRAY_AND_SIZE(hp_6630b_devopts_cg),
1272                 ARRAY_AND_SIZE(hp_6614c_ch),
1273                 ARRAY_AND_SIZE(hp_6630b_cg),
1274                 hp_6630b_cmd,
1275                 .probe_channels = NULL,
1276                 hp_6630b_init_acquisition,
1277                 hp_6630b_update_status,
1278         },
1279
1280         /* HP 6631B */
1281         { "HP", "6631B", SCPI_DIALECT_HP_66XXB, PPS_OTP,
1282                 ARRAY_AND_SIZE(hp_6630b_devopts),
1283                 ARRAY_AND_SIZE(hp_6630b_devopts_cg),
1284                 ARRAY_AND_SIZE(hp_6631b_ch),
1285                 ARRAY_AND_SIZE(hp_6630b_cg),
1286                 hp_6630b_cmd,
1287                 .probe_channels = NULL,
1288                 hp_6630b_init_acquisition,
1289                 hp_6630b_update_status,
1290         },
1291
1292         /* HP 6632B */
1293         { "HP", "6632B", SCPI_DIALECT_HP_66XXB, PPS_OTP,
1294                 ARRAY_AND_SIZE(hp_6630b_devopts),
1295                 ARRAY_AND_SIZE(hp_6630b_devopts_cg),
1296                 ARRAY_AND_SIZE(hp_6632b_ch),
1297                 ARRAY_AND_SIZE(hp_6630b_cg),
1298                 hp_6630b_cmd,
1299                 .probe_channels = NULL,
1300                 hp_6630b_init_acquisition,
1301                 hp_6630b_update_status,
1302         },
1303
1304         /* HP 66312A */
1305         { "HP", "66312A", SCPI_DIALECT_HP_66XXB, PPS_OTP,
1306                 ARRAY_AND_SIZE(hp_6630b_devopts),
1307                 ARRAY_AND_SIZE(hp_6630b_devopts_cg),
1308                 ARRAY_AND_SIZE(hp_66312a_ch),
1309                 ARRAY_AND_SIZE(hp_6630b_cg),
1310                 hp_6630b_cmd,
1311                 .probe_channels = NULL,
1312                 hp_6630b_init_acquisition,
1313                 hp_6630b_update_status,
1314         },
1315
1316         /* HP 66332A */
1317         { "HP", "66332A", SCPI_DIALECT_HP_66XXB, PPS_OTP,
1318                 ARRAY_AND_SIZE(hp_6630b_devopts),
1319                 ARRAY_AND_SIZE(hp_6630b_devopts_cg),
1320                 ARRAY_AND_SIZE(hp_66332a_ch),
1321                 ARRAY_AND_SIZE(hp_6630b_cg),
1322                 hp_6630b_cmd,
1323                 .probe_channels = NULL,
1324                 hp_6630b_init_acquisition,
1325                 hp_6630b_update_status,
1326         },
1327
1328         /* HP 6633B */
1329         { "HP", "6633B", SCPI_DIALECT_HP_66XXB, PPS_OTP,
1330                 ARRAY_AND_SIZE(hp_6630b_devopts),
1331                 ARRAY_AND_SIZE(hp_6630b_devopts_cg),
1332                 ARRAY_AND_SIZE(hp_6633b_ch),
1333                 ARRAY_AND_SIZE(hp_6630b_cg),
1334                 hp_6630b_cmd,
1335                 .probe_channels = NULL,
1336                 hp_6630b_init_acquisition,
1337                 hp_6630b_update_status,
1338         },
1339
1340         /* HP 6634B */
1341         { "HP", "6634B", SCPI_DIALECT_HP_66XXB, PPS_OTP,
1342                 ARRAY_AND_SIZE(hp_6630b_devopts),
1343                 ARRAY_AND_SIZE(hp_6630b_devopts_cg),
1344                 ARRAY_AND_SIZE(hp_6634b_ch),
1345                 ARRAY_AND_SIZE(hp_6630b_cg),
1346                 hp_6630b_cmd,
1347                 .probe_channels = NULL,
1348                 hp_6630b_init_acquisition,
1349                 hp_6630b_update_status,
1350         },
1351
1352         /* Rigol DP700 series */
1353         { "Rigol", "^DP711$", SCPI_DIALECT_UNKNOWN, 0,
1354                 ARRAY_AND_SIZE(rigol_dp700_devopts),
1355                 ARRAY_AND_SIZE(rigol_dp700_devopts_cg),
1356                 ARRAY_AND_SIZE(rigol_dp711_ch),
1357                 ARRAY_AND_SIZE(rigol_dp700_cg),
1358                 rigol_dp700_cmd,
1359                 .probe_channels = NULL,
1360                 .init_acquisition = NULL,
1361                 .update_status = NULL,
1362         },
1363         { "Rigol", "^DP712$", SCPI_DIALECT_UNKNOWN, 0,
1364                 ARRAY_AND_SIZE(rigol_dp700_devopts),
1365                 ARRAY_AND_SIZE(rigol_dp700_devopts_cg),
1366                 ARRAY_AND_SIZE(rigol_dp712_ch),
1367                 ARRAY_AND_SIZE(rigol_dp700_cg),
1368                 rigol_dp700_cmd,
1369                 .probe_channels = NULL,
1370                 .init_acquisition = NULL,
1371                 .update_status = NULL,
1372         },
1373
1374         /* Rigol DP800 series */
1375         { "Rigol", "^DP821A$", SCPI_DIALECT_UNKNOWN, PPS_OTP,
1376                 ARRAY_AND_SIZE(rigol_dp800_devopts),
1377                 ARRAY_AND_SIZE(rigol_dp800_devopts_cg),
1378                 ARRAY_AND_SIZE(rigol_dp821a_ch),
1379                 ARRAY_AND_SIZE(rigol_dp820_cg),
1380                 rigol_dp800_cmd,
1381                 .probe_channels = NULL,
1382                 .init_acquisition = NULL,
1383                 .update_status = NULL,
1384         },
1385         { "Rigol", "^DP831A$", SCPI_DIALECT_UNKNOWN, PPS_OTP,
1386                 ARRAY_AND_SIZE(rigol_dp800_devopts),
1387                 ARRAY_AND_SIZE(rigol_dp800_devopts_cg),
1388                 ARRAY_AND_SIZE(rigol_dp831_ch),
1389                 ARRAY_AND_SIZE(rigol_dp830_cg),
1390                 rigol_dp800_cmd,
1391                 .probe_channels = NULL,
1392                 .init_acquisition = NULL,
1393                 .update_status = NULL,
1394         },
1395         { "Rigol", "^(DP832|DP832A)$", SCPI_DIALECT_UNKNOWN, PPS_OTP,
1396                 ARRAY_AND_SIZE(rigol_dp800_devopts),
1397                 ARRAY_AND_SIZE(rigol_dp800_devopts_cg),
1398                 ARRAY_AND_SIZE(rigol_dp832_ch),
1399                 ARRAY_AND_SIZE(rigol_dp830_cg),
1400                 rigol_dp800_cmd,
1401                 .probe_channels = NULL,
1402                 .init_acquisition = NULL,
1403                 .update_status = NULL,
1404         },
1405
1406         /* Philips/Fluke PM2800 series */
1407         { "Philips", "^PM28[13][123]/[01234]{1,2}$", SCPI_DIALECT_PHILIPS, 0,
1408                 ARRAY_AND_SIZE(philips_pm2800_devopts),
1409                 ARRAY_AND_SIZE(philips_pm2800_devopts_cg),
1410                 NULL, 0,
1411                 NULL, 0,
1412                 philips_pm2800_cmd,
1413                 philips_pm2800_probe_channels,
1414                 .init_acquisition = NULL,
1415                 .update_status = NULL,
1416         },
1417
1418         /* Rohde & Schwarz HMC8043 */
1419         { "Rohde&Schwarz", "HMC8043", SCPI_DIALECT_UNKNOWN, 0,
1420                 ARRAY_AND_SIZE(rs_hmc8043_devopts),
1421                 ARRAY_AND_SIZE(rs_hmc8043_devopts_cg),
1422                 ARRAY_AND_SIZE(rs_hmc8043_ch),
1423                 ARRAY_AND_SIZE(rs_hmc8043_cg),
1424                 rs_hmc8043_cmd,
1425                 .probe_channels = NULL,
1426                 .init_acquisition = NULL,
1427                 .update_status = NULL,
1428         },
1429
1430         /* Hameg / Rohde&Schwarz HMP4000 series */
1431         /* TODO Match on regex, pass scpi_pps item to .probe_channels(). */
1432         { "HAMEG", "HMP4030", SCPI_DIALECT_HMP, 0,
1433                 ARRAY_AND_SIZE(rs_hmp4040_devopts),
1434                 ARRAY_AND_SIZE(rs_hmp4040_devopts_cg),
1435                 rs_hmp4040_ch, 3,
1436                 rs_hmp4040_cg, 3,
1437                 rs_hmp4040_cmd,
1438                 .probe_channels = NULL,
1439                 .init_acquisition = NULL,
1440                 .update_status = NULL,
1441         },
1442         { "HAMEG", "HMP4040", SCPI_DIALECT_HMP, 0,
1443                 ARRAY_AND_SIZE(rs_hmp4040_devopts),
1444                 ARRAY_AND_SIZE(rs_hmp4040_devopts_cg),
1445                 ARRAY_AND_SIZE(rs_hmp4040_ch),
1446                 ARRAY_AND_SIZE(rs_hmp4040_cg),
1447                 rs_hmp4040_cmd,
1448                 .probe_channels = NULL,
1449                 .init_acquisition = NULL,
1450                 .update_status = NULL,
1451         },
1452         { "ROHDE&SCHWARZ", "HMP2020", SCPI_DIALECT_HMP, 0,
1453                 ARRAY_AND_SIZE(rs_hmp4040_devopts),
1454                 ARRAY_AND_SIZE(rs_hmp4040_devopts_cg),
1455                 rs_hmp2020_ch, 2,
1456                 rs_hmp4040_cg, 2,
1457                 rs_hmp4040_cmd,
1458                 .probe_channels = NULL,
1459                 .init_acquisition = NULL,
1460                 .update_status = NULL,
1461         },
1462         { "ROHDE&SCHWARZ", "HMP2030", SCPI_DIALECT_HMP, 0,
1463                 ARRAY_AND_SIZE(rs_hmp4040_devopts),
1464                 ARRAY_AND_SIZE(rs_hmp4040_devopts_cg),
1465                 rs_hmp2030_ch, 3,
1466                 rs_hmp4040_cg, 3,
1467                 rs_hmp4040_cmd,
1468                 .probe_channels = NULL,
1469                 .init_acquisition = NULL,
1470                 .update_status = NULL,
1471         },
1472         { "ROHDE&SCHWARZ", "HMP4030", SCPI_DIALECT_HMP, 0,
1473                 ARRAY_AND_SIZE(rs_hmp4040_devopts),
1474                 ARRAY_AND_SIZE(rs_hmp4040_devopts_cg),
1475                 rs_hmp4040_ch, 3,
1476                 rs_hmp4040_cg, 3,
1477                 rs_hmp4040_cmd,
1478                 .probe_channels = NULL,
1479                 .init_acquisition = NULL,
1480                 .update_status = NULL,
1481         },
1482         { "ROHDE&SCHWARZ", "HMP4040", SCPI_DIALECT_HMP, 0,
1483                 ARRAY_AND_SIZE(rs_hmp4040_devopts),
1484                 ARRAY_AND_SIZE(rs_hmp4040_devopts_cg),
1485                 ARRAY_AND_SIZE(rs_hmp4040_ch),
1486                 ARRAY_AND_SIZE(rs_hmp4040_cg),
1487                 rs_hmp4040_cmd,
1488                 .probe_channels = NULL,
1489                 .init_acquisition = NULL,
1490                 .update_status = NULL,
1491         },
1492 };
1493
1494 SR_PRIV unsigned int num_pps_profiles = ARRAY_SIZE(pps_profiles);