drivers/spi/spi-mpc52xx.c

   1 /*
   2  * MPC52xx SPI bus driver.
   3  *
   4  * Copyright (C) 2008 Secret Lab Technologies Ltd.
   5  *
   6  * This file is released under the GPLv2
   7  *
   8  * This is the driver for the MPC5200's dedicated SPI controller.
   9  *
  10  * Note: this driver does not support the MPC5200 PSC in SPI mode.  For
  11  * that driver see drivers/spi/mpc52xx_psc_spi.c
  12  */
  13
  14 #include <linux/module.h>
  15 #include <linux/errno.h>
  16 #include <linux/of_platform.h>
  17 #include <linux/interrupt.h>
  18 #include <linux/delay.h>
  19 #include <linux/spi/spi.h>
  20 #include <linux/io.h>
  21 #include <linux/of_gpio.h>
  22 #include <linux/slab.h>
  23 #include <asm/time.h>
  24 #include <asm/mpc52xx.h>
  25
  26 MODULE_AUTHOR("Grant Likely <grant.likely@secretlab.ca>");
  27 MODULE_DESCRIPTION("MPC52xx SPI (non-PSC) Driver");
  28 MODULE_LICENSE("GPL");
  29
  30 /* Register offsets */
  31 #define SPI_CTRL1       0x00
  32 #define SPI_CTRL1_SPIE          (1 << 7)
  33 #define SPI_CTRL1_SPE           (1 << 6)
  34 #define SPI_CTRL1_MSTR          (1 << 4)
  35 #define SPI_CTRL1_CPOL          (1 << 3)
  36 #define SPI_CTRL1_CPHA          (1 << 2)
  37 #define SPI_CTRL1_SSOE          (1 << 1)
  38 #define SPI_CTRL1_LSBFE         (1 << 0)
  39
  40 #define SPI_CTRL2       0x01
  41 #define SPI_BRR         0x04
  42
  43 #define SPI_STATUS      0x05
  44 #define SPI_STATUS_SPIF         (1 << 7)
  45 #define SPI_STATUS_WCOL         (1 << 6)
  46 #define SPI_STATUS_MODF         (1 << 4)
  47
  48 #define SPI_DATA        0x09
  49 #define SPI_PORTDATA    0x0d
  50 #define SPI_DATADIR     0x10
  51
  52 /* FSM state return values */
  53 #define FSM_STOP        0       /* Nothing more for the state machine to */
  54                                 /* do.  If something interesting happens */
  55                                 /* then an IRQ will be received */
  56 #define FSM_POLL        1       /* need to poll for completion, an IRQ is */
  57                                 /* not expected */
  58 #define FSM_CONTINUE    2       /* Keep iterating the state machine */
  59
  60 /* Driver internal data */
  61 struct mpc52xx_spi {
  62         struct spi_master *master;
  63         void __iomem *regs;
  64         int irq0;       /* MODF irq */
  65         int irq1;       /* SPIF irq */
  66         unsigned int ipb_freq;
  67
  68         /* Statistics; not used now, but will be reintroduced for debugfs */
  69         int msg_count;
  70         int wcol_count;
  71         int wcol_ticks;
  72         u32 wcol_tx_timestamp;
  73         int modf_count;
  74         int byte_count;
  75
  76         struct list_head queue;         /* queue of pending messages */
  77         spinlock_t lock;
  78         struct work_struct work;
  79
  80         /* Details of current transfer (length, and buffer pointers) */
  81         struct spi_message *message;    /* current message */
  82         struct spi_transfer *transfer;  /* current transfer */
  83         int (*state)(int irq, struct mpc52xx_spi *ms, u8 status, u8 data);
  84         int len;
  85         int timestamp;
  86         u8 *rx_buf;
  87         const u8 *tx_buf;
  88         int cs_change;
  89         int gpio_cs_count;
  90         unsigned int *gpio_cs;
  91 };
  92
  93 /*
  94  * CS control function
  95  */
  96 static void mpc52xx_spi_chipsel(struct mpc52xx_spi *ms, int value)
  97 {
  98         int cs;
  99
 100         if (ms->gpio_cs_count > 0) {
 101                 cs = ms->message->spi->chip_select;
 102                 gpio_set_value(ms->gpio_cs[cs], value ? 0 : 1);
 103         } else
 104                 out_8(ms->regs + SPI_PORTDATA, value ? 0 : 0x08);
 105 }
 106
 107 /*
 108  * Start a new transfer.  This is called both by the idle state
 109  * for the first transfer in a message, and by the wait state when the
 110  * previous transfer in a message is complete.
 111  */
 112 static void mpc52xx_spi_start_transfer(struct mpc52xx_spi *ms)
 113 {
 114         ms->rx_buf = ms->transfer->rx_buf;
 115         ms->tx_buf = ms->transfer->tx_buf;
 116         ms->len = ms->transfer->len;
 117
 118         /* Activate the chip select */
 119         if (ms->cs_change)
 120                 mpc52xx_spi_chipsel(ms, 1);
 121         ms->cs_change = ms->transfer->cs_change;
 122
 123         /* Write out the first byte */
 124         ms->wcol_tx_timestamp = get_tbl();
 125         if (ms->tx_buf)
 126                 out_8(ms->regs + SPI_DATA, *ms->tx_buf++);
 127         else
 128                 out_8(ms->regs + SPI_DATA, 0);
 129 }
 130
 131 /* Forward declaration of state handlers */
 132 static int mpc52xx_spi_fsmstate_transfer(int irq, struct mpc52xx_spi *ms,
 133                                          u8 status, u8 data);
 134 static int mpc52xx_spi_fsmstate_wait(int irq, struct mpc52xx_spi *ms,
 135                                      u8 status, u8 data);
 136
 137 /*
 138  * IDLE state
 139  *
 140  * No transfers are in progress; if another transfer is pending then retrieve
 141  * it and kick it off.  Otherwise, stop processing the state machine
 142  */
 143 static int
 144 mpc52xx_spi_fsmstate_idle(int irq, struct mpc52xx_spi *ms, u8 status, u8 data)
 145 {
 146         struct spi_device *spi;
 147         int spr, sppr;
 148         u8 ctrl1;
 149
 150         if (status && (irq != NO_IRQ))
 151                 dev_err(&ms->master->dev, "spurious irq, status=0x%.2x\n",
 152                         status);
 153
 154         /* Check if there is another transfer waiting. */
 155         if (list_empty(&ms->queue))
 156                 return FSM_STOP;
 157
 158         /* get the head of the queue */
 159         ms->message = list_first_entry(&ms->queue, struct spi_message, queue);
 160         list_del_init(&ms->message->queue);
 161
 162         /* Setup the controller parameters */
 163         ctrl1 = SPI_CTRL1_SPIE | SPI_CTRL1_SPE | SPI_CTRL1_MSTR;
 164         spi = ms->message->spi;
 165         if (spi->mode & SPI_CPHA)
 166                 ctrl1 |= SPI_CTRL1_CPHA;
 167         if (spi->mode & SPI_CPOL)
 168                 ctrl1 |= SPI_CTRL1_CPOL;
 169         if (spi->mode & SPI_LSB_FIRST)
 170                 ctrl1 |= SPI_CTRL1_LSBFE;
 171         out_8(ms->regs + SPI_CTRL1, ctrl1);
 172
 173         /* Setup the controller speed */
 174         /* minimum divider is '2'.  Also, add '1' to force rounding the
 175          * divider up. */
 176         sppr = ((ms->ipb_freq / ms->message->spi->max_speed_hz) + 1) >> 1;
 177         spr = 0;
 178         if (sppr < 1)
 179                 sppr = 1;
 180         while (((sppr - 1) & ~0x7) != 0) {
 181                 sppr = (sppr + 1) >> 1; /* add '1' to force rounding up */
 182                 spr++;
 183         }
 184         sppr--;         /* sppr quantity in register is offset by 1 */
 185         if (spr > 7) {
 186                 /* Don't overrun limits of SPI baudrate register */
 187                 spr = 7;
 188                 sppr = 7;
 189         }
 190         out_8(ms->regs + SPI_BRR, sppr << 4 | spr); /* Set speed */
 191
 192         ms->cs_change = 1;
 193         ms->transfer = container_of(ms->message->transfers.next,
 194                                     struct spi_transfer, transfer_list);
 195
 196         mpc52xx_spi_start_transfer(ms);
 197         ms->state = mpc52xx_spi_fsmstate_transfer;
 198
 199         return FSM_CONTINUE;
 200 }
 201
 202 /*
 203  * TRANSFER state
 204  *
 205  * In the middle of a transfer.  If the SPI core has completed processing
 206  * a byte, then read out the received data and write out the next byte
 207  * (unless this transfer is finished; in which case go on to the wait
 208  * state)
 209  */
 210 static int mpc52xx_spi_fsmstate_transfer(int irq, struct mpc52xx_spi *ms,
 211                                          u8 status, u8 data)
 212 {
 213         if (!status)
 214                 return ms->irq0 ? FSM_STOP : FSM_POLL;
 215
 216         if (status & SPI_STATUS_WCOL) {
 217                 /* The SPI controller is stoopid.  At slower speeds, it may
 218                  * raise the SPIF flag before the state machine is actually
 219                  * finished, which causes a collision (internal to the state
 220                  * machine only).  The manual recommends inserting a delay
 221                  * between receiving the interrupt and sending the next byte,
 222                  * but it can also be worked around simply by retrying the
 223                  * transfer which is what we do here. */
 224                 ms->wcol_count++;
 225                 ms->wcol_ticks += get_tbl() - ms->wcol_tx_timestamp;
 226                 ms->wcol_tx_timestamp = get_tbl();
 227                 data = 0;
 228                 if (ms->tx_buf)
 229                         data = *(ms->tx_buf - 1);
 230                 out_8(ms->regs + SPI_DATA, data); /* try again */
 231                 return FSM_CONTINUE;
 232         } else if (status & SPI_STATUS_MODF) {
 233                 ms->modf_count++;
 234                 dev_err(&ms->master->dev, "mode fault\n");
 235                 mpc52xx_spi_chipsel(ms, 0);
 236                 ms->message->status = -EIO;
 237                 ms->message->complete(ms->message->context);
 238                 ms->state = mpc52xx_spi_fsmstate_idle;
 239                 return FSM_CONTINUE;
 240         }
 241
 242         /* Read data out of the spi device */
 243         ms->byte_count++;
 244         if (ms->rx_buf)
 245                 *ms->rx_buf++ = data;
 246
 247         /* Is the transfer complete? */
 248         ms->len--;
 249         if (ms->len == 0) {
 250                 ms->timestamp = get_tbl();
 251                 ms->timestamp += ms->transfer->delay_usecs * tb_ticks_per_usec;
 252                 ms->state = mpc52xx_spi_fsmstate_wait;
 253                 return FSM_CONTINUE;
 254         }
 255
 256         /* Write out the next byte */
 257         ms->wcol_tx_timestamp = get_tbl();
 258         if (ms->tx_buf)
 259                 out_8(ms->regs + SPI_DATA, *ms->tx_buf++);
 260         else
 261                 out_8(ms->regs + SPI_DATA, 0);
 262
 263         return FSM_CONTINUE;
 264 }
 265
 266 /*
 267  * WAIT state
 268  *
 269  * A transfer has completed; need to wait for the delay period to complete
 270  * before starting the next transfer
 271  */
 272 static int
 273 mpc52xx_spi_fsmstate_wait(int irq, struct mpc52xx_spi *ms, u8 status, u8 data)
 274 {
 275         if (status && irq)
 276                 dev_err(&ms->master->dev, "spurious irq, status=0x%.2x\n",
 277                         status);
 278
 279         if (((int)get_tbl()) - ms->timestamp < 0)
 280                 return FSM_POLL;
 281
 282         ms->message->actual_length += ms->transfer->len;
 283
 284         /* Check if there is another transfer in this message.  If there
 285          * aren't then deactivate CS, notify sender, and drop back to idle
 286          * to start the next message. */
 287         if (ms->transfer->transfer_list.next == &ms->message->transfers) {
 288                 ms->msg_count++;
 289                 mpc52xx_spi_chipsel(ms, 0);
 290                 ms->message->status = 0;
 291                 ms->message->complete(ms->message->context);
 292                 ms->state = mpc52xx_spi_fsmstate_idle;
 293                 return FSM_CONTINUE;
 294         }
 295
 296         /* There is another transfer; kick it off */
 297
 298         if (ms->cs_change)
 299                 mpc52xx_spi_chipsel(ms, 0);
 300
 301         ms->transfer = container_of(ms->transfer->transfer_list.next,
 302                                     struct spi_transfer, transfer_list);
 303         mpc52xx_spi_start_transfer(ms);
 304         ms->state = mpc52xx_spi_fsmstate_transfer;
 305         return FSM_CONTINUE;
 306 }
 307
 308 /**
 309  * mpc52xx_spi_fsm_process - Finite State Machine iteration function
 310  * @irq: irq number that triggered the FSM or 0 for polling
 311  * @ms: pointer to mpc52xx_spi driver data
 312  */
 313 static void mpc52xx_spi_fsm_process(int irq, struct mpc52xx_spi *ms)
 314 {
 315         int rc = FSM_CONTINUE;
 316         u8 status, data;
 317
 318         while (rc == FSM_CONTINUE) {
 319                 /* Interrupt cleared by read of STATUS followed by
 320                  * read of DATA registers */
 321                 status = in_8(ms->regs + SPI_STATUS);
 322                 data = in_8(ms->regs + SPI_DATA);
 323                 rc = ms->state(irq, ms, status, data);
 324         }
 325
 326         if (rc == FSM_POLL)
 327                 schedule_work(&ms->work);
 328 }
 329
 330 /**
 331  * mpc52xx_spi_irq - IRQ handler
 332  */
 333 static irqreturn_t mpc52xx_spi_irq(int irq, void *_ms)
 334 {
 335         struct mpc52xx_spi *ms = _ms;
 336         spin_lock(&ms->lock);
 337         mpc52xx_spi_fsm_process(irq, ms);
 338         spin_unlock(&ms->lock);
 339         return IRQ_HANDLED;
 340 }
 341
 342 /**
 343  * mpc52xx_spi_wq - Workqueue function for polling the state machine
 344  */
 345 static void mpc52xx_spi_wq(struct work_struct *work)
 346 {
 347         struct mpc52xx_spi *ms = container_of(work, struct mpc52xx_spi, work);
 348         unsigned long flags;
 349
 350         spin_lock_irqsave(&ms->lock, flags);
 351         mpc52xx_spi_fsm_process(0, ms);
 352         spin_unlock_irqrestore(&ms->lock, flags);
 353 }
 354
 355 /*
 356  * spi_master ops
 357  */
 358
 359 static int mpc52xx_spi_transfer(struct spi_device *spi, struct spi_message *m)
 360 {
 361         struct mpc52xx_spi *ms = spi_master_get_devdata(spi->master);
 362         unsigned long flags;
 363
 364         m->actual_length = 0;
 365         m->status = -EINPROGRESS;
 366
 367         spin_lock_irqsave(&ms->lock, flags);
 368         list_add_tail(&m->queue, &ms->queue);
 369         spin_unlock_irqrestore(&ms->lock, flags);
 370         schedule_work(&ms->work);
 371
 372         return 0;
 373 }
 374
 375 /*
 376  * OF Platform Bus Binding
 377  */
 378 static int mpc52xx_spi_probe(struct platform_device *op)
 379 {
 380         struct spi_master *master;
 381         struct mpc52xx_spi *ms;
 382         void __iomem *regs;
 383         u8 ctrl1;
 384         int rc, i = 0;
 385         int gpio_cs;
 386
 387         /* MMIO registers */
 388         dev_dbg(&op->dev, "probing mpc5200 SPI device\n");
 389         regs = of_iomap(op->dev.of_node, 0);
 390         if (!regs)
 391                 return -ENODEV;
 392
 393         /* initialize the device */
 394         ctrl1 = SPI_CTRL1_SPIE | SPI_CTRL1_SPE | SPI_CTRL1_MSTR;
 395         out_8(regs + SPI_CTRL1, ctrl1);
 396         out_8(regs + SPI_CTRL2, 0x0);
 397         out_8(regs + SPI_DATADIR, 0xe); /* Set output pins */
 398         out_8(regs + SPI_PORTDATA, 0x8);        /* Deassert /SS signal */
 399
 400         /* Clear the status register and re-read it to check for a MODF
 401          * failure.  This driver cannot currently handle multiple masters
 402          * on the SPI bus.  This fault will also occur if the SPI signals
 403          * are not connected to any pins (port_config setting) */
 404         in_8(regs + SPI_STATUS);
 405         out_8(regs + SPI_CTRL1, ctrl1);
 406
 407         in_8(regs + SPI_DATA);
 408         if (in_8(regs + SPI_STATUS) & SPI_STATUS_MODF) {
 409                 dev_err(&op->dev, "mode fault; is port_config correct?\n");
 410                 rc = -EIO;
 411                 goto err_init;
 412         }
 413
 414         dev_dbg(&op->dev, "allocating spi_master struct\n");
 415         master = spi_alloc_master(&op->dev, sizeof *ms);
 416         if (!master) {
 417                 rc = -ENOMEM;
 418                 goto err_alloc;
 419         }
 420
 421         master->transfer = mpc52xx_spi_transfer;
 422         master->mode_bits = SPI_CPOL | SPI_CPHA | SPI_LSB_FIRST;
 423         master->bits_per_word_mask = SPI_BPW_MASK(8);
 424         master->dev.of_node = op->dev.of_node;
 425
 426         platform_set_drvdata(op, master);
 427
 428         ms = spi_master_get_devdata(master);
 429         ms->master = master;
 430         ms->regs = regs;
 431         ms->irq0 = irq_of_parse_and_map(op->dev.of_node, 0);
 432         ms->irq1 = irq_of_parse_and_map(op->dev.of_node, 1);
 433         ms->state = mpc52xx_spi_fsmstate_idle;
 434         ms->ipb_freq = mpc5xxx_get_bus_frequency(op->dev.of_node);
 435         ms->gpio_cs_count = of_gpio_count(op->dev.of_node);
 436         if (ms->gpio_cs_count > 0) {
 437                 master->num_chipselect = ms->gpio_cs_count;
 438                 ms->gpio_cs = kmalloc(ms->gpio_cs_count * sizeof(unsigned int),
 439                                 GFP_KERNEL);
 440                 if (!ms->gpio_cs) {
 441                         rc = -ENOMEM;
 442                         goto err_alloc_gpio;
 443                 }
 444
 445                 for (i = 0; i < ms->gpio_cs_count; i++) {
 446                         gpio_cs = of_get_gpio(op->dev.of_node, i);
 447                         if (gpio_cs < 0) {
 448                                 dev_err(&op->dev,
 449                                         "could not parse the gpio field "
 450                                         "in oftree\n");
 451                                 rc = -ENODEV;
 452                                 goto err_gpio;
 453                         }
 454
 455                         rc = gpio_request(gpio_cs, dev_name(&op->dev));
 456                         if (rc) {
 457                                 dev_err(&op->dev,
 458                                         "can't request spi cs gpio #%d "
 459                                         "on gpio line %d\n", i, gpio_cs);
 460                                 goto err_gpio;
 461                         }
 462
 463                         gpio_direction_output(gpio_cs, 1);
 464                         ms->gpio_cs[i] = gpio_cs;
 465                 }
 466         }
 467
 468         spin_lock_init(&ms->lock);
 469         INIT_LIST_HEAD(&ms->queue);
 470         INIT_WORK(&ms->work, mpc52xx_spi_wq);
 471
 472         /* Decide if interrupts can be used */
 473         if (ms->irq0 && ms->irq1) {
 474                 rc = request_irq(ms->irq0, mpc52xx_spi_irq, 0,
 475                                   "mpc5200-spi-modf", ms);
 476                 rc |= request_irq(ms->irq1, mpc52xx_spi_irq, 0,
 477                                   "mpc5200-spi-spif", ms);
 478                 if (rc) {
 479                         free_irq(ms->irq0, ms);
 480                         free_irq(ms->irq1, ms);
 481                         ms->irq0 = ms->irq1 = 0;
 482                 }
 483         } else {
 484                 /* operate in polled mode */
 485                 ms->irq0 = ms->irq1 = 0;
 486         }
 487
 488         if (!ms->irq0)
 489                 dev_info(&op->dev, "using polled mode\n");
 490
 491         dev_dbg(&op->dev, "registering spi_master struct\n");
 492         rc = spi_register_master(master);
 493         if (rc)
 494                 goto err_register;
 495
 496         dev_info(&ms->master->dev, "registered MPC5200 SPI bus\n");
 497
 498         return rc;
 499
 500  err_register:
 501         dev_err(&ms->master->dev, "initialization failed\n");
 502  err_gpio:
 503         while (i-- > 0)
 504                 gpio_free(ms->gpio_cs[i]);
 505
 506         kfree(ms->gpio_cs);
 507  err_alloc_gpio:
 508         spi_master_put(master);
 509  err_alloc:
 510  err_init:
 511         iounmap(regs);
 512         return rc;
 513 }
 514
 515 static int mpc52xx_spi_remove(struct platform_device *op)
 516 {
 517         struct spi_master *master = spi_master_get(platform_get_drvdata(op));
 518         struct mpc52xx_spi *ms = spi_master_get_devdata(master);
 519         int i;
 520
 521         free_irq(ms->irq0, ms);
 522         free_irq(ms->irq1, ms);
 523
 524         for (i = 0; i < ms->gpio_cs_count; i++)
 525                 gpio_free(ms->gpio_cs[i]);
 526
 527         kfree(ms->gpio_cs);
 528         spi_unregister_master(master);
 529         iounmap(ms->regs);
 530         spi_master_put(master);
 531
 532         return 0;
 533 }
 534
 535 static const struct of_device_id mpc52xx_spi_match[] = {
 536         { .compatible = "fsl,mpc5200-spi", },
 537         {}
 538 };
 539 MODULE_DEVICE_TABLE(of, mpc52xx_spi_match);
 540
 541 static struct platform_driver mpc52xx_spi_of_driver = {
 542         .driver = {
 543                 .name = "mpc52xx-spi",
 544                 .owner = THIS_MODULE,
 545                 .of_match_table = mpc52xx_spi_match,
 546         },
 547         .probe = mpc52xx_spi_probe,
 548         .remove = mpc52xx_spi_remove,
 549 };
 550 module_platform_driver(mpc52xx_spi_of_driver);