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