Hervé DELACOURT / X_NUCLEO_IDB0XA1

adaptation for bkap

Fork of X_NUCLEO_IDB0XA1 by ST

source/platform/btle.cpp@308:36435ab0e5b2, 2018-05-14 (annotated)

Committer:
vrou44
Date:
Mon May 14 12:32:41 2018 +0000
Revision:
308:36435ab0e5b2
Parent:
293:5a1f577bf92f 
Changes for Book And Plug Proto

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Wolfgang Betz 132:51056160fa4a 1 /* mbed Microcontroller Library
Wolfgang Betz 132:51056160fa4a 2 * Copyright (c) 2006-2013 ARM Limited
Wolfgang Betz 132:51056160fa4a 3 *
Wolfgang Betz 132:51056160fa4a 4 * Licensed under the Apache License, Version 2.0 (the "License");
Wolfgang Betz 132:51056160fa4a 5 * you may not use this file except in compliance with the License.
Wolfgang Betz 132:51056160fa4a 6 * You may obtain a copy of the License at
Wolfgang Betz 132:51056160fa4a 7 *
Wolfgang Betz 132:51056160fa4a 8 * http://www.apache.org/licenses/LICENSE-2.0
Wolfgang Betz 132:51056160fa4a 9 *
Wolfgang Betz 132:51056160fa4a 10 * Unless required by applicable law or agreed to in writing, software
Wolfgang Betz 132:51056160fa4a 11 * distributed under the License is distributed on an "AS IS" BASIS,
Wolfgang Betz 132:51056160fa4a 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
Wolfgang Betz 132:51056160fa4a 13 * See the License for the specific language governing permissions and
Wolfgang Betz 132:51056160fa4a 14 * limitations under the License.
Wolfgang Betz 132:51056160fa4a 15 */
Wolfgang Betz 132:51056160fa4a 16
Wolfgang Betz 132:51056160fa4a 17
Wolfgang Betz 132:51056160fa4a 18 /**
Wolfgang Betz 132:51056160fa4a 19 ******************************************************************************
Vincent Coubard 256:146bb175ce80 20 * @file btle.cpp
Wolfgang Betz 132:51056160fa4a 21 * @author STMicroelectronics
Wolfgang Betz 132:51056160fa4a 22 * @brief Implementation BlueNRG Init and helper functions.
Wolfgang Betz 132:51056160fa4a 23 ******************************************************************************
Wolfgang Betz 132:51056160fa4a 24 * @copy
Wolfgang Betz 132:51056160fa4a 25 *
Wolfgang Betz 132:51056160fa4a 26 * THE PRESENT FIRMWARE WHICH IS FOR GUIDANCE ONLY AIMS AT PROVIDING CUSTOMERS
Wolfgang Betz 132:51056160fa4a 27 * WITH CODING INFORMATION REGARDING THEIR PRODUCTS IN ORDER FOR THEM TO SAVE
Wolfgang Betz 132:51056160fa4a 28 * TIME. AS A RESULT, STMICROELECTRONICS SHALL NOT BE HELD LIABLE FOR ANY
Wolfgang Betz 132:51056160fa4a 29 * DIRECT, INDIRECT OR CONSEQUENTIAL DAMAGES WITH RESPECT TO ANY CLAIMS ARISING
Wolfgang Betz 132:51056160fa4a 30 * FROM THE CONTENT OF SUCH FIRMWARE AND/OR THE USE MADE BY CUSTOMERS OF THE
Wolfgang Betz 132:51056160fa4a 31 * CODING INFORMATION CONTAINED HEREIN IN CONNECTION WITH THEIR PRODUCTS.
Wolfgang Betz 132:51056160fa4a 32 *
Wolfgang Betz 132:51056160fa4a 33 * <h2><center>&copy; COPYRIGHT 2013 STMicroelectronics</center></h2>
Vincent Coubard 256:146bb175ce80 34 */
Wolfgang Betz 132:51056160fa4a 35
Wolfgang Betz 132:51056160fa4a 36
Wolfgang Betz 132:51056160fa4a 37 #include "btle.h"
Wolfgang Betz 132:51056160fa4a 38 #include "ble/Gap.h"
Wolfgang Betz 132:51056160fa4a 39 #include "ble/GapEvents.h"
Wolfgang Betz 132:51056160fa4a 40 #include "BlueNRGGap.h"
Wolfgang Betz 132:51056160fa4a 41 #include "BlueNRGGattServer.h"
Wolfgang Betz 132:51056160fa4a 42 #include "BlueNRGGattClient.h"
Vincent Coubard 293:5a1f577bf92f 43 #include "ble_utils.h"
Wolfgang Betz 132:51056160fa4a 44
Andrea Palmieri 241:c13c2e31316d 45 #include "x_nucleo_idb0xa1_targets.h"
Andrea Palmieri 241:c13c2e31316d 46
Wolfgang Betz 132:51056160fa4a 47 #ifdef __cplusplus
Wolfgang Betz 132:51056160fa4a 48 extern "C" {
Wolfgang Betz 132:51056160fa4a 49 #endif
Wolfgang Betz 132:51056160fa4a 50
Wolfgang Betz 132:51056160fa4a 51
Wolfgang Betz 132:51056160fa4a 52 /* C File Includes ------------------------------------------------------------------*/
Wolfgang Betz 132:51056160fa4a 53 #include <stdio.h>
Wolfgang Betz 132:51056160fa4a 54 #include <string.h>
Vincent Coubard 293:5a1f577bf92f 55 #include "ble_hci.h"
Vincent Coubard 293:5a1f577bf92f 56 #include "ble_hci_const.h"
Wolfgang Betz 132:51056160fa4a 57 #include "bluenrg_aci.h"
Wolfgang Betz 132:51056160fa4a 58 #include "bluenrg_hal_aci.h"
Wolfgang Betz 132:51056160fa4a 59 #include "bluenrg_gap.h"
Wolfgang Betz 132:51056160fa4a 60 #include "bluenrg_utils.h"
Wolfgang Betz 132:51056160fa4a 61
Vincent Coubard 293:5a1f577bf92f 62 #include "ble_hal_types.h"
Vincent Coubard 293:5a1f577bf92f 63 #include "ble_hal.h"
Vincent Coubard 293:5a1f577bf92f 64 #include "ble_gp_timer.h"
Vincent Coubard 293:5a1f577bf92f 65 #include "ble_osal.h"
Vincent Coubard 293:5a1f577bf92f 66 #include "ble_sm.h"
Vincent Coubard 293:5a1f577bf92f 67 #include "ble_debug.h"
Wolfgang Betz 132:51056160fa4a 68
Wolfgang Betz 132:51056160fa4a 69 #ifdef __cplusplus
Wolfgang Betz 132:51056160fa4a 70 }
Wolfgang Betz 132:51056160fa4a 71 #endif
Wolfgang Betz 132:51056160fa4a 72
Wolfgang Betz 132:51056160fa4a 73 #define IDB04A1 0
Wolfgang Betz 132:51056160fa4a 74 #define IDB05A1 1
Wolfgang Betz 132:51056160fa4a 75
Andrea Palmieri 241:c13c2e31316d 76 /* See file 'x_nucleo_idb0xa1_targets.h' for details regarding the IDB0XA1 STACK_MODE */
Andrea Palmieri 241:c13c2e31316d 77 #define STACK_MODE IDB0XA1_STACK_MODE
Andrea Palmieri 220:e02936f0d4c7 78
Wolfgang Betz 132:51056160fa4a 79 void HCI_Input(tHciDataPacket * hciReadPacket);
Wolfgang Betz 132:51056160fa4a 80
Wolfgang Betz 132:51056160fa4a 81 uint16_t g_gap_service_handle = 0;
Wolfgang Betz 132:51056160fa4a 82 uint16_t g_appearance_char_handle = 0;
Wolfgang Betz 132:51056160fa4a 83 uint16_t g_device_name_char_handle = 0;
Vincent Coubard 266:b49e28134d83 84 uint16_t g_preferred_connection_parameters_char_handle = 0;
Wolfgang Betz 132:51056160fa4a 85
Wolfgang Betz 132:51056160fa4a 86 /* Private variables ---------------------------------------------------------*/
Wolfgang Betz 132:51056160fa4a 87 volatile uint8_t set_connectable = 1;
Andrea Palmieri 219:d8e8cd4d4521 88
Andrea Palmieri 219:d8e8cd4d4521 89 static char versionString[32];
vrou44 308:36435ab0e5b2 90 //uint8_t bnrg_expansion_board = IDB04A1; /* at startup, suppose the X-NUCLEO-IDB04A1 is used */
vrou44 308:36435ab0e5b2 91 uint8_t bnrg_expansion_board = IDB05A1; /* HD at startup, suppose the X-NUCLEO-IDB05A1 is used */
Wolfgang Betz 132:51056160fa4a 92
Wolfgang Betz 132:51056160fa4a 93 /**************************************************************************/
Wolfgang Betz 132:51056160fa4a 94 /*!
Antonio Vilei 245:6830f71c197c 95 @brief Init the BTLE stack with the specified role
Wolfgang Betz 132:51056160fa4a 96 @returns void
Wolfgang Betz 132:51056160fa4a 97 */
Wolfgang Betz 132:51056160fa4a 98 /**************************************************************************/
Vincent Coubard 271:7dc6261c33e5 99 void btleInit(void)
Wolfgang Betz 132:51056160fa4a 100 {
Andrea Palmieri 219:d8e8cd4d4521 101 PRINTF("btleInit>>\n\r");
Vincent Coubard 256:146bb175ce80 102
Wolfgang Betz 132:51056160fa4a 103 int ret;
Wolfgang Betz 132:51056160fa4a 104 uint8_t hwVersion;
Wolfgang Betz 132:51056160fa4a 105 uint16_t fwVersion;
Wolfgang Betz 132:51056160fa4a 106 uint16_t service_handle, dev_name_char_handle, appearance_char_handle;
Wolfgang Betz 132:51056160fa4a 107
Wolfgang Betz 132:51056160fa4a 108 /* Reset BlueNRG SPI interface */
Wolfgang Betz 132:51056160fa4a 109 BlueNRG_RST();
Wolfgang Betz 132:51056160fa4a 110
Wolfgang Betz 132:51056160fa4a 111 /* get the BlueNRG HW and FW versions */
Wolfgang Betz 132:51056160fa4a 112 getBlueNRGVersion(&hwVersion, &fwVersion);
Wolfgang Betz 132:51056160fa4a 113
Vincent Coubard 256:146bb175ce80 114 /*
Wolfgang Betz 132:51056160fa4a 115 * Reset BlueNRG again otherwise we won't
Wolfgang Betz 132:51056160fa4a 116 * be able to change its MAC address.
Wolfgang Betz 132:51056160fa4a 117 * aci_hal_write_config_data() must be the first
Wolfgang Betz 132:51056160fa4a 118 * command after reset otherwise it will fail.
Wolfgang Betz 132:51056160fa4a 119 */
Wolfgang Betz 132:51056160fa4a 120 BlueNRG_RST();
Wolfgang Betz 132:51056160fa4a 121
Wolfgang Betz 132:51056160fa4a 122 if (hwVersion > 0x30) { /* X-NUCLEO-IDB05A1 expansion board is used */
Wolfgang Betz 132:51056160fa4a 123 bnrg_expansion_board = IDB05A1;
Wolfgang Betz 132:51056160fa4a 124 }
Wolfgang Betz 132:51056160fa4a 125
Andrea Palmieri 219:d8e8cd4d4521 126 /* set BLE version string */
Andrea Palmieri 219:d8e8cd4d4521 127 setVersionString(hwVersion, fwVersion);
Andrea Palmieri 219:d8e8cd4d4521 128
Andrea Palmieri 220:e02936f0d4c7 129 if (bnrg_expansion_board == IDB05A1) {
Andrea Palmieri 220:e02936f0d4c7 130 uint8_t stackMode = STACK_MODE;
Andrea Palmieri 220:e02936f0d4c7 131 ret = aci_hal_write_config_data(CONFIG_DATA_ROLE,
Andrea Palmieri 220:e02936f0d4c7 132 CONFIG_DATA_ROLE_LEN,
Andrea Palmieri 220:e02936f0d4c7 133 &stackMode);
Andrea Palmieri 220:e02936f0d4c7 134 }
Andrea Palmieri 220:e02936f0d4c7 135
Wolfgang Betz 132:51056160fa4a 136 ret = aci_gatt_init();
Vincent Coubard 253:9665a6f8bbdb 137 if(ret != BLE_STATUS_SUCCESS){
Wolfgang Betz 132:51056160fa4a 138 PRINTF("GATT_Init failed.\n");
Wolfgang Betz 132:51056160fa4a 139 }
Wolfgang Betz 132:51056160fa4a 140 if (bnrg_expansion_board == IDB05A1) {
Andrea Palmieri 229:9981f62cdb1a 141 ret = aci_gap_init_IDB05A1(GAP_PERIPHERAL_ROLE_IDB05A1|GAP_CENTRAL_ROLE_IDB05A1|GAP_OBSERVER_ROLE_IDB05A1,
Andrea Palmieri 229:9981f62cdb1a 142 0,
Andrea Palmieri 229:9981f62cdb1a 143 0x18,
Andrea Palmieri 229:9981f62cdb1a 144 &service_handle,
Andrea Palmieri 229:9981f62cdb1a 145 &dev_name_char_handle,
Andrea Palmieri 229:9981f62cdb1a 146 &appearance_char_handle);
vrou44 308:36435ab0e5b2 147 PRINTF("\r\n!!!!!!! HD aci_gap_init_IDB05A1 \r\n");
Wolfgang Betz 132:51056160fa4a 148 } else {
Vincent Coubard 271:7dc6261c33e5 149 // IDB04A1 is configured as peripheral by default
Vincent Coubard 271:7dc6261c33e5 150 ret = aci_gap_init_IDB04A1(GAP_PERIPHERAL_ROLE_IDB04A1, &service_handle, &dev_name_char_handle, &appearance_char_handle);
Wolfgang Betz 132:51056160fa4a 151 }
Vincent Coubard 256:146bb175ce80 152
Vincent Coubard 268:c0a1e03c5736 153 // read the default static address and inject it into the GAP object
Vincent Coubard 268:c0a1e03c5736 154 {
Vincent Coubard 268:c0a1e03c5736 155 Gap::Address_t BLE_address_BE = { 0 };
Vincent Coubard 268:c0a1e03c5736 156 uint8_t data_len_out;
Vincent Coubard 268:c0a1e03c5736 157 aci_hal_read_config_data(CONFIG_DATA_RANDOM_ADDRESS_IDB05A1, BDADDR_SIZE, &data_len_out, BLE_address_BE);
Vincent Coubard 268:c0a1e03c5736 158 // FIXME error handling of this function
Vincent Coubard 268:c0a1e03c5736 159 BlueNRGGap::getInstance().setAddress(BLEProtocol::AddressType::RANDOM_STATIC, BLE_address_BE);
Vincent Coubard 268:c0a1e03c5736 160 }
Vincent Coubard 268:c0a1e03c5736 161
Wolfgang Betz 132:51056160fa4a 162 if(ret != BLE_STATUS_SUCCESS){
Wolfgang Betz 132:51056160fa4a 163 PRINTF("GAP_Init failed.\n");
Wolfgang Betz 132:51056160fa4a 164 }
Wolfgang Betz 132:51056160fa4a 165
Andrea Palmieri 229:9981f62cdb1a 166 //FIXME: Security and passkey set by default
vrou44 308:36435ab0e5b2 167 ret = aci_gap_set_auth_requirement(
vrou44 308:36435ab0e5b2 168 // MITM_PROTECTION_NOT_REQUIRED, HD
vrou44 308:36435ab0e5b2 169 MITM_PROTECTION_REQUIRED,
Wolfgang Betz 132:51056160fa4a 170 OOB_AUTH_DATA_ABSENT,
Wolfgang Betz 132:51056160fa4a 171 NULL,
Wolfgang Betz 132:51056160fa4a 172 7,
Wolfgang Betz 132:51056160fa4a 173 16,
vrou44 308:36435ab0e5b2 174 // USE_FIXED_PIN_FOR_PAIRING,
Wolfgang Betz 132:51056160fa4a 175 USE_FIXED_PIN_FOR_PAIRING,
vrou44 308:36435ab0e5b2 176 654321,
Wolfgang Betz 132:51056160fa4a 177 BONDING);
Vincent Coubard 253:9665a6f8bbdb 178 if (ret != BLE_STATUS_SUCCESS) {
Vincent Coubard 253:9665a6f8bbdb 179 PRINTF("Auth Req set failed.\n");
vrou44 308:36435ab0e5b2 180 } else {
vrou44 308:36435ab0e5b2 181 PRINTF("\n\r!!!!! HD Auth Req set success.\n");
vrou44 308:36435ab0e5b2 182 }
vrou44 308:36435ab0e5b2 183
Wolfgang Betz 132:51056160fa4a 184 aci_hal_set_tx_power_level(1,4);
Vincent Coubard 256:146bb175ce80 185
Wolfgang Betz 132:51056160fa4a 186 g_gap_service_handle = service_handle;
Wolfgang Betz 132:51056160fa4a 187 g_appearance_char_handle = appearance_char_handle;
Vincent Coubard 256:146bb175ce80 188 g_device_name_char_handle = dev_name_char_handle;
Vincent Coubard 256:146bb175ce80 189 //Device Name is set from Accumulate Adv Data Payload or through setDeviceName API
Wolfgang Betz 132:51056160fa4a 190 /*ret = aci_gatt_update_char_value(service_handle, dev_name_char_handle, 0,
Wolfgang Betz 132:51056160fa4a 191 strlen(name), (tHalUint8 *)name);*/
Wolfgang Betz 132:51056160fa4a 192
Vincent Coubard 264:1e754a01869e 193 signalEventsToProcess();
Vincent Coubard 266:b49e28134d83 194 // update the peripheral preferred conenction parameters handle
Vincent Coubard 266:b49e28134d83 195 // This value is hardcoded at the moment.
Vincent Coubard 271:7dc6261c33e5 196 g_preferred_connection_parameters_char_handle = 10;
Vincent Coubard 266:b49e28134d83 197
Wolfgang Betz 132:51056160fa4a 198 return;
Wolfgang Betz 132:51056160fa4a 199 }
Wolfgang Betz 132:51056160fa4a 200
Wolfgang Betz 132:51056160fa4a 201 /**************************************************************************/
Wolfgang Betz 132:51056160fa4a 202 /*!
Andrea Palmieri 229:9981f62cdb1a 203 @brief mbedOS
Wolfgang Betz 132:51056160fa4a 204
Wolfgang Betz 132:51056160fa4a 205 @param[in] void
Vincent Coubard 256:146bb175ce80 206
Wolfgang Betz 132:51056160fa4a 207 @returns
Wolfgang Betz 132:51056160fa4a 208 */
Wolfgang Betz 132:51056160fa4a 209 /**************************************************************************/
Wolfgang Betz 134:d2f8d5898d04 210 int btle_handler_pending = 0;
Wolfgang Betz 134:d2f8d5898d04 211
Wolfgang Betz 133:1bb8df697f7f 212 void btle_handler(void)
Wolfgang Betz 132:51056160fa4a 213 {
Wolfgang Betz 134:d2f8d5898d04 214 btle_handler_pending = 0;
Vincent Coubard 264:1e754a01869e 215 BlueNRGGap::getInstance().Process();
Wolfgang Betz 132:51056160fa4a 216 HCI_Process();
Wolfgang Betz 132:51056160fa4a 217 }
Wolfgang Betz 132:51056160fa4a 218
Andrea Palmieri 219:d8e8cd4d4521 219 /* set BLE Version string */
Andrea Palmieri 219:d8e8cd4d4521 220 void setVersionString(uint8_t hwVersion, uint16_t fwVersion)
Andrea Palmieri 219:d8e8cd4d4521 221 {
Andrea Palmieri 219:d8e8cd4d4521 222 if(bnrg_expansion_board == IDB04A1 || bnrg_expansion_board == IDB05A1) {
Andrea Palmieri 219:d8e8cd4d4521 223 snprintf(versionString, sizeof(versionString), "ST BLE4.1 HW v%u.%u FW v%u.%u",
Andrea Palmieri 219:d8e8cd4d4521 224 hwVersion>>4, (hwVersion&0x0F),
Andrea Palmieri 219:d8e8cd4d4521 225 fwVersion>>8, (fwVersion&0x00F0)>>4);
Andrea Palmieri 219:d8e8cd4d4521 226 } else {
Andrea Palmieri 219:d8e8cd4d4521 227 snprintf(versionString, sizeof(versionString), "ST (unknown spec)");
Andrea Palmieri 219:d8e8cd4d4521 228 }
Andrea Palmieri 219:d8e8cd4d4521 229 }
Andrea Palmieri 219:d8e8cd4d4521 230
Andrea Palmieri 219:d8e8cd4d4521 231 /* get BLE Version string */
Andrea Palmieri 219:d8e8cd4d4521 232 const char* getVersionString(void)
Andrea Palmieri 219:d8e8cd4d4521 233 {
Andrea Palmieri 219:d8e8cd4d4521 234 return versionString;
Andrea Palmieri 219:d8e8cd4d4521 235 }
Andrea Palmieri 219:d8e8cd4d4521 236
Andrea Palmieri 219:d8e8cd4d4521 237 tBleStatus btleStartRadioScan(uint8_t scan_type,
Andrea Palmieri 219:d8e8cd4d4521 238 uint16_t scan_interval,
Andrea Palmieri 219:d8e8cd4d4521 239 uint16_t scan_window,
Andrea Palmieri 219:d8e8cd4d4521 240 uint8_t own_address_type)
Andrea Palmieri 219:d8e8cd4d4521 241 {
Andrea Palmieri 219:d8e8cd4d4521 242 tBleStatus ret;
Andrea Palmieri 219:d8e8cd4d4521 243
Andrea Palmieri 219:d8e8cd4d4521 244 // Observer role is not supported by X-NUCLEO-IDB04A1, return BLE_ERROR_NOT_IMPLEMENTED
Andrea Palmieri 219:d8e8cd4d4521 245 if(bnrg_expansion_board == IDB05A1) {
Andrea Palmieri 220:e02936f0d4c7 246 PRINTF("scan_interval=%d scan_window=%d\n\r", scan_interval, scan_window);
Andrea Palmieri 231:a0d2544b38cd 247 PRINTF("scan_type=%d own_address_type=%d\n\r", scan_type, own_address_type);
Andrea Palmieri 219:d8e8cd4d4521 248 ret = aci_gap_start_observation_procedure(scan_interval,
Andrea Palmieri 220:e02936f0d4c7 249 scan_window,
Andrea Palmieri 219:d8e8cd4d4521 250 scan_type,
Andrea Palmieri 220:e02936f0d4c7 251 own_address_type,
Andrea Palmieri 235:31b976a40f43 252 0); // 1 to filter duplicates
Andrea Palmieri 219:d8e8cd4d4521 253 } else {
Andrea Palmieri 219:d8e8cd4d4521 254 ret = BLE_STATUS_INVALID_CID;
Andrea Palmieri 219:d8e8cd4d4521 255 }
Andrea Palmieri 219:d8e8cd4d4521 256
Andrea Palmieri 219:d8e8cd4d4521 257 return ret;
Andrea Palmieri 219:d8e8cd4d4521 258
Andrea Palmieri 219:d8e8cd4d4521 259 }
Wolfgang Betz 132:51056160fa4a 260
Wolfgang Betz 132:51056160fa4a 261 /*!
Wolfgang Betz 132:51056160fa4a 262 @brief Not Used
Wolfgang Betz 132:51056160fa4a 263
Wolfgang Betz 132:51056160fa4a 264 @param[in] void
Vincent Coubard 256:146bb175ce80 265
Wolfgang Betz 132:51056160fa4a 266 @returns
Wolfgang Betz 132:51056160fa4a 267 */
Wolfgang Betz 132:51056160fa4a 268 void SPI_Poll(void)
Wolfgang Betz 132:51056160fa4a 269 {
Wolfgang Betz 132:51056160fa4a 270 //HAL_GPIO_EXTI_Callback_Poll(BNRG_SPI_EXTI_PIN);
Wolfgang Betz 132:51056160fa4a 271 return;
Wolfgang Betz 132:51056160fa4a 272 }
Vincent Coubard 256:146bb175ce80 273
Andrea Palmieri 229:9981f62cdb1a 274 void Attribute_Modified_CB(evt_blue_aci *blue_evt)
Andrea Palmieri 229:9981f62cdb1a 275 {
Andrea Palmieri 229:9981f62cdb1a 276 uint16_t conn_handle;
Andrea Palmieri 229:9981f62cdb1a 277 uint16_t attr_handle;
Andrea Palmieri 229:9981f62cdb1a 278 uint8_t data_length;
Andrea Palmieri 229:9981f62cdb1a 279 uint8_t *att_data;
Andrea Palmieri 229:9981f62cdb1a 280 uint8_t offset;
Andrea Palmieri 229:9981f62cdb1a 281
Andrea Palmieri 229:9981f62cdb1a 282 if (bnrg_expansion_board == IDB05A1) {
Andrea Palmieri 229:9981f62cdb1a 283 evt_gatt_attr_modified_IDB05A1 *evt = (evt_gatt_attr_modified_IDB05A1*)blue_evt->data;
Andrea Palmieri 229:9981f62cdb1a 284 conn_handle = evt->conn_handle;
Andrea Palmieri 229:9981f62cdb1a 285 attr_handle = evt->attr_handle;
Andrea Palmieri 229:9981f62cdb1a 286 data_length = evt->data_length;
Andrea Palmieri 229:9981f62cdb1a 287 att_data = evt->att_data;
Andrea Palmieri 229:9981f62cdb1a 288 offset = evt->offset;
Andrea Palmieri 229:9981f62cdb1a 289 } else {
Andrea Palmieri 229:9981f62cdb1a 290 evt_gatt_attr_modified_IDB04A1 *evt = (evt_gatt_attr_modified_IDB04A1*)blue_evt->data;
Andrea Palmieri 229:9981f62cdb1a 291 conn_handle = evt->conn_handle;
Andrea Palmieri 229:9981f62cdb1a 292 attr_handle = evt->attr_handle;
Andrea Palmieri 229:9981f62cdb1a 293 data_length = evt->data_length;
Andrea Palmieri 229:9981f62cdb1a 294 att_data = evt->att_data;
Andrea Palmieri 229:9981f62cdb1a 295 offset = 0;
Andrea Palmieri 229:9981f62cdb1a 296 }
Andrea Palmieri 229:9981f62cdb1a 297
Wolfgang Betz 132:51056160fa4a 298 //Extract the GattCharacteristic from p_characteristics[] and find the properties mask
Wolfgang Betz 132:51056160fa4a 299 GattCharacteristic *p_char = BlueNRGGattServer::getInstance().getCharacteristicFromHandle(attr_handle);
Wolfgang Betz 132:51056160fa4a 300 if(p_char!=NULL) {
Andrea Palmieri 229:9981f62cdb1a 301 GattAttribute::Handle_t charHandle = p_char->getValueAttribute().getHandle()-BlueNRGGattServer::CHAR_VALUE_HANDLE;
Wolfgang Betz 132:51056160fa4a 302 BlueNRGGattServer::HandleEnum_t currentHandle = BlueNRGGattServer::CHAR_HANDLE;
Wolfgang Betz 132:51056160fa4a 303 PRINTF("CharHandle %d, length: %d, Data: %d\n\r", charHandle, data_length, (uint16_t)att_data[0]);
Wolfgang Betz 132:51056160fa4a 304 PRINTF("getProperties 0x%x\n\r",p_char->getProperties());
Andrea Palmieri 229:9981f62cdb1a 305
Andrea Palmieri 229:9981f62cdb1a 306 if(attr_handle == charHandle+BlueNRGGattServer::CHAR_VALUE_HANDLE) {
Wolfgang Betz 132:51056160fa4a 307 currentHandle = BlueNRGGattServer::CHAR_VALUE_HANDLE;
Wolfgang Betz 132:51056160fa4a 308 }
Wolfgang Betz 132:51056160fa4a 309
Andrea Palmieri 229:9981f62cdb1a 310 if(attr_handle == charHandle+BlueNRGGattServer::CHAR_DESC_HANDLE) {
Wolfgang Betz 132:51056160fa4a 311 currentHandle = BlueNRGGattServer::CHAR_DESC_HANDLE;
Wolfgang Betz 132:51056160fa4a 312 }
Wolfgang Betz 132:51056160fa4a 313 PRINTF("currentHandle %d\n\r", currentHandle);
Vincent Coubard 256:146bb175ce80 314 if((p_char->getProperties() &
Wolfgang Betz 132:51056160fa4a 315 (GattCharacteristic::BLE_GATT_CHAR_PROPERTIES_NOTIFY | GattCharacteristic::BLE_GATT_CHAR_PROPERTIES_INDICATE)) &&
Wolfgang Betz 132:51056160fa4a 316 currentHandle == BlueNRGGattServer::CHAR_DESC_HANDLE) {
Wolfgang Betz 132:51056160fa4a 317
Andrea Palmieri 229:9981f62cdb1a 318 GattAttribute::Handle_t charDescHandle = p_char->getValueAttribute().getHandle()+1;
Andrea Palmieri 229:9981f62cdb1a 319
Wolfgang Betz 132:51056160fa4a 320 PRINTF("*****NOTIFICATION CASE\n\r");
Wolfgang Betz 132:51056160fa4a 321 //Now Check if data written in Enable or Disable
Wolfgang Betz 132:51056160fa4a 322 if((uint16_t)att_data[0]==1) {
Vincent Coubard 256:146bb175ce80 323 //PRINTF("Notify ENABLED\n\r");
Andrea Palmieri 229:9981f62cdb1a 324 BlueNRGGattServer::getInstance().HCIEvent(GattServerEvents::GATT_EVENT_UPDATES_ENABLED, charDescHandle);
Wolfgang Betz 132:51056160fa4a 325 } else {
Vincent Coubard 256:146bb175ce80 326 //PRINTF("Notify DISABLED\n\r");
Andrea Palmieri 229:9981f62cdb1a 327 BlueNRGGattServer::getInstance().HCIEvent(GattServerEvents::GATT_EVENT_UPDATES_DISABLED, charDescHandle);
Wolfgang Betz 132:51056160fa4a 328 }
Vincent Coubard 263:8516afb5e29c 329 return;
Wolfgang Betz 132:51056160fa4a 330 }
Vincent Coubard 256:146bb175ce80 331
Andrea Palmieri 229:9981f62cdb1a 332 //Check if attr handle property is WRITEABLE, in the case generate GATT_EVENT_DATA_WRITTEN Event
Wolfgang Betz 132:51056160fa4a 333 if((p_char->getProperties() &
Wolfgang Betz 132:51056160fa4a 334 (GattCharacteristic::BLE_GATT_CHAR_PROPERTIES_WRITE_WITHOUT_RESPONSE | GattCharacteristic::BLE_GATT_CHAR_PROPERTIES_WRITE)) &&
Wolfgang Betz 132:51056160fa4a 335 currentHandle == BlueNRGGattServer::CHAR_VALUE_HANDLE) {
Vincent Coubard 256:146bb175ce80 336
Wolfgang Betz 132:51056160fa4a 337 PRINTF("*****WRITE CASE\n\r");
Vincent Coubard 256:146bb175ce80 338
Wolfgang Betz 132:51056160fa4a 339 GattWriteCallbackParams writeParams;
Andrea Palmieri 229:9981f62cdb1a 340 writeParams.connHandle = conn_handle;
Wolfgang Betz 132:51056160fa4a 341 writeParams.handle = p_char->getValueAttribute().getHandle();
Wolfgang Betz 132:51056160fa4a 342 writeParams.writeOp = GattWriteCallbackParams::OP_WRITE_REQ;//Where to find this property in BLUENRG?
Wolfgang Betz 132:51056160fa4a 343 writeParams.len = data_length;
Andrea Palmieri 229:9981f62cdb1a 344 writeParams.data = att_data;
Andrea Palmieri 229:9981f62cdb1a 345 writeParams.offset = offset;
Andrea Palmieri 229:9981f62cdb1a 346
Andrea Palmieri 229:9981f62cdb1a 347 //BlueNRGGattServer::getInstance().handleEvent(GattServerEvents::GATT_EVENT_DATA_WRITTEN, attr_handle);
Wolfgang Betz 132:51056160fa4a 348 //Write the actual Data to the Attr Handle? (uint8_1[])att_data contains the data
Andrea Palmieri 202:caf4864292c1 349 if ((p_char->getValueAttribute().getValuePtr() != NULL) && (p_char->getValueAttribute().getLength() > 0)) {
Vincent Coubard 267:cd7870e466b3 350 BlueNRGGattServer::getInstance().write(
Vincent Coubard 267:cd7870e466b3 351 p_char->getValueAttribute().getHandle(),
Vincent Coubard 267:cd7870e466b3 352 (uint8_t*)att_data,
Vincent Coubard 267:cd7870e466b3 353 data_length,
Vincent Coubard 267:cd7870e466b3 354 false
Vincent Coubard 267:cd7870e466b3 355 );
Vincent Coubard 267:cd7870e466b3 356 }
Vincent Coubard 263:8516afb5e29c 357
Vincent Coubard 263:8516afb5e29c 358 BlueNRGGattServer::getInstance().HCIDataWrittenEvent(&writeParams);
Vincent Coubard 263:8516afb5e29c 359 } else {
Vincent Coubard 263:8516afb5e29c 360 PRINTF("*****WRITE DESCRIPTOR CASE\n\r");
Vincent Coubard 263:8516afb5e29c 361
Vincent Coubard 263:8516afb5e29c 362 GattWriteCallbackParams writeParams;
Vincent Coubard 263:8516afb5e29c 363 writeParams.connHandle = conn_handle;
Vincent Coubard 263:8516afb5e29c 364 writeParams.handle = attr_handle;
Vincent Coubard 263:8516afb5e29c 365 writeParams.writeOp = GattWriteCallbackParams::OP_WRITE_REQ;//Where to find this property in BLUENRG?
Vincent Coubard 263:8516afb5e29c 366 writeParams.len = data_length;
Vincent Coubard 263:8516afb5e29c 367 writeParams.data = att_data;
Vincent Coubard 263:8516afb5e29c 368 writeParams.offset = offset;
Vincent Coubard 263:8516afb5e29c 369
Vincent Coubard 263:8516afb5e29c 370 BlueNRGGattServer::getInstance().HCIDataWrittenEvent(&writeParams);
Vincent Coubard 256:146bb175ce80 371 }
Wolfgang Betz 132:51056160fa4a 372 }
Wolfgang Betz 132:51056160fa4a 373
Wolfgang Betz 132:51056160fa4a 374 }
Wolfgang Betz 132:51056160fa4a 375
Wolfgang Betz 132:51056160fa4a 376 #ifdef __cplusplus
Wolfgang Betz 132:51056160fa4a 377 extern "C" {
Wolfgang Betz 132:51056160fa4a 378 #endif
Wolfgang Betz 132:51056160fa4a 379
Wolfgang Betz 132:51056160fa4a 380 /**************************************************************************/
Wolfgang Betz 132:51056160fa4a 381 /*!
Wolfgang Betz 132:51056160fa4a 382 @brief Handle HCI Stack Event
Wolfgang Betz 132:51056160fa4a 383
Wolfgang Betz 132:51056160fa4a 384 @param[in] pckt
Wolfgang Betz 132:51056160fa4a 385 Event Packet sent by the stack to be decoded
Vincent Coubard 256:146bb175ce80 386
Wolfgang Betz 132:51056160fa4a 387 @returns
Wolfgang Betz 132:51056160fa4a 388 */
Wolfgang Betz 132:51056160fa4a 389 /**************************************************************************/
Wolfgang Betz 132:51056160fa4a 390 extern void HCI_Event_CB(void *pckt) {
Wolfgang Betz 132:51056160fa4a 391 hci_uart_pckt *hci_pckt = (hci_uart_pckt*)pckt;
Wolfgang Betz 132:51056160fa4a 392 hci_event_pckt *event_pckt = (hci_event_pckt*)hci_pckt->data;
Vincent Coubard 256:146bb175ce80 393
Wolfgang Betz 132:51056160fa4a 394 if(hci_pckt->type != HCI_EVENT_PKT)
Andrea Palmieri 221:7896e6d8b652 395 return;
Wolfgang Betz 132:51056160fa4a 396
Wolfgang Betz 132:51056160fa4a 397 switch(event_pckt->evt){
Vincent Coubard 256:146bb175ce80 398
Wolfgang Betz 132:51056160fa4a 399 case EVT_DISCONN_COMPLETE:
Wolfgang Betz 132:51056160fa4a 400 {
Wolfgang Betz 132:51056160fa4a 401 PRINTF("EVT_DISCONN_COMPLETE\n");
Vincent Coubard 256:146bb175ce80 402
Andrea Palmieri 221:7896e6d8b652 403 evt_disconn_complete *evt = (evt_disconn_complete*)event_pckt->data;
Vincent Coubard 256:146bb175ce80 404
Andrea Palmieri 221:7896e6d8b652 405 BlueNRGGap::getInstance().processDisconnectionEvent(evt->handle, (Gap::DisconnectionReason_t)evt->reason);
Wolfgang Betz 132:51056160fa4a 406 }
Wolfgang Betz 132:51056160fa4a 407 break;
Vincent Coubard 256:146bb175ce80 408
Wolfgang Betz 132:51056160fa4a 409 case EVT_LE_META_EVENT:
Wolfgang Betz 132:51056160fa4a 410 {
Wolfgang Betz 132:51056160fa4a 411 PRINTF("EVT_LE_META_EVENT\n");
Vincent Coubard 256:146bb175ce80 412
Wolfgang Betz 132:51056160fa4a 413 evt_le_meta_event *evt = (evt_le_meta_event *)event_pckt->data;
Vincent Coubard 256:146bb175ce80 414
Wolfgang Betz 132:51056160fa4a 415 switch(evt->subevent){
Andrea Palmieri 229:9981f62cdb1a 416
Wolfgang Betz 132:51056160fa4a 417 case EVT_LE_CONN_COMPLETE:
Vincent Coubard 256:146bb175ce80 418 {
Wolfgang Betz 132:51056160fa4a 419 PRINTF("EVT_LE_CONN_COMPLETE\n");
Andrea Palmieri 221:7896e6d8b652 420 Gap::Address_t ownAddr;
Andrea Palmieri 221:7896e6d8b652 421 Gap::AddressType_t ownAddrType;
Andrea Palmieri 221:7896e6d8b652 422 BlueNRGGap::getInstance().getAddress(&ownAddrType, ownAddr);
Andrea Palmieri 221:7896e6d8b652 423
Andrea Palmieri 227:624ae7aa567d 424 Gap::AddressType_t peerAddrType = BLEProtocol::AddressType::RANDOM_STATIC;
Wolfgang Betz 132:51056160fa4a 425 Gap::Role_t role;
Vincent Coubard 256:146bb175ce80 426
Wolfgang Betz 132:51056160fa4a 427 evt_le_connection_complete *cc = (evt_le_connection_complete *)evt->data;
Vincent Coubard 256:146bb175ce80 428
Wolfgang Betz 132:51056160fa4a 429 BlueNRGGap::getInstance().setConnectionHandle(cc->handle);
Vincent Coubard 256:146bb175ce80 430 BlueNRGGap::ConnectionParams_t connectionParams = {
Vincent Coubard 256:146bb175ce80 431 /* minConnectionInterval = */ cc->interval,
Vincent Coubard 272:4639da7705e1 432 /* maxConnectionInterval = */ cc->interval,
Vincent Coubard 256:146bb175ce80 433 /* slaveLatency = */ cc->latency,
Vincent Coubard 256:146bb175ce80 434 /* connectionSupervisionTimeout = */ cc->supervision_timeout
Vincent Coubard 256:146bb175ce80 435 };
Vincent Coubard 256:146bb175ce80 436
Vincent Coubard 256:146bb175ce80 437 BlueNRGGap::getInstance().setConnectionInterval(cc->interval);
Vincent Coubard 256:146bb175ce80 438
Wolfgang Betz 132:51056160fa4a 439 switch (cc->peer_bdaddr_type) {
Wolfgang Betz 132:51056160fa4a 440 case PUBLIC_ADDR:
Andrea Palmieri 210:08c4c85ca679 441 peerAddrType = BLEProtocol::AddressType::PUBLIC;
Wolfgang Betz 132:51056160fa4a 442 break;
Wolfgang Betz 132:51056160fa4a 443 case STATIC_RANDOM_ADDR:
Andrea Palmieri 210:08c4c85ca679 444 peerAddrType = BLEProtocol::AddressType::RANDOM_STATIC;
Wolfgang Betz 132:51056160fa4a 445 break;
Wolfgang Betz 132:51056160fa4a 446 case RESOLVABLE_PRIVATE_ADDR:
Andrea Palmieri 210:08c4c85ca679 447 peerAddrType = BLEProtocol::AddressType::RANDOM_PRIVATE_RESOLVABLE;
Wolfgang Betz 132:51056160fa4a 448 break;
Wolfgang Betz 132:51056160fa4a 449 case NON_RESOLVABLE_PRIVATE_ADDR:
Andrea Palmieri 210:08c4c85ca679 450 peerAddrType = BLEProtocol::AddressType::RANDOM_PRIVATE_NON_RESOLVABLE;
Wolfgang Betz 132:51056160fa4a 451 break;
Vincent Coubard 256:146bb175ce80 452 }
Wolfgang Betz 132:51056160fa4a 453 //PRINTF("EVT_LE_CONN_COMPLETE LL role=%d\n", cc->role);
Wolfgang Betz 132:51056160fa4a 454 switch (cc->role) {
Wolfgang Betz 133:1bb8df697f7f 455 case 0: //master
Wolfgang Betz 132:51056160fa4a 456 role = Gap::CENTRAL;
Wolfgang Betz 132:51056160fa4a 457 break;
Wolfgang Betz 133:1bb8df697f7f 458 case 1:
Wolfgang Betz 132:51056160fa4a 459 role = Gap::PERIPHERAL;
Wolfgang Betz 132:51056160fa4a 460 break;
Wolfgang Betz 133:1bb8df697f7f 461 default:
Wolfgang Betz 139:3a75965fd389 462 role = Gap::PERIPHERAL;
Wolfgang Betz 133:1bb8df697f7f 463 break;
Wolfgang Betz 132:51056160fa4a 464 }
Vincent Coubard 272:4639da7705e1 465
Vincent Coubard 272:4639da7705e1 466 BlueNRGGap::getInstance().setGapRole(role);
Vincent Coubard 272:4639da7705e1 467
Andrea Palmieri 221:7896e6d8b652 468 BlueNRGGap::getInstance().processConnectionEvent(cc->handle,
Andrea Palmieri 221:7896e6d8b652 469 role,
Andrea Palmieri 221:7896e6d8b652 470 peerAddrType,
Andrea Palmieri 221:7896e6d8b652 471 cc->peer_bdaddr,
Andrea Palmieri 221:7896e6d8b652 472 ownAddrType,
Andrea Palmieri 221:7896e6d8b652 473 ownAddr,
Andrea Palmieri 221:7896e6d8b652 474 &connectionParams);
Wolfgang Betz 132:51056160fa4a 475 }
Wolfgang Betz 132:51056160fa4a 476 break;
Vincent Coubard 256:146bb175ce80 477
Wolfgang Betz 132:51056160fa4a 478 case EVT_LE_ADVERTISING_REPORT:
Wolfgang Betz 132:51056160fa4a 479 PRINTF("EVT_LE_ADVERTISING_REPORT\n\r");
Wolfgang Betz 132:51056160fa4a 480 /* FIXME: comment this otherwise it will be obscure and error prone if BlueNRG FW will be updated */
Wolfgang Betz 132:51056160fa4a 481 // This event is generated only by X-NUCLEO-IDB05A1 version but not by X-NUCLEO-IDB04A1 (which generates DEVICE_FOUND EVT)
Wolfgang Betz 132:51056160fa4a 482 // Formally the structure related to both events are identical except that for the ADV REPORT
Wolfgang Betz 132:51056160fa4a 483 // there is one more field (number of reports) which is not forwarded to upper layer.
Vincent Coubard 256:146bb175ce80 484 // Thus we need to move one byte over (((uint8_t*)evt->data)+1) before persing the ADV REPORT.
Wolfgang Betz 132:51056160fa4a 485 le_advertising_info *pr = (le_advertising_info*) (((uint8_t*)evt->data)+1);
Wolfgang Betz 132:51056160fa4a 486 PRINTF("EVT_LE_ADVERTISING_REPORT evt_type=%d\n\r", pr->evt_type);
Vincent Coubard 256:146bb175ce80 487
Wolfgang Betz 132:51056160fa4a 488 BlueNRGGap::getInstance().Discovery_CB(BlueNRGGap::DEVICE_FOUND,
Wolfgang Betz 132:51056160fa4a 489 pr->evt_type,
Andrea Palmieri 229:9981f62cdb1a 490 pr->bdaddr_type,
Wolfgang Betz 132:51056160fa4a 491 pr->bdaddr,
Wolfgang Betz 132:51056160fa4a 492 &pr->data_length,
Wolfgang Betz 132:51056160fa4a 493 &pr->data_RSSI[0],
Wolfgang Betz 132:51056160fa4a 494 &pr->data_RSSI[pr->data_length]);
Wolfgang Betz 132:51056160fa4a 495 break;
Wolfgang Betz 132:51056160fa4a 496 }
Wolfgang Betz 132:51056160fa4a 497 }
Wolfgang Betz 132:51056160fa4a 498 break;
Vincent Coubard 256:146bb175ce80 499
Wolfgang Betz 132:51056160fa4a 500 case EVT_VENDOR:
Vincent Coubard 256:146bb175ce80 501 {
Wolfgang Betz 132:51056160fa4a 502 evt_blue_aci *blue_evt = (evt_blue_aci*)event_pckt->data;
Wolfgang Betz 132:51056160fa4a 503 //PRINTF("EVT_VENDOR %d\n", blue_evt->ecode);
Vincent Coubard 256:146bb175ce80 504
Wolfgang Betz 132:51056160fa4a 505 switch(blue_evt->ecode){
Vincent Coubard 256:146bb175ce80 506
Vincent Coubard 267:cd7870e466b3 507 case EVT_BLUE_GATT_WRITE_PERMIT_REQ:
Vincent Coubard 267:cd7870e466b3 508 {
Vincent Coubard 267:cd7870e466b3 509 PRINTF("EVT_BLUE_GATT_WRITE_PERMIT_REQ\r\n");
Vincent Coubard 267:cd7870e466b3 510 evt_gatt_write_permit_req* write_req = (evt_gatt_write_permit_req*)blue_evt->data;
Vincent Coubard 267:cd7870e466b3 511
Vincent Coubard 267:cd7870e466b3 512 // ask the local server if the write operation is authorized
Vincent Coubard 267:cd7870e466b3 513 uint8_t err_code = BlueNRGGattServer::getInstance().Write_Request_CB(
Vincent Coubard 267:cd7870e466b3 514 write_req->conn_handle,
Vincent Coubard 267:cd7870e466b3 515 write_req->attr_handle,
Vincent Coubard 267:cd7870e466b3 516 write_req->data_length,
Vincent Coubard 267:cd7870e466b3 517 write_req->data
Vincent Coubard 267:cd7870e466b3 518 );
Vincent Coubard 267:cd7870e466b3 519 uint8_t write_status = err_code == 0 ? 0 : 1;
Vincent Coubard 267:cd7870e466b3 520
Vincent Coubard 267:cd7870e466b3 521 // reply to the shield
Vincent Coubard 269:cd037b36a62b 522 aci_gatt_write_response(
Vincent Coubard 267:cd7870e466b3 523 write_req->conn_handle,
Vincent Coubard 267:cd7870e466b3 524 write_req->attr_handle,
Vincent Coubard 267:cd7870e466b3 525 write_status,
Vincent Coubard 267:cd7870e466b3 526 err_code,
Vincent Coubard 267:cd7870e466b3 527 write_req->data_length,
Vincent Coubard 267:cd7870e466b3 528 write_req->data
Vincent Coubard 267:cd7870e466b3 529 );
Vincent Coubard 267:cd7870e466b3 530 }
Vincent Coubard 267:cd7870e466b3 531 break;
Vincent Coubard 257:90b0bb40fb45 532
Wolfgang Betz 132:51056160fa4a 533 case EVT_BLUE_GATT_READ_PERMIT_REQ:
Wolfgang Betz 132:51056160fa4a 534 {
Wolfgang Betz 132:51056160fa4a 535 PRINTF("EVT_BLUE_GATT_READ_PERMIT_REQ_OK\n\r");
Wolfgang Betz 132:51056160fa4a 536 evt_gatt_read_permit_req *pr = (evt_gatt_read_permit_req*)blue_evt->data;
Andrea Palmieri 229:9981f62cdb1a 537 PRINTF("EVT_BLUE_GATT_READ_PERMIT_REQ_OK pr->attr_handle=%u\n\r", pr->attr_handle);
Andrea Palmieri 229:9981f62cdb1a 538 BlueNRGGattServer::getInstance().Read_Request_CB(pr->attr_handle);
Wolfgang Betz 132:51056160fa4a 539 }
Wolfgang Betz 132:51056160fa4a 540 break;
Vincent Coubard 256:146bb175ce80 541
Vincent Coubard 256:146bb175ce80 542 case EVT_BLUE_GATT_ATTRIBUTE_MODIFIED:
Wolfgang Betz 132:51056160fa4a 543 {
Wolfgang Betz 132:51056160fa4a 544 PRINTF("EVT_BLUE_GATT_ATTRIBUTE_MODIFIED\n\r");
Wolfgang Betz 132:51056160fa4a 545 /* this callback is invoked when a GATT attribute is modified
Wolfgang Betz 132:51056160fa4a 546 extract callback data and pass to suitable handler function */
Andrea Palmieri 229:9981f62cdb1a 547 Attribute_Modified_CB(blue_evt);
Wolfgang Betz 132:51056160fa4a 548 }
Vincent Coubard 256:146bb175ce80 549 break;
Vincent Coubard 256:146bb175ce80 550
Wolfgang Betz 132:51056160fa4a 551 //Any cases for Data Sent Notifications?
Wolfgang Betz 132:51056160fa4a 552 case EVT_BLUE_GATT_NOTIFICATION:
Wolfgang Betz 132:51056160fa4a 553 //This is only relevant for Client Side Event
Wolfgang Betz 132:51056160fa4a 554 PRINTF("EVT_BLUE_GATT_NOTIFICATION");
Wolfgang Betz 132:51056160fa4a 555 break;
Wolfgang Betz 132:51056160fa4a 556 case EVT_BLUE_GATT_INDICATION:
Wolfgang Betz 132:51056160fa4a 557 //This is only relevant for Client Side Event
Wolfgang Betz 132:51056160fa4a 558 PRINTF("EVT_BLUE_GATT_INDICATION");
Vincent Coubard 256:146bb175ce80 559 break;
Vincent Coubard 256:146bb175ce80 560
Wolfgang Betz 132:51056160fa4a 561 case EVT_BLUE_ATT_READ_BY_GROUP_TYPE_RESP:
Wolfgang Betz 132:51056160fa4a 562 {
Wolfgang Betz 132:51056160fa4a 563 PRINTF("EVT_BLUE_ATT_READ_BY_GROUP_TYPE_RESP\n\r");
Wolfgang Betz 132:51056160fa4a 564 evt_att_read_by_group_resp *pr = (evt_att_read_by_group_resp*)blue_evt->data;
Wolfgang Betz 132:51056160fa4a 565 BlueNRGGattClient::getInstance().primaryServicesCB(pr->conn_handle,
Wolfgang Betz 132:51056160fa4a 566 pr->event_data_length,
Wolfgang Betz 132:51056160fa4a 567 pr->attribute_data_length,
Wolfgang Betz 132:51056160fa4a 568 pr->attribute_data_list);
Wolfgang Betz 132:51056160fa4a 569 }
Wolfgang Betz 132:51056160fa4a 570 break;
Wolfgang Betz 132:51056160fa4a 571 case EVT_BLUE_ATT_READ_BY_TYPE_RESP:
Wolfgang Betz 132:51056160fa4a 572 {
Wolfgang Betz 132:51056160fa4a 573 PRINTF("EVT_BLUE_ATT_READ_BY_TYPE_RESP\n\r");
Wolfgang Betz 132:51056160fa4a 574 evt_att_read_by_type_resp *pr = (evt_att_read_by_type_resp*)blue_evt->data;
Wolfgang Betz 132:51056160fa4a 575 BlueNRGGattClient::getInstance().serviceCharsCB(pr->conn_handle,
Wolfgang Betz 132:51056160fa4a 576 pr->event_data_length,
Wolfgang Betz 132:51056160fa4a 577 pr->handle_value_pair_length,
Wolfgang Betz 132:51056160fa4a 578 pr->handle_value_pair);
Wolfgang Betz 132:51056160fa4a 579 }
Wolfgang Betz 132:51056160fa4a 580 break;
Wolfgang Betz 132:51056160fa4a 581 case EVT_BLUE_ATT_READ_RESP:
Wolfgang Betz 132:51056160fa4a 582 {
Wolfgang Betz 132:51056160fa4a 583 PRINTF("EVT_BLUE_ATT_READ_RESP\n\r");
Wolfgang Betz 132:51056160fa4a 584 evt_att_read_resp *pr = (evt_att_read_resp*)blue_evt->data;
Wolfgang Betz 132:51056160fa4a 585 BlueNRGGattClient::getInstance().charReadCB(pr->conn_handle,
Wolfgang Betz 132:51056160fa4a 586 pr->event_data_length,
Wolfgang Betz 132:51056160fa4a 587 pr->attribute_value);
Wolfgang Betz 132:51056160fa4a 588 }
Wolfgang Betz 132:51056160fa4a 589 break;
Wolfgang Betz 132:51056160fa4a 590 case EVT_BLUE_ATT_EXEC_WRITE_RESP:
Wolfgang Betz 132:51056160fa4a 591 {
Wolfgang Betz 132:51056160fa4a 592 PRINTF("EVT_BLUE_ATT_EXEC_WRITE_RESP\n\r");
Wolfgang Betz 132:51056160fa4a 593 evt_att_prepare_write_resp *pr = (evt_att_prepare_write_resp*)blue_evt->data;
Wolfgang Betz 132:51056160fa4a 594 BlueNRGGattClient::getInstance().charWriteExecCB(pr->conn_handle,
Wolfgang Betz 132:51056160fa4a 595 pr->event_data_length);
Wolfgang Betz 132:51056160fa4a 596 }
Wolfgang Betz 132:51056160fa4a 597 break;
Wolfgang Betz 132:51056160fa4a 598 case EVT_BLUE_ATT_PREPARE_WRITE_RESP:
Wolfgang Betz 132:51056160fa4a 599 {
Wolfgang Betz 132:51056160fa4a 600 PRINTF("EVT_BLUE_ATT_PREPARE_WRITE_RESP\n\r");
Wolfgang Betz 132:51056160fa4a 601 evt_att_prepare_write_resp *pr = (evt_att_prepare_write_resp*)blue_evt->data;
Wolfgang Betz 132:51056160fa4a 602 BlueNRGGattClient::getInstance().charWritePrepareCB(pr->conn_handle,
Wolfgang Betz 132:51056160fa4a 603 pr->event_data_length,
Wolfgang Betz 132:51056160fa4a 604 pr->attribute_handle,
Wolfgang Betz 132:51056160fa4a 605 pr->offset,
Wolfgang Betz 132:51056160fa4a 606 pr->part_attr_value);
Wolfgang Betz 132:51056160fa4a 607 }
Wolfgang Betz 132:51056160fa4a 608 break;
Wolfgang Betz 132:51056160fa4a 609 case EVT_BLUE_GATT_DISC_READ_CHAR_BY_UUID_RESP:
Wolfgang Betz 132:51056160fa4a 610 {
Wolfgang Betz 132:51056160fa4a 611 PRINTF("EVT_BLUE_GATT_DISC_READ_CHAR_BY_UUID_RESP\n\r");
Wolfgang Betz 132:51056160fa4a 612 evt_gatt_disc_read_char_by_uuid_resp *pr = (evt_gatt_disc_read_char_by_uuid_resp*)blue_evt->data;
Wolfgang Betz 132:51056160fa4a 613 BlueNRGGattClient::getInstance().serviceCharByUUIDCB(pr->conn_handle,
Wolfgang Betz 132:51056160fa4a 614 pr->event_data_length,
Wolfgang Betz 132:51056160fa4a 615 pr->attr_handle,
Wolfgang Betz 132:51056160fa4a 616 pr->attr_value);
Wolfgang Betz 132:51056160fa4a 617 }
Wolfgang Betz 132:51056160fa4a 618 break;
Wolfgang Betz 132:51056160fa4a 619 case EVT_BLUE_ATT_FIND_BY_TYPE_VAL_RESP:
Wolfgang Betz 132:51056160fa4a 620 {
Wolfgang Betz 132:51056160fa4a 621 PRINTF("EVT_BLUE_ATT_FIND_BY_TYPE_VAL_RESP\n\r");
Wolfgang Betz 132:51056160fa4a 622 evt_att_find_by_type_val_resp *pr = (evt_att_find_by_type_val_resp*)blue_evt->data;
Wolfgang Betz 132:51056160fa4a 623 BlueNRGGattClient::getInstance().primaryServiceCB(pr->conn_handle,
Wolfgang Betz 132:51056160fa4a 624 pr->event_data_length,
Wolfgang Betz 132:51056160fa4a 625 pr->handles_info_list);
Wolfgang Betz 132:51056160fa4a 626 }
Wolfgang Betz 132:51056160fa4a 627 break;
Andrea Palmieri 229:9981f62cdb1a 628 case EVT_BLUE_ATT_FIND_INFORMATION_RESP:
Andrea Palmieri 229:9981f62cdb1a 629 {
Andrea Palmieri 229:9981f62cdb1a 630 PRINTF("EVT_BLUE_ATT_FIND_INFORMATION_RESP\n\r");
Andrea Palmieri 229:9981f62cdb1a 631 evt_att_find_information_resp *pr = (evt_att_find_information_resp*)blue_evt->data;
Andrea Palmieri 229:9981f62cdb1a 632 BlueNRGGattClient::getInstance().discAllCharacDescCB(pr->conn_handle,
Andrea Palmieri 229:9981f62cdb1a 633 pr->event_data_length,
Andrea Palmieri 229:9981f62cdb1a 634 pr->format,
Andrea Palmieri 229:9981f62cdb1a 635 pr->handle_uuid_pair);
Andrea Palmieri 229:9981f62cdb1a 636 }
Andrea Palmieri 229:9981f62cdb1a 637 break;
Andrea Palmieri 229:9981f62cdb1a 638 case EVT_BLUE_GATT_PROCEDURE_COMPLETE:
Wolfgang Betz 132:51056160fa4a 639 {
Wolfgang Betz 132:51056160fa4a 640 evt_gatt_procedure_complete *evt = (evt_gatt_procedure_complete*)blue_evt->data;
Wolfgang Betz 132:51056160fa4a 641 PRINTF("EVT_BLUE_GATT_PROCEDURE_COMPLETE error_code=%d\n\r", evt->error_code);
Wolfgang Betz 132:51056160fa4a 642 BlueNRGGattClient::getInstance().gattProcedureCompleteCB(evt->conn_handle, evt->error_code);
Wolfgang Betz 132:51056160fa4a 643 }
Wolfgang Betz 132:51056160fa4a 644 break;
Vincent Coubard 256:146bb175ce80 645
Vincent Coubard 272:4639da7705e1 646 case EVT_BLUE_L2CAP_CONN_UPD_REQ:
Vincent Coubard 272:4639da7705e1 647 {
Vincent Coubard 272:4639da7705e1 648 PRINTF("EVT_BLUE_L2CAP_CONN_UPD_REQ\r\n");
Vincent Coubard 272:4639da7705e1 649 evt_l2cap_conn_upd_req *evt = (evt_l2cap_conn_upd_req*)blue_evt->data;
Vincent Coubard 272:4639da7705e1 650 if(bnrg_expansion_board == IDB05A1) {
Vincent Coubard 272:4639da7705e1 651 // we assume the application accepts the request from the slave
Vincent Coubard 272:4639da7705e1 652 aci_l2cap_connection_parameter_update_response_IDB05A1(evt->conn_handle,
Vincent Coubard 272:4639da7705e1 653 evt->interval_min,
Vincent Coubard 272:4639da7705e1 654 evt->interval_max,
Vincent Coubard 272:4639da7705e1 655 evt->slave_latency,
Vincent Coubard 272:4639da7705e1 656 evt->timeout_mult,
Vincent Coubard 272:4639da7705e1 657 CONN_L1, CONN_L2,
Vincent Coubard 272:4639da7705e1 658 evt->identifier,
Vincent Coubard 272:4639da7705e1 659 0x0000);
Vincent Coubard 272:4639da7705e1 660 }
Vincent Coubard 272:4639da7705e1 661 }
Vincent Coubard 272:4639da7705e1 662 break;
Vincent Coubard 272:4639da7705e1 663
Vincent Coubard 272:4639da7705e1 664 case EVT_BLUE_L2CAP_CONN_UPD_RESP:
Vincent Coubard 272:4639da7705e1 665 {
Vincent Coubard 272:4639da7705e1 666 PRINTF("EVT_BLUE_L2CAP_CONN_UPD_RESP\r\n");
Vincent Coubard 272:4639da7705e1 667 }
Vincent Coubard 272:4639da7705e1 668 break;
Vincent Coubard 272:4639da7705e1 669
Vincent Coubard 272:4639da7705e1 670 case EVT_LE_CONN_UPDATE_COMPLETE:
Vincent Coubard 272:4639da7705e1 671 {
Vincent Coubard 272:4639da7705e1 672 PRINTF("EVT_LE_CONN_UPDATE_COMPLETE\r\n");
Vincent Coubard 272:4639da7705e1 673 }
Vincent Coubard 272:4639da7705e1 674 break;
Vincent Coubard 272:4639da7705e1 675
Wolfgang Betz 132:51056160fa4a 676 case EVT_BLUE_GAP_DEVICE_FOUND:
Wolfgang Betz 132:51056160fa4a 677 {
Wolfgang Betz 132:51056160fa4a 678 evt_gap_device_found *pr = (evt_gap_device_found*)blue_evt->data;
Wolfgang Betz 132:51056160fa4a 679 PRINTF("EVT_BLUE_GAP_DEVICE_FOUND evt_type=%d\n\r", pr->evt_type);
Vincent Coubard 256:146bb175ce80 680
Wolfgang Betz 132:51056160fa4a 681 BlueNRGGap::getInstance().Discovery_CB(BlueNRGGap::DEVICE_FOUND,
Wolfgang Betz 132:51056160fa4a 682 pr->evt_type,
Andrea Palmieri 229:9981f62cdb1a 683 pr->bdaddr_type,
Wolfgang Betz 132:51056160fa4a 684 pr->bdaddr,
Wolfgang Betz 132:51056160fa4a 685 &pr->data_length,
Wolfgang Betz 132:51056160fa4a 686 &pr->data_RSSI[0],
Wolfgang Betz 132:51056160fa4a 687 &pr->data_RSSI[pr->data_length]);
Wolfgang Betz 132:51056160fa4a 688 }
Wolfgang Betz 132:51056160fa4a 689 break;
Vincent Coubard 256:146bb175ce80 690
Wolfgang Betz 132:51056160fa4a 691 case EVT_BLUE_GAP_PROCEDURE_COMPLETE:
Wolfgang Betz 132:51056160fa4a 692 {
Wolfgang Betz 132:51056160fa4a 693 evt_gap_procedure_complete *pr = (evt_gap_procedure_complete*)blue_evt->data;
Andrea Palmieri 229:9981f62cdb1a 694 //PRINTF("EVT_BLUE_GAP_PROCEDURE_COMPLETE (code=0x%02X)\n\r", pr->procedure_code);
Vincent Coubard 256:146bb175ce80 695
Wolfgang Betz 132:51056160fa4a 696 switch(pr->procedure_code) {
Andrea Palmieri 219:d8e8cd4d4521 697 case GAP_OBSERVATION_PROC_IDB05A1:
Vincent Coubard 256:146bb175ce80 698
Andrea Palmieri 229:9981f62cdb1a 699 BlueNRGGap::getInstance().Discovery_CB(BlueNRGGap::DISCOVERY_COMPLETE, 0, 0, NULL, NULL, NULL, NULL);
Wolfgang Betz 132:51056160fa4a 700 break;
Wolfgang Betz 132:51056160fa4a 701 }
Wolfgang Betz 132:51056160fa4a 702 }
Vincent Coubard 256:146bb175ce80 703 break;
Wolfgang Betz 132:51056160fa4a 704 }
Wolfgang Betz 132:51056160fa4a 705 }
Wolfgang Betz 132:51056160fa4a 706 break;
Vincent Coubard 256:146bb175ce80 707 }
Wolfgang Betz 132:51056160fa4a 708 return ;
Wolfgang Betz 132:51056160fa4a 709 }
Wolfgang Betz 132:51056160fa4a 710
Wolfgang Betz 132:51056160fa4a 711
Wolfgang Betz 132:51056160fa4a 712 #ifdef __cplusplus
Wolfgang Betz 132:51056160fa4a 713 }
Vincent Coubard 256:146bb175ce80 714 #endif