Devchannel Team / X_NUCLEO_IDB0XA1

Dependents:   Hello_BLE F446RE-BLE

Fork of X_NUCLEO_IDB0XA1 by ST

Committer:
mridup
Date:
Wed Aug 27 11:52:07 2014 +0000
Revision:
41:95b8d531628c
Parent:
40:bc6ea0d04238
Child:
45:1fff7d7d5ce7
SetAddress resets and re-inits the device.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
mridup 0:309c845d289d 1 /* mbed Microcontroller Library
mridup 0:309c845d289d 2 * Copyright (c) 2006-2013 ARM Limited
mridup 0:309c845d289d 3 *
mridup 0:309c845d289d 4 * Licensed under the Apache License, Version 2.0 (the "License");
mridup 0:309c845d289d 5 * you may not use this file except in compliance with the License.
mridup 0:309c845d289d 6 * You may obtain a copy of the License at
mridup 0:309c845d289d 7 *
mridup 0:309c845d289d 8 * http://www.apache.org/licenses/LICENSE-2.0
mridup 0:309c845d289d 9 *
mridup 0:309c845d289d 10 * Unless required by applicable law or agreed to in writing, software
mridup 0:309c845d289d 11 * distributed under the License is distributed on an "AS IS" BASIS,
mridup 0:309c845d289d 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
mridup 0:309c845d289d 13 * See the License for the specific language governing permissions and
mridup 0:309c845d289d 14 * limitations under the License.
mridup 0:309c845d289d 15 */
mridup 0:309c845d289d 16
mridup 0:309c845d289d 17
mridup 0:309c845d289d 18 #include "btle.h"
mridup 40:bc6ea0d04238 19 #include "public/Gap.h"
mridup 40:bc6ea0d04238 20 #include "public/GapEvents.h"
mridup 4:fa5b5693c1b5 21 #include "BlueNRGGap.h"
mridup 4:fa5b5693c1b5 22 #include "BlueNRGGattServer.h"
mridup 20:718d56821672 23 #include "Utils.h"
mridup 0:309c845d289d 24
mridup 0:309c845d289d 25 #ifdef __cplusplus
mridup 0:309c845d289d 26 extern "C" {
mridup 0:309c845d289d 27 #endif
mridup 0:309c845d289d 28
mridup 0:309c845d289d 29 /* C File Includes ------------------------------------------------------------------*/
mridup 0:309c845d289d 30 #include "hal_types.h"
mridup 0:309c845d289d 31 #include "hci.h"
mridup 0:309c845d289d 32 #include "bluenrg_hci.h"
mridup 0:309c845d289d 33 #include "gp_timer.h"
mridup 0:309c845d289d 34 #include "hal.h"
mridup 0:309c845d289d 35 #include "osal.h"
mridup 0:309c845d289d 36 #include "hci_internal.h"
mridup 0:309c845d289d 37 #include "bluenrg_hci_internal.h"
mridup 0:309c845d289d 38 #include "gap.h"
mridup 0:309c845d289d 39 #include "sm.h"
mridup 0:309c845d289d 40 #include <stdio.h>
mridup 0:309c845d289d 41 #include <string.h>
mridup 0:309c845d289d 42 #include <stm32l0xx_bluenrg_shield_bsp.h>
mridup 0:309c845d289d 43 #include "role_type.h"
mridup 0:309c845d289d 44 #include "debug.h"
mridup 0:309c845d289d 45
mridup 0:309c845d289d 46 /* SPI handler declaration */
mridup 0:309c845d289d 47 SPI_HandleTypeDef SpiHandle;
mridup 0:309c845d289d 48
mridup 0:309c845d289d 49 #ifdef __cplusplus
mridup 0:309c845d289d 50 }
mridup 0:309c845d289d 51 #endif
mridup 0:309c845d289d 52
mridup 0:309c845d289d 53
mridup 0:309c845d289d 54 static void btle_handler(/*ble_evt_t * p_ble_evt*/);
mridup 0:309c845d289d 55 void HCI_Input(tHciDataPacket * hciReadPacket);
mridup 0:309c845d289d 56
mridup 41:95b8d531628c 57 //#define BDADDR_SIZE 6
mridup 41:95b8d531628c 58 //tHalUint8 bdaddr[BDADDR_SIZE]= {0xaa, 0x00, 0x00, 0xE1, 0x80, 0x02};
mridup 0:309c845d289d 59
hemddabral 14:baa7a1464517 60 uint16_t g_gap_service_handle = 0;
hemddabral 14:baa7a1464517 61 uint16_t g_appearance_char_handle = 0;
hemddabral 14:baa7a1464517 62 uint16_t g_device_name_char_handle = 0;
hemddabral 14:baa7a1464517 63
mridup 0:309c845d289d 64 /* Private variables ---------------------------------------------------------*/
mridup 0:309c845d289d 65 volatile uint8_t set_connectable = 1;
mridup 0:309c845d289d 66
mridup 0:309c845d289d 67 /**************************************************************************/
mridup 0:309c845d289d 68 /*!
mridup 20:718d56821672 69 @brief Initialises BTLE and the underlying HW/Device
mridup 0:309c845d289d 70
mridup 0:309c845d289d 71 @returns
mridup 0:309c845d289d 72 */
mridup 0:309c845d289d 73 /**************************************************************************/
mridup 41:95b8d531628c 74 void btle_init(bool isSetAddress)
mridup 0:309c845d289d 75 {
mridup 41:95b8d531628c 76 DEBUG("btle_init>>");
mridup 41:95b8d531628c 77 const char *name = "STBlueNRG";
mridup 41:95b8d531628c 78 tHalUint8 *bleAddr;
mridup 0:309c845d289d 79 int ret;
mridup 0:309c845d289d 80 uint16_t service_handle, dev_name_char_handle, appearance_char_handle;
mridup 0:309c845d289d 81
mridup 0:309c845d289d 82 HAL_Init();
mridup 0:309c845d289d 83
mridup 0:309c845d289d 84 /* Configure the User Button in GPIO Mode */
mridup 0:309c845d289d 85 BSP_PB_Init(BUTTON_KEY, BUTTON_MODE_GPIO);
mridup 0:309c845d289d 86
mridup 0:309c845d289d 87 /* Configure the system clock */
mridup 0:309c845d289d 88 SystemClock_Config();
mridup 0:309c845d289d 89
mridup 0:309c845d289d 90 /* Delay needed only to be able to acces the JTAG interface after reset
mridup 0:309c845d289d 91 if it will be disabled later. */
mridup 0:309c845d289d 92 Clock_Wait(500);
mridup 0:309c845d289d 93
mridup 0:309c845d289d 94 /* Initialize the BlueNRG SPI driver */
mridup 0:309c845d289d 95 BNRG_SPI_Init();
mridup 0:309c845d289d 96
mridup 0:309c845d289d 97 /* Initialize the BlueNRG HCI */
mridup 0:309c845d289d 98 HCI_Init();
mridup 0:309c845d289d 99
mridup 0:309c845d289d 100 /* Reset BlueNRG SPI interface */
mridup 0:309c845d289d 101 BlueNRG_RST();
mridup 0:309c845d289d 102
mridup 0:309c845d289d 103 /* The Nucleo board must be configured as SERVER */
mridup 41:95b8d531628c 104 //check if issetAddress is set than set address.
mridup 41:95b8d531628c 105 if(isSetAddress)
mridup 41:95b8d531628c 106 {
mridup 41:95b8d531628c 107 bleAddr = BlueNRGGap::getInstance().getAddress();
mridup 41:95b8d531628c 108
mridup 41:95b8d531628c 109 tHalUint8 bdaddr[BDADDR_SIZE];
mridup 41:95b8d531628c 110 Osal_MemCpy(bdaddr, bleAddr, BDADDR_SIZE);
mridup 0:309c845d289d 111
mridup 41:95b8d531628c 112 ret = aci_hal_write_config_data(CONFIG_DATA_PUBADDR_OFFSET,
mridup 41:95b8d531628c 113 CONFIG_DATA_PUBADDR_LEN,
mridup 41:95b8d531628c 114 bdaddr);
mridup 41:95b8d531628c 115 }
mridup 41:95b8d531628c 116
mridup 0:309c845d289d 117 ret = aci_gatt_init();
mridup 2:a2b623661316 118 //GAP is always in PERIPHERAL _ROLE as mbed does not support Master role at the moment
mridup 0:309c845d289d 119 ret = aci_gap_init(GAP_PERIPHERAL_ROLE, &service_handle, &dev_name_char_handle, &appearance_char_handle);
hemddabral 14:baa7a1464517 120
hemddabral 14:baa7a1464517 121 g_gap_service_handle = service_handle;
hemddabral 14:baa7a1464517 122 g_appearance_char_handle = appearance_char_handle;
hemddabral 14:baa7a1464517 123 g_device_name_char_handle = dev_name_char_handle;
mridup 0:309c845d289d 124 ret = aci_gatt_update_char_value(service_handle, dev_name_char_handle, 0,
mridup 0:309c845d289d 125 strlen(name), (tHalUint8 *)name);
mridup 0:309c845d289d 126
mridup 0:309c845d289d 127 return;
mridup 0:309c845d289d 128 }
mridup 0:309c845d289d 129
mridup 0:309c845d289d 130 void User_Process()
mridup 0:309c845d289d 131 {
mridup 0:309c845d289d 132 if(set_connectable){
mridup 0:309c845d289d 133 setConnectable();
mridup 0:309c845d289d 134 set_connectable = FALSE;
mridup 0:309c845d289d 135 }
mridup 0:309c845d289d 136 }
mridup 0:309c845d289d 137
mridup 0:309c845d289d 138 void setConnectable(void)
mridup 0:309c845d289d 139 {
mridup 0:309c845d289d 140 tBleStatus ret;
mridup 0:309c845d289d 141
hemddabral 14:baa7a1464517 142 const char local_name[] = {AD_TYPE_COMPLETE_LOCAL_NAME,'B','l','u','e','N','R','G', '1', '2'};
mridup 0:309c845d289d 143
mridup 0:309c845d289d 144 /* disable scan response */
mridup 0:309c845d289d 145 hci_le_set_scan_resp_data(0,NULL);
mridup 0:309c845d289d 146
mridup 0:309c845d289d 147
mridup 0:309c845d289d 148 ret = aci_gap_set_discoverable(ADV_IND, 0, 0, PUBLIC_ADDR, NO_WHITE_LIST_USE,
mridup 0:309c845d289d 149 8, local_name, 0, NULL, 0, 0);
mridup 0:309c845d289d 150
mridup 0:309c845d289d 151 }
mridup 0:309c845d289d 152
mridup 0:309c845d289d 153 /**************************************************************************/
mridup 0:309c845d289d 154 /*!
mridup 0:309c845d289d 155 @brief
mridup 0:309c845d289d 156
mridup 0:309c845d289d 157 @param[in] p_ble_evt
mridup 0:309c845d289d 158
mridup 0:309c845d289d 159 @returns
mridup 0:309c845d289d 160 */
mridup 0:309c845d289d 161 /**************************************************************************/
mridup 6:08cfc94b5f49 162 static void btle_handler()
mridup 0:309c845d289d 163 {
mridup 0:309c845d289d 164
mridup 0:309c845d289d 165 }
mridup 0:309c845d289d 166
mridup 0:309c845d289d 167
mridup 0:309c845d289d 168 #ifdef __cplusplus
mridup 0:309c845d289d 169 extern "C" {
mridup 0:309c845d289d 170 #endif
mridup 0:309c845d289d 171
mridup 3:9c4c13795643 172 extern void HCI_Event_CB(void *pckt) {
mridup 3:9c4c13795643 173
mridup 3:9c4c13795643 174 hci_uart_pckt *hci_pckt = (hci_uart_pckt*)pckt;
mridup 3:9c4c13795643 175 hci_event_pckt *event_pckt = (hci_event_pckt*)hci_pckt->data;
mridup 0:309c845d289d 176
mridup 3:9c4c13795643 177 if(hci_pckt->type != HCI_EVENT_PKT)
mridup 3:9c4c13795643 178 return;
mridup 3:9c4c13795643 179
mridup 3:9c4c13795643 180 switch(event_pckt->evt){
mridup 3:9c4c13795643 181
mridup 3:9c4c13795643 182 case EVT_DISCONN_COMPLETE:
mridup 3:9c4c13795643 183 {
mridup 31:46dff2d2dd4f 184 evt_disconn_complete *evt = (evt_disconn_complete*)event_pckt;
mridup 31:46dff2d2dd4f 185
mridup 31:46dff2d2dd4f 186 BlueNRGGap::getInstance().processHandleSpecificEvent(GapEvents::GAP_EVENT_DISCONNECTED, evt->handle);
mridup 3:9c4c13795643 187 }
mridup 3:9c4c13795643 188 break;
mridup 3:9c4c13795643 189
mridup 3:9c4c13795643 190 case EVT_LE_META_EVENT:
mridup 3:9c4c13795643 191 {
mridup 3:9c4c13795643 192 evt_le_meta_event *evt = (evt_le_meta_event *)event_pckt->data;
mridup 3:9c4c13795643 193
mridup 3:9c4c13795643 194 switch(evt->subevent){
mridup 3:9c4c13795643 195 case EVT_LE_CONN_COMPLETE:
mridup 4:fa5b5693c1b5 196 {
mridup 4:fa5b5693c1b5 197 evt_le_connection_complete *cc = (evt_le_connection_complete *)evt->data;
mridup 4:fa5b5693c1b5 198
mridup 4:fa5b5693c1b5 199 BlueNRGGap::getInstance().setConnectionHandle(cc->handle);
mridup 31:46dff2d2dd4f 200 BlueNRGGap::getInstance().processHandleSpecificEvent(GapEvents::GAP_EVENT_CONNECTED, cc->handle);
mridup 3:9c4c13795643 201 }
mridup 3:9c4c13795643 202 break;
mridup 3:9c4c13795643 203 }
mridup 3:9c4c13795643 204 }
mridup 3:9c4c13795643 205 break;
mridup 3:9c4c13795643 206
mridup 3:9c4c13795643 207 case EVT_VENDOR:
mridup 3:9c4c13795643 208 {
mridup 3:9c4c13795643 209 evt_blue_aci *blue_evt = (evt_blue_aci*)event_pckt->data;
mridup 3:9c4c13795643 210 switch(blue_evt->ecode){
mridup 3:9c4c13795643 211
mridup 3:9c4c13795643 212 case EVT_BLUE_GATT_READ_PERMIT_REQ:
mridup 3:9c4c13795643 213 {
mridup 27:b4c21a9e8b39 214 DEBUG("EVT_BLUE_GATT_READ_PERMIT_REQ_OK\n\r");
mridup 26:047d45ea379e 215 evt_gatt_read_permit_req *pr = (evt_gatt_read_permit_req*)blue_evt->data;
mridup 26:047d45ea379e 216 BlueNRGGattServer::getInstance().Read_Request_CB(pr->attr_handle);
mridup 3:9c4c13795643 217 }
mridup 3:9c4c13795643 218 break;
mridup 20:718d56821672 219
mridup 20:718d56821672 220 case EVT_BLUE_GATT_ATTRIBUTE_MODIFIED:
mridup 20:718d56821672 221 {
mridup 20:718d56821672 222 /* this callback is invoked when a GATT attribute is modified
mridup 20:718d56821672 223 extract callback data and pass to suitable handler function */
mridup 20:718d56821672 224 evt_gatt_attr_modified *evt = (evt_gatt_attr_modified*)blue_evt->data;
mridup 23:72e56ddfad5b 225 DEBUG("EVT_BLUE_GATT_ATTRIBUTE_MODIFIED\n\r");
mridup 27:b4c21a9e8b39 226 DEBUG("CharHandle 0x%x, length: 0x%x, Data: 0x%x\n\r",evt->attr_handle, evt->data_length, (uint16_t)evt->att_data[0]);
mridup 27:b4c21a9e8b39 227
mridup 27:b4c21a9e8b39 228
mridup 27:b4c21a9e8b39 229 //Extract the GattCharacteristic from p_characteristics[] and find the properties mask
mridup 27:b4c21a9e8b39 230 GattCharacteristic *p_char = BlueNRGGattServer::getInstance().getCharacteristicFromHandle(evt->attr_handle);
mridup 28:edeb91b415c6 231 DEBUG("getProperties 0x%x\n\r",p_char->getProperties());
mridup 27:b4c21a9e8b39 232 if((p_char->getProperties() & (GattCharacteristic::BLE_GATT_CHAR_PROPERTIES_NOTIFY
mridup 27:b4c21a9e8b39 233 | GattCharacteristic::BLE_GATT_CHAR_PROPERTIES_INDICATE))) {
mridup 27:b4c21a9e8b39 234
mridup 27:b4c21a9e8b39 235 //Now Check if data written in Enable or Disable
mridup 30:555e6697b368 236 if((uint16_t)evt->att_data[0]==1) {
mridup 29:1870b03aa25b 237 //DEBUG("Notify ENABLED\n\r");
mridup 27:b4c21a9e8b39 238 BlueNRGGattServer::getInstance().handleEvent(GattServerEvents::GATT_EVENT_UPDATES_ENABLED, evt->attr_handle);
mridup 28:edeb91b415c6 239 }
mridup 30:555e6697b368 240 else {
mridup 29:1870b03aa25b 241 //DEBUG("Notify DISABLED\n\r");
mridup 27:b4c21a9e8b39 242 BlueNRGGattServer::getInstance().handleEvent(GattServerEvents::GATT_EVENT_UPDATES_DISABLED, evt->attr_handle);
mridup 28:edeb91b415c6 243 }
mridup 27:b4c21a9e8b39 244 }
mridup 27:b4c21a9e8b39 245
mridup 28:edeb91b415c6 246 //Check is attr handle property is WRITEABLE, if yes, generate GATT_EVENT_DATA_WRITTEN Event
mridup 28:edeb91b415c6 247 if((p_char->getProperties() &
mridup 28:edeb91b415c6 248 (GattCharacteristic::BLE_GATT_CHAR_PROPERTIES_WRITE_WITHOUT_RESPONSE|
mridup 28:edeb91b415c6 249 GattCharacteristic::BLE_GATT_CHAR_PROPERTIES_WRITE))) {
mridup 28:edeb91b415c6 250
mridup 28:edeb91b415c6 251 BlueNRGGattServer::getInstance().handleEvent(GattServerEvents::GATT_EVENT_DATA_WRITTEN, evt->attr_handle);
mridup 28:edeb91b415c6 252 //Write the actual Data to the Attr Handle? (uint8_1[])evt->att_data contains the data
mridup 28:edeb91b415c6 253 if ((p_char->getValuePtr() != NULL) && (p_char->getInitialLength() > 0)) {
mridup 28:edeb91b415c6 254 BlueNRGGattServer::getInstance().updateValue(p_char->getHandle(), p_char->getValuePtr(), p_char->getInitialLength(), false /* localOnly */);
mridup 28:edeb91b415c6 255 }
mridup 30:555e6697b368 256 }
mridup 20:718d56821672 257 }
mridup 20:718d56821672 258 break;
mridup 20:718d56821672 259
mridup 20:718d56821672 260 //Any cases for Data Sent Notifications?
mridup 20:718d56821672 261 case EVT_BLUE_GATT_NOTIFICATION:
mridup 27:b4c21a9e8b39 262 //This is only relevant for Client Side Event
mridup 20:718d56821672 263 DEBUG("EVT_BLUE_GATT_NOTIFICATION");
mridup 20:718d56821672 264 break;
mridup 20:718d56821672 265 case EVT_BLUE_GATT_INDICATION:
mridup 27:b4c21a9e8b39 266 //This is only relevant for Client Side Event
mridup 20:718d56821672 267 DEBUG("EVT_BLUE_GATT_INDICATION");
mridup 27:b4c21a9e8b39 268 break;
mridup 27:b4c21a9e8b39 269
mridup 27:b4c21a9e8b39 270 case EVT_BLUE_GATT_PROCEDURE_COMPLETE:
mridup 27:b4c21a9e8b39 271 DEBUG("EVT_BLUE_GATT_PROCEDURE_COMPLETE");
mridup 27:b4c21a9e8b39 272 break;
mridup 3:9c4c13795643 273 }
mridup 3:9c4c13795643 274 }
mridup 3:9c4c13795643 275 break;
mridup 3:9c4c13795643 276 }
mridup 0:309c845d289d 277
mridup 0:309c845d289d 278 return ;
mridup 3:9c4c13795643 279 }
mridup 3:9c4c13795643 280
mridup 3:9c4c13795643 281
mridup 0:309c845d289d 282 #ifdef __cplusplus
mridup 0:309c845d289d 283 }
mridup 0:309c845d289d 284 #endif