Paul Russell / Mbed 2 deprecated bleIOv04_pr

Experimental BLE project showing how IO can be made with an App over BLE. Pointer to matching App will be added when ready, initially this works with: - Android App [nRF-Master Control Panel], supports Write,Read,Notify - Android Project [BluetoothLeGatt]

Dependencies:   BLE_API mbed nRF51822

This is an experimental project for BLE (Bluetooth LE == Bluetooth Low Energy == Bluetooth Smart).

  • It supports general IO over BLE with Read/Notify/Write support.
  • It is compatible with FOTA using Android App "nRF Master Control Panel" (20150126)
  • IO supported by:
    • Custom Android App is in the WIKI under: Android-App, developed from Android Sample "BluetoothLeGatt"
    • Android App: nRF-MCP (Master Control Panel)
    • iOS App LightBlue.
    • General HRM, HTM, Battery and similar apps should be able to access the matching services.
  • It includes combinations of code from other projects, alternative code included can be tried by moving comments (, //)
  • 20150126 bleIO r25: It compiles for both "Nordic nRF51822" and "Nordic nRF51822 FOTA" platforms
  • 20150126 The matching bleIO App (in wiki) doesn't support FOTA yet, use Android App "nRF Master Control Panel"

Feedback and ideas greatly appreciated!!!

main.cpp@7:1097d012b01a, 2014-12-14 (annotated)

Committer:
prussell
Date:
Sun Dec 14 20:35:15 2014 +0000
Revision:
7:1097d012b01a
Parent:
6:5b6fb35b4450
Child:
8:f187ba55aed2
Add UUID16=0x1803 LinkLoss

Who changed what in which revision?

UserRevisionLine numberNew contents of line
prussell 0:0217a862b047 1 //=========Header (PR)
prussell 0:0217a862b047 2 // blePRv04, Initial: 20141210 Paul Russell (mbed user: prussell = PR)
prussell 0:0217a862b047 3 // This sample includes code from several projects found on http://developer.mbed.org, including but not limited to:
prussell 0:0217a862b047 4 // - http://developer.mbed.org/teams/Bluetooth-Low-Energy/code/BLE_HeartRate/
prussell 0:0217a862b047 5 // - https://developer.mbed.org/teams/Bluetooth-Low-Energy/code/BLE_LoopbackUART/
prussell 1:4a25d917fb6a 6 // - https://developer.mbed.org/users/takafuminaka/code/BLE_HTM_by_InTempSensr/
prussell 6:5b6fb35b4450 7 // - https://developer.mbed.org/users/garimagupta002/notebook/ble-uart-lcd-demo/ (Advertise UUID16+UUID128)
prussell 0:0217a862b047 8 // - miscellaneous adopted from more samples...
prussell 0:0217a862b047 9 // Reference:
prussell 0:0217a862b047 10 // - http://developer.mbed.org/teams/Bluetooth-Low-Energy/code/BLE_API/
prussell 0:0217a862b047 11 // - Reference: http://developer.mbed.org/teams/Bluetooth-Low-Energy/code/BLE_API/docs/tip/
prussell 0:0217a862b047 12 // - Reference: http://developer.mbed.org/teams/Bluetooth-Low-Energy/
prussell 0:0217a862b047 13 // Warnings:
prussell 0:0217a862b047 14 // - As of 20141210 it is necessary to use Android App [nRF-Master Control Panel] to ensure any previous connected
prussell 0:0217a862b047 15 // code on mkit is properly Disconnected before trying to connect other Android nRF Apps (nRFToolbox, nRF UART 2.0, etc.).
prussell 0:0217a862b047 16 // As UART device doesn't offer disconnect you may need to load a 3rf sample, then connect, then discoonect, to clear the link.
prussell 0:0217a862b047 17 // Notes:
prussell 0:0217a862b047 18 // - onDataSent() maybe only occuring when confirmed receive by phone, as onDataSent() didn't happen when phone moved out of range.
prussell 0:0217a862b047 19 // - onDisconnect(Reason:8) occured after ~20Tx with no onDataSent() after phone moved out of range, OnTimeout didn't occur at all.
prussell 0:0217a862b047 20 // ToDo: and ToCheck:
prussell 0:0217a862b047 21 // - Re-check where voltatile needed
prussell 0:0217a862b047 22 //==========End of PR's Header
prussell 0:0217a862b047 23
prussell 0:0217a862b047 24 //==========Historic Licencing from original imported sample from mbed website [BLE_HeartRate] ==========
prussell 0:0217a862b047 25 //From: http://developer.mbed.org/teams/Bluetooth-Low-Energy/code/BLE_HeartRate/
prussell 0:0217a862b047 26 /* mbed Microcontroller Library
prussell 0:0217a862b047 27 * Copyright (c) 2006-2013 ARM Limited
prussell 0:0217a862b047 28 *
prussell 0:0217a862b047 29 * Licensed under the Apache License, Version 2.0 (the "License");
prussell 0:0217a862b047 30 * you may not use this file except in compliance with the License.
prussell 0:0217a862b047 31 * You may obtain a copy of the License at
prussell 0:0217a862b047 32 * http://www.apache.org/licenses/LICENSE-2.0
prussell 0:0217a862b047 33 * Unless required by applicable law or agreed to in writing, software
prussell 0:0217a862b047 34 * distributed under the License is distributed on an "AS IS" BASIS,
prussell 0:0217a862b047 35 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
prussell 0:0217a862b047 36 * See the License for the specific language governing permissions and
prussell 0:0217a862b047 37 * limitations under the License. */
prussell 0:0217a862b047 38 //==========end of Historic Licencing ==========
prussell 0:0217a862b047 39
prussell 0:0217a862b047 40
prussell 0:0217a862b047 41 //==========Compile Options==========
prussell 0:0217a862b047 42 #define ENABLE_SerialUSB_DEBUG_CONSOLE 1 //PR: Enable Debug on mbed's USB Serial Debug, Setup: Serial 9600,8,N,1,NoFlowControl (TeraTerm: http://en.sourceforge.jp/projects/ttssh2/releases/)
prussell 0:0217a862b047 43 #define UPDATE_PARAMS_FOR_LONGER_CONNECTION_INTERVAL 0 //PR: Option to slow the connection intervsal possibly saving power (After Connected)
prussell 0:0217a862b047 44
prussell 0:0217a862b047 45 //==========Includes==========
prussell 0:0217a862b047 46 #include "mbed.h"
prussell 1:4a25d917fb6a 47 #include "BLEDevice.h" // BLE
prussell 1:4a25d917fb6a 48 #include "nrf_soc.h" // nRF Internal Temperature Sensor
prussell 0:0217a862b047 49
prussell 0:0217a862b047 50 //Services
prussell 0:0217a862b047 51 #include "BatteryService.h"
prussell 0:0217a862b047 52 #include "DeviceInformationService.h"
prussell 0:0217a862b047 53 //#include "DFUService" //TODO: DFU and FOTA Support
prussell 5:d36bbb315e31 54 #include "HealthThermometerService.h"
prussell 0:0217a862b047 55 #include "HeartRateService.h"
prussell 5:d36bbb315e31 56 #include "LinkLossService.h" //TODO: How support this?
prussell 0:0217a862b047 57 //#include "UARTService.h" //TODO: Add a UART Channel for streaming data like logs?
prussell 0:0217a862b047 58
prussell 0:0217a862b047 59 //==========Debug Console==========
prussell 0:0217a862b047 60 #if ENABLE_SerialUSB_DEBUG_CONSOLE
prussell 6:5b6fb35b4450 61 //Restart TeraTerm just before Pressing Reset on mbed, Default:9600-8N1(No Flow Control)
prussell 6:5b6fb35b4450 62 //Using default baud rate to avoid issues with DEBUG in a constructor being at wrong baud rate before main()
prussell 6:5b6fb35b4450 63 Serial debug_serial(USBTX, USBRX); //PR: DebugSerialOverMbedUSB
prussell 0:0217a862b047 64 #define DEBUG(...) { debug_serial.printf(__VA_ARGS__); }
prussell 0:0217a862b047 65 #else
prussell 6:5b6fb35b4450 66 #define DEBUG(...) //Do Nothing, DEBUG() lines are ignored
prussell 0:0217a862b047 67 #endif
prussell 0:0217a862b047 68
prussell 2:c77c2b06d604 69 //========== This Section is to Create Debug output showing variable prep before main() ==========
prussell 2:c77c2b06d604 70 bool u8_prep_dummy(void) {
prussell 6:5b6fb35b4450 71 DEBUG("\n\nBLE: ____Prep Memory____\n"); //May comment this out if none of the following Objects/Classes call initiator functions with debug
prussell 2:c77c2b06d604 72 return true;
prussell 2:c77c2b06d604 73 }
prussell 2:c77c2b06d604 74 const bool bPrep = u8_prep_dummy();
prussell 2:c77c2b06d604 75
prussell 0:0217a862b047 76 //==========LEDs==========
prussell 0:0217a862b047 77 //LEDs:
prussell 0:0217a862b047 78 //DigitalOut out_led1(LED1); //PR: Firmware heartbeat
prussell 0:0217a862b047 79 //DigitalOut out_led2(LED2); //PR: Firmware heartbeat
prussell 0:0217a862b047 80 PwmOut pwm_led1(LED1); //PR: Firmware Life Indicator
prussell 0:0217a862b047 81 PwmOut pwm_led2(LED2); //TODO: Controlled by App
prussell 0:0217a862b047 82 float f_led1level = 0.0; //Initial Brightness (Typically 0.0~0.5)
prussell 0:0217a862b047 83 float f_led2level = 0.0; //Initial Brightness (Typically 0.0~0.5)
prussell 0:0217a862b047 84
prussell 0:0217a862b047 85 //==========BLE==========
prussell 0:0217a862b047 86 BLEDevice ble;
prussell 0:0217a862b047 87 const static char pcDeviceName[] = "blePRv04"; //PR: Why can App nRF-MCP modify this even though flagged as Const, maybe only temporary mod till App restarts?
prussell 3:a98203f84063 88
prussell 6:5b6fb35b4450 89 //==========UUID==========
prussell 6:5b6fb35b4450 90 //UUID16 List - Advertising these required by App nRF-Toolbox:HRM&HTM
prussell 6:5b6fb35b4450 91 // Keep list short so advertizing not too long.
prussell 0:0217a862b047 92 static const uint16_t uuid16_list[] = { //Service List (Pre-defined standard 16bit services)
prussell 4:976394791d7a 93 // *Order here doesn't affect order in nRF-MCP Discovery of Services
prussell 1:4a25d917fb6a 94 //BLE_UUID_GAP UUID_GENERIC_ACCESS //0x1800 //Included by Default, DeviceName, Appearance, PreferredConnectionParam
prussell 1:4a25d917fb6a 95 //BLE_UUID_GATT UUID_GENERIC ATTRIBUTE //0x1801 //Included by Default, ServiceChanged,
prussell 3:a98203f84063 96 GattService::UUID_HEALTH_THERMOMETER_SERVICE, //0x1809 //HTM (Might need to be first for nRF App)
prussell 1:4a25d917fb6a 97 GattService::UUID_HEART_RATE_SERVICE, //0x180D //HRM, BodyLocation, ControlPoint
prussell 7:1097d012b01a 98 GattService::UUID_DEVICE_INFORMATION_SERVICE, //0x180A //sManufacturer, sModelNumber, sSerialNumber, sHWver, sFWver, sSWver
prussell 7:1097d012b01a 99 GattService::UUID_BATTERY_SERVICE, //0x180F //BatteryLevel
prussell 7:1097d012b01a 100 GattService::UUID_LINK_LOSS_SERVICE, //0x1803 //LinkLoss
prussell 6:5b6fb35b4450 101
prussell 1:4a25d917fb6a 102 //x GattService::UUID_DFU, //0x1530 - See UARTServiceShortUUID in BLE_API:DFUService.cpp //
prussell 5:d36bbb315e31 103 //x GattService::UARTService, //0x0001~0x0003 - See DFUServiceShortUUID in BLE_API:UARTService.cpp //
prussell 1:4a25d917fb6a 104 //GattService::UUID_ALERT_NOTIFICATION_SERVICE, = 0x1811,
prussell 1:4a25d917fb6a 105 //GattService::UUID_CURRENT_TIME_SERVICE, = 0x1805,
prussell 1:4a25d917fb6a 106 //GattService::UUID_HUMAN_INTERFACE_DEVICE_SERVICE, = 0x1812,
prussell 6:5b6fb35b4450 107 //GattService::UUID_IMMEDIATE_ALERT_SERVICE, = 0x1802,
prussell 1:4a25d917fb6a 108 //GattService::UUID_PHONE_ALERT_STATUS_SERVICE, = 0x180E,
prussell 1:4a25d917fb6a 109 //GattService::UUID_REFERENCE_TIME_UPDATE_SERVICE, = 0x1806,
prussell 1:4a25d917fb6a 110 //GattService::UUID_SCAN_PARAMETERS_SERVICE, = 0x1813,
prussell 5:d36bbb315e31 111 };
prussell 5:d36bbb315e31 112
prussell 6:5b6fb35b4450 113 //UUID128 List(Only a single UUID128 can fit in advertising)
prussell 6:5b6fb35b4450 114 uint8_t puUUID128_Bluetooth_Base_Rev[16] = {0xFB,0x34,0x9B,0x5F,0x80,0, 0,0x80, 0,0x10, 0,0, 0x00,0x00, 0,0};//0000****-0000-1000-8000 00805F9B34FB, Base for UUID16
prussell 6:5b6fb35b4450 115 uint8_t puUUID128_BatteryService[16] = {0xFB,0x34,0x9B,0x5F,0x80,0, 0,0x80, 0,0x10, 0,0, 0x0F,0x18, 0,0};//0000****-0000-1000-8000 00805F9B34FB, ***=0x180F
prussell 5:d36bbb315e31 116
prussell 5:d36bbb315e31 117
prussell 6:5b6fb35b4450 118 /* //Adopted from sample code in header of BLE_API:UUID.cpp
prussell 6:5b6fb35b4450 119 // // Create a UUID16 (0x180F)
prussell 6:5b6fb35b4450 120 // uint8_t shortID[16] = { 0, 0, 0x0F, 0x18, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
prussell 6:5b6fb35b4450 121 // UUID ble_uuid = UUID(shortID); // Will have: ble_uuid.type = UUID_TYPE_SHORT, ble_uuid.value = 0x180F
prussell 6:5b6fb35b4450 122 // // Create a UUID128
prussell 6:5b6fb35b4450 123 // uint8_t longID[16] = { 0x00,0x11,0x22,0x33, 0x44,0x55,0x66,0x77, 0x88,0x99,0xAA,0xBB, 0xCC,0xDD,0xEE,0xFF };
prussell 6:5b6fb35b4450 124 // UUID custom_uuid = UUID(longID);// Will have: custom_uuid.type=UUID_TYPE_LONG, custom_uuid.value=0x3322, custom_uuid.base=00 11 22 33 44 55 66 77 88 99 AA BB CC DD EE FF
prussell 6:5b6fb35b4450 125 */
prussell 5:d36bbb315e31 126
prussell 6:5b6fb35b4450 127 /* // The Nordic UART Service
prussell 5:d36bbb315e31 128 //static const uint8_t uart_base_uuid[] = {0x71, 0x3D, 0, 0, 0x50, 0x3E, 0x4C, 0x75, 0xBA, 0x94, 0x31, 0x48, 0xF1, 0x8D, 0x94, 0x1E};
prussell 5:d36bbb315e31 129 //static const uint8_t uart_tx_uuid[] = {0x71, 0x3D, 0, 3, 0x50, 0x3E, 0x4C, 0x75, 0xBA, 0x94, 0x31, 0x48, 0xF1, 0x8D, 0x94, 0x1E};
prussell 5:d36bbb315e31 130 //static const uint8_t uart_rx_uuid[] = {0x71, 0x3D, 0, 2, 0x50, 0x3E, 0x4C, 0x75, 0xBA, 0x94, 0x31, 0x48, 0xF1, 0x8D, 0x94, 0x1E};
prussell 6:5b6fb35b4450 131 //static const uint8_t uart_base_uuid_rev[] = {0x1E, 0x94, 0x8D, 0xF1, 0x48, 0x31, 0x94, 0xBA, 0x75, 0x4C, 0x3E, 0x50, 0, 0, 0x3D, 0x71};// = flip uart_base_uuid[]
prussell 6:5b6fb35b4450 132 //const uint16_t UUID16_UART_Serv = 0x0001;
prussell 6:5b6fb35b4450 133 //const uint16_t UUID16_UART_Tx = 0x0002;
prussell 6:5b6fb35b4450 134 //const uint16_t UUID16_UART_Rx = 0x0003;
prussell 6:5b6fb35b4450 135 //const uint8_t UUID128_UART_Serv[LENGTH_OF_LONG_UUID]={0x6E,0x40,(uint8_t)(UUID16_UART_Serv>>8),(uint8_t)(UUID16_UART_Serv&0xFF),0xB5,0xA3,0xF3,0x93,0xE0,0xA9,0xE5,0x0E,0x24,0xDC,0xCA,0x9E};
prussell 6:5b6fb35b4450 136 //const uint8_t UUID128_UART_Rev[LENGTH_OF_LONG_UUID]={0x9E,0xCA,0xDC,0x24,0x0E,0xE5,0xA9,0xE0,0x93,0xF3,0xA3,0xB5,(uint8_t)(UUID16_UART_Serv&0xFF),(uint8_t)(UUID16_UART_Serv>>8),0x40,0x6E};//Use with: INCOMPLETE_LIST_128BIT_SERVICE_IDS
prussell 6:5b6fb35b4450 137 */
prussell 1:4a25d917fb6a 138
prussell 6:5b6fb35b4450 139 //UUID Info:
prussell 5:d36bbb315e31 140 // 20141213 From https://developer.bluetooth.org/community/lists/community%20discussion/flat.aspx?rootfolder=/community/lists/community+discussion/16+bit+uuid+vs.+128+uuid&folderctid=0x01200200e2f0e56e3d53004dba96bdf0c357551f
prussell 5:d36bbb315e31 141 // 16bit UUID reserved 128bit base = 32 hex digits: 0000****-0000-1000-8000 00805F9B34FB (Careful to use unsigned to avoid negatives and overflows)
prussell 5:d36bbb315e31 142 // 32bit UUID reserved 128bit base = 32 hex digits: ********-0000-1000-8000 00805F9B34FB (Careful to use unsigned to avoid negatives and overflows)
prussell 5:d36bbb315e31 143 /* All the custom GATT based services and characteristics must use a 128 bit UUID.
prussell 5:d36bbb315e31 144 The Bluetooth_Base_UUID is: 00000000-0000-1000-8000 00805F9B34FB.
prussell 5:d36bbb315e31 145 All the 16-bit Attribute UUIDs defined in the adopted specifications use the above base.
prussell 5:d36bbb315e31 146 Generating a 128 bit UUID for custom profiles: For the 128 bit UUID, please refer to The ITU-T Rec. X.667.
prussell 5:d36bbb315e31 147 You can download a free copy of ITU-T Rec. X.667 from http://www.itu.int/ITU-T/studygroups/com17/oid/X.667-E.pdf.
prussell 5:d36bbb315e31 148 In addition if you go to http://www.itu.int/ITU-T/asn1/uuid.html, you can generate a unique 128-bit UUID.
prussell 5:d36bbb315e31 149 Latency: Refer to Core Spec V4.0, Vol 3, Part F - 3.3.1, which is "Ready by Type Request".
prussell 5:d36bbb315e31 150 If you look at the PDU, you have to send 2 bytes UUID for adopted profiles and 16 bytes UUID for custom profiles.
prussell 5:d36bbb315e31 151 There is additional 14 extra bytes over head for the custom profiles for "Ready By Type Request Method"
prussell 5:d36bbb315e31 152 Note: All attribute types are effectively compared as 128-bit UUIDs, even if a 16-bit UUID is provided in this request or defined for an attribute. (See Section 3.2.1.)
prussell 5:d36bbb315e31 153 A suggestive alternative will be to use a notification method, (see 3.4.7.1), where you don't need the 128 bit UUID or the indication method (see 3.4.7.2)
prussell 5:d36bbb315e31 154 */
prussell 4:976394791d7a 155
prussell 6:5b6fb35b4450 156 //========== UUID128 from readable strings based on URL (processed before main()) ==========
prussell 6:5b6fb35b4450 157 // UUID for released product may need to be properly generated, but for testing this can be convenient
prussell 6:5b6fb35b4450 158 // Adopted 20141214 from Nordic PUCK
prussell 6:5b6fb35b4450 159 uint8_t* puStrToUUID128(const char* pStr) {
prussell 6:5b6fb35b4450 160 static uint8_t pUUID[LENGTH_OF_LONG_UUID]; //Call only once before using
prussell 6:5b6fb35b4450 161 for(int i = 0; i < LENGTH_OF_LONG_UUID; i++) {
prussell 6:5b6fb35b4450 162 if( i < strlen(pStr) ){ pUUID[LENGTH_OF_LONG_UUID-i-1] = pStr[i];}
prussell 6:5b6fb35b4450 163 else { pUUID[LENGTH_OF_LONG_UUID-i-1] =' '; } //Pad end with space character (Or your choice of character such as 'u' or 'x' or NULL)
prussell 6:5b6fb35b4450 164 }
prussell 6:5b6fb35b4450 165 // (UUID128 byte order to match that displayed by App nRF-MCP)
prussell 6:5b6fb35b4450 166 DEBUG("UUID: Prep[%-16s] --> [%02x %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x]\n",
prussell 6:5b6fb35b4450 167 pStr, pUUID[15],pUUID[14],pUUID[13],pUUID[12], pUUID[11],pUUID[10],pUUID[ 9],pUUID[ 8],
prussell 6:5b6fb35b4450 168 pUUID[ 7],pUUID[ 6],pUUID[ 5],pUUID[ 4], pUUID[ 3],pUUID[ 2],pUUID[ 1],pUUID[ 0] );
prussell 6:5b6fb35b4450 169 return pUUID; //Pointer to prepared UUID128
prussell 2:c77c2b06d604 170 }
prussell 6:5b6fb35b4450 171 // Strings to UUID128, test url: www.none.com: "0123456789ABCDEF" (16chars=32HexDigits=32nibbles)
prussell 6:5b6fb35b4450 172 //const char pc_com_none_servA[] = "com.none.servA";// Provide a short URL you own (in reverse to match Android naming style)
prussell 6:5b6fb35b4450 173 //const char pc_com_none_charA1[] = "com.none.charA1";
prussell 6:5b6fb35b4450 174 //const char pc_com_none_charA2[] = "com.none.charA2";
prussell 2:c77c2b06d604 175
prussell 0:0217a862b047 176 //==========Functions:Timer==========
prussell 0:0217a862b047 177 static volatile bool b_Ticker1 = false;//Volatile, don't optimize, changes under interrupt control
prussell 0:0217a862b047 178 void CallbackTicker1(void)
prussell 0:0217a862b047 179 {
prussell 0:0217a862b047 180 static uint32_t u32_Counter; // Counter for Debug Output
prussell 0:0217a862b047 181
prussell 0:0217a862b047 182 //pwm_led1 = !pwm_led1; /* Do blinky on LED1 while we're waiting for BLE events */
prussell 0:0217a862b047 183 f_led1level+=0.1; if (f_led1level>0.5){f_led1level = 0.1;}; pwm_led1=f_led1level;//PR: Ramp Blink
prussell 0:0217a862b047 184 DEBUG("\nBLEi: Ticker1(%u) ", ++u32_Counter);
prussell 0:0217a862b047 185 b_Ticker1 = true; //PR: Flag to handle Ticker1 Event in Main loop so interupts not blocked.
prussell 0:0217a862b047 186 }
prussell 0:0217a862b047 187
prussell 0:0217a862b047 188 //==========Functions:BLE==========
prussell 0:0217a862b047 189 void Callback_BLE_onTimeout(void)
prussell 0:0217a862b047 190 {
prussell 0:0217a862b047 191 DEBUG("\nBLEi: Callback_BLE_onTimeout()\n" );
prussell 0:0217a862b047 192 //PR: Haven't seen this, even when phone moved out of range and OnDisconnect(Reason0x08) occurs
prussell 0:0217a862b047 193
prussell 0:0217a862b047 194 //DEBUG("\nBLE:Callback_BLE_onTimeout(), Restarting Advertising\n" );
prussell 0:0217a862b047 195 //ble.startAdvertising();
prussell 0:0217a862b047 196 }
prussell 0:0217a862b047 197
prussell 0:0217a862b047 198 //void onDisconnection (Gap::DisconnectionEventCallback_t disconnectionCallback)
prussell 0:0217a862b047 199 void Callback_BLE_onDisconnect(Gap::Handle_t tHandle, Gap::DisconnectionReason_t eReason)
prussell 0:0217a862b047 200 {
prussell 0:0217a862b047 201 //PR: onDisconnect(Reason:8) occured after ~20Tx with no onDataSent() after phone moved out of range
prussell 0:0217a862b047 202
prussell 0:0217a862b047 203 // REMOTE_USER_TERMINATED_CONNECTION = 0x13 = 19,
prussell 0:0217a862b047 204 // LOCAL_HOST_TERMINATED_CONNECTION = 0x16 = 22,
prussell 0:0217a862b047 205 // CONN_INTERVAL_UNACCEPTABLE = 0x3B = 59,
prussell 0:0217a862b047 206 DEBUG("\nBLEi: Callback_BLE_Disconnect(Handle:%d, eReason:0x%02x), Restarting Advertising\n",tHandle,eReason );//PR: Occurs properly when click disconnect in App nRFToolbox:HRM
prussell 0:0217a862b047 207
prussell 0:0217a862b047 208 //DEBUG("Wait10sec...\n");wait(10.0); //PR: Optional to test effect on advertising
prussell 0:0217a862b047 209 ble.startAdvertising(); // restart advertising
prussell 0:0217a862b047 210 }
prussell 0:0217a862b047 211
prussell 0:0217a862b047 212 //inline void BLEDevice::onConnection(Gap::ConnectionEventCallback_t connectionCallback){ transport->getGap().setOnConnection(connectionCallback);}
prussell 0:0217a862b047 213 void Callback_BLE_onConnect(Gap::Handle_t tHandle, Gap::addr_type_t ePeerAddrType, const Gap::address_t c6PeerAddr, const Gap::ConnectionParams_t *params)
prussell 0:0217a862b047 214 {
prussell 0:0217a862b047 215 DEBUG("\nBLEi: Callback_BLE_Connect(Handle:%d, eType:%d, Add:%u ...)\n", tHandle, ePeerAddrType, c6PeerAddr);
prussell 0:0217a862b047 216
prussell 0:0217a862b047 217 #if UPDATE_PARAMS_FOR_LONGER_CONNECTION_INTERVAL
prussell 0:0217a862b047 218 /* Updating connection parameters can be attempted only after a connection has been
prussell 0:0217a862b047 219 * established. Please note that the ble-Central is still the final arbiter for
prussell 0:0217a862b047 220 * the effective parameters; the peripheral can only hope that the request is
prussell 0:0217a862b047 221 * honored. Please also be mindful of the constraints that might be enforced by
prussell 0:0217a862b047 222 * the BLE stack on the underlying controller.*/
prussell 0:0217a862b047 223 #define MIN_CONN_INTERVAL 250 /**< Minimum connection interval (250 ms) */
prussell 0:0217a862b047 224 #define MAX_CONN_INTERVAL 350 /**< Maximum connection interval (350 ms). */
prussell 0:0217a862b047 225 #define CONN_SUP_TIMEOUT 6000 /**< Connection supervisory timeout (6 seconds). */
prussell 0:0217a862b047 226 #define SLAVE_LATENCY 4
prussell 0:0217a862b047 227
prussell 0:0217a862b047 228 Gap::ConnectionParams_t tGap_conn_params;
prussell 0:0217a862b047 229 tGap_conn_params.minConnectionInterval = Gap::MSEC_TO_GAP_DURATION_UNITS(MIN_CONN_INTERVAL);
prussell 0:0217a862b047 230 tGap_conn_params.maxConnectionInterval = Gap::MSEC_TO_GAP_DURATION_UNITS(MAX_CONN_INTERVAL);
prussell 0:0217a862b047 231 tGap_conn_params.connectionSupervisionTimeout = Gap::MSEC_TO_GAP_DURATION_UNITS(CONN_SUP_TIMEOUT);
prussell 0:0217a862b047 232 tGap_conn_params.slaveLatency = SLAVE_LATENCY;
prussell 0:0217a862b047 233 ble.updateConnectionParams(tHandle, &tGap_conn_params);
prussell 0:0217a862b047 234 #endif /* #if UPDATE_PARAMS_FOR_LONGER_CONNECTION_INTERVAL */
prussell 0:0217a862b047 235 }
prussell 0:0217a862b047 236
prussell 0:0217a862b047 237 static volatile bool bSent = false; //Volatile, don't optimize, changes under interrupt control
prussell 0:0217a862b047 238 static volatile unsigned uSentBLE;
prussell 0:0217a862b047 239 void Callback_BLE_onDataSent(unsigned uSent){
prussell 0:0217a862b047 240 uSentBLE=uSent;
prussell 1:4a25d917fb6a 241 DEBUG("BLEi: SentI(%u)", uSent); //TODO: PR: Why uSent always "1", expected it to match sent bytes length
prussell 0:0217a862b047 242 bSent = true;
prussell 5:d36bbb315e31 243 //PR: App nRF-MCP doesn't cause onDataSent(), while App nRF-ToolBox:HRM does cause onDataSent()
prussell 0:0217a862b047 244 //PR: onDataSent() maybe only occuring when confirmed receive by phone, as onDataSent() didn't happen when phone moved out of range.
prussell 0:0217a862b047 245 }
prussell 0:0217a862b047 246
prussell 0:0217a862b047 247 void Callback_BLE_onDataWritten(const GattCharacteristicWriteCBParams *pParams)
prussell 0:0217a862b047 248 {
prussell 0:0217a862b047 249 // Callback_BLE_onDataWritten == This does occur when use nRF-MCP to save New Heart Rate Control Point (Ignored if incorrect length)
prussell 0:0217a862b047 250
prussell 0:0217a862b047 251 //Warning: *data may not be NULL terminated
prussell 0:0217a862b047 252 DEBUG("\nBLEi: Callback_BLE_onDataWritten(Handle:%d, eOp:%d, uOffset:%u uLen:%u Data0[0x%02x]=Data[%*s]\n", pParams->charHandle, pParams->op, pParams->offset, pParams->len, (char)(pParams->data[0]), pParams->len, pParams->data);
prussell 0:0217a862b047 253 }
prussell 0:0217a862b047 254
prussell 0:0217a862b047 255 void Callback_BLE_onUpdatesEnabled(Gap::Handle_t tHandle)
prussell 0:0217a862b047 256 {
prussell 0:0217a862b047 257 DEBUG("\nBLEi: Callback_BLE_onUpdates(Handle:%d)\r\n", tHandle);
prussell 0:0217a862b047 258 }
prussell 0:0217a862b047 259
prussell 5:d36bbb315e31 260 // Adopted 20141213 from http://developer.mbed.org/teams/Bluetooth-Low-Energy/code/BLE_LinkLoss/file/440ee5e8595f/main.cpp
prussell 5:d36bbb315e31 261 void Callback_BLE_onLinkLoss(LinkLossService::AlertLevel_t level)
prussell 5:d36bbb315e31 262 {
prussell 5:d36bbb315e31 263 printf("\nBLEi: Link loss alert[%d]\n", level);
prussell 5:d36bbb315e31 264 }
prussell 5:d36bbb315e31 265
prussell 0:0217a862b047 266 //==========main==========
prussell 0:0217a862b047 267 int main(void)
prussell 0:0217a862b047 268 {
prussell 0:0217a862b047 269 f_led1level = 1; pwm_led1 = f_led1level;//Start LED1=OnMax
prussell 0:0217a862b047 270 f_led2level = 1; pwm_led2 = f_led2level;//Start LED2=OnMax
prussell 6:5b6fb35b4450 271
prussell 6:5b6fb35b4450 272 //Restart TeraTerm just before Pressing Reset on mbed, 9600-8N1(No Flow Control)
prussell 6:5b6fb35b4450 273 DEBUG("\nBLE: ___%s___\n", pcDeviceName);
prussell 1:4a25d917fb6a 274 DEBUG("BLE: Connect App for Data: nRF-MCP, nRF-Toolbox:HRM, etc.\n");
prussell 0:0217a862b047 275
prussell 0:0217a862b047 276 Ticker ticker1; //PR: Timer Object(Structure)
prussell 0:0217a862b047 277 ticker1.attach(CallbackTicker1, 2.0); //PR: Timer Handler, Float=PeriodSeconds
prussell 0:0217a862b047 278
prussell 3:a98203f84063 279 //BLE1: Setup BLE Service (and event actions) //TODO: Check for services declared before main() - Is that OK?
prussell 3:a98203f84063 280 DEBUG("BLE: Setup BLE\n");
prussell 0:0217a862b047 281 ble.init();
prussell 0:0217a862b047 282 ble.onDisconnection(Callback_BLE_onDisconnect);
prussell 0:0217a862b047 283 ble.onConnection(Callback_BLE_onConnect); //PR: Not required if no actions enabled, enabled now just for debug printf()
prussell 0:0217a862b047 284 ble.onDataSent(Callback_BLE_onDataSent);
prussell 0:0217a862b047 285 ble.onDataWritten(Callback_BLE_onDataWritten);
prussell 0:0217a862b047 286 ble.onTimeout(Callback_BLE_onTimeout);
prussell 0:0217a862b047 287 ble.onUpdatesEnabled(Callback_BLE_onUpdatesEnabled);
prussell 0:0217a862b047 288
prussell 0:0217a862b047 289 //ble_error_t readCharacteristicValue ( uint16_t handle, uint8_t *const buffer, uint16_t *const lengthP )
prussell 0:0217a862b047 290 //ble_error_t updateCharacteristicValue (uint16_t handle, const uint8_t *value, uint16_t size, bool localOnly=false)
prussell 0:0217a862b047 291
prussell 4:976394791d7a 292 //UUID List by Services that are setup
prussell 6:5b6fb35b4450 293 //BLE2: Setup Services (with their initial values and options)
prussell 3:a98203f84063 294 DEBUG("BLE: Setup Services\n");
prussell 4:976394791d7a 295 // *Order here affects order in nRF-MCP Discovery of Services
prussell 6:5b6fb35b4450 296 HealthThermometerService htmService(ble, 33.3, HealthThermometerService::LOCATION_EAR);
prussell 6:5b6fb35b4450 297 BatteryService battService(ble, 10);
prussell 4:976394791d7a 298 HeartRateService hrmService(ble, (uint8_t)111, HeartRateService::LOCATION_FINGER);
prussell 4:976394791d7a 299 DeviceInformationService deviceInfo(ble, "Maker", pcDeviceName, "sn1234", "hw00", "fw00", "sw00");//(BLEDevice), pcManufacturer, pcModelNumber, pcSerialNumber, pcHWver, pcFWver, pcSWver
prussell 6:5b6fb35b4450 300 LinkLossService linkLoss(ble, Callback_BLE_onLinkLoss, LinkLossService::HIGH_ALERT); //New20141213, TBD
prussell 5:d36bbb315e31 301
prussell 3:a98203f84063 302 //BLE3: Setup advertising
prussell 6:5b6fb35b4450 303 // Note the Advertising payload is limited to 31bytes, so careful don't overflow this. Multiple UUID16's or a single UUID128 are possible in advertising.
prussell 6:5b6fb35b4450 304 // If there isn't enough space, then the accumulatepayload won't add that block to the advertising, it won't add a partial block.
prussell 3:a98203f84063 305 DEBUG("BLE: Setup Advertising\n");
prussell 6:5b6fb35b4450 306 ble.clearAdvertisingPayload(); //Prep
prussell 6:5b6fb35b4450 307 ble.setAdvertisingInterval(Gap::MSEC_TO_ADVERTISEMENT_DURATION_UNITS(1000)); //PR: Advertise 1sec (1Hz)
prussell 6:5b6fb35b4450 308 ble.setAdvertisingType(GapAdvertisingParams::ADV_CONNECTABLE_UNDIRECTED); //PR: TODO: To Study
prussell 6:5b6fb35b4450 309 ble.accumulateAdvertisingPayload(GapAdvertisingData::BREDR_NOT_SUPPORTED | GapAdvertisingData::LE_GENERAL_DISCOVERABLE); //PR: BLE Only (Option:LE_LIMITED_DISCOVERABLE)
prussell 6:5b6fb35b4450 310 // Does "LE_GENERAL_DISCOVERABLE" affect whether UUID needs to be advertised to discover services?
prussell 6:5b6fb35b4450 311 //ble.accumulateAdvertisingPayload(GapAdvertisingData::INCOMPLETE_LIST_128BIT_SERVICE_IDS, (const uint8_t *)UUID128_UART_Rev, sizeof(UUID128_UART_Rev)); //Single UUID128
prussell 6:5b6fb35b4450 312 //ble.accumulateAdvertisingPayload(GapAdvertisingData::INCOMPLETE_LIST_128BIT_SERVICE_IDS, (const uint8_t *)puUUID128_BatteryService, sizeof(puUUID128_BatteryService)); //Single UUID128
prussell 6:5b6fb35b4450 313 //ble.accumulateAdvertisingPayload(GapAdvertisingData::INCOMPLETE_LIST_128BIT_SERVICE_IDS, puStrToUUID128( pc_com_none_servA), LENGTH_OF_LONG_UUID); //Single UUID128
prussell 6:5b6fb35b4450 314 //ble.accumulateAdvertisingPayload(GapAdvertisingData::INCOMPLETE_LIST_16BIT_SERVICE_IDS, (uint8_t *)uuid16_list, sizeof(uuid16_list)); // Multiple UUID16
prussell 6:5b6fb35b4450 315 ble.accumulateAdvertisingPayload(GapAdvertisingData::COMPLETE_LIST_16BIT_SERVICE_IDS, (uint8_t *)uuid16_list, sizeof(uuid16_list)); // Multiple UUID16
prussell 6:5b6fb35b4450 316 //ble.accumulateAdvertisingPayload(GapAdvertisingData::GENERIC_HEART_RATE_SENSOR);//PR: Add Appearance::HeartRate (HRM Connects without this)
prussell 6:5b6fb35b4450 317 //ble.accumulateAdvertisingPayload(GapAdvertisingData::GENERIC_THERMOMETER); //PR: Add Appearance::Thermometer (HTM Connects without this, though float format still needs change)
prussell 6:5b6fb35b4450 318 // Add LocalName last so if Advertising too long will easily see as Name won't be available for the device.
prussell 6:5b6fb35b4450 319 ble.accumulateAdvertisingPayload(GapAdvertisingData::COMPLETE_LOCAL_NAME, (uint8_t *)pcDeviceName, sizeof(pcDeviceName)-1);//PR: LocalName (No NULL)
prussell 6:5b6fb35b4450 320 ble.startAdvertising();
prussell 3:a98203f84063 321
prussell 6:5b6fb35b4450 322 // Raw Advertizing max length 31bytes: 0x01020304050607080910111213141516171819202122232425262728293031
prussell 6:5b6fb35b4450 323 // Example Raw Advertising caught by App nRF-MCP: 0x020106070309180A180D180909626C655052763034
prussell 6:5b6fb35b4450 324 // = Len02 Type01 Value06 (Flags: BREDR_NOT_SUPPORTED, LE_GENERAL_DISCOVERABLE)
prussell 6:5b6fb35b4450 325 // = Len07 Type03 Values: 0918 0A18 0D18 (ListUUID16: 1809 180A 180D )
prussell 6:5b6fb35b4450 326 // = Len09 Type09 Values: 62 6C 65 50 52 76 30 34 (LocalName = "blePRv04")
prussell 5:d36bbb315e31 327
prussell 6:5b6fb35b4450 328 // Example Raw Advertising caught by App nRF-MCP: 0x02010611069ECADC240EE5A9E093F3A3B50100406E090209180A180D180F18 (==Max Length)
prussell 6:5b6fb35b4450 329 // = Len02 Type01 Value06 (Flags: BREDR_NOT_SUPPORTED, LE_GENERAL_DISCOVERABLE)
prussell 6:5b6fb35b4450 330 // = Len11 Type06 Value9ECADC240EE5A9E093F3A3B5_0100_406E (UUID128: NordicUART=0x0001)
prussell 6:5b6fb35b4450 331 // = Len09 Type02 Values:0918 0A18 0D18 0F18 (UUID16: 1809 180A 180D 180F)
prussell 6:5b6fb35b4450 332 // = LocalName field wasn't appended as insufficient space, so Device won't be named when scanning.
prussell 6:5b6fb35b4450 333
prussell 6:5b6fb35b4450 334 // Example Raw Advertising caught by App nRF-MCP: 0x0201061106FB349B5F80000080001000000F180000070209180A180D18
prussell 6:5b6fb35b4450 335 // = Len02 Type01 Value06 (Flags: BREDR_NOT_SUPPORTED, LE_GENERAL_DISCOVERABLE)
prussell 6:5b6fb35b4450 336 // = Len11 Type06 ValueFB349B5F8000008000100000_0F18_0000 (UUID128: BluetoothBattery=0x180F)
prussell 6:5b6fb35b4450 337 // = Len07 Type02 Value 0918 0A18 0D18 (UUID16: 1809 180A 180D )
prussell 6:5b6fb35b4450 338 // = LocalName field wasn't appended as insufficient space, so Device won't be named when scanning.
prussell 0:0217a862b047 339
prussell 0:0217a862b047 340 DEBUG("BLE: Main Loop\n");
prussell 0:0217a862b047 341 uint32_t u32_wakeevents=0, u32_wakelast=0; // Counter&Register for tracking Wake Events (to see monitor their Frequency)
prussell 0:0217a862b047 342 while (true) {
prussell 0:0217a862b047 343 if (b_Ticker1 && ble.getGapState().connected) { //If Ticker1 and Connected Update Data
prussell 0:0217a862b047 344 b_Ticker1 = false; // Clear flag for next Ticker1, see CallbackTicker1()
prussell 3:a98203f84063 345
prussell 3:a98203f84063 346 // Read Sensors, and update matching Service Characteristics (only if connected)
prussell 4:976394791d7a 347 // *Order here doesn't affect order in nRF-MCP Discovery of Services
prussell 4:976394791d7a 348 float update_htm(void); //prototype
prussell 3:a98203f84063 349 uint8_t update_hrm(void); //prototype
prussell 3:a98203f84063 350 uint8_t update_batt(void);//prototype
prussell 6:5b6fb35b4450 351 //TBD: Maybe save power by not Tx unless enabled by App?
prussell 6:5b6fb35b4450 352 // The Services are discovered if they were setup/started (They don't need update to be discovered)
prussell 4:976394791d7a 353 htmService.updateTemperature( update_htm() );
prussell 3:a98203f84063 354 hrmService.updateHeartRate( update_hrm() );
prussell 3:a98203f84063 355 battService.updateBatteryLevel( update_batt() );
prussell 3:a98203f84063 356
prussell 3:a98203f84063 357 DEBUG("BLE: Wakes:%u Delta:%d ", u32_wakeevents, u32_wakeevents-u32_wakelast); //For Evaluating Timing
prussell 3:a98203f84063 358 u32_wakelast = u32_wakeevents;
prussell 0:0217a862b047 359 } else if (b_Ticker1) {
prussell 0:0217a862b047 360 b_Ticker1 = false; // Clear flag for next Ticker1, see CallbackTicker1()
prussell 3:a98203f84063 361 DEBUG("BLE: Tick while unconnected ");
prussell 0:0217a862b047 362 } else if (bSent){
prussell 0:0217a862b047 363 bSent=false; //clear flag
prussell 3:a98203f84063 364 //DEBUG("BLE: Sent %ubytes ", uSentBLE);
prussell 0:0217a862b047 365 } else {
prussell 3:a98203f84063 366 //DEBUG("BLE: Wait for Event\n\r"); //x Debug output here causes unnecessary wakes resulting in endless awakes.
prussell 0:0217a862b047 367 ble.waitForEvent(); //PR: Wait for event - Yield control to BLE Stack and other events (Process ALL pending events before waiting again)
prussell 0:0217a862b047 368 f_led2level+=0.25; if (f_led2level>0.5){f_led2level = 0.0;}; pwm_led2=f_led2level;//PR: Ramp Blink
prussell 0:0217a862b047 369 u32_wakeevents++; //PR: Count events for frequency monitoring (20141207PR: nRF51822 mbed HRM = 50Hz)
prussell 0:0217a862b047 370 }
prussell 0:0217a862b047 371 }
prussell 0:0217a862b047 372 }
prussell 3:a98203f84063 373
prussell 3:a98203f84063 374 //==========HRM==========
prussell 3:a98203f84063 375 //Adopted 2014Dec from http://developer.mbed.org/teams/Bluetooth-Low-Energy/code/BLE_HeartRate/
prussell 3:a98203f84063 376 uint8_t update_hrm(void)//(bool bInit)
prussell 3:a98203f84063 377 {
prussell 3:a98203f84063 378 static uint8_t u8_hrm = 100;
prussell 3:a98203f84063 379 u8_hrm++;
prussell 3:a98203f84063 380 if (u8_hrm >= 175) {
prussell 3:a98203f84063 381 u8_hrm = 100;
prussell 3:a98203f84063 382 DEBUG("BLE: HRM Rollover175->100 ");
prussell 3:a98203f84063 383 }
prussell 3:a98203f84063 384 DEBUG("[HRM:%d]", u8_hrm);
prussell 3:a98203f84063 385 return(u8_hrm);
prussell 3:a98203f84063 386 }
prussell 3:a98203f84063 387 //==========HTM:Internal Temperature==========
prussell 3:a98203f84063 388 //Adopted 2014Dec from: https://developer.mbed.org/users/takafuminaka/code/BLE_HTM_by_InTempSensr/
prussell 3:a98203f84063 389 // Service: https://developer.bluetooth.org/gatt/services/Pages/ServiceViewer.aspx?u=org.bluetooth.service.health_thermometer.xml
prussell 3:a98203f84063 390 // HTM Char: https://developer.bluetooth.org/gatt/characteristics/Pages/CharacteristicViewer.aspx?u=org.bluetooth.characteristic.temperature_measurement.xml
prussell 3:a98203f84063 391
prussell 3:a98203f84063 392 //****Although nRF-MCP displays float OK, the HTM Apps don't, its possible IEEE format required like in the original code:BLE_HTM_by_InTempSensr
prussell 3:a98203f84063 393 float update_htm(void)
prussell 3:a98203f84063 394 {
prussell 3:a98203f84063 395 //static float fTemperature = 0;//-123.456;
prussell 3:a98203f84063 396 int32_t i32_temp;
prussell 3:a98203f84063 397 sd_temp_get(&i32_temp); //Read the nRF Internal Temperature (Die in 0.25'C steps, Counting From TBD), TODO:Check Scaling
prussell 3:a98203f84063 398 float fTemperature = (float(i32_temp)/4.0) - 16.0; // Scale&Shift (0.25'C from -16'C?)
prussell 3:a98203f84063 399 DEBUG("[HTMi:%d HTMf:%f]", i32_temp, fTemperature);
prussell 4:976394791d7a 400
prussell 4:976394791d7a 401 //{//Force to IEEE format to match needs of Apps like nRF-HTM and nRF-Toolbox:HTM
prussell 4:976394791d7a 402 // PR: Didn't work 20141213, might need more of style from BLE_HTM_by_InTempSensr if this is really necessary. OK in nRF-MCP for now.
prussell 4:976394791d7a 403 // uint8_t exponent = 0xFE; //exponent is -2
prussell 4:976394791d7a 404 // uint32_t mantissa = (uint32_t)(fTemperature*100);
prussell 4:976394791d7a 405 // uint32_t temp_ieee11073 = ((((uint32_t)exponent) << 24) | (mantissa)); //Note: Assumes Mantissa within 24bits
prussell 4:976394791d7a 406 // memcpy(((uint8_t*)&fTemperature)+1, (uint8_t*)&temp_ieee11073, 4); //Overwrite with IEEE format float
prussell 4:976394791d7a 407 //}
prussell 4:976394791d7a 408
prussell 3:a98203f84063 409 return(fTemperature);
prussell 3:a98203f84063 410 }
prussell 3:a98203f84063 411 //==========Battery==========
prussell 3:a98203f84063 412 uint8_t update_batt(void)
prussell 3:a98203f84063 413 {
prussell 3:a98203f84063 414 static uint8_t u8_BattPercent=33; //Level: 0..100%
prussell 3:a98203f84063 415 u8_BattPercent <= 50 ? u8_BattPercent=100 : u8_BattPercent--; // Simulate Battery Decay
prussell 3:a98203f84063 416 DEBUG("[BATT:%d%%]", u8_BattPercent);
prussell 3:a98203f84063 417 return(u8_BattPercent);
prussell 3:a98203f84063 418 }
prussell 6:5b6fb35b4450 419 //========== end ==========