1 // SPDX-License-Identifier: BSD-2-Clause 2 /* 3 * Copyright (c) 2017-2018, STMicroelectronics 4 */ 5 6 #include <compiler.h> 7 #include <console.h> 8 #include <drivers/clk.h> 9 #include <drivers/clk_dt.h> 10 #include <drivers/serial.h> 11 #include <drivers/stm32_uart.h> 12 #include <io.h> 13 #include <keep.h> 14 #include <kernel/delay.h> 15 #include <kernel/dt.h> 16 #include <kernel/panic.h> 17 #include <libfdt.h> 18 #include <stm32_util.h> 19 #include <util.h> 20 21 #define UART_REG_CR1 0x00 /* Control register 1 */ 22 #define UART_REG_CR2 0x04 /* Control register 2 */ 23 #define UART_REG_CR3 0x08 /* Control register 3 */ 24 #define UART_REG_BRR 0x0c /* Baud rate register */ 25 #define UART_REG_RQR 0x18 /* Request register */ 26 #define UART_REG_ISR 0x1c /* Interrupt & status reg. */ 27 #define UART_REG_ICR 0x20 /* Interrupt flag clear reg. */ 28 #define UART_REG_RDR 0x24 /* Receive data register */ 29 #define UART_REG_TDR 0x28 /* Transmit data register */ 30 #define UART_REG_PRESC 0x2c /* Prescaler register */ 31 32 #define PUTC_TIMEOUT_US 1000 33 #define FLUSH_TIMEOUT_US 16000 34 35 /* 36 * Uart Interrupt & status register bits 37 * 38 * Bit 5 RXNE: Read data register not empty/RXFIFO not empty 39 * Bit 6 TC: Transmission complete 40 * Bit 7 TXE/TXFNF: Transmit data register empty/TXFIFO not full 41 * Bit 27 TXFE: TXFIFO threshold reached 42 */ 43 #define USART_ISR_RXNE_RXFNE BIT(5) 44 #define USART_ISR_TC BIT(6) 45 #define USART_ISR_TXE_TXFNF BIT(7) 46 #define USART_ISR_TXFE BIT(27) 47 48 static vaddr_t loc_chip_to_base(struct serial_chip *chip) 49 { 50 struct stm32_uart_pdata *pd = NULL; 51 52 pd = container_of(chip, struct stm32_uart_pdata, chip); 53 54 return io_pa_or_va(&pd->base, 1); 55 } 56 57 static void loc_flush(struct serial_chip *chip) 58 { 59 vaddr_t base = loc_chip_to_base(chip); 60 uint64_t timeout = timeout_init_us(FLUSH_TIMEOUT_US); 61 62 while (!(io_read32(base + UART_REG_ISR) & USART_ISR_TXFE)) 63 if (timeout_elapsed(timeout)) 64 return; 65 } 66 67 static void loc_putc(struct serial_chip *chip, int ch) 68 { 69 vaddr_t base = loc_chip_to_base(chip); 70 uint64_t timeout = timeout_init_us(PUTC_TIMEOUT_US); 71 72 while (!(io_read32(base + UART_REG_ISR) & USART_ISR_TXE_TXFNF)) 73 if (timeout_elapsed(timeout)) 74 return; 75 76 io_write32(base + UART_REG_TDR, ch); 77 } 78 79 static bool loc_have_rx_data(struct serial_chip *chip) 80 { 81 vaddr_t base = loc_chip_to_base(chip); 82 83 return io_read32(base + UART_REG_ISR) & USART_ISR_RXNE_RXFNE; 84 } 85 86 static int loc_getchar(struct serial_chip *chip) 87 { 88 vaddr_t base = loc_chip_to_base(chip); 89 90 while (!loc_have_rx_data(chip)) 91 ; 92 93 return io_read32(base + UART_REG_RDR) & 0xff; 94 } 95 96 static const struct serial_ops stm32_uart_serial_ops = { 97 .flush = loc_flush, 98 .putc = loc_putc, 99 .have_rx_data = loc_have_rx_data, 100 .getchar = loc_getchar, 101 102 }; 103 DECLARE_KEEP_PAGER(stm32_uart_serial_ops); 104 105 void stm32_uart_init(struct stm32_uart_pdata *pd, vaddr_t base) 106 { 107 pd->base.pa = base; 108 pd->chip.ops = &stm32_uart_serial_ops; 109 } 110 111 static void register_secure_uart(struct stm32_uart_pdata *pd) 112 { 113 size_t n = 0; 114 115 stm32mp_register_secure_periph_iomem(pd->base.pa); 116 for (n = 0; n < pd->pinctrl_count; n++) 117 stm32mp_register_secure_gpio(pd->pinctrl[n].bank, 118 pd->pinctrl[n].pin); 119 } 120 121 static void register_non_secure_uart(struct stm32_uart_pdata *pd) 122 { 123 size_t n = 0; 124 125 stm32mp_register_non_secure_periph_iomem(pd->base.pa); 126 for (n = 0; n < pd->pinctrl_count; n++) 127 stm32mp_register_non_secure_gpio(pd->pinctrl[n].bank, 128 pd->pinctrl[n].pin); 129 } 130 131 struct stm32_uart_pdata *stm32_uart_init_from_dt_node(void *fdt, int node) 132 { 133 TEE_Result res = TEE_ERROR_GENERIC; 134 struct stm32_uart_pdata *pd = NULL; 135 struct dt_node_info info = { }; 136 struct stm32_pinctrl *pinctrl_cfg = NULL; 137 int count = 0; 138 139 fdt_fill_device_info(fdt, &info, node); 140 141 if (info.status == DT_STATUS_DISABLED) 142 return NULL; 143 144 assert(info.reg != DT_INFO_INVALID_REG && 145 info.reg_size != DT_INFO_INVALID_REG_SIZE); 146 147 pd = calloc(1, sizeof(*pd)); 148 if (!pd) 149 panic(); 150 151 pd->chip.ops = &stm32_uart_serial_ops; 152 pd->base.pa = info.reg; 153 pd->secure = (info.status == DT_STATUS_OK_SEC); 154 155 res = clk_dt_get_by_index(fdt, node, 0, &pd->clock); 156 if (res) { 157 EMSG("Failed to get clock: %#"PRIx32, res); 158 panic(); 159 } 160 161 res = clk_enable(pd->clock); 162 if (res) 163 panic(); 164 165 assert(cpu_mmu_enabled()); 166 pd->base.va = (vaddr_t)phys_to_virt(pd->base.pa, 167 pd->secure ? MEM_AREA_IO_SEC : 168 MEM_AREA_IO_NSEC, info.reg_size); 169 170 count = stm32_pinctrl_fdt_get_pinctrl(fdt, node, NULL, 0); 171 if (count < 0) 172 panic(); 173 174 if (count) { 175 pinctrl_cfg = calloc(count, sizeof(*pinctrl_cfg)); 176 if (!pinctrl_cfg) 177 panic(); 178 179 stm32_pinctrl_fdt_get_pinctrl(fdt, node, pinctrl_cfg, count); 180 stm32_pinctrl_load_active_cfg(pinctrl_cfg, count); 181 } 182 pd->pinctrl = pinctrl_cfg; 183 pd->pinctrl_count = count; 184 185 if (pd->secure) 186 register_secure_uart(pd); 187 else 188 register_non_secure_uart(pd); 189 190 return pd; 191 } 192