drivers/spi/xilinx_spi.c

   1 /*
   2  * Xilinx SPI driver
   3  *
   4  * supports 8 bit SPI transfers only, with or w/o FIFO
   5  *
   6  * based on bfin_spi.c, by way of altera_spi.c
   7  * Copyright (c) 2005-2008 Analog Devices Inc.
   8  * Copyright (c) 2010 Thomas Chou <thomas@wytron.com.tw>
   9  * Copyright (c) 2010 Graeme Smecher <graeme.smecher@mail.mcgill.ca>
  10  * Copyright (c) 2012 Stephan Linz <linz@li-pro.net>
  11  *
  12  * Licensed under the GPL-2 or later.
  13  *
  14  * [0]: http://www.xilinx.com/support/documentation
  15  *
  16  * [S]: [0]/ip_documentation/xps_spi.pdf
  17  *      [0]/ip_documentation/axi_spi_ds742.pdf
  18  */
  19 #include <config.h>
  20 #include <common.h>
  21 #include <malloc.h>
  22 #include <spi.h>
  23
  24 #include "xilinx_spi.h"
  25
  26 #ifndef CONFIG_SYS_XILINX_SPI_LIST
  27 #define CONFIG_SYS_XILINX_SPI_LIST      { CONFIG_SYS_SPI_BASE }
  28 #endif
  29
  30 #ifndef CONFIG_XILINX_SPI_IDLE_VAL
  31 #define CONFIG_XILINX_SPI_IDLE_VAL      0xff
  32 #endif
  33
  34 #define XILSPI_SPICR_DFLT_ON            (SPICR_MANUAL_SS | \
  35                                          SPICR_MASTER_MODE | \
  36                                          SPICR_SPE)
  37
  38 #define XILSPI_SPICR_DFLT_OFF           (SPICR_MASTER_INHIBIT | \
  39                                          SPICR_MANUAL_SS)
  40
  41 #define XILSPI_MAX_XFER_BITS            8
  42
  43 static unsigned long xilinx_spi_base_list[] = CONFIG_SYS_XILINX_SPI_LIST;
  44
  45 __attribute__((weak))
  46 int spi_cs_is_valid(unsigned int bus, unsigned int cs)
  47 {
  48         return bus < ARRAY_SIZE(xilinx_spi_base_list) && cs < 32;
  49 }
  50
  51 __attribute__((weak))
  52 void spi_cs_activate(struct spi_slave *slave)
  53 {
  54         struct xilinx_spi_slave *xilspi = to_xilinx_spi_slave(slave);
  55
  56         writel(SPISSR_ACT(slave->cs), &xilspi->regs->spissr);
  57 }
  58
  59 __attribute__((weak))
  60 void spi_cs_deactivate(struct spi_slave *slave)
  61 {
  62         struct xilinx_spi_slave *xilspi = to_xilinx_spi_slave(slave);
  63
  64         writel(SPISSR_OFF, &xilspi->regs->spissr);
  65 }
  66
  67 void spi_init(void)
  68 {
  69         /* do nothing */
  70 }
  71
  72 void spi_set_speed(struct spi_slave *slave, uint hz)
  73 {
  74         /* xilinx spi core does not support programmable speed */
  75 }
  76
  77 struct spi_slave *spi_setup_slave(unsigned int bus, unsigned int cs,
  78                                   unsigned int max_hz, unsigned int mode)
  79 {
  80         struct xilinx_spi_slave *xilspi;
  81
  82         if (!spi_cs_is_valid(bus, cs)) {
  83                 printf("XILSPI error: %s: unsupported bus %d / cs %d\n",
  84                                 __func__, bus, cs);
  85                 return NULL;
  86         }
  87
  88         xilspi = malloc(sizeof(*xilspi));
  89         if (!xilspi) {
  90                 printf("XILSPI error: %s: malloc of SPI structure failed\n",
  91                                 __func__);
  92                 return NULL;
  93         }
  94         xilspi->slave.bus = bus;
  95         xilspi->slave.cs = cs;
  96         xilspi->regs = (struct xilinx_spi_reg *)xilinx_spi_base_list[bus];
  97         xilspi->freq = max_hz;
  98         xilspi->mode = mode;
  99         debug("%s: bus:%i cs:%i base:%p mode:%x max_hz:%d\n", __func__,
 100                 bus, cs, xilspi->regs, xilspi->mode, xilspi->freq);
 101
 102         writel(SPISSR_RESET_VALUE, &xilspi->regs->srr);
 103
 104         return &xilspi->slave;
 105 }
 106
 107 void spi_free_slave(struct spi_slave *slave)
 108 {
 109         struct xilinx_spi_slave *xilspi = to_xilinx_spi_slave(slave);
 110
 111         free(xilspi);
 112 }
 113
 114 int spi_claim_bus(struct spi_slave *slave)
 115 {
 116         struct xilinx_spi_slave *xilspi = to_xilinx_spi_slave(slave);
 117         u32 spicr;
 118
 119         debug("%s: bus:%i cs:%i\n", __func__, slave->bus, slave->cs);
 120         writel(SPISSR_OFF, &xilspi->regs->spissr);
 121
 122         spicr = XILSPI_SPICR_DFLT_ON;
 123         if (xilspi->mode & SPI_LSB_FIRST)
 124                 spicr |= SPICR_LSB_FIRST;
 125         if (xilspi->mode & SPI_CPHA)
 126                 spicr |= SPICR_CPHA;
 127         if (xilspi->mode & SPI_CPOL)
 128                 spicr |= SPICR_CPOL;
 129         if (xilspi->mode & SPI_LOOP)
 130                 spicr |= SPICR_LOOP;
 131
 132         writel(spicr, &xilspi->regs->spicr);
 133         return 0;
 134 }
 135
 136 void spi_release_bus(struct spi_slave *slave)
 137 {
 138         struct xilinx_spi_slave *xilspi = to_xilinx_spi_slave(slave);
 139
 140         debug("%s: bus:%i cs:%i\n", __func__, slave->bus, slave->cs);
 141         writel(SPISSR_OFF, &xilspi->regs->spissr);
 142         writel(XILSPI_SPICR_DFLT_OFF, &xilspi->regs->spicr);
 143 }
 144
 145 int spi_xfer(struct spi_slave *slave, unsigned int bitlen, const void *dout,
 146              void *din, unsigned long flags)
 147 {
 148         struct xilinx_spi_slave *xilspi = to_xilinx_spi_slave(slave);
 149         /* assume spi core configured to do 8 bit transfers */
 150         unsigned int bytes = bitlen / XILSPI_MAX_XFER_BITS;
 151         const unsigned char *txp = dout;
 152         unsigned char *rxp = din;
 153         unsigned rxecount = 17; /* max. 16 elements in FIFO, leftover 1 */
 154
 155         debug("%s: bus:%i cs:%i bitlen:%i bytes:%i flags:%lx\n", __func__,
 156                 slave->bus, slave->cs, bitlen, bytes, flags);
 157         if (bitlen == 0)
 158                 goto done;
 159
 160         if (bitlen % XILSPI_MAX_XFER_BITS) {
 161                 printf("XILSPI warning: %s: Not a multiple of %d bits\n",
 162                                 __func__, XILSPI_MAX_XFER_BITS);
 163                 flags |= SPI_XFER_END;
 164                 goto done;
 165         }
 166
 167         /* empty read buffer */
 168         while (rxecount && !(readl(&xilspi->regs->spisr) & SPISR_RX_EMPTY)) {
 169                 readl(&xilspi->regs->spidrr);
 170                 rxecount--;
 171         }
 172
 173         if (!rxecount) {
 174                 printf("XILSPI error: %s: Rx buffer not empty\n", __func__);
 175                 return -1;
 176         }
 177
 178         if (flags & SPI_XFER_BEGIN)
 179                 spi_cs_activate(slave);
 180
 181         while (bytes--) {
 182                 unsigned timeout = /* at least 1usec or greater, leftover 1 */
 183                         xilspi->freq > XILSPI_MAX_XFER_BITS * 1000000 ? 2 :
 184                         (XILSPI_MAX_XFER_BITS * 1000000 / xilspi->freq) + 1;
 185
 186                 /* get Tx element from data out buffer and count up */
 187                 unsigned char d = txp ? *txp++ : CONFIG_XILINX_SPI_IDLE_VAL;
 188                 debug("%s: tx:%x ", __func__, d);
 189
 190                 /* write out and wait for processing (receive data) */
 191                 writel(d & SPIDTR_8BIT_MASK, &xilspi->regs->spidtr);
 192                 while (timeout && readl(&xilspi->regs->spisr)
 193                                                 & SPISR_RX_EMPTY) {
 194                         timeout--;
 195                         udelay(1);
 196                 }
 197
 198                 if (!timeout) {
 199                         printf("XILSPI error: %s: Xfer timeout\n", __func__);
 200                         return -1;
 201                 }
 202
 203                 /* read Rx element and push into data in buffer */
 204                 d = readl(&xilspi->regs->spidrr) & SPIDRR_8BIT_MASK;
 205                 if (rxp)
 206                         *rxp++ = d;
 207                 debug("rx:%x\n", d);
 208         }
 209
 210  done:
 211         if (flags & SPI_XFER_END)
 212                 spi_cs_deactivate(slave);
 213
 214         return 0;
 215 }