Serial (only 8bit at the moment), using KPSDK HAL

Author: 0xc0170

libraries/mbed/targets/cmsis/TARGET_Freescale/TARGET_K64F/system_MK64F12.c

@@ -27,6 +27,7 @@ typedef enum {
     UART_1 = (int)UART1_BASE,
     UART_2 = (int)UART2_BASE
 } UARTName;
+
 #define STDIO_UART_TX     USBTX
 #define STDIO_UART_RX     USBRX
 #define STDIO_UART        UART_0

libraries/mbed/targets/hal/TARGET_Freescale/TARGET_KPSDK_MCUS/TARGET_K64F/PeripheralNames.h

@@ -25,7 +25,7 @@
 #define DEVICE_ANALOGIN         1
 #define DEVICE_ANALOGOUT        0
 
-#define DEVICE_SERIAL           0
+#define DEVICE_SERIAL           1
 
 #define DEVICE_I2C              1
 #define DEVICE_I2CSLAVE         1

libraries/mbed/targets/hal/TARGET_Freescale/TARGET_KPSDK_MCUS/TARGET_K64F/device.h

@@ -47,7 +47,6 @@ struct pwmout_s {
 };
 
 struct serial_s {
-    UART_Type *uart;
     int index;
 };
 

libraries/mbed/targets/hal/TARGET_Freescale/TARGET_KPSDK_MCUS/TARGET_K64F/objects.h

@@ -15,11 +15,37 @@
  */
 #include "pinmap.h"
 #include "error.h"
+#include "fsl_clock_manager.h"
 
 void pin_function(PinName pin, int function) {
+    if (pin == (PinName)NC)
+        return;
 
+    clock_manager_set_gate(kClockModulePORT, pin >> GPIO_PORT_SHIFT, true);
+    port_hal_mux_control(pin >> GPIO_PORT_SHIFT, pin & 0xFF, (port_mux_t)function);
 }
 
 void pin_mode(PinName pin, PinMode mode) {
+    if (pin == (PinName)NC)
+        return;
 
+    uint32_t instance = pin >> GPIO_PORT_SHIFT;
+    uint32_t pinName = pin & 0xFF;
+
+    switch (mode) {
+        case PullNone:
+            port_hal_configure_pull(instance, pinName, 0);
+            port_hal_pull_select(instance, pinName, kPortPullDown);
+            break;
+        case PullDown:
+            port_hal_configure_pull(instance, pinName, 1);
+            port_hal_pull_select(instance, pinName, kPortPullDown);
+            break;
+        case PullUp:
+            port_hal_configure_pull(instance, pinName, 1);
+            port_hal_pull_select(instance, pinName, kPortPullUp);
+            break;
+        default:
+            break;
+    }
 }

libraries/mbed/targets/hal/TARGET_Freescale/TARGET_KPSDK_MCUS/TARGET_K64F/pinmap.c

@@ -23,79 +23,203 @@
 #include "cmsis.h"
 #include "pinmap.h"
 #include "error.h"
