[libsigrok.git] / src / hardware / scpi-pps / profiles.c

/*
 * This file is part of the libsigrok project.
 *
 * Copyright (C) 2014 Bert Vermeulen <bert@biot.com>
 * Copyright (C) 2015 Google, Inc.
 * (Written by Alexandru Gagniuc <mrnuke@google.com> for Google, Inc.)
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */

#include <string.h>
#include <strings.h>
#include "protocol.h"

#define CH_IDX(x) (1 << x)
#define FREQ_DC_ONLY {0, 0, 0}

const char *pps_vendors[][2] = {
	{ "RIGOL TECHNOLOGIES", "Rigol" },
	{ "HEWLETT-PACKARD", "HP" },
	{ "PHILIPS", "Philips" },
	{ "Chroma ATE", "Chroma" },
};

const char *get_vendor(const char *raw_vendor)
{
	unsigned int i;

	for (i = 0; i < ARRAY_SIZE(pps_vendors); i++) {
		if (!strcasecmp(raw_vendor, pps_vendors[i][0]))
			return pps_vendors[i][1];
	}

	return raw_vendor;
}

static const uint32_t devopts_none[] = { };

/* Chroma 61600 series AC source */
static const uint32_t chroma_61604_devopts[] = {
	SR_CONF_CONTINUOUS | SR_CONF_SET,
};

static const uint32_t chroma_61604_devopts_cg[] = {
	SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
	SR_CONF_OVER_CURRENT_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
	SR_CONF_OUTPUT_VOLTAGE | SR_CONF_GET,
	SR_CONF_OUTPUT_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
	SR_CONF_OUTPUT_FREQUENCY | SR_CONF_GET,
	SR_CONF_OUTPUT_FREQUENCY_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
	SR_CONF_OUTPUT_CURRENT | SR_CONF_GET,
	SR_CONF_OUTPUT_ENABLED | SR_CONF_GET | SR_CONF_SET,
};

const struct channel_spec chroma_61604_ch[] = {
	{ "1", { 0, 300, 0.1 }, { 0, 16, 0.1 }, { 1.0, 1000.0, 0.01 } },
};

const struct channel_group_spec chroma_61604_cg[] = {
	{ "1", CH_IDX(0), PPS_OVP | PPS_OCP },
};

