zephyr/drivers/sensor/fcx_mldx5/fcx_mldx5.c

496 lines
14 KiB
C

/*
* Copyright (c) 2024, Vitrolife A/S
*
* SPDX-License-Identifier: Apache-2.0
*
* Datasheet:
* https://sensorsandpower.angst-pfister.com/fileadmin/products/datasheets/272/Manual-FCX-MLD_1620-21914-0033-E-0821.pdf
*
*/
#define DT_DRV_COMPAT ap_fcx_mldx5
#include <ctype.h>
#include <zephyr/kernel.h>
#include <zephyr/device.h>
#include <zephyr/drivers/sensor.h>
#include <zephyr/drivers/sensor/fcx_mldx5.h>
#include <zephyr/drivers/uart.h>
#include <zephyr/logging/log.h>
#include <zephyr/pm/device.h>
#include <zephyr/sys/util.h>
LOG_MODULE_REGISTER(fcx_mldx5_sensor, CONFIG_SENSOR_LOG_LEVEL);
#define FCX_MLDX5_STX 0x2
#define FCX_MLDX5_ETX 0x3
#define FCX_MLDX5_STX_LEN 1
#define FCX_MLDX5_CMD_LEN 2
/* Data length depends on command type thus defined in array */
#define FCX_MLDX5_CHECKSUM_LEN 2
#define FCX_MLDX5_ETX_LEN 1
#define FCX_MLDX5_HEADER_LEN \
(FCX_MLDX5_STX_LEN + FCX_MLDX5_CMD_LEN + FCX_MLDX5_CHECKSUM_LEN + FCX_MLDX5_ETX_LEN)
#define FCX_MLDX5_STX_INDEX 0
#define FCX_MLDX5_CMD_INDEX (FCX_MLDX5_STX_INDEX + FCX_MLDX5_STX_LEN)
#define FCX_MLDX5_DATA_INDEX (FCX_MLDX5_CMD_INDEX + FCX_MLDX5_CMD_LEN)
#define FCX_MLDX5_CHECKSUM_INDEX(frame_len) ((frame_len)-FCX_MLDX5_CHECKSUM_LEN - FCX_MLDX5_ETX_LEN)
#define FCX_MLDX5_ETX_INDEX(frame_len) ((frame_len)-FCX_MLDX5_ETX_LEN)
#define FCX_MLDX5_MAX_FRAME_LEN 11
#define FCX_MLDX5_MAX_RESPONSE_DELAY 200 /* Not specified in datasheet */
#define FCX_MLDX5_MAX_HEAT_UP_TIME 180000
struct fcx_mldx5_data {
struct k_mutex uart_mutex;
struct k_sem uart_rx_sem;
uint32_t o2_ppm;
uint8_t status;
uint8_t frame[FCX_MLDX5_MAX_FRAME_LEN];
uint8_t frame_len;
};
struct fcx_mldx5_cfg {
const struct device *uart_dev;
uart_irq_callback_user_data_t cb;
};
enum fcx_mldx5_cmd {
FCX_MLDX5_CMD_READ_STATUS,
FCX_MLDX5_CMD_READ_O2_VALUE,
FCX_MLDX5_CMD_SWITCH_SENSOR_ON_OFF,
FCX_MLDX5_CMD_RESET,
FCX_MLDX5_CMD_ERROR,
};
enum fcx_mldx5_errors {
FCX_MLDX5_ERROR_CHECKSUM,
FCX_MLDX5_ERROR_UNKNOWN_COMMAND,
FCX_MLDX5_ERROR_PARAMETER,
FCX_MLDX5_ERROR_EEPROM,
};
static const char *const fcx_mldx5_cmds[] = {
[FCX_MLDX5_CMD_READ_STATUS] = "01",
[FCX_MLDX5_CMD_READ_O2_VALUE] = "02",
[FCX_MLDX5_CMD_SWITCH_SENSOR_ON_OFF] = "04",
[FCX_MLDX5_CMD_RESET] = "11",
[FCX_MLDX5_CMD_ERROR] = "EE",
};
static const uint8_t fcx_mldx5_cmds_data_len[] = {
[FCX_MLDX5_CMD_READ_STATUS] = 2,
[FCX_MLDX5_CMD_READ_O2_VALUE] = 5,
[FCX_MLDX5_CMD_SWITCH_SENSOR_ON_OFF] = 1,
[FCX_MLDX5_CMD_RESET] = 0,
[FCX_MLDX5_CMD_ERROR] = 2,
};
static const char *const fcx_mldx5_errors[] = {
[FCX_MLDX5_ERROR_CHECKSUM] = "checksum",
[FCX_MLDX5_ERROR_UNKNOWN_COMMAND] = "command",
[FCX_MLDX5_ERROR_PARAMETER] = "parameter",
[FCX_MLDX5_ERROR_EEPROM] = "eeprom",
};
static void fcx_mldx5_uart_flush(const struct device *uart_dev)
{
uint8_t tmp;
while (uart_fifo_read(uart_dev, &tmp, 1) > 0) {
continue;
}
}
static uint8_t fcx_mldx5_calculate_checksum(const uint8_t *buf, size_t len)
{
uint8_t checksum;
size_t i;
if (buf == NULL || len == 0) {
return 0;
}
checksum = buf[0];
for (i = 1; i < len; ++i) {
checksum ^= buf[i];
}
return checksum;
}
static int fcx_mldx5_frame_check_error(const struct fcx_mldx5_data *data, const char *command_sent)
{
const uint8_t len = FCX_MLDX5_HEADER_LEN + fcx_mldx5_cmds_data_len[FCX_MLDX5_CMD_ERROR];
const char *command_error = fcx_mldx5_cmds[FCX_MLDX5_CMD_ERROR];
const char *command_received = &data->frame[FCX_MLDX5_CMD_INDEX];
const char *data_received = &data->frame[FCX_MLDX5_DATA_INDEX];
uint8_t error;
if (data->frame_len != len ||
strncmp(command_error, command_received, FCX_MLDX5_CMD_LEN) != 0) {
return 0;
}
if (data_received[0] != 'E' || char2hex(data_received[1], &error) != 0 ||
error >= ARRAY_SIZE(fcx_mldx5_errors)) {
LOG_ERR("Could not parse error value %.*s",
fcx_mldx5_cmds_data_len[FCX_MLDX5_CMD_ERROR], data_received);
} else {
LOG_ERR("Command '%s' received error '%s'", command_sent, fcx_mldx5_errors[error]);
}
return -EIO;
}
static int fcx_mldx5_frame_verify(const struct fcx_mldx5_data *data, enum fcx_mldx5_cmd cmd)
{
const uint8_t frame_len = FCX_MLDX5_HEADER_LEN + fcx_mldx5_cmds_data_len[cmd];
const char *command = fcx_mldx5_cmds[cmd];
const char *command_received = &data->frame[FCX_MLDX5_CMD_INDEX];
uint8_t checksum;
uint8_t checksum_received;
if (fcx_mldx5_frame_check_error(data, command) != 0) {
return -EIO;
} else if (data->frame_len != frame_len) {
LOG_ERR("Expected command %s frame length %u not %u", command, frame_len,
data->frame_len);
return -EIO;
} else if (data->frame[FCX_MLDX5_STX_INDEX] != FCX_MLDX5_STX) {
LOG_ERR("No STX");
return -EIO;
} else if (strncmp(command, command_received, FCX_MLDX5_CMD_LEN) != 0) {
LOG_ERR("Expected command %s not %.*s", command, FCX_MLDX5_CMD_LEN,
command_received);
return -EIO;
} else if (data->frame[FCX_MLDX5_ETX_INDEX(data->frame_len)] != FCX_MLDX5_ETX) {
LOG_ERR("No ETX");
return -EIO;
}
/* cmd and data bytes are used to calculate checksum */
checksum = fcx_mldx5_calculate_checksum(command_received,
FCX_MLDX5_CMD_LEN + fcx_mldx5_cmds_data_len[cmd]);
checksum_received =
strtol(&data->frame[FCX_MLDX5_CHECKSUM_INDEX(data->frame_len)], NULL, 16);
if (checksum != checksum_received) {
LOG_ERR("Expected checksum 0x%02x not 0x%02x", checksum, checksum_received);
return -EIO;
}
return 0;
}
static void fcx_mldx5_uart_isr(const struct device *uart_dev, void *user_data)
{
const struct device *dev = user_data;
struct fcx_mldx5_data *data = dev->data;
int rc, read_len;
if (!device_is_ready(uart_dev)) {
LOG_DBG("UART device is not ready");
return;
}
if (!uart_irq_update(uart_dev)) {
LOG_DBG("Unable to process interrupts");
return;
}
if (!uart_irq_rx_ready(uart_dev)) {
LOG_DBG("No RX data");
return;
}
read_len = FCX_MLDX5_MAX_FRAME_LEN - data->frame_len;
rc = read_len > 0 ? uart_fifo_read(uart_dev, &data->frame[data->frame_len], read_len)
: -ENOMEM;
if (rc < 0) {
LOG_ERR("UART read failed: %d", rc < 0 ? rc : -ERANGE);
fcx_mldx5_uart_flush(uart_dev);
LOG_HEXDUMP_ERR(data->frame, data->frame_len, "Discarding");
} else {
data->frame_len += rc;
if (data->frame[FCX_MLDX5_ETX_INDEX(data->frame_len)] != FCX_MLDX5_ETX) {
return;
}
LOG_HEXDUMP_DBG(data->frame, data->frame_len, "Frame received");
}
k_sem_give(&data->uart_rx_sem);
}
static void fcx_mldx5_uart_send(const struct device *dev, enum fcx_mldx5_cmd cmd,
const char *cmd_data)
{
const struct fcx_mldx5_cfg *cfg = dev->config;
size_t cmd_data_len = cmd_data != NULL ? strlen(cmd_data) : 0;
size_t frame_len = FCX_MLDX5_HEADER_LEN + cmd_data_len;
char buf[FCX_MLDX5_MAX_FRAME_LEN];
uint8_t checksum;
size_t i;
buf[FCX_MLDX5_STX_INDEX] = FCX_MLDX5_STX;
memcpy(&buf[FCX_MLDX5_CMD_INDEX], fcx_mldx5_cmds[cmd], FCX_MLDX5_CMD_LEN);
if (cmd_data_len != 0) {
memcpy(&buf[FCX_MLDX5_DATA_INDEX], cmd_data, strlen(cmd_data));
}
checksum = fcx_mldx5_calculate_checksum(&buf[FCX_MLDX5_CMD_INDEX],
FCX_MLDX5_CMD_LEN + cmd_data_len);
bin2hex(&checksum, 1, &buf[FCX_MLDX5_CHECKSUM_INDEX(frame_len)],
FCX_MLDX5_MAX_FRAME_LEN - FCX_MLDX5_CHECKSUM_INDEX(frame_len));
buf[FCX_MLDX5_ETX_INDEX(frame_len)] = FCX_MLDX5_ETX;
for (i = 0; i < frame_len; ++i) {
uart_poll_out(cfg->uart_dev, buf[i]);
}
LOG_HEXDUMP_DBG(buf, frame_len, "Frame sent");
}
static int fcx_mldx5_await_receive(const struct device *dev)
{
int rc;
const struct fcx_mldx5_cfg *cfg = dev->config;
struct fcx_mldx5_data *data = dev->data;
uart_irq_rx_enable(cfg->uart_dev);
rc = k_sem_take(&data->uart_rx_sem, K_MSEC(FCX_MLDX5_MAX_RESPONSE_DELAY));
/* Reset semaphore if sensor did not respond within maximum specified response time
*/
if (rc == -EAGAIN) {
k_sem_reset(&data->uart_rx_sem);
}
uart_irq_rx_disable(cfg->uart_dev);
return rc;
}
static int fcx_mldx5_read_status_value(struct fcx_mldx5_data *data, uint8_t data_len)
{
char *cmd_data_received = &data->frame[FCX_MLDX5_DATA_INDEX];
uint8_t value;
if (cmd_data_received[0] != '0' || char2hex(cmd_data_received[1], &value)) {
LOG_ERR("Could not parse status value %.*s", data_len, cmd_data_received);
return -EIO;
}
switch (value) {
case FCX_MLDX5_STATUS_STANDBY:
break;
case FCX_MLDX5_STATUS_RAMP_UP:
break;
case FCX_MLDX5_STATUS_RUN:
break;
case FCX_MLDX5_STATUS_ERROR:
break;
default:
LOG_ERR("Status value %u invalid", value);
return -EIO;
}
data->status = value;
return 0;
}
static int fcx_mldx5_read_o2_value(struct fcx_mldx5_data *data)
{
const char *o2_data = &data->frame[FCX_MLDX5_DATA_INDEX];
uint8_t o2_data_len = fcx_mldx5_cmds_data_len[FCX_MLDX5_CMD_READ_O2_VALUE];
uint32_t value = 0;
size_t i;
for (i = 0; i < o2_data_len; ++i) {
if (i == 2) {
if (o2_data[i] != '.') {
goto invalid_data;
}
} else if (isdigit((int)o2_data[i]) == 0) {
goto invalid_data;
} else {
value = value * 10 + (o2_data[i] - '0');
}
}
data->o2_ppm = value * 100;
return 0;
invalid_data:
LOG_HEXDUMP_ERR(o2_data, o2_data_len, "Invalid O2 data");
return -EIO;
}
static int fcx_mldx5_buffer_process(struct fcx_mldx5_data *data, enum fcx_mldx5_cmd cmd,
const char *cmd_data)
{
if (fcx_mldx5_frame_verify(data, cmd) != 0) {
return -EIO;
}
switch (cmd) {
case FCX_MLDX5_CMD_READ_STATUS:
return fcx_mldx5_read_status_value(data, fcx_mldx5_cmds_data_len[cmd]);
case FCX_MLDX5_CMD_READ_O2_VALUE:
return fcx_mldx5_read_o2_value(data);
case FCX_MLDX5_CMD_SWITCH_SENSOR_ON_OFF:
return cmd_data != NULL && data->frame[FCX_MLDX5_DATA_INDEX] == cmd_data[0];
case FCX_MLDX5_CMD_RESET:
return 0;
default:
LOG_ERR("Unknown command 0x%02x", cmd);
return -EIO;
}
}
static int fcx_mldx5_uart_transceive(const struct device *dev, enum fcx_mldx5_cmd cmd,
const char *cmd_data)
{
struct fcx_mldx5_data *data = dev->data;
int rc;
k_mutex_lock(&data->uart_mutex, K_FOREVER);
data->frame_len = 0;
fcx_mldx5_uart_send(dev, cmd, cmd_data);
rc = fcx_mldx5_await_receive(dev);
if (rc != 0) {
LOG_ERR("%s did not receive a response: %d", fcx_mldx5_cmds[cmd], rc);
} else {
rc = fcx_mldx5_buffer_process(data, cmd, cmd_data);
}
k_mutex_unlock(&data->uart_mutex);
return rc;
}
static int fcx_mldx5_attr_get(const struct device *dev, enum sensor_channel chan,
enum sensor_attribute attr, struct sensor_value *val)
{
struct fcx_mldx5_data *data = dev->data;
int rc;
if (chan != SENSOR_CHAN_O2) {
return -ENOTSUP;
}
switch (attr) {
case SENSOR_ATTR_FCX_MLDX5_STATUS:
rc = fcx_mldx5_uart_transceive(dev, FCX_MLDX5_CMD_READ_STATUS, NULL);
val->val1 = data->status;
return rc;
default:
return -ENOTSUP;
}
}
static int fcx_mldx5_sample_fetch(const struct device *dev, enum sensor_channel chan)
{
if (chan != SENSOR_CHAN_O2 && chan != SENSOR_CHAN_ALL) {
return -ENOTSUP;
}
return fcx_mldx5_uart_transceive(dev, FCX_MLDX5_CMD_READ_O2_VALUE, NULL);
}
static int fcx_mldx5_channel_get(const struct device *dev, enum sensor_channel chan,
struct sensor_value *val)
{
struct fcx_mldx5_data *data = dev->data;
if (chan != SENSOR_CHAN_O2) {
return -ENOTSUP;
}
val->val1 = data->o2_ppm;
val->val2 = 0;
return 0;
}
static const struct sensor_driver_api fcx_mldx5_api_funcs = {
.attr_get = fcx_mldx5_attr_get,
.sample_fetch = fcx_mldx5_sample_fetch,
.channel_get = fcx_mldx5_channel_get,
};
#ifdef CONFIG_PM_DEVICE
static int pm_action(const struct device *dev, enum pm_device_action action)
{
switch (action) {
case PM_DEVICE_ACTION_RESUME:
return fcx_mldx5_uart_transceive(dev, FCX_MLDX5_CMD_SWITCH_SENSOR_ON_OFF, "1");
case PM_DEVICE_ACTION_SUSPEND:
/* Standby with 20 % heating output */
return fcx_mldx5_uart_transceive(dev, FCX_MLDX5_CMD_SWITCH_SENSOR_ON_OFF, "0");
default:
return -ENOTSUP;
}
}
#endif
static int fcx_mldx5_init(const struct device *dev)
{
int rc;
const struct fcx_mldx5_cfg *cfg = dev->config;
struct fcx_mldx5_data *data = dev->data;
LOG_DBG("Initializing %s", dev->name);
if (!device_is_ready(cfg->uart_dev)) {
return -ENODEV;
}
k_mutex_init(&data->uart_mutex);
k_sem_init(&data->uart_rx_sem, 0, 1);
uart_irq_rx_disable(cfg->uart_dev);
uart_irq_tx_disable(cfg->uart_dev);
rc = uart_irq_callback_user_data_set(cfg->uart_dev, cfg->cb, (void *)dev);
if (rc != 0) {
LOG_ERR("UART IRQ setup failed: %d", rc);
return rc;
}
/* Retry in case of garbled tx due to GPIO setup, crash during unfinished send or sensor
* start up time
*/
if (!WAIT_FOR(fcx_mldx5_uart_transceive(dev, FCX_MLDX5_CMD_READ_STATUS, NULL) == 0,
1000 * USEC_PER_MSEC, k_msleep(10))) {
LOG_ERR("Read status failed");
return -EIO;
}
LOG_INF("%s status 0x%x", dev->name, data->status);
return 0;
}
#define FCX_MLDX5_INIT(n) \
\
static struct fcx_mldx5_data fcx_mldx5_data_##n = { \
.status = FCX_MLDX5_STATUS_UNKNOWN, \
}; \
\
static const struct fcx_mldx5_cfg fcx_mldx5_cfg_##n = { \
.uart_dev = DEVICE_DT_GET(DT_INST_BUS(n)), \
.cb = fcx_mldx5_uart_isr, \
}; \
\
PM_DEVICE_DT_INST_DEFINE(n, pm_action); \
\
SENSOR_DEVICE_DT_INST_DEFINE(n, fcx_mldx5_init, PM_DEVICE_DT_INST_GET(n), \
&fcx_mldx5_data_##n, &fcx_mldx5_cfg_##n, POST_KERNEL, \
CONFIG_SENSOR_INIT_PRIORITY, &fcx_mldx5_api_funcs);
DT_INST_FOREACH_STATUS_OKAY(FCX_MLDX5_INIT)