-
-// static const PinMap PinMap_UART_TX[] = {
-//     {NC  ,  NC    , 0}
-// };
-
-// static const PinMap PinMap_UART_RX[] = {
-
-//     {NC  ,  NC    , 0}
-// };
-
-// #define UART_NUM    3
-
-// static uint32_t serial_irq_ids[UART_NUM] = {0};
-// static uart_irq_handler irq_handler;
-
-// int stdio_uart_inited = 0;
-// serial_t stdio_uart;
-
-// void serial_init(serial_t *obj, PinName tx, PinName rx) {
-// }
-
-// void serial_free(serial_t *obj) {
-
-// }
-
-// void serial_baud(serial_t *obj, int baudrate) {
-
-// }
-
-// void serial_format(serial_t *obj, int data_bits, SerialParity parity, int stop_bits) {
-
-// }
-
-// *****************************************************************************
-//  * INTERRUPTS HANDLING
-//  *****************************************************************************
-// static inline void uart_irq(uint8_t status, uint32_t index) {
-// }
-
-// void serial_irq_handler(serial_t *obj, uart_irq_handler handler, uint32_t id) {
-// }
-
-// void serial_irq_set(serial_t *obj, SerialIrq irq, uint32_t enable) {
-
-// }
-
-// int serial_getc(serial_t *obj) {
-//     return 1;
-// }
-
-// void serial_putc(serial_t *obj, int c) {
-// }
-
-// int serial_readable(serial_t *obj) {
-//     return 1;
-// }
-
-// int serial_writable(serial_t *obj) {
-//     return 1;
-// }
-
-// void serial_clear(serial_t *obj) {
-// }
-
-// void serial_pinout_tx(PinName tx) {
-
-// }
-
-// void serial_break_set(serial_t *obj) {
-
-// }
-
-// void serial_break_clear(serial_t *obj) {
-
-// }
+#include "fsl_uart_hal.h"
+#include "fsl_clock_manager.h"
+#include "fsl_uart_features.h"
+
+/* TODO:
+    putchar/getchar 9 and 10 bits support
+    5 UARTS implementation
+*/
+
+static const PinMap PinMap_UART_TX[] = {
+    {PTB17, UART_0, 3},
+    {NC  ,  NC    , 0}
+};
+
+static const PinMap PinMap_UART_RX[] = {
+    {PTB16, UART_0, 3},
+    {NC  ,  NC    , 0}
+};
+
+#define UART_NUM    3
+
+static uint32_t serial_irq_ids[UART_NUM] = {0};
+static uart_irq_handler irq_handler;
+
+int stdio_uart_inited = 0;
+serial_t stdio_uart;
+
+static uint32_t serial_get_clock(uint32_t uart_instance)
+{
+    uint32_t uartSourceClock;
+
+    if ((uart_instance == 0) || (uart_instance == 1)) {
+        clock_manager_get_frequency(kSystemClock, &uartSourceClock);
+    } else {
+        clock_manager_get_frequency(kBusClock, &uartSourceClock);
+    }
+    return uartSourceClock;
+}
+
+void serial_init(serial_t *obj, PinName tx, PinName rx) {
+
+    // determine the UART to use
+    UARTName uart_tx = (UARTName)pinmap_peripheral(tx, PinMap_UART_TX);
+    UARTName uart_rx = (UARTName)pinmap_peripheral(rx, PinMap_UART_RX);
+    UARTName uart_instance = (UARTName)pinmap_merge(uart_tx, uart_rx);
+    if ((int)uart_instance == NC) {
+        error("Serial pinout mapping failed");
+    }
+
+    switch (uart_instance) {
+        case UART_0: obj->index = 0; break;
+        case UART_1: obj->index = 1; break;
+        case UART_2: obj->index = 2; break;
+    }
+
+    uart_config_t uart_config;
+    uart_config.baudRate = 9600;
+    uart_config.bitCountPerChar = kUart8BitsPerChar;
+    uart_config.parityMode = kUartParityDisabled;
+    uart_config.rxDataInvert = 0;
+    uart_config.stopBitCount = kUartOneStopBit;
+    uart_config.txDataInvert = 0;
+
+    uart_config.uartSourceClockInHz = serial_get_clock(obj->index);
+
+    clock_manager_set_gate(kClockModuleUART, obj->index, true);
+    uart_hal_init(obj->index, &uart_config);
+
+    pinmap_pinout(tx, PinMap_UART_TX);
+    pinmap_pinout(rx, PinMap_UART_RX);
+
+    pin_mode(tx, PullUp);
+    pin_mode(rx, PullUp);
+
+    if (uart_instance == STDIO_UART) {
+        stdio_uart_inited = 1;
+        memcpy(&stdio_uart, obj, sizeof(serial_t));
+    }
+}
+
+void serial_free(serial_t *obj) {
+    serial_irq_ids[obj->index] = 0;
+}
+
+void serial_baud(serial_t *obj, int baudrate) {
+    uart_hal_set_baud_rate(obj->index, serial_get_clock(obj->index), (uint32_t)baudrate);
+}
+
+void serial_format(serial_t *obj, int data_bits, SerialParity parity, int stop_bits) {
+    uart_hal_configure_bit_count_per_char(obj->index, (uart_bit_count_per_char_t)data_bits);
+    uart_hal_configure_parity_mode(obj->index, (uart_parity_mode_t)parity);
+    uart_hal_configure_stop_bit_count(obj->index, (uart_stop_bit_count_t)stop_bits);
+}
+
+/******************************************************************************
+ * INTERRUPTS HANDLING
+ ******************************************************************************/
+static inline void uart_irq(uint32_t transmit_empty, uint32_t receive_full, uint32_t index) {
+    if (serial_irq_ids[index] != 0) {
+        if (transmit_empty)
+            irq_handler(serial_irq_ids[index], TxIrq);
+
+    if (receive_full)
+        irq_handler(serial_irq_ids[index], RxIrq);
+    }
+}
+
+void uart0_irq() {
+    uart_irq(uart_hal_is_transmit_data_register_empty(0), uart_hal_is_receive_data_register_full(0), 0);
+    if (uart_hal_is_receive_overrun_detected(0))
+        uart_hal_clear_status_flag(0, kUartReceiveOverrun);
+}
+void uart1_irq() {
+    uart_irq(uart_hal_is_transmit_data_register_empty(1), uart_hal_is_receive_data_register_full(1), 1);
+}
+
+void uart2_irq() {
+    uart_irq(uart_hal_is_transmit_data_register_empty(2), uart_hal_is_receive_data_register_full(2), 2);
+}
+
+void serial_irq_handler(serial_t *obj, uart_irq_handler handler, uint32_t id) {
+    irq_handler = handler;
+    serial_irq_ids[obj->index] = id;
+}
+
+void serial_irq_set(serial_t *obj, SerialIrq irq, uint32_t enable) {
+    IRQn_Type irq_n = (IRQn_Type)0;
+    uint32_t vector = 0;
+
+    switch (obj->index) {
+        case 0: irq_n=UART0_RX_TX_IRQn; vector = (uint32_t)&uart0_irq; break;
+        case 1: irq_n=UART1_RX_TX_IRQn; vector = (uint32_t)&uart1_irq; break;
+        case 2: irq_n=UART2_RX_TX_IRQn; vector = (uint32_t)&uart2_irq; break;
+    }
+
+    if (enable) {
+        switch (irq) {
+            case RxIrq: uart_hal_enable_rx_data_register_full_interrupt(obj->index); break;
+            case TxIrq: uart_hal_enable_tx_data_register_empty_interrupt(obj->index); break;
+        }
+        NVIC_SetVector(irq_n, vector);
+        NVIC_EnableIRQ(irq_n);
+
+    } else { // disable
+        int all_disabled = 0;
+        SerialIrq other_irq = (irq == RxIrq) ? (TxIrq) : (RxIrq);
+        switch (irq) {
+            case RxIrq: uart_hal_disable_rx_data_register_full_interrupt(obj->index); break;
+            case TxIrq: uart_hal_enable_tx_data_register_empty_interrupt(obj->index); break;
+        }
+        switch (other_irq) {
+            case RxIrq: all_disabled = uart_hal_is_receive_data_full_interrupt_enabled(obj->index) == 0; break;
+            case TxIrq: all_disabled = uart_hal_is_tx_data_register_empty_interrupt_enabled(obj->index) == 0; break;
+        }
+        if (all_disabled)
+            NVIC_DisableIRQ(irq_n);
+    }
+}
+
+int serial_getc(serial_t *obj) {
+    while (!serial_readable(obj));
+    uint8_t data;
+    uart_hal_getchar(obj->index, &data);
+
+    return data;
+}
+
+void serial_putc(serial_t *obj, int c) {
+    while (!serial_writable(obj));
+    uart_hal_putchar(obj->index, (uint8_t)c);
+}
+
+int serial_readable(serial_t *obj) {
+    if (uart_hal_is_receive_overrun_detected(obj->index))
+        uart_hal_clear_status_flag(obj->index, kUartReceiveOverrun);
+    return uart_hal_is_receive_data_register_full(obj->index);
+}
+
+int serial_writable(serial_t *obj) {
+    if (uart_hal_is_receive_overrun_detected(obj->index))
+        uart_hal_clear_status_flag(obj->index, kUartReceiveOverrun);
+
+    return uart_hal_is_transmit_data_register_empty(obj->index);
+}
+
+void serial_clear(serial_t *obj) {
+}
+
+void serial_pinout_tx(PinName tx) {
+    pinmap_pinout(tx, PinMap_UART_TX);
+}
+
+void serial_break_set(serial_t *obj) {
+    uart_hal_queue_break_char_to_send(obj->index, true);
+}
+
+void serial_break_clear(serial_t *obj) {
+    uart_hal_queue_break_char_to_send(obj->index, false);
+}