123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247 |
- /**
- * Copyright (c) 2012 - 2020, Nordic Semiconductor ASA
- *
- * All rights reserved.
- *
- * 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, except as embedded into a Nordic
- * Semiconductor ASA integrated circuit in a product or a software update for
- * such product, 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 Nordic Semiconductor ASA nor the names of its
- * contributors may be used to endorse or promote products derived from this
- * software without specific prior written permission.
- *
- * 4. This software, with or without modification, must only be used with a
- * Nordic Semiconductor ASA integrated circuit.
- *
- * 5. Any software provided in binary form under this license must not be reverse
- * engineered, decompiled, modified and/or disassembled.
- *
- * THIS SOFTWARE IS PROVIDED BY NORDIC SEMICONDUCTOR ASA "AS IS" AND ANY EXPRESS
- * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
- * OF MERCHANTABILITY, NONINFRINGEMENT, AND FITNESS FOR A PARTICULAR PURPOSE ARE
- * DISCLAIMED. IN NO EVENT SHALL NORDIC SEMICONDUCTOR ASA 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.
- *
- */
- #include "sdk_common.h"
- #if NRF_MODULE_ENABLED(BLE_IAS_C)
- #include "ble_ias_c.h"
- #include <string.h>
- #include "ble.h"
- #include "ble_srv_common.h"
- #include "ble_gattc.h"
- #include "ble_db_discovery.h"
- /**@brief Function for intercepting the errors of GATTC and the BLE GATT Queue.
- *
- * @param[in] nrf_error Error code.
- * @param[in] p_ctx Parameter from the event handler.
- * @param[in] conn_handle Connection handle.
- */
- static void gatt_error_handler(uint32_t nrf_error,
- void * p_ctx,
- uint16_t conn_handle)
- {
- UNUSED_PARAMETER(conn_handle);
- ble_ias_c_t * p_ias_c = (ble_ias_c_t *)p_ctx;
- if (p_ias_c->error_handler != NULL)
- {
- p_ias_c->error_handler(nrf_error);
- }
- }
- void ble_ias_c_on_db_disc_evt(ble_ias_c_t * p_ias_c, ble_db_discovery_evt_t const * p_evt)
- {
- ble_ias_c_evt_t evt;
- memset(&evt, 0, sizeof(ble_ias_c_evt_t));
- evt.conn_handle = p_evt->conn_handle;
- ble_gatt_db_char_t const * p_chars = p_evt->params.discovered_db.charateristics;
- // Check if the Immediate Alert Service was discovered.
- if ( (p_evt->evt_type == BLE_DB_DISCOVERY_COMPLETE)
- && (p_evt->params.discovered_db.srv_uuid.uuid == BLE_UUID_IMMEDIATE_ALERT_SERVICE)
- && (p_evt->params.discovered_db.srv_uuid.type == BLE_UUID_TYPE_BLE))
- {
- for (uint32_t i = 0; i < p_evt->params.discovered_db.char_count; i++)
- {
- // The Alert Level characteristic in the Immediate Alert Service instance is found
- // on peer. Check if it has the correct property 'Write without response'.
- switch (p_chars[i].characteristic.uuid.uuid)
- {
- case BLE_UUID_ALERT_LEVEL_CHAR:
- if (p_chars[i].characteristic.char_props.write_wo_resp)
- {
- // Found Alert Level characteristic inside the Immediate Alert Service.
- memcpy(&evt.alert_level,
- &p_chars[i].characteristic,
- sizeof(ble_gattc_char_t));
- }
- break;
- default:
- break;
- }
- }
- }
- else if ((p_evt->evt_type == BLE_DB_DISCOVERY_SRV_NOT_FOUND) ||
- (p_evt->evt_type == BLE_DB_DISCOVERY_ERROR))
- {
- evt.evt_type = BLE_IAS_C_EVT_DISCOVERY_FAILED;
- }
- else
- {
- return;
- }
- if (evt.alert_level.handle_value != BLE_GATT_HANDLE_INVALID)
- {
- evt.evt_type = BLE_IAS_C_EVT_DISCOVERY_COMPLETE;
- }
- p_ias_c->evt_handler(p_ias_c, &evt);
- }
- uint32_t ble_ias_c_init(ble_ias_c_t * p_ias_c, ble_ias_c_init_t const * p_ias_c_init)
- {
- VERIFY_PARAM_NOT_NULL(p_ias_c);
- VERIFY_PARAM_NOT_NULL(p_ias_c_init);
- VERIFY_PARAM_NOT_NULL(p_ias_c_init->evt_handler);
- VERIFY_PARAM_NOT_NULL(p_ias_c_init->p_gatt_queue);
- p_ias_c->evt_handler = p_ias_c_init->evt_handler;
- p_ias_c->error_handler = p_ias_c_init->error_handler;
- p_ias_c->p_gatt_queue = p_ias_c_init->p_gatt_queue;
- p_ias_c->conn_handle = BLE_CONN_HANDLE_INVALID;
- p_ias_c->alert_level_char.handle_value = BLE_GATT_HANDLE_INVALID;
- BLE_UUID_BLE_ASSIGN(p_ias_c->alert_level_char.uuid, BLE_UUID_ALERT_LEVEL_CHAR);
- BLE_UUID_BLE_ASSIGN(p_ias_c->service_uuid, BLE_UUID_IMMEDIATE_ALERT_SERVICE);
- return ble_db_discovery_evt_register(&p_ias_c->service_uuid);
- }
- /**@brief Function for handling the Disconnect event.
- *
- * @param[in] p_ias_c Immediate Alert Service client structure.
- * @param[in] p_ble_evt Event received from the BLE stack.
- */
- static void on_disconnect(ble_ias_c_t * p_ias_c, ble_evt_t const * p_ble_evt)
- {
- // The following values will be re-initialized when a new connection is made.
- p_ias_c->conn_handle = BLE_CONN_HANDLE_INVALID;
- if (ble_ias_c_is_discovered(p_ias_c))
- {
- // There was a valid instance of IAS on the peer. Send an event to the
- // application, so that it can do a cleanup related to this module.
- ble_ias_c_evt_t evt;
- evt.evt_type = BLE_IAS_C_EVT_DISCONN_COMPLETE;
- p_ias_c->evt_handler(p_ias_c, &evt);
- p_ias_c->alert_level_char.handle_value = BLE_GATT_HANDLE_INVALID;
- }
- }
- void ble_ias_c_on_ble_evt(ble_evt_t const * p_ble_evt, void * p_context)
- {
- uint32_t err_code = NRF_SUCCESS;
- ble_ias_c_t * p_ias_c = (ble_ias_c_t *)p_context;
- switch (p_ble_evt->header.evt_id)
- {
- case BLE_GAP_EVT_DISCONNECTED:
- on_disconnect(p_ias_c, p_ble_evt);
- break;
- default:
- // No implementation needed.
- break;
- }
- if ((err_code != NRF_SUCCESS) && (p_ias_c->error_handler != NULL))
- {
- p_ias_c->error_handler(err_code);
- }
- }
- /**@brief Function for performing a Write procedure.
- *
- * @param[in] p_ias_c Pointer to Immediate Alert Service client structure.
- * @param[in] length Length of data to be written.
- * @param[in] p_value Data to be written.
- *
- * @return NRF_SUCCESS on success, otherwise an error code.
- */
- static uint32_t write_characteristic_value(ble_ias_c_t const * const p_ias_c,
- uint16_t length,
- uint8_t * p_value)
- {
- nrf_ble_gq_req_t write_req;
- memset(&write_req, 0, sizeof(nrf_ble_gq_req_t));
- write_req.type = NRF_BLE_GQ_REQ_GATTC_WRITE;
- write_req.error_handler.cb = gatt_error_handler;
- write_req.error_handler.p_ctx = (ble_ias_c_t *)p_ias_c;
- write_req.params.gattc_write.handle = p_ias_c->alert_level_char.handle_value;
- write_req.params.gattc_write.write_op = BLE_GATT_OP_WRITE_CMD;
- write_req.params.gattc_write.offset = 0;
- write_req.params.gattc_write.len = length;
- write_req.params.gattc_write.p_value = p_value;
- return nrf_ble_gq_item_add(p_ias_c->p_gatt_queue, &write_req, p_ias_c->conn_handle);
- }
- uint32_t ble_ias_c_send_alert_level(ble_ias_c_t const * p_ias_c, uint8_t alert_level)
- {
- if (!ble_ias_c_is_discovered(p_ias_c))
- {
- return NRF_ERROR_NOT_FOUND;
- }
- return write_characteristic_value(p_ias_c,
- sizeof(uint8_t),
- &alert_level);
- }
- uint32_t ble_ias_c_handles_assign(ble_ias_c_t * p_ias_c,
- const uint16_t conn_handle,
- const uint16_t alert_level_handle)
- {
- VERIFY_PARAM_NOT_NULL(p_ias_c);
- p_ias_c->conn_handle = conn_handle;
- p_ias_c->alert_level_char.handle_value = alert_level_handle;
- return nrf_ble_gq_conn_handle_register(p_ias_c->p_gatt_queue, conn_handle);
- }
- #endif //NRF_MODULE_ENABLED(BLE_IAS_C)
|