HW layer for the Nucleo board, it only work with old BLE_API

Dependents:   Hello_BLE F446RE-BLE

Fork of X_NUCLEO_IDB0XA1 by ST

Committer:
leonardoaraujosantos
Date:
Tue Nov 03 23:10:27 2015 +0000
Revision:
129:57997390c086
Parent:
122:e8e7bc2c9e1c
Changing pin D13

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Wolfgang Betz 90:26c0c9807ab4 1 /* mbed Microcontroller Library
Wolfgang Betz 90:26c0c9807ab4 2 * Copyright (c) 2006-2013 ARM Limited
Wolfgang Betz 90:26c0c9807ab4 3 *
Wolfgang Betz 90:26c0c9807ab4 4 * Licensed under the Apache License, Version 2.0 (the "License");
Wolfgang Betz 90:26c0c9807ab4 5 * you may not use this file except in compliance with the License.
Wolfgang Betz 90:26c0c9807ab4 6 * You may obtain a copy of the License at
Wolfgang Betz 90:26c0c9807ab4 7 *
Wolfgang Betz 90:26c0c9807ab4 8 * http://www.apache.org/licenses/LICENSE-2.0
Wolfgang Betz 90:26c0c9807ab4 9 *
Wolfgang Betz 90:26c0c9807ab4 10 * Unless required by applicable law or agreed to in writing, software
Wolfgang Betz 90:26c0c9807ab4 11 * distributed under the License is distributed on an "AS IS" BASIS,
Wolfgang Betz 90:26c0c9807ab4 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
Wolfgang Betz 90:26c0c9807ab4 13 * See the License for the specific language governing permissions and
Wolfgang Betz 90:26c0c9807ab4 14 * limitations under the License.
Wolfgang Betz 90:26c0c9807ab4 15 */
Wolfgang Betz 90:26c0c9807ab4 16
Wolfgang Betz 90:26c0c9807ab4 17
Wolfgang Betz 90:26c0c9807ab4 18 /**
Wolfgang Betz 90:26c0c9807ab4 19 ******************************************************************************
Wolfgang Betz 90:26c0c9807ab4 20 * @file BlueNRGGap.cpp
Wolfgang Betz 90:26c0c9807ab4 21 * @author STMicroelectronics
Wolfgang Betz 90:26c0c9807ab4 22 * @brief Implementation of BLE_API Gap Class
Wolfgang Betz 90:26c0c9807ab4 23 ******************************************************************************
Wolfgang Betz 90:26c0c9807ab4 24 * @copy
Wolfgang Betz 90:26c0c9807ab4 25 *
Wolfgang Betz 90:26c0c9807ab4 26 * THE PRESENT FIRMWARE WHICH IS FOR GUIDANCE ONLY AIMS AT PROVIDING CUSTOMERS
Wolfgang Betz 90:26c0c9807ab4 27 * WITH CODING INFORMATION REGARDING THEIR PRODUCTS IN ORDER FOR THEM TO SAVE
Wolfgang Betz 90:26c0c9807ab4 28 * TIME. AS A RESULT, STMICROELECTRONICS SHALL NOT BE HELD LIABLE FOR ANY
Wolfgang Betz 90:26c0c9807ab4 29 * DIRECT, INDIRECT OR CONSEQUENTIAL DAMAGES WITH RESPECT TO ANY CLAIMS ARISING
Wolfgang Betz 90:26c0c9807ab4 30 * FROM THE CONTENT OF SUCH FIRMWARE AND/OR THE USE MADE BY CUSTOMERS OF THE
Wolfgang Betz 90:26c0c9807ab4 31 * CODING INFORMATION CONTAINED HEREIN IN CONNECTION WITH THEIR PRODUCTS.
Wolfgang Betz 90:26c0c9807ab4 32 *
Wolfgang Betz 90:26c0c9807ab4 33 * <h2><center>&copy; COPYRIGHT 2013 STMicroelectronics</center></h2>
Wolfgang Betz 90:26c0c9807ab4 34 */
Wolfgang Betz 90:26c0c9807ab4 35
Wolfgang Betz 90:26c0c9807ab4 36 // ANDREA: Changed some types (e.g., tHalUint8 --> uint8_t)
Wolfgang Betz 90:26c0c9807ab4 37
Wolfgang Betz 90:26c0c9807ab4 38 /** @defgroup BlueNRGGap
Wolfgang Betz 90:26c0c9807ab4 39 * @brief BlueNRG BLE_API GAP Adaptation
Wolfgang Betz 90:26c0c9807ab4 40 * @{
Wolfgang Betz 90:26c0c9807ab4 41 */
Wolfgang Betz 90:26c0c9807ab4 42
Wolfgang Betz 90:26c0c9807ab4 43 #include "BlueNRGDevice.h"
Wolfgang Betz 90:26c0c9807ab4 44 #include "mbed.h"
Wolfgang Betz 90:26c0c9807ab4 45 #include "Payload.h"
Wolfgang Betz 90:26c0c9807ab4 46 #include "Utils.h"
Wolfgang Betz 90:26c0c9807ab4 47
Wolfgang Betz 90:26c0c9807ab4 48 //Local Variables
Wolfgang Betz 102:a6f233cb1fed 49 //const char *local_name = NULL;
Wolfgang Betz 102:a6f233cb1fed 50 //uint8_t local_name_length = 0;
Wolfgang Betz 90:26c0c9807ab4 51 const uint8_t *scan_response_payload = NULL;
Wolfgang Betz 90:26c0c9807ab4 52 uint8_t scan_rsp_length = 0;
Wolfgang Betz 90:26c0c9807ab4 53
Wolfgang Betz 90:26c0c9807ab4 54 uint32_t advtInterval = BLUENRG_GAP_ADV_INTERVAL_MAX;
Wolfgang Betz 90:26c0c9807ab4 55
Wolfgang Betz 118:a172a5568535 56 /*
Wolfgang Betz 118:a172a5568535 57 * Utility to process GAP specific events (e.g., Advertising timeout)
Wolfgang Betz 118:a172a5568535 58 */
Wolfgang Betz 118:a172a5568535 59 void BlueNRGGap::Process(void)
Wolfgang Betz 118:a172a5568535 60 {
Wolfgang Betz 118:a172a5568535 61 if(AdvToFlag) {
Wolfgang Betz 118:a172a5568535 62 stopAdvertising();
Wolfgang Betz 118:a172a5568535 63 }
Wolfgang Betz 118:a172a5568535 64
Wolfgang Betz 118:a172a5568535 65 }
Wolfgang Betz 118:a172a5568535 66
Wolfgang Betz 90:26c0c9807ab4 67 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 68 /*!
Wolfgang Betz 90:26c0c9807ab4 69 @brief Sets the advertising parameters and payload for the device.
Wolfgang Betz 90:26c0c9807ab4 70 Note: Some data types give error when their adv data is updated using aci_gap_update_adv_data() API
Wolfgang Betz 90:26c0c9807ab4 71
Wolfgang Betz 90:26c0c9807ab4 72 @params[in] advData
Wolfgang Betz 90:26c0c9807ab4 73 The primary advertising data payload
Wolfgang Betz 90:26c0c9807ab4 74 @params[in] scanResponse
Wolfgang Betz 90:26c0c9807ab4 75 The optional Scan Response payload if the advertising
Wolfgang Betz 90:26c0c9807ab4 76 type is set to \ref GapAdvertisingParams::ADV_SCANNABLE_UNDIRECTED
Wolfgang Betz 90:26c0c9807ab4 77 in \ref GapAdveritinngParams
Wolfgang Betz 90:26c0c9807ab4 78
Wolfgang Betz 90:26c0c9807ab4 79 @returns \ref ble_error_t
Wolfgang Betz 90:26c0c9807ab4 80
Wolfgang Betz 90:26c0c9807ab4 81 @retval BLE_ERROR_NONE
Wolfgang Betz 90:26c0c9807ab4 82 Everything executed properly
Wolfgang Betz 90:26c0c9807ab4 83
Wolfgang Betz 90:26c0c9807ab4 84 @retval BLE_ERROR_BUFFER_OVERFLOW
Wolfgang Betz 90:26c0c9807ab4 85 The proposed action would cause a buffer overflow. All
Wolfgang Betz 90:26c0c9807ab4 86 advertising payloads must be <= 31 bytes, for example.
Wolfgang Betz 90:26c0c9807ab4 87
Wolfgang Betz 90:26c0c9807ab4 88 @retval BLE_ERROR_NOT_IMPLEMENTED
Wolfgang Betz 90:26c0c9807ab4 89 A feature was requested that is not yet supported in the
Wolfgang Betz 90:26c0c9807ab4 90 nRF51 firmware or hardware.
Wolfgang Betz 90:26c0c9807ab4 91
Wolfgang Betz 90:26c0c9807ab4 92 @retval BLE_ERROR_PARAM_OUT_OF_RANGE
Wolfgang Betz 90:26c0c9807ab4 93 One of the proposed values is outside the valid range.
Wolfgang Betz 90:26c0c9807ab4 94
Wolfgang Betz 90:26c0c9807ab4 95 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 96
Wolfgang Betz 90:26c0c9807ab4 97 @code
Wolfgang Betz 90:26c0c9807ab4 98
Wolfgang Betz 90:26c0c9807ab4 99 @endcode
Wolfgang Betz 90:26c0c9807ab4 100 */
Wolfgang Betz 90:26c0c9807ab4 101 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 102 ble_error_t BlueNRGGap::setAdvertisingData(const GapAdvertisingData &advData, const GapAdvertisingData &scanResponse)
Wolfgang Betz 90:26c0c9807ab4 103 {
Wolfgang Betz 90:26c0c9807ab4 104 DEBUG("BlueNRGGap::setAdvertisingData\n\r");
Wolfgang Betz 90:26c0c9807ab4 105 /* Make sure we don't exceed the advertising payload length */
Wolfgang Betz 90:26c0c9807ab4 106 if (advData.getPayloadLen() > GAP_ADVERTISING_DATA_MAX_PAYLOAD) {
Wolfgang Betz 90:26c0c9807ab4 107 return BLE_ERROR_BUFFER_OVERFLOW;
Wolfgang Betz 90:26c0c9807ab4 108 }
Wolfgang Betz 90:26c0c9807ab4 109
Wolfgang Betz 90:26c0c9807ab4 110 /* Make sure we have a payload! */
Wolfgang Betz 90:26c0c9807ab4 111 if (advData.getPayloadLen() <= 0) {
Wolfgang Betz 90:26c0c9807ab4 112 return BLE_ERROR_PARAM_OUT_OF_RANGE;
Wolfgang Betz 90:26c0c9807ab4 113 } else {
Wolfgang Betz 90:26c0c9807ab4 114 PayloadPtr loadPtr(advData.getPayload(), advData.getPayloadLen());
Wolfgang Betz 90:26c0c9807ab4 115 for(uint8_t index=0; index<loadPtr.getPayloadUnitCount(); index++) {
Wolfgang Betz 113:31c73e9b0108 116 loadPtr.getUnitAtIndex(index);
Wolfgang Betz 90:26c0c9807ab4 117
Wolfgang Betz 90:26c0c9807ab4 118 DEBUG("adData[%d].length=%d\n\r", index,(uint8_t)(*loadPtr.getUnitAtIndex(index).getLenPtr()));
Wolfgang Betz 90:26c0c9807ab4 119 DEBUG("adData[%d].AdType=0x%x\n\r", index,(uint8_t)(*loadPtr.getUnitAtIndex(index).getAdTypePtr()));
Wolfgang Betz 90:26c0c9807ab4 120
Wolfgang Betz 90:26c0c9807ab4 121 switch(*loadPtr.getUnitAtIndex(index).getAdTypePtr()) {
Wolfgang Betz 90:26c0c9807ab4 122 case GapAdvertisingData::FLAGS: /* ref *Flags */
Wolfgang Betz 90:26c0c9807ab4 123 {
Wolfgang Betz 102:a6f233cb1fed 124 DEBUG("Advertising type: FLAGS\n\r");
Wolfgang Betz 90:26c0c9807ab4 125 //Check if Flags are OK. BlueNRG only supports LE Mode.
Wolfgang Betz 90:26c0c9807ab4 126 uint8_t *flags = loadPtr.getUnitAtIndex(index).getDataPtr();
Wolfgang Betz 90:26c0c9807ab4 127 if((*flags & GapAdvertisingData::BREDR_NOT_SUPPORTED) != GapAdvertisingData::BREDR_NOT_SUPPORTED) {
Wolfgang Betz 90:26c0c9807ab4 128 DEBUG("BlueNRG does not support BR/EDR Mode");
Wolfgang Betz 90:26c0c9807ab4 129 return BLE_ERROR_PARAM_OUT_OF_RANGE;
Wolfgang Betz 90:26c0c9807ab4 130 }
Wolfgang Betz 90:26c0c9807ab4 131
Wolfgang Betz 90:26c0c9807ab4 132 break;
Wolfgang Betz 90:26c0c9807ab4 133 }
Wolfgang Betz 90:26c0c9807ab4 134 case GapAdvertisingData::INCOMPLETE_LIST_16BIT_SERVICE_IDS: /**< Incomplete list of 16-bit Service IDs */
Wolfgang Betz 90:26c0c9807ab4 135 case GapAdvertisingData::COMPLETE_LIST_16BIT_SERVICE_IDS: /**< Complete list of 16-bit Service IDs */
Wolfgang Betz 90:26c0c9807ab4 136 {
Wolfgang Betz 102:a6f233cb1fed 137 DEBUG("Advertising type: INCOMPLETE_LIST_16BIT_SERVICE_IDS/COMPLETE_LIST_16BIT_SERVICE_IDS\n\r");
Wolfgang Betz 102:a6f233cb1fed 138
Wolfgang Betz 102:a6f233cb1fed 139 uint8_t buffSize = *loadPtr.getUnitAtIndex(index).getLenPtr()-1;
Wolfgang Betz 102:a6f233cb1fed 140 // The total lenght should include the Data Type Value
Wolfgang Betz 102:a6f233cb1fed 141 if(buffSize>UUID_BUFFER_SIZE-1) {
Wolfgang Betz 102:a6f233cb1fed 142 return BLE_ERROR_PARAM_OUT_OF_RANGE;
Wolfgang Betz 90:26c0c9807ab4 143 }
Wolfgang Betz 102:a6f233cb1fed 144
Wolfgang Betz 102:a6f233cb1fed 145 servUuidlength = buffSize+1; // +1 to include the Data Type Value
Wolfgang Betz 102:a6f233cb1fed 146 servUuidData[0] = (uint8_t)(*loadPtr.getUnitAtIndex(index).getAdTypePtr()); //Data Type Value
Wolfgang Betz 102:a6f233cb1fed 147
Wolfgang Betz 102:a6f233cb1fed 148 DEBUG("servUuidlength=%d servUuidData[0]=%d buffSize=%d\n\r", servUuidlength, servUuidData[0], buffSize);
Wolfgang Betz 102:a6f233cb1fed 149 // Save the Service UUID list just after the Data Type Value field
Wolfgang Betz 102:a6f233cb1fed 150 memcpy(servUuidData+1, loadPtr.getUnitAtIndex(index).getDataPtr(), buffSize);
Wolfgang Betz 102:a6f233cb1fed 151
Wolfgang Betz 102:a6f233cb1fed 152 for(unsigned i=0; i<servUuidlength; i++) {
Wolfgang Betz 102:a6f233cb1fed 153 DEBUG("servUuidData[%d] = 0x%x\n\r", i, servUuidData[i]);
Wolfgang Betz 102:a6f233cb1fed 154 }
Wolfgang Betz 102:a6f233cb1fed 155
Wolfgang Betz 102:a6f233cb1fed 156 for(unsigned i=0; i<buffSize; i++) {
Wolfgang Betz 102:a6f233cb1fed 157 DEBUG("loadPtr.getUnitAtIndex(index).getDataPtr()[%d] = 0x%x\n\r", i, loadPtr.getUnitAtIndex(index).getDataPtr()[i]);
Wolfgang Betz 102:a6f233cb1fed 158 }
Wolfgang Betz 102:a6f233cb1fed 159
Wolfgang Betz 90:26c0c9807ab4 160 break;
Wolfgang Betz 90:26c0c9807ab4 161 }
Wolfgang Betz 90:26c0c9807ab4 162 case GapAdvertisingData::INCOMPLETE_LIST_32BIT_SERVICE_IDS: /**< Incomplete list of 32-bit Service IDs (not relevant for Bluetooth 4.0) */
Wolfgang Betz 90:26c0c9807ab4 163 {
Wolfgang Betz 102:a6f233cb1fed 164 DEBUG("Advertising type: INCOMPLETE_LIST_32BIT_SERVICE_IDS\n\r");
Wolfgang Betz 102:a6f233cb1fed 165 return BLE_ERROR_NOT_IMPLEMENTED;
Wolfgang Betz 90:26c0c9807ab4 166 }
Wolfgang Betz 90:26c0c9807ab4 167 case GapAdvertisingData::COMPLETE_LIST_32BIT_SERVICE_IDS: /**< Complete list of 32-bit Service IDs (not relevant for Bluetooth 4.0) */
Wolfgang Betz 90:26c0c9807ab4 168 {
Wolfgang Betz 102:a6f233cb1fed 169 DEBUG("Advertising type: COMPLETE_LIST_32BIT_SERVICE_IDS\n\r");
Wolfgang Betz 102:a6f233cb1fed 170 return BLE_ERROR_NOT_IMPLEMENTED;
Wolfgang Betz 90:26c0c9807ab4 171 }
Wolfgang Betz 90:26c0c9807ab4 172 case GapAdvertisingData::INCOMPLETE_LIST_128BIT_SERVICE_IDS: /**< Incomplete list of 128-bit Service IDs */
Wolfgang Betz 90:26c0c9807ab4 173 {
Wolfgang Betz 102:a6f233cb1fed 174 DEBUG("Advertising type: INCOMPLETE_LIST_128BIT_SERVICE_IDS\n\r");
Wolfgang Betz 102:a6f233cb1fed 175 return BLE_ERROR_NOT_IMPLEMENTED;
Wolfgang Betz 90:26c0c9807ab4 176 }
Wolfgang Betz 90:26c0c9807ab4 177 case GapAdvertisingData::COMPLETE_LIST_128BIT_SERVICE_IDS: /**< Complete list of 128-bit Service IDs */
Wolfgang Betz 90:26c0c9807ab4 178 {
Wolfgang Betz 102:a6f233cb1fed 179 DEBUG("Advertising type: COMPLETE_LIST_128BIT_SERVICE_IDS\n\r");
Wolfgang Betz 102:a6f233cb1fed 180 return BLE_ERROR_NOT_IMPLEMENTED;
Wolfgang Betz 90:26c0c9807ab4 181 }
Wolfgang Betz 90:26c0c9807ab4 182 case GapAdvertisingData::SHORTENED_LOCAL_NAME: /**< Shortened Local Name */
Wolfgang Betz 90:26c0c9807ab4 183 {
Wolfgang Betz 90:26c0c9807ab4 184 break;
Wolfgang Betz 90:26c0c9807ab4 185 }
Wolfgang Betz 90:26c0c9807ab4 186 case GapAdvertisingData::COMPLETE_LOCAL_NAME: /**< Complete Local Name */
Wolfgang Betz 90:26c0c9807ab4 187 {
Wolfgang Betz 90:26c0c9807ab4 188 DEBUG("Advertising type: COMPLETE_LOCAL_NAME\n\r");
Wolfgang Betz 90:26c0c9807ab4 189 loadPtr.getUnitAtIndex(index).printDataAsString();
Wolfgang Betz 90:26c0c9807ab4 190 local_name_length = *loadPtr.getUnitAtIndex(index).getLenPtr()-1;
Wolfgang Betz 102:a6f233cb1fed 191 local_name = (uint8_t*)loadPtr.getUnitAtIndex(index).getAdTypePtr();
Wolfgang Betz 102:a6f233cb1fed 192 DEBUG("Advertising type: COMPLETE_LOCAL_NAME local_name=%s\n\r", local_name);
Wolfgang Betz 90:26c0c9807ab4 193 //COMPLETE_LOCAL_NAME is only advertising device name. Gatt Device Name is not the same.(Must be set right after GAP/GATT init?)
Wolfgang Betz 90:26c0c9807ab4 194
Wolfgang Betz 90:26c0c9807ab4 195 DEBUG("device_name length=%d\n\r", local_name_length);
Wolfgang Betz 90:26c0c9807ab4 196 break;
Wolfgang Betz 90:26c0c9807ab4 197 }
Wolfgang Betz 90:26c0c9807ab4 198 case GapAdvertisingData::TX_POWER_LEVEL: /**< TX Power Level (in dBm) */
Wolfgang Betz 90:26c0c9807ab4 199 {
Wolfgang Betz 90:26c0c9807ab4 200 DEBUG("Advertising type: TX_POWER_LEVEL\n\r");
Wolfgang Betz 90:26c0c9807ab4 201 int8_t enHighPower = 0;
Wolfgang Betz 90:26c0c9807ab4 202 int8_t paLevel = 0;
Wolfgang Betz 122:e8e7bc2c9e1c 203 #if NEED_CONSOLE_OUTPUT
Wolfgang Betz 122:e8e7bc2c9e1c 204 int8_t dbm = *loadPtr.getUnitAtIndex(index).getDataPtr();
Wolfgang Betz 90:26c0c9807ab4 205 int8_t dbmActuallySet = getHighPowerAndPALevelValue(dbm, enHighPower, paLevel);
Wolfgang Betz 122:e8e7bc2c9e1c 206 #endif
Wolfgang Betz 90:26c0c9807ab4 207 DEBUG("dbm=%d, dbmActuallySet=%d\n\r", dbm, dbmActuallySet);
Wolfgang Betz 90:26c0c9807ab4 208 DEBUG("enHighPower=%d, paLevel=%d\n\r", enHighPower, paLevel);
Wolfgang Betz 90:26c0c9807ab4 209 aci_hal_set_tx_power_level(enHighPower, paLevel);
Wolfgang Betz 90:26c0c9807ab4 210 break;
Wolfgang Betz 90:26c0c9807ab4 211 }
Wolfgang Betz 90:26c0c9807ab4 212 case GapAdvertisingData::DEVICE_ID: /**< Device ID */
Wolfgang Betz 90:26c0c9807ab4 213 {
Wolfgang Betz 90:26c0c9807ab4 214 break;
Wolfgang Betz 90:26c0c9807ab4 215 }
Wolfgang Betz 90:26c0c9807ab4 216 case GapAdvertisingData::SLAVE_CONNECTION_INTERVAL_RANGE: /**< Slave :Connection Interval Range */
Wolfgang Betz 90:26c0c9807ab4 217 {
Wolfgang Betz 90:26c0c9807ab4 218 break;
Wolfgang Betz 90:26c0c9807ab4 219 }
Wolfgang Betz 90:26c0c9807ab4 220 case GapAdvertisingData::SERVICE_DATA: /**< Service Data */
Wolfgang Betz 90:26c0c9807ab4 221 {
Wolfgang Betz 102:a6f233cb1fed 222 DEBUG("Advertising type: SERVICE_DATA\n\r");
Wolfgang Betz 102:a6f233cb1fed 223 uint8_t buffSize = *loadPtr.getUnitAtIndex(index).getLenPtr()-1;
Wolfgang Betz 102:a6f233cb1fed 224 DEBUG("Advertising type: SERVICE_DATA (buffSize=%d)\n\r", buffSize);
Wolfgang Betz 102:a6f233cb1fed 225 // the total ADV DATA LEN should include two more bytes: the buffer size byte; and the Service Data Type Value byte
Wolfgang Betz 102:a6f233cb1fed 226 if(buffSize>ADV_DATA_MAX_SIZE-2) {
Wolfgang Betz 102:a6f233cb1fed 227 return BLE_ERROR_PARAM_OUT_OF_RANGE;
Wolfgang Betz 102:a6f233cb1fed 228 }
Wolfgang Betz 113:31c73e9b0108 229 for(int i=0; i<buffSize+1; i++) {
Wolfgang Betz 102:a6f233cb1fed 230 DEBUG("Advertising type: SERVICE_DATA loadPtr.getUnitAtIndex(index).getDataPtr()[%d] = 0x%x\n\r", i, loadPtr.getUnitAtIndex(index).getDataPtr()[i]);
Wolfgang Betz 102:a6f233cb1fed 231 }
Wolfgang Betz 102:a6f233cb1fed 232 AdvLen = buffSize+2; // the total ADV DATA LEN should include two more bytes: the buffer size byte; and the Service Data Type Value byte
Wolfgang Betz 102:a6f233cb1fed 233 AdvData[0] = buffSize+1; // the fisrt byte is the data buffer size (type+data)
Wolfgang Betz 102:a6f233cb1fed 234 AdvData[1] = AD_TYPE_SERVICE_DATA;
Wolfgang Betz 102:a6f233cb1fed 235 memcpy(AdvData+2, loadPtr.getUnitAtIndex(index).getDataPtr(), buffSize);
Wolfgang Betz 90:26c0c9807ab4 236 break;
Wolfgang Betz 90:26c0c9807ab4 237 }
Wolfgang Betz 90:26c0c9807ab4 238 case GapAdvertisingData::APPEARANCE:
Wolfgang Betz 90:26c0c9807ab4 239 {
Wolfgang Betz 90:26c0c9807ab4 240 /*
Wolfgang Betz 90:26c0c9807ab4 241 Tested with GapAdvertisingData::GENERIC_PHONE.
Wolfgang Betz 90:26c0c9807ab4 242 for other appearances BLE Scanner android app is not behaving properly
Wolfgang Betz 90:26c0c9807ab4 243 */
Wolfgang Betz 90:26c0c9807ab4 244 DEBUG("Advertising type: APPEARANCE\n\r");
Wolfgang Betz 90:26c0c9807ab4 245 const char *deviceAppearance = NULL;
Wolfgang Betz 90:26c0c9807ab4 246 deviceAppearance = (const char*)loadPtr.getUnitAtIndex(index).getDataPtr(); // to be set later when startAdvertising() is called
Wolfgang Betz 90:26c0c9807ab4 247
Wolfgang Betz 122:e8e7bc2c9e1c 248 #if NEED_CONSOLE_OUTPUT
Wolfgang Betz 90:26c0c9807ab4 249 uint8_t Appearance[2] = {0, 0};
Wolfgang Betz 90:26c0c9807ab4 250 uint16_t devP = (uint16_t)*deviceAppearance;
Wolfgang Betz 90:26c0c9807ab4 251 STORE_LE_16(Appearance, (uint16_t)devP);
Wolfgang Betz 122:e8e7bc2c9e1c 252 #endif
Wolfgang Betz 90:26c0c9807ab4 253
Wolfgang Betz 90:26c0c9807ab4 254 DEBUG("input: deviceAppearance= 0x%x 0x%x..., strlen(deviceAppearance)=%d\n\r", Appearance[1], Appearance[0], (uint8_t)*loadPtr.getUnitAtIndex(index).getLenPtr()-1); /**< \ref Appearance */
Wolfgang Betz 90:26c0c9807ab4 255
Wolfgang Betz 90:26c0c9807ab4 256 aci_gatt_update_char_value(g_gap_service_handle, g_appearance_char_handle, 0, 2, (uint8_t *)deviceAppearance);//not using array Appearance[2]
Wolfgang Betz 90:26c0c9807ab4 257 break;
Wolfgang Betz 90:26c0c9807ab4 258 }
Wolfgang Betz 90:26c0c9807ab4 259 case GapAdvertisingData::ADVERTISING_INTERVAL: /**< Advertising Interval */
Wolfgang Betz 90:26c0c9807ab4 260 {
Wolfgang Betz 102:a6f233cb1fed 261 DEBUG("Advertising type: ADVERTISING_INTERVAL\n\r");
Wolfgang Betz 90:26c0c9807ab4 262 advtInterval = (uint16_t)(*loadPtr.getUnitAtIndex(index).getDataPtr());
Wolfgang Betz 90:26c0c9807ab4 263 DEBUG("advtInterval=%d\n\r", advtInterval);
Wolfgang Betz 90:26c0c9807ab4 264 break;
Wolfgang Betz 90:26c0c9807ab4 265 }
Wolfgang Betz 90:26c0c9807ab4 266 case GapAdvertisingData::MANUFACTURER_SPECIFIC_DATA: /**< Manufacturer Specific Data */
Wolfgang Betz 90:26c0c9807ab4 267 {
Wolfgang Betz 90:26c0c9807ab4 268 break;
Wolfgang Betz 90:26c0c9807ab4 269 }
Wolfgang Betz 90:26c0c9807ab4 270
Wolfgang Betz 90:26c0c9807ab4 271 }
Wolfgang Betz 90:26c0c9807ab4 272 }
Wolfgang Betz 90:26c0c9807ab4 273 //Set the SCAN_RSP Payload
Wolfgang Betz 90:26c0c9807ab4 274 scan_response_payload = scanResponse.getPayload();
Wolfgang Betz 90:26c0c9807ab4 275 scan_rsp_length = scanResponse.getPayloadLen();
Wolfgang Betz 90:26c0c9807ab4 276 }
Wolfgang Betz 90:26c0c9807ab4 277 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 278 }
Wolfgang Betz 90:26c0c9807ab4 279
Wolfgang Betz 118:a172a5568535 280 /*
Wolfgang Betz 118:a172a5568535 281 * Utility to set ADV timeout flag
Wolfgang Betz 118:a172a5568535 282 */
Wolfgang Betz 118:a172a5568535 283 void BlueNRGGap::setAdvToFlag(void) {
Wolfgang Betz 118:a172a5568535 284 AdvToFlag = true;
Wolfgang Betz 118:a172a5568535 285 }
Wolfgang Betz 102:a6f233cb1fed 286
Wolfgang Betz 118:a172a5568535 287 /*
Wolfgang Betz 118:a172a5568535 288 * ADV timeout callback
Wolfgang Betz 118:a172a5568535 289 */
Wolfgang Betz 118:a172a5568535 290 static void advTimeoutCB(void)
Wolfgang Betz 118:a172a5568535 291 {
Wolfgang Betz 118:a172a5568535 292 Gap::GapState_t state;
Wolfgang Betz 118:a172a5568535 293
Wolfgang Betz 118:a172a5568535 294 state = BlueNRGGap::getInstance().getState();
Wolfgang Betz 118:a172a5568535 295 if (state.advertising == 1) {
Wolfgang Betz 118:a172a5568535 296
Wolfgang Betz 118:a172a5568535 297 BlueNRGGap::getInstance().setAdvToFlag();
Wolfgang Betz 118:a172a5568535 298
Wolfgang Betz 118:a172a5568535 299 Timeout t = BlueNRGGap::getInstance().getAdvTimeout();
Wolfgang Betz 118:a172a5568535 300 t.detach(); /* disable the callback from the timeout */
Wolfgang Betz 118:a172a5568535 301
Wolfgang Betz 118:a172a5568535 302 }
Wolfgang Betz 118:a172a5568535 303 }
Wolfgang Betz 118:a172a5568535 304
Wolfgang Betz 118:a172a5568535 305
Wolfgang Betz 90:26c0c9807ab4 306 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 307 /*!
Wolfgang Betz 90:26c0c9807ab4 308 @brief Starts the BLE HW, initialising any services that were
Wolfgang Betz 90:26c0c9807ab4 309 added before this function was called.
Wolfgang Betz 90:26c0c9807ab4 310
Wolfgang Betz 90:26c0c9807ab4 311 @param[in] params
Wolfgang Betz 90:26c0c9807ab4 312 Basic advertising details, including the advertising
Wolfgang Betz 90:26c0c9807ab4 313 delay, timeout and how the device should be advertised
Wolfgang Betz 90:26c0c9807ab4 314
Wolfgang Betz 90:26c0c9807ab4 315 @note All services must be added before calling this function!
Wolfgang Betz 90:26c0c9807ab4 316
Wolfgang Betz 90:26c0c9807ab4 317 @returns ble_error_t
Wolfgang Betz 90:26c0c9807ab4 318
Wolfgang Betz 90:26c0c9807ab4 319 @retval BLE_ERROR_NONE
Wolfgang Betz 90:26c0c9807ab4 320 Everything executed properly
Wolfgang Betz 90:26c0c9807ab4 321
Wolfgang Betz 90:26c0c9807ab4 322 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 323
Wolfgang Betz 90:26c0c9807ab4 324 @code
Wolfgang Betz 90:26c0c9807ab4 325
Wolfgang Betz 90:26c0c9807ab4 326 @endcode
Wolfgang Betz 90:26c0c9807ab4 327 */
Wolfgang Betz 90:26c0c9807ab4 328 /**************************************************************************/
Wolfgang Betz 102:a6f233cb1fed 329
Wolfgang Betz 90:26c0c9807ab4 330 ble_error_t BlueNRGGap::startAdvertising(const GapAdvertisingParams &params)
Wolfgang Betz 102:a6f233cb1fed 331 {
Wolfgang Betz 90:26c0c9807ab4 332 /* Make sure we support the advertising type */
Wolfgang Betz 90:26c0c9807ab4 333 if (params.getAdvertisingType() == GapAdvertisingParams::ADV_CONNECTABLE_DIRECTED) {
Wolfgang Betz 90:26c0c9807ab4 334 /* ToDo: This requires a propery security implementation, etc. */
Wolfgang Betz 90:26c0c9807ab4 335 return BLE_ERROR_NOT_IMPLEMENTED;
Wolfgang Betz 90:26c0c9807ab4 336 }
Wolfgang Betz 90:26c0c9807ab4 337
Wolfgang Betz 90:26c0c9807ab4 338 /* Check interval range */
Wolfgang Betz 90:26c0c9807ab4 339 if (params.getAdvertisingType() == GapAdvertisingParams::ADV_NON_CONNECTABLE_UNDIRECTED) {
Wolfgang Betz 90:26c0c9807ab4 340 /* Min delay is slightly longer for unconnectable devices */
Wolfgang Betz 118:a172a5568535 341 if ((params.getIntervalInADVUnits() < GapAdvertisingParams::GAP_ADV_PARAMS_INTERVAL_MIN_NONCON) ||
Wolfgang Betz 118:a172a5568535 342 (params.getIntervalInADVUnits() > GapAdvertisingParams::GAP_ADV_PARAMS_INTERVAL_MAX)) {
Wolfgang Betz 90:26c0c9807ab4 343 return BLE_ERROR_PARAM_OUT_OF_RANGE;
Wolfgang Betz 90:26c0c9807ab4 344 }
Wolfgang Betz 90:26c0c9807ab4 345 } else {
Wolfgang Betz 118:a172a5568535 346 if ((params.getIntervalInADVUnits() < GapAdvertisingParams::GAP_ADV_PARAMS_INTERVAL_MIN) ||
Wolfgang Betz 118:a172a5568535 347 (params.getIntervalInADVUnits() > GapAdvertisingParams::GAP_ADV_PARAMS_INTERVAL_MAX)) {
Wolfgang Betz 90:26c0c9807ab4 348 return BLE_ERROR_PARAM_OUT_OF_RANGE;
Wolfgang Betz 90:26c0c9807ab4 349 }
Wolfgang Betz 90:26c0c9807ab4 350 }
Wolfgang Betz 90:26c0c9807ab4 351
Wolfgang Betz 90:26c0c9807ab4 352 /* Check timeout is zero for Connectable Directed */
Wolfgang Betz 90:26c0c9807ab4 353 if ((params.getAdvertisingType() == GapAdvertisingParams::ADV_CONNECTABLE_DIRECTED) && (params.getTimeout() != 0)) {
Wolfgang Betz 90:26c0c9807ab4 354 /* Timeout must be 0 with this type, although we'll never get here */
Wolfgang Betz 90:26c0c9807ab4 355 /* since this isn't implemented yet anyway */
Wolfgang Betz 90:26c0c9807ab4 356 return BLE_ERROR_PARAM_OUT_OF_RANGE;
Wolfgang Betz 90:26c0c9807ab4 357 }
Wolfgang Betz 90:26c0c9807ab4 358
Wolfgang Betz 90:26c0c9807ab4 359 /* Check timeout for other advertising types */
Wolfgang Betz 90:26c0c9807ab4 360 if ((params.getAdvertisingType() != GapAdvertisingParams::ADV_CONNECTABLE_DIRECTED) &&
Wolfgang Betz 90:26c0c9807ab4 361 (params.getTimeout() > GapAdvertisingParams::GAP_ADV_PARAMS_TIMEOUT_MAX)) {
Wolfgang Betz 90:26c0c9807ab4 362 return BLE_ERROR_PARAM_OUT_OF_RANGE;
Wolfgang Betz 90:26c0c9807ab4 363 }
Wolfgang Betz 90:26c0c9807ab4 364
Wolfgang Betz 90:26c0c9807ab4 365 //tBleStatus ret;
Wolfgang Betz 90:26c0c9807ab4 366 //const LongUUIDBytes_t HRM_SERVICE_UUID_128 = {0x18, 0x0D};
Wolfgang Betz 90:26c0c9807ab4 367 /* set scan response data */
Wolfgang Betz 90:26c0c9807ab4 368 hci_le_set_scan_resp_data(scan_rsp_length, scan_response_payload); /*int hci_le_set_scan_resp_data(uint8_t length, const uint8_t data[]);*/
Wolfgang Betz 90:26c0c9807ab4 369
Wolfgang Betz 90:26c0c9807ab4 370 /*aci_gap_set_discoverable(Advertising_Event_Type, Adv_min_intvl, Adv_Max_Intvl, Addr_Type, Adv_Filter_Policy,
Wolfgang Betz 90:26c0c9807ab4 371 Local_Name_Length, local_name, service_uuid_length, service_uuid_list, Slave_conn_intvl_min, Slave_conn_intvl_max);*/
Wolfgang Betz 90:26c0c9807ab4 372 /*LINK_LAYER.H DESCRIBES THE ADVERTISING TYPES*/
Wolfgang Betz 90:26c0c9807ab4 373
Wolfgang Betz 90:26c0c9807ab4 374 char* name = NULL;
Wolfgang Betz 90:26c0c9807ab4 375 uint8_t nameLen = 0;
Wolfgang Betz 90:26c0c9807ab4 376 if(local_name!=NULL) {
Wolfgang Betz 90:26c0c9807ab4 377 name = (char*)local_name;
Wolfgang Betz 90:26c0c9807ab4 378 DEBUG("name=%s\n\r", name);
Wolfgang Betz 90:26c0c9807ab4 379 nameLen = local_name_length;
Wolfgang Betz 90:26c0c9807ab4 380 } else {
Wolfgang Betz 90:26c0c9807ab4 381 char str[] = "ST_BLE_DEV";
Wolfgang Betz 90:26c0c9807ab4 382 name = new char[strlen(str)+1];
Wolfgang Betz 90:26c0c9807ab4 383 name[0] = AD_TYPE_COMPLETE_LOCAL_NAME;
Wolfgang Betz 90:26c0c9807ab4 384 strcpy(name+1, str);
Wolfgang Betz 90:26c0c9807ab4 385 nameLen = strlen(name);
Wolfgang Betz 90:26c0c9807ab4 386 DEBUG("nameLen=%d\n\r", nameLen);
Wolfgang Betz 90:26c0c9807ab4 387 DEBUG("name=%s\n\r", name);
Wolfgang Betz 90:26c0c9807ab4 388 }
Wolfgang Betz 90:26c0c9807ab4 389
Wolfgang Betz 118:a172a5568535 390 advtInterval = params.getIntervalInADVUnits(); // set advtInterval in case it is not already set by user application
Wolfgang Betz 90:26c0c9807ab4 391 ret = aci_gap_set_discoverable(params.getAdvertisingType(), // Advertising_Event_Type
Wolfgang Betz 117:aff31e70cacc 392 advtInterval, // Adv_Interval_Min
Wolfgang Betz 90:26c0c9807ab4 393 advtInterval, // Adv_Interval_Max
Wolfgang Betz 90:26c0c9807ab4 394 PUBLIC_ADDR, // Address_Type
Wolfgang Betz 90:26c0c9807ab4 395 NO_WHITE_LIST_USE, // Adv_Filter_Policy
Wolfgang Betz 90:26c0c9807ab4 396 nameLen, //local_name_length, // Local_Name_Length
Wolfgang Betz 90:26c0c9807ab4 397 (const char*)name, //local_name, // Local_Name
Wolfgang Betz 90:26c0c9807ab4 398 servUuidlength, //Service_Uuid_Length
Wolfgang Betz 90:26c0c9807ab4 399 servUuidData, //Service_Uuid_List
Wolfgang Betz 90:26c0c9807ab4 400 0, // Slave_Conn_Interval_Min
Wolfgang Betz 90:26c0c9807ab4 401 0); // Slave_Conn_Interval_Max
Wolfgang Betz 102:a6f233cb1fed 402
Wolfgang Betz 118:a172a5568535 403
Wolfgang Betz 115:3b47df81a56b 404 DEBUG("!!!setting discoverable (servUuidlength=0x%x)\n", servUuidlength);
Wolfgang Betz 115:3b47df81a56b 405 if(BLE_STATUS_SUCCESS!=ret) {
Wolfgang Betz 115:3b47df81a56b 406 DEBUG("error occurred while setting discoverable (ret=0x%x)\n", ret);
Wolfgang Betz 115:3b47df81a56b 407 return BLE_ERROR_PARAM_OUT_OF_RANGE; // no other suitable error code is available
Wolfgang Betz 102:a6f233cb1fed 408 }
Wolfgang Betz 90:26c0c9807ab4 409
Wolfgang Betz 115:3b47df81a56b 410 // Before updating the ADV data, delete COMPLETE_LOCAL_NAME and TX_POWER_LEVEL fields (if present)
Wolfgang Betz 115:3b47df81a56b 411 if(AdvLen>0) {
Wolfgang Betz 115:3b47df81a56b 412 if(name!=NULL) {
Wolfgang Betz 115:3b47df81a56b 413 DEBUG("!!!calling aci_gap_delete_ad_type AD_TYPE_COMPLETE_LOCAL_NAME!!!\n");
Wolfgang Betz 115:3b47df81a56b 414 ret = aci_gap_delete_ad_type(AD_TYPE_COMPLETE_LOCAL_NAME);
Wolfgang Betz 115:3b47df81a56b 415 if (ret != BLE_STATUS_SUCCESS){
Wolfgang Betz 115:3b47df81a56b 416 DEBUG("aci_gap_delete_ad_type failed return=%d\n", ret);
Wolfgang Betz 115:3b47df81a56b 417 return BLE_ERROR_PARAM_OUT_OF_RANGE;
Wolfgang Betz 115:3b47df81a56b 418 }
Wolfgang Betz 115:3b47df81a56b 419 }
Wolfgang Betz 102:a6f233cb1fed 420
Wolfgang Betz 115:3b47df81a56b 421 if(txPowerAdType) {
Wolfgang Betz 115:3b47df81a56b 422 DEBUG("!!!calling aci_gap_delete_ad_type(AD_TYPE_TX_POWER_LEVEL)!!!\n", AdvLen);
Wolfgang Betz 115:3b47df81a56b 423 ret = aci_gap_delete_ad_type(AD_TYPE_TX_POWER_LEVEL);
Wolfgang Betz 115:3b47df81a56b 424 if (ret != BLE_STATUS_SUCCESS){
Wolfgang Betz 115:3b47df81a56b 425 DEBUG("aci_gap_delete_ad_type failed return=%d\n", ret);
Wolfgang Betz 115:3b47df81a56b 426 return BLE_ERROR_PARAM_OUT_OF_RANGE;
Wolfgang Betz 115:3b47df81a56b 427 }
Wolfgang Betz 115:3b47df81a56b 428 }
Wolfgang Betz 115:3b47df81a56b 429
Wolfgang Betz 115:3b47df81a56b 430 ret = aci_gap_update_adv_data(AdvLen, AdvData);
Wolfgang Betz 115:3b47df81a56b 431 if(BLE_STATUS_SUCCESS!=ret) {
Wolfgang Betz 115:3b47df81a56b 432 DEBUG("error occurred while adding adv data (ret=0x%x)\n", ret);
Wolfgang Betz 115:3b47df81a56b 433 return BLE_ERROR_PARAM_OUT_OF_RANGE; // no other suitable error code is available
Wolfgang Betz 115:3b47df81a56b 434 }
Wolfgang Betz 115:3b47df81a56b 435
Wolfgang Betz 115:3b47df81a56b 436 }
Wolfgang Betz 102:a6f233cb1fed 437
Wolfgang Betz 115:3b47df81a56b 438 state.advertising = 1;
Wolfgang Betz 115:3b47df81a56b 439
Wolfgang Betz 118:a172a5568535 440 AdvToFlag = false;
Wolfgang Betz 118:a172a5568535 441 if(params.getTimeout() != 0) {
Wolfgang Betz 118:a172a5568535 442 DEBUG("!!! attaching to!!!\n");
Wolfgang Betz 118:a172a5568535 443 advTimeout.attach(advTimeoutCB, params.getTimeout());
Wolfgang Betz 118:a172a5568535 444 }
Wolfgang Betz 118:a172a5568535 445
Wolfgang Betz 115:3b47df81a56b 446 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 447 }
Wolfgang Betz 90:26c0c9807ab4 448
Wolfgang Betz 90:26c0c9807ab4 449 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 450 /*!
Wolfgang Betz 90:26c0c9807ab4 451 @brief Stops the BLE HW and disconnects from any devices
Wolfgang Betz 90:26c0c9807ab4 452
Wolfgang Betz 90:26c0c9807ab4 453 @returns ble_error_t
Wolfgang Betz 90:26c0c9807ab4 454
Wolfgang Betz 90:26c0c9807ab4 455 @retval BLE_ERROR_NONE
Wolfgang Betz 90:26c0c9807ab4 456 Everything executed properly
Wolfgang Betz 90:26c0c9807ab4 457
Wolfgang Betz 90:26c0c9807ab4 458 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 459
Wolfgang Betz 90:26c0c9807ab4 460 @code
Wolfgang Betz 90:26c0c9807ab4 461
Wolfgang Betz 90:26c0c9807ab4 462 @endcode
Wolfgang Betz 90:26c0c9807ab4 463 */
Wolfgang Betz 90:26c0c9807ab4 464 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 465 ble_error_t BlueNRGGap::stopAdvertising(void)
Wolfgang Betz 90:26c0c9807ab4 466 {
Wolfgang Betz 90:26c0c9807ab4 467 tBleStatus ret;
Wolfgang Betz 90:26c0c9807ab4 468
Wolfgang Betz 90:26c0c9807ab4 469 if(state.advertising == 1) {
Wolfgang Betz 90:26c0c9807ab4 470 //Set non-discoverable to stop advertising
Wolfgang Betz 90:26c0c9807ab4 471 ret = aci_gap_set_non_discoverable();
Wolfgang Betz 90:26c0c9807ab4 472
Wolfgang Betz 90:26c0c9807ab4 473 if (ret != BLE_STATUS_SUCCESS){
Wolfgang Betz 118:a172a5568535 474 DEBUG("Error in stopping advertisement (ret=0x%x)!!\n\r", ret) ;
Wolfgang Betz 90:26c0c9807ab4 475 return BLE_ERROR_PARAM_OUT_OF_RANGE ; //Not correct Error Value
Wolfgang Betz 90:26c0c9807ab4 476 //FIXME: Define Error values equivalent to BlueNRG Error Codes.
Wolfgang Betz 90:26c0c9807ab4 477 }
Wolfgang Betz 90:26c0c9807ab4 478 DEBUG("Advertisement stopped!!\n\r") ;
Wolfgang Betz 90:26c0c9807ab4 479 //Set GapState_t::advertising state
Wolfgang Betz 90:26c0c9807ab4 480 state.advertising = 0;
Wolfgang Betz 90:26c0c9807ab4 481 }
Wolfgang Betz 90:26c0c9807ab4 482
Wolfgang Betz 90:26c0c9807ab4 483 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 484 }
Wolfgang Betz 90:26c0c9807ab4 485
Wolfgang Betz 90:26c0c9807ab4 486 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 487 /*!
Wolfgang Betz 90:26c0c9807ab4 488 @brief Disconnects if we are connected to a central device
Wolfgang Betz 90:26c0c9807ab4 489
Wolfgang Betz 90:26c0c9807ab4 490 @param[in] reason
Wolfgang Betz 90:26c0c9807ab4 491 Disconnection Reason
Wolfgang Betz 90:26c0c9807ab4 492
Wolfgang Betz 90:26c0c9807ab4 493 @returns ble_error_t
Wolfgang Betz 90:26c0c9807ab4 494
Wolfgang Betz 90:26c0c9807ab4 495 @retval BLE_ERROR_NONE
Wolfgang Betz 90:26c0c9807ab4 496 Everything executed properly
Wolfgang Betz 90:26c0c9807ab4 497
Wolfgang Betz 90:26c0c9807ab4 498 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 499
Wolfgang Betz 90:26c0c9807ab4 500 @code
Wolfgang Betz 90:26c0c9807ab4 501
Wolfgang Betz 90:26c0c9807ab4 502 @endcode
Wolfgang Betz 90:26c0c9807ab4 503 */
Wolfgang Betz 90:26c0c9807ab4 504 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 505 ble_error_t BlueNRGGap::disconnect(Gap::DisconnectionReason_t reason)
Wolfgang Betz 90:26c0c9807ab4 506 {
Wolfgang Betz 90:26c0c9807ab4 507 tBleStatus ret;
Wolfgang Betz 90:26c0c9807ab4 508 //For Reason codes check BlueTooth HCI Spec
Wolfgang Betz 90:26c0c9807ab4 509
Wolfgang Betz 90:26c0c9807ab4 510 if(m_connectionHandle != BLE_CONN_HANDLE_INVALID) {
Wolfgang Betz 90:26c0c9807ab4 511 ret = aci_gap_terminate(m_connectionHandle, 0x16);//0x16 Connection Terminated by Local Host.
Wolfgang Betz 90:26c0c9807ab4 512
Wolfgang Betz 90:26c0c9807ab4 513 if (ret != BLE_STATUS_SUCCESS){
Wolfgang Betz 90:26c0c9807ab4 514 DEBUG("Error in GAP termination!!\n\r") ;
Wolfgang Betz 90:26c0c9807ab4 515 return BLE_ERROR_PARAM_OUT_OF_RANGE ; //Not correct Error Value
Wolfgang Betz 90:26c0c9807ab4 516 //FIXME: Define Error values equivalent to BlueNRG Error Codes.
Wolfgang Betz 90:26c0c9807ab4 517 }
Wolfgang Betz 90:26c0c9807ab4 518
Wolfgang Betz 90:26c0c9807ab4 519 //DEBUG("Disconnected from localhost!!\n\r") ;
Wolfgang Betz 90:26c0c9807ab4 520 m_connectionHandle = BLE_CONN_HANDLE_INVALID;
Wolfgang Betz 90:26c0c9807ab4 521 }
Wolfgang Betz 90:26c0c9807ab4 522
Wolfgang Betz 90:26c0c9807ab4 523 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 524 }
Wolfgang Betz 90:26c0c9807ab4 525
Wolfgang Betz 90:26c0c9807ab4 526 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 527 /*!
Wolfgang Betz 90:26c0c9807ab4 528 @brief Disconnects if we are connected to a central device
Wolfgang Betz 90:26c0c9807ab4 529
Wolfgang Betz 90:26c0c9807ab4 530 @param[in] reason
Wolfgang Betz 90:26c0c9807ab4 531 Disconnection Reason
Wolfgang Betz 90:26c0c9807ab4 532
Wolfgang Betz 90:26c0c9807ab4 533 @returns ble_error_t
Wolfgang Betz 90:26c0c9807ab4 534
Wolfgang Betz 90:26c0c9807ab4 535 @retval BLE_ERROR_NONE
Wolfgang Betz 90:26c0c9807ab4 536 Everything executed properly
Wolfgang Betz 90:26c0c9807ab4 537
Wolfgang Betz 90:26c0c9807ab4 538 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 539
Wolfgang Betz 90:26c0c9807ab4 540 @code
Wolfgang Betz 90:26c0c9807ab4 541
Wolfgang Betz 90:26c0c9807ab4 542 @endcode
Wolfgang Betz 90:26c0c9807ab4 543 */
Wolfgang Betz 90:26c0c9807ab4 544 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 545 ble_error_t BlueNRGGap::disconnect(Handle_t connectionHandle, Gap::DisconnectionReason_t reason)
Wolfgang Betz 90:26c0c9807ab4 546 {
Wolfgang Betz 90:26c0c9807ab4 547 tBleStatus ret;
Wolfgang Betz 90:26c0c9807ab4 548 //For Reason codes check BlueTooth HCI Spec
Wolfgang Betz 90:26c0c9807ab4 549
Wolfgang Betz 90:26c0c9807ab4 550 if(connectionHandle != BLE_CONN_HANDLE_INVALID) {
Wolfgang Betz 90:26c0c9807ab4 551 ret = aci_gap_terminate(connectionHandle, 0x16);//0x16 Connection Terminated by Local Host.
Wolfgang Betz 90:26c0c9807ab4 552
Wolfgang Betz 90:26c0c9807ab4 553 if (ret != BLE_STATUS_SUCCESS){
Wolfgang Betz 90:26c0c9807ab4 554 DEBUG("Error in GAP termination!!\n\r") ;
Wolfgang Betz 90:26c0c9807ab4 555 return BLE_ERROR_PARAM_OUT_OF_RANGE ; //Not correct Error Value
Wolfgang Betz 90:26c0c9807ab4 556 //FIXME: Define Error values equivalent to BlueNRG Error Codes.
Wolfgang Betz 90:26c0c9807ab4 557 }
Wolfgang Betz 90:26c0c9807ab4 558
Wolfgang Betz 90:26c0c9807ab4 559 //DEBUG("Disconnected from localhost!!\n\r") ;
Wolfgang Betz 90:26c0c9807ab4 560 m_connectionHandle = BLE_CONN_HANDLE_INVALID;
Wolfgang Betz 90:26c0c9807ab4 561 }
Wolfgang Betz 90:26c0c9807ab4 562
Wolfgang Betz 90:26c0c9807ab4 563 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 564 }
Wolfgang Betz 90:26c0c9807ab4 565
Wolfgang Betz 90:26c0c9807ab4 566 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 567 /*!
Wolfgang Betz 90:26c0c9807ab4 568 @brief Sets the 16-bit connection handle
Wolfgang Betz 90:26c0c9807ab4 569
Wolfgang Betz 90:26c0c9807ab4 570 @param[in] con_handle
Wolfgang Betz 90:26c0c9807ab4 571 Connection Handle which is set in the Gap Instance
Wolfgang Betz 90:26c0c9807ab4 572
Wolfgang Betz 90:26c0c9807ab4 573 @returns void
Wolfgang Betz 90:26c0c9807ab4 574 */
Wolfgang Betz 90:26c0c9807ab4 575 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 576 void BlueNRGGap::setConnectionHandle(uint16_t con_handle)
Wolfgang Betz 90:26c0c9807ab4 577 {
Wolfgang Betz 90:26c0c9807ab4 578 m_connectionHandle = con_handle;
Wolfgang Betz 90:26c0c9807ab4 579 }
Wolfgang Betz 90:26c0c9807ab4 580
Wolfgang Betz 90:26c0c9807ab4 581 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 582 /*!
Wolfgang Betz 90:26c0c9807ab4 583 @brief Gets the 16-bit connection handle
Wolfgang Betz 90:26c0c9807ab4 584
Wolfgang Betz 90:26c0c9807ab4 585 @param[in] void
Wolfgang Betz 90:26c0c9807ab4 586
Wolfgang Betz 90:26c0c9807ab4 587 @returns uint16_t
Wolfgang Betz 90:26c0c9807ab4 588 Connection Handle of the Gap Instance
Wolfgang Betz 90:26c0c9807ab4 589 */
Wolfgang Betz 90:26c0c9807ab4 590 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 591 uint16_t BlueNRGGap::getConnectionHandle(void)
Wolfgang Betz 90:26c0c9807ab4 592 {
Wolfgang Betz 90:26c0c9807ab4 593 return m_connectionHandle;
Wolfgang Betz 90:26c0c9807ab4 594 }
Wolfgang Betz 90:26c0c9807ab4 595
Wolfgang Betz 90:26c0c9807ab4 596 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 597 /*!
Wolfgang Betz 90:26c0c9807ab4 598 @brief Sets the BLE device address. SetAddress will reset the BLE
Wolfgang Betz 90:26c0c9807ab4 599 device and re-initialize BTLE. Will not start advertising.
Wolfgang Betz 90:26c0c9807ab4 600
Wolfgang Betz 90:26c0c9807ab4 601 @param[in] type
Wolfgang Betz 90:26c0c9807ab4 602 Type of Address
Wolfgang Betz 90:26c0c9807ab4 603
Wolfgang Betz 90:26c0c9807ab4 604 @param[in] address[6]
Wolfgang Betz 90:26c0c9807ab4 605 Value of the Address to be set
Wolfgang Betz 90:26c0c9807ab4 606
Wolfgang Betz 90:26c0c9807ab4 607 @returns ble_error_t
Wolfgang Betz 90:26c0c9807ab4 608
Wolfgang Betz 90:26c0c9807ab4 609 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 610
Wolfgang Betz 90:26c0c9807ab4 611 @code
Wolfgang Betz 90:26c0c9807ab4 612
Wolfgang Betz 90:26c0c9807ab4 613 @endcode
Wolfgang Betz 90:26c0c9807ab4 614 */
Wolfgang Betz 90:26c0c9807ab4 615 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 616 ble_error_t BlueNRGGap::setAddress(addr_type_t type, const Address_t address)
Wolfgang Betz 90:26c0c9807ab4 617 {
Wolfgang Betz 90:26c0c9807ab4 618 //tBleStatus ret;
Wolfgang Betz 90:26c0c9807ab4 619
Wolfgang Betz 90:26c0c9807ab4 620 if (type > ADDR_TYPE_RANDOM_PRIVATE_NON_RESOLVABLE) {
Wolfgang Betz 90:26c0c9807ab4 621 return BLE_ERROR_PARAM_OUT_OF_RANGE;
Wolfgang Betz 90:26c0c9807ab4 622 }
Wolfgang Betz 90:26c0c9807ab4 623
Wolfgang Betz 90:26c0c9807ab4 624 //copy address to bdAddr[6]
Wolfgang Betz 90:26c0c9807ab4 625 for(int i=0; i<BDADDR_SIZE; i++) {
Wolfgang Betz 90:26c0c9807ab4 626 bdaddr[i] = address[i];
Wolfgang Betz 90:26c0c9807ab4 627 //DEBUG("i[%d]:0x%x\n\r",i,bdaddr[i]);
Wolfgang Betz 90:26c0c9807ab4 628 }
Wolfgang Betz 90:26c0c9807ab4 629
Wolfgang Betz 90:26c0c9807ab4 630 if(!isSetAddress) isSetAddress = true;
Wolfgang Betz 90:26c0c9807ab4 631
Wolfgang Betz 90:26c0c9807ab4 632 //Re-Init the BTLE Device with SetAddress as true
Wolfgang Betz 90:26c0c9807ab4 633 //if(BlueNRGDevice::getIsInitialized())//Re-init only initialization is already done
Wolfgang Betz 90:26c0c9807ab4 634 // ANDREA
Wolfgang Betz 116:1aa0d2da72e4 635 //btle_init(isSetAddress, D11, D12, D3);
Wolfgang Betz 90:26c0c9807ab4 636
Wolfgang Betz 90:26c0c9807ab4 637 //if (ret==BLE_STATUS_SUCCESS)
Wolfgang Betz 90:26c0c9807ab4 638 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 639 }
Wolfgang Betz 90:26c0c9807ab4 640
Wolfgang Betz 90:26c0c9807ab4 641 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 642 /*!
Wolfgang Betz 90:26c0c9807ab4 643 @brief Returns boolean if the address of the device has been set
Wolfgang Betz 90:26c0c9807ab4 644 or not
Wolfgang Betz 90:26c0c9807ab4 645
Wolfgang Betz 90:26c0c9807ab4 646 @returns bool
Wolfgang Betz 90:26c0c9807ab4 647
Wolfgang Betz 90:26c0c9807ab4 648 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 649
Wolfgang Betz 90:26c0c9807ab4 650 @code
Wolfgang Betz 90:26c0c9807ab4 651
Wolfgang Betz 90:26c0c9807ab4 652 @endcode
Wolfgang Betz 90:26c0c9807ab4 653 */
Wolfgang Betz 90:26c0c9807ab4 654 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 655 bool BlueNRGGap::getIsSetAddress()
Wolfgang Betz 90:26c0c9807ab4 656 {
Wolfgang Betz 90:26c0c9807ab4 657 return isSetAddress;
Wolfgang Betz 90:26c0c9807ab4 658 }
Wolfgang Betz 90:26c0c9807ab4 659
Wolfgang Betz 90:26c0c9807ab4 660 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 661 /*!
Wolfgang Betz 90:26c0c9807ab4 662 @brief Returns the address of the device if set
Wolfgang Betz 90:26c0c9807ab4 663
Wolfgang Betz 90:26c0c9807ab4 664 @returns Pointer to the address if Address is set else NULL
Wolfgang Betz 90:26c0c9807ab4 665
Wolfgang Betz 90:26c0c9807ab4 666 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 667
Wolfgang Betz 90:26c0c9807ab4 668 @code
Wolfgang Betz 90:26c0c9807ab4 669
Wolfgang Betz 90:26c0c9807ab4 670 @endcode
Wolfgang Betz 90:26c0c9807ab4 671 */
Wolfgang Betz 90:26c0c9807ab4 672 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 673 ble_error_t BlueNRGGap::getAddress(AddressType_t *typeP, Address_t address)
Wolfgang Betz 90:26c0c9807ab4 674 {
Wolfgang Betz 90:26c0c9807ab4 675 *typeP = Gap::ADDR_TYPE_PUBLIC;
Wolfgang Betz 90:26c0c9807ab4 676
Wolfgang Betz 90:26c0c9807ab4 677 if(isSetAddress)
Wolfgang Betz 90:26c0c9807ab4 678 {
Wolfgang Betz 90:26c0c9807ab4 679 for(int i=0; i<BDADDR_SIZE; i++) {
Wolfgang Betz 90:26c0c9807ab4 680 address[i] = bdaddr[i];
Wolfgang Betz 90:26c0c9807ab4 681 //DEBUG("i[%d]:0x%x\n\r",i,bdaddr[i]);
Wolfgang Betz 90:26c0c9807ab4 682 }
Wolfgang Betz 90:26c0c9807ab4 683 }
Wolfgang Betz 90:26c0c9807ab4 684
Wolfgang Betz 90:26c0c9807ab4 685 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 686 }
Wolfgang Betz 90:26c0c9807ab4 687
Wolfgang Betz 90:26c0c9807ab4 688 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 689 /*!
Wolfgang Betz 90:26c0c9807ab4 690 @brief obtains preferred connection params
Wolfgang Betz 90:26c0c9807ab4 691
Wolfgang Betz 90:26c0c9807ab4 692 @returns ble_error_t
Wolfgang Betz 90:26c0c9807ab4 693
Wolfgang Betz 90:26c0c9807ab4 694 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 695
Wolfgang Betz 90:26c0c9807ab4 696 @code
Wolfgang Betz 90:26c0c9807ab4 697
Wolfgang Betz 90:26c0c9807ab4 698 @endcode
Wolfgang Betz 90:26c0c9807ab4 699 */
Wolfgang Betz 90:26c0c9807ab4 700 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 701 ble_error_t BlueNRGGap::getPreferredConnectionParams(ConnectionParams_t *params)
Wolfgang Betz 90:26c0c9807ab4 702 {
Wolfgang Betz 90:26c0c9807ab4 703 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 704 }
Wolfgang Betz 90:26c0c9807ab4 705
Wolfgang Betz 90:26c0c9807ab4 706
Wolfgang Betz 90:26c0c9807ab4 707 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 708 /*!
Wolfgang Betz 90:26c0c9807ab4 709 @brief sets preferred connection params
Wolfgang Betz 90:26c0c9807ab4 710
Wolfgang Betz 90:26c0c9807ab4 711 @returns ble_error_t
Wolfgang Betz 90:26c0c9807ab4 712
Wolfgang Betz 90:26c0c9807ab4 713 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 714
Wolfgang Betz 90:26c0c9807ab4 715 @code
Wolfgang Betz 90:26c0c9807ab4 716
Wolfgang Betz 90:26c0c9807ab4 717 @endcode
Wolfgang Betz 90:26c0c9807ab4 718 */
Wolfgang Betz 90:26c0c9807ab4 719 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 720 ble_error_t BlueNRGGap::setPreferredConnectionParams(const ConnectionParams_t *params)
Wolfgang Betz 90:26c0c9807ab4 721 {
Wolfgang Betz 90:26c0c9807ab4 722 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 723 }
Wolfgang Betz 90:26c0c9807ab4 724
Wolfgang Betz 90:26c0c9807ab4 725 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 726 /*!
Wolfgang Betz 90:26c0c9807ab4 727 @brief updates preferred connection params
Wolfgang Betz 90:26c0c9807ab4 728
Wolfgang Betz 90:26c0c9807ab4 729 @returns ble_error_t
Wolfgang Betz 90:26c0c9807ab4 730
Wolfgang Betz 90:26c0c9807ab4 731 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 732
Wolfgang Betz 90:26c0c9807ab4 733 @code
Wolfgang Betz 90:26c0c9807ab4 734
Wolfgang Betz 90:26c0c9807ab4 735 @endcode
Wolfgang Betz 90:26c0c9807ab4 736 */
Wolfgang Betz 90:26c0c9807ab4 737 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 738 ble_error_t BlueNRGGap::updateConnectionParams(Handle_t handle, const ConnectionParams_t *params)
Wolfgang Betz 90:26c0c9807ab4 739 {
Wolfgang Betz 90:26c0c9807ab4 740 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 741 }
Wolfgang Betz 90:26c0c9807ab4 742
Wolfgang Betz 90:26c0c9807ab4 743 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 744 /*!
Wolfgang Betz 90:26c0c9807ab4 745 @brief Sets the Device Name Characteristic
Wolfgang Betz 90:26c0c9807ab4 746
Wolfgang Betz 90:26c0c9807ab4 747 @param[in] deviceName
Wolfgang Betz 90:26c0c9807ab4 748 pointer to device name to be set
Wolfgang Betz 90:26c0c9807ab4 749
Wolfgang Betz 90:26c0c9807ab4 750 @returns ble_error_t
Wolfgang Betz 90:26c0c9807ab4 751
Wolfgang Betz 90:26c0c9807ab4 752 @retval BLE_ERROR_NONE
Wolfgang Betz 90:26c0c9807ab4 753 Everything executed properly
Wolfgang Betz 90:26c0c9807ab4 754
Wolfgang Betz 90:26c0c9807ab4 755 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 756
Wolfgang Betz 90:26c0c9807ab4 757 @code
Wolfgang Betz 90:26c0c9807ab4 758
Wolfgang Betz 90:26c0c9807ab4 759 @endcode
Wolfgang Betz 90:26c0c9807ab4 760 */
Wolfgang Betz 90:26c0c9807ab4 761 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 762 ble_error_t BlueNRGGap::setDeviceName(const uint8_t *deviceName)
Wolfgang Betz 90:26c0c9807ab4 763 {
Wolfgang Betz 90:26c0c9807ab4 764 int ret;
Wolfgang Betz 90:26c0c9807ab4 765 uint8_t nameLen = 0;
Wolfgang Betz 90:26c0c9807ab4 766
Wolfgang Betz 90:26c0c9807ab4 767 DeviceName = (uint8_t *)deviceName;
Wolfgang Betz 90:26c0c9807ab4 768 //DEBUG("SetDeviceName=%s\n\r", DeviceName);
Wolfgang Betz 90:26c0c9807ab4 769
Wolfgang Betz 90:26c0c9807ab4 770 nameLen = strlen((const char*)DeviceName);
Wolfgang Betz 90:26c0c9807ab4 771 //DEBUG("DeviceName Size=%d\n\r", nameLen);
Wolfgang Betz 90:26c0c9807ab4 772
Wolfgang Betz 90:26c0c9807ab4 773 ret = aci_gatt_update_char_value(g_gap_service_handle,
Wolfgang Betz 90:26c0c9807ab4 774 g_device_name_char_handle,
Wolfgang Betz 90:26c0c9807ab4 775 0,
Wolfgang Betz 90:26c0c9807ab4 776 nameLen,
Wolfgang Betz 90:26c0c9807ab4 777 (uint8_t *)DeviceName);
Wolfgang Betz 90:26c0c9807ab4 778
Wolfgang Betz 90:26c0c9807ab4 779 if(ret){
Wolfgang Betz 90:26c0c9807ab4 780 DEBUG("device set name failed\n\r");
Wolfgang Betz 90:26c0c9807ab4 781 return BLE_ERROR_PARAM_OUT_OF_RANGE;//TODO:Wrong error code
Wolfgang Betz 90:26c0c9807ab4 782 }
Wolfgang Betz 90:26c0c9807ab4 783
Wolfgang Betz 90:26c0c9807ab4 784 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 785 }
Wolfgang Betz 90:26c0c9807ab4 786
Wolfgang Betz 90:26c0c9807ab4 787 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 788 /*!
Wolfgang Betz 90:26c0c9807ab4 789 @brief Gets the Device Name Characteristic
Wolfgang Betz 90:26c0c9807ab4 790
Wolfgang Betz 90:26c0c9807ab4 791 @param[in] deviceName
Wolfgang Betz 90:26c0c9807ab4 792 pointer to device name
Wolfgang Betz 90:26c0c9807ab4 793
Wolfgang Betz 90:26c0c9807ab4 794 @param[in] lengthP
Wolfgang Betz 90:26c0c9807ab4 795 pointer to device name length
Wolfgang Betz 90:26c0c9807ab4 796
Wolfgang Betz 90:26c0c9807ab4 797 @returns ble_error_t
Wolfgang Betz 90:26c0c9807ab4 798
Wolfgang Betz 90:26c0c9807ab4 799 @retval BLE_ERROR_NONE
Wolfgang Betz 90:26c0c9807ab4 800 Everything executed properly
Wolfgang Betz 90:26c0c9807ab4 801
Wolfgang Betz 90:26c0c9807ab4 802 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 803
Wolfgang Betz 90:26c0c9807ab4 804 @code
Wolfgang Betz 90:26c0c9807ab4 805
Wolfgang Betz 90:26c0c9807ab4 806 @endcode
Wolfgang Betz 90:26c0c9807ab4 807 */
Wolfgang Betz 90:26c0c9807ab4 808 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 809 ble_error_t BlueNRGGap::getDeviceName(uint8_t *deviceName, unsigned *lengthP)
Wolfgang Betz 90:26c0c9807ab4 810 {
Wolfgang Betz 90:26c0c9807ab4 811 //int ret;
Wolfgang Betz 90:26c0c9807ab4 812
Wolfgang Betz 90:26c0c9807ab4 813 if(DeviceName==NULL)
Wolfgang Betz 90:26c0c9807ab4 814 return BLE_ERROR_PARAM_OUT_OF_RANGE;
Wolfgang Betz 90:26c0c9807ab4 815
Wolfgang Betz 90:26c0c9807ab4 816 strcpy((char*)deviceName, (const char*)DeviceName);
Wolfgang Betz 90:26c0c9807ab4 817 //DEBUG("GetDeviceName=%s\n\r", deviceName);
Wolfgang Betz 90:26c0c9807ab4 818
Wolfgang Betz 90:26c0c9807ab4 819 *lengthP = strlen((const char*)DeviceName);
Wolfgang Betz 90:26c0c9807ab4 820 //DEBUG("DeviceName Size=%d\n\r", *lengthP);
Wolfgang Betz 90:26c0c9807ab4 821
Wolfgang Betz 90:26c0c9807ab4 822 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 823 }
Wolfgang Betz 90:26c0c9807ab4 824
Wolfgang Betz 90:26c0c9807ab4 825 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 826 /*!
Wolfgang Betz 90:26c0c9807ab4 827 @brief Sets the Device Appearance Characteristic
Wolfgang Betz 90:26c0c9807ab4 828
Wolfgang Betz 90:26c0c9807ab4 829 @param[in] appearance
Wolfgang Betz 90:26c0c9807ab4 830 device appearance
Wolfgang Betz 90:26c0c9807ab4 831
Wolfgang Betz 90:26c0c9807ab4 832 @returns ble_error_t
Wolfgang Betz 90:26c0c9807ab4 833
Wolfgang Betz 90:26c0c9807ab4 834 @retval BLE_ERROR_NONE
Wolfgang Betz 90:26c0c9807ab4 835 Everything executed properly
Wolfgang Betz 90:26c0c9807ab4 836
Wolfgang Betz 90:26c0c9807ab4 837 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 838
Wolfgang Betz 90:26c0c9807ab4 839 @code
Wolfgang Betz 90:26c0c9807ab4 840
Wolfgang Betz 90:26c0c9807ab4 841 @endcode
Wolfgang Betz 90:26c0c9807ab4 842 */
Wolfgang Betz 90:26c0c9807ab4 843 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 844 ble_error_t BlueNRGGap::setAppearance(GapAdvertisingData::Appearance appearance)
Wolfgang Betz 90:26c0c9807ab4 845 {
Wolfgang Betz 90:26c0c9807ab4 846 /*
Wolfgang Betz 90:26c0c9807ab4 847 Tested with GapAdvertisingData::GENERIC_PHONE.
Wolfgang Betz 90:26c0c9807ab4 848 for other appearances BLE Scanner android app is not behaving properly
Wolfgang Betz 90:26c0c9807ab4 849 */
Wolfgang Betz 90:26c0c9807ab4 850 //char deviceAppearance[2];
Wolfgang Betz 90:26c0c9807ab4 851 STORE_LE_16(deviceAppearance, appearance);
Wolfgang Betz 90:26c0c9807ab4 852 DEBUG("input: incoming = %d deviceAppearance= 0x%x 0x%x\n\r", appearance, deviceAppearance[1], deviceAppearance[0]);
Wolfgang Betz 90:26c0c9807ab4 853
Wolfgang Betz 90:26c0c9807ab4 854 aci_gatt_update_char_value(g_gap_service_handle, g_appearance_char_handle, 0, 2, (uint8_t *)deviceAppearance);
Wolfgang Betz 90:26c0c9807ab4 855
Wolfgang Betz 90:26c0c9807ab4 856 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 857 }
Wolfgang Betz 90:26c0c9807ab4 858
Wolfgang Betz 90:26c0c9807ab4 859 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 860 /*!
Wolfgang Betz 90:26c0c9807ab4 861 @brief Gets the Device Appearance Characteristic
Wolfgang Betz 90:26c0c9807ab4 862
Wolfgang Betz 90:26c0c9807ab4 863 @param[in] appearance
Wolfgang Betz 90:26c0c9807ab4 864 pointer to device appearance value
Wolfgang Betz 90:26c0c9807ab4 865
Wolfgang Betz 90:26c0c9807ab4 866 @returns ble_error_t
Wolfgang Betz 90:26c0c9807ab4 867
Wolfgang Betz 90:26c0c9807ab4 868 @retval BLE_ERROR_NONE
Wolfgang Betz 90:26c0c9807ab4 869 Everything executed properly
Wolfgang Betz 90:26c0c9807ab4 870
Wolfgang Betz 90:26c0c9807ab4 871 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 872
Wolfgang Betz 90:26c0c9807ab4 873 @code
Wolfgang Betz 90:26c0c9807ab4 874
Wolfgang Betz 90:26c0c9807ab4 875 @endcode
Wolfgang Betz 90:26c0c9807ab4 876 */
Wolfgang Betz 90:26c0c9807ab4 877 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 878 ble_error_t BlueNRGGap::getAppearance(GapAdvertisingData::Appearance *appearanceP)
Wolfgang Betz 90:26c0c9807ab4 879 {
Wolfgang Betz 90:26c0c9807ab4 880 uint16_t devP;
Wolfgang Betz 90:26c0c9807ab4 881 if(!appearanceP) return BLE_ERROR_PARAM_OUT_OF_RANGE;
Wolfgang Betz 90:26c0c9807ab4 882 devP = ((uint16_t)(0x0000|deviceAppearance[0])) | (((uint16_t)(0x0000|deviceAppearance[1]))<<8);
Wolfgang Betz 90:26c0c9807ab4 883 strcpy((char*)appearanceP, (const char*)&devP);
Wolfgang Betz 90:26c0c9807ab4 884
Wolfgang Betz 90:26c0c9807ab4 885 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 886 }
Wolfgang Betz 90:26c0c9807ab4 887
Wolfgang Betz 90:26c0c9807ab4 888 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 889 /*!
Wolfgang Betz 90:26c0c9807ab4 890 @brief Gets the value of maximum advertising interval in ms
Wolfgang Betz 90:26c0c9807ab4 891
Wolfgang Betz 90:26c0c9807ab4 892 @returns uint16_t
Wolfgang Betz 90:26c0c9807ab4 893
Wolfgang Betz 90:26c0c9807ab4 894 @retval value of maximum advertising interval in ms
Wolfgang Betz 90:26c0c9807ab4 895
Wolfgang Betz 90:26c0c9807ab4 896 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 897
Wolfgang Betz 90:26c0c9807ab4 898 @code
Wolfgang Betz 90:26c0c9807ab4 899
Wolfgang Betz 90:26c0c9807ab4 900 @endcode
Wolfgang Betz 90:26c0c9807ab4 901 */
Wolfgang Betz 90:26c0c9807ab4 902 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 903 uint16_t BlueNRGGap::getMaxAdvertisingInterval(void) const {
Wolfgang Betz 90:26c0c9807ab4 904 return advtInterval;
Wolfgang Betz 90:26c0c9807ab4 905 }
Wolfgang Betz 90:26c0c9807ab4 906
Wolfgang Betz 90:26c0c9807ab4 907
Wolfgang Betz 90:26c0c9807ab4 908 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 909 /*!
Wolfgang Betz 90:26c0c9807ab4 910 @brief Gets the value of minimum advertising interval in ms
Wolfgang Betz 90:26c0c9807ab4 911
Wolfgang Betz 90:26c0c9807ab4 912 @returns uint16_t
Wolfgang Betz 90:26c0c9807ab4 913
Wolfgang Betz 90:26c0c9807ab4 914 @retval value of minimum advertising interval in ms
Wolfgang Betz 90:26c0c9807ab4 915
Wolfgang Betz 90:26c0c9807ab4 916 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 917
Wolfgang Betz 90:26c0c9807ab4 918 @code
Wolfgang Betz 90:26c0c9807ab4 919
Wolfgang Betz 90:26c0c9807ab4 920 @endcode
Wolfgang Betz 90:26c0c9807ab4 921 */
Wolfgang Betz 90:26c0c9807ab4 922 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 923 uint16_t BlueNRGGap::getMinAdvertisingInterval(void) const {
Wolfgang Betz 90:26c0c9807ab4 924 return 0; // minimum Advertising interval is 0
Wolfgang Betz 90:26c0c9807ab4 925 }
Wolfgang Betz 90:26c0c9807ab4 926
Wolfgang Betz 90:26c0c9807ab4 927 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 928 /*!
Wolfgang Betz 90:26c0c9807ab4 929 @brief Gets the value of minimum non connectable advertising interval in ms
Wolfgang Betz 90:26c0c9807ab4 930
Wolfgang Betz 90:26c0c9807ab4 931 @returns uint16_t
Wolfgang Betz 90:26c0c9807ab4 932
Wolfgang Betz 90:26c0c9807ab4 933 @retval value of minimum non connectable advertising interval in ms
Wolfgang Betz 90:26c0c9807ab4 934
Wolfgang Betz 90:26c0c9807ab4 935 @section EXAMPLE
Wolfgang Betz 90:26c0c9807ab4 936
Wolfgang Betz 90:26c0c9807ab4 937 @code
Wolfgang Betz 90:26c0c9807ab4 938
Wolfgang Betz 90:26c0c9807ab4 939 @endcode
Wolfgang Betz 90:26c0c9807ab4 940 */
Wolfgang Betz 90:26c0c9807ab4 941 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 942 uint16_t BlueNRGGap::getMinNonConnectableAdvertisingInterval(void) const {
Wolfgang Betz 90:26c0c9807ab4 943 return BLE_GAP_ADV_NONCON_INTERVAL_MIN;
Wolfgang Betz 90:26c0c9807ab4 944 }
Wolfgang Betz 90:26c0c9807ab4 945
Wolfgang Betz 90:26c0c9807ab4 946 // ANDREA
Wolfgang Betz 90:26c0c9807ab4 947 ble_error_t BlueNRGGap::startRadioScan(const GapScanningParams &scanningParams) {
Wolfgang Betz 90:26c0c9807ab4 948 // Empty by now
Wolfgang Betz 90:26c0c9807ab4 949 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 950 }
Wolfgang Betz 90:26c0c9807ab4 951
Wolfgang Betz 90:26c0c9807ab4 952 ble_error_t BlueNRGGap::stopScan() {
Wolfgang Betz 90:26c0c9807ab4 953 // Empty by now
Wolfgang Betz 90:26c0c9807ab4 954 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 955 }
Wolfgang Betz 90:26c0c9807ab4 956
Wolfgang Betz 90:26c0c9807ab4 957 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 958 /*!
Wolfgang Betz 90:26c0c9807ab4 959 @brief set Tx power level
Wolfgang Betz 90:26c0c9807ab4 960 @param[in] txPower Transmission Power level
Wolfgang Betz 90:26c0c9807ab4 961 @returns ble_error_t
Wolfgang Betz 90:26c0c9807ab4 962 */
Wolfgang Betz 90:26c0c9807ab4 963 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 964 ble_error_t BlueNRGGap::setTxPower(int8_t txPower)
Wolfgang Betz 90:26c0c9807ab4 965 {
Wolfgang Betz 115:3b47df81a56b 966 tBleStatus ret;
Wolfgang Betz 115:3b47df81a56b 967
Wolfgang Betz 90:26c0c9807ab4 968 int8_t enHighPower = 0;
Wolfgang Betz 90:26c0c9807ab4 969 int8_t paLevel = 0;
Wolfgang Betz 122:e8e7bc2c9e1c 970 #if NEED_CONSOLE_OUTPUT
Wolfgang Betz 90:26c0c9807ab4 971 int8_t dbmActuallySet = getHighPowerAndPALevelValue(txPower, enHighPower, paLevel);
Wolfgang Betz 122:e8e7bc2c9e1c 972 #endif
Wolfgang Betz 115:3b47df81a56b 973
Wolfgang Betz 90:26c0c9807ab4 974 DEBUG("txPower=%d, dbmActuallySet=%d\n\r", txPower, dbmActuallySet);
Wolfgang Betz 90:26c0c9807ab4 975 DEBUG("enHighPower=%d, paLevel=%d\n\r", enHighPower, paLevel);
Wolfgang Betz 115:3b47df81a56b 976 ret = aci_hal_set_tx_power_level(enHighPower, paLevel);
Wolfgang Betz 115:3b47df81a56b 977 if(ret!=BLE_STATUS_SUCCESS) {
Wolfgang Betz 115:3b47df81a56b 978 return BLE_ERROR_UNSPECIFIED;
Wolfgang Betz 115:3b47df81a56b 979 }
Wolfgang Betz 115:3b47df81a56b 980
Wolfgang Betz 115:3b47df81a56b 981 txPowerAdType = true;
Wolfgang Betz 115:3b47df81a56b 982 return BLE_ERROR_NONE;
Wolfgang Betz 90:26c0c9807ab4 983 }
Wolfgang Betz 90:26c0c9807ab4 984
Wolfgang Betz 90:26c0c9807ab4 985 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 986 /*!
Wolfgang Betz 90:26c0c9807ab4 987 @brief get permitted Tx power values
Wolfgang Betz 90:26c0c9807ab4 988 @param[in] values pointer to pointer to permitted power values
Wolfgang Betz 90:26c0c9807ab4 989 @param[in] num number of values
Wolfgang Betz 90:26c0c9807ab4 990 */
Wolfgang Betz 90:26c0c9807ab4 991 /**************************************************************************/
Wolfgang Betz 90:26c0c9807ab4 992 void BlueNRGGap::getPermittedTxPowerValues(const int8_t **valueArrayPP, size_t *countP) {
Wolfgang Betz 90:26c0c9807ab4 993 static const int8_t permittedTxValues[] = {
Wolfgang Betz 90:26c0c9807ab4 994 -18, -14, -11, -8, -4, -1, 1, 5, -15, -11, -8, -5, -2, 1, 4, 8
Wolfgang Betz 90:26c0c9807ab4 995 };
Wolfgang Betz 90:26c0c9807ab4 996
Wolfgang Betz 90:26c0c9807ab4 997 *valueArrayPP = permittedTxValues;
Wolfgang Betz 90:26c0c9807ab4 998 *countP = sizeof(permittedTxValues) / sizeof(int8_t);
Wolfgang Betz 90:26c0c9807ab4 999 }