OVMS3-idf/components/bt/esp_ble_mesh/mesh_models/server/sensor_server.c
lly 2983f6edb1 ble_mesh: Spit mesh_util.h into different header files
Split mesh_util.h into mesh_byteorder.h, mesh_compiler.h,
mesh_ffs.h and mesh_util.h based on the classification of
Zephyr, which will make further porting more clear.
2020-05-13 03:40:30 +00:00

1141 lines
45 KiB
C
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

// Copyright 2017-2019 Espressif Systems (Shanghai) PTE LTD
//
// Licensed under the Apache License, Version 2.0 (the "License");
// you may not use this file except in compliance with the License.
// You may obtain a copy of the License at
// http://www.apache.org/licenses/LICENSE-2.0
//
// Unless required by applicable law or agreed to in writing, software
// distributed under the License is distributed on an "AS IS" BASIS,
// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
// See the License for the specific language governing permissions and
// limitations under the License.
#include <errno.h>
#include "btc_ble_mesh_sensor_model.h"
#include "access.h"
#include "transport.h"
#include "model_opcode.h"
#include "state_transition.h"
#include "device_property.h"
static void update_sensor_periodic_pub(struct bt_mesh_model *model, u16_t prop_id);
/* message handlers (Start) */
/* Sensor Server & Sensor Setup Server message handlers */
static void send_sensor_descriptor_status(struct bt_mesh_model *model,
struct bt_mesh_msg_ctx *ctx,
u16_t prop_id, bool get_all)
{
struct bt_mesh_sensor_srv *srv = model->user_data;
struct bt_mesh_sensor_state *state = NULL;
struct net_buf_simple *msg = NULL;
u16_t total_len = 5U;
int i;
msg = bt_mesh_alloc_buf(MIN(BLE_MESH_TX_SDU_MAX, BLE_MESH_SERVER_RSP_MAX_LEN));
if (msg == NULL) {
BT_ERR("%s, Failed to allocate memory", __func__);
return;
}
bt_mesh_model_msg_init(msg, BLE_MESH_MODEL_OP_SENSOR_DESCRIPTOR_STATUS);
if (get_all == true) {
for (i = 0; i < srv->state_count; i++) {
state = &srv->states[i];
if (state->sensor_property_id != INVALID_SENSOR_PROPERTY_ID) {
total_len += SENSOR_DESCRIPTOR_LEN;
if (total_len > MIN(BLE_MESH_TX_SDU_MAX, BLE_MESH_SERVER_RSP_MAX_LEN)) {
/* Add this in case the message is too long */
break;
}
net_buf_simple_add_le16(msg, state->sensor_property_id);
net_buf_simple_add_le32(msg, (state->descriptor.sample_function << 24) |
(state->descriptor.negative_tolerance << 12) |
(state->descriptor.positive_tolerance));
net_buf_simple_add_u8(msg, state->descriptor.measure_period);
net_buf_simple_add_u8(msg, state->descriptor.update_interval);
}
}
} else {
for (i = 0; i < srv->state_count; i++) {
state = &srv->states[i];
if (state->sensor_property_id != INVALID_SENSOR_PROPERTY_ID &&
state->sensor_property_id == prop_id) {
net_buf_simple_add_le16(msg, state->sensor_property_id);
net_buf_simple_add_le32(msg, (state->descriptor.sample_function << 24) |
(state->descriptor.negative_tolerance << 12) |
(state->descriptor.positive_tolerance));
net_buf_simple_add_u8(msg, state->descriptor.measure_period);
net_buf_simple_add_u8(msg, state->descriptor.update_interval);
break;
}
}
if (i == srv->state_count) {
BT_WARN("%s, Sensor Property ID 0x%04x does not exist", __func__, prop_id);
net_buf_simple_add_le16(msg, prop_id);
}
}
BLE_MESH_CHECK_SEND_STATUS(bt_mesh_model_send(model, ctx, msg, NULL, NULL));
bt_mesh_free_buf(msg);
return;
}
static void send_sensor_data_status(struct bt_mesh_model *model,
struct bt_mesh_msg_ctx *ctx,
u16_t prop_id, bool get_all)
{
struct bt_mesh_sensor_srv *srv = model->user_data;
struct bt_mesh_sensor_state *state = NULL;
struct net_buf_simple *msg = NULL;
u16_t total_len = 5U;
int i;
msg = bt_mesh_alloc_buf(MIN(BLE_MESH_TX_SDU_MAX, BLE_MESH_SERVER_RSP_MAX_LEN));
if (msg == NULL) {
BT_ERR("%s, Failed to allocate memory", __func__);
return;
}
bt_mesh_model_msg_init(msg, BLE_MESH_MODEL_OP_SENSOR_STATUS);
if (get_all == true) {
for (i = 0; i < srv->state_count; i++) {
state = &srv->states[i];
if (state->sensor_property_id != INVALID_SENSOR_PROPERTY_ID) {
u8_t mpid_len = (state->sensor_data.format == SENSOR_DATA_FORMAT_A) ?
SENSOR_DATA_FORMAT_A_MPID_LEN : SENSOR_DATA_FORMAT_B_MPID_LEN;
total_len += (mpid_len + (state->sensor_data.raw_value ?
state->sensor_data.raw_value->len : 0));
if (total_len > MIN(BLE_MESH_TX_SDU_MAX, BLE_MESH_SERVER_RSP_MAX_LEN)) {
/* Add this in case the message is too long */
break;
}
if (state->sensor_data.format == SENSOR_DATA_FORMAT_A) {
u16_t mpid = ((state->sensor_property_id & BIT_MASK(11)) << 5) |
((state->sensor_data.length & BIT_MASK(4)) << 1) | state->sensor_data.format;
net_buf_simple_add_le16(msg, mpid);
} else if (state->sensor_data.format == SENSOR_DATA_FORMAT_B) {
u8_t mpid = (state->sensor_data.length << 1) | state->sensor_data.format;
net_buf_simple_add_u8(msg, mpid);
net_buf_simple_add_le16(msg, state->sensor_property_id);
}
if (state->sensor_data.raw_value) {
net_buf_simple_add_mem(msg, state->sensor_data.raw_value->data, state->sensor_data.raw_value->len);
}
}
}
} else {
for (i = 0; i < srv->state_count; i++) {
state = &srv->states[i];
if (state->sensor_property_id != INVALID_SENSOR_PROPERTY_ID &&
state->sensor_property_id == prop_id) {
if (state->sensor_data.format == SENSOR_DATA_FORMAT_A) {
u16_t mpid = ((state->sensor_property_id & BIT_MASK(11)) << 5) |
((state->sensor_data.length & BIT_MASK(4)) << 1) |
state->sensor_data.format;
net_buf_simple_add_le16(msg, mpid);
} else if (state->sensor_data.format == SENSOR_DATA_FORMAT_B) {
u8_t mpid = (state->sensor_data.length << 1) | state->sensor_data.format;
net_buf_simple_add_u8(msg, mpid);
net_buf_simple_add_le16(msg, state->sensor_property_id);
}
if (state->sensor_data.raw_value) {
net_buf_simple_add_mem(msg, state->sensor_data.raw_value->data,
state->sensor_data.raw_value->len);
}
break;
}
}
if (i == srv->state_count) {
BT_WARN("%s, Sensor Property ID 0x%04x does not exist", __func__, prop_id);
u8_t mpid = (SENSOR_DATA_ZERO_LEN << 1) | SENSOR_DATA_FORMAT_B;
net_buf_simple_add_u8(msg, mpid);
net_buf_simple_add_le16(msg, prop_id);
}
}
BLE_MESH_CHECK_SEND_STATUS(bt_mesh_model_send(model, ctx, msg, NULL, NULL));
bt_mesh_free_buf(msg);
return;
}
static void send_sensor_cadence_status(struct bt_mesh_model *model,
struct bt_mesh_msg_ctx *ctx,
u16_t prop_id, bool publish)
{
struct bt_mesh_sensor_setup_srv *srv = model->user_data;
struct bt_mesh_sensor_state *state = NULL;
struct net_buf_simple *msg = NULL;
u16_t length = 0U;
int i;
for (i = 0; i < srv->state_count; i++) {
state = &srv->states[i];
if (state->sensor_property_id != INVALID_SENSOR_PROPERTY_ID &&
state->sensor_property_id == prop_id && state->cadence) {
length = SENSOR_PROPERTY_ID_LEN + 1 + 1;
if (state->cadence->trigger_delta_down) {
if (state->cadence->trigger_type == SENSOR_STATUS_TRIGGER_TYPE_CHAR) {
length += state->cadence->trigger_delta_down->len;
} else {
length += SENSOR_STATUS_TRIGGER_UINT16_LEN;
}
}
if (state->cadence->trigger_delta_up) {
if (state->cadence->trigger_type == SENSOR_STATUS_TRIGGER_TYPE_CHAR) {
length += state->cadence->trigger_delta_up->len;
} else {
length += SENSOR_STATUS_TRIGGER_UINT16_LEN;
}
}
if (state->cadence->fast_cadence_low) {
length += state->cadence->fast_cadence_low->len;
}
if (state->cadence->fast_cadence_high) {
length += state->cadence->fast_cadence_high->len;
}
break;
}
}
if (i == srv->state_count) {
BT_WARN("%s, Sensor Property ID 0x%04x does not exist", __func__, prop_id);
length = SENSOR_PROPERTY_ID_LEN;
}
if (publish == false) {
msg = bt_mesh_alloc_buf(1 + length + BLE_MESH_SERVER_TRANS_MIC_SIZE);
if (msg == NULL) {
BT_ERR("%s, Failed to allocate memory", __func__);
return;
}
} else {
msg = bt_mesh_server_get_pub_msg(model, 1 + length);
if (msg == NULL) {
return;
}
}
bt_mesh_model_msg_init(msg, BLE_MESH_MODEL_OP_SENSOR_CADENCE_STATUS);
net_buf_simple_add_le16(msg, prop_id);
if (i != srv->state_count) {
if (state->cadence) {
net_buf_simple_add_u8(msg, (state->cadence->trigger_type << 7) |
state->cadence->period_divisor);
if (state->cadence->trigger_delta_down) {
if (state->cadence->trigger_type == SENSOR_STATUS_TRIGGER_TYPE_CHAR) {
net_buf_simple_add_mem(msg, state->cadence->trigger_delta_down->data,
state->cadence->trigger_delta_down->len);
} else {
net_buf_simple_add_mem(msg, state->cadence->trigger_delta_down->data,
SENSOR_STATUS_TRIGGER_UINT16_LEN);
}
}
if (state->cadence->trigger_delta_up) {
if (state->cadence->trigger_type == SENSOR_STATUS_TRIGGER_TYPE_CHAR) {
net_buf_simple_add_mem(msg, state->cadence->trigger_delta_up->data,
state->cadence->trigger_delta_up->len);
} else {
net_buf_simple_add_mem(msg, state->cadence->trigger_delta_up->data,
SENSOR_STATUS_TRIGGER_UINT16_LEN);
}
}
net_buf_simple_add_u8(msg, state->cadence->min_interval);
if (state->cadence->fast_cadence_low) {
net_buf_simple_add_mem(msg, state->cadence->fast_cadence_low->data,
state->cadence->fast_cadence_low->len);
}
if (state->cadence->fast_cadence_high) {
net_buf_simple_add_mem(msg, state->cadence->fast_cadence_high->data,
state->cadence->fast_cadence_high->len);
}
}
}
if (publish == false) {
BLE_MESH_CHECK_SEND_STATUS(bt_mesh_model_send(model, ctx, msg, NULL, NULL));
bt_mesh_free_buf(msg);
} else {
BLE_MESH_CHECK_SEND_STATUS(bt_mesh_model_publish(model));
}
return;
}
static void send_sensor_settings_status(struct bt_mesh_model *model,
struct bt_mesh_msg_ctx *ctx,
u16_t prop_id)
{
struct bt_mesh_sensor_setup_srv *srv = model->user_data;
struct bt_mesh_sensor_state *state = NULL;
struct sensor_setting *item = NULL;
struct net_buf_simple *msg = NULL;
u16_t total_len = 7U;
int i, j;
msg = bt_mesh_alloc_buf(MIN(BLE_MESH_TX_SDU_MAX, BLE_MESH_SERVER_RSP_MAX_LEN));
if (msg == NULL) {
BT_ERR("%s, Failed to allocate memory", __func__);
return;
}
bt_mesh_model_msg_init(msg, BLE_MESH_MODEL_OP_SENSOR_SETTINGS_STATUS);
net_buf_simple_add_le16(msg, prop_id);
for (i = 0; i < srv->state_count; i++) {
state = &srv->states[i];
if (state->sensor_property_id != INVALID_SENSOR_PROPERTY_ID &&
state->sensor_property_id == prop_id &&
state->setting_count && state->settings) {
for (j = 0; j < state->setting_count; j++) {
item = &state->settings[j];
if (item->property_id != INVALID_SENSOR_SETTING_PROPERTY_ID) {
total_len += SENSOR_SETTING_PROPERTY_ID_LEN;
if (total_len > MIN(BLE_MESH_TX_SDU_MAX, BLE_MESH_SERVER_RSP_MAX_LEN)) {
/* Add this in case the message is too long */
break;
}
net_buf_simple_add_le16(msg, item->property_id);
}
}
break;
}
}
if (i == srv->state_count) {
BT_WARN("%s, Sensor Property ID 0x%04x does not exist", __func__, prop_id);
}
BLE_MESH_CHECK_SEND_STATUS(bt_mesh_model_send(model, ctx, msg, NULL, NULL));
bt_mesh_free_buf(msg);
return;
}
static struct sensor_setting *find_sensor_setting(struct bt_mesh_model *model,
u16_t prop_id, u16_t set_prop_id)
{
struct bt_mesh_sensor_setup_srv *srv = model->user_data;
struct bt_mesh_sensor_state *state = NULL;
struct sensor_setting *item = NULL;
int i, j;
for (i = 0; i < srv->state_count; i++) {
state = &srv->states[i];
if (state->sensor_property_id != INVALID_SENSOR_PROPERTY_ID &&
state->sensor_property_id == prop_id &&
state->setting_count && state->settings) {
for (j = 0; j < state->setting_count; j++) {
item = &state->settings[j];
if (item->property_id != INVALID_SENSOR_SETTING_PROPERTY_ID &&
item->property_id == set_prop_id) {
return item;
}
}
}
}
return NULL;
}
static void send_sensor_setting_status(struct bt_mesh_model *model,
struct bt_mesh_msg_ctx *ctx, u16_t prop_id,
u16_t set_prop_id, bool publish)
{
struct sensor_setting *item = NULL;
struct net_buf_simple *msg = NULL;
u16_t length = 0U;
item = find_sensor_setting(model, prop_id, set_prop_id);
if (item) {
length = SENSOR_PROPERTY_ID_LEN + SENSOR_SETTING_PROPERTY_ID_LEN +
SENSOR_SETTING_ACCESS_LEN + (item->raw ? item->raw->len : 0);
} else {
/* If the message is sent as a response to the Sensor Setting Get message or
* a Sensor Setting Set message with an unknown Sensor Property ID field or
* an unknown Sensor Setting Property ID field, the Sensor Setting Access
* field and the Sensor Setting Raw field shall be omitted.
*/
BT_WARN("%s, Sensor Setting not found, 0x%04x, 0x%04x", __func__, prop_id, set_prop_id);
length = SENSOR_PROPERTY_ID_LEN + SENSOR_SETTING_PROPERTY_ID_LEN;
}
if (publish == false) {
msg = bt_mesh_alloc_buf(1 + length + BLE_MESH_SERVER_TRANS_MIC_SIZE);
if (msg == NULL) {
BT_ERR("%s, Failed to allocate memory", __func__);
return;
}
} else {
msg = bt_mesh_server_get_pub_msg(model, 1 + length);
if (msg == NULL) {
return;
}
}
bt_mesh_model_msg_init(msg, BLE_MESH_MODEL_OP_SENSOR_SETTING_STATUS);
net_buf_simple_add_le16(msg, prop_id);
net_buf_simple_add_le16(msg, set_prop_id);
if (item) {
/**
* If the message is sent as a response to the Sensor Setting Set message with
* a Sensor Setting Property ID field that identifies an existing Sensor Setting,
* and the value of the Sensor Setting Access state is 0x01 (can be read), the
* Sensor Setting Property ID field shall be set to the value of the Sensor
* Setting Property ID field of the incoming message, the Sensor Setting Access
* field shall be set to the value of the Sensor Setting Access state field, and
* the Sensor Setting Raw field shall be omitted.
*
* TODO: What if the Sensor Setting Access is Prohibited?
*/
net_buf_simple_add_u8(msg, item->access);
if (ctx->recv_op != BLE_MESH_MODEL_OP_SENSOR_SETTING_SET ||
item->access == SENSOR_SETTING_ACCESS_READ_WRITE) {
if (item->raw) {
net_buf_simple_add_mem(msg, item->raw->data, item->raw->len);
}
}
}
if (publish == false) {
BLE_MESH_CHECK_SEND_STATUS(bt_mesh_model_send(model, ctx, msg, NULL, NULL));
bt_mesh_free_buf(msg);
} else {
BLE_MESH_CHECK_SEND_STATUS(bt_mesh_model_publish(model));
}
return;
}
static void send_sensor_column_status(struct bt_mesh_model *model,
struct bt_mesh_msg_ctx *ctx,
struct net_buf_simple *buf, u16_t prop_id)
{
struct bt_mesh_sensor_srv *srv = model->user_data;
struct bt_mesh_sensor_state *state = NULL;
struct net_buf_simple *msg = NULL;
bool optional = false;
u16_t length = 0U;
int i;
for (i = 0; i < srv->state_count; i++) {
state = &srv->states[i];
if (state->sensor_property_id != INVALID_SENSOR_PROPERTY_ID &&
state->sensor_property_id == prop_id) {
length = SENSOR_PROPERTY_ID_LEN;
if (state->series_column.raw_value_x) {
length += state->series_column.raw_value_x->len;
}
/**
* TODO: column width & raw value y in Sensor Column Status are optional,
* here we need to add some conditions to decide whether put these two
* in the status message.
*/
if (optional) {
if (state->series_column.column_width) {
length += state->series_column.column_width->len;
}
if (state->series_column.raw_value_y) {
length += state->series_column.raw_value_y->len;
}
}
break;
}
}
if (i == srv->state_count) {
BT_WARN("%s, Sensor Property ID 0x%04x does not exist", __func__, prop_id);
length = SENSOR_PROPERTY_ID_LEN;
}
msg = bt_mesh_alloc_buf(1 + length + BLE_MESH_SERVER_TRANS_MIC_SIZE);
if (msg == NULL) {
BT_ERR("%s, Failed to allocate memory", __func__);
return;
}
/**
* TODO: Sensor Column Get contains Raw Value X which identifies a column,
* we need to use this value to decide the column.
*/
bt_mesh_model_msg_init(msg, BLE_MESH_MODEL_OP_SENSOR_COLUMN_STATUS);
net_buf_simple_add_le16(msg, prop_id);
if (i != srv->state_count) {
if (state->series_column.raw_value_x) {
net_buf_simple_add_mem(msg, state->series_column.raw_value_x->data,
state->series_column.raw_value_x->len);
}
if (optional) {
if (state->series_column.column_width) {
net_buf_simple_add_mem(msg, state->series_column.column_width->data,
state->series_column.column_width->len);
}
if (state->series_column.raw_value_y) {
net_buf_simple_add_mem(msg, state->series_column.raw_value_y->data,
state->series_column.raw_value_y->len);
}
}
}
BLE_MESH_CHECK_SEND_STATUS(bt_mesh_model_send(model, ctx, msg, NULL, NULL));
bt_mesh_free_buf(msg);
return;
}
static void send_sensor_series_status(struct bt_mesh_model *model,
struct bt_mesh_msg_ctx *ctx,
struct net_buf_simple *buf, u16_t prop_id)
{
struct bt_mesh_sensor_srv *srv = model->user_data;
struct bt_mesh_sensor_state *state = NULL;
struct net_buf_simple *msg = NULL;
bool optional = false;
u16_t length = 0U;
int i;
for (i = 0; i < srv->state_count; i++) {
state = &srv->states[i];
if (state->sensor_property_id != INVALID_SENSOR_PROPERTY_ID &&
state->sensor_property_id == prop_id) {
length = SENSOR_PROPERTY_ID_LEN;
/* TODO: raw value x, column width & raw value y in Sensor Series
* Status are optional, here we need to add some conditions to
* decide whether put these three in the status message.
*/
if (optional) {
if (state->series_column.raw_value_x) {
length += state->series_column.raw_value_x->len;
}
if (state->series_column.column_width) {
length += state->series_column.column_width->len;
}
if (state->series_column.raw_value_y) {
length += state->series_column.raw_value_y->len;
}
}
break;
}
}
if (i == srv->state_count) {
BT_WARN("%s, Sensor Property ID 0x%04x does not exist", __func__, prop_id);
length = SENSOR_PROPERTY_ID_LEN;
}
msg = bt_mesh_alloc_buf(1 + length + BLE_MESH_SERVER_TRANS_MIC_SIZE);
if (msg == NULL) {
BT_ERR("%s, Failed to allocate memory", __func__);
return;
}
/**
* TODO: Sensor Series Get may contain Raw Value X1 and Raw Value X2 which
* identifies a starting column and a ending column, we need to use these
* values to decide the columns.
*/
bt_mesh_model_msg_init(msg, BLE_MESH_MODEL_OP_SENSOR_SERIES_STATUS);
net_buf_simple_add_le16(msg, prop_id);
if (i != srv->state_count) {
if (optional) {
if (state->series_column.raw_value_x) {
net_buf_simple_add_mem(msg, state->series_column.raw_value_x->data,
state->series_column.raw_value_x->len);
}
if (state->series_column.column_width) {
net_buf_simple_add_mem(msg, state->series_column.column_width->data,
state->series_column.column_width->len);
}
if (state->series_column.raw_value_y) {
net_buf_simple_add_mem(msg, state->series_column.raw_value_y->data,
state->series_column.raw_value_y->len);
}
}
}
BLE_MESH_CHECK_SEND_STATUS(bt_mesh_model_send(model, ctx, msg, NULL, NULL));
bt_mesh_free_buf(msg);
return;
}
static void sensor_get(struct bt_mesh_model *model,
struct bt_mesh_msg_ctx *ctx,
struct net_buf_simple *buf)
{
u16_t set_prop_id = INVALID_SENSOR_PROPERTY_ID;
u16_t prop_id = INVALID_SENSOR_PROPERTY_ID;
if (model->user_data == NULL) {
BT_ERR("%s, Invalid model user_data", __func__);
return;
}
switch (ctx->recv_op) {
case BLE_MESH_MODEL_OP_SENSOR_DESCRIPTOR_GET:
case BLE_MESH_MODEL_OP_SENSOR_GET:
case BLE_MESH_MODEL_OP_SENSOR_COLUMN_GET:
case BLE_MESH_MODEL_OP_SENSOR_SERIES_GET: {
struct bt_mesh_sensor_srv *srv = model->user_data;
if (srv->state_count == 0U || srv->states == NULL) {
BT_ERR("%s, Invalid Sensor Server state", __func__);
return;
}
if (ctx->recv_op == BLE_MESH_MODEL_OP_SENSOR_DESCRIPTOR_GET ||
ctx->recv_op == BLE_MESH_MODEL_OP_SENSOR_GET) {
bool get_all = buf->len ? false : true;
if (buf->len) {
prop_id = net_buf_simple_pull_le16(buf);
if (prop_id == INVALID_SENSOR_PROPERTY_ID) {
BT_ERR("%s, Prohibited Sensor Property ID 0x0000", __func__);
return;
}
}
if (ctx->recv_op == BLE_MESH_MODEL_OP_SENSOR_DESCRIPTOR_GET) {
if (srv->rsp_ctrl.get_auto_rsp == BLE_MESH_SERVER_RSP_BY_APP) {
bt_mesh_sensor_server_recv_get_msg_t get = {
.sensor_descriptor_get.op_en = !get_all,
.sensor_descriptor_get.id = prop_id,
};
bt_mesh_sensor_server_cb_evt_to_btc(
BTC_BLE_MESH_EVT_SENSOR_SERVER_RECV_GET_MSG, model, ctx, (const u8_t *)&get, sizeof(get));
} else {
send_sensor_descriptor_status(model, ctx, prop_id, get_all);
}
} else {
if (srv->rsp_ctrl.get_auto_rsp == BLE_MESH_SERVER_RSP_BY_APP) {
bt_mesh_sensor_server_recv_get_msg_t get = {
.sensor_get.op_en = !get_all,
.sensor_get.id = prop_id,
};
bt_mesh_sensor_server_cb_evt_to_btc(
BTC_BLE_MESH_EVT_SENSOR_SERVER_RECV_GET_MSG, model, ctx, (const u8_t *)&get, sizeof(get));
} else {
send_sensor_data_status(model, ctx, prop_id, get_all);
}
}
} else {
prop_id = net_buf_simple_pull_le16(buf);
if (prop_id == INVALID_SENSOR_PROPERTY_ID) {
BT_ERR("%s, Prohibited Sensor Property ID 0x0000", __func__);
return;
}
if (ctx->recv_op == BLE_MESH_MODEL_OP_SENSOR_COLUMN_GET) {
if (srv->rsp_ctrl.get_auto_rsp == BLE_MESH_SERVER_RSP_BY_APP) {
bt_mesh_sensor_server_recv_get_msg_t get = {
.sensor_column_get.id = prop_id,
.sensor_column_get.raw_x = buf,
};
bt_mesh_sensor_server_cb_evt_to_btc(
BTC_BLE_MESH_EVT_SENSOR_SERVER_RECV_GET_MSG, model, ctx, (const u8_t *)&get, sizeof(get));
} else {
send_sensor_column_status(model, ctx, buf, prop_id);
}
} else {
if (srv->rsp_ctrl.get_auto_rsp == BLE_MESH_SERVER_RSP_BY_APP) {
bt_mesh_sensor_server_recv_get_msg_t get = {
.sensor_series_get.id = prop_id,
.sensor_series_get.raw = buf,
};
bt_mesh_sensor_server_cb_evt_to_btc(
BTC_BLE_MESH_EVT_SENSOR_SERVER_RECV_GET_MSG, model, ctx, (const u8_t *)&get, sizeof(get));
} else {
send_sensor_series_status(model, ctx, buf, prop_id);
}
}
}
return;
}
case BLE_MESH_MODEL_OP_SENSOR_CADENCE_GET:
case BLE_MESH_MODEL_OP_SENSOR_SETTINGS_GET:
case BLE_MESH_MODEL_OP_SENSOR_SETTING_GET: {
struct bt_mesh_sensor_setup_srv *srv = model->user_data;
if (srv->state_count == 0U || srv->states == NULL) {
BT_ERR("%s, Invalid Sensor Setup Server state", __func__);
return;
}
if (ctx->recv_op == BLE_MESH_MODEL_OP_SENSOR_CADENCE_GET ||
ctx->recv_op == BLE_MESH_MODEL_OP_SENSOR_SETTINGS_GET) {
prop_id = net_buf_simple_pull_le16(buf);
if (prop_id == INVALID_SENSOR_PROPERTY_ID) {
BT_ERR("%s, Prohibited Sensor Property ID 0x0000", __func__);
return;
}
if (ctx->recv_op == BLE_MESH_MODEL_OP_SENSOR_CADENCE_GET) {
if (srv->rsp_ctrl.get_auto_rsp == BLE_MESH_SERVER_RSP_BY_APP) {
bt_mesh_sensor_server_recv_get_msg_t get = {
.sensor_cadence_get.id = prop_id,
};
bt_mesh_sensor_server_cb_evt_to_btc(
BTC_BLE_MESH_EVT_SENSOR_SERVER_RECV_GET_MSG, model, ctx, (const u8_t *)&get, sizeof(get));
} else {
send_sensor_cadence_status(model, ctx, prop_id, false);
}
} else {
if (srv->rsp_ctrl.get_auto_rsp == BLE_MESH_SERVER_RSP_BY_APP) {
bt_mesh_sensor_server_recv_get_msg_t get = {
.sensor_settings_get.id = prop_id,
};
bt_mesh_sensor_server_cb_evt_to_btc(
BTC_BLE_MESH_EVT_SENSOR_SERVER_RECV_GET_MSG, model, ctx, (const u8_t *)&get, sizeof(get));
} else {
send_sensor_settings_status(model, ctx, prop_id);
}
}
} else {
prop_id = net_buf_simple_pull_le16(buf);
if (prop_id == INVALID_SENSOR_PROPERTY_ID) {
BT_ERR("%s, Prohibited Sensor Property ID 0x0000", __func__);
return;
}
set_prop_id = net_buf_simple_pull_le16(buf);
if (set_prop_id == INVALID_SENSOR_PROPERTY_ID) {
BT_ERR("%s, Prohibited Sensor Setting Property ID 0x0000", __func__);
return;
}
if (srv->rsp_ctrl.get_auto_rsp == BLE_MESH_SERVER_RSP_BY_APP) {
bt_mesh_sensor_server_recv_get_msg_t get = {
.sensor_setting_get.id = prop_id,
.sensor_setting_get.setting_id = set_prop_id,
};
bt_mesh_sensor_server_cb_evt_to_btc(
BTC_BLE_MESH_EVT_SENSOR_SERVER_RECV_GET_MSG, model, ctx, (const u8_t *)&get, sizeof(get));
} else {
send_sensor_setting_status(model, ctx, prop_id, set_prop_id, false);
}
}
return;
}
default:
BT_WARN("%s, Unknown Sensor Get opcode 0x%04x", __func__, ctx->recv_op);
return;
}
}
static void sensor_cadence_set(struct bt_mesh_model *model,
struct bt_mesh_msg_ctx *ctx,
struct net_buf_simple *buf)
{
struct bt_mesh_sensor_setup_srv *srv = model->user_data;
bt_mesh_sensor_server_state_change_t change = {0};
struct bt_mesh_sensor_state *state = NULL;
struct bt_mesh_model *sensor_model = NULL;
struct bt_mesh_elem *element = NULL;
u16_t prop_id = 0U, trigger_len = 0U;
u8_t val = 0U, divisor = 0U;
int i;
if (srv == NULL || srv->state_count == 0U || srv->states == NULL) {
BT_ERR("%s, Invalid model user_data", __func__);
return;
}
prop_id = net_buf_simple_pull_le16(buf);
if (prop_id == INVALID_SENSOR_PROPERTY_ID) {
BT_ERR("%s, Prohibited Sensor Property ID 0x0000", __func__);
return;
}
if (srv->rsp_ctrl.set_auto_rsp == BLE_MESH_SERVER_RSP_BY_APP) {
bt_mesh_sensor_server_recv_set_msg_t set = {
.sensor_cadence_set.id = prop_id,
.sensor_cadence_set.cadence = buf,
};
bt_mesh_sensor_server_cb_evt_to_btc(
BTC_BLE_MESH_EVT_SENSOR_SERVER_RECV_SET_MSG, model, ctx, (const u8_t *)&set, sizeof(set));
return;
}
for (i = 0; i < srv->state_count; i++) {
state = &srv->states[i];
if (state->sensor_property_id != INVALID_SENSOR_PROPERTY_ID &&
state->sensor_property_id == prop_id) {
break;
}
}
if (i == srv->state_count || state->cadence == NULL) {
/* When the message is sent as a response to the Sensor Cadence Get message or
* a Sensor Cadence Set message with an unknown Property ID field or the Sensor
* Server does not support the Sensor Cadence state for the sensor referred by
* the Property ID, the following fields shall be omitted:
* • Fast Cadence Period Divisor
* • Status Trigger Type
* • Status Trigger Delta Down
* • Status Trigger Delta Up
* • Status Min Interval
* • Fast Cadence Low
* • Fast Cadence High
*/
send_sensor_cadence_status(model, ctx, prop_id, false);
return;
}
val = net_buf_simple_pull_u8(buf);
divisor = val & BIT_MASK(7);
if (divisor > SENSOR_PERIOD_DIVISOR_MAX_VALUE) {
BT_ERR("%s, Prohibited Fast Cadence Period Divisor 0x%02x", __func__, divisor);
return;
}
state->cadence->period_divisor = divisor;
state->cadence->trigger_type = (val >> 7) & BIT_MASK(1);
if (state->cadence->trigger_type == SENSOR_STATUS_TRIGGER_TYPE_CHAR) {
trigger_len = bt_mesh_get_dev_prop_len(prop_id);
} else {
trigger_len = SENSOR_STATUS_TRIGGER_UINT16_LEN;
}
if (buf->len < (trigger_len << 1) + SENSOR_STATUS_MIN_INTERVAL_LEN) {
BT_ERR("%s, Invalid Sensor Cadence Set length %d, trigger type %d",
__func__, buf->len + 3, state->cadence->trigger_type);
return;
}
if (state->cadence->trigger_delta_down) {
net_buf_simple_reset(state->cadence->trigger_delta_down);
net_buf_simple_add_mem(state->cadence->trigger_delta_down, buf->data, trigger_len);
net_buf_simple_pull_mem(buf, trigger_len);
}
if (state->cadence->trigger_delta_up) {
net_buf_simple_reset(state->cadence->trigger_delta_up);
net_buf_simple_add_mem(state->cadence->trigger_delta_up, buf->data, trigger_len);
net_buf_simple_pull_mem(buf, trigger_len);
}
/* The valid range for the Status Min Interval is 026 and other values are Prohibited. */
val = net_buf_simple_pull_u8(buf);
if (val > SENSOR_STATUS_MIN_INTERVAL_MAX) {
BT_ERR("%s, Invalid Status Min Interval %d", __func__, val);
return;
}
state->cadence->min_interval = val;
if (buf->len % 2) {
BT_ERR("%s, Different length of Fast Cadence Low & High, length %d", __func__, buf->len);
return;
}
if (buf->len) {
u8_t range_len = buf->len / 2;
if (state->cadence->fast_cadence_low) {
net_buf_simple_reset(state->cadence->fast_cadence_low);
net_buf_simple_add_mem(state->cadence->fast_cadence_low, buf->data, range_len);
net_buf_simple_pull_mem(buf, range_len);
}
if (state->cadence->fast_cadence_high) {
net_buf_simple_reset(state->cadence->fast_cadence_high);
net_buf_simple_add_mem(state->cadence->fast_cadence_high, buf->data, range_len);
net_buf_simple_pull_mem(buf, range_len);
}
}
change.sensor_cadence_set.id = prop_id;
change.sensor_cadence_set.period_divisor = state->cadence->period_divisor;
change.sensor_cadence_set.trigger_type = state->cadence->trigger_type;
change.sensor_cadence_set.trigger_delta_down = state->cadence->trigger_delta_down;
change.sensor_cadence_set.trigger_delta_up = state->cadence->trigger_delta_up;
change.sensor_cadence_set.min_interval = state->cadence->min_interval;
change.sensor_cadence_set.fast_cadence_low = state->cadence->fast_cadence_low;
change.sensor_cadence_set.fast_cadence_high = state->cadence->fast_cadence_high;
bt_mesh_sensor_server_cb_evt_to_btc(
BTC_BLE_MESH_EVT_SENSOR_SERVER_STATE_CHANGE, model, ctx, (const u8_t *)&change, sizeof(change));
if (ctx->recv_op == BLE_MESH_MODEL_OP_SENSOR_CADENCE_SET) {
send_sensor_cadence_status(model, ctx, prop_id, false);
}
send_sensor_cadence_status(model, ctx, prop_id, true);
/* Try to find the corresponding Sensor Server Model */
element = bt_mesh_model_elem(model);
sensor_model = bt_mesh_model_find(element, BLE_MESH_MODEL_ID_SENSOR_SRV);
if (sensor_model == NULL) {
BT_WARN("%s, Sensor Server Model does not exist in the element", __func__);
return;
}
/**
* Based on the configured Sensor Cadence state, change Periodic Sensor
* status publication mechanism.
*/
update_sensor_periodic_pub(sensor_model, prop_id);
return;
}
static void update_sensor_periodic_pub(struct bt_mesh_model *model, u16_t prop_id)
{
struct bt_mesh_sensor_state *state = NULL;
struct bt_mesh_sensor_srv *srv = NULL;
int i;
if (model->id != BLE_MESH_MODEL_ID_SENSOR_SRV) {
BT_ERR("%s, Not a Sensor Server Model", __func__);
return;
}
srv = (struct bt_mesh_sensor_srv *)model->user_data;
if (srv == NULL || srv->state_count == 0U || srv->states == NULL) {
BT_ERR("%s, Invalid model user_data", __func__);
return;
}
for (i = 0; i < srv->state_count; i++) {
state = &srv->states[i];
if (state->sensor_property_id != INVALID_SENSOR_PROPERTY_ID &&
state->sensor_property_id == prop_id) {
break;
}
}
if (i == srv->state_count) {
BT_ERR("%s, Sensor Property ID 0x%04x does not exist", __func__, prop_id);
return;
}
if (state->cadence == NULL) {
BT_WARN("%s, Sensor Cadence state does not exist", __func__);
return;
}
/**
* Currently when the device receives a Sensor Cadence Set message,
* a event will be callback to the application layer, and users can
* change the Sensor Data publication period in the event. And this
* is exactly what we do for the BQB test.
*/
}
static void sensor_setting_set(struct bt_mesh_model *model,
struct bt_mesh_msg_ctx *ctx,
struct net_buf_simple *buf)
{
struct bt_mesh_sensor_setup_srv *srv = model->user_data;
bt_mesh_sensor_server_state_change_t change = {0};
struct sensor_setting *item = NULL;
u16_t prop_id = 0U, set_prop_id = 0U;
if (srv == NULL || srv->state_count == 0U || srv->states == NULL) {
BT_ERR("%s, Invalid model user_data", __func__);
return;
}
prop_id = net_buf_simple_pull_le16(buf);
if (prop_id == INVALID_SENSOR_PROPERTY_ID) {
BT_ERR("%s, Prohibited Sensor Property ID 0x0000", __func__);
return;
}
set_prop_id = net_buf_simple_pull_le16(buf);
if (set_prop_id == INVALID_SENSOR_PROPERTY_ID) {
BT_ERR("%s, Prohibited Sensor Setting Property ID 0x0000", __func__);
return;
}
if (srv->rsp_ctrl.set_auto_rsp == BLE_MESH_SERVER_RSP_BY_APP) {
bt_mesh_sensor_server_recv_set_msg_t set = {
.sensor_setting_set.id = prop_id,
.sensor_setting_set.setting_id = set_prop_id,
.sensor_setting_set.raw = buf,
};
bt_mesh_sensor_server_cb_evt_to_btc(
BTC_BLE_MESH_EVT_SENSOR_SERVER_RECV_SET_MSG, model, ctx, (const u8_t *)&set, sizeof(set));
return;
}
item = find_sensor_setting(model, prop_id, set_prop_id);
if (item) {
if (item->access == SENSOR_SETTING_ACCESS_READ_WRITE && item->raw) {
net_buf_simple_reset(item->raw);
net_buf_simple_add_mem(item->raw, buf->data,
MIN(buf->len, item->raw->size));
change.sensor_setting_set.id = prop_id;
change.sensor_setting_set.setting_id = set_prop_id;
change.sensor_setting_set.value = item->raw;
bt_mesh_sensor_server_cb_evt_to_btc(
BTC_BLE_MESH_EVT_SENSOR_SERVER_STATE_CHANGE, model, ctx, (const u8_t *)&change, sizeof(change));
}
}
if (ctx->recv_op == BLE_MESH_MODEL_OP_SENSOR_SETTING_SET) {
send_sensor_setting_status(model, ctx, prop_id, set_prop_id, false);
}
if (item) {
send_sensor_setting_status(model, ctx, prop_id, set_prop_id, true);
}
return;
}
/* message handlers (End) */
/* Mapping of message handlers for Sensor Server (0x1100) */
const struct bt_mesh_model_op sensor_srv_op[] = {
{ BLE_MESH_MODEL_OP_SENSOR_DESCRIPTOR_GET, 0, sensor_get },
{ BLE_MESH_MODEL_OP_SENSOR_GET, 0, sensor_get },
{ BLE_MESH_MODEL_OP_SENSOR_COLUMN_GET, 2, sensor_get },
{ BLE_MESH_MODEL_OP_SENSOR_SERIES_GET, 2, sensor_get },
BLE_MESH_MODEL_OP_END,
};
/* Mapping of message handlers for Sensor Setup Server (0x1101) */
const struct bt_mesh_model_op sensor_setup_srv_op[] = {
{ BLE_MESH_MODEL_OP_SENSOR_CADENCE_GET, 2, sensor_get },
{ BLE_MESH_MODEL_OP_SENSOR_CADENCE_SET, 4, sensor_cadence_set },
{ BLE_MESH_MODEL_OP_SENSOR_CADENCE_SET_UNACK, 4, sensor_cadence_set },
{ BLE_MESH_MODEL_OP_SENSOR_SETTINGS_GET, 2, sensor_get },
{ BLE_MESH_MODEL_OP_SENSOR_SETTING_GET, 4, sensor_get },
{ BLE_MESH_MODEL_OP_SENSOR_SETTING_SET, 4, sensor_setting_set },
{ BLE_MESH_MODEL_OP_SENSOR_SETTING_SET_UNACK, 4, sensor_setting_set },
BLE_MESH_MODEL_OP_END,
};
static int check_sensor_server_init(struct bt_mesh_sensor_state *state_start,
const u8_t state_count)
{
struct bt_mesh_sensor_state *state = NULL;
struct sensor_setting *setting = NULL;
int i, j;
for (i = 0; i < state_count; i++) {
state = &state_start[i];
if (state->sensor_property_id == INVALID_SENSOR_PROPERTY_ID) {
BT_ERR("%s, Invalid Sensor Property ID 0x%04x", __func__, state->sensor_property_id);
return -EINVAL;
}
/* Check if the same Sensor Property ID exists */
for (int k = i + 1; k < state_count; k++) {
if (state->sensor_property_id == state_start[k].sensor_property_id) {
BT_ERR("%s, Same Sensor Property ID 0x%04x exists", __func__, state->sensor_property_id);
return -EINVAL;
}
}
if (state->setting_count && state->settings) {
for (j = 0; j < state->setting_count; j++) {
setting = &state->settings[j];
if (setting->property_id == INVALID_SENSOR_SETTING_PROPERTY_ID || setting->raw == NULL) {
BT_ERR("%s, Invalid Sensor Setting state", __func__);
return -EINVAL;
}
/* Check if the same Sensor Setting Property ID exists */
for (int k = j + 1; k < state->setting_count; k++) {
if (setting->property_id == state->settings[k].property_id) {
BT_ERR("%s, Same Sensor Setting Property ID 0x%04x exists", __func__, setting->property_id);
return -EINVAL;
}
}
}
}
if (state->cadence) {
if (state->cadence->trigger_delta_down == NULL ||
state->cadence->trigger_delta_up == NULL ||
state->cadence->fast_cadence_low == NULL ||
state->cadence->fast_cadence_high == NULL) {
BT_ERR("%s, Invalid Sensor Cadence state", __func__);
return -EINVAL;
}
}
if (state->sensor_data.raw_value == NULL) {
BT_ERR("%s, Invalid Sensor Data state", __func__);
return -EINVAL;
}
}
return 0;
}
static int sensor_server_init(struct bt_mesh_model *model)
{
if (model->user_data == NULL) {
BT_ERR("%s, No Sensor Server context provided, model_id 0x%04x", __func__, model->id);
return -EINVAL;
}
switch (model->id) {
case BLE_MESH_MODEL_ID_SENSOR_SRV: {
struct bt_mesh_sensor_srv *srv = model->user_data;
if (srv->state_count == 0U || srv->states == NULL) {
BT_ERR("%s, Invalid Sensor state, model_id 0x%04x", __func__, model->id);
return -EINVAL;
}
if (check_sensor_server_init(srv->states, srv->state_count)) {
return -EINVAL;
}
srv->model = model;
break;
}
case BLE_MESH_MODEL_ID_SENSOR_SETUP_SRV: {
struct bt_mesh_sensor_setup_srv *srv = model->user_data;
if (srv->state_count == 0U || srv->states == NULL) {
BT_ERR("%s, Invalid Sensor state, model_id 0x%04x", __func__, model->id);
return -EINVAL;
}
if (check_sensor_server_init(srv->states, srv->state_count)) {
return -EINVAL;
}
srv->model = model;
break;
}
default:
BT_WARN("%s, Unknown Sensor Server Model, model_id 0x%04x", __func__, model->id);
return -EINVAL;
}
return 0;
}
int bt_mesh_sensor_srv_init(struct bt_mesh_model *model, bool primary)
{
if (model->pub == NULL) {
BT_ERR("%s, Sensor Server has no publication support", __func__);
return -EINVAL;
}
/* When this model is present on an element, the corresponding Sensor Setup
* Server model shall also be present.
*/
struct bt_mesh_elem *element = bt_mesh_model_elem(model);
if (bt_mesh_model_find(element, BLE_MESH_MODEL_ID_SENSOR_SETUP_SRV) == NULL) {
BT_WARN("%s, Sensor Setup Server is not present", __func__);
/* Just give a warning here, continue with the initialization */
}
return sensor_server_init(model);
}
int bt_mesh_sensor_setup_srv_init(struct bt_mesh_model *model, bool primary)
{
if (model->pub == NULL) {
BT_ERR("%s, Sensor Setup Server has no publication support", __func__);
return -EINVAL;
}
return sensor_server_init(model);
}
static int sensor_server_deinit(struct bt_mesh_model *model)
{
if (model->user_data == NULL) {
BT_ERR("%s, No Sensor Server context provided, model_id 0x%04x", __func__, model->id);
return -EINVAL;
}
return 0;
}
int bt_mesh_sensor_srv_deinit(struct bt_mesh_model *model, bool primary)
{
if (model->pub == NULL) {
BT_ERR("%s, Sensor Server has no publication support", __func__);
return -EINVAL;
}
return sensor_server_deinit(model);
}
int bt_mesh_sensor_setup_srv_deinit(struct bt_mesh_model *model, bool primary)
{
if (model->pub == NULL) {
BT_ERR("%s, Sensor Setup Server has no publication support", __func__);
return -EINVAL;
}
return sensor_server_deinit(model);
}