const struct scpi_command chroma_61604_cmd[] = {
	{ SCPI_CMD_REMOTE, "SYST:REM" },
	{ SCPI_CMD_LOCAL, "SYST:LOC" },
	{ SCPI_CMD_GET_MEAS_VOLTAGE, ":FETC:VOLT:ACDC?" },
	{ SCPI_CMD_GET_MEAS_FREQUENCY, ":FETC:FREQ?" },
	{ SCPI_CMD_GET_MEAS_CURRENT, ":FETC:CURR:AC?" },
	{ SCPI_CMD_GET_MEAS_POWER, ":FETC:POW:AC?" },
	{ SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT:AC?" },
	{ SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT:AC %.1f" },
	{ SCPI_CMD_GET_FREQUENCY_TARGET, ":SOUR:FREQ?" },
	{ SCPI_CMD_SET_FREQUENCY_TARGET, ":SOUR:FREQ %.2f" },
	{ SCPI_CMD_GET_OUTPUT_ENABLED, ":OUTP?" },
	{ SCPI_CMD_SET_OUTPUT_ENABLE, ":OUTP ON" },
	{ SCPI_CMD_SET_OUTPUT_DISABLE, ":OUTP OFF" },
	{ SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:LIM:AC?" },
	{ SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:LIM:AC %.1f" },
	/* This is not a current limit mode. It is overcurrent protection */
	{ SCPI_CMD_GET_OVER_CURRENT_PROTECTION_THRESHOLD, ":SOUR:CURR:LIM?" },
	{ SCPI_CMD_SET_OVER_CURRENT_PROTECTION_THRESHOLD, ":SOUR:CURR:LIM %.2f" },
};

/* Rigol DP800 series */
static const uint32_t rigol_dp800_devopts[] = {
	SR_CONF_CONTINUOUS | SR_CONF_SET,
	SR_CONF_OVER_TEMPERATURE_PROTECTION | SR_CONF_GET | SR_CONF_SET,
};

static const uint32_t rigol_dp800_devopts_cg[] = {
	SR_CONF_OUTPUT_REGULATION | SR_CONF_GET,
	SR_CONF_OVER_VOLTAGE_PROTECTION_ENABLED | SR_CONF_GET | SR_CONF_SET,
	SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE | SR_CONF_GET,
	SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
	SR_CONF_OVER_CURRENT_PROTECTION_ENABLED | SR_CONF_GET | SR_CONF_SET,
	SR_CONF_OVER_CURRENT_PROTECTION_ACTIVE | SR_CONF_GET,
	SR_CONF_OVER_CURRENT_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
	SR_CONF_OUTPUT_VOLTAGE | SR_CONF_GET,
	SR_CONF_OUTPUT_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
	SR_CONF_OUTPUT_CURRENT | SR_CONF_GET,
	SR_CONF_OUTPUT_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
	SR_CONF_OUTPUT_ENABLED | SR_CONF_GET | SR_CONF_SET,
};

const struct channel_spec rigol_dp821a_ch[] = {
	{ "1", { 0, 60, 0.001 }, { 0, 1, 0.0001 }, FREQ_DC_ONLY },
	{ "2", { 0, 8, 0.001 }, { 0, 10, 0.001 }, FREQ_DC_ONLY },
};

const struct channel_spec rigol_dp831_ch[] = {
	{ "1", { 0, 8, 0.001 }, { 0, 5, 0.0003 }, FREQ_DC_ONLY },
	{ "2", { 0, 30, 0.001 }, { 0, 2, 0.0001 }, FREQ_DC_ONLY },
	{ "3", { 0, -30, 0.001 }, { 0, 2, 0.0001 }, FREQ_DC_ONLY },
};

const struct channel_spec rigol_dp832_ch[] = {
	{ "1", { 0, 30, 0.001 }, { 0, 3, 0.001 }, FREQ_DC_ONLY },
	{ "2", { 0, 30, 0.001 }, { 0, 3, 0.001 }, FREQ_DC_ONLY },
	{ "3", { 0, 5, 0.001 }, { 0, 3, 0.001 }, FREQ_DC_ONLY },
};

const struct channel_group_spec rigol_dp820_cg[] = {
	{ "1", CH_IDX(0), PPS_OVP | PPS_OCP },
	{ "2", CH_IDX(1), PPS_OVP | PPS_OCP },
};

const struct channel_group_spec rigol_dp830_cg[] = {
	{ "1", CH_IDX(0), PPS_OVP | PPS_OCP },
	{ "2", CH_IDX(1), PPS_OVP | PPS_OCP },
	{ "3", CH_IDX(2), PPS_OVP | PPS_OCP },
};

const struct scpi_command rigol_dp800_cmd[] = {
	{ SCPI_CMD_REMOTE, "SYST:REMOTE" },
	{ SCPI_CMD_LOCAL, "SYST:LOCAL" },
	{ SCPI_CMD_BEEPER, "SYST:BEEP:STAT?" },
	{ SCPI_CMD_BEEPER_ENABLE, "SYST:BEEP:STAT ON" },
	{ SCPI_CMD_BEEPER_DISABLE, "SYST:BEEP:STAT OFF" },
	{ SCPI_CMD_SELECT_CHANNEL, ":INST:NSEL %s" },
	{ SCPI_CMD_GET_MEAS_VOLTAGE, ":MEAS:VOLT?" },
	{ SCPI_CMD_GET_MEAS_CURRENT, ":MEAS:CURR?" },
	{ SCPI_CMD_GET_MEAS_POWER, ":MEAS:POWE?" },
	{ SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT?" },
	{ SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT %.6f" },
	{ SCPI_CMD_GET_CURRENT_LIMIT, ":SOUR:CURR?" },
	{ SCPI_CMD_SET_CURRENT_LIMIT, ":SOUR:CURR %.6f" },
	{ SCPI_CMD_GET_OUTPUT_ENABLED, ":OUTP?" },
	{ SCPI_CMD_SET_OUTPUT_ENABLE, ":OUTP ON" },
	{ SCPI_CMD_SET_OUTPUT_DISABLE, ":OUTP OFF" },
	{ SCPI_CMD_GET_OUTPUT_REGULATION, ":OUTP:MODE?" },
	{ SCPI_CMD_GET_OVER_TEMPERATURE_PROTECTION, ":SYST:OTP?" },
	{ SCPI_CMD_SET_OVER_TEMPERATURE_PROTECTION_ENABLE, ":SYST:OTP ON" },
	{ SCPI_CMD_SET_OVER_TEMPERATURE_PROTECTION_DISABLE, ":SYST:OTP OFF" },
	{ SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ENABLED, ":OUTP:OVP?" },
	{ SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_ENABLE, ":OUTP:OVP ON" },
	{ SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_DISABLE, ":OUTP:OVP OFF" },
	{ SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ACTIVE, ":OUTP:OVP:QUES?" },
	{ SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":OUTP:OVP:VAL?" },
	{ SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":OUTP:OVP:VAL %.6f" },
	{ SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ENABLED, ":OUTP:OCP?" },
	{ SCPI_CMD_SET_OVER_CURRENT_PROTECTION_ENABLE, ":OUTP:OCP:STAT ON" },
	{ SCPI_CMD_SET_OVER_CURRENT_PROTECTION_DISABLE, ":OUTP:OCP:STAT OFF" },
	{ SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ACTIVE, ":OUTP:OCP:QUES?" },
	{ SCPI_CMD_GET_OVER_CURRENT_PROTECTION_THRESHOLD, ":OUTP:OCP:VAL?" },
	{ SCPI_CMD_SET_OVER_CURRENT_PROTECTION_THRESHOLD, ":OUTP:OCP:VAL %.6f" },
};

/* HP 663xx series */
static const uint32_t hp_6632b_devopts[] = {
	SR_CONF_CONTINUOUS | SR_CONF_SET,
	SR_CONF_OUTPUT_ENABLED | SR_CONF_GET | SR_CONF_SET,
	SR_CONF_OUTPUT_VOLTAGE | SR_CONF_GET,
	SR_CONF_OUTPUT_CURRENT | SR_CONF_GET,
	SR_CONF_OUTPUT_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
	SR_CONF_OUTPUT_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
};

const struct channel_spec hp_6632b_ch[] = {
	{ "1", { 0, 20.475, 0.005 }, { 0, 5.1188, 0.00132 }, FREQ_DC_ONLY },
};

const struct channel_group_spec hp_6632b_cg[] = {
	{ "1", CH_IDX(0), 0 },
};

const struct scpi_command hp_6632b_cmd[] = {
	{ SCPI_CMD_GET_OUTPUT_ENABLED, "OUTP:STAT?" },
	{ SCPI_CMD_SET_OUTPUT_ENABLE, "OUTP:STAT ON" },
	{ SCPI_CMD_SET_OUTPUT_DISABLE, "OUTP:STAT OFF" },
	{ SCPI_CMD_GET_MEAS_VOLTAGE, ":MEAS:VOLT?" },
	{ SCPI_CMD_GET_MEAS_CURRENT, ":MEAS:CURR?" },
	{ SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT?" },
	{ SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT %.6f" },
	{ SCPI_CMD_GET_CURRENT_LIMIT, ":SOUR:CURR?" },
	{ SCPI_CMD_SET_CURRENT_LIMIT, ":SOUR:CURR %.6f" },
};

/* Philips/Fluke PM2800 series */
static const uint32_t philips_pm2800_devopts[] = {
	SR_CONF_CONTINUOUS | SR_CONF_SET,
};

static const uint32_t philips_pm2800_devopts_cg[] = {
	SR_CONF_OUTPUT_ENABLED | SR_CONF_GET | SR_CONF_SET,
	SR_CONF_OUTPUT_VOLTAGE | SR_CONF_GET,
	SR_CONF_OUTPUT_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
	SR_CONF_OUTPUT_CURRENT | SR_CONF_GET,
	SR_CONF_OUTPUT_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
	SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE | SR_CONF_GET,
	SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD | SR_CONF_GET | SR_CONF_SET,
	SR_CONF_OVER_CURRENT_PROTECTION_ENABLED | SR_CONF_GET | SR_CONF_SET,
	SR_CONF_OVER_CURRENT_PROTECTION_ACTIVE | SR_CONF_GET,
	SR_CONF_OUTPUT_REGULATION | SR_CONF_GET,
};

enum philips_pm2800_modules {
	PM2800_MOD_30V_10A = 1,
	PM2800_MOD_60V_5A,
	PM2800_MOD_60V_10A,
	PM2800_MOD_8V_15A,
	PM2800_MOD_60V_2A,
	PM2800_MOD_120V_1A,
};

static const struct philips_pm2800_module_spec {
	/* Min, max, programming resolution. */
	float voltage[3];
	float current[3];
} philips_pm2800_module_specs[] = {
	/* Autoranging modules. */
	[PM2800_MOD_30V_10A] = { { 0, 30, 0.0075 }, { 0, 10, 0.0025 } },
	[PM2800_MOD_60V_5A] = { { 0, 60, 0.015 }, { 0, 5, 0.00125 } },
	[PM2800_MOD_60V_10A] = { { 0, 60, 0.015 }, { 0, 10, 0.0025 } },
	/* Linear modules. */
	[PM2800_MOD_8V_15A] = { { 0, 8, 0.002 }, { -15, 15, 0.00375 } },
	[PM2800_MOD_60V_2A] = { { 0, 60, 0.015 }, { -2, 2, 0.0005 } },
	[PM2800_MOD_120V_1A] = { { 0, 120, 0.030 }, { -1, 1, 0.00025 } },
};

static const struct philips_pm2800_model {
	unsigned int chassis;
	unsigned int num_modules;
	unsigned int set;
	unsigned int modules[3];
} philips_pm2800_matrix[] = {
	/* Autoranging chassis. */
	{ 1, 1, 0, { PM2800_MOD_30V_10A, 0, 0 } },
	{ 1, 1, 1, { PM2800_MOD_60V_5A, 0, 0 } },
	{ 1, 2, 0, { PM2800_MOD_30V_10A, PM2800_MOD_30V_10A, 0 } },
	{ 1, 2, 1, { PM2800_MOD_60V_5A, PM2800_MOD_60V_5A, 0 } },
	{ 1, 2, 2, { PM2800_MOD_30V_10A, PM2800_MOD_60V_5A, 0 } },
	{ 1, 2, 3, { PM2800_MOD_30V_10A, PM2800_MOD_60V_10A, 0 } },
	{ 1, 2, 4, { PM2800_MOD_60V_5A, PM2800_MOD_60V_10A, 0 } },
	{ 1, 3, 0, { PM2800_MOD_30V_10A, PM2800_MOD_30V_10A, PM2800_MOD_30V_10A } },
	{ 1, 3, 1, { PM2800_MOD_60V_5A, PM2800_MOD_60V_5A, PM2800_MOD_60V_5A } },
	{ 1, 3, 2, { PM2800_MOD_30V_10A, PM2800_MOD_30V_10A, PM2800_MOD_60V_5A } },
	{ 1, 3, 3, { PM2800_MOD_30V_10A, PM2800_MOD_60V_5A, PM2800_MOD_60V_5A } },
	/* Linear chassis. */
	{ 3, 1, 0, { PM2800_MOD_60V_2A, 0, 0 } },
	{ 3, 1, 1, { PM2800_MOD_120V_1A, 0, 0 } },
	{ 3, 1, 2, { PM2800_MOD_8V_15A, 0, 0 } },
	{ 3, 2, 0, { PM2800_MOD_60V_2A, 0, 0 } },
	{ 3, 2, 1, { PM2800_MOD_120V_1A, 0, 0 } },
	{ 3, 2, 2, { PM2800_MOD_60V_2A, PM2800_MOD_120V_1A, 0 } },
	{ 3, 2, 3, { PM2800_MOD_8V_15A, PM2800_MOD_8V_15A, 0 } },
};

static const char *philips_pm2800_names[] = { "1", "2", "3" };

static int philips_pm2800_probe_channels(struct sr_dev_inst *sdi,
		struct sr_scpi_hw_info *hw_info,
		struct channel_spec **channels, unsigned int *num_channels,
		struct channel_group_spec **channel_groups, unsigned int *num_channel_groups)
{
	const struct philips_pm2800_model *model;
	const struct philips_pm2800_module_spec *spec;
	unsigned int chassis, num_modules, set, module, m, i;

	(void)sdi;

	/*
	 * The model number as reported by *IDN? looks like e.g. PM2813/11,
	 * Where "PM28" is fixed, followed by the chassis code (1 = autoranging,
	 * 3 = linear series) and the number of modules: 1-3 for autoranging,
	 * 1-2 for linear.
	 * After the slash, the first digit denotes the module set. The
	 * digit after that denotes front (5) or rear (1) binding posts.
	 */
	chassis = hw_info->model[4] - 0x30;
	num_modules = hw_info->model[5] - 0x30;
	set = hw_info->model[7] - 0x30;
	for (m = 0; m < ARRAY_SIZE(philips_pm2800_matrix); m++) {
		model = &philips_pm2800_matrix[m];
		if (model->chassis == chassis && model->num_modules == num_modules
				&& model->set == set)
			break;
	}
	if (m == ARRAY_SIZE(philips_pm2800_matrix)) {
		sr_dbg("Model %s not found in matrix.", hw_info->model);
		return SR_ERR;
	}

	sr_dbg("Found %d output channel%s:", num_modules, num_modules > 1 ? "s" : "");
	*channels = g_malloc0(sizeof(struct channel_spec) * num_modules);
	*channel_groups = g_malloc0(sizeof(struct channel_group_spec) * num_modules);
	for (i = 0; i < num_modules; i++) {
		module = model->modules[i];
		spec = &philips_pm2800_module_specs[module];
		sr_dbg("output %d: %.0f - %.0fV, %.0f - %.0fA", i + 1,
				spec->voltage[0], spec->voltage[1],
				spec->current[0], spec->current[1]);
		(*channels)[i].name = (char *)philips_pm2800_names[i];
		memcpy(&((*channels)[i].voltage), spec, sizeof(float) * 6);
		(*channel_groups)[i].name = (char *)philips_pm2800_names[i];
		(*channel_groups)[i].channel_index_mask = 1 << i;
		(*channel_groups)[i].features = PPS_OTP | PPS_OVP | PPS_OCP;
	}
	*num_channels = *num_channel_groups = num_modules;

	return SR_OK;
}

const struct scpi_command philips_pm2800_cmd[] = {
	{ SCPI_CMD_SELECT_CHANNEL, ":INST:NSEL %s" },
	{ SCPI_CMD_GET_MEAS_VOLTAGE, ":MEAS:VOLT?" },
	{ SCPI_CMD_GET_MEAS_CURRENT, ":MEAS:CURR?" },
	{ SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT?" },
	{ SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT %.6f" },
	{ SCPI_CMD_GET_CURRENT_LIMIT, ":SOUR:CURR?" },
	{ SCPI_CMD_SET_CURRENT_LIMIT, ":SOUR:CURR %.6f" },
	{ SCPI_CMD_GET_OUTPUT_ENABLED, ":OUTP?" },
	{ SCPI_CMD_SET_OUTPUT_ENABLE, ":OUTP ON" },
	{ SCPI_CMD_SET_OUTPUT_DISABLE, ":OUTP OFF" },
	{ SCPI_CMD_GET_OUTPUT_REGULATION, ":SOUR:FUNC:MODE?" },
	{ SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ACTIVE, ":SOUR:VOLT:PROT:TRIP?" },
	{ SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:PROT:LEV?" },
	{ SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:PROT:LEV %.6f" },
	{ SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ENABLED, ":SOUR:CURR:PROT:STAT?" },
	{ SCPI_CMD_SET_OVER_CURRENT_PROTECTION_ENABLE, ":SOUR:CURR:PROT:STAT ON" },
	{ SCPI_CMD_SET_OVER_CURRENT_PROTECTION_DISABLE, ":SOUR:CURR:PROT:STAT OFF" },
	{ SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ACTIVE, ":SOUR:CURR:PROT:TRIP?" },
};

SR_PRIV const struct scpi_pps pps_profiles[] = {
	/* Chroma 61604 */
	{ "Chroma", "61604", 0,
		ARRAY_AND_SIZE(chroma_61604_devopts),
		ARRAY_AND_SIZE(chroma_61604_devopts_cg),
		ARRAY_AND_SIZE(chroma_61604_ch),
		ARRAY_AND_SIZE(chroma_61604_cg),
		ARRAY_AND_SIZE(chroma_61604_cmd),
		.probe_channels = NULL,
	},
	/* HP 6632B */
	{ "HP", "6632B", 0,
		ARRAY_AND_SIZE(hp_6632b_devopts),
		ARRAY_AND_SIZE(devopts_none),
		ARRAY_AND_SIZE(hp_6632b_ch),
		ARRAY_AND_SIZE(hp_6632b_cg),
		ARRAY_AND_SIZE(hp_6632b_cmd),
		.probe_channels = NULL,
	},

	/* Rigol DP800 series */
	{ "Rigol", "^DP821A$", PPS_OTP,
		ARRAY_AND_SIZE(rigol_dp800_devopts),
		ARRAY_AND_SIZE(rigol_dp800_devopts_cg),
		ARRAY_AND_SIZE(rigol_dp821a_ch),
		ARRAY_AND_SIZE(rigol_dp820_cg),
		ARRAY_AND_SIZE(rigol_dp800_cmd),
		.probe_channels = NULL,
	},
	{ "Rigol", "^DP831A$", PPS_OTP,
		ARRAY_AND_SIZE(rigol_dp800_devopts),
		ARRAY_AND_SIZE(rigol_dp800_devopts_cg),
		ARRAY_AND_SIZE(rigol_dp831_ch),
		ARRAY_AND_SIZE(rigol_dp830_cg),
		ARRAY_AND_SIZE(rigol_dp800_cmd),
		.probe_channels = NULL,
	},
	{ "Rigol", "^(DP832|DP832A)$", PPS_OTP,
		ARRAY_AND_SIZE(rigol_dp800_devopts),
		ARRAY_AND_SIZE(rigol_dp800_devopts_cg),
		ARRAY_AND_SIZE(rigol_dp832_ch),
		ARRAY_AND_SIZE(rigol_dp830_cg),
		ARRAY_AND_SIZE(rigol_dp800_cmd),
		.probe_channels = NULL,
	},

	/* Philips/Fluke PM2800 series */
	{ "Philips", "^PM28[13][123]/[01234]{1,2}$", 0,
		ARRAY_AND_SIZE(philips_pm2800_devopts),
		ARRAY_AND_SIZE(philips_pm2800_devopts_cg),
		NULL, 0,
		NULL, 0,
		ARRAY_AND_SIZE(philips_pm2800_cmd),
		philips_pm2800_probe_channels,
	},
};

SR_PRIV unsigned int num_pps_profiles = ARRAY_SIZE(pps_profiles);
Commit	Line	Data
d4eabea8 BV	1	/*
	2	* This file is part of the libsigrok project.
	3	*
	4	* Copyright (C) 2014 Bert Vermeulen <bert@biot.com>
4ee1e2f3 AG	5	* Copyright (C) 2015 Google, Inc.
4ee1e2f3 AG	6	* (Written by Alexandru Gagniuc <mrnuke@google.com> for Google, Inc.)
d4eabea8 BV	7	*
	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.
	12	*
	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.
	17	*
	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/>.
	20	*/
	21
22c18b03	22	#include <string.h>
ba464a12	23	#include <strings.h>
d4eabea8 BV	24	#include "protocol.h"
	25
	26	#define CH_IDX(x) (1 << x)
4264f1c0	27	#define FREQ_DC_ONLY {0, 0, 0}
d4eabea8	28
22c18b03 BV	29	const char *pps_vendors[][2] = {
22c18b03 BV	30	{ "RIGOL TECHNOLOGIES", "Rigol" },
bc4a2a46	31	{ "HEWLETT-PACKARD", "HP" },
c3eadb07	32	{ "PHILIPS", "Philips" },
4ee1e2f3	33	{ "Chroma ATE", "Chroma" },
d4eabea8 BV	34	};
d4eabea8 BV	35
22c18b03 BV	36	const char get_vendor(const char raw_vendor)
	37	{
	38	unsigned int i;
	39
	40	for (i = 0; i < ARRAY_SIZE(pps_vendors); i++) {
	41	if (!strcasecmp(raw_vendor, pps_vendors[i][0]))
	42	return pps_vendors[i][1];
	43	}
	44
	45	return raw_vendor;
	46	}
	47
584560f1	48	static const uint32_t devopts_none[] = { };
bfc86799	49
4ee1e2f3 AG	50	/* Chroma 61600 series AC source */
	51	static const uint32_t chroma_61604_devopts[] = {
	52	SR_CONF_CONTINUOUS \| SR_CONF_SET,
	53	};
	54
	55	static const uint32_t chroma_61604_devopts_cg[] = {
	56	SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD \| SR_CONF_GET \| SR_CONF_SET,
	57	SR_CONF_OVER_CURRENT_PROTECTION_THRESHOLD \| SR_CONF_GET \| SR_CONF_SET,
	58	SR_CONF_OUTPUT_VOLTAGE \| SR_CONF_GET,
	59	SR_CONF_OUTPUT_VOLTAGE_TARGET \| SR_CONF_GET \| SR_CONF_SET \| SR_CONF_LIST,
6c0c9dd2 AG	60	SR_CONF_OUTPUT_FREQUENCY \| SR_CONF_GET,
6c0c9dd2 AG	61	SR_CONF_OUTPUT_FREQUENCY_TARGET \| SR_CONF_GET \| SR_CONF_SET \| SR_CONF_LIST,
4ee1e2f3 AG	62	SR_CONF_OUTPUT_CURRENT \| SR_CONF_GET,
	63	SR_CONF_OUTPUT_ENABLED \| SR_CONF_GET \| SR_CONF_SET,
	64	};
	65
	66	const struct channel_spec chroma_61604_ch[] = {
6c0c9dd2	67	{ "1", { 0, 300, 0.1 }, { 0, 16, 0.1 }, { 1.0, 1000.0, 0.01 } },
4ee1e2f3 AG	68	};
	69
	70	const struct channel_group_spec chroma_61604_cg[] = {
	71	{ "1", CH_IDX(0), PPS_OVP \| PPS_OCP },
	72	};
	73
	74	const struct scpi_command chroma_61604_cmd[] = {
	75	{ SCPI_CMD_REMOTE, "SYST:REM" },
	76	{ SCPI_CMD_LOCAL, "SYST:LOC" },
	77	{ SCPI_CMD_GET_MEAS_VOLTAGE, ":FETC:VOLT:ACDC?" },
6c0c9dd2	78	{ SCPI_CMD_GET_MEAS_FREQUENCY, ":FETC:FREQ?" },
4ee1e2f3 AG	79	{ SCPI_CMD_GET_MEAS_CURRENT, ":FETC:CURR:AC?" },
	80	{ SCPI_CMD_GET_MEAS_POWER, ":FETC:POW:AC?" },
	81	{ SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT:AC?" },
	82	{ SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT:AC %.1f" },
6c0c9dd2 AG	83	{ SCPI_CMD_GET_FREQUENCY_TARGET, ":SOUR:FREQ?" },
6c0c9dd2 AG	84	{ SCPI_CMD_SET_FREQUENCY_TARGET, ":SOUR:FREQ %.2f" },
4ee1e2f3 AG	85	{ SCPI_CMD_GET_OUTPUT_ENABLED, ":OUTP?" },
	86	{ SCPI_CMD_SET_OUTPUT_ENABLE, ":OUTP ON" },
	87	{ SCPI_CMD_SET_OUTPUT_DISABLE, ":OUTP OFF" },
	88	{ SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:LIM:AC?" },
	89	{ SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:LIM:AC %.1f" },
	90	/* This is not a current limit mode. It is overcurrent protection */
	91	{ SCPI_CMD_GET_OVER_CURRENT_PROTECTION_THRESHOLD, ":SOUR:CURR:LIM?" },
	92	{ SCPI_CMD_SET_OVER_CURRENT_PROTECTION_THRESHOLD, ":SOUR:CURR:LIM %.2f" },
	93	};
	94
d4eabea8	95	/* Rigol DP800 series */
584560f1	96	static const uint32_t rigol_dp800_devopts[] = {
9d9cf1c4	97	SR_CONF_CONTINUOUS \| SR_CONF_SET,
5827f61b	98	SR_CONF_OVER_TEMPERATURE_PROTECTION \| SR_CONF_GET \| SR_CONF_SET,
d4eabea8 BV	99	};
d4eabea8 BV	100
584560f1	101	static const uint32_t rigol_dp800_devopts_cg[] = {
5827f61b BV	102	SR_CONF_OUTPUT_REGULATION \| SR_CONF_GET,
	103	SR_CONF_OVER_VOLTAGE_PROTECTION_ENABLED \| SR_CONF_GET \| SR_CONF_SET,
	104	SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE \| SR_CONF_GET,
	105	SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD \| SR_CONF_GET \| SR_CONF_SET,
	106	SR_CONF_OVER_CURRENT_PROTECTION_ENABLED \| SR_CONF_GET \| SR_CONF_SET,
	107	SR_CONF_OVER_CURRENT_PROTECTION_ACTIVE \| SR_CONF_GET,
	108	SR_CONF_OVER_CURRENT_PROTECTION_THRESHOLD \| SR_CONF_GET \| SR_CONF_SET,
	109	SR_CONF_OUTPUT_VOLTAGE \| SR_CONF_GET,
ca95e90f	110	SR_CONF_OUTPUT_VOLTAGE_TARGET \| SR_CONF_GET \| SR_CONF_SET \| SR_CONF_LIST,
5827f61b	111	SR_CONF_OUTPUT_CURRENT \| SR_CONF_GET,
ca95e90f	112	SR_CONF_OUTPUT_CURRENT_LIMIT \| SR_CONF_GET \| SR_CONF_SET \| SR_CONF_LIST,
5827f61b	113	SR_CONF_OUTPUT_ENABLED \| SR_CONF_GET \| SR_CONF_SET,
d4eabea8 BV	114	};
d4eabea8 BV	115
329733d9	116	const struct channel_spec rigol_dp821a_ch[] = {
4264f1c0 AG	117	{ "1", { 0, 60, 0.001 }, { 0, 1, 0.0001 }, FREQ_DC_ONLY },
4264f1c0 AG	118	{ "2", { 0, 8, 0.001 }, { 0, 10, 0.001 }, FREQ_DC_ONLY },
cfcdf576 ML	119	};
cfcdf576 ML	120
329733d9	121	const struct channel_spec rigol_dp831_ch[] = {
4264f1c0 AG	122	{ "1", { 0, 8, 0.001 }, { 0, 5, 0.0003 }, FREQ_DC_ONLY },
	123	{ "2", { 0, 30, 0.001 }, { 0, 2, 0.0001 }, FREQ_DC_ONLY },
	124	{ "3", { 0, -30, 0.001 }, { 0, 2, 0.0001 }, FREQ_DC_ONLY },
d4eabea8 BV	125	};
d4eabea8 BV	126
329733d9	127	const struct channel_spec rigol_dp832_ch[] = {
4264f1c0 AG	128	{ "1", { 0, 30, 0.001 }, { 0, 3, 0.001 }, FREQ_DC_ONLY },
	129	{ "2", { 0, 30, 0.001 }, { 0, 3, 0.001 }, FREQ_DC_ONLY },
	130	{ "3", { 0, 5, 0.001 }, { 0, 3, 0.001 }, FREQ_DC_ONLY },
3222ee10 BV	131	};
3222ee10 BV	132
329733d9	133	const struct channel_group_spec rigol_dp820_cg[] = {
cfcdf576 ML	134	{ "1", CH_IDX(0), PPS_OVP \| PPS_OCP },
	135	{ "2", CH_IDX(1), PPS_OVP \| PPS_OCP },
	136	};
	137
329733d9	138	const struct channel_group_spec rigol_dp830_cg[] = {
d4eabea8 BV	139	{ "1", CH_IDX(0), PPS_OVP \| PPS_OCP },
	140	{ "2", CH_IDX(1), PPS_OVP \| PPS_OCP },
	141	{ "3", CH_IDX(2), PPS_OVP \| PPS_OCP },
	142	};
	143
329733d9	144	const struct scpi_command rigol_dp800_cmd[] = {
60475cd7 BV	145	{ SCPI_CMD_REMOTE, "SYST:REMOTE" },
60475cd7 BV	146	{ SCPI_CMD_LOCAL, "SYST:LOCAL" },
ee2860ee BV	147	{ SCPI_CMD_BEEPER, "SYST:BEEP:STAT?" },
	148	{ SCPI_CMD_BEEPER_ENABLE, "SYST:BEEP:STAT ON" },
	149	{ SCPI_CMD_BEEPER_DISABLE, "SYST:BEEP:STAT OFF" },
60475cd7 BV	150	{ SCPI_CMD_SELECT_CHANNEL, ":INST:NSEL %s" },
	151	{ SCPI_CMD_GET_MEAS_VOLTAGE, ":MEAS:VOLT?" },
	152	{ SCPI_CMD_GET_MEAS_CURRENT, ":MEAS:CURR?" },
	153	{ SCPI_CMD_GET_MEAS_POWER, ":MEAS:POWE?" },
	154	{ SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT?" },
	155	{ SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT %.6f" },
	156	{ SCPI_CMD_GET_CURRENT_LIMIT, ":SOUR:CURR?" },
	157	{ SCPI_CMD_SET_CURRENT_LIMIT, ":SOUR:CURR %.6f" },
	158	{ SCPI_CMD_GET_OUTPUT_ENABLED, ":OUTP?" },
	159	{ SCPI_CMD_SET_OUTPUT_ENABLE, ":OUTP ON" },
	160	{ SCPI_CMD_SET_OUTPUT_DISABLE, ":OUTP OFF" },
	161	{ SCPI_CMD_GET_OUTPUT_REGULATION, ":OUTP:MODE?" },
d4eabea8	162	{ SCPI_CMD_GET_OVER_TEMPERATURE_PROTECTION, ":SYST:OTP?" },
53a81803 BV	163	{ SCPI_CMD_SET_OVER_TEMPERATURE_PROTECTION_ENABLE, ":SYST:OTP ON" },
53a81803 BV	164	{ SCPI_CMD_SET_OVER_TEMPERATURE_PROTECTION_DISABLE, ":SYST:OTP OFF" },
60475cd7 BV	165	{ SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ENABLED, ":OUTP:OVP?" },
	166	{ SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_ENABLE, ":OUTP:OVP ON" },
	167	{ SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_DISABLE, ":OUTP:OVP OFF" },
	168	{ SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ACTIVE, ":OUTP:OVP:QUES?" },
	169	{ SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":OUTP:OVP:VAL?" },
	170	{ SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":OUTP:OVP:VAL %.6f" },
	171	{ SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ENABLED, ":OUTP:OCP?" },
	172	{ SCPI_CMD_SET_OVER_CURRENT_PROTECTION_ENABLE, ":OUTP:OCP:STAT ON" },
	173	{ SCPI_CMD_SET_OVER_CURRENT_PROTECTION_DISABLE, ":OUTP:OCP:STAT OFF" },
	174	{ SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ACTIVE, ":OUTP:OCP:QUES?" },
	175	{ SCPI_CMD_GET_OVER_CURRENT_PROTECTION_THRESHOLD, ":OUTP:OCP:VAL?" },
	176	{ SCPI_CMD_SET_OVER_CURRENT_PROTECTION_THRESHOLD, ":OUTP:OCP:VAL %.6f" },
d4eabea8 BV	177	};
d4eabea8 BV	178
bfc86799	179	/* HP 663xx series */
584560f1	180	static const uint32_t hp_6632b_devopts[] = {
9d9cf1c4	181	SR_CONF_CONTINUOUS \| SR_CONF_SET,
5827f61b BV	182	SR_CONF_OUTPUT_ENABLED \| SR_CONF_GET \| SR_CONF_SET,
	183	SR_CONF_OUTPUT_VOLTAGE \| SR_CONF_GET,
	184	SR_CONF_OUTPUT_CURRENT \| SR_CONF_GET,
ca95e90f BV	185	SR_CONF_OUTPUT_VOLTAGE_TARGET \| SR_CONF_GET \| SR_CONF_SET \| SR_CONF_LIST,
ca95e90f BV	186	SR_CONF_OUTPUT_CURRENT_LIMIT \| SR_CONF_GET \| SR_CONF_SET \| SR_CONF_LIST,
bc4a2a46 BV	187	};
bc4a2a46 BV	188
329733d9	189	const struct channel_spec hp_6632b_ch[] = {
4264f1c0	190	{ "1", { 0, 20.475, 0.005 }, { 0, 5.1188, 0.00132 }, FREQ_DC_ONLY },
bc4a2a46 BV	191	};
bc4a2a46 BV	192
329733d9	193	const struct channel_group_spec hp_6632b_cg[] = {
bc4a2a46 BV	194	{ "1", CH_IDX(0), 0 },
	195	};
	196
329733d9	197	const struct scpi_command hp_6632b_cmd[] = {
bc4a2a46	198	{ SCPI_CMD_GET_OUTPUT_ENABLED, "OUTP:STAT?" },
53a81803 BV	199	{ SCPI_CMD_SET_OUTPUT_ENABLE, "OUTP:STAT ON" },
53a81803 BV	200	{ SCPI_CMD_SET_OUTPUT_DISABLE, "OUTP:STAT OFF" },
bc4a2a46 BV	201	{ SCPI_CMD_GET_MEAS_VOLTAGE, ":MEAS:VOLT?" },
bc4a2a46 BV	202	{ SCPI_CMD_GET_MEAS_CURRENT, ":MEAS:CURR?" },
ca95e90f BV	203	{ SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT?" },
	204	{ SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT %.6f" },
	205	{ SCPI_CMD_GET_CURRENT_LIMIT, ":SOUR:CURR?" },
	206	{ SCPI_CMD_SET_CURRENT_LIMIT, ":SOUR:CURR %.6f" },
bc4a2a46 BV	207	};
bc4a2a46 BV	208
c3eadb07	209	/* Philips/Fluke PM2800 series */
9d9cf1c4 BV	210	static const uint32_t philips_pm2800_devopts[] = {
	211	SR_CONF_CONTINUOUS \| SR_CONF_SET,
	212	};
	213
c3eadb07 BV	214	static const uint32_t philips_pm2800_devopts_cg[] = {
	215	SR_CONF_OUTPUT_ENABLED \| SR_CONF_GET \| SR_CONF_SET,
	216	SR_CONF_OUTPUT_VOLTAGE \| SR_CONF_GET,
	217	SR_CONF_OUTPUT_VOLTAGE_TARGET \| SR_CONF_GET \| SR_CONF_SET \| SR_CONF_LIST,
	218	SR_CONF_OUTPUT_CURRENT \| SR_CONF_GET,
	219	SR_CONF_OUTPUT_CURRENT_LIMIT \| SR_CONF_GET \| SR_CONF_SET \| SR_CONF_LIST,
	220	SR_CONF_OVER_VOLTAGE_PROTECTION_ACTIVE \| SR_CONF_GET,
	221	SR_CONF_OVER_VOLTAGE_PROTECTION_THRESHOLD \| SR_CONF_GET \| SR_CONF_SET,
	222	SR_CONF_OVER_CURRENT_PROTECTION_ENABLED \| SR_CONF_GET \| SR_CONF_SET,
	223	SR_CONF_OVER_CURRENT_PROTECTION_ACTIVE \| SR_CONF_GET,
	224	SR_CONF_OUTPUT_REGULATION \| SR_CONF_GET,
	225	};
	226
	227	enum philips_pm2800_modules {
	228	PM2800_MOD_30V_10A = 1,
	229	PM2800_MOD_60V_5A,
	230	PM2800_MOD_60V_10A,
	231	PM2800_MOD_8V_15A,
	232	PM2800_MOD_60V_2A,
	233	PM2800_MOD_120V_1A,
	234	};
	235
329733d9	236	static const struct philips_pm2800_module_spec {
c3eadb07 BV	237	/* Min, max, programming resolution. */
	238	float voltage[3];
	239	float current[3];
	240	} philips_pm2800_module_specs[] = {
	241	/* Autoranging modules. */
	242	[PM2800_MOD_30V_10A] = { { 0, 30, 0.0075 }, { 0, 10, 0.0025 } },
	243	[PM2800_MOD_60V_5A] = { { 0, 60, 0.015 }, { 0, 5, 0.00125 } },
	244	[PM2800_MOD_60V_10A] = { { 0, 60, 0.015 }, { 0, 10, 0.0025 } },
	245	/* Linear modules. */
	246	[PM2800_MOD_8V_15A] = { { 0, 8, 0.002 }, { -15, 15, 0.00375 } },
	247	[PM2800_MOD_60V_2A] = { { 0, 60, 0.015 }, { -2, 2, 0.0005 } },
	248	[PM2800_MOD_120V_1A] = { { 0, 120, 0.030 }, { -1, 1, 0.00025 } },
	249	};
	250
329733d9	251	static const struct philips_pm2800_model {
c3eadb07 BV	252	unsigned int chassis;
	253	unsigned int num_modules;
	254	unsigned int set;
	255	unsigned int modules[3];
	256	} philips_pm2800_matrix[] = {
	257	/* Autoranging chassis. */
	258	{ 1, 1, 0, { PM2800_MOD_30V_10A, 0, 0 } },
	259	{ 1, 1, 1, { PM2800_MOD_60V_5A, 0, 0 } },
	260	{ 1, 2, 0, { PM2800_MOD_30V_10A, PM2800_MOD_30V_10A, 0 } },
	261	{ 1, 2, 1, { PM2800_MOD_60V_5A, PM2800_MOD_60V_5A, 0 } },
	262	{ 1, 2, 2, { PM2800_MOD_30V_10A, PM2800_MOD_60V_5A, 0 } },
	263	{ 1, 2, 3, { PM2800_MOD_30V_10A, PM2800_MOD_60V_10A, 0 } },
	264	{ 1, 2, 4, { PM2800_MOD_60V_5A, PM2800_MOD_60V_10A, 0 } },
	265	{ 1, 3, 0, { PM2800_MOD_30V_10A, PM2800_MOD_30V_10A, PM2800_MOD_30V_10A } },
	266	{ 1, 3, 1, { PM2800_MOD_60V_5A, PM2800_MOD_60V_5A, PM2800_MOD_60V_5A } },
	267	{ 1, 3, 2, { PM2800_MOD_30V_10A, PM2800_MOD_30V_10A, PM2800_MOD_60V_5A } },
	268	{ 1, 3, 3, { PM2800_MOD_30V_10A, PM2800_MOD_60V_5A, PM2800_MOD_60V_5A } },
	269	/* Linear chassis. */
	270	{ 3, 1, 0, { PM2800_MOD_60V_2A, 0, 0 } },
	271	{ 3, 1, 1, { PM2800_MOD_120V_1A, 0, 0 } },
	272	{ 3, 1, 2, { PM2800_MOD_8V_15A, 0, 0 } },
	273	{ 3, 2, 0, { PM2800_MOD_60V_2A, 0, 0 } },
	274	{ 3, 2, 1, { PM2800_MOD_120V_1A, 0, 0 } },
	275	{ 3, 2, 2, { PM2800_MOD_60V_2A, PM2800_MOD_120V_1A, 0 } },
	276	{ 3, 2, 3, { PM2800_MOD_8V_15A, PM2800_MOD_8V_15A, 0 } },
	277	};
	278
329733d9	279	static const char *philips_pm2800_names[] = { "1", "2", "3" };
c3eadb07 BV	280
	281	static int philips_pm2800_probe_channels(struct sr_dev_inst *sdi,
	282	struct sr_scpi_hw_info *hw_info,
	283	struct channel_spec *channels, unsigned int num_channels,
	284	struct channel_group_spec *channel_groups, unsigned int num_channel_groups)
	285	{
329733d9 UH	286	const struct philips_pm2800_model *model;
329733d9 UH	287	const struct philips_pm2800_module_spec *spec;
c3eadb07 BV	288	unsigned int chassis, num_modules, set, module, m, i;
	289
	290	(void)sdi;
	291
	292	/*
	293	* The model number as reported by *IDN? looks like e.g. PM2813/11,
	294	* Where "PM28" is fixed, followed by the chassis code (1 = autoranging,
	295	* 3 = linear series) and the number of modules: 1-3 for autoranging,
	296	* 1-2 for linear.
	297	* After the slash, the first digit denotes the module set. The
	298	* digit after that denotes front (5) or rear (1) binding posts.
	299	*/
	300	chassis = hw_info->model[4] - 0x30;
	301	num_modules = hw_info->model[5] - 0x30;
	302	set = hw_info->model[7] - 0x30;
	303	for (m = 0; m < ARRAY_SIZE(philips_pm2800_matrix); m++) {
	304	model = &philips_pm2800_matrix[m];
	305	if (model->chassis == chassis && model->num_modules == num_modules
	306	&& model->set == set)
	307	break;
	308	}
	309	if (m == ARRAY_SIZE(philips_pm2800_matrix)) {
	310	sr_dbg("Model %s not found in matrix.", hw_info->model);
	311	return SR_ERR;
	312	}
	313
	314	sr_dbg("Found %d output channel%s:", num_modules, num_modules > 1 ? "s" : "");
	315	channels = g_malloc0(sizeof(struct channel_spec) num_modules);
	316	channel_groups = g_malloc0(sizeof(struct channel_group_spec) num_modules);
	317	for (i = 0; i < num_modules; i++) {
	318	module = model->modules[i];
	319	spec = &philips_pm2800_module_specs[module];
	320	sr_dbg("output %d: %.0f - %.0fV, %.0f - %.0fA", i + 1,
	321	spec->voltage[0], spec->voltage[1],
	322	spec->current[0], spec->current[1]);
329733d9	323	(channels)[i].name = (char )philips_pm2800_names[i];
c3eadb07	324	memcpy(&((channels)[i].voltage), spec, sizeof(float) 6);
329733d9	325	(channel_groups)[i].name = (char )philips_pm2800_names[i];
c3eadb07 BV	326	(*channel_groups)[i].channel_index_mask = 1 << i;
	327	(*channel_groups)[i].features = PPS_OTP \| PPS_OVP \| PPS_OCP;
	328	}
	329	num_channels = num_channel_groups = num_modules;
	330
	331	return SR_OK;
	332	}
	333
329733d9	334	const struct scpi_command philips_pm2800_cmd[] = {
c3eadb07 BV	335	{ SCPI_CMD_SELECT_CHANNEL, ":INST:NSEL %s" },
	336	{ SCPI_CMD_GET_MEAS_VOLTAGE, ":MEAS:VOLT?" },
	337	{ SCPI_CMD_GET_MEAS_CURRENT, ":MEAS:CURR?" },
	338	{ SCPI_CMD_GET_VOLTAGE_TARGET, ":SOUR:VOLT?" },
	339	{ SCPI_CMD_SET_VOLTAGE_TARGET, ":SOUR:VOLT %.6f" },
	340	{ SCPI_CMD_GET_CURRENT_LIMIT, ":SOUR:CURR?" },
	341	{ SCPI_CMD_SET_CURRENT_LIMIT, ":SOUR:CURR %.6f" },
	342	{ SCPI_CMD_GET_OUTPUT_ENABLED, ":OUTP?" },
	343	{ SCPI_CMD_SET_OUTPUT_ENABLE, ":OUTP ON" },
	344	{ SCPI_CMD_SET_OUTPUT_DISABLE, ":OUTP OFF" },
	345	{ SCPI_CMD_GET_OUTPUT_REGULATION, ":SOUR:FUNC:MODE?" },
	346	{ SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_ACTIVE, ":SOUR:VOLT:PROT:TRIP?" },
	347	{ SCPI_CMD_GET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:PROT:LEV?" },
	348	{ SCPI_CMD_SET_OVER_VOLTAGE_PROTECTION_THRESHOLD, ":SOUR:VOLT:PROT:LEV %.6f" },
	349	{ SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ENABLED, ":SOUR:CURR:PROT:STAT?" },
	350	{ SCPI_CMD_SET_OVER_CURRENT_PROTECTION_ENABLE, ":SOUR:CURR:PROT:STAT ON" },
	351	{ SCPI_CMD_SET_OVER_CURRENT_PROTECTION_DISABLE, ":SOUR:CURR:PROT:STAT OFF" },
	352	{ SCPI_CMD_GET_OVER_CURRENT_PROTECTION_ACTIVE, ":SOUR:CURR:PROT:TRIP?" },
	353	};
	354
d4eabea8	355	SR_PRIV const struct scpi_pps pps_profiles[] = {
4ee1e2f3 AG	356	/* Chroma 61604 */
	357	{ "Chroma", "61604", 0,
	358	ARRAY_AND_SIZE(chroma_61604_devopts),
	359	ARRAY_AND_SIZE(chroma_61604_devopts_cg),
	360	ARRAY_AND_SIZE(chroma_61604_ch),
	361	ARRAY_AND_SIZE(chroma_61604_cg),
	362	ARRAY_AND_SIZE(chroma_61604_cmd),
	363	.probe_channels = NULL,
	364	},
bc4a2a46 BV	365	/* HP 6632B */
	366	{ "HP", "6632B", 0,
	367	ARRAY_AND_SIZE(hp_6632b_devopts),
bfc86799	368	ARRAY_AND_SIZE(devopts_none),
bc4a2a46 BV	369	ARRAY_AND_SIZE(hp_6632b_ch),
	370	ARRAY_AND_SIZE(hp_6632b_cg),
	371	ARRAY_AND_SIZE(hp_6632b_cmd),
c3eadb07	372	.probe_channels = NULL,
bc4a2a46 BV	373	},
bc4a2a46 BV	374
d4eabea8	375	/* Rigol DP800 series */
cfcdf576 ML	376	{ "Rigol", "^DP821A$", PPS_OTP,
	377	ARRAY_AND_SIZE(rigol_dp800_devopts),
	378	ARRAY_AND_SIZE(rigol_dp800_devopts_cg),
	379	ARRAY_AND_SIZE(rigol_dp821a_ch),
	380	ARRAY_AND_SIZE(rigol_dp820_cg),
	381	ARRAY_AND_SIZE(rigol_dp800_cmd),
	382	.probe_channels = NULL,
	383	},
3222ee10 BV	384	{ "Rigol", "^DP831A$", PPS_OTP,
	385	ARRAY_AND_SIZE(rigol_dp800_devopts),
	386	ARRAY_AND_SIZE(rigol_dp800_devopts_cg),
	387	ARRAY_AND_SIZE(rigol_dp831_ch),
cfcdf576	388	ARRAY_AND_SIZE(rigol_dp830_cg),
3222ee10	389	ARRAY_AND_SIZE(rigol_dp800_cmd),
c3eadb07	390	.probe_channels = NULL,
3222ee10 BV	391	},
	392	{ "Rigol", "^(DP832\|DP832A)$", PPS_OTP,
	393	ARRAY_AND_SIZE(rigol_dp800_devopts),
	394	ARRAY_AND_SIZE(rigol_dp800_devopts_cg),
	395	ARRAY_AND_SIZE(rigol_dp832_ch),
cfcdf576	396	ARRAY_AND_SIZE(rigol_dp830_cg),
3222ee10	397	ARRAY_AND_SIZE(rigol_dp800_cmd),
c3eadb07 BV	398	.probe_channels = NULL,
	399	},
	400
	401	/* Philips/Fluke PM2800 series */
	402	{ "Philips", "^PM28[13][123]/[01234]{1,2}$", 0,
9d9cf1c4	403	ARRAY_AND_SIZE(philips_pm2800_devopts),
c3eadb07 BV	404	ARRAY_AND_SIZE(philips_pm2800_devopts_cg),
	405	NULL, 0,
	406	NULL, 0,
	407	ARRAY_AND_SIZE(philips_pm2800_cmd),
	408	philips_pm2800_probe_channels,
d4eabea8 BV	409	},
d4eabea8 BV	410	};
d4eabea8	411
1beccaed	412	SR_PRIV unsigned int num_pps_profiles = ARRAY_SIZE(pps_profiles);