1 /* 2 * (C) Copyright 2009 3 * Marvell Semiconductor <www.marvell.com> 4 * Written-by: Prafulla Wadaskar <prafulla@marvell.com> 5 * 6 * Derived from drivers/spi/mpc8xxx_spi.c 7 * 8 * SPDX-License-Identifier: GPL-2.0+ 9 */ 10 11 #include <common.h> 12 #include <malloc.h> 13 #include <spi.h> 14 #include <asm/io.h> 15 #include <asm/arch/soc.h> 16 #ifdef CONFIG_KIRKWOOD 17 #include <asm/arch/mpp.h> 18 #endif 19 #include <asm/arch-mvebu/spi.h> 20 21 static struct kwspi_registers *spireg = 22 (struct kwspi_registers *)MVEBU_SPI_BASE; 23 24 #ifdef CONFIG_KIRKWOOD 25 static u32 cs_spi_mpp_back[2]; 26 #endif 27 28 struct spi_slave *spi_setup_slave(unsigned int bus, unsigned int cs, 29 unsigned int max_hz, unsigned int mode) 30 { 31 struct spi_slave *slave; 32 u32 data; 33 #ifdef CONFIG_KIRKWOOD 34 static const u32 kwspi_mpp_config[2][2] = { 35 { MPP0_SPI_SCn, 0 }, /* if cs == 0 */ 36 { MPP7_SPI_SCn, 0 } /* if cs != 0 */ 37 }; 38 #endif 39 40 if (!spi_cs_is_valid(bus, cs)) 41 return NULL; 42 43 slave = spi_alloc_slave_base(bus, cs); 44 if (!slave) 45 return NULL; 46 47 writel(KWSPI_SMEMRDY, &spireg->ctrl); 48 49 /* calculate spi clock prescaller using max_hz */ 50 data = ((CONFIG_SYS_TCLK / 2) / max_hz) + 0x10; 51 data = data < KWSPI_CLKPRESCL_MIN ? KWSPI_CLKPRESCL_MIN : data; 52 data = data > KWSPI_CLKPRESCL_MASK ? KWSPI_CLKPRESCL_MASK : data; 53 54 /* program spi clock prescaller using max_hz */ 55 writel(KWSPI_ADRLEN_3BYTE | data, &spireg->cfg); 56 debug("data = 0x%08x\n", data); 57 58 writel(KWSPI_SMEMRDIRQ, &spireg->irq_cause); 59 writel(KWSPI_IRQMASK, &spireg->irq_mask); 60 61 #ifdef CONFIG_KIRKWOOD 62 /* program mpp registers to select SPI_CSn */ 63 kirkwood_mpp_conf(kwspi_mpp_config[cs ? 1 : 0], cs_spi_mpp_back); 64 #endif 65 66 return slave; 67 } 68 69 void spi_free_slave(struct spi_slave *slave) 70 { 71 #ifdef CONFIG_KIRKWOOD 72 kirkwood_mpp_conf(cs_spi_mpp_back, NULL); 73 #endif 74 free(slave); 75 } 76 77 #if defined(CONFIG_SYS_KW_SPI_MPP) 78 u32 spi_mpp_backup[4]; 79 #endif 80 81 __attribute__((weak)) int board_spi_claim_bus(struct spi_slave *slave) 82 { 83 return 0; 84 } 85 86 int spi_claim_bus(struct spi_slave *slave) 87 { 88 #if defined(CONFIG_SYS_KW_SPI_MPP) 89 u32 config; 90 u32 spi_mpp_config[4]; 91 92 config = CONFIG_SYS_KW_SPI_MPP; 93 94 if (config & MOSI_MPP6) 95 spi_mpp_config[0] = MPP6_SPI_MOSI; 96 else 97 spi_mpp_config[0] = MPP1_SPI_MOSI; 98 99 if (config & SCK_MPP10) 100 spi_mpp_config[1] = MPP10_SPI_SCK; 101 else 102 spi_mpp_config[1] = MPP2_SPI_SCK; 103 104 if (config & MISO_MPP11) 105 spi_mpp_config[2] = MPP11_SPI_MISO; 106 else 107 spi_mpp_config[2] = MPP3_SPI_MISO; 108 109 spi_mpp_config[3] = 0; 110 spi_mpp_backup[3] = 0; 111 112 /* set new spi mpp and save current mpp config */ 113 kirkwood_mpp_conf(spi_mpp_config, spi_mpp_backup); 114 #endif 115 116 return board_spi_claim_bus(slave); 117 } 118 119 __attribute__((weak)) void board_spi_release_bus(struct spi_slave *slave) 120 { 121 } 122 123 void spi_release_bus(struct spi_slave *slave) 124 { 125 #if defined(CONFIG_SYS_KW_SPI_MPP) 126 kirkwood_mpp_conf(spi_mpp_backup, NULL); 127 #endif 128 129 board_spi_release_bus(slave); 130 } 131 132 #ifndef CONFIG_SPI_CS_IS_VALID 133 /* 134 * you can define this function board specific 135 * define above CONFIG in board specific config file and 136 * provide the function in board specific src file 137 */ 138 int spi_cs_is_valid(unsigned int bus, unsigned int cs) 139 { 140 return bus == 0 && (cs == 0 || cs == 1); 141 } 142 #endif 143 144 void spi_init(void) 145 { 146 } 147 148 void spi_cs_activate(struct spi_slave *slave) 149 { 150 setbits_le32(&spireg->ctrl, KWSPI_CSN_ACT); 151 } 152 153 void spi_cs_deactivate(struct spi_slave *slave) 154 { 155 clrbits_le32(&spireg->ctrl, KWSPI_CSN_ACT); 156 } 157 158 int spi_xfer(struct spi_slave *slave, unsigned int bitlen, const void *dout, 159 void *din, unsigned long flags) 160 { 161 unsigned int tmpdout, tmpdin; 162 int tm, isread = 0; 163 164 debug("spi_xfer: slave %u:%u dout %p din %p bitlen %u\n", 165 slave->bus, slave->cs, dout, din, bitlen); 166 167 if (flags & SPI_XFER_BEGIN) 168 spi_cs_activate(slave); 169 170 /* 171 * handle data in 8-bit chunks 172 * TBD: 2byte xfer mode to be enabled 173 */ 174 clrsetbits_le32(&spireg->cfg, KWSPI_XFERLEN_MASK, KWSPI_XFERLEN_1BYTE); 175 176 while (bitlen > 4) { 177 debug("loopstart bitlen %d\n", bitlen); 178 tmpdout = 0; 179 180 /* Shift data so it's msb-justified */ 181 if (dout) 182 tmpdout = *(u32 *)dout & 0xff; 183 184 clrbits_le32(&spireg->irq_cause, KWSPI_SMEMRDIRQ); 185 writel(tmpdout, &spireg->dout); /* Write the data out */ 186 debug("*** spi_xfer: ... %08x written, bitlen %d\n", 187 tmpdout, bitlen); 188 189 /* 190 * Wait for SPI transmit to get out 191 * or time out (1 second = 1000 ms) 192 * The NE event must be read and cleared first 193 */ 194 for (tm = 0, isread = 0; tm < KWSPI_TIMEOUT; ++tm) { 195 if (readl(&spireg->irq_cause) & KWSPI_SMEMRDIRQ) { 196 isread = 1; 197 tmpdin = readl(&spireg->din); 198 debug("spi_xfer: din %p..%08x read\n", 199 din, tmpdin); 200 201 if (din) { 202 *((u8 *)din) = (u8)tmpdin; 203 din += 1; 204 } 205 if (dout) 206 dout += 1; 207 bitlen -= 8; 208 } 209 if (isread) 210 break; 211 } 212 if (tm >= KWSPI_TIMEOUT) 213 printf("*** spi_xfer: Time out during SPI transfer\n"); 214 215 debug("loopend bitlen %d\n", bitlen); 216 } 217 218 if (flags & SPI_XFER_END) 219 spi_cs_deactivate(slave); 220 221 return 0; 222 } 223