drivers/spi/kirkwood_spi.c

   1 // SPDX-License-Identifier: GPL-2.0+
   2 /*
   3  * (C) Copyright 2009
   4  * Marvell Semiconductor <www.marvell.com>
   5  * Written-by: Prafulla Wadaskar <prafulla@marvell.com>
   6  *
   7  * Derived from drivers/spi/mpc8xxx_spi.c
   8  */
   9
  10 #include <common.h>
  11 #include <dm.h>
  12 #include <log.h>
  13 #include <malloc.h>
  14 #include <spi.h>
  15 #include <asm/io.h>
  16 #include <asm/arch/soc.h>
  17 #ifdef CONFIG_ARCH_KIRKWOOD
  18 #include <asm/arch/mpp.h>
  19 #endif
  20 #include <asm/arch-mvebu/spi.h>
  21
  22 static void _spi_cs_activate(struct kwspi_registers *reg)
  23 {
  24         setbits_le32(&reg->ctrl, KWSPI_CSN_ACT);
  25 }
  26
  27 static void _spi_cs_deactivate(struct kwspi_registers *reg)
  28 {
  29         clrbits_le32(&reg->ctrl, KWSPI_CSN_ACT);
  30 }
  31
  32 static int _spi_xfer(struct kwspi_registers *reg, unsigned int bitlen,
  33                      const void *dout, void *din, unsigned long flags)
  34 {
  35         unsigned int tmpdout, tmpdin;
  36         int tm, isread = 0;
  37
  38         debug("spi_xfer: dout %p din %p bitlen %u\n", dout, din, bitlen);
  39
  40         if (flags & SPI_XFER_BEGIN)
  41                 _spi_cs_activate(reg);
  42
  43         /*
  44          * handle data in 8-bit chunks
  45          * TBD: 2byte xfer mode to be enabled
  46          */
  47         clrsetbits_le32(&reg->cfg, KWSPI_XFERLEN_MASK, KWSPI_XFERLEN_1BYTE);
  48
  49         while (bitlen > 4) {
  50                 debug("loopstart bitlen %d\n", bitlen);
  51                 tmpdout = 0;
  52
  53                 /* Shift data so it's msb-justified */
  54                 if (dout)
  55                         tmpdout = *(u32 *)dout & 0xff;
  56
  57                 clrbits_le32(&reg->irq_cause, KWSPI_SMEMRDIRQ);
  58                 writel(tmpdout, &reg->dout);    /* Write the data out */
  59                 debug("*** spi_xfer: ... %08x written, bitlen %d\n",
  60                       tmpdout, bitlen);
  61
  62                 /*
  63                  * Wait for SPI transmit to get out
  64                  * or time out (1 second = 1000 ms)
  65                  * The NE event must be read and cleared first
  66                  */
  67                 for (tm = 0, isread = 0; tm < KWSPI_TIMEOUT; ++tm) {
  68                         if (readl(&reg->irq_cause) & KWSPI_SMEMRDIRQ) {
  69                                 isread = 1;
  70                                 tmpdin = readl(&reg->din);
  71                                 debug("spi_xfer: din %p..%08x read\n",
  72                                       din, tmpdin);
  73
  74                                 if (din) {
  75                                         *((u8 *)din) = (u8)tmpdin;
  76                                         din += 1;
  77                                 }
  78                                 if (dout)
  79                                         dout += 1;
  80                                 bitlen -= 8;
  81                         }
  82                         if (isread)
  83                                 break;
  84                 }
  85                 if (tm >= KWSPI_TIMEOUT)
  86                         printf("*** spi_xfer: Time out during SPI transfer\n");
  87
  88                 debug("loopend bitlen %d\n", bitlen);
  89         }
  90
  91         if (flags & SPI_XFER_END)
  92                 _spi_cs_deactivate(reg);
  93
  94         return 0;
  95 }
  96
  97 #ifndef CONFIG_DM_SPI
  98
  99 static struct kwspi_registers *spireg =
 100         (struct kwspi_registers *)MVEBU_SPI_BASE;
 101
 102 #ifdef CONFIG_ARCH_KIRKWOOD
 103 static u32 cs_spi_mpp_back[2];
 104 #endif
 105
 106 struct spi_slave *spi_setup_slave(unsigned int bus, unsigned int cs,
 107                                 unsigned int max_hz, unsigned int mode)
 108 {
 109         struct spi_slave *slave;
 110         u32 data;
 111 #ifdef CONFIG_ARCH_KIRKWOOD
 112         static const u32 kwspi_mpp_config[2][2] = {
 113                 { MPP0_SPI_SCn, 0 }, /* if cs == 0 */
 114                 { MPP7_SPI_SCn, 0 } /* if cs != 0 */
 115         };
 116 #endif
 117
 118         if (!spi_cs_is_valid(bus, cs))
 119                 return NULL;
 120
 121         slave = spi_alloc_slave_base(bus, cs);
 122         if (!slave)
 123                 return NULL;
 124
 125         writel(KWSPI_SMEMRDY, &spireg->ctrl);
 126
 127         /* calculate spi clock prescaller using max_hz */
 128         data = ((CONFIG_SYS_TCLK / 2) / max_hz) + 0x10;
 129         data = data < KWSPI_CLKPRESCL_MIN ? KWSPI_CLKPRESCL_MIN : data;
 130         data = data > KWSPI_CLKPRESCL_MASK ? KWSPI_CLKPRESCL_MASK : data;
 131
 132         /* program spi clock prescaller using max_hz */
 133         writel(KWSPI_ADRLEN_3BYTE | data, &spireg->cfg);
 134         debug("data = 0x%08x\n", data);
 135
 136         writel(KWSPI_SMEMRDIRQ, &spireg->irq_cause);
 137         writel(KWSPI_IRQMASK, &spireg->irq_mask);
 138
 139 #ifdef CONFIG_ARCH_KIRKWOOD
 140         /* program mpp registers to select  SPI_CSn */
 141         kirkwood_mpp_conf(kwspi_mpp_config[cs ? 1 : 0], cs_spi_mpp_back);
 142 #endif
 143
 144         return slave;
 145 }
 146
 147 void spi_free_slave(struct spi_slave *slave)
 148 {
 149 #ifdef CONFIG_ARCH_KIRKWOOD
 150         kirkwood_mpp_conf(cs_spi_mpp_back, NULL);
 151 #endif
 152         free(slave);
 153 }
 154
 155 __attribute__((weak)) int board_spi_claim_bus(struct spi_slave *slave)
 156 {
 157         return 0;
 158 }
 159
 160 int spi_claim_bus(struct spi_slave *slave)
 161 {
 162         return board_spi_claim_bus(slave);
 163 }
 164
 165 __attribute__((weak)) void board_spi_release_bus(struct spi_slave *slave)
 166 {
 167 }
 168
 169 void spi_release_bus(struct spi_slave *slave)
 170 {
 171         board_spi_release_bus(slave);
 172 }
 173
 174 #ifndef CONFIG_SPI_CS_IS_VALID
 175 /*
 176  * you can define this function board specific
 177  * define above CONFIG in board specific config file and
 178  * provide the function in board specific src file
 179  */
 180 int spi_cs_is_valid(unsigned int bus, unsigned int cs)
 181 {
 182         return bus == 0 && (cs == 0 || cs == 1);
 183 }
 184 #endif
 185
 186 void spi_init(void)
 187 {
 188 }
 189
 190 void spi_cs_activate(struct spi_slave *slave)
 191 {
 192         _spi_cs_activate(spireg);
 193 }
 194
 195 void spi_cs_deactivate(struct spi_slave *slave)
 196 {
 197         _spi_cs_deactivate(spireg);
 198 }
 199
 200 int spi_xfer(struct spi_slave *slave, unsigned int bitlen,
 201              const void *dout, void *din, unsigned long flags)
 202 {
 203         return _spi_xfer(spireg, bitlen, dout, din, flags);
 204 }
 205
 206 #else
 207
 208 /* Here now the DM part */
 209
 210 struct mvebu_spi_dev {
 211         bool                    is_errata_50mhz_ac;
 212 };
 213
 214 struct mvebu_spi_platdata {
 215         struct kwspi_registers *spireg;
 216         bool is_errata_50mhz_ac;
 217 };
 218
 219 struct mvebu_spi_priv {
 220         struct kwspi_registers *spireg;
 221 };
 222
 223 static int mvebu_spi_set_speed(struct udevice *bus, uint hz)
 224 {
 225         struct mvebu_spi_platdata *plat = dev_get_platdata(bus);
 226         struct kwspi_registers *reg = plat->spireg;
 227         u32 data;
 228
 229         /* calculate spi clock prescaller using max_hz */
 230         data = ((CONFIG_SYS_TCLK / 2) / hz) + 0x10;
 231         data = data < KWSPI_CLKPRESCL_MIN ? KWSPI_CLKPRESCL_MIN : data;
 232         data = data > KWSPI_CLKPRESCL_MASK ? KWSPI_CLKPRESCL_MASK : data;
 233
 234         /* program spi clock prescaler using max_hz */
 235         writel(KWSPI_ADRLEN_3BYTE | data, &reg->cfg);
 236         debug("data = 0x%08x\n", data);
 237
 238         return 0;
 239 }
 240
 241 static void mvebu_spi_50mhz_ac_timing_erratum(struct udevice *bus, uint mode)
 242 {
 243         struct mvebu_spi_platdata *plat = dev_get_platdata(bus);
 244         struct kwspi_registers *reg = plat->spireg;
 245         u32 data;
 246
 247         /*
 248          * Erratum description: (Erratum NO. FE-9144572) The device
 249          * SPI interface supports frequencies of up to 50 MHz.
 250          * However, due to this erratum, when the device core clock is
 251          * 250 MHz and the SPI interfaces is configured for 50MHz SPI
 252          * clock and CPOL=CPHA=1 there might occur data corruption on
 253          * reads from the SPI device.
 254          * Erratum Workaround:
 255          * Work in one of the following configurations:
 256          * 1. Set CPOL=CPHA=0 in "SPI Interface Configuration
 257          * Register".
 258          * 2. Set TMISO_SAMPLE value to 0x2 in "SPI Timing Parameters 1
 259          * Register" before setting the interface.
 260          */
 261         data = readl(&reg->timing1);
 262         data &= ~KW_SPI_TMISO_SAMPLE_MASK;
 263
 264         if (CONFIG_SYS_TCLK == 250000000 &&
 265             mode & SPI_CPOL &&
 266             mode & SPI_CPHA)
 267                 data |= KW_SPI_TMISO_SAMPLE_2;
 268         else
 269                 data |= KW_SPI_TMISO_SAMPLE_1;
 270
 271         writel(data, &reg->timing1);
 272 }
 273
 274 static int mvebu_spi_set_mode(struct udevice *bus, uint mode)
 275 {
 276         struct mvebu_spi_platdata *plat = dev_get_platdata(bus);
 277         struct kwspi_registers *reg = plat->spireg;
 278         u32 data = readl(&reg->cfg);
 279
 280         data &= ~(KWSPI_CPHA | KWSPI_CPOL | KWSPI_RXLSBF | KWSPI_TXLSBF);
 281
 282         if (mode & SPI_CPHA)
 283                 data |= KWSPI_CPHA;
 284         if (mode & SPI_CPOL)
 285                 data |= KWSPI_CPOL;
 286         if (mode & SPI_LSB_FIRST)
 287                 data |= (KWSPI_RXLSBF | KWSPI_TXLSBF);
 288
 289         writel(data, &reg->cfg);
 290
 291         if (plat->is_errata_50mhz_ac)
 292                 mvebu_spi_50mhz_ac_timing_erratum(bus, mode);
 293
 294         return 0;
 295 }
 296
 297 static int mvebu_spi_xfer(struct udevice *dev, unsigned int bitlen,
 298                           const void *dout, void *din, unsigned long flags)
 299 {
 300         struct udevice *bus = dev->parent;
 301         struct mvebu_spi_platdata *plat = dev_get_platdata(bus);
 302
 303         return _spi_xfer(plat->spireg, bitlen, dout, din, flags);
 304 }
 305
 306 __attribute__((weak)) int mvebu_board_spi_claim_bus(struct udevice *dev)
 307 {
 308         return 0;
 309 }
 310
 311 static int mvebu_spi_claim_bus(struct udevice *dev)
 312 {
 313         struct udevice *bus = dev->parent;
 314         struct mvebu_spi_platdata *plat = dev_get_platdata(bus);
 315
 316         /* Configure the chip-select in the CTRL register */
 317         clrsetbits_le32(&plat->spireg->ctrl,
 318                         KWSPI_CS_MASK << KWSPI_CS_SHIFT,
 319                         spi_chip_select(dev) << KWSPI_CS_SHIFT);
 320
 321         return mvebu_board_spi_claim_bus(dev);
 322 }
 323
 324 __attribute__((weak)) int mvebu_board_spi_release_bus(struct udevice *dev)
 325 {
 326         return 0;
 327 }
 328
 329 static int mvebu_spi_release_bus(struct udevice *dev)
 330 {
 331         return mvebu_board_spi_release_bus(dev);
 332 }
 333
 334 static int mvebu_spi_probe(struct udevice *bus)
 335 {
 336         struct mvebu_spi_platdata *plat = dev_get_platdata(bus);
 337         struct kwspi_registers *reg = plat->spireg;
 338
 339         writel(KWSPI_SMEMRDY, &reg->ctrl);
 340         writel(KWSPI_SMEMRDIRQ, &reg->irq_cause);
 341         writel(KWSPI_IRQMASK, &reg->irq_mask);
 342
 343         return 0;
 344 }
 345
 346 static int mvebu_spi_ofdata_to_platdata(struct udevice *bus)
 347 {
 348         struct mvebu_spi_platdata *plat = dev_get_platdata(bus);
 349         const struct mvebu_spi_dev *drvdata =
 350                 (struct mvebu_spi_dev *)dev_get_driver_data(bus);
 351
 352         plat->spireg = (struct kwspi_registers *)devfdt_get_addr(bus);
 353         plat->is_errata_50mhz_ac = drvdata->is_errata_50mhz_ac;
 354
 355         return 0;
 356 }
 357
 358 static const struct dm_spi_ops mvebu_spi_ops = {
 359         .claim_bus      = mvebu_spi_claim_bus,
 360         .release_bus    = mvebu_spi_release_bus,
 361         .xfer           = mvebu_spi_xfer,
 362         .set_speed      = mvebu_spi_set_speed,
 363         .set_mode       = mvebu_spi_set_mode,
 364         /*
 365          * cs_info is not needed, since we require all chip selects to be
 366          * in the device tree explicitly
 367          */
 368 };
 369
 370 static const struct mvebu_spi_dev armada_spi_dev_data = {
 371         .is_errata_50mhz_ac = false,
 372 };
 373
 374 static const struct mvebu_spi_dev armada_xp_spi_dev_data = {
 375         .is_errata_50mhz_ac = false,
 376 };
 377
 378 static const struct mvebu_spi_dev armada_375_spi_dev_data = {
 379         .is_errata_50mhz_ac = false,
 380 };
 381
 382 static const struct mvebu_spi_dev armada_380_spi_dev_data = {
 383         .is_errata_50mhz_ac = true,
 384 };
 385
 386 static const struct udevice_id mvebu_spi_ids[] = {
 387         {
 388                 .compatible = "marvell,orion-spi",
 389                 .data = (ulong)&armada_spi_dev_data,
 390         },
 391         {
 392                 .compatible = "marvell,armada-375-spi",
 393                 .data = (ulong)&armada_375_spi_dev_data
 394         },
 395         {
 396                 .compatible = "marvell,armada-380-spi",
 397                 .data = (ulong)&armada_380_spi_dev_data
 398         },
 399         {
 400                 .compatible = "marvell,armada-xp-spi",
 401                 .data = (ulong)&armada_xp_spi_dev_data
 402         },
 403         { }
 404 };
 405
 406 U_BOOT_DRIVER(mvebu_spi) = {
 407         .name = "mvebu_spi",
 408         .id = UCLASS_SPI,
 409         .of_match = mvebu_spi_ids,
 410         .ops = &mvebu_spi_ops,
 411         .ofdata_to_platdata = mvebu_spi_ofdata_to_platdata,
 412         .platdata_auto_alloc_size = sizeof(struct mvebu_spi_platdata),
 413         .priv_auto_alloc_size = sizeof(struct mvebu_spi_priv),
 414         .probe = mvebu_spi_probe,
 415 };
 416 #endif