HW layer for the Nucleo board, it only work with old BLE_API
Dependents: Hello_BLE F446RE-BLE
Fork of X_NUCLEO_IDB0XA1 by
BlueNRGDevice.cpp@113:31c73e9b0108, 2015-08-11 (annotated)
- Committer:
- Wolfgang Betz
- Date:
- Tue Aug 11 13:20:31 2015 +0200
- Revision:
- 113:31c73e9b0108
- Parent:
- 112:6dc0ad44750d
- Child:
- 115:3b47df81a56b
Roll back to previous version
Who changed what in which revision?
User | Revision | Line number | New 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 |
103:12684d94c3a6 | 19 | * @file BlueNRGDevice.cpp |
Wolfgang Betz |
90:26c0c9807ab4 | 20 | * @author STMicroelectronics |
Wolfgang Betz |
90:26c0c9807ab4 | 21 | * @brief Implementation of BLEDeviceInstanceBase |
Wolfgang Betz |
90:26c0c9807ab4 | 22 | ****************************************************************************** |
Wolfgang Betz |
90:26c0c9807ab4 | 23 | * @copy |
Wolfgang Betz |
90:26c0c9807ab4 | 24 | * |
Wolfgang Betz |
90:26c0c9807ab4 | 25 | * THE PRESENT FIRMWARE WHICH IS FOR GUIDANCE ONLY AIMS AT PROVIDING CUSTOMERS |
Wolfgang Betz |
90:26c0c9807ab4 | 26 | * WITH CODING INFORMATION REGARDING THEIR PRODUCTS IN ORDER FOR THEM TO SAVE |
Wolfgang Betz |
90:26c0c9807ab4 | 27 | * TIME. AS A RESULT, STMICROELECTRONICS SHALL NOT BE HELD LIABLE FOR ANY |
Wolfgang Betz |
90:26c0c9807ab4 | 28 | * DIRECT, INDIRECT OR CONSEQUENTIAL DAMAGES WITH RESPECT TO ANY CLAIMS ARISING |
Wolfgang Betz |
90:26c0c9807ab4 | 29 | * FROM THE CONTENT OF SUCH FIRMWARE AND/OR THE USE MADE BY CUSTOMERS OF THE |
Wolfgang Betz |
90:26c0c9807ab4 | 30 | * CODING INFORMATION CONTAINED HEREIN IN CONNECTION WITH THEIR PRODUCTS. |
Wolfgang Betz |
90:26c0c9807ab4 | 31 | * |
Wolfgang Betz |
90:26c0c9807ab4 | 32 | * <h2><center>© COPYRIGHT 2013 STMicroelectronics</center></h2> |
Wolfgang Betz |
103:12684d94c3a6 | 33 | */ |
Wolfgang Betz |
103:12684d94c3a6 | 34 | |
Wolfgang Betz |
90:26c0c9807ab4 | 35 | /** @defgroup BlueNRGDevice |
Wolfgang Betz |
90:26c0c9807ab4 | 36 | * @brief BlueNRG BLE_API Device Adaptation |
Wolfgang Betz |
90:26c0c9807ab4 | 37 | * @{ |
Wolfgang Betz |
90:26c0c9807ab4 | 38 | */ |
Wolfgang Betz |
103:12684d94c3a6 | 39 | |
Wolfgang Betz |
90:26c0c9807ab4 | 40 | #include "mbed.h" |
Wolfgang Betz |
90:26c0c9807ab4 | 41 | #include "BlueNRGDevice.h" |
Wolfgang Betz |
90:26c0c9807ab4 | 42 | #include "BlueNRGGap.h" |
Wolfgang Betz |
90:26c0c9807ab4 | 43 | #include "BlueNRGGattServer.h" |
Wolfgang Betz |
90:26c0c9807ab4 | 44 | |
Wolfgang Betz |
90:26c0c9807ab4 | 45 | #include "btle.h" |
Wolfgang Betz |
90:26c0c9807ab4 | 46 | #include "Utils.h" |
Wolfgang Betz |
90:26c0c9807ab4 | 47 | #include "osal.h" |
Wolfgang Betz |
90:26c0c9807ab4 | 48 | |
Wolfgang Betz |
90:26c0c9807ab4 | 49 | extern "C" { |
Wolfgang Betz |
103:12684d94c3a6 | 50 | #include "hci.h" |
Wolfgang Betz |
90:26c0c9807ab4 | 51 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 52 | |
Wolfgang Betz |
90:26c0c9807ab4 | 53 | #define HEADER_SIZE 5 |
Wolfgang Betz |
90:26c0c9807ab4 | 54 | #define MAX_BUFFER_SIZE 255 |
Wolfgang Betz |
90:26c0c9807ab4 | 55 | |
Wolfgang Betz |
90:26c0c9807ab4 | 56 | /** |
Wolfgang Betz |
90:26c0c9807ab4 | 57 | * The singleton which represents the BlueNRG transport for the BLEDevice. |
Wolfgang Betz |
90:26c0c9807ab4 | 58 | * |
Wolfgang Betz |
113:31c73e9b0108 | 59 | * See file 'x_nucleo_idb0xa1_targets.h' for details regarding the peripheral pins used! |
Wolfgang Betz |
90:26c0c9807ab4 | 60 | */ |
Wolfgang Betz |
113:31c73e9b0108 | 61 | #include "x_nucleo_idb0xa1_targets.h" |
Wolfgang Betz |
113:31c73e9b0108 | 62 | |
Wolfgang Betz |
113:31c73e9b0108 | 63 | BlueNRGDevice bluenrgDeviceInstance(IDB0XA1_PIN_SPI_MOSI, |
Wolfgang Betz |
113:31c73e9b0108 | 64 | IDB0XA1_PIN_SPI_MISO, |
Wolfgang Betz |
113:31c73e9b0108 | 65 | IDB0XA1_PIN_SPI_SCK, |
Wolfgang Betz |
113:31c73e9b0108 | 66 | IDB0XA1_PIN_SPI_nCS, |
Wolfgang Betz |
113:31c73e9b0108 | 67 | IDB0XA1_PIN_SPI_RESET, |
Wolfgang Betz |
113:31c73e9b0108 | 68 | IDB0XA1_PIN_SPI_IRQ); |
Wolfgang Betz |
90:26c0c9807ab4 | 69 | |
Wolfgang Betz |
90:26c0c9807ab4 | 70 | /** |
Wolfgang Betz |
90:26c0c9807ab4 | 71 | * BLE-API requires an implementation of the following function in order to |
Wolfgang Betz |
90:26c0c9807ab4 | 72 | * obtain its transport handle. |
Wolfgang Betz |
90:26c0c9807ab4 | 73 | */ |
Wolfgang Betz |
90:26c0c9807ab4 | 74 | BLEInstanceBase * |
Wolfgang Betz |
90:26c0c9807ab4 | 75 | createBLEInstance(void) |
Wolfgang Betz |
90:26c0c9807ab4 | 76 | { |
Wolfgang Betz |
90:26c0c9807ab4 | 77 | return (&bluenrgDeviceInstance); |
Wolfgang Betz |
90:26c0c9807ab4 | 78 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 79 | |
Wolfgang Betz |
90:26c0c9807ab4 | 80 | /**************************************************************************/ |
Wolfgang Betz |
90:26c0c9807ab4 | 81 | /** |
Wolfgang Betz |
90:26c0c9807ab4 | 82 | @brief Constructor |
Wolfgang Betz |
90:26c0c9807ab4 | 83 | * @param mosi mbed pin to use for MOSI line of SPI interface |
Wolfgang Betz |
90:26c0c9807ab4 | 84 | * @param miso mbed pin to use for MISO line of SPI interface |
Wolfgang Betz |
90:26c0c9807ab4 | 85 | * @param sck mbed pin to use for SCK line of SPI interface |
Wolfgang Betz |
90:26c0c9807ab4 | 86 | * @param cs mbed pin to use for not chip select line of SPI interface |
Wolfgang Betz |
90:26c0c9807ab4 | 87 | * @param rst mbed pin to use for BlueNRG reset |
Wolfgang Betz |
90:26c0c9807ab4 | 88 | * @param irq mbed pin for BlueNRG IRQ |
Wolfgang Betz |
90:26c0c9807ab4 | 89 | */ |
Wolfgang Betz |
90:26c0c9807ab4 | 90 | /**************************************************************************/ |
Wolfgang Betz |
90:26c0c9807ab4 | 91 | BlueNRGDevice::BlueNRGDevice(PinName mosi, |
Wolfgang Betz |
90:26c0c9807ab4 | 92 | PinName miso, |
Wolfgang Betz |
90:26c0c9807ab4 | 93 | PinName sck, |
Wolfgang Betz |
90:26c0c9807ab4 | 94 | PinName cs, |
Wolfgang Betz |
90:26c0c9807ab4 | 95 | PinName rst, |
Wolfgang Betz |
90:26c0c9807ab4 | 96 | PinName irq) : spi_(mosi, miso, sck), nCS_(cs), rst_(rst), irq_(irq) |
Wolfgang Betz |
90:26c0c9807ab4 | 97 | { |
Wolfgang Betz |
90:26c0c9807ab4 | 98 | isInitialized = false; |
Wolfgang Betz |
103:12684d94c3a6 | 99 | |
Wolfgang Betz |
90:26c0c9807ab4 | 100 | // Setup the spi for 8 bit data, low clock polarity, |
Wolfgang Betz |
90:26c0c9807ab4 | 101 | // 1-edge phase, with an 8MHz clock rate |
Wolfgang Betz |
90:26c0c9807ab4 | 102 | spi_.format(8, 0); |
Wolfgang Betz |
90:26c0c9807ab4 | 103 | spi_.frequency(8000000); |
Wolfgang Betz |
103:12684d94c3a6 | 104 | |
Wolfgang Betz |
90:26c0c9807ab4 | 105 | // Deselect the BlueNRG chip by keeping its nCS signal high |
Wolfgang Betz |
90:26c0c9807ab4 | 106 | nCS_ = 1; |
Wolfgang Betz |
90:26c0c9807ab4 | 107 | |
Wolfgang Betz |
90:26c0c9807ab4 | 108 | wait_us(500); |
Wolfgang Betz |
90:26c0c9807ab4 | 109 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 110 | |
Wolfgang Betz |
90:26c0c9807ab4 | 111 | /**************************************************************************/ |
Wolfgang Betz |
90:26c0c9807ab4 | 112 | /** |
Wolfgang Betz |
90:26c0c9807ab4 | 113 | @brief Destructor |
Wolfgang Betz |
90:26c0c9807ab4 | 114 | */ |
Wolfgang Betz |
90:26c0c9807ab4 | 115 | /**************************************************************************/ |
Wolfgang Betz |
90:26c0c9807ab4 | 116 | BlueNRGDevice::~BlueNRGDevice(void) |
Wolfgang Betz |
90:26c0c9807ab4 | 117 | { |
Wolfgang Betz |
90:26c0c9807ab4 | 118 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 119 | |
Wolfgang Betz |
90:26c0c9807ab4 | 120 | |
Wolfgang Betz |
90:26c0c9807ab4 | 121 | /** |
Wolfgang Betz |
90:26c0c9807ab4 | 122 | @brief Initialises anything required to start using BLE |
Wolfgang Betz |
90:26c0c9807ab4 | 123 | @param[in] void |
Wolfgang Betz |
90:26c0c9807ab4 | 124 | @returns ble_error_t |
Wolfgang Betz |
90:26c0c9807ab4 | 125 | */ |
Wolfgang Betz |
90:26c0c9807ab4 | 126 | ble_error_t BlueNRGDevice::init(void) |
Wolfgang Betz |
90:26c0c9807ab4 | 127 | { |
Wolfgang Betz |
90:26c0c9807ab4 | 128 | // Set the interrupt handler for the device |
Wolfgang Betz |
113:31c73e9b0108 | 129 | irq_.mode(PullNone); // betzw: set irq mode |
Wolfgang Betz |
90:26c0c9807ab4 | 130 | irq_.rise(&HCI_Isr); |
Wolfgang Betz |
90:26c0c9807ab4 | 131 | |
Wolfgang Betz |
90:26c0c9807ab4 | 132 | /* ToDo: Clear memory contents, reset the SD, etc. */ |
Wolfgang Betz |
90:26c0c9807ab4 | 133 | btle_init(BlueNRGGap::getInstance().getIsSetAddress()); |
Wolfgang Betz |
103:12684d94c3a6 | 134 | |
Wolfgang Betz |
90:26c0c9807ab4 | 135 | isInitialized = true; |
Wolfgang Betz |
90:26c0c9807ab4 | 136 | |
Wolfgang Betz |
90:26c0c9807ab4 | 137 | return BLE_ERROR_NONE; |
Wolfgang Betz |
90:26c0c9807ab4 | 138 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 139 | |
Wolfgang Betz |
90:26c0c9807ab4 | 140 | |
Wolfgang Betz |
90:26c0c9807ab4 | 141 | /** |
Wolfgang Betz |
90:26c0c9807ab4 | 142 | @brief Resets the BLE HW, removing any existing services and |
Wolfgang Betz |
90:26c0c9807ab4 | 143 | characteristics |
Wolfgang Betz |
90:26c0c9807ab4 | 144 | @param[in] void |
Wolfgang Betz |
90:26c0c9807ab4 | 145 | @returns ble_error_t |
Wolfgang Betz |
90:26c0c9807ab4 | 146 | */ |
Wolfgang Betz |
90:26c0c9807ab4 | 147 | ble_error_t BlueNRGDevice::reset(void) |
Wolfgang Betz |
90:26c0c9807ab4 | 148 | { |
Wolfgang Betz |
90:26c0c9807ab4 | 149 | wait_us(500); |
Wolfgang Betz |
90:26c0c9807ab4 | 150 | |
Wolfgang Betz |
90:26c0c9807ab4 | 151 | /* Reset BlueNRG SPI interface */ |
Wolfgang Betz |
103:12684d94c3a6 | 152 | rst_ = 0; |
Wolfgang Betz |
103:12684d94c3a6 | 153 | wait_us(5); |
Wolfgang Betz |
103:12684d94c3a6 | 154 | rst_ = 1; |
Wolfgang Betz |
103:12684d94c3a6 | 155 | wait_us(5); |
Wolfgang Betz |
90:26c0c9807ab4 | 156 | |
Wolfgang Betz |
90:26c0c9807ab4 | 157 | /* Wait for the radio to come back up */ |
Wolfgang Betz |
90:26c0c9807ab4 | 158 | wait_us(500); |
Wolfgang Betz |
90:26c0c9807ab4 | 159 | |
Wolfgang Betz |
90:26c0c9807ab4 | 160 | isInitialized = false; |
Wolfgang Betz |
90:26c0c9807ab4 | 161 | |
Wolfgang Betz |
90:26c0c9807ab4 | 162 | return BLE_ERROR_NONE; |
Wolfgang Betz |
90:26c0c9807ab4 | 163 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 164 | |
Wolfgang Betz |
90:26c0c9807ab4 | 165 | |
Wolfgang Betz |
90:26c0c9807ab4 | 166 | /*! |
Wolfgang Betz |
103:12684d94c3a6 | 167 | @brief Wait for any BLE Event like BLE Connection, Read Request etc. |
Wolfgang Betz |
90:26c0c9807ab4 | 168 | @param[in] void |
Wolfgang Betz |
103:12684d94c3a6 | 169 | @returns char * |
Wolfgang Betz |
90:26c0c9807ab4 | 170 | */ |
Wolfgang Betz |
90:26c0c9807ab4 | 171 | void BlueNRGDevice::waitForEvent(void) |
Wolfgang Betz |
90:26c0c9807ab4 | 172 | { |
Wolfgang Betz |
103:12684d94c3a6 | 173 | bool must_return = false; |
Wolfgang Betz |
103:12684d94c3a6 | 174 | |
Wolfgang Betz |
103:12684d94c3a6 | 175 | do { |
Wolfgang Betz |
103:12684d94c3a6 | 176 | HCI_Process(); |
Wolfgang Betz |
103:12684d94c3a6 | 177 | |
Wolfgang Betz |
103:12684d94c3a6 | 178 | if(must_return) return; |
Wolfgang Betz |
103:12684d94c3a6 | 179 | |
Wolfgang Betz |
103:12684d94c3a6 | 180 | __WFE(); /* it is recommended that SEVONPEND in the |
Wolfgang Betz |
103:12684d94c3a6 | 181 | System Control Register is NOT set */ |
Wolfgang Betz |
103:12684d94c3a6 | 182 | must_return = true; /* after returning from WFE we must guarantee |
Wolfgang Betz |
103:12684d94c3a6 | 183 | that conrol is given back to main loop before next WFE */ |
Wolfgang Betz |
103:12684d94c3a6 | 184 | } while(true); |
Wolfgang Betz |
90:26c0c9807ab4 | 185 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 186 | |
Wolfgang Betz |
90:26c0c9807ab4 | 187 | |
Wolfgang Betz |
90:26c0c9807ab4 | 188 | /*! |
Wolfgang Betz |
90:26c0c9807ab4 | 189 | @brief get GAP version |
Wolfgang Betz |
90:26c0c9807ab4 | 190 | @param[in] void |
Wolfgang Betz |
90:26c0c9807ab4 | 191 | @returns char * |
Wolfgang Betz |
90:26c0c9807ab4 | 192 | */ |
Wolfgang Betz |
90:26c0c9807ab4 | 193 | const char *BlueNRGDevice::getVersion(void) |
Wolfgang Betz |
90:26c0c9807ab4 | 194 | { |
Wolfgang Betz |
90:26c0c9807ab4 | 195 | char *version = new char[6]; |
Wolfgang Betz |
90:26c0c9807ab4 | 196 | memcpy((void *)version, "1.0.0", 5); |
Wolfgang Betz |
90:26c0c9807ab4 | 197 | return version; |
Wolfgang Betz |
90:26c0c9807ab4 | 198 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 199 | |
Wolfgang Betz |
90:26c0c9807ab4 | 200 | /**************************************************************************/ |
Wolfgang Betz |
90:26c0c9807ab4 | 201 | /*! |
Wolfgang Betz |
90:26c0c9807ab4 | 202 | @brief get init state |
Wolfgang Betz |
90:26c0c9807ab4 | 203 | @param[in] void |
Wolfgang Betz |
103:12684d94c3a6 | 204 | @returns bool |
Wolfgang Betz |
90:26c0c9807ab4 | 205 | */ |
Wolfgang Betz |
90:26c0c9807ab4 | 206 | /**************************************************************************/ |
Wolfgang Betz |
90:26c0c9807ab4 | 207 | bool BlueNRGDevice::getIsInitialized(void) |
Wolfgang Betz |
90:26c0c9807ab4 | 208 | { |
Wolfgang Betz |
90:26c0c9807ab4 | 209 | return isInitialized; |
Wolfgang Betz |
90:26c0c9807ab4 | 210 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 211 | |
Wolfgang Betz |
90:26c0c9807ab4 | 212 | /**************************************************************************/ |
Wolfgang Betz |
90:26c0c9807ab4 | 213 | /*! |
Wolfgang Betz |
90:26c0c9807ab4 | 214 | @brief get reference to GAP object |
Wolfgang Betz |
90:26c0c9807ab4 | 215 | @param[in] void |
Wolfgang Betz |
103:12684d94c3a6 | 216 | @returns Gap& |
Wolfgang Betz |
90:26c0c9807ab4 | 217 | */ |
Wolfgang Betz |
90:26c0c9807ab4 | 218 | /**************************************************************************/ |
Wolfgang Betz |
90:26c0c9807ab4 | 219 | Gap &BlueNRGDevice::getGap() |
Wolfgang Betz |
90:26c0c9807ab4 | 220 | { |
Wolfgang Betz |
90:26c0c9807ab4 | 221 | return BlueNRGGap::getInstance(); |
Wolfgang Betz |
90:26c0c9807ab4 | 222 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 223 | |
Wolfgang Betz |
90:26c0c9807ab4 | 224 | const Gap &BlueNRGDevice::getGap() const |
Wolfgang Betz |
90:26c0c9807ab4 | 225 | { |
Wolfgang Betz |
90:26c0c9807ab4 | 226 | return BlueNRGGap::getInstance(); |
Wolfgang Betz |
90:26c0c9807ab4 | 227 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 228 | |
Wolfgang Betz |
90:26c0c9807ab4 | 229 | /**************************************************************************/ |
Wolfgang Betz |
90:26c0c9807ab4 | 230 | /*! |
Wolfgang Betz |
90:26c0c9807ab4 | 231 | @brief get reference to GATT server object |
Wolfgang Betz |
90:26c0c9807ab4 | 232 | @param[in] void |
Wolfgang Betz |
103:12684d94c3a6 | 233 | @returns GattServer& |
Wolfgang Betz |
90:26c0c9807ab4 | 234 | */ |
Wolfgang Betz |
90:26c0c9807ab4 | 235 | /**************************************************************************/ |
Wolfgang Betz |
90:26c0c9807ab4 | 236 | GattServer &BlueNRGDevice::getGattServer() |
Wolfgang Betz |
90:26c0c9807ab4 | 237 | { |
Wolfgang Betz |
90:26c0c9807ab4 | 238 | return BlueNRGGattServer::getInstance(); |
Wolfgang Betz |
90:26c0c9807ab4 | 239 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 240 | |
Wolfgang Betz |
90:26c0c9807ab4 | 241 | const GattServer &BlueNRGDevice::getGattServer() const |
Wolfgang Betz |
90:26c0c9807ab4 | 242 | { |
Wolfgang Betz |
90:26c0c9807ab4 | 243 | return BlueNRGGattServer::getInstance(); |
Wolfgang Betz |
90:26c0c9807ab4 | 244 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 245 | |
Wolfgang Betz |
90:26c0c9807ab4 | 246 | /**************************************************************************/ |
Wolfgang Betz |
90:26c0c9807ab4 | 247 | /*! |
Wolfgang Betz |
90:26c0c9807ab4 | 248 | @brief shut down the the BLE device |
Wolfgang Betz |
90:26c0c9807ab4 | 249 | @param[out] error if any |
Wolfgang Betz |
90:26c0c9807ab4 | 250 | */ |
Wolfgang Betz |
90:26c0c9807ab4 | 251 | /**************************************************************************/ |
Wolfgang Betz |
90:26c0c9807ab4 | 252 | ble_error_t BlueNRGDevice::shutdown(void) { |
Wolfgang Betz |
90:26c0c9807ab4 | 253 | return reset(); |
Wolfgang Betz |
90:26c0c9807ab4 | 254 | } |
Wolfgang Betz |
103:12684d94c3a6 | 255 | |
Wolfgang Betz |
90:26c0c9807ab4 | 256 | /** |
Wolfgang Betz |
90:26c0c9807ab4 | 257 | * @brief Reads from BlueNRG SPI buffer and store data into local buffer. |
Wolfgang Betz |
90:26c0c9807ab4 | 258 | * @param buffer : Buffer where data from SPI are stored |
Wolfgang Betz |
90:26c0c9807ab4 | 259 | * @param buff_size: Buffer size |
Wolfgang Betz |
90:26c0c9807ab4 | 260 | * @retval int32_t : Number of read bytes |
Wolfgang Betz |
90:26c0c9807ab4 | 261 | */ |
Wolfgang Betz |
90:26c0c9807ab4 | 262 | int32_t BlueNRGDevice::spiRead(uint8_t *buffer, uint8_t buff_size) |
Wolfgang Betz |
90:26c0c9807ab4 | 263 | { |
Wolfgang Betz |
103:12684d94c3a6 | 264 | uint16_t byte_count; |
Wolfgang Betz |
103:12684d94c3a6 | 265 | uint8_t len = 0; |
Wolfgang Betz |
103:12684d94c3a6 | 266 | uint8_t char_ff = 0xff; |
Wolfgang Betz |
103:12684d94c3a6 | 267 | volatile uint8_t read_char; |
Wolfgang Betz |
103:12684d94c3a6 | 268 | |
Wolfgang Betz |
103:12684d94c3a6 | 269 | uint8_t i = 0; |
Wolfgang Betz |
103:12684d94c3a6 | 270 | volatile uint8_t tmpreg; |
Wolfgang Betz |
103:12684d94c3a6 | 271 | |
Wolfgang Betz |
103:12684d94c3a6 | 272 | uint8_t header_master[HEADER_SIZE] = {0x0b, 0x00, 0x00, 0x00, 0x00}; |
Wolfgang Betz |
103:12684d94c3a6 | 273 | uint8_t header_slave[HEADER_SIZE]; |
Wolfgang Betz |
90:26c0c9807ab4 | 274 | |
Wolfgang Betz |
103:12684d94c3a6 | 275 | /* Select the chip */ |
Wolfgang Betz |
103:12684d94c3a6 | 276 | nCS_ = 0; |
Wolfgang Betz |
103:12684d94c3a6 | 277 | |
Wolfgang Betz |
103:12684d94c3a6 | 278 | /* Read the header */ |
Wolfgang Betz |
103:12684d94c3a6 | 279 | for (i = 0; i < 5; i++) |
Wolfgang Betz |
103:12684d94c3a6 | 280 | { |
Wolfgang Betz |
103:12684d94c3a6 | 281 | tmpreg = spi_.write(header_master[i]); |
Wolfgang Betz |
103:12684d94c3a6 | 282 | header_slave[i] = (uint8_t)(tmpreg); |
Wolfgang Betz |
103:12684d94c3a6 | 283 | } |
Wolfgang Betz |
103:12684d94c3a6 | 284 | |
Wolfgang Betz |
103:12684d94c3a6 | 285 | if (header_slave[0] == 0x02) { |
Wolfgang Betz |
103:12684d94c3a6 | 286 | /* device is ready */ |
Wolfgang Betz |
103:12684d94c3a6 | 287 | byte_count = (header_slave[4]<<8)|header_slave[3]; |
Wolfgang Betz |
103:12684d94c3a6 | 288 | |
Wolfgang Betz |
103:12684d94c3a6 | 289 | if (byte_count > 0) { |
Wolfgang Betz |
90:26c0c9807ab4 | 290 | |
Wolfgang Betz |
103:12684d94c3a6 | 291 | /* avoid to read more data that size of the buffer */ |
Wolfgang Betz |
103:12684d94c3a6 | 292 | if (byte_count > buff_size){ |
Wolfgang Betz |
103:12684d94c3a6 | 293 | byte_count = buff_size; |
Wolfgang Betz |
103:12684d94c3a6 | 294 | } |
Wolfgang Betz |
103:12684d94c3a6 | 295 | |
Wolfgang Betz |
103:12684d94c3a6 | 296 | for (len = 0; len < byte_count; len++){ |
Wolfgang Betz |
103:12684d94c3a6 | 297 | read_char = spi_.write(char_ff); |
Wolfgang Betz |
103:12684d94c3a6 | 298 | buffer[len] = read_char; |
Wolfgang Betz |
103:12684d94c3a6 | 299 | } |
Wolfgang Betz |
103:12684d94c3a6 | 300 | } |
Wolfgang Betz |
103:12684d94c3a6 | 301 | } |
Wolfgang Betz |
103:12684d94c3a6 | 302 | /* Release CS line to deselect the chip */ |
Wolfgang Betz |
103:12684d94c3a6 | 303 | nCS_ = 1; |
Wolfgang Betz |
103:12684d94c3a6 | 304 | |
Wolfgang Betz |
103:12684d94c3a6 | 305 | // Add a small delay to give time to the BlueNRG to set the IRQ pin low |
Wolfgang Betz |
103:12684d94c3a6 | 306 | // to avoid a useless SPI read at the end of the transaction |
Wolfgang Betz |
103:12684d94c3a6 | 307 | for(volatile int i = 0; i < 2; i++)__NOP(); |
Wolfgang Betz |
103:12684d94c3a6 | 308 | |
Wolfgang Betz |
102:a6f233cb1fed | 309 | #ifdef PRINT_CSV_FORMAT |
Wolfgang Betz |
103:12684d94c3a6 | 310 | if (len > 0) { |
Wolfgang Betz |
103:12684d94c3a6 | 311 | // print_csv_time(); |
Wolfgang Betz |
103:12684d94c3a6 | 312 | for (int i=0; i<len; i++) { |
Wolfgang Betz |
103:12684d94c3a6 | 313 | PRINT_CSV(" %02x", buffer[i]); |
Wolfgang Betz |
103:12684d94c3a6 | 314 | } |
Wolfgang Betz |
103:12684d94c3a6 | 315 | PRINT_CSV("\n"); |
Wolfgang Betz |
91:97c0c21046b4 | 316 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 317 | #endif |
Wolfgang Betz |
103:12684d94c3a6 | 318 | |
Wolfgang Betz |
103:12684d94c3a6 | 319 | return len; |
Wolfgang Betz |
90:26c0c9807ab4 | 320 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 321 | |
Wolfgang Betz |
90:26c0c9807ab4 | 322 | /** |
Wolfgang Betz |
90:26c0c9807ab4 | 323 | * @brief Writes data from local buffer to SPI. |
Wolfgang Betz |
90:26c0c9807ab4 | 324 | * @param data1 : First data buffer to be written |
Wolfgang Betz |
90:26c0c9807ab4 | 325 | * @param data2 : Second data buffer to be written |
Wolfgang Betz |
90:26c0c9807ab4 | 326 | * @param Nb_bytes1: Size of first data buffer to be written |
Wolfgang Betz |
90:26c0c9807ab4 | 327 | * @param Nb_bytes2: Size of second data buffer to be written |
Wolfgang Betz |
90:26c0c9807ab4 | 328 | * @retval Number of read bytes |
Wolfgang Betz |
90:26c0c9807ab4 | 329 | */ |
Wolfgang Betz |
90:26c0c9807ab4 | 330 | int32_t BlueNRGDevice::spiWrite(uint8_t* data1, |
Wolfgang Betz |
103:12684d94c3a6 | 331 | uint8_t* data2, uint8_t Nb_bytes1, uint8_t Nb_bytes2) |
Wolfgang Betz |
90:26c0c9807ab4 | 332 | { |
Wolfgang Betz |
103:12684d94c3a6 | 333 | int32_t result = 0; |
Wolfgang Betz |
103:12684d94c3a6 | 334 | |
Wolfgang Betz |
103:12684d94c3a6 | 335 | uint32_t i; |
Wolfgang Betz |
103:12684d94c3a6 | 336 | volatile uint8_t tmpreg; |
Wolfgang Betz |
90:26c0c9807ab4 | 337 | |
Wolfgang Betz |
103:12684d94c3a6 | 338 | unsigned char header_master[HEADER_SIZE] = {0x0a, 0x00, 0x00, 0x00, 0x00}; |
Wolfgang Betz |
103:12684d94c3a6 | 339 | unsigned char header_slave[HEADER_SIZE] = {0xaa, 0x00, 0x00, 0x00, 0x00}; |
Wolfgang Betz |
103:12684d94c3a6 | 340 | |
Wolfgang Betz |
103:12684d94c3a6 | 341 | //unsigned char read_char_buf[MAX_BUFFER_SIZE]; |
Wolfgang Betz |
103:12684d94c3a6 | 342 | |
Wolfgang Betz |
103:12684d94c3a6 | 343 | disable_irq(); |
Wolfgang Betz |
91:97c0c21046b4 | 344 | |
Wolfgang Betz |
103:12684d94c3a6 | 345 | /* CS reset */ |
Wolfgang Betz |
103:12684d94c3a6 | 346 | nCS_ = 0; |
Wolfgang Betz |
90:26c0c9807ab4 | 347 | |
Wolfgang Betz |
103:12684d94c3a6 | 348 | /* Exchange header */ |
Wolfgang Betz |
103:12684d94c3a6 | 349 | for (i = 0; i < 5; i++) |
Wolfgang Betz |
103:12684d94c3a6 | 350 | { |
Wolfgang Betz |
103:12684d94c3a6 | 351 | tmpreg = spi_.write(header_master[i]); |
Wolfgang Betz |
103:12684d94c3a6 | 352 | header_slave[i] = tmpreg; |
Wolfgang Betz |
103:12684d94c3a6 | 353 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 354 | |
Wolfgang Betz |
103:12684d94c3a6 | 355 | if (header_slave[0] == 0x02) { |
Wolfgang Betz |
103:12684d94c3a6 | 356 | /* SPI is ready */ |
Wolfgang Betz |
103:12684d94c3a6 | 357 | if (header_slave[1] >= (Nb_bytes1+Nb_bytes2)) { |
Wolfgang Betz |
103:12684d94c3a6 | 358 | |
Wolfgang Betz |
103:12684d94c3a6 | 359 | /* Buffer is big enough */ |
Wolfgang Betz |
103:12684d94c3a6 | 360 | for (i = 0; i < Nb_bytes1; i++) { |
Wolfgang Betz |
103:12684d94c3a6 | 361 | spi_.write(*(data1 + i)); |
Wolfgang Betz |
103:12684d94c3a6 | 362 | } |
Wolfgang Betz |
103:12684d94c3a6 | 363 | for (i = 0; i < Nb_bytes2; i++) { |
Wolfgang Betz |
103:12684d94c3a6 | 364 | spi_.write(*(data2 + i)); |
Wolfgang Betz |
103:12684d94c3a6 | 365 | } |
Wolfgang Betz |
103:12684d94c3a6 | 366 | } else { |
Wolfgang Betz |
103:12684d94c3a6 | 367 | /* Buffer is too small */ |
Wolfgang Betz |
103:12684d94c3a6 | 368 | result = -2; |
Wolfgang Betz |
103:12684d94c3a6 | 369 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 370 | } else { |
Wolfgang Betz |
103:12684d94c3a6 | 371 | /* SPI is not ready */ |
Wolfgang Betz |
103:12684d94c3a6 | 372 | result = -1; |
Wolfgang Betz |
90:26c0c9807ab4 | 373 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 374 | |
Wolfgang Betz |
103:12684d94c3a6 | 375 | /* Release CS line */ |
Wolfgang Betz |
103:12684d94c3a6 | 376 | //HAL_GPIO_WritePin(BNRG_SPI_CS_PORT, BNRG_SPI_CS_PIN, GPIO_PIN_SET); |
Wolfgang Betz |
103:12684d94c3a6 | 377 | nCS_ = 1; |
Wolfgang Betz |
103:12684d94c3a6 | 378 | |
Wolfgang Betz |
103:12684d94c3a6 | 379 | enable_irq(); |
Wolfgang Betz |
90:26c0c9807ab4 | 380 | |
Wolfgang Betz |
103:12684d94c3a6 | 381 | return result; |
Wolfgang Betz |
90:26c0c9807ab4 | 382 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 383 | |
Wolfgang Betz |
90:26c0c9807ab4 | 384 | bool BlueNRGDevice::dataPresent() |
Wolfgang Betz |
90:26c0c9807ab4 | 385 | { |
Wolfgang Betz |
90:26c0c9807ab4 | 386 | return (irq_ == 1); |
Wolfgang Betz |
90:26c0c9807ab4 | 387 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 388 | |
Wolfgang Betz |
90:26c0c9807ab4 | 389 | void BlueNRGDevice::disable_irq() |
Wolfgang Betz |
90:26c0c9807ab4 | 390 | { |
Wolfgang Betz |
90:26c0c9807ab4 | 391 | irq_.disable_irq(); |
Wolfgang Betz |
90:26c0c9807ab4 | 392 | } |
Wolfgang Betz |
90:26c0c9807ab4 | 393 | |
Wolfgang Betz |
90:26c0c9807ab4 | 394 | void BlueNRGDevice::enable_irq() |
Wolfgang Betz |
90:26c0c9807ab4 | 395 | { |
Wolfgang Betz |
90:26c0c9807ab4 | 396 | irq_.enable_irq(); |
Wolfgang Betz |
90:26c0c9807ab4 | 397 | } |