Marco Mayer / Mbed OS Queue
Committer:
demayer
Date:
Wed Apr 22 11:50:00 2020 +0000
Revision:
2:c7897a3f5f11
Parent:
0:6bf0743ece18
test

Who changed what in which revision?

UserRevisionLine numberNew contents of line
demayer 0:6bf0743ece18 1 /* mbed Microcontroller Library
demayer 0:6bf0743ece18 2 * Copyright (c) 2006-2013 ARM Limited
demayer 0:6bf0743ece18 3 *
demayer 0:6bf0743ece18 4 * Licensed under the Apache License, Version 2.0 (the "License");
demayer 0:6bf0743ece18 5 * you may not use this file except in compliance with the License.
demayer 0:6bf0743ece18 6 * You may obtain a copy of the License at
demayer 0:6bf0743ece18 7 *
demayer 0:6bf0743ece18 8 * http://www.apache.org/licenses/LICENSE-2.0
demayer 0:6bf0743ece18 9 *
demayer 0:6bf0743ece18 10 * Unless required by applicable law or agreed to in writing, software
demayer 0:6bf0743ece18 11 * distributed under the License is distributed on an "AS IS" BASIS,
demayer 0:6bf0743ece18 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
demayer 0:6bf0743ece18 13 * See the License for the specific language governing permissions and
demayer 0:6bf0743ece18 14 * limitations under the License.
demayer 0:6bf0743ece18 15 */
demayer 0:6bf0743ece18 16 // math.h required for floating point operations for baud rate calculation
demayer 0:6bf0743ece18 17 #include "mbed_assert.h"
demayer 0:6bf0743ece18 18 #include <math.h>
demayer 0:6bf0743ece18 19 #include <string.h>
demayer 0:6bf0743ece18 20
demayer 0:6bf0743ece18 21 #include "serial_api.h"
demayer 0:6bf0743ece18 22 #include "cmsis.h"
demayer 0:6bf0743ece18 23 #include "pinmap.h"
demayer 0:6bf0743ece18 24 #include "mbed_error.h"
demayer 0:6bf0743ece18 25
demayer 0:6bf0743ece18 26 /******************************************************************************
demayer 0:6bf0743ece18 27 * INITIALIZATION
demayer 0:6bf0743ece18 28 ******************************************************************************/
demayer 0:6bf0743ece18 29 #define UART_NUM 3
demayer 0:6bf0743ece18 30
demayer 0:6bf0743ece18 31 static const SWM_Map SWM_UART_TX[] = {
demayer 0:6bf0743ece18 32 {0, 0}, // Pin assign register0, 7:0bit
demayer 0:6bf0743ece18 33 {1, 8}, // Pin assign register1, 15:8bit
demayer 0:6bf0743ece18 34 {2, 16}, // Pin assign register2, 23:16bit
demayer 0:6bf0743ece18 35 };
demayer 0:6bf0743ece18 36
demayer 0:6bf0743ece18 37 static const SWM_Map SWM_UART_RX[] = {
demayer 0:6bf0743ece18 38 {0, 8},
demayer 0:6bf0743ece18 39 {1, 16},
demayer 0:6bf0743ece18 40 {2, 24},
demayer 0:6bf0743ece18 41 };
demayer 0:6bf0743ece18 42
demayer 0:6bf0743ece18 43 static const SWM_Map SWM_UART_RTS[] = {
demayer 0:6bf0743ece18 44 {0, 16},
demayer 0:6bf0743ece18 45 {1, 24},
demayer 0:6bf0743ece18 46 {3, 0}, // not available
demayer 0:6bf0743ece18 47 };
demayer 0:6bf0743ece18 48
demayer 0:6bf0743ece18 49 static const SWM_Map SWM_UART_CTS[] = {
demayer 0:6bf0743ece18 50 {0, 24},
demayer 0:6bf0743ece18 51 {2, 0},
demayer 0:6bf0743ece18 52 {3, 8} // not available
demayer 0:6bf0743ece18 53 };
demayer 0:6bf0743ece18 54
demayer 0:6bf0743ece18 55 // bit flags for used UARTs
demayer 0:6bf0743ece18 56 static unsigned char uart_used = 0;
demayer 0:6bf0743ece18 57 static int get_available_uart(void) {
demayer 0:6bf0743ece18 58 int i;
demayer 0:6bf0743ece18 59 for (i=0; i<3; i++) {
demayer 0:6bf0743ece18 60 if ((uart_used & (1 << i)) == 0)
demayer 0:6bf0743ece18 61 return i;
demayer 0:6bf0743ece18 62 }
demayer 0:6bf0743ece18 63 return -1;
demayer 0:6bf0743ece18 64 }
demayer 0:6bf0743ece18 65
demayer 0:6bf0743ece18 66 #define UART_EN (0x01<<0)
demayer 0:6bf0743ece18 67
demayer 0:6bf0743ece18 68 #define CTS_DELTA (0x01<<5)
demayer 0:6bf0743ece18 69 #define RXBRK (0x01<<10)
demayer 0:6bf0743ece18 70 #define DELTA_RXBRK (0x01<<11)
demayer 0:6bf0743ece18 71
demayer 0:6bf0743ece18 72 #define RXRDY (0x01<<0)
demayer 0:6bf0743ece18 73 #define TXRDY (0x01<<2)
demayer 0:6bf0743ece18 74
demayer 0:6bf0743ece18 75 #define TXBRKEN (0x01<<1)
demayer 0:6bf0743ece18 76 #define CTSEN (0x01<<9)
demayer 0:6bf0743ece18 77
demayer 0:6bf0743ece18 78 static uint32_t UARTSysClk;
demayer 0:6bf0743ece18 79
demayer 0:6bf0743ece18 80 static uint32_t serial_irq_ids[UART_NUM] = {0};
demayer 0:6bf0743ece18 81 static uart_irq_handler irq_handler;
demayer 0:6bf0743ece18 82
demayer 0:6bf0743ece18 83 int stdio_uart_inited = 0;
demayer 0:6bf0743ece18 84 serial_t stdio_uart;
demayer 0:6bf0743ece18 85
demayer 0:6bf0743ece18 86 static void switch_pin(const SWM_Map *swm, PinName pn)
demayer 0:6bf0743ece18 87 {
demayer 0:6bf0743ece18 88 uint32_t regVal;
demayer 0:6bf0743ece18 89 if (pn != NC)
demayer 0:6bf0743ece18 90 {
demayer 0:6bf0743ece18 91 // check if we have any function mapped to this pin already and remove it
demayer 0:6bf0743ece18 92 for (uint32_t n = 0; n < sizeof(LPC_SWM->PINASSIGN)/sizeof(*LPC_SWM->PINASSIGN); n ++) {
demayer 0:6bf0743ece18 93 regVal = LPC_SWM->PINASSIGN[n];
demayer 0:6bf0743ece18 94 for (uint32_t j = 0; j <= 24; j += 8) {
demayer 0:6bf0743ece18 95 if (((regVal >> j) & 0xFF) == (uint32_t)pn)
demayer 0:6bf0743ece18 96 regVal |= (0xFF << j);
demayer 0:6bf0743ece18 97 }
demayer 0:6bf0743ece18 98 LPC_SWM->PINASSIGN[n] = regVal;
demayer 0:6bf0743ece18 99 }
demayer 0:6bf0743ece18 100 }
demayer 0:6bf0743ece18 101 // now map it
demayer 0:6bf0743ece18 102 regVal = LPC_SWM->PINASSIGN[swm->n] & ~(0xFF << swm->offset);
demayer 0:6bf0743ece18 103 LPC_SWM->PINASSIGN[swm->n] = regVal | (pn << swm->offset);
demayer 0:6bf0743ece18 104 }
demayer 0:6bf0743ece18 105
demayer 0:6bf0743ece18 106 void serial_init(serial_t *obj, PinName tx, PinName rx) {
demayer 0:6bf0743ece18 107 int is_stdio_uart = 0;
demayer 0:6bf0743ece18 108
demayer 0:6bf0743ece18 109 int uart_n = get_available_uart();
demayer 0:6bf0743ece18 110 if (uart_n == -1) {
demayer 0:6bf0743ece18 111 error("No available UART");
demayer 0:6bf0743ece18 112 }
demayer 0:6bf0743ece18 113 obj->index = uart_n;
demayer 0:6bf0743ece18 114 switch (uart_n) {
demayer 0:6bf0743ece18 115 case 0: obj->uart = (LPC_USART0_Type *)LPC_USART0_BASE; break;
demayer 0:6bf0743ece18 116 case 1: obj->uart = (LPC_USART0_Type *)LPC_USART1_BASE; break;
demayer 0:6bf0743ece18 117 case 2: obj->uart = (LPC_USART0_Type *)LPC_USART2_BASE; break;
demayer 0:6bf0743ece18 118 }
demayer 0:6bf0743ece18 119 uart_used |= (1 << uart_n);
demayer 0:6bf0743ece18 120
demayer 0:6bf0743ece18 121 switch_pin(&SWM_UART_TX[uart_n], tx);
demayer 0:6bf0743ece18 122 switch_pin(&SWM_UART_RX[uart_n], rx);
demayer 0:6bf0743ece18 123
demayer 0:6bf0743ece18 124 /* uart clock divided by 6 */
demayer 0:6bf0743ece18 125 LPC_SYSCON->UARTCLKDIV =6;
demayer 0:6bf0743ece18 126
demayer 0:6bf0743ece18 127 /* disable uart interrupts */
demayer 0:6bf0743ece18 128 NVIC_DisableIRQ((IRQn_Type)(UART0_IRQn + uart_n));
demayer 0:6bf0743ece18 129
demayer 0:6bf0743ece18 130 /* Enable UART clock */
demayer 0:6bf0743ece18 131 LPC_SYSCON->SYSAHBCLKCTRL1 |= (1 << (17 + uart_n));
demayer 0:6bf0743ece18 132
demayer 0:6bf0743ece18 133 /* Peripheral reset control to UART, a "1" bring it out of reset. */
demayer 0:6bf0743ece18 134 LPC_SYSCON->PRESETCTRL1 |= (0x1 << (17 + uart_n));
demayer 0:6bf0743ece18 135 LPC_SYSCON->PRESETCTRL1 &= ~(0x1 << (17 + uart_n));
demayer 0:6bf0743ece18 136
demayer 0:6bf0743ece18 137 UARTSysClk = SystemCoreClock / LPC_SYSCON->UARTCLKDIV;
demayer 0:6bf0743ece18 138
demayer 0:6bf0743ece18 139 // set default baud rate and format
demayer 0:6bf0743ece18 140 serial_baud (obj, 9600);
demayer 0:6bf0743ece18 141 serial_format(obj, 8, ParityNone, 1);
demayer 0:6bf0743ece18 142
demayer 0:6bf0743ece18 143 /* Clear all status bits. */
demayer 0:6bf0743ece18 144 obj->uart->STAT = CTS_DELTA | DELTA_RXBRK;
demayer 0:6bf0743ece18 145
demayer 0:6bf0743ece18 146 /* enable uart interrupts */
demayer 0:6bf0743ece18 147 NVIC_EnableIRQ((IRQn_Type)(UART0_IRQn + uart_n));
demayer 0:6bf0743ece18 148
demayer 0:6bf0743ece18 149 /* Enable UART */
demayer 0:6bf0743ece18 150 obj->uart->CFG |= UART_EN;
demayer 0:6bf0743ece18 151
demayer 0:6bf0743ece18 152 is_stdio_uart = ((tx == USBTX) && (rx == USBRX));
demayer 0:6bf0743ece18 153
demayer 0:6bf0743ece18 154 if (is_stdio_uart) {
demayer 0:6bf0743ece18 155 stdio_uart_inited = 1;
demayer 0:6bf0743ece18 156 memcpy(&stdio_uart, obj, sizeof(serial_t));
demayer 0:6bf0743ece18 157 }
demayer 0:6bf0743ece18 158 }
demayer 0:6bf0743ece18 159
demayer 0:6bf0743ece18 160 void serial_free(serial_t *obj) {
demayer 0:6bf0743ece18 161 uart_used &= ~(1 << obj->index);
demayer 0:6bf0743ece18 162 serial_irq_ids[obj->index] = 0;
demayer 0:6bf0743ece18 163 }
demayer 0:6bf0743ece18 164
demayer 0:6bf0743ece18 165 // serial_baud
demayer 0:6bf0743ece18 166 // set the baud rate, taking in to account the current SystemFrequency
demayer 0:6bf0743ece18 167 void serial_baud(serial_t *obj, int baudrate) {
demayer 0:6bf0743ece18 168 /* Integer divider:
demayer 0:6bf0743ece18 169 BRG = UARTSysClk/(Baudrate * 16) - 1
demayer 0:6bf0743ece18 170
demayer 0:6bf0743ece18 171 Frational divider:
demayer 0:6bf0743ece18 172 FRG = ((UARTSysClk / (Baudrate * 16 * (BRG + 1))) - 1)
demayer 0:6bf0743ece18 173
demayer 0:6bf0743ece18 174 where
demayer 0:6bf0743ece18 175 FRG = (LPC_SYSCON->UARTFRDADD + 1) / (LPC_SYSCON->UARTFRDSUB + 1)
demayer 0:6bf0743ece18 176
demayer 0:6bf0743ece18 177 (1) The easiest way is set SUB value to 256, -1 encoded, thus SUB
demayer 0:6bf0743ece18 178 register is 0xFF.
demayer 0:6bf0743ece18 179 (2) In ADD register value, depending on the value of UartSysClk,
demayer 0:6bf0743ece18 180 baudrate, BRG register value, and SUB register value, be careful
demayer 0:6bf0743ece18 181 about the order of multiplier and divider and make sure any
demayer 0:6bf0743ece18 182 multiplier doesn't exceed 32-bit boundary and any divider doesn't get
demayer 0:6bf0743ece18 183 down below one(integer 0).
demayer 0:6bf0743ece18 184 (3) ADD should be always less than SUB.
demayer 0:6bf0743ece18 185 */
demayer 0:6bf0743ece18 186 obj->uart->BRG = UARTSysClk / 16 / baudrate - 1;
demayer 0:6bf0743ece18 187
demayer 0:6bf0743ece18 188 // To use of the fractional baud rate generator, you must write 0xFF to the DIV
demayer 0:6bf0743ece18 189 // value to yield a denominator value of 256. All other values are not supported.
demayer 0:6bf0743ece18 190 LPC_SYSCON->FRGCTRL = 0xFF;
demayer 0:6bf0743ece18 191
demayer 0:6bf0743ece18 192 LPC_SYSCON->FRGCTRL |= ( ( ((UARTSysClk / 16) * (0xFF + 1)) /
demayer 0:6bf0743ece18 193 (baudrate * (obj->uart->BRG + 1))
demayer 0:6bf0743ece18 194 ) - (0xFF + 1) ) << 8;
demayer 0:6bf0743ece18 195
demayer 0:6bf0743ece18 196 }
demayer 0:6bf0743ece18 197
demayer 0:6bf0743ece18 198 void serial_format(serial_t *obj, int data_bits, SerialParity parity, int stop_bits) {
demayer 0:6bf0743ece18 199 MBED_ASSERT((stop_bits == 1) || (stop_bits == 2)); // 0: 1 stop bits, 1: 2 stop bits
demayer 0:6bf0743ece18 200 MBED_ASSERT((data_bits > 6) && (data_bits < 10)); // 0: 7 data bits ... 2: 9 data bits
demayer 0:6bf0743ece18 201 MBED_ASSERT((parity == ParityNone) || (parity == ParityEven) || (parity == ParityOdd));
demayer 0:6bf0743ece18 202
demayer 0:6bf0743ece18 203 stop_bits -= 1;
demayer 0:6bf0743ece18 204 data_bits -= 7;
demayer 0:6bf0743ece18 205
demayer 0:6bf0743ece18 206 int paritysel;
demayer 0:6bf0743ece18 207 switch (parity) {
demayer 0:6bf0743ece18 208 case ParityNone: paritysel = 0; break;
demayer 0:6bf0743ece18 209 case ParityEven: paritysel = 2; break;
demayer 0:6bf0743ece18 210 case ParityOdd : paritysel = 3; break;
demayer 0:6bf0743ece18 211 default:
demayer 0:6bf0743ece18 212 break;
demayer 0:6bf0743ece18 213 }
demayer 0:6bf0743ece18 214
demayer 0:6bf0743ece18 215 // First disable the the usart as described in documentation and then enable while updating CFG
demayer 0:6bf0743ece18 216
demayer 0:6bf0743ece18 217 // 24.6.1 USART Configuration register
demayer 0:6bf0743ece18 218 // Remark: If software needs to change configuration values, the following sequence should
demayer 0:6bf0743ece18 219 // be used: 1) Make sure the USART is not currently sending or receiving data. 2) Disable
demayer 0:6bf0743ece18 220 // the USART by writing a 0 to the Enable bit (0 may be written to the entire register). 3)
demayer 0:6bf0743ece18 221 // Write the new configuration value, with the ENABLE bit set to 1.
demayer 0:6bf0743ece18 222 obj->uart->CFG &= ~(1 << 0);
demayer 0:6bf0743ece18 223
demayer 0:6bf0743ece18 224 obj->uart->CFG = (1 << 0) // this will enable the usart
demayer 0:6bf0743ece18 225 | (data_bits << 2)
demayer 0:6bf0743ece18 226 | (paritysel << 4)
demayer 0:6bf0743ece18 227 | (stop_bits << 6);
demayer 0:6bf0743ece18 228 }
demayer 0:6bf0743ece18 229
demayer 0:6bf0743ece18 230 /******************************************************************************
demayer 0:6bf0743ece18 231 * INTERRUPTS HANDLING
demayer 0:6bf0743ece18 232 ******************************************************************************/
demayer 0:6bf0743ece18 233 static inline void uart_irq(SerialIrq irq_type, uint32_t index) {
demayer 0:6bf0743ece18 234 if (serial_irq_ids[index] != 0)
demayer 0:6bf0743ece18 235 irq_handler(serial_irq_ids[index], irq_type);
demayer 0:6bf0743ece18 236 }
demayer 0:6bf0743ece18 237
demayer 0:6bf0743ece18 238 void uart0_irq() {uart_irq((LPC_USART0->INTSTAT & 1) ? RxIrq : TxIrq, 0);}
demayer 0:6bf0743ece18 239 void uart1_irq() {uart_irq((LPC_USART1->INTSTAT & 1) ? RxIrq : TxIrq, 1);}
demayer 0:6bf0743ece18 240 void uart2_irq() {uart_irq((LPC_USART2->INTSTAT & 1) ? RxIrq : TxIrq, 2);}
demayer 0:6bf0743ece18 241
demayer 0:6bf0743ece18 242 void serial_irq_handler(serial_t *obj, uart_irq_handler handler, uint32_t id) {
demayer 0:6bf0743ece18 243 irq_handler = handler;
demayer 0:6bf0743ece18 244 serial_irq_ids[obj->index] = id;
demayer 0:6bf0743ece18 245 }
demayer 0:6bf0743ece18 246
demayer 0:6bf0743ece18 247 void serial_irq_set(serial_t *obj, SerialIrq irq, uint32_t enable) {
demayer 0:6bf0743ece18 248 IRQn_Type irq_n = (IRQn_Type)0;
demayer 0:6bf0743ece18 249 uint32_t vector = 0;
demayer 0:6bf0743ece18 250 switch ((int)obj->uart) {
demayer 0:6bf0743ece18 251 case LPC_USART0_BASE: irq_n=UART0_IRQn; vector = (uint32_t)&uart0_irq; break;
demayer 0:6bf0743ece18 252 case LPC_USART1_BASE: irq_n=UART1_IRQn; vector = (uint32_t)&uart1_irq; break;
demayer 0:6bf0743ece18 253 case LPC_USART2_BASE: irq_n=UART2_IRQn; vector = (uint32_t)&uart2_irq; break;
demayer 0:6bf0743ece18 254 }
demayer 0:6bf0743ece18 255
demayer 0:6bf0743ece18 256 if (enable) {
demayer 0:6bf0743ece18 257 NVIC_DisableIRQ(irq_n);
demayer 0:6bf0743ece18 258 obj->uart->INTENSET |= (1 << ((irq == RxIrq) ? 0 : 2));
demayer 0:6bf0743ece18 259 NVIC_SetVector(irq_n, vector);
demayer 0:6bf0743ece18 260 NVIC_EnableIRQ(irq_n);
demayer 0:6bf0743ece18 261 } else { // disable
demayer 0:6bf0743ece18 262 int all_disabled = 0;
demayer 0:6bf0743ece18 263 SerialIrq other_irq = (irq == RxIrq) ? (TxIrq) : (RxIrq);
demayer 0:6bf0743ece18 264 obj->uart->INTENCLR |= (1 << ((irq == RxIrq) ? 0 : 2)); // disable the interrupt
demayer 0:6bf0743ece18 265 all_disabled = (obj->uart->INTENSET & (1 << ((other_irq == RxIrq) ? 0 : 2))) == 0;
demayer 0:6bf0743ece18 266 if (all_disabled)
demayer 0:6bf0743ece18 267 NVIC_DisableIRQ(irq_n);
demayer 0:6bf0743ece18 268 }
demayer 0:6bf0743ece18 269 }
demayer 0:6bf0743ece18 270
demayer 0:6bf0743ece18 271 /******************************************************************************
demayer 0:6bf0743ece18 272 * READ/WRITE
demayer 0:6bf0743ece18 273 ******************************************************************************/
demayer 0:6bf0743ece18 274 int serial_getc(serial_t *obj) {
demayer 0:6bf0743ece18 275 while (!serial_readable(obj));
demayer 0:6bf0743ece18 276 return obj->uart->RXDATA;
demayer 0:6bf0743ece18 277 }
demayer 0:6bf0743ece18 278
demayer 0:6bf0743ece18 279 void serial_putc(serial_t *obj, int c) {
demayer 0:6bf0743ece18 280 while (!serial_writable(obj));
demayer 0:6bf0743ece18 281 obj->uart->TXDATA = c;
demayer 0:6bf0743ece18 282 }
demayer 0:6bf0743ece18 283
demayer 0:6bf0743ece18 284 int serial_readable(serial_t *obj) {
demayer 0:6bf0743ece18 285 return obj->uart->STAT & RXRDY;
demayer 0:6bf0743ece18 286 }
demayer 0:6bf0743ece18 287
demayer 0:6bf0743ece18 288 int serial_writable(serial_t *obj) {
demayer 0:6bf0743ece18 289 return obj->uart->STAT & TXRDY;
demayer 0:6bf0743ece18 290 }
demayer 0:6bf0743ece18 291
demayer 0:6bf0743ece18 292 void serial_clear(serial_t *obj) {
demayer 0:6bf0743ece18 293 // [TODO]
demayer 0:6bf0743ece18 294 }
demayer 0:6bf0743ece18 295
demayer 0:6bf0743ece18 296 void serial_pinout_tx(PinName tx) {
demayer 0:6bf0743ece18 297
demayer 0:6bf0743ece18 298 }
demayer 0:6bf0743ece18 299
demayer 0:6bf0743ece18 300 void serial_break_set(serial_t *obj) {
demayer 0:6bf0743ece18 301 obj->uart->CTRL |= TXBRKEN;
demayer 0:6bf0743ece18 302 }
demayer 0:6bf0743ece18 303
demayer 0:6bf0743ece18 304 void serial_break_clear(serial_t *obj) {
demayer 0:6bf0743ece18 305 obj->uart->CTRL &= ~TXBRKEN;
demayer 0:6bf0743ece18 306 }
demayer 0:6bf0743ece18 307
demayer 0:6bf0743ece18 308 void serial_set_flow_control(serial_t *obj, FlowControl type, PinName rxflow, PinName txflow) {
demayer 0:6bf0743ece18 309 if ((FlowControlNone == type || FlowControlRTS == type)) txflow = NC;
demayer 0:6bf0743ece18 310 if ((FlowControlNone == type || FlowControlCTS == type)) rxflow = NC;
demayer 0:6bf0743ece18 311 switch_pin(&SWM_UART_RTS[obj->index], rxflow);
demayer 0:6bf0743ece18 312 switch_pin(&SWM_UART_CTS[obj->index], txflow);
demayer 0:6bf0743ece18 313 if (txflow == NC) obj->uart->CFG &= ~CTSEN;
demayer 0:6bf0743ece18 314 else obj->uart->CFG |= CTSEN;
demayer 0:6bf0743ece18 315 }
demayer 0:6bf0743ece18 316