drivers/spi/bfin_spi.c

   1 /*
   2  * Driver for Blackfin On-Chip SPI device
   3  *
   4  * Copyright (c) 2005-2010 Analog Devices Inc.
   5  *
   6  * Licensed under the GPL-2 or later.
   7  */
   8
   9 /*#define DEBUG*/
  10
  11 #include <common.h>
  12 #include <malloc.h>
  13 #include <spi.h>
  14
  15 #include <asm/blackfin.h>
  16 #include <asm/gpio.h>
  17 #include <asm/portmux.h>
  18 #include <asm/mach-common/bits/spi.h>
  19
  20 struct bfin_spi_slave {
  21         struct spi_slave slave;
  22         void *mmr_base;
  23         u16 ctl, baud, flg;
  24 };
  25
  26 #define MAKE_SPI_FUNC(mmr, off) \
  27 static inline void write_##mmr(struct bfin_spi_slave *bss, u16 val) { bfin_write16(bss->mmr_base + off, val); } \
  28 static inline u16 read_##mmr(struct bfin_spi_slave *bss) { return bfin_read16(bss->mmr_base + off); }
  29 MAKE_SPI_FUNC(SPI_CTL,  0x00)
  30 MAKE_SPI_FUNC(SPI_FLG,  0x04)
  31 MAKE_SPI_FUNC(SPI_STAT, 0x08)
  32 MAKE_SPI_FUNC(SPI_TDBR, 0x0c)
  33 MAKE_SPI_FUNC(SPI_RDBR, 0x10)
  34 MAKE_SPI_FUNC(SPI_BAUD, 0x14)
  35
  36 #define to_bfin_spi_slave(s) container_of(s, struct bfin_spi_slave, slave)
  37
  38 #define gpio_cs(cs) ((cs) - MAX_CTRL_CS)
  39 #ifdef CONFIG_BFIN_SPI_GPIO_CS
  40 # define is_gpio_cs(cs) ((cs) > MAX_CTRL_CS)
  41 #else
  42 # define is_gpio_cs(cs) 0
  43 #endif
  44
  45 int spi_cs_is_valid(unsigned int bus, unsigned int cs)
  46 {
  47         if (is_gpio_cs(cs))
  48                 return gpio_is_valid(gpio_cs(cs));
  49         else
  50                 return (cs >= 1 && cs <= MAX_CTRL_CS);
  51 }
  52
  53 void spi_cs_activate(struct spi_slave *slave)
  54 {
  55         struct bfin_spi_slave *bss = to_bfin_spi_slave(slave);
  56
  57         if (is_gpio_cs(slave->cs)) {
  58                 unsigned int cs = gpio_cs(slave->cs);
  59                 gpio_set_value(cs, bss->flg);
  60                 debug("%s: SPI_CS_GPIO:%x\n", __func__, gpio_get_value(cs));
  61         } else {
  62                 write_SPI_FLG(bss,
  63                         (read_SPI_FLG(bss) &
  64                         ~((!bss->flg << 8) << slave->cs)) |
  65                         (1 << slave->cs));
  66                 debug("%s: SPI_FLG:%x\n", __func__, read_SPI_FLG(bss));
  67         }
  68
  69         SSYNC();
  70 }
  71
  72 void spi_cs_deactivate(struct spi_slave *slave)
  73 {
  74         struct bfin_spi_slave *bss = to_bfin_spi_slave(slave);
  75
  76         if (is_gpio_cs(slave->cs)) {
  77                 unsigned int cs = gpio_cs(slave->cs);
  78                 gpio_set_value(cs, !bss->flg);
  79                 debug("%s: SPI_CS_GPIO:%x\n", __func__, gpio_get_value(cs));
  80         } else {
  81                 u16 flg;
  82
  83                 /* make sure we force the cs to deassert rather than let the
  84                  * pin float back up.  otherwise, exact timings may not be
  85                  * met some of the time leading to random behavior (ugh).
  86                  */
  87                 flg = read_SPI_FLG(bss) | ((!bss->flg << 8) << slave->cs);
  88                 write_SPI_FLG(bss, flg);
  89                 SSYNC();
  90                 debug("%s: SPI_FLG:%x\n", __func__, read_SPI_FLG(bss));
  91
  92                 flg &= ~(1 << slave->cs);
  93                 write_SPI_FLG(bss, flg);
  94                 debug("%s: SPI_FLG:%x\n", __func__, read_SPI_FLG(bss));
  95         }
  96
  97         SSYNC();
  98 }
  99
 100 void spi_init()
 101 {
 102 }
 103
 104 #ifdef SPI_CTL
 105 # define SPI0_CTL SPI_CTL
 106 #endif
 107
 108 #define SPI_PINS(n) \
 109         [n] = { 0, P_SPI##n##_SCK, P_SPI##n##_MISO, P_SPI##n##_MOSI, 0 }
 110 static unsigned short pins[][5] = {
 111 #ifdef SPI0_CTL
 112         SPI_PINS(0),
 113 #endif
 114 #ifdef SPI1_CTL
 115         SPI_PINS(1),
 116 #endif
 117 #ifdef SPI2_CTL
 118         SPI_PINS(2),
 119 #endif
 120 };
 121
 122 #define SPI_CS_PINS(n) \
 123         [n] = { \
 124                 P_SPI##n##_SSEL1, P_SPI##n##_SSEL2, P_SPI##n##_SSEL3, \
 125                 P_SPI##n##_SSEL4, P_SPI##n##_SSEL5, P_SPI##n##_SSEL6, \
 126                 P_SPI##n##_SSEL7, \
 127         }
 128 static const unsigned short cs_pins[][7] = {
 129 #ifdef SPI0_CTL
 130         SPI_CS_PINS(0),
 131 #endif
 132 #ifdef SPI1_CTL
 133         SPI_CS_PINS(1),
 134 #endif
 135 #ifdef SPI2_CTL
 136         SPI_CS_PINS(2),
 137 #endif
 138 };
 139
 140 void spi_set_speed(struct spi_slave *slave, uint hz)
 141 {
 142         struct bfin_spi_slave *bss = to_bfin_spi_slave(slave);
 143         ulong sclk;
 144         u32 baud;
 145
 146         sclk = get_sclk();
 147         baud = sclk / (2 * hz);
 148         /* baud should be rounded up */
 149         if (sclk % (2 * hz))
 150                 baud += 1;
 151         if (baud < 2)
 152                 baud = 2;
 153         else if (baud > (u16)-1)
 154                 baud = -1;
 155         bss->baud = baud;
 156 }
 157
 158 struct spi_slave *spi_setup_slave(unsigned int bus, unsigned int cs,
 159                 unsigned int max_hz, unsigned int mode)
 160 {
 161         struct bfin_spi_slave *bss;
 162         u32 mmr_base;
 163
 164         if (!spi_cs_is_valid(bus, cs))
 165                 return NULL;
 166
 167         if (bus >= ARRAY_SIZE(pins) || pins[bus] == NULL) {
 168                 debug("%s: invalid bus %u\n", __func__, bus);
 169                 return NULL;
 170         }
 171         switch (bus) {
 172 #ifdef SPI0_CTL
 173                 case 0: mmr_base = SPI0_CTL; break;
 174 #endif
 175 #ifdef SPI1_CTL
 176                 case 1: mmr_base = SPI1_CTL; break;
 177 #endif
 178 #ifdef SPI2_CTL
 179                 case 2: mmr_base = SPI2_CTL; break;
 180 #endif
 181                 default: return NULL;
 182         }
 183
 184         bss = spi_alloc_slave(struct bfin_spi_slave, bus, cs);
 185         if (!bss)
 186                 return NULL;
 187
 188         bss->mmr_base = (void *)mmr_base;
 189         bss->ctl = SPE | MSTR | TDBR_CORE;
 190         if (mode & SPI_CPHA) bss->ctl |= CPHA;
 191         if (mode & SPI_CPOL) bss->ctl |= CPOL;
 192         if (mode & SPI_LSB_FIRST) bss->ctl |= LSBF;
 193         bss->flg = mode & SPI_CS_HIGH ? 1 : 0;
 194         spi_set_speed(&bss->slave, max_hz);
 195
 196         debug("%s: bus:%i cs:%i mmr:%x ctl:%x baud:%i flg:%i\n", __func__,
 197                 bus, cs, mmr_base, bss->ctl, bss->baud, bss->flg);
 198
 199         return &bss->slave;
 200 }
 201
 202 void spi_free_slave(struct spi_slave *slave)
 203 {
 204         struct bfin_spi_slave *bss = to_bfin_spi_slave(slave);
 205         free(bss);
 206 }
 207
 208 int spi_claim_bus(struct spi_slave *slave)
 209 {
 210         struct bfin_spi_slave *bss = to_bfin_spi_slave(slave);
 211
 212         debug("%s: bus:%i cs:%i\n", __func__, slave->bus, slave->cs);
 213
 214         if (is_gpio_cs(slave->cs)) {
 215                 unsigned int cs = gpio_cs(slave->cs);
 216                 gpio_request(cs, "bfin-spi");
 217                 gpio_direction_output(cs, !bss->flg);
 218                 pins[slave->bus][0] = P_DONTCARE;
 219         } else
 220                 pins[slave->bus][0] = cs_pins[slave->bus][slave->cs - 1];
 221         peripheral_request_list(pins[slave->bus], "bfin-spi");
 222
 223         write_SPI_CTL(bss, bss->ctl);
 224         write_SPI_BAUD(bss, bss->baud);
 225         SSYNC();
 226
 227         return 0;
 228 }
 229
 230 void spi_release_bus(struct spi_slave *slave)
 231 {
 232         struct bfin_spi_slave *bss = to_bfin_spi_slave(slave);
 233
 234         debug("%s: bus:%i cs:%i\n", __func__, slave->bus, slave->cs);
 235
 236         peripheral_free_list(pins[slave->bus]);
 237         if (is_gpio_cs(slave->cs))
 238                 gpio_free(gpio_cs(slave->cs));
 239
 240         write_SPI_CTL(bss, 0);
 241         SSYNC();
 242 }
 243
 244 #ifndef CONFIG_BFIN_SPI_IDLE_VAL
 245 # define CONFIG_BFIN_SPI_IDLE_VAL 0xff
 246 #endif
 247
 248 static int spi_pio_xfer(struct bfin_spi_slave *bss, const u8 *tx, u8 *rx,
 249                         uint bytes)
 250 {
 251         /* discard invalid data and clear RXS */
 252         read_SPI_RDBR(bss);
 253         /* todo: take advantage of hardware fifos  */
 254         while (bytes--) {
 255                 u8 value = (tx ? *tx++ : CONFIG_BFIN_SPI_IDLE_VAL);
 256                 debug("%s: tx:%x ", __func__, value);
 257                 write_SPI_TDBR(bss, value);
 258                 SSYNC();
 259                 while ((read_SPI_STAT(bss) & TXS))
 260                         if (ctrlc())
 261                                 return -1;
 262                 while (!(read_SPI_STAT(bss) & SPIF))
 263                         if (ctrlc())
 264                                 return -1;
 265                 while (!(read_SPI_STAT(bss) & RXS))
 266                         if (ctrlc())
 267                                 return -1;
 268                 value = read_SPI_RDBR(bss);
 269                 if (rx)
 270                         *rx++ = value;
 271                 debug("rx:%x\n", value);
 272         }
 273
 274         return 0;
 275 }
 276
 277 int spi_xfer(struct spi_slave *slave, unsigned int bitlen, const void *dout,
 278                 void *din, unsigned long flags)
 279 {
 280         struct bfin_spi_slave *bss = to_bfin_spi_slave(slave);
 281         const u8 *tx = dout;
 282         u8 *rx = din;
 283         uint bytes = bitlen / 8;
 284         int ret = 0;
 285
 286         debug("%s: bus:%i cs:%i bitlen:%i bytes:%i flags:%lx\n", __func__,
 287                 slave->bus, slave->cs, bitlen, bytes, flags);
 288
 289         if (bitlen == 0)
 290                 goto done;
 291
 292         /* we can only do 8 bit transfers */
 293         if (bitlen % 8) {
 294                 flags |= SPI_XFER_END;
 295                 goto done;
 296         }
 297
 298         if (flags & SPI_XFER_BEGIN)
 299                 spi_cs_activate(slave);
 300
 301         ret = spi_pio_xfer(bss, tx, rx, bytes);
 302
 303  done:
 304         if (flags & SPI_XFER_END)
 305                 spi_cs_deactivate(slave);
 306
 307         return ret;
 308 }