mbed library sources for airmote

Fork of mbed-src by mbed official

Committer:
mbed_official
Date:
Thu Oct 09 08:15:07 2014 +0100
Revision:
340:28d1f895c6fe
Parent:
339:40bd4701f3e2
Child:
395:bfce16e86ea4
Synchronized with git revision b5a4c8e80393336b2656fb29ab46d405d3068602

Full URL: https://github.com/mbedmicro/mbed/commit/b5a4c8e80393336b2656fb29ab46d405d3068602/

HAL: nrf51822 - Few fixes for PWM and Serial

Who changed what in which revision?

UserRevisionLine numberNew contents of line
mbed_official 85:e1a8e879a6a9 1 /* mbed Microcontroller Library
mbed_official 104:a6a92e2e5a92 2 * Copyright (c) 2013 Nordic Semiconductor
mbed_official 85:e1a8e879a6a9 3 *
mbed_official 85:e1a8e879a6a9 4 * Licensed under the Apache License, Version 2.0 (the "License");
mbed_official 85:e1a8e879a6a9 5 * you may not use this file except in compliance with the License.
mbed_official 85:e1a8e879a6a9 6 * You may obtain a copy of the License at
mbed_official 85:e1a8e879a6a9 7 *
mbed_official 85:e1a8e879a6a9 8 * http://www.apache.org/licenses/LICENSE-2.0
mbed_official 85:e1a8e879a6a9 9 *
mbed_official 85:e1a8e879a6a9 10 * Unless required by applicable law or agreed to in writing, software
mbed_official 85:e1a8e879a6a9 11 * distributed under the License is distributed on an "AS IS" BASIS,
mbed_official 85:e1a8e879a6a9 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
mbed_official 85:e1a8e879a6a9 13 * See the License for the specific language governing permissions and
mbed_official 85:e1a8e879a6a9 14 * limitations under the License.
mbed_official 85:e1a8e879a6a9 15 */
mbed_official 85:e1a8e879a6a9 16 // math.h required for floating point operations for baud rate calculation
mbed_official 85:e1a8e879a6a9 17 //#include <math.h>
mbed_official 85:e1a8e879a6a9 18 #include <string.h>
mbed_official 227:7bd0639b8911 19 #include "mbed_assert.h"
mbed_official 85:e1a8e879a6a9 20
mbed_official 85:e1a8e879a6a9 21 #include "serial_api.h"
mbed_official 85:e1a8e879a6a9 22 #include "cmsis.h"
mbed_official 85:e1a8e879a6a9 23 #include "pinmap.h"
mbed_official 227:7bd0639b8911 24
mbed_official 85:e1a8e879a6a9 25 /******************************************************************************
mbed_official 85:e1a8e879a6a9 26 * INITIALIZATION
mbed_official 85:e1a8e879a6a9 27 ******************************************************************************/
mbed_official 85:e1a8e879a6a9 28 #define UART_NUM 1
mbed_official 85:e1a8e879a6a9 29
mbed_official 85:e1a8e879a6a9 30 static uint32_t serial_irq_ids[UART_NUM] = {0};
mbed_official 85:e1a8e879a6a9 31 static uart_irq_handler irq_handler;
mbed_official 300:55638feb26a4 32 static uint32_t acceptedSpeeds[16][2] = {{1200, UART_BAUDRATE_BAUDRATE_Baud1200},
mbed_official 300:55638feb26a4 33 {2400, UART_BAUDRATE_BAUDRATE_Baud2400},
mbed_official 300:55638feb26a4 34 {4800, UART_BAUDRATE_BAUDRATE_Baud4800},
mbed_official 300:55638feb26a4 35 {9600, UART_BAUDRATE_BAUDRATE_Baud9600},
mbed_official 300:55638feb26a4 36 {14400, UART_BAUDRATE_BAUDRATE_Baud14400},
mbed_official 300:55638feb26a4 37 {19200, UART_BAUDRATE_BAUDRATE_Baud19200},
mbed_official 300:55638feb26a4 38 {28800, UART_BAUDRATE_BAUDRATE_Baud28800},
mbed_official 300:55638feb26a4 39 {38400, UART_BAUDRATE_BAUDRATE_Baud38400},
mbed_official 300:55638feb26a4 40 {57600, UART_BAUDRATE_BAUDRATE_Baud57600},
mbed_official 300:55638feb26a4 41 {76800, UART_BAUDRATE_BAUDRATE_Baud76800},
mbed_official 300:55638feb26a4 42 {115200, UART_BAUDRATE_BAUDRATE_Baud115200},
mbed_official 300:55638feb26a4 43 {230400, UART_BAUDRATE_BAUDRATE_Baud230400},
mbed_official 300:55638feb26a4 44 {250000, UART_BAUDRATE_BAUDRATE_Baud250000},
mbed_official 300:55638feb26a4 45 {460800, UART_BAUDRATE_BAUDRATE_Baud460800},
mbed_official 300:55638feb26a4 46 {921600, UART_BAUDRATE_BAUDRATE_Baud921600},
mbed_official 300:55638feb26a4 47 {1000000, UART_BAUDRATE_BAUDRATE_Baud1M}};
mbed_official 85:e1a8e879a6a9 48
mbed_official 85:e1a8e879a6a9 49 int stdio_uart_inited = 0;
mbed_official 85:e1a8e879a6a9 50 serial_t stdio_uart;
mbed_official 85:e1a8e879a6a9 51
mbed_official 85:e1a8e879a6a9 52
mbed_official 85:e1a8e879a6a9 53 void serial_init(serial_t *obj, PinName tx, PinName rx) {
mbed_official 288:17565898c031 54 UARTName uart = UART_0;
mbed_official 300:55638feb26a4 55
mbed_official 227:7bd0639b8911 56 MBED_ASSERT((int)uart != NC);
mbed_official 300:55638feb26a4 57
mbed_official 85:e1a8e879a6a9 58 obj->uart = (NRF_UART_Type *)uart;
mbed_official 300:55638feb26a4 59
mbed_official 227:7bd0639b8911 60 //pin configurations --
mbed_official 227:7bd0639b8911 61 //outputs
mbed_official 300:55638feb26a4 62 NRF_GPIO->DIR |= (1 << tx); //TX_PIN_NUMBER);
mbed_official 300:55638feb26a4 63 NRF_GPIO->DIR |= (1 << RTS_PIN_NUMBER);
mbed_official 85:e1a8e879a6a9 64
mbed_official 300:55638feb26a4 65 NRF_GPIO->DIR &= ~(1 << rx); //RX_PIN_NUMBER);
mbed_official 300:55638feb26a4 66 NRF_GPIO->DIR &= ~(1 << CTS_PIN_NUMBER);
mbed_official 300:55638feb26a4 67
mbed_official 85:e1a8e879a6a9 68 obj->uart->PSELRTS = RTS_PIN_NUMBER;
mbed_official 300:55638feb26a4 69 obj->uart->PSELTXD = tx; //TX_PIN_NUMBER;
mbed_official 300:55638feb26a4 70
mbed_official 85:e1a8e879a6a9 71 //inputs
mbed_official 85:e1a8e879a6a9 72 obj->uart->PSELCTS = CTS_PIN_NUMBER;
mbed_official 300:55638feb26a4 73 obj->uart->PSELRXD = rx; //RX_PIN_NUMBER;
mbed_official 300:55638feb26a4 74
mbed_official 300:55638feb26a4 75
mbed_official 85:e1a8e879a6a9 76 // set default baud rate and format
mbed_official 85:e1a8e879a6a9 77 serial_baud (obj, 9600);
mbed_official 85:e1a8e879a6a9 78 serial_format(obj, 8, ParityNone, 1);
mbed_official 300:55638feb26a4 79
mbed_official 300:55638feb26a4 80 obj->uart->ENABLE = (UART_ENABLE_ENABLE_Enabled << UART_ENABLE_ENABLE_Pos);
mbed_official 85:e1a8e879a6a9 81 obj->uart->TASKS_STARTTX = 1;
mbed_official 85:e1a8e879a6a9 82 obj->uart->TASKS_STARTRX = 1;
mbed_official 300:55638feb26a4 83 obj->uart->EVENTS_RXDRDY = 0;
mbed_official 300:55638feb26a4 84
mbed_official 85:e1a8e879a6a9 85 obj->index = 0;
mbed_official 300:55638feb26a4 86
mbed_official 85:e1a8e879a6a9 87 // set rx/tx pins in PullUp mode
mbed_official 339:40bd4701f3e2 88 if (tx != NC) {
mbed_official 339:40bd4701f3e2 89 pin_mode(tx, PullUp);
mbed_official 339:40bd4701f3e2 90 }
mbed_official 339:40bd4701f3e2 91 if (rx != NC) {
mbed_official 339:40bd4701f3e2 92 pin_mode(rx, PullUp);
mbed_official 339:40bd4701f3e2 93 }
mbed_official 300:55638feb26a4 94
mbed_official 85:e1a8e879a6a9 95 if (uart == STDIO_UART) {
mbed_official 85:e1a8e879a6a9 96 stdio_uart_inited = 1;
mbed_official 85:e1a8e879a6a9 97 memcpy(&stdio_uart, obj, sizeof(serial_t));
mbed_official 85:e1a8e879a6a9 98 }
mbed_official 85:e1a8e879a6a9 99 }
mbed_official 85:e1a8e879a6a9 100
mbed_official 300:55638feb26a4 101 void serial_free(serial_t *obj)
mbed_official 300:55638feb26a4 102 {
mbed_official 85:e1a8e879a6a9 103 serial_irq_ids[obj->index] = 0;
mbed_official 85:e1a8e879a6a9 104 }
mbed_official 85:e1a8e879a6a9 105
mbed_official 85:e1a8e879a6a9 106 // serial_baud
mbed_official 85:e1a8e879a6a9 107 // set the baud rate, taking in to account the current SystemFrequency
mbed_official 300:55638feb26a4 108 void serial_baud(serial_t *obj, int baudrate)
mbed_official 300:55638feb26a4 109 {
mbed_official 300:55638feb26a4 110 if (baudrate<=1200) {
mbed_official 85:e1a8e879a6a9 111 obj->uart->BAUDRATE = UART_BAUDRATE_BAUDRATE_Baud1200;
mbed_official 85:e1a8e879a6a9 112 return;
mbed_official 227:7bd0639b8911 113 }
mbed_official 300:55638feb26a4 114
mbed_official 300:55638feb26a4 115 for (int i = 1; i<16; i++) {
mbed_official 300:55638feb26a4 116 if (baudrate<acceptedSpeeds[i][0]) {
mbed_official 300:55638feb26a4 117 obj->uart->BAUDRATE = acceptedSpeeds[i - 1][1];
mbed_official 85:e1a8e879a6a9 118 return;
mbed_official 85:e1a8e879a6a9 119 }
mbed_official 85:e1a8e879a6a9 120 }
mbed_official 85:e1a8e879a6a9 121 obj->uart->BAUDRATE = UART_BAUDRATE_BAUDRATE_Baud1M;
mbed_official 85:e1a8e879a6a9 122 }
mbed_official 85:e1a8e879a6a9 123
mbed_official 300:55638feb26a4 124 void serial_format(serial_t *obj, int data_bits, SerialParity parity, int stop_bits)
mbed_official 300:55638feb26a4 125 {
mbed_official 85:e1a8e879a6a9 126 // 0: 1 stop bits, 1: 2 stop bits
mbed_official 300:55638feb26a4 127 // int parity_enable, parity_select;
mbed_official 85:e1a8e879a6a9 128 switch (parity) {
mbed_official 227:7bd0639b8911 129 case ParityNone:
mbed_official 300:55638feb26a4 130 obj->uart->CONFIG = 0;
mbed_official 300:55638feb26a4 131 break;
mbed_official 85:e1a8e879a6a9 132 default:
mbed_official 300:55638feb26a4 133 obj->uart->CONFIG = (UART_CONFIG_PARITY_Included << UART_CONFIG_PARITY_Pos);
mbed_official 85:e1a8e879a6a9 134 return;
mbed_official 85:e1a8e879a6a9 135 }
mbed_official 85:e1a8e879a6a9 136 //no Flow Control
mbed_official 85:e1a8e879a6a9 137 }
mbed_official 85:e1a8e879a6a9 138
mbed_official 85:e1a8e879a6a9 139 //******************************************************************************
mbed_official 85:e1a8e879a6a9 140 // * INTERRUPT HANDLING
mbed_official 85:e1a8e879a6a9 141 //******************************************************************************
mbed_official 300:55638feb26a4 142 static inline void uart_irq(uint32_t iir, uint32_t index)
mbed_official 300:55638feb26a4 143 {
mbed_official 85:e1a8e879a6a9 144 SerialIrq irq_type;
mbed_official 85:e1a8e879a6a9 145 switch (iir) {
mbed_official 227:7bd0639b8911 146 case 1:
mbed_official 227:7bd0639b8911 147 irq_type = TxIrq;
mbed_official 300:55638feb26a4 148 break;
mbed_official 227:7bd0639b8911 149 case 2:
mbed_official 227:7bd0639b8911 150 irq_type = RxIrq;
mbed_official 300:55638feb26a4 151 break;
mbed_official 300:55638feb26a4 152
mbed_official 300:55638feb26a4 153 default:
mbed_official 300:55638feb26a4 154 return;
mbed_official 85:e1a8e879a6a9 155 }
mbed_official 300:55638feb26a4 156
mbed_official 300:55638feb26a4 157 if (serial_irq_ids[index] != 0) {
mbed_official 85:e1a8e879a6a9 158 irq_handler(serial_irq_ids[index], irq_type);
mbed_official 85:e1a8e879a6a9 159 }
mbed_official 85:e1a8e879a6a9 160 }
mbed_official 300:55638feb26a4 161
mbed_official 85:e1a8e879a6a9 162 #ifdef __cplusplus
mbed_official 85:e1a8e879a6a9 163 extern "C" {
mbed_official 227:7bd0639b8911 164 #endif
mbed_official 85:e1a8e879a6a9 165 void UART0_IRQHandler()
mbed_official 85:e1a8e879a6a9 166 {
mbed_official 300:55638feb26a4 167 uint32_t irtype = 0;
mbed_official 300:55638feb26a4 168
mbed_official 340:28d1f895c6fe 169 if((NRF_UART0->INTENSET & 0x80) && NRF_UART0->EVENTS_TXDRDY) {
mbed_official 300:55638feb26a4 170 irtype = 1;
mbed_official 340:28d1f895c6fe 171 } else if((NRF_UART0->INTENSET & 0x04) && NRF_UART0->EVENTS_RXDRDY) {
mbed_official 300:55638feb26a4 172 irtype = 2;
mbed_official 85:e1a8e879a6a9 173 }
mbed_official 85:e1a8e879a6a9 174 uart_irq(irtype, 0);
mbed_official 85:e1a8e879a6a9 175 }
mbed_official 300:55638feb26a4 176
mbed_official 85:e1a8e879a6a9 177 #ifdef __cplusplus
mbed_official 85:e1a8e879a6a9 178 }
mbed_official 227:7bd0639b8911 179 #endif
mbed_official 300:55638feb26a4 180 void serial_irq_handler(serial_t *obj, uart_irq_handler handler, uint32_t id)
mbed_official 300:55638feb26a4 181 {
mbed_official 300:55638feb26a4 182 irq_handler = handler;
mbed_official 85:e1a8e879a6a9 183 serial_irq_ids[obj->index] = id;
mbed_official 85:e1a8e879a6a9 184 }
mbed_official 85:e1a8e879a6a9 185
mbed_official 300:55638feb26a4 186 void serial_irq_set(serial_t *obj, SerialIrq irq, uint32_t enable)
mbed_official 300:55638feb26a4 187 {
mbed_official 85:e1a8e879a6a9 188 IRQn_Type irq_n = (IRQn_Type)0;
mbed_official 85:e1a8e879a6a9 189
mbed_official 85:e1a8e879a6a9 190 switch ((int)obj->uart) {
mbed_official 300:55638feb26a4 191 case UART_0:
mbed_official 300:55638feb26a4 192 irq_n = UART0_IRQn;
mbed_official 85:e1a8e879a6a9 193 break;
mbed_official 85:e1a8e879a6a9 194 }
mbed_official 300:55638feb26a4 195
mbed_official 85:e1a8e879a6a9 196 if (enable) {
mbed_official 85:e1a8e879a6a9 197 switch (irq) {
mbed_official 300:55638feb26a4 198 case RxIrq:
mbed_official 300:55638feb26a4 199 obj->uart->INTENSET |= (UART_INTENSET_RXDRDY_Msk);
mbed_official 300:55638feb26a4 200 break;
mbed_official 300:55638feb26a4 201 case TxIrq:
mbed_official 300:55638feb26a4 202 obj->uart->INTENSET |= (UART_INTENSET_TXDRDY_Msk);
mbed_official 300:55638feb26a4 203 break;
mbed_official 85:e1a8e879a6a9 204 }
mbed_official 85:e1a8e879a6a9 205 NVIC_SetPriority(irq_n, 3);
mbed_official 85:e1a8e879a6a9 206 NVIC_EnableIRQ(irq_n);
mbed_official 300:55638feb26a4 207 } else { // disable
mbed_official 85:e1a8e879a6a9 208 int all_disabled = 0;
mbed_official 85:e1a8e879a6a9 209 switch (irq) {
mbed_official 300:55638feb26a4 210 case RxIrq:
mbed_official 300:55638feb26a4 211 obj->uart->INTENSET &= ~(UART_INTENSET_RXDRDY_Msk);
mbed_official 300:55638feb26a4 212 all_disabled = (obj->uart->INTENSET & (UART_INTENSET_TXDRDY_Msk))==0;
mbed_official 300:55638feb26a4 213 break;
mbed_official 300:55638feb26a4 214 case TxIrq:
mbed_official 300:55638feb26a4 215 obj->uart->INTENSET &= ~(UART_INTENSET_TXDRDY_Msk);
mbed_official 300:55638feb26a4 216 all_disabled = (obj->uart->INTENSET & (UART_INTENSET_RXDRDY_Msk))==0;
mbed_official 300:55638feb26a4 217 break;
mbed_official 85:e1a8e879a6a9 218 }
mbed_official 300:55638feb26a4 219
mbed_official 300:55638feb26a4 220 if (all_disabled) {
mbed_official 85:e1a8e879a6a9 221 NVIC_DisableIRQ(irq_n);
mbed_official 85:e1a8e879a6a9 222 }
mbed_official 85:e1a8e879a6a9 223 }
mbed_official 85:e1a8e879a6a9 224 }
mbed_official 85:e1a8e879a6a9 225
mbed_official 85:e1a8e879a6a9 226 //******************************************************************************
mbed_official 85:e1a8e879a6a9 227 //* READ/WRITE
mbed_official 85:e1a8e879a6a9 228 //******************************************************************************
mbed_official 300:55638feb26a4 229 int serial_getc(serial_t *obj)
mbed_official 300:55638feb26a4 230 {
mbed_official 300:55638feb26a4 231 while (!serial_readable(obj)) {
mbed_official 300:55638feb26a4 232 }
mbed_official 300:55638feb26a4 233
mbed_official 85:e1a8e879a6a9 234 obj->uart->EVENTS_RXDRDY = 0;
mbed_official 300:55638feb26a4 235
mbed_official 85:e1a8e879a6a9 236 return (uint8_t)obj->uart->RXD;
mbed_official 85:e1a8e879a6a9 237 }
mbed_official 85:e1a8e879a6a9 238
mbed_official 300:55638feb26a4 239 void serial_putc(serial_t *obj, int c)
mbed_official 300:55638feb26a4 240 {
mbed_official 85:e1a8e879a6a9 241 obj->uart->TXD = (uint8_t)c;
mbed_official 300:55638feb26a4 242
mbed_official 300:55638feb26a4 243 while (!serial_writable(obj)) {
mbed_official 300:55638feb26a4 244 }
mbed_official 300:55638feb26a4 245
mbed_official 300:55638feb26a4 246 obj->uart->EVENTS_TXDRDY = 0;
mbed_official 85:e1a8e879a6a9 247 }
mbed_official 85:e1a8e879a6a9 248
mbed_official 300:55638feb26a4 249 int serial_readable(serial_t *obj)
mbed_official 300:55638feb26a4 250 {
mbed_official 85:e1a8e879a6a9 251 return (obj->uart->EVENTS_RXDRDY == 1);
mbed_official 85:e1a8e879a6a9 252 }
mbed_official 85:e1a8e879a6a9 253
mbed_official 300:55638feb26a4 254 int serial_writable(serial_t *obj)
mbed_official 300:55638feb26a4 255 {
mbed_official 85:e1a8e879a6a9 256 return (obj->uart->EVENTS_TXDRDY ==1);
mbed_official 85:e1a8e879a6a9 257 }
mbed_official 85:e1a8e879a6a9 258
mbed_official 300:55638feb26a4 259 void serial_break_set(serial_t *obj)
mbed_official 300:55638feb26a4 260 {
mbed_official 85:e1a8e879a6a9 261 obj->uart->TASKS_SUSPEND = 1;
mbed_official 85:e1a8e879a6a9 262 }
mbed_official 85:e1a8e879a6a9 263
mbed_official 300:55638feb26a4 264 void serial_break_clear(serial_t *obj)
mbed_official 300:55638feb26a4 265 {
mbed_official 85:e1a8e879a6a9 266 obj->uart->TASKS_STARTTX = 1;
mbed_official 85:e1a8e879a6a9 267 obj->uart->TASKS_STARTRX = 1;
mbed_official 85:e1a8e879a6a9 268 }
mbed_official 340:28d1f895c6fe 269
mbed_official 340:28d1f895c6fe 270 void serial_set_flow_control(serial_t *obj, FlowControl type, PinName rxflow, PinName txflow)
mbed_official 340:28d1f895c6fe 271 {
mbed_official 340:28d1f895c6fe 272
mbed_official 340:28d1f895c6fe 273 if (type == FlowControlRTSCTS || type == FlowControlRTS) {
mbed_official 340:28d1f895c6fe 274 NRF_GPIO->DIR |= (1<<rxflow);
mbed_official 340:28d1f895c6fe 275 pin_mode(rxflow, PullUp);
mbed_official 340:28d1f895c6fe 276 obj->uart->PSELRTS = rxflow;
mbed_official 340:28d1f895c6fe 277
mbed_official 340:28d1f895c6fe 278 obj->uart->CONFIG |= 0x01; // Enable HWFC
mbed_official 340:28d1f895c6fe 279 }
mbed_official 340:28d1f895c6fe 280
mbed_official 340:28d1f895c6fe 281 if (type == FlowControlRTSCTS || type == FlowControlCTS) {
mbed_official 340:28d1f895c6fe 282 NRF_GPIO->DIR &= ~(1<<txflow);
mbed_official 340:28d1f895c6fe 283 pin_mode(txflow, PullUp);
mbed_official 340:28d1f895c6fe 284 obj->uart->PSELCTS = txflow;
mbed_official 340:28d1f895c6fe 285
mbed_official 340:28d1f895c6fe 286 obj->uart->CONFIG |= 0x01; // Enable HWFC;
mbed_official 340:28d1f895c6fe 287 }
mbed_official 340:28d1f895c6fe 288
mbed_official 340:28d1f895c6fe 289 if (type == FlowControlNone) {
mbed_official 340:28d1f895c6fe 290 obj->uart->PSELRTS = 0xFFFFFFFF; // Disable RTS
mbed_official 340:28d1f895c6fe 291 obj->uart->PSELCTS = 0xFFFFFFFF; // Disable CTS
mbed_official 340:28d1f895c6fe 292
mbed_official 340:28d1f895c6fe 293 obj->uart->CONFIG &= ~0x01; // Enable HWFC;
mbed_official 340:28d1f895c6fe 294 }
mbed_official 340:28d1f895c6fe 295 }
mbed_official 340:28d1f895c6fe 296
mbed_official 340:28d1f895c6fe 297 void serial_clear(serial_t *obj) {
mbed_official 340:28d1f895c6fe 298 }
mbed_official 340:28d1f895c6fe 299