git.oblomov.eu Git - linux-2.6/blob - drivers/spi/au1550_spi.c

   1 /*
   2  * au1550_spi.c - au1550 psc spi controller driver
   3  * may work also with au1200, au1210, au1250
   4  * will not work on au1000, au1100 and au1500 (no full spi controller there)
   5  *
   6  * Copyright (c) 2006 ATRON electronic GmbH
   7  * Author: Jan Nikitenko <jan.nikitenko@gmail.com>
   8  *
   9  * This program is free software; you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License as published by
  11  * the Free Software Foundation; either version 2 of the License, or
  12  * (at your option) any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  22  */
  23
  24 #include <linux/init.h>
  25 #include <linux/interrupt.h>
  26 #include <linux/errno.h>
  27 #include <linux/device.h>
  28 #include <linux/platform_device.h>
  29 #include <linux/spi/spi.h>
  30 #include <linux/spi/spi_bitbang.h>
  31 #include <linux/dma-mapping.h>
  32 #include <linux/completion.h>
  33 #include <asm/mach-au1x00/au1000.h>
  34 #include <asm/mach-au1x00/au1xxx_psc.h>
  35 #include <asm/mach-au1x00/au1xxx_dbdma.h>
  36
  37 #include <asm/mach-au1x00/au1550_spi.h>
  38
  39 static unsigned usedma = 1;
  40 module_param(usedma, uint, 0644);
  41
  42 /*
  43 #define AU1550_SPI_DEBUG_LOOPBACK
  44 */
  45
  46
  47 #define AU1550_SPI_DBDMA_DESCRIPTORS 1
  48 #define AU1550_SPI_DMA_RXTMP_MINSIZE 2048U
  49
  50 struct au1550_spi {
  51         struct spi_bitbang bitbang;
  52
  53         volatile psc_spi_t __iomem *regs;
  54         int irq;
  55         unsigned freq_max;
  56         unsigned freq_min;
  57
  58         unsigned len;
  59         unsigned tx_count;
  60         unsigned rx_count;
  61         const u8 *tx;
  62         u8 *rx;
  63
  64         void (*rx_word)(struct au1550_spi *hw);
  65         void (*tx_word)(struct au1550_spi *hw);
  66         int (*txrx_bufs)(struct spi_device *spi, struct spi_transfer *t);
  67         irqreturn_t (*irq_callback)(struct au1550_spi *hw);
  68
  69         struct completion master_done;
  70
  71         unsigned usedma;
  72         u32 dma_tx_id;
  73         u32 dma_rx_id;
  74         u32 dma_tx_ch;
  75         u32 dma_rx_ch;
  76
  77         u8 *dma_rx_tmpbuf;
  78         unsigned dma_rx_tmpbuf_size;
  79         u32 dma_rx_tmpbuf_addr;
  80
  81         struct spi_master *master;
  82         struct device *dev;
  83         struct au1550_spi_info *pdata;
  84 };
  85
  86
  87 /* we use an 8-bit memory device for dma transfers to/from spi fifo */
  88 static dbdev_tab_t au1550_spi_mem_dbdev =
  89 {
  90         .dev_id                 = DBDMA_MEM_CHAN,
  91         .dev_flags              = DEV_FLAGS_ANYUSE|DEV_FLAGS_SYNC,
  92         .dev_tsize              = 0,
  93         .dev_devwidth           = 8,
  94         .dev_physaddr           = 0x00000000,
  95         .dev_intlevel           = 0,
  96         .dev_intpolarity        = 0
  97 };
  98
  99 static void au1550_spi_bits_handlers_set(struct au1550_spi *hw, int bpw);
 100
 101
 102 /*
 103  *  compute BRG and DIV bits to setup spi clock based on main input clock rate
 104  *  that was specified in platform data structure
 105  *  according to au1550 datasheet:
 106  *    psc_tempclk = psc_mainclk / (2 << DIV)
 107  *    spiclk = psc_tempclk / (2 * (BRG + 1))
 108  *    BRG valid range is 4..63
 109  *    DIV valid range is 0..3
 110  */
 111 static u32 au1550_spi_baudcfg(struct au1550_spi *hw, unsigned speed_hz)
 112 {
 113         u32 mainclk_hz = hw->pdata->mainclk_hz;
 114         u32 div, brg;
 115
 116         for (div = 0; div < 4; div++) {
 117                 brg = mainclk_hz / speed_hz / (4 << div);
 118                 /* now we have BRG+1 in brg, so count with that */
 119                 if (brg < (4 + 1)) {
 120                         brg = (4 + 1);  /* speed_hz too big */
 121                         break;          /* set lowest brg (div is == 0) */
 122                 }
 123                 if (brg <= (63 + 1))
 124                         break;          /* we have valid brg and div */
 125         }
 126         if (div == 4) {
 127                 div = 3;                /* speed_hz too small */
 128                 brg = (63 + 1);         /* set highest brg and div */
 129         }
 130         brg--;
 131         return PSC_SPICFG_SET_BAUD(brg) | PSC_SPICFG_SET_DIV(div);
 132 }
 133
 134 static inline void au1550_spi_mask_ack_all(struct au1550_spi *hw)
 135 {
 136         hw->regs->psc_spimsk =
 137                   PSC_SPIMSK_MM | PSC_SPIMSK_RR | PSC_SPIMSK_RO
 138                 | PSC_SPIMSK_RU | PSC_SPIMSK_TR | PSC_SPIMSK_TO
 139                 | PSC_SPIMSK_TU | PSC_SPIMSK_SD | PSC_SPIMSK_MD;
 140         au_sync();
 141
 142         hw->regs->psc_spievent =
 143                   PSC_SPIEVNT_MM | PSC_SPIEVNT_RR | PSC_SPIEVNT_RO
 144                 | PSC_SPIEVNT_RU | PSC_SPIEVNT_TR | PSC_SPIEVNT_TO
 145                 | PSC_SPIEVNT_TU | PSC_SPIEVNT_SD | PSC_SPIEVNT_MD;
 146         au_sync();
 147 }
 148
 149 static void au1550_spi_reset_fifos(struct au1550_spi *hw)
 150 {
 151         u32 pcr;
 152
 153         hw->regs->psc_spipcr = PSC_SPIPCR_RC | PSC_SPIPCR_TC;
 154         au_sync();
 155         do {
 156                 pcr = hw->regs->psc_spipcr;
 157                 au_sync();
 158         } while (pcr != 0);
 159 }
 160
 161 /*
 162  * dma transfers are used for the most common spi word size of 8-bits
 163  * we cannot easily change already set up dma channels' width, so if we wanted
 164  * dma support for more than 8-bit words (up to 24 bits), we would need to
 165  * setup dma channels from scratch on each spi transfer, based on bits_per_word
 166  * instead we have pre set up 8 bit dma channels supporting spi 4 to 8 bits
 167  * transfers, and 9 to 24 bits spi transfers will be done in pio irq based mode
 168  * callbacks to handle dma or pio are set up in au1550_spi_bits_handlers_set()
 169  */
 170 static void au1550_spi_chipsel(struct spi_device *spi, int value)
 171 {
 172         struct au1550_spi *hw = spi_master_get_devdata(spi->master);
 173         unsigned cspol = spi->mode & SPI_CS_HIGH ? 1 : 0;
 174         u32 cfg, stat;
 175
 176         switch (value) {
 177         case BITBANG_CS_INACTIVE:
 178                 if (hw->pdata->deactivate_cs)
 179                         hw->pdata->deactivate_cs(hw->pdata, spi->chip_select,
 180                                         cspol);
 181                 break;
 182
 183         case BITBANG_CS_ACTIVE:
 184                 au1550_spi_bits_handlers_set(hw, spi->bits_per_word);
 185
 186                 cfg = hw->regs->psc_spicfg;
 187                 au_sync();
 188                 hw->regs->psc_spicfg = cfg & ~PSC_SPICFG_DE_ENABLE;
 189                 au_sync();
 190
 191                 if (spi->mode & SPI_CPOL)
 192                         cfg |= PSC_SPICFG_BI;
 193                 else
 194                         cfg &= ~PSC_SPICFG_BI;
 195                 if (spi->mode & SPI_CPHA)
 196                         cfg &= ~PSC_SPICFG_CDE;
 197                 else
 198                         cfg |= PSC_SPICFG_CDE;
 199
 200                 if (spi->mode & SPI_LSB_FIRST)
 201                         cfg |= PSC_SPICFG_MLF;
 202                 else
 203                         cfg &= ~PSC_SPICFG_MLF;
 204
 205                 if (hw->usedma && spi->bits_per_word <= 8)
 206                         cfg &= ~PSC_SPICFG_DD_DISABLE;
 207                 else
 208                         cfg |= PSC_SPICFG_DD_DISABLE;
 209                 cfg = PSC_SPICFG_CLR_LEN(cfg);
 210                 cfg |= PSC_SPICFG_SET_LEN(spi->bits_per_word);
 211
 212                 cfg = PSC_SPICFG_CLR_BAUD(cfg);
 213                 cfg &= ~PSC_SPICFG_SET_DIV(3);
 214                 cfg |= au1550_spi_baudcfg(hw, spi->max_speed_hz);
 215
 216                 hw->regs->psc_spicfg = cfg | PSC_SPICFG_DE_ENABLE;
 217                 au_sync();
 218                 do {
 219                         stat = hw->regs->psc_spistat;
 220                         au_sync();
 221                 } while ((stat & PSC_SPISTAT_DR) == 0);
 222
 223                 if (hw->pdata->activate_cs)
 224                         hw->pdata->activate_cs(hw->pdata, spi->chip_select,
 225                                         cspol);
 226                 break;
 227         }
 228 }
 229
 230 static int au1550_spi_setupxfer(struct spi_device *spi, struct spi_transfer *t)
 231 {
 232         struct au1550_spi *hw = spi_master_get_devdata(spi->master);
 233         unsigned bpw, hz;
 234         u32 cfg, stat;
 235
 236         bpw = t ? t->bits_per_word : spi->bits_per_word;
 237         hz = t ? t->speed_hz : spi->max_speed_hz;
 238
 239         if (bpw < 4 || bpw > 24) {
 240                 dev_err(&spi->dev, "setupxfer: invalid bits_per_word=%d\n",
 241                         bpw);
 242                 return -EINVAL;
 243         }
 244         if (hz > spi->max_speed_hz || hz > hw->freq_max || hz < hw->freq_min) {
 245                 dev_err(&spi->dev, "setupxfer: clock rate=%d out of range\n",
 246                         hz);
 247                 return -EINVAL;
 248         }
 249
 250         au1550_spi_bits_handlers_set(hw, spi->bits_per_word);
 251
 252         cfg = hw->regs->psc_spicfg;
 253         au_sync();
 254         hw->regs->psc_spicfg = cfg & ~PSC_SPICFG_DE_ENABLE;
 255         au_sync();
 256
 257         if (hw->usedma && bpw <= 8)
 258                 cfg &= ~PSC_SPICFG_DD_DISABLE;
 259         else
 260                 cfg |= PSC_SPICFG_DD_DISABLE;
 261         cfg = PSC_SPICFG_CLR_LEN(cfg);
 262         cfg |= PSC_SPICFG_SET_LEN(bpw);
 263
 264         cfg = PSC_SPICFG_CLR_BAUD(cfg);
 265         cfg &= ~PSC_SPICFG_SET_DIV(3);
 266         cfg |= au1550_spi_baudcfg(hw, hz);
 267
 268         hw->regs->psc_spicfg = cfg;
 269         au_sync();
 270
 271         if (cfg & PSC_SPICFG_DE_ENABLE) {
 272                 do {
 273                         stat = hw->regs->psc_spistat;
 274                         au_sync();
 275                 } while ((stat & PSC_SPISTAT_DR) == 0);
 276         }
 277
 278         au1550_spi_reset_fifos(hw);
 279         au1550_spi_mask_ack_all(hw);
 280         return 0;
 281 }
 282
 283 /* the spi->mode bits understood by this driver: */
 284 #define MODEBITS (SPI_CPOL | SPI_CPHA | SPI_CS_HIGH | SPI_LSB_FIRST)
 285
 286 static int au1550_spi_setup(struct spi_device *spi)
 287 {
 288         struct au1550_spi *hw = spi_master_get_devdata(spi->master);
 289
 290         if (spi->bits_per_word == 0)
 291                 spi->bits_per_word = 8;
 292         if (spi->bits_per_word < 4 || spi->bits_per_word > 24) {
 293                 dev_err(&spi->dev, "setup: invalid bits_per_word=%d\n",
 294                         spi->bits_per_word);
 295                 return -EINVAL;
 296         }
 297
 298         if (spi->mode & ~MODEBITS) {
 299                 dev_dbg(&spi->dev, "setup: unsupported mode bits %x\n",
 300                         spi->mode & ~MODEBITS);
 301                 return -EINVAL;
 302         }
 303
 304         if (spi->max_speed_hz == 0)
 305                 spi->max_speed_hz = hw->freq_max;
 306         if (spi->max_speed_hz > hw->freq_max
 307                         || spi->max_speed_hz < hw->freq_min)
 308                 return -EINVAL;
 309         /*
 310          * NOTE: cannot change speed and other hw settings immediately,
 311          *       otherwise sharing of spi bus is not possible,
 312          *       so do not call setupxfer(spi, NULL) here
 313          */
 314         return 0;
 315 }
 316
 317 /*
 318  * for dma spi transfers, we have to setup rx channel, otherwise there is
 319  * no reliable way how to recognize that spi transfer is done
 320  * dma complete callbacks are called before real spi transfer is finished
 321  * and if only tx dma channel is set up (and rx fifo overflow event masked)
 322  * spi master done event irq is not generated unless rx fifo is empty (emptied)
 323  * so we need rx tmp buffer to use for rx dma if user does not provide one
 324  */
 325 static int au1550_spi_dma_rxtmp_alloc(struct au1550_spi *hw, unsigned size)
 326 {
 327         hw->dma_rx_tmpbuf = kmalloc(size, GFP_KERNEL);
 328         if (!hw->dma_rx_tmpbuf)
 329                 return -ENOMEM;
 330         hw->dma_rx_tmpbuf_size = size;
 331         hw->dma_rx_tmpbuf_addr = dma_map_single(hw->dev, hw->dma_rx_tmpbuf,
 332                         size, DMA_FROM_DEVICE);
 333         if (dma_mapping_error(hw->dma_rx_tmpbuf_addr)) {
 334                 kfree(hw->dma_rx_tmpbuf);
 335                 hw->dma_rx_tmpbuf = 0;
 336                 hw->dma_rx_tmpbuf_size = 0;
 337                 return -EFAULT;
 338         }
 339         return 0;
 340 }
 341
 342 static void au1550_spi_dma_rxtmp_free(struct au1550_spi *hw)
 343 {
 344         dma_unmap_single(hw->dev, hw->dma_rx_tmpbuf_addr,
 345                         hw->dma_rx_tmpbuf_size, DMA_FROM_DEVICE);
 346         kfree(hw->dma_rx_tmpbuf);
 347         hw->dma_rx_tmpbuf = 0;
 348         hw->dma_rx_tmpbuf_size = 0;
 349 }
 350
 351 static int au1550_spi_dma_txrxb(struct spi_device *spi, struct spi_transfer *t)
 352 {
 353         struct au1550_spi *hw = spi_master_get_devdata(spi->master);
 354         dma_addr_t dma_tx_addr;
 355         dma_addr_t dma_rx_addr;
 356         u32 res;
 357
 358         hw->len = t->len;
 359         hw->tx_count = 0;
 360         hw->rx_count = 0;
 361
 362         hw->tx = t->tx_buf;
 363         hw->rx = t->rx_buf;
 364         dma_tx_addr = t->tx_dma;
 365         dma_rx_addr = t->rx_dma;
 366
 367         /*
 368          * check if buffers are already dma mapped, map them otherwise
 369          * use rx buffer in place of tx if tx buffer was not provided
 370          * use temp rx buffer (preallocated or realloc to fit) for rx dma
 371          */
 372         if (t->rx_buf) {
 373                 if (t->rx_dma == 0) {   /* if DMA_ADDR_INVALID, map it */
 374                         dma_rx_addr = dma_map_single(hw->dev,
 375                                         (void *)t->rx_buf,
 376                                         t->len, DMA_FROM_DEVICE);
 377                         if (dma_mapping_error(dma_rx_addr))
 378                                 dev_err(hw->dev, "rx dma map error\n");
 379                 }
 380         } else {
 381                 if (t->len > hw->dma_rx_tmpbuf_size) {
 382                         int ret;
 383
 384                         au1550_spi_dma_rxtmp_free(hw);
 385                         ret = au1550_spi_dma_rxtmp_alloc(hw, max(t->len,
 386                                         AU1550_SPI_DMA_RXTMP_MINSIZE));
 387                         if (ret < 0)
 388                                 return ret;
 389                 }
 390                 hw->rx = hw->dma_rx_tmpbuf;
 391                 dma_rx_addr = hw->dma_rx_tmpbuf_addr;
 392                 dma_sync_single_for_device(hw->dev, dma_rx_addr,
 393                         t->len, DMA_FROM_DEVICE);
 394         }
 395         if (t->tx_buf) {
 396                 if (t->tx_dma == 0) {   /* if DMA_ADDR_INVALID, map it */
 397                         dma_tx_addr = dma_map_single(hw->dev,
 398                                         (void *)t->tx_buf,
 399                                         t->len, DMA_TO_DEVICE);
 400                         if (dma_mapping_error(dma_tx_addr))
 401                                 dev_err(hw->dev, "tx dma map error\n");
 402                 }
 403         } else {
 404                 dma_sync_single_for_device(hw->dev, dma_rx_addr,
 405                                 t->len, DMA_BIDIRECTIONAL);
 406                 hw->tx = hw->rx;
 407         }
 408
 409         /* put buffers on the ring */
 410         res = au1xxx_dbdma_put_dest(hw->dma_rx_ch, hw->rx, t->len);
 411         if (!res)
 412                 dev_err(hw->dev, "rx dma put dest error\n");
 413
 414         res = au1xxx_dbdma_put_source(hw->dma_tx_ch, (void *)hw->tx, t->len);
 415         if (!res)
 416                 dev_err(hw->dev, "tx dma put source error\n");
 417
 418         au1xxx_dbdma_start(hw->dma_rx_ch);
 419         au1xxx_dbdma_start(hw->dma_tx_ch);
 420
 421         /* by default enable nearly all events interrupt */
 422         hw->regs->psc_spimsk = PSC_SPIMSK_SD;
 423         au_sync();
 424
 425         /* start the transfer */
 426         hw->regs->psc_spipcr = PSC_SPIPCR_MS;
 427         au_sync();
 428
 429         wait_for_completion(&hw->master_done);
 430
 431         au1xxx_dbdma_stop(hw->dma_tx_ch);
 432         au1xxx_dbdma_stop(hw->dma_rx_ch);
 433
 434         if (!t->rx_buf) {
 435                 /* using the temporal preallocated and premapped buffer */
 436                 dma_sync_single_for_cpu(hw->dev, dma_rx_addr, t->len,
 437                         DMA_FROM_DEVICE);
 438         }
 439         /* unmap buffers if mapped above */
 440         if (t->rx_buf && t->rx_dma == 0 )
 441                 dma_unmap_single(hw->dev, dma_rx_addr, t->len,
 442                         DMA_FROM_DEVICE);
 443         if (t->tx_buf && t->tx_dma == 0 )
 444                 dma_unmap_single(hw->dev, dma_tx_addr, t->len,
 445                         DMA_TO_DEVICE);
 446
 447         return hw->rx_count < hw->tx_count ? hw->rx_count : hw->tx_count;
 448 }
 449
 450 static irqreturn_t au1550_spi_dma_irq_callback(struct au1550_spi *hw)
 451 {
 452         u32 stat, evnt;
 453
 454         stat = hw->regs->psc_spistat;
 455         evnt = hw->regs->psc_spievent;
 456         au_sync();
 457         if ((stat & PSC_SPISTAT_DI) == 0) {
 458                 dev_err(hw->dev, "Unexpected IRQ!\n");
 459                 return IRQ_NONE;
 460         }
 461
 462         if ((evnt & (PSC_SPIEVNT_MM | PSC_SPIEVNT_RO
 463                                 | PSC_SPIEVNT_RU | PSC_SPIEVNT_TO
 464                                 | PSC_SPIEVNT_TU | PSC_SPIEVNT_SD))
 465                         != 0) {
 466                 /*
 467                  * due to an spi error we consider transfer as done,
 468                  * so mask all events until before next transfer start
 469                  * and stop the possibly running dma immediatelly
 470                  */
 471                 au1550_spi_mask_ack_all(hw);
 472                 au1xxx_dbdma_stop(hw->dma_rx_ch);
 473                 au1xxx_dbdma_stop(hw->dma_tx_ch);
 474
 475                 /* get number of transfered bytes */
 476                 hw->rx_count = hw->len - au1xxx_get_dma_residue(hw->dma_rx_ch);
 477                 hw->tx_count = hw->len - au1xxx_get_dma_residue(hw->dma_tx_ch);
 478
 479                 au1xxx_dbdma_reset(hw->dma_rx_ch);
 480                 au1xxx_dbdma_reset(hw->dma_tx_ch);
 481                 au1550_spi_reset_fifos(hw);
 482
 483                 dev_err(hw->dev,
 484                         "Unexpected SPI error: event=0x%x stat=0x%x!\n",
 485                         evnt, stat);
 486
 487                 complete(&hw->master_done);
 488                 return IRQ_HANDLED;
 489         }
 490
 491         if ((evnt & PSC_SPIEVNT_MD) != 0) {
 492                 /* transfer completed successfully */
 493                 au1550_spi_mask_ack_all(hw);
 494                 hw->rx_count = hw->len;
 495                 hw->tx_count = hw->len;
 496                 complete(&hw->master_done);
 497         }
 498         return IRQ_HANDLED;
 499 }
 500
 501
 502 /* routines to handle different word sizes in pio mode */
 503 #define AU1550_SPI_RX_WORD(size, mask)                                  \
 504 static void au1550_spi_rx_word_##size(struct au1550_spi *hw)            \
 505 {                                                                       \
 506         u32 fifoword = hw->regs->psc_spitxrx & (u32)(mask);             \
 507         au_sync();                                                      \
 508         if (hw->rx) {                                                   \
 509                 *(u##size *)hw->rx = (u##size)fifoword;                 \
 510                 hw->rx += (size) / 8;                                   \
 511         }                                                               \
 512         hw->rx_count += (size) / 8;                                     \
 513 }
 514
 515 #define AU1550_SPI_TX_WORD(size, mask)                                  \
 516 static void au1550_spi_tx_word_##size(struct au1550_spi *hw)            \
 517 {                                                                       \
 518         u32 fifoword = 0;                                               \
 519         if (hw->tx) {                                                   \
 520                 fifoword = *(u##size *)hw->tx & (u32)(mask);            \
 521                 hw->tx += (size) / 8;                                   \
 522         }                                                               \
 523         hw->tx_count += (size) / 8;                                     \
 524         if (hw->tx_count >= hw->len)                                    \
 525                 fifoword |= PSC_SPITXRX_LC;                             \
 526         hw->regs->psc_spitxrx = fifoword;                               \
 527         au_sync();                                                      \
 528 }
 529
 530 AU1550_SPI_RX_WORD(8,0xff)
 531 AU1550_SPI_RX_WORD(16,0xffff)
 532 AU1550_SPI_RX_WORD(32,0xffffff)
 533 AU1550_SPI_TX_WORD(8,0xff)
 534 AU1550_SPI_TX_WORD(16,0xffff)
 535 AU1550_SPI_TX_WORD(32,0xffffff)
 536
 537 static int au1550_spi_pio_txrxb(struct spi_device *spi, struct spi_transfer *t)
 538 {
 539         u32 stat, mask;
 540         struct au1550_spi *hw = spi_master_get_devdata(spi->master);
 541
 542         hw->tx = t->tx_buf;
 543         hw->rx = t->rx_buf;
 544         hw->len = t->len;
 545         hw->tx_count = 0;
 546         hw->rx_count = 0;
 547
 548         /* by default enable nearly all events after filling tx fifo */
 549         mask = PSC_SPIMSK_SD;
 550
 551         /* fill the transmit FIFO */
 552         while (hw->tx_count < hw->len) {
 553
 554                 hw->tx_word(hw);
 555
 556                 if (hw->tx_count >= hw->len) {
 557                         /* mask tx fifo request interrupt as we are done */
 558                         mask |= PSC_SPIMSK_TR;
 559                 }
 560
 561                 stat = hw->regs->psc_spistat;
 562                 au_sync();
 563                 if (stat & PSC_SPISTAT_TF)
 564                         break;
 565         }
 566
 567         /* enable event interrupts */
 568         hw->regs->psc_spimsk = mask;
 569         au_sync();
 570
 571         /* start the transfer */
 572         hw->regs->psc_spipcr = PSC_SPIPCR_MS;
 573         au_sync();
 574
 575         wait_for_completion(&hw->master_done);
 576
 577         return hw->rx_count < hw->tx_count ? hw->rx_count : hw->tx_count;
 578 }
 579
 580 static irqreturn_t au1550_spi_pio_irq_callback(struct au1550_spi *hw)
 581 {
 582         int busy;
 583         u32 stat, evnt;
 584
 585         stat = hw->regs->psc_spistat;
 586         evnt = hw->regs->psc_spievent;
 587         au_sync();
 588         if ((stat & PSC_SPISTAT_DI) == 0) {
 589                 dev_err(hw->dev, "Unexpected IRQ!\n");
 590                 return IRQ_NONE;
 591         }
 592
 593         if ((evnt & (PSC_SPIEVNT_MM | PSC_SPIEVNT_RO
 594                                 | PSC_SPIEVNT_RU | PSC_SPIEVNT_TO
 595                                 | PSC_SPIEVNT_TU | PSC_SPIEVNT_SD))
 596                         != 0) {
 597                 dev_err(hw->dev,
 598                         "Unexpected SPI error: event=0x%x stat=0x%x!\n",
 599                         evnt, stat);
 600                 /*
 601                  * due to an error we consider transfer as done,
 602                  * so mask all events until before next transfer start
 603                  */
 604                 au1550_spi_mask_ack_all(hw);
 605                 au1550_spi_reset_fifos(hw);
 606                 complete(&hw->master_done);
 607                 return IRQ_HANDLED;
 608         }
 609
 610         /*
 611          * while there is something to read from rx fifo
 612          * or there is a space to write to tx fifo:
 613          */
 614         do {
 615                 busy = 0;
 616                 stat = hw->regs->psc_spistat;
 617                 au_sync();
 618
 619                 if ((stat & PSC_SPISTAT_RE) == 0 && hw->rx_count < hw->len) {
 620                         hw->rx_word(hw);
 621                         /* ack the receive request event */
 622                         hw->regs->psc_spievent = PSC_SPIEVNT_RR;
 623                         au_sync();
 624                         busy = 1;
 625                 }
 626
 627                 if ((stat & PSC_SPISTAT_TF) == 0 && hw->tx_count < hw->len) {
 628                         hw->tx_word(hw);
 629                         /* ack the transmit request event */
 630                         hw->regs->psc_spievent = PSC_SPIEVNT_TR;
 631                         au_sync();
 632                         busy = 1;
 633                 }
 634         } while (busy);
 635
 636         evnt = hw->regs->psc_spievent;
 637         au_sync();
 638
 639         if (hw->rx_count >= hw->len || (evnt & PSC_SPIEVNT_MD) != 0) {
 640                 /* transfer completed successfully */
 641                 au1550_spi_mask_ack_all(hw);
 642                 complete(&hw->master_done);
 643         }
 644         return IRQ_HANDLED;
 645 }
 646
 647 static int au1550_spi_txrx_bufs(struct spi_device *spi, struct spi_transfer *t)
 648 {
 649         struct au1550_spi *hw = spi_master_get_devdata(spi->master);
 650         return hw->txrx_bufs(spi, t);
 651 }
 652
 653 static irqreturn_t au1550_spi_irq(int irq, void *dev)
 654 {
 655         struct au1550_spi *hw = dev;
 656         return hw->irq_callback(hw);
 657 }
 658
 659 static void au1550_spi_bits_handlers_set(struct au1550_spi *hw, int bpw)
 660 {
 661         if (bpw <= 8) {
 662                 if (hw->usedma) {
 663                         hw->txrx_bufs = &au1550_spi_dma_txrxb;
 664                         hw->irq_callback = &au1550_spi_dma_irq_callback;
 665                 } else {
 666                         hw->rx_word = &au1550_spi_rx_word_8;
 667                         hw->tx_word = &au1550_spi_tx_word_8;
 668                         hw->txrx_bufs = &au1550_spi_pio_txrxb;
 669                         hw->irq_callback = &au1550_spi_pio_irq_callback;
 670                 }
 671         } else if (bpw <= 16) {
 672                 hw->rx_word = &au1550_spi_rx_word_16;
 673                 hw->tx_word = &au1550_spi_tx_word_16;
 674                 hw->txrx_bufs = &au1550_spi_pio_txrxb;
 675                 hw->irq_callback = &au1550_spi_pio_irq_callback;
 676         } else {
 677                 hw->rx_word = &au1550_spi_rx_word_32;
 678                 hw->tx_word = &au1550_spi_tx_word_32;
 679                 hw->txrx_bufs = &au1550_spi_pio_txrxb;
 680                 hw->irq_callback = &au1550_spi_pio_irq_callback;
 681         }
 682 }
 683
 684 static void __init au1550_spi_setup_psc_as_spi(struct au1550_spi *hw)
 685 {
 686         u32 stat, cfg;
 687
 688         /* set up the PSC for SPI mode */
 689         hw->regs->psc_ctrl = PSC_CTRL_DISABLE;
 690         au_sync();
 691         hw->regs->psc_sel = PSC_SEL_PS_SPIMODE;
 692         au_sync();
 693
 694         hw->regs->psc_spicfg = 0;
 695         au_sync();
 696
 697         hw->regs->psc_ctrl = PSC_CTRL_ENABLE;
 698         au_sync();
 699
 700         do {
 701                 stat = hw->regs->psc_spistat;
 702                 au_sync();
 703         } while ((stat & PSC_SPISTAT_SR) == 0);
 704
 705
 706         cfg = hw->usedma ? 0 : PSC_SPICFG_DD_DISABLE;
 707         cfg |= PSC_SPICFG_SET_LEN(8);
 708         cfg |= PSC_SPICFG_RT_FIFO8 | PSC_SPICFG_TT_FIFO8;
 709         /* use minimal allowed brg and div values as initial setting: */
 710         cfg |= PSC_SPICFG_SET_BAUD(4) | PSC_SPICFG_SET_DIV(0);
 711
 712 #ifdef AU1550_SPI_DEBUG_LOOPBACK
 713         cfg |= PSC_SPICFG_LB;
 714 #endif
 715
 716         hw->regs->psc_spicfg = cfg;
 717         au_sync();
 718
 719         au1550_spi_mask_ack_all(hw);
 720
 721         hw->regs->psc_spicfg |= PSC_SPICFG_DE_ENABLE;
 722         au_sync();
 723
 724         do {
 725                 stat = hw->regs->psc_spistat;
 726                 au_sync();
 727         } while ((stat & PSC_SPISTAT_DR) == 0);
 728 }
 729
 730
 731 static int __init au1550_spi_probe(struct platform_device *pdev)
 732 {
 733         struct au1550_spi *hw;
 734         struct spi_master *master;
 735         int err = 0;
 736
 737         master = spi_alloc_master(&pdev->dev, sizeof(struct au1550_spi));
 738         if (master == NULL) {
 739                 dev_err(&pdev->dev, "No memory for spi_master\n");
 740                 err = -ENOMEM;
 741                 goto err_nomem;
 742         }
 743
 744         hw = spi_master_get_devdata(master);
 745
 746         hw->master = spi_master_get(master);
 747         hw->pdata = pdev->dev.platform_data;
 748         hw->dev = &pdev->dev;
 749
 750         if (hw->pdata == NULL) {
 751                 dev_err(&pdev->dev, "No platform data supplied\n");
 752                 err = -ENOENT;
 753                 goto err_no_pdata;
 754         }
 755
 756         platform_set_drvdata(pdev, hw);
 757
 758         init_completion(&hw->master_done);
 759
 760         hw->bitbang.master = hw->master;
 761         hw->bitbang.setup_transfer = au1550_spi_setupxfer;
 762         hw->bitbang.chipselect = au1550_spi_chipsel;
 763         hw->bitbang.master->setup = au1550_spi_setup;
 764         hw->bitbang.txrx_bufs = au1550_spi_txrx_bufs;
 765
 766         switch (hw->pdata->bus_num) {
 767         case 0:
 768                 hw->irq = AU1550_PSC0_INT;
 769                 hw->regs = (volatile psc_spi_t *)PSC0_BASE_ADDR;
 770                 hw->dma_rx_id = DSCR_CMD0_PSC0_RX;
 771                 hw->dma_tx_id = DSCR_CMD0_PSC0_TX;
 772                 break;
 773         case 1:
 774                 hw->irq = AU1550_PSC1_INT;
 775                 hw->regs = (volatile psc_spi_t *)PSC1_BASE_ADDR;
 776                 hw->dma_rx_id = DSCR_CMD0_PSC1_RX;
 777                 hw->dma_tx_id = DSCR_CMD0_PSC1_TX;
 778                 break;
 779         case 2:
 780                 hw->irq = AU1550_PSC2_INT;
 781                 hw->regs = (volatile psc_spi_t *)PSC2_BASE_ADDR;
 782                 hw->dma_rx_id = DSCR_CMD0_PSC2_RX;
 783                 hw->dma_tx_id = DSCR_CMD0_PSC2_TX;
 784                 break;
 785         case 3:
 786                 hw->irq = AU1550_PSC3_INT;
 787                 hw->regs = (volatile psc_spi_t *)PSC3_BASE_ADDR;
 788                 hw->dma_rx_id = DSCR_CMD0_PSC3_RX;
 789                 hw->dma_tx_id = DSCR_CMD0_PSC3_TX;
 790                 break;
 791         default:
 792                 dev_err(&pdev->dev, "Wrong bus_num of SPI\n");
 793                 err = -ENOENT;
 794                 goto err_no_pdata;
 795         }
 796
 797         if (request_mem_region((unsigned long)hw->regs, sizeof(psc_spi_t),
 798                         pdev->name) == NULL) {
 799                 dev_err(&pdev->dev, "Cannot reserve iomem region\n");
 800                 err = -ENXIO;
 801                 goto err_no_iores;
 802         }
 803
 804
 805         if (usedma) {
 806                 if (pdev->dev.dma_mask == NULL)
 807                         dev_warn(&pdev->dev, "no dma mask\n");
 808                 else
 809                         hw->usedma = 1;
 810         }
 811
 812         if (hw->usedma) {
 813                 /*
 814                  * create memory device with 8 bits dev_devwidth
 815                  * needed for proper byte ordering to spi fifo
 816                  */
 817                 int memid = au1xxx_ddma_add_device(&au1550_spi_mem_dbdev);
 818                 if (!memid) {
 819                         dev_err(&pdev->dev,
 820                                 "Cannot create dma 8 bit mem device\n");
 821                         err = -ENXIO;
 822                         goto err_dma_add_dev;
 823                 }
 824
 825                 hw->dma_tx_ch = au1xxx_dbdma_chan_alloc(memid,
 826                         hw->dma_tx_id, NULL, (void *)hw);
 827                 if (hw->dma_tx_ch == 0) {
 828                         dev_err(&pdev->dev,
 829                                 "Cannot allocate tx dma channel\n");
 830                         err = -ENXIO;
 831                         goto err_no_txdma;
 832                 }
 833                 au1xxx_dbdma_set_devwidth(hw->dma_tx_ch, 8);
 834                 if (au1xxx_dbdma_ring_alloc(hw->dma_tx_ch,
 835                         AU1550_SPI_DBDMA_DESCRIPTORS) == 0) {
 836                         dev_err(&pdev->dev,
 837                                 "Cannot allocate tx dma descriptors\n");
 838                         err = -ENXIO;
 839                         goto err_no_txdma_descr;
 840                 }
 841
 842
 843                 hw->dma_rx_ch = au1xxx_dbdma_chan_alloc(hw->dma_rx_id,
 844                         memid, NULL, (void *)hw);
 845                 if (hw->dma_rx_ch == 0) {
 846                         dev_err(&pdev->dev,
 847                                 "Cannot allocate rx dma channel\n");
 848                         err = -ENXIO;
 849                         goto err_no_rxdma;
 850                 }
 851                 au1xxx_dbdma_set_devwidth(hw->dma_rx_ch, 8);
 852                 if (au1xxx_dbdma_ring_alloc(hw->dma_rx_ch,
 853                         AU1550_SPI_DBDMA_DESCRIPTORS) == 0) {
 854                         dev_err(&pdev->dev,
 855                                 "Cannot allocate rx dma descriptors\n");
 856                         err = -ENXIO;
 857                         goto err_no_rxdma_descr;
 858                 }
 859
 860                 err = au1550_spi_dma_rxtmp_alloc(hw,
 861                         AU1550_SPI_DMA_RXTMP_MINSIZE);
 862                 if (err < 0) {
 863                         dev_err(&pdev->dev,
 864                                 "Cannot allocate initial rx dma tmp buffer\n");
 865                         goto err_dma_rxtmp_alloc;
 866                 }
 867         }
 868
 869         au1550_spi_bits_handlers_set(hw, 8);
 870
 871         err = request_irq(hw->irq, au1550_spi_irq, 0, pdev->name, hw);
 872         if (err) {
 873                 dev_err(&pdev->dev, "Cannot claim IRQ\n");
 874                 goto err_no_irq;
 875         }
 876
 877         master->bus_num = hw->pdata->bus_num;
 878         master->num_chipselect = hw->pdata->num_chipselect;
 879
 880         /*
 881          *  precompute valid range for spi freq - from au1550 datasheet:
 882          *    psc_tempclk = psc_mainclk / (2 << DIV)
 883          *    spiclk = psc_tempclk / (2 * (BRG + 1))
 884          *    BRG valid range is 4..63
 885          *    DIV valid range is 0..3
 886          *  round the min and max frequencies to values that would still
 887          *  produce valid brg and div
 888          */
 889         {
 890                 int min_div = (2 << 0) * (2 * (4 + 1));
 891                 int max_div = (2 << 3) * (2 * (63 + 1));
 892                 hw->freq_max = hw->pdata->mainclk_hz / min_div;
 893                 hw->freq_min = hw->pdata->mainclk_hz / (max_div + 1) + 1;
 894         }
 895
 896         au1550_spi_setup_psc_as_spi(hw);
 897
 898         err = spi_bitbang_start(&hw->bitbang);
 899         if (err) {
 900                 dev_err(&pdev->dev, "Failed to register SPI master\n");
 901                 goto err_register;
 902         }
 903
 904         dev_info(&pdev->dev,
 905                 "spi master registered: bus_num=%d num_chipselect=%d\n",
 906                 master->bus_num, master->num_chipselect);
 907
 908         return 0;
 909
 910 err_register:
 911         free_irq(hw->irq, hw);
 912
 913 err_no_irq:
 914         au1550_spi_dma_rxtmp_free(hw);
 915
 916 err_dma_rxtmp_alloc:
 917 err_no_rxdma_descr:
 918         if (hw->usedma)
 919                 au1xxx_dbdma_chan_free(hw->dma_rx_ch);
 920
 921 err_no_rxdma:
 922 err_no_txdma_descr:
 923         if (hw->usedma)
 924                 au1xxx_dbdma_chan_free(hw->dma_tx_ch);
 925
 926 err_no_txdma:
 927 err_dma_add_dev:
 928         release_mem_region((unsigned long)hw->regs, sizeof(psc_spi_t));
 929
 930 err_no_iores:
 931 err_no_pdata:
 932         spi_master_put(hw->master);
 933
 934 err_nomem:
 935         return err;
 936 }
 937
 938 static int __exit au1550_spi_remove(struct platform_device *pdev)
 939 {
 940         struct au1550_spi *hw = platform_get_drvdata(pdev);
 941
 942         dev_info(&pdev->dev, "spi master remove: bus_num=%d\n",
 943                 hw->master->bus_num);
 944
 945         spi_bitbang_stop(&hw->bitbang);
 946         free_irq(hw->irq, hw);
 947         release_mem_region((unsigned long)hw->regs, sizeof(psc_spi_t));
 948
 949         if (hw->usedma) {
 950                 au1550_spi_dma_rxtmp_free(hw);
 951                 au1xxx_dbdma_chan_free(hw->dma_rx_ch);
 952                 au1xxx_dbdma_chan_free(hw->dma_tx_ch);
 953         }
 954
 955         platform_set_drvdata(pdev, NULL);
 956
 957         spi_master_put(hw->master);
 958         return 0;
 959 }
 960
 961 /* work with hotplug and coldplug */
 962 MODULE_ALIAS("platform:au1550-spi");
 963
 964 static struct platform_driver au1550_spi_drv = {
 965         .remove = __exit_p(au1550_spi_remove),
 966         .driver = {
 967                 .name = "au1550-spi",
 968                 .owner = THIS_MODULE,
 969         },
 970 };
 971
 972 static int __init au1550_spi_init(void)
 973 {
 974         return platform_driver_probe(&au1550_spi_drv, au1550_spi_probe);
 975 }
 976 module_init(au1550_spi_init);
 977
 978 static void __exit au1550_spi_exit(void)
 979 {
 980         platform_driver_unregister(&au1550_spi_drv);
 981 }
 982 module_exit(au1550_spi_exit);
 983
 984 MODULE_DESCRIPTION("Au1550 PSC SPI Driver");
 985 MODULE_AUTHOR("Jan Nikitenko <jan.nikitenko@gmail.com>");
 986 MODULE_LICENSE("GPL");