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

source code of linux/drivers/spi/spi-au1550.c