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@5:d36bbb315e31, 2014-12-14 (annotated)

Committer:
prussell
Date:
Sun Dec 14 01:06:16 2014 +0000
Revision:
5:d36bbb315e31
Parent:
4:976394791d7a
Child:
6:5b6fb35b4450
Added OnLinkLoss. Works in mbed, Need an App with Notify support to see how that works

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 0:0217a862b047 7 // - miscellaneous adopted from more samples...
prussell 0:0217a862b047 8 // Reference:
prussell 0:0217a862b047 9 // - http://developer.mbed.org/teams/Bluetooth-Low-Energy/code/BLE_API/
prussell 0:0217a862b047 10 // - Reference: http://developer.mbed.org/teams/Bluetooth-Low-Energy/code/BLE_API/docs/tip/
prussell 0:0217a862b047 11 // - Reference: http://developer.mbed.org/teams/Bluetooth-Low-Energy/
prussell 0:0217a862b047 12 // Warnings:
prussell 0:0217a862b047 13 // - As of 20141210 it is necessary to use Android App [nRF-Master Control Panel] to ensure any previous connected
prussell 0:0217a862b047 14 // code on mkit is properly Disconnected before trying to connect other Android nRF Apps (nRFToolbox, nRF UART 2.0, etc.).
prussell 0:0217a862b047 15 // 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 16 // Notes:
prussell 0:0217a862b047 17 // - onDataSent() maybe only occuring when confirmed receive by phone, as onDataSent() didn't happen when phone moved out of range.
prussell 0:0217a862b047 18 // - onDisconnect(Reason:8) occured after ~20Tx with no onDataSent() after phone moved out of range, OnTimeout didn't occur at all.
prussell 0:0217a862b047 19 // ToDo: and ToCheck:
prussell 0:0217a862b047 20 // - Re-check where voltatile needed
prussell 0:0217a862b047 21 //==========End of PR's Header
prussell 0:0217a862b047 22
prussell 0:0217a862b047 23 //==========Historic Licencing from original imported sample from mbed website [BLE_HeartRate] ==========
prussell 0:0217a862b047 24 //From: http://developer.mbed.org/teams/Bluetooth-Low-Energy/code/BLE_HeartRate/
prussell 0:0217a862b047 25 /* mbed Microcontroller Library
prussell 0:0217a862b047 26 * Copyright (c) 2006-2013 ARM Limited
prussell 0:0217a862b047 27 *
prussell 0:0217a862b047 28 * Licensed under the Apache License, Version 2.0 (the "License");
prussell 0:0217a862b047 29 * you may not use this file except in compliance with the License.
prussell 0:0217a862b047 30 * You may obtain a copy of the License at
prussell 0:0217a862b047 31 * http://www.apache.org/licenses/LICENSE-2.0
prussell 0:0217a862b047 32 * Unless required by applicable law or agreed to in writing, software
prussell 0:0217a862b047 33 * distributed under the License is distributed on an "AS IS" BASIS,
prussell 0:0217a862b047 34 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
prussell 0:0217a862b047 35 * See the License for the specific language governing permissions and
prussell 0:0217a862b047 36 * limitations under the License. */
prussell 0:0217a862b047 37 //==========end of Historic Licencing ==========
prussell 0:0217a862b047 38
prussell 0:0217a862b047 39
prussell 0:0217a862b047 40 //==========Compile Options==========
prussell 0:0217a862b047 41 #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 42 #define UPDATE_PARAMS_FOR_LONGER_CONNECTION_INTERVAL 0 //PR: Option to slow the connection intervsal possibly saving power (After Connected)
prussell 0:0217a862b047 43
prussell 0:0217a862b047 44 //==========Includes==========
prussell 0:0217a862b047 45 #include "mbed.h"
prussell 1:4a25d917fb6a 46 #include "BLEDevice.h" // BLE
prussell 1:4a25d917fb6a 47 #include "nrf_soc.h" // nRF Internal Temperature Sensor
prussell 0:0217a862b047 48
prussell 0:0217a862b047 49 //Services
prussell 0:0217a862b047 50 #include "BatteryService.h"
prussell 0:0217a862b047 51 #include "DeviceInformationService.h"
prussell 0:0217a862b047 52 //#include "DFUService" //TODO: DFU and FOTA Support
prussell 5:d36bbb315e31 53 #include "HealthThermometerService.h"
prussell 0:0217a862b047 54 #include "HeartRateService.h"
prussell 5:d36bbb315e31 55 #include "LinkLossService.h" //TODO: How support this?
prussell 0:0217a862b047 56 //#include "UARTService.h" //TODO: Add a UART Channel for streaming data like logs?
prussell 0:0217a862b047 57
prussell 0:0217a862b047 58 //==========Debug Console==========
prussell 0:0217a862b047 59 #if ENABLE_SerialUSB_DEBUG_CONSOLE
prussell 0:0217a862b047 60 Serial debug_serial(USBTX, USBRX); //PR: DebugSerialOverMbedUSB 9600-8N1N
prussell 0:0217a862b047 61 #define DEBUG(...) { debug_serial.printf(__VA_ARGS__); }
prussell 0:0217a862b047 62 #else
prussell 0:0217a862b047 63 #define DEBUG(...) //Do Nothing
prussell 0:0217a862b047 64 #endif
prussell 0:0217a862b047 65
prussell 2:c77c2b06d604 66 //========== This Section is to Create Debug output showing variable prep before main() ==========
prussell 2:c77c2b06d604 67 bool u8_prep_dummy(void) {
prussell 2:c77c2b06d604 68 DEBUG("\n\nBLE: ____Prep Memory____\n");
prussell 2:c77c2b06d604 69 return true;
prussell 2:c77c2b06d604 70 }
prussell 2:c77c2b06d604 71 const bool bPrep = u8_prep_dummy();
prussell 2:c77c2b06d604 72
prussell 0:0217a862b047 73 //==========LEDs==========
prussell 0:0217a862b047 74 //LEDs:
prussell 0:0217a862b047 75 //DigitalOut out_led1(LED1); //PR: Firmware heartbeat
prussell 0:0217a862b047 76 //DigitalOut out_led2(LED2); //PR: Firmware heartbeat
prussell 0:0217a862b047 77 PwmOut pwm_led1(LED1); //PR: Firmware Life Indicator
prussell 0:0217a862b047 78 PwmOut pwm_led2(LED2); //TODO: Controlled by App
prussell 0:0217a862b047 79 float f_led1level = 0.0; //Initial Brightness (Typically 0.0~0.5)
prussell 0:0217a862b047 80 float f_led2level = 0.0; //Initial Brightness (Typically 0.0~0.5)
prussell 0:0217a862b047 81
prussell 0:0217a862b047 82 //==========BLE==========
prussell 0:0217a862b047 83 BLEDevice ble;
prussell 0:0217a862b047 84 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 85
prussell 3:a98203f84063 86 //UUID List by Advertised 16bit UUID list (PartA)
prussell 0:0217a862b047 87 static const uint16_t uuid16_list[] = { //Service List (Pre-defined standard 16bit services)
prussell 4:976394791d7a 88 // *Order here doesn't affect order in nRF-MCP Discovery of Services
prussell 1:4a25d917fb6a 89 //BLE_UUID_GAP UUID_GENERIC_ACCESS //0x1800 //Included by Default, DeviceName, Appearance, PreferredConnectionParam
prussell 1:4a25d917fb6a 90 //BLE_UUID_GATT UUID_GENERIC ATTRIBUTE //0x1801 //Included by Default, ServiceChanged,
prussell 3:a98203f84063 91 GattService::UUID_HEALTH_THERMOMETER_SERVICE, //0x1809 //HTM (Might need to be first for nRF App)
prussell 1:4a25d917fb6a 92 GattService::UUID_DEVICE_INFORMATION_SERVICE, //0x180A //sManufacturer, sModelNumber, sSerialNumber, sHWver, sFWver, sSWver
prussell 1:4a25d917fb6a 93 GattService::UUID_HEART_RATE_SERVICE, //0x180D //HRM, BodyLocation, ControlPoint
prussell 4:976394791d7a 94 GattService::UUID_BATTERY_SERVICE, //0x180F //BatteryLevel
prussell 3:a98203f84063 95 // GattService::UUID_HEALTH_THERMOMETER_SERVICE, //0x1809 //HTM
prussell 1:4a25d917fb6a 96 //x GattService::UUID_DFU, //0x1530 - See UARTServiceShortUUID in BLE_API:DFUService.cpp //
prussell 5:d36bbb315e31 97 //x GattService::UARTService, //0x0001~0x0003 - See DFUServiceShortUUID in BLE_API:UARTService.cpp //
prussell 1:4a25d917fb6a 98 //GattService::UUID_ALERT_NOTIFICATION_SERVICE, = 0x1811,
prussell 1:4a25d917fb6a 99 //GattService::UUID_CURRENT_TIME_SERVICE, = 0x1805,
prussell 1:4a25d917fb6a 100 //GattService::UUID_HUMAN_INTERFACE_DEVICE_SERVICE, = 0x1812,
prussell 1:4a25d917fb6a 101 //GattService::UUID_IMMEDIATE_ALERT_SERVICE, = 0x1802,
prussell 1:4a25d917fb6a 102 //GattService::UUID_LINK_LOSS_SERVICE, = 0x1803,
prussell 1:4a25d917fb6a 103 //GattService::UUID_PHONE_ALERT_STATUS_SERVICE, = 0x180E,
prussell 1:4a25d917fb6a 104 //GattService::UUID_REFERENCE_TIME_UPDATE_SERVICE, = 0x1806,
prussell 1:4a25d917fb6a 105 //GattService::UUID_SCAN_PARAMETERS_SERVICE, = 0x1813,
prussell 5:d36bbb315e31 106 };
prussell 5:d36bbb315e31 107
prussell 5:d36bbb315e31 108
prussell 5:d36bbb315e31 109
prussell 5:d36bbb315e31 110 //build a 128bit UUID table
prussell 5:d36bbb315e31 111 // 0000****-0000-1000-8000 00805F9B34FB == Base for 16bit IDs
prussell 5:d36bbb315e31 112 //static const
prussell 5:d36bbb315e31 113
prussell 5:d36bbb315e31 114 // The Nordic UART Service
prussell 5:d36bbb315e31 115 //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 116 //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 117 //static const uint8_t uart_rx_uuid[] = {0x71, 0x3D, 0, 2, 0x50, 0x3E, 0x4C, 0x75, 0xBA, 0x94, 0x31, 0x48, 0xF1, 0x8D, 0x94, 0x1E};
prussell 5:d36bbb315e31 118 //static const uint8_t uart_base_uuid_rev[] = {0x1E, 0x94, 0x8D, 0xF1, 0x48, 0x31, 0x94, 0xBA, 0x75, 0x4C, 0x3E, 0x50, 0, 0, 0x3D, 0x71};
prussell 5:d36bbb315e31 119 //const uint8_t UARTServiceUUID[LENGTH_OF_LONG_UUID] = { 0x6E, 0x40, (uint8_t)(UARTServiceShortUUID >> 8), (uint8_t)(UARTServiceShortUUID & 0xFF), 0xB5, 0xA3, 0xF3, 0x93, 0xE0, 0xA9, 0xE5, 0x0E, 0x24, 0xDC, 0xCA, 0x9E,};
prussell 5:d36bbb315e31 120 //const uint8_t UARTServiceUUID_reversed[LENGTH_OF_LONG_UUID] = { 0x9E, 0xCA, 0xDC, 0x24, 0x0E, 0xE5, 0xA9, 0xE0, 0x93, 0xF3, 0xA3, 0xB5, (uint8_t)(UARTServiceShortUUID & 0xFF), (uint8_t)(UARTServiceShortUUID >> 8), 0x40, 0x6E };
prussell 1:4a25d917fb6a 121
prussell 5:d36bbb315e31 122 // 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 123 // 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 124 // 32bit UUID reserved 128bit base = 32 hex digits: ********-0000-1000-8000 00805F9B34FB (Careful to use unsigned to avoid negatives and overflows)
prussell 5:d36bbb315e31 125 /* All the custom GATT based services and characteristics must use a 128 bit UUID.
prussell 5:d36bbb315e31 126 The Bluetooth_Base_UUID is: 00000000-0000-1000-8000 00805F9B34FB.
prussell 5:d36bbb315e31 127 All the 16-bit Attribute UUIDs defined in the adopted specifications use the above base.
prussell 5:d36bbb315e31 128 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 129 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 130 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 131 Latency: Refer to Core Spec V4.0, Vol 3, Part F - 3.3.1, which is "Ready by Type Request".
prussell 5:d36bbb315e31 132 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 133 There is additional 14 extra bytes over head for the custom profiles for "Ready By Type Request Method"
prussell 5:d36bbb315e31 134 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 135 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 136 */
prussell 2:c77c2b06d604 137 //========== Prep UUID list (before main()) ==========
prussell 5:d36bbb315e31 138 // Adopted 2014Dec from PUCK and http://developer.mbed.org/users/Bobty/code/BLE_ScoringDevice/
prussell 4:976394791d7a 139
prussell 4:976394791d7a 140 //TODO: Unfinished new code style from http://developer.mbed.org/users/Bobty/code/BLE_ScoringDevice/
prussell 4:976394791d7a 141
prussell 5:d36bbb315e31 142 //const UUID IR_SERVICE_UUID = stringToUUID("hello ");
prussell 5:d36bbb315e31 143 //const UUID COMMAND_UUID = stringToUUID("hello command ");
prussell 5:d36bbb315e31 144
prussell 3:a98203f84063 145 //UUID List by Advertised 128bit UUID list (PartA, ToDo:)
prussell 2:c77c2b06d604 146 // Gatt characteristic and service UUIDs - Readable to UUID
prussell 2:c77c2b06d604 147 const UUID stringToUUID(const char* str) {
prussell 2:c77c2b06d604 148 uint8_t array[16] = {0x55,0x55,0x55,0x55, 0x55,0x55,0x55,0x55, 0x55,0x55,0x55,0x55, 0x55,0x55,0x55,0x55};//Prefill 'U' so fully specified even short string
prussell 2:c77c2b06d604 149 for(int i = 0; i < strlen(str); i++) { //Don't convert unspecified bytes past end of string
prussell 2:c77c2b06d604 150 array[i] = str[i];
prussell 2:c77c2b06d604 151 }
prussell 2:c77c2b06d604 152
prussell 2:c77c2b06d604 153 DEBUG("UUID: Prep[%16s] --> [%02x %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x] %c\n",
prussell 2:c77c2b06d604 154 str, array[0], array[1], array[2], array[3], array[4], array[5], array[6], array[7],
prussell 2:c77c2b06d604 155 array[8], array[9], array[10],array[11],array[12],array[13],array[14],array[15], array[15] );
prussell 2:c77c2b06d604 156
prussell 2:c77c2b06d604 157 return UUID(array);//TODO: Check if this array is safe or stack temporary??
prussell 2:c77c2b06d604 158 }
prussell 2:c77c2b06d604 159 //const UUID SCORING_GATT_SERVICE = stringToUUID("nod.score1.serv ");
prussell 2:c77c2b06d604 160 //const UUID THRESHOLD_GATT_CHARACTERISTIC = stringToUUID("nod.score1.thres");
prussell 2:c77c2b06d604 161 //const UUID DIVISOR_GATT_CHARACTERISTIC = stringToUUID("nod.score1.div ");
prussell 2:c77c2b06d604 162 //const UUID INTERVAL_US_GATT_CHARACTERISTIC = stringToUUID("nod.score1.intus");
prussell 2:c77c2b06d604 163 // Strings to hex UUID "0123456789ABCDEF"
prussell 2:c77c2b06d604 164 const UUID UUID_GATT_SERVICE_A = stringToUUID("com.test.servA");
prussell 2:c77c2b06d604 165 const UUID UUID_GATT_CHARACTERISTIC_A1 = stringToUUID("com.test.charA1");
prussell 2:c77c2b06d604 166 const UUID UUID_GATT_CHARACTERISTIC_A2 = stringToUUID("com.test.charA2");
prussell 2:c77c2b06d604 167 const UUID UUID_GATT_CHARACTERISTIC_SHORT = stringToUUID("com.short");
prussell 2:c77c2b06d604 168
prussell 0:0217a862b047 169 //==========Functions:Timer==========
prussell 0:0217a862b047 170 static volatile bool b_Ticker1 = false;//Volatile, don't optimize, changes under interrupt control
prussell 0:0217a862b047 171 void CallbackTicker1(void)
prussell 0:0217a862b047 172 {
prussell 0:0217a862b047 173 static uint32_t u32_Counter; // Counter for Debug Output
prussell 0:0217a862b047 174
prussell 0:0217a862b047 175 //pwm_led1 = !pwm_led1; /* Do blinky on LED1 while we're waiting for BLE events */
prussell 0:0217a862b047 176 f_led1level+=0.1; if (f_led1level>0.5){f_led1level = 0.1;}; pwm_led1=f_led1level;//PR: Ramp Blink
prussell 0:0217a862b047 177 DEBUG("\nBLEi: Ticker1(%u) ", ++u32_Counter);
prussell 0:0217a862b047 178 b_Ticker1 = true; //PR: Flag to handle Ticker1 Event in Main loop so interupts not blocked.
prussell 0:0217a862b047 179 }
prussell 0:0217a862b047 180
prussell 0:0217a862b047 181 //==========Functions:BLE==========
prussell 0:0217a862b047 182 void Callback_BLE_onTimeout(void)
prussell 0:0217a862b047 183 {
prussell 0:0217a862b047 184 DEBUG("\nBLEi: Callback_BLE_onTimeout()\n" );
prussell 0:0217a862b047 185 //PR: Haven't seen this, even when phone moved out of range and OnDisconnect(Reason0x08) occurs
prussell 0:0217a862b047 186
prussell 0:0217a862b047 187 //DEBUG("\nBLE:Callback_BLE_onTimeout(), Restarting Advertising\n" );
prussell 0:0217a862b047 188 //ble.startAdvertising();
prussell 0:0217a862b047 189 }
prussell 0:0217a862b047 190
prussell 0:0217a862b047 191 //void onDisconnection (Gap::DisconnectionEventCallback_t disconnectionCallback)
prussell 0:0217a862b047 192 void Callback_BLE_onDisconnect(Gap::Handle_t tHandle, Gap::DisconnectionReason_t eReason)
prussell 0:0217a862b047 193 {
prussell 0:0217a862b047 194 //PR: onDisconnect(Reason:8) occured after ~20Tx with no onDataSent() after phone moved out of range
prussell 0:0217a862b047 195
prussell 0:0217a862b047 196 // REMOTE_USER_TERMINATED_CONNECTION = 0x13 = 19,
prussell 0:0217a862b047 197 // LOCAL_HOST_TERMINATED_CONNECTION = 0x16 = 22,
prussell 0:0217a862b047 198 // CONN_INTERVAL_UNACCEPTABLE = 0x3B = 59,
prussell 0:0217a862b047 199 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 200
prussell 0:0217a862b047 201 //DEBUG("Wait10sec...\n");wait(10.0); //PR: Optional to test effect on advertising
prussell 0:0217a862b047 202 ble.startAdvertising(); // restart advertising
prussell 0:0217a862b047 203 }
prussell 0:0217a862b047 204
prussell 0:0217a862b047 205 //inline void BLEDevice::onConnection(Gap::ConnectionEventCallback_t connectionCallback){ transport->getGap().setOnConnection(connectionCallback);}
prussell 0:0217a862b047 206 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 207 {
prussell 0:0217a862b047 208 DEBUG("\nBLEi: Callback_BLE_Connect(Handle:%d, eType:%d, Add:%u ...)\n", tHandle, ePeerAddrType, c6PeerAddr);
prussell 0:0217a862b047 209
prussell 0:0217a862b047 210 #if UPDATE_PARAMS_FOR_LONGER_CONNECTION_INTERVAL
prussell 0:0217a862b047 211 /* Updating connection parameters can be attempted only after a connection has been
prussell 0:0217a862b047 212 * established. Please note that the ble-Central is still the final arbiter for
prussell 0:0217a862b047 213 * the effective parameters; the peripheral can only hope that the request is
prussell 0:0217a862b047 214 * honored. Please also be mindful of the constraints that might be enforced by
prussell 0:0217a862b047 215 * the BLE stack on the underlying controller.*/
prussell 0:0217a862b047 216 #define MIN_CONN_INTERVAL 250 /**< Minimum connection interval (250 ms) */
prussell 0:0217a862b047 217 #define MAX_CONN_INTERVAL 350 /**< Maximum connection interval (350 ms). */
prussell 0:0217a862b047 218 #define CONN_SUP_TIMEOUT 6000 /**< Connection supervisory timeout (6 seconds). */
prussell 0:0217a862b047 219 #define SLAVE_LATENCY 4
prussell 0:0217a862b047 220
prussell 0:0217a862b047 221 Gap::ConnectionParams_t tGap_conn_params;
prussell 0:0217a862b047 222 tGap_conn_params.minConnectionInterval = Gap::MSEC_TO_GAP_DURATION_UNITS(MIN_CONN_INTERVAL);
prussell 0:0217a862b047 223 tGap_conn_params.maxConnectionInterval = Gap::MSEC_TO_GAP_DURATION_UNITS(MAX_CONN_INTERVAL);
prussell 0:0217a862b047 224 tGap_conn_params.connectionSupervisionTimeout = Gap::MSEC_TO_GAP_DURATION_UNITS(CONN_SUP_TIMEOUT);
prussell 0:0217a862b047 225 tGap_conn_params.slaveLatency = SLAVE_LATENCY;
prussell 0:0217a862b047 226 ble.updateConnectionParams(tHandle, &tGap_conn_params);
prussell 0:0217a862b047 227 #endif /* #if UPDATE_PARAMS_FOR_LONGER_CONNECTION_INTERVAL */
prussell 0:0217a862b047 228 }
prussell 0:0217a862b047 229
prussell 0:0217a862b047 230 static volatile bool bSent = false; //Volatile, don't optimize, changes under interrupt control
prussell 0:0217a862b047 231 static volatile unsigned uSentBLE;
prussell 0:0217a862b047 232 void Callback_BLE_onDataSent(unsigned uSent){
prussell 0:0217a862b047 233 uSentBLE=uSent;
prussell 1:4a25d917fb6a 234 DEBUG("BLEi: SentI(%u)", uSent); //TODO: PR: Why uSent always "1", expected it to match sent bytes length
prussell 0:0217a862b047 235 bSent = true;
prussell 5:d36bbb315e31 236 //PR: App nRF-MCP doesn't cause onDataSent(), while App nRF-ToolBox:HRM does cause onDataSent()
prussell 0:0217a862b047 237 //PR: onDataSent() maybe only occuring when confirmed receive by phone, as onDataSent() didn't happen when phone moved out of range.
prussell 0:0217a862b047 238 }
prussell 0:0217a862b047 239
prussell 0:0217a862b047 240 void Callback_BLE_onDataWritten(const GattCharacteristicWriteCBParams *pParams)
prussell 0:0217a862b047 241 {
prussell 0:0217a862b047 242 // Callback_BLE_onDataWritten == This does occur when use nRF-MCP to save New Heart Rate Control Point (Ignored if incorrect length)
prussell 0:0217a862b047 243
prussell 0:0217a862b047 244 //Warning: *data may not be NULL terminated
prussell 0:0217a862b047 245 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 246 }
prussell 0:0217a862b047 247
prussell 0:0217a862b047 248 void Callback_BLE_onUpdatesEnabled(Gap::Handle_t tHandle)
prussell 0:0217a862b047 249 {
prussell 0:0217a862b047 250 DEBUG("\nBLEi: Callback_BLE_onUpdates(Handle:%d)\r\n", tHandle);
prussell 0:0217a862b047 251 }
prussell 0:0217a862b047 252
prussell 5:d36bbb315e31 253 // Adopted 20141213 from http://developer.mbed.org/teams/Bluetooth-Low-Energy/code/BLE_LinkLoss/file/440ee5e8595f/main.cpp
prussell 5:d36bbb315e31 254 void Callback_BLE_onLinkLoss(LinkLossService::AlertLevel_t level)
prussell 5:d36bbb315e31 255 {
prussell 5:d36bbb315e31 256 printf("\nBLEi: Link loss alert[%d]\n", level);
prussell 5:d36bbb315e31 257 }
prussell 5:d36bbb315e31 258
prussell 0:0217a862b047 259 //==========main==========
prussell 0:0217a862b047 260 int main(void)
prussell 0:0217a862b047 261 {
prussell 0:0217a862b047 262 f_led1level = 1; pwm_led1 = f_led1level;//Start LED1=OnMax
prussell 0:0217a862b047 263 f_led2level = 1; pwm_led2 = f_led2level;//Start LED2=OnMax
prussell 1:4a25d917fb6a 264 DEBUG("\nBLE: ___%s___\n", pcDeviceName); //Restart TeraTerm just before Pressing Reset on mbed
prussell 1:4a25d917fb6a 265 DEBUG("BLE: Connect App for Data: nRF-MCP, nRF-Toolbox:HRM, etc.\n");
prussell 0:0217a862b047 266
prussell 0:0217a862b047 267 Ticker ticker1; //PR: Timer Object(Structure)
prussell 0:0217a862b047 268 ticker1.attach(CallbackTicker1, 2.0); //PR: Timer Handler, Float=PeriodSeconds
prussell 0:0217a862b047 269
prussell 3:a98203f84063 270 //BLE1: Setup BLE Service (and event actions) //TODO: Check for services declared before main() - Is that OK?
prussell 3:a98203f84063 271 DEBUG("BLE: Setup BLE\n");
prussell 0:0217a862b047 272 ble.init();
prussell 0:0217a862b047 273 ble.onDisconnection(Callback_BLE_onDisconnect);
prussell 0:0217a862b047 274 ble.onConnection(Callback_BLE_onConnect); //PR: Not required if no actions enabled, enabled now just for debug printf()
prussell 0:0217a862b047 275 ble.onDataSent(Callback_BLE_onDataSent);
prussell 0:0217a862b047 276 ble.onDataWritten(Callback_BLE_onDataWritten);
prussell 0:0217a862b047 277 ble.onTimeout(Callback_BLE_onTimeout);
prussell 0:0217a862b047 278 ble.onUpdatesEnabled(Callback_BLE_onUpdatesEnabled);
prussell 0:0217a862b047 279
prussell 0:0217a862b047 280 //ble_error_t readCharacteristicValue ( uint16_t handle, uint8_t *const buffer, uint16_t *const lengthP )
prussell 0:0217a862b047 281 //ble_error_t updateCharacteristicValue (uint16_t handle, const uint8_t *value, uint16_t size, bool localOnly=false)
prussell 0:0217a862b047 282
prussell 4:976394791d7a 283 //UUID List by Services that are setup
prussell 3:a98203f84063 284 //BLE2: Setup Services
prussell 3:a98203f84063 285 DEBUG("BLE: Setup Services\n");
prussell 4:976394791d7a 286 // *Order here affects order in nRF-MCP Discovery of Services
prussell 3:a98203f84063 287 HealthThermometerService htmService(ble, 30.0, HealthThermometerService::LOCATION_EAR);
prussell 3:a98203f84063 288 BatteryService battService(ble, 11);//Declare the service for BLE:BATTERY
prussell 4:976394791d7a 289 HeartRateService hrmService(ble, (uint8_t)111, HeartRateService::LOCATION_FINGER);
prussell 4:976394791d7a 290 DeviceInformationService deviceInfo(ble, "Maker", pcDeviceName, "sn1234", "hw00", "fw00", "sw00");//(BLEDevice), pcManufacturer, pcModelNumber, pcSerialNumber, pcHWver, pcFWver, pcSWver
prussell 4:976394791d7a 291
prussell 5:d36bbb315e31 292 LinkLossService linkLoss(ble, Callback_BLE_onLinkLoss, LinkLossService::HIGH_ALERT); //TODO: How to support this?
prussell 5:d36bbb315e31 293
prussell 3:a98203f84063 294 //BLE3: Setup advertising
prussell 3:a98203f84063 295 DEBUG("BLE: Setup Advertising\n");
prussell 0:0217a862b047 296 ble.setAdvertisingInterval(Gap::MSEC_TO_ADVERTISEMENT_DURATION_UNITS(1000)); //PR: Advertise 1sec (1Hz)
prussell 0:0217a862b047 297 ble.setAdvertisingType(GapAdvertisingParams::ADV_CONNECTABLE_UNDIRECTED); //PR: TODO
prussell 0:0217a862b047 298 ble.accumulateAdvertisingPayload(GapAdvertisingData::BREDR_NOT_SUPPORTED | GapAdvertisingData::LE_GENERAL_DISCOVERABLE); //PR: BLE Only, Options(LE_GENERAL_DISCOVERABLE/LE_LIMITED_DISCOVERABLE)
prussell 3:a98203f84063 299
prussell 5:d36bbb315e31 300 //UUID List Advertised (PartB)
prussell 5:d36bbb315e31 301 /* 16bit */ ble.accumulateAdvertisingPayload(GapAdvertisingData::COMPLETE_LIST_16BIT_SERVICE_IDS, (uint8_t *)uuid16_list, sizeof(uuid16_list)); //PR: Might need to change for Custom Services/Characteristics
prussell 5:d36bbb315e31 302 ///* 128bit*/ ble.accumulateAdvertisingPayload(GapAdvertisingData::COMPLETE_LIST_128BIT_SERVICE_IDS,(const uint8_t *)UARTServiceUUID_reversed, sizeof(UARTServiceUUID_reversed));
prussell 3:a98203f84063 303
prussell 3:a98203f84063 304 ble.accumulateAdvertisingPayload(GapAdvertisingData::GENERIC_HEART_RATE_SENSOR);//PR: Add Heart Rate
prussell 3:a98203f84063 305 ble.accumulateAdvertisingPayload(GapAdvertisingData::GENERIC_THERMOMETER); //PR: Add Thermometer
prussell 0:0217a862b047 306 ble.accumulateAdvertisingPayload(GapAdvertisingData::COMPLETE_LOCAL_NAME, (uint8_t *)pcDeviceName, sizeof(pcDeviceName));//PR: Product?
prussell 3:a98203f84063 307 //Thermometer: ble.setAdvertisingType(GapAdvertisingParams::ADV_CONNECTABLE_UNDIRECTED);
prussell 3:a98203f84063 308 //Thermometer: ble.setAdvertisingInterval(160); /* 100ms; in multiples of 0.625ms. */
prussell 5:d36bbb315e31 309
prussell 5:d36bbb315e31 310 //Linkloss: ble.setAdvertisingType(GapAdvertisingParams::ADV_CONNECTABLE_UNDIRECTED); //Linkloss
prussell 5:d36bbb315e31 311 //Linkloss: ble.setAdvertisingInterval(Gap::MSEC_TO_ADVERTISEMENT_DURATION_UNITS(1000)); //Linkloss /* 1second. */
prussell 0:0217a862b047 312 ble.startAdvertising();
prussell 0:0217a862b047 313
prussell 0:0217a862b047 314 DEBUG("BLE: Main Loop\n");
prussell 0:0217a862b047 315 uint32_t u32_wakeevents=0, u32_wakelast=0; // Counter&Register for tracking Wake Events (to see monitor their Frequency)
prussell 0:0217a862b047 316 while (true) {
prussell 0:0217a862b047 317 if (b_Ticker1 && ble.getGapState().connected) { //If Ticker1 and Connected Update Data
prussell 0:0217a862b047 318 b_Ticker1 = false; // Clear flag for next Ticker1, see CallbackTicker1()
prussell 3:a98203f84063 319
prussell 3:a98203f84063 320 // Read Sensors, and update matching Service Characteristics (only if connected)
prussell 4:976394791d7a 321 // *Order here doesn't affect order in nRF-MCP Discovery of Services
prussell 4:976394791d7a 322 float update_htm(void); //prototype
prussell 3:a98203f84063 323 uint8_t update_hrm(void); //prototype
prussell 3:a98203f84063 324 uint8_t update_batt(void);//prototype
prussell 4:976394791d7a 325 htmService.updateTemperature( update_htm() );
prussell 3:a98203f84063 326 hrmService.updateHeartRate( update_hrm() );
prussell 3:a98203f84063 327 battService.updateBatteryLevel( update_batt() );
prussell 3:a98203f84063 328
prussell 3:a98203f84063 329 DEBUG("BLE: Wakes:%u Delta:%d ", u32_wakeevents, u32_wakeevents-u32_wakelast); //For Evaluating Timing
prussell 3:a98203f84063 330 u32_wakelast = u32_wakeevents;
prussell 0:0217a862b047 331 } else if (b_Ticker1) {
prussell 0:0217a862b047 332 b_Ticker1 = false; // Clear flag for next Ticker1, see CallbackTicker1()
prussell 3:a98203f84063 333 DEBUG("BLE: Tick while unconnected ");
prussell 0:0217a862b047 334 } else if (bSent){
prussell 0:0217a862b047 335 bSent=false; //clear flag
prussell 3:a98203f84063 336 //DEBUG("BLE: Sent %ubytes ", uSentBLE);
prussell 0:0217a862b047 337 } else {
prussell 3:a98203f84063 338 //DEBUG("BLE: Wait for Event\n\r"); //x Debug output here causes unnecessary wakes resulting in endless awakes.
prussell 0:0217a862b047 339 ble.waitForEvent(); //PR: Wait for event - Yield control to BLE Stack and other events (Process ALL pending events before waiting again)
prussell 0:0217a862b047 340 f_led2level+=0.25; if (f_led2level>0.5){f_led2level = 0.0;}; pwm_led2=f_led2level;//PR: Ramp Blink
prussell 0:0217a862b047 341 u32_wakeevents++; //PR: Count events for frequency monitoring (20141207PR: nRF51822 mbed HRM = 50Hz)
prussell 0:0217a862b047 342 }
prussell 0:0217a862b047 343 }
prussell 0:0217a862b047 344 }
prussell 3:a98203f84063 345
prussell 3:a98203f84063 346 //==========HRM==========
prussell 3:a98203f84063 347 //Adopted 2014Dec from http://developer.mbed.org/teams/Bluetooth-Low-Energy/code/BLE_HeartRate/
prussell 3:a98203f84063 348 uint8_t update_hrm(void)//(bool bInit)
prussell 3:a98203f84063 349 {
prussell 3:a98203f84063 350 static uint8_t u8_hrm = 100;
prussell 3:a98203f84063 351 u8_hrm++;
prussell 3:a98203f84063 352 if (u8_hrm >= 175) {
prussell 3:a98203f84063 353 u8_hrm = 100;
prussell 3:a98203f84063 354 DEBUG("BLE: HRM Rollover175->100 ");
prussell 3:a98203f84063 355 }
prussell 3:a98203f84063 356 DEBUG("[HRM:%d]", u8_hrm);
prussell 3:a98203f84063 357 return(u8_hrm);
prussell 3:a98203f84063 358 }
prussell 3:a98203f84063 359 //==========HTM:Internal Temperature==========
prussell 3:a98203f84063 360 //Adopted 2014Dec from: https://developer.mbed.org/users/takafuminaka/code/BLE_HTM_by_InTempSensr/
prussell 3:a98203f84063 361 // Service: https://developer.bluetooth.org/gatt/services/Pages/ServiceViewer.aspx?u=org.bluetooth.service.health_thermometer.xml
prussell 3:a98203f84063 362 // HTM Char: https://developer.bluetooth.org/gatt/characteristics/Pages/CharacteristicViewer.aspx?u=org.bluetooth.characteristic.temperature_measurement.xml
prussell 3:a98203f84063 363
prussell 3:a98203f84063 364 //****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 365 float update_htm(void)
prussell 3:a98203f84063 366 {
prussell 3:a98203f84063 367 //static float fTemperature = 0;//-123.456;
prussell 3:a98203f84063 368 int32_t i32_temp;
prussell 3:a98203f84063 369 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 370 float fTemperature = (float(i32_temp)/4.0) - 16.0; // Scale&Shift (0.25'C from -16'C?)
prussell 3:a98203f84063 371 DEBUG("[HTMi:%d HTMf:%f]", i32_temp, fTemperature);
prussell 4:976394791d7a 372
prussell 4:976394791d7a 373 //{//Force to IEEE format to match needs of Apps like nRF-HTM and nRF-Toolbox:HTM
prussell 4:976394791d7a 374 // 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 375 // uint8_t exponent = 0xFE; //exponent is -2
prussell 4:976394791d7a 376 // uint32_t mantissa = (uint32_t)(fTemperature*100);
prussell 4:976394791d7a 377 // uint32_t temp_ieee11073 = ((((uint32_t)exponent) << 24) | (mantissa)); //Note: Assumes Mantissa within 24bits
prussell 4:976394791d7a 378 // memcpy(((uint8_t*)&fTemperature)+1, (uint8_t*)&temp_ieee11073, 4); //Overwrite with IEEE format float
prussell 4:976394791d7a 379 //}
prussell 4:976394791d7a 380
prussell 3:a98203f84063 381 return(fTemperature);
prussell 3:a98203f84063 382 }
prussell 3:a98203f84063 383 //==========Battery==========
prussell 3:a98203f84063 384 uint8_t update_batt(void)
prussell 3:a98203f84063 385 {
prussell 3:a98203f84063 386 static uint8_t u8_BattPercent=33; //Level: 0..100%
prussell 3:a98203f84063 387 u8_BattPercent <= 50 ? u8_BattPercent=100 : u8_BattPercent--; // Simulate Battery Decay
prussell 3:a98203f84063 388 DEBUG("[BATT:%d%%]", u8_BattPercent);
prussell 3:a98203f84063 389 return(u8_BattPercent);
prussell 3:a98203f84063 390 }
prussell 3:a98203f84063 391 //========== end ==========