/* * Copyright (C) 2019 BlueKitchen GmbH * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. Neither the name of the copyright holders nor the names of * contributors may be used to endorse or promote products derived * from this software without specific prior written permission. * 4. Any redistribution, use, or modification is done solely for * personal benefit and not for any commercial purpose or for * monetary gain. * * THIS SOFTWARE IS PROVIDED BY BLUEKITCHEN GMBH AND CONTRIBUTORS * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL MATTHIAS * RINGWALD OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF * THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * Please inquire about commercial licensing options at * contact@bluekitchen-gmbh.com * */ #define __BTSTACK_FILE__ "mesh_generic_server.c" #include #include #include "mesh_generic_server.h" #include "btstack_util.h" #include "ble/mesh/mesh_network.h" #include "mesh_keys.h" #include "mesh_transport.h" #include "mesh_access.h" #include "mesh_foundation.h" #include "bluetooth_company_id.h" #include "btstack_memory.h" #include "btstack_debug.h" static void mesh_server_transition_step_bool(mesh_transition_bool_t * transition, transition_event_t event, uint32_t current_timestamp); static void generic_server_send_message(uint16_t src, uint16_t dest, uint16_t netkey_index, uint16_t appkey_index, mesh_pdu_t *pdu){ uint8_t ttl = mesh_foundation_default_ttl_get(); mesh_upper_transport_setup_access_pdu_header(pdu, netkey_index, appkey_index, ttl, src, dest, 0); mesh_upper_transport_send_access_pdu(pdu); } // Generic On Off State void mesh_generic_on_off_server_register_packet_handler(mesh_model_t *generic_on_off_server_model, btstack_packet_handler_t transition_events_packet_handler){ if (transition_events_packet_handler == NULL){ log_error("mesh_generic_on_off_server_register_packet_handler called with NULL callback"); return; } if (generic_on_off_server_model == NULL){ log_error("mesh_generic_on_off_server_register_packet_handler called with NULL generic_on_off_server_model"); return; } generic_on_off_server_model->transition_events_packet_handler = &transition_events_packet_handler; } const mesh_access_message_t mesh_generic_on_off_status_transition = { MESH_GENERIC_ON_OFF_STATUS, "111" }; const mesh_access_message_t mesh_generic_on_off_status_instantaneous = { MESH_GENERIC_ON_OFF_STATUS, "1" }; static void mesh_generic_on_off_status_message(mesh_model_t *generic_on_off_server_model, uint16_t netkey_index, uint16_t dest, uint16_t appkey_index){ if (generic_on_off_server_model->element == NULL){ log_error("generic_on_off_server_model->element == NULL"); } mesh_generic_on_off_state_t * state = (mesh_generic_on_off_state_t *) generic_on_off_server_model->model_data; if (state == NULL){ log_error("generic_on_off_status == NULL"); } // setup message mesh_transport_pdu_t * transport_pdu = NULL; if (state->transition_data.base_transition.remaining_transition_time_ms != 0) { transport_pdu = mesh_access_setup_segmented_message(&mesh_generic_on_off_status_transition, state->transition_data.current_value, state->transition_data.target_value, state->transition_data.base_transition.remaining_transition_time_ms); } else { transport_pdu = mesh_access_setup_segmented_message(&mesh_generic_on_off_status_instantaneous, state->transition_data.current_value); } if (!transport_pdu) return; // send as segmented access pdu generic_server_send_message(mesh_access_get_element_address(generic_on_off_server_model), dest, netkey_index, appkey_index, (mesh_pdu_t *) transport_pdu); } static void generic_on_off_get_handler(mesh_model_t *generic_on_off_server_model, mesh_pdu_t * pdu){ mesh_generic_on_off_status_message(generic_on_off_server_model, mesh_pdu_netkey_index(pdu), mesh_pdu_src(pdu), mesh_pdu_appkey_index(pdu)); mesh_access_message_processed(pdu); } static void generic_on_off_set_handler(mesh_model_t *generic_on_off_server_model, mesh_pdu_t * pdu){ if (generic_on_off_server_model == NULL){ log_error("generic_on_off_server_model == NULL"); } mesh_generic_on_off_state_t * generic_on_off_server_state = (mesh_generic_on_off_state_t *)generic_on_off_server_model->model_data; if (generic_on_off_server_state == NULL){ log_error("generic_on_off_server_state == NULL"); } mesh_access_parser_state_t parser; mesh_access_parser_init(&parser, (mesh_pdu_t*) pdu); uint8_t on_off_value = mesh_access_parser_get_u8(&parser); // The TID field is a transaction identifier indicating whether the message is // a new message or a retransmission of a previously sent message uint8_t tid = mesh_access_parser_get_u8(&parser); if (tid == generic_on_off_server_state->transaction_identifier){ printf("retransmission\n"); return; } generic_on_off_server_state->transition_data.target_value = on_off_value; if (mesh_access_parser_available(&parser) == 2){ // Generic Default Transition Time format - num_steps (higher 6 bits), step_resolution (lower 2 bits) uint8_t transition_time_gdtt = mesh_access_parser_get_u8(&parser); uint8_t delay_time_gdtt = mesh_access_parser_get_u8(&parser); mesh_transition_t generic_server_on_off_value_transition = generic_on_off_server_state->transition_data.base_transition; if (transition_time_gdtt != 0 || delay_time_gdtt != 0) { generic_server_on_off_value_transition.mesh_model = (mesh_model_t *) generic_on_off_server_model; generic_server_on_off_value_transition.transition_callback = (void (*)(mesh_transition_t *, transition_event_t, uint32_t)) &mesh_server_transition_step_bool; mesh_access_transitions_add(&generic_server_on_off_value_transition, transition_time_gdtt, delay_time_gdtt); return; } } // Instantanious update generic_on_off_server_state->transition_data.current_value = on_off_value; generic_on_off_server_state->transaction_identifier = tid; generic_on_off_server_state->transition_data.base_transition.remaining_transition_time_ms = 0; generic_on_off_server_state->transition_data.base_transition.remaining_delay_time_ms = 0; mesh_generic_on_off_status_message(generic_on_off_server_model, mesh_pdu_netkey_index(pdu), mesh_pdu_src(pdu), mesh_pdu_appkey_index(pdu)); mesh_access_message_processed(pdu); mesh_access_emit_state_update_bool(generic_on_off_server_model->transition_events_packet_handler, mesh_access_get_element_index(generic_on_off_server_model), generic_on_off_server_model->model_identifier, MODEL_STATE_ID_GENERIC_ON_OFF, MODEL_STATE_UPDATE_REASON_SET, generic_on_off_server_state->transition_data.current_value); } // static void generic_on_off_set_unacknowledged_handler(mesh_model_t *mesh_model, mesh_pdu_t * pdu){ // } // Generic On Off Message const static mesh_operation_t mesh_generic_on_off_model_operations[] = { { MESH_GENERIC_ON_OFF_GET, 0, generic_on_off_get_handler }, { MESH_GENERIC_ON_OFF_SET, 2, generic_on_off_set_handler }, // { MESH_GENERIC_ON_OFF_SET_UNACKNOWLEDGED, 4, generic_on_off_set_unacknowledged_handler }, { 0, 0, NULL } }; const mesh_operation_t * mesh_generic_on_off_server_get_operations(void){ return mesh_generic_on_off_model_operations; } void mesh_generic_on_off_server_set_value(mesh_model_t *generic_on_off_server_model, uint8_t on_off_value, uint32_t transition_time_ms, uint16_t delay_ms){ mesh_generic_on_off_state_t * generic_on_off_server_state = (mesh_generic_on_off_state_t *)generic_on_off_server_model->model_data; generic_on_off_server_state->transition_data.target_value = on_off_value; generic_on_off_server_state->transition_data.base_transition.remaining_transition_time_ms = transition_time_ms; generic_on_off_server_state->transition_data.base_transition.remaining_delay_time_ms = delay_ms; // TODO implement transition // TODO implement publication generic_on_off_server_state->transition_data.current_value = on_off_value; mesh_access_emit_state_update_bool(generic_on_off_server_model->transition_events_packet_handler, mesh_access_get_element_index(generic_on_off_server_model), generic_on_off_server_model->model_identifier, MODEL_STATE_ID_GENERIC_ON_OFF, MODEL_STATE_UPDATE_REASON_APPLICATION_CHANGE, generic_on_off_server_state->transition_data.current_value); } uint8_t mesh_generic_on_off_server_get_value(mesh_model_t *generic_on_off_server_model){ mesh_generic_on_off_state_t * generic_on_off_server_state = (mesh_generic_on_off_state_t *)generic_on_off_server_model->model_data; return generic_on_off_server_state->transition_data.current_value; } static void mesh_server_transition_state_update(mesh_transition_bool_t * transition, uint32_t current_timestamp_ms){ if (transition->base_transition.remaining_delay_time_ms != 0){ transition->base_transition.state = MESH_TRANSITION_STATE_DELAYED; transition->base_transition.remaining_delay_time_ms = 0; transition->base_transition.phase_start_ms = current_timestamp_ms; return; } mesh_model_t * generic_on_off_server_model = transition->base_transition.mesh_model; if (transition->base_transition.remaining_transition_time_ms != 0){ transition->base_transition.state = MESH_TRANSITION_STATE_ACTIVE; transition->base_transition.phase_start_ms = current_timestamp_ms; if (transition->target_value == 1){ transition->current_value = 1; mesh_access_emit_state_update_bool(generic_on_off_server_model->transition_events_packet_handler, mesh_access_get_element_index(generic_on_off_server_model), generic_on_off_server_model->model_identifier, MODEL_STATE_ID_GENERIC_ON_OFF, MODEL_STATE_UPDATE_REASON_TRANSITION_START, transition->current_value); } return; } transition->current_value = transition->target_value; transition->base_transition.remaining_transition_time_ms = 0; // TODO: emit event mesh_access_emit_state_update_bool(generic_on_off_server_model->transition_events_packet_handler, mesh_access_get_element_index(generic_on_off_server_model), generic_on_off_server_model->model_identifier, MODEL_STATE_ID_GENERIC_ON_OFF, MODEL_STATE_UPDATE_REASON_TRANSITION_END, transition->current_value); mesh_access_transitions_remove((mesh_transition_t *)transition); } static void mesh_server_transition_step_bool(mesh_transition_bool_t * transition, transition_event_t event, uint32_t current_timestamp){ uint32_t time_step_ms; switch (transition->base_transition.state){ case MESH_TRANSITION_STATE_IDLE: if (event != TRANSITION_START) break; mesh_server_transition_state_update(transition, current_timestamp); break; case MESH_TRANSITION_STATE_DELAYED: if (event != TRANSITION_UPDATE) break; time_step_ms = current_timestamp - transition->base_transition.phase_start_ms; if (transition->base_transition.remaining_delay_time_ms >= time_step_ms){ transition->base_transition.remaining_delay_time_ms -= time_step_ms; } else { transition->base_transition.remaining_delay_time_ms = 0; mesh_server_transition_state_update(transition, current_timestamp); } break; case MESH_TRANSITION_STATE_ACTIVE: if (event != TRANSITION_UPDATE) break; time_step_ms = current_timestamp - transition->base_transition.phase_start_ms; if (transition->base_transition.remaining_transition_time_ms >= time_step_ms){ transition->base_transition.remaining_transition_time_ms -= time_step_ms; } else { transition->base_transition.remaining_transition_time_ms = 0; mesh_server_transition_state_update(transition, current_timestamp); } break; default: break; } }