1/*
2 * Copyright (C) 2005 Stephen Street / StreetFire Sound Labs
3 *
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
8 *
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 * GNU General Public License for more details.
13 *
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
17 */
18
19#include <linux/init.h>
20#include <linux/module.h>
21#include <linux/device.h>
22#include <linux/ioport.h>
23#include <linux/errno.h>
24#include <linux/interrupt.h>
25#include <linux/platform_device.h>
26#include <linux/spi/pxa2xx_spi.h>
27#include <linux/dma-mapping.h>
28#include <linux/spi/spi.h>
29#include <linux/workqueue.h>
30#include <linux/delay.h>
31#include <linux/gpio.h>
32#include <linux/slab.h>
33
34#include <asm/io.h>
35#include <asm/irq.h>
36#include <asm/delay.h>
37
38
39MODULE_AUTHOR("Stephen Street");
40MODULE_DESCRIPTION("PXA2xx SSP SPI Controller");
41MODULE_LICENSE("GPL");
42MODULE_ALIAS("platform:pxa2xx-spi");
43
44#define MAX_BUSES 3
45
46#define TIMOUT_DFLT		1000
47
48#define DMA_INT_MASK		(DCSR_ENDINTR | DCSR_STARTINTR | DCSR_BUSERR)
49#define RESET_DMA_CHANNEL	(DCSR_NODESC | DMA_INT_MASK)
50#define IS_DMA_ALIGNED(x)	((((u32)(x)) & 0x07) == 0)
51#define MAX_DMA_LEN		8191
52#define DMA_ALIGNMENT		8
53
54/*
55 * for testing SSCR1 changes that require SSP restart, basically
56 * everything except the service and interrupt enables, the pxa270 developer
57 * manual says only SSCR1_SCFR, SSCR1_SPH, SSCR1_SPO need to be in this
58 * list, but the PXA255 dev man says all bits without really meaning the
59 * service and interrupt enables
60 */
61#define SSCR1_CHANGE_MASK (SSCR1_TTELP | SSCR1_TTE | SSCR1_SCFR \
62				| SSCR1_ECRA | SSCR1_ECRB | SSCR1_SCLKDIR \
63				| SSCR1_SFRMDIR | SSCR1_RWOT | SSCR1_TRAIL \
64				| SSCR1_IFS | SSCR1_STRF | SSCR1_EFWR \
65				| SSCR1_RFT | SSCR1_TFT | SSCR1_MWDS \
66				| SSCR1_SPH | SSCR1_SPO | SSCR1_LBM)
67
68#define DEFINE_SSP_REG(reg, off) \
69static inline u32 read_##reg(void const __iomem *p) \
70{ return __raw_readl(p + (off)); } \
71\
72static inline void write_##reg(u32 v, void __iomem *p) \
73{ __raw_writel(v, p + (off)); }
74
75DEFINE_SSP_REG(SSCR0, 0x00)
76DEFINE_SSP_REG(SSCR1, 0x04)
77DEFINE_SSP_REG(SSSR, 0x08)
78DEFINE_SSP_REG(SSITR, 0x0c)
79DEFINE_SSP_REG(SSDR, 0x10)
80DEFINE_SSP_REG(SSTO, 0x28)
81DEFINE_SSP_REG(SSPSP, 0x2c)
82
83#define START_STATE ((void*)0)
84#define RUNNING_STATE ((void*)1)
85#define DONE_STATE ((void*)2)
86#define ERROR_STATE ((void*)-1)
87
88#define QUEUE_RUNNING 0
89#define QUEUE_STOPPED 1
90
91struct driver_data {
92	/* Driver model hookup */
93	struct platform_device *pdev;
94
95	/* SSP Info */
96	struct ssp_device *ssp;
97
98	/* SPI framework hookup */
99	enum pxa_ssp_type ssp_type;
100	struct spi_master *master;
101
102	/* PXA hookup */
103	struct pxa2xx_spi_master *master_info;
104
105	/* DMA setup stuff */
106	int rx_channel;
107	int tx_channel;
108	u32 *null_dma_buf;
109
110	/* SSP register addresses */
111	void __iomem *ioaddr;
112	u32 ssdr_physical;
113
114	/* SSP masks*/
115	u32 dma_cr1;
116	u32 int_cr1;
117	u32 clear_sr;
118	u32 mask_sr;
119
120	/* Driver message queue */
121	struct workqueue_struct	*workqueue;
122	struct work_struct pump_messages;
123	spinlock_t lock;
124	struct list_head queue;
125	int busy;
126	int run;
127
128	/* Message Transfer pump */
129	struct tasklet_struct pump_transfers;
130
131	/* Current message transfer state info */
132	struct spi_message* cur_msg;
133	struct spi_transfer* cur_transfer;
134	struct chip_data *cur_chip;
135	size_t len;
136	void *tx;
137	void *tx_end;
138	void *rx;
139	void *rx_end;
140	int dma_mapped;
141	dma_addr_t rx_dma;
142	dma_addr_t tx_dma;
143	size_t rx_map_len;
144	size_t tx_map_len;
145	u8 n_bytes;
146	u32 dma_width;
147	int (*write)(struct driver_data *drv_data);
148	int (*read)(struct driver_data *drv_data);
149	irqreturn_t (*transfer_handler)(struct driver_data *drv_data);
150	void (*cs_control)(u32 command);
151};
152
153struct chip_data {
154	u32 cr0;
155	u32 cr1;
156	u32 psp;
157	u32 timeout;
158	u8 n_bytes;
159	u32 dma_width;
160	u32 dma_burst_size;
161	u32 threshold;
162	u32 dma_threshold;
163	u8 enable_dma;
164	u8 bits_per_word;
165	u32 speed_hz;
166	union {
167		int gpio_cs;
168		unsigned int frm;
169	};
170	int gpio_cs_inverted;
171	int (*write)(struct driver_data *drv_data);
172	int (*read)(struct driver_data *drv_data);
173	void (*cs_control)(u32 command);
174};
175
176static void pump_messages(struct work_struct *work);
177
178static void cs_assert(struct driver_data *drv_data)
179{
180	struct chip_data *chip = drv_data->cur_chip;
181
182	if (drv_data->ssp_type == CE4100_SSP) {
183		write_SSSR(drv_data->cur_chip->frm, drv_data->ioaddr);
184		return;
185	}
186
187	if (chip->cs_control) {
188		chip->cs_control(PXA2XX_CS_ASSERT);
189		return;
190	}
191
192	if (gpio_is_valid(chip->gpio_cs))
193		gpio_set_value(chip->gpio_cs, chip->gpio_cs_inverted);
194}
195
196static void cs_deassert(struct driver_data *drv_data)
197{
198	struct chip_data *chip = drv_data->cur_chip;
199
200	if (drv_data->ssp_type == CE4100_SSP)
201		return;
202
203	if (chip->cs_control) {
204		chip->cs_control(PXA2XX_CS_DEASSERT);
205		return;
206	}
207
208	if (gpio_is_valid(chip->gpio_cs))
209		gpio_set_value(chip->gpio_cs, !chip->gpio_cs_inverted);
210}
211
212static void write_SSSR_CS(struct driver_data *drv_data, u32 val)
213{
214	void __iomem *reg = drv_data->ioaddr;
215
216	if (drv_data->ssp_type == CE4100_SSP)
217		val |= read_SSSR(reg) & SSSR_ALT_FRM_MASK;
218
219	write_SSSR(val, reg);
220}
221
222static int pxa25x_ssp_comp(struct driver_data *drv_data)
223{
224	if (drv_data->ssp_type == PXA25x_SSP)
225		return 1;
226	if (drv_data->ssp_type == CE4100_SSP)
227		return 1;
228	return 0;
229}
230
231static int flush(struct driver_data *drv_data)
232{
233	unsigned long limit = loops_per_jiffy << 1;
234
235	void __iomem *reg = drv_data->ioaddr;
236
237	do {
238		while (read_SSSR(reg) & SSSR_RNE) {
239			read_SSDR(reg);
240		}
241	} while ((read_SSSR(reg) & SSSR_BSY) && --limit);
242	write_SSSR_CS(drv_data, SSSR_ROR);
243
244	return limit;
245}
246
247static int null_writer(struct driver_data *drv_data)
248{
249	void __iomem *reg = drv_data->ioaddr;
250	u8 n_bytes = drv_data->n_bytes;
251
252	if (((read_SSSR(reg) & SSSR_TFL_MASK) == SSSR_TFL_MASK)
253		|| (drv_data->tx == drv_data->tx_end))
254		return 0;
255
256	write_SSDR(0, reg);
257	drv_data->tx += n_bytes;
258
259	return 1;
260}
261
262static int null_reader(struct driver_data *drv_data)
263{
264	void __iomem *reg = drv_data->ioaddr;
265	u8 n_bytes = drv_data->n_bytes;
266
267	while ((read_SSSR(reg) & SSSR_RNE)
268		&& (drv_data->rx < drv_data->rx_end)) {
269		read_SSDR(reg);
270		drv_data->rx += n_bytes;
271	}
272
273	return drv_data->rx == drv_data->rx_end;
274}
275
276static int u8_writer(struct driver_data *drv_data)
277{
278	void __iomem *reg = drv_data->ioaddr;
279
280	if (((read_SSSR(reg) & SSSR_TFL_MASK) == SSSR_TFL_MASK)
281		|| (drv_data->tx == drv_data->tx_end))
282		return 0;
283
284	write_SSDR(*(u8 *)(drv_data->tx), reg);
285	++drv_data->tx;
286
287	return 1;
288}
289
290static int u8_reader(struct driver_data *drv_data)
291{
292	void __iomem *reg = drv_data->ioaddr;
293
294	while ((read_SSSR(reg) & SSSR_RNE)
295		&& (drv_data->rx < drv_data->rx_end)) {
296		*(u8 *)(drv_data->rx) = read_SSDR(reg);
297		++drv_data->rx;
298	}
299
300	return drv_data->rx == drv_data->rx_end;
301}
302
303static int u16_writer(struct driver_data *drv_data)
304{
305	void __iomem *reg = drv_data->ioaddr;
306
307	if (((read_SSSR(reg) & SSSR_TFL_MASK) == SSSR_TFL_MASK)
308		|| (drv_data->tx == drv_data->tx_end))
309		return 0;
310
311	write_SSDR(*(u16 *)(drv_data->tx), reg);
312	drv_data->tx += 2;
313
314	return 1;
315}
316
317static int u16_reader(struct driver_data *drv_data)
318{
319	void __iomem *reg = drv_data->ioaddr;
320
321	while ((read_SSSR(reg) & SSSR_RNE)
322		&& (drv_data->rx < drv_data->rx_end)) {
323		*(u16 *)(drv_data->rx) = read_SSDR(reg);
324		drv_data->rx += 2;
325	}
326
327	return drv_data->rx == drv_data->rx_end;
328}
329
330static int u32_writer(struct driver_data *drv_data)
331{
332	void __iomem *reg = drv_data->ioaddr;
333
334	if (((read_SSSR(reg) & SSSR_TFL_MASK) == SSSR_TFL_MASK)
335		|| (drv_data->tx == drv_data->tx_end))
336		return 0;
337
338	write_SSDR(*(u32 *)(drv_data->tx), reg);
339	drv_data->tx += 4;
340
341	return 1;
342}
343
344static int u32_reader(struct driver_data *drv_data)
345{
346	void __iomem *reg = drv_data->ioaddr;
347
348	while ((read_SSSR(reg) & SSSR_RNE)
349		&& (drv_data->rx < drv_data->rx_end)) {
350		*(u32 *)(drv_data->rx) = read_SSDR(reg);
351		drv_data->rx += 4;
352	}
353
354	return drv_data->rx == drv_data->rx_end;
355}
356
357static void *next_transfer(struct driver_data *drv_data)
358{
359	struct spi_message *msg = drv_data->cur_msg;
360	struct spi_transfer *trans = drv_data->cur_transfer;
361
362	/* Move to next transfer */
363	if (trans->transfer_list.next != &msg->transfers) {
364		drv_data->cur_transfer =
365			list_entry(trans->transfer_list.next,
366					struct spi_transfer,
367					transfer_list);
368		return RUNNING_STATE;
369	} else
370		return DONE_STATE;
371}
372
373static int map_dma_buffers(struct driver_data *drv_data)
374{
375	struct spi_message *msg = drv_data->cur_msg;
376	struct device *dev = &msg->spi->dev;
377
378	if (!drv_data->cur_chip->enable_dma)
379		return 0;
380
381	if (msg->is_dma_mapped)
382		return  drv_data->rx_dma && drv_data->tx_dma;
383
384	if (!IS_DMA_ALIGNED(drv_data->rx) || !IS_DMA_ALIGNED(drv_data->tx))
385		return 0;
386
387	/* Modify setup if rx buffer is null */
388	if (drv_data->rx == NULL) {
389		*drv_data->null_dma_buf = 0;
390		drv_data->rx = drv_data->null_dma_buf;
391		drv_data->rx_map_len = 4;
392	} else
393		drv_data->rx_map_len = drv_data->len;
394
395
396	/* Modify setup if tx buffer is null */
397	if (drv_data->tx == NULL) {
398		*drv_data->null_dma_buf = 0;
399		drv_data->tx = drv_data->null_dma_buf;
400		drv_data->tx_map_len = 4;
401	} else
402		drv_data->tx_map_len = drv_data->len;
403
404	/* Stream map the tx buffer. Always do DMA_TO_DEVICE first
405	 * so we flush the cache *before* invalidating it, in case
406	 * the tx and rx buffers overlap.
407	 */
408	drv_data->tx_dma = dma_map_single(dev, drv_data->tx,
409					drv_data->tx_map_len, DMA_TO_DEVICE);
410	if (dma_mapping_error(dev, drv_data->tx_dma))
411		return 0;
412
413	/* Stream map the rx buffer */
414	drv_data->rx_dma = dma_map_single(dev, drv_data->rx,
415					drv_data->rx_map_len, DMA_FROM_DEVICE);
416	if (dma_mapping_error(dev, drv_data->rx_dma)) {
417		dma_unmap_single(dev, drv_data->tx_dma,
418					drv_data->tx_map_len, DMA_TO_DEVICE);
419		return 0;
420	}
421
422	return 1;
423}
424
425static void unmap_dma_buffers(struct driver_data *drv_data)
426{
427	struct device *dev;
428
429	if (!drv_data->dma_mapped)
430		return;
431
432	if (!drv_data->cur_msg->is_dma_mapped) {
433		dev = &drv_data->cur_msg->spi->dev;
434		dma_unmap_single(dev, drv_data->rx_dma,
435					drv_data->rx_map_len, DMA_FROM_DEVICE);
436		dma_unmap_single(dev, drv_data->tx_dma,
437					drv_data->tx_map_len, DMA_TO_DEVICE);
438	}
439
440	drv_data->dma_mapped = 0;
441}
442
443/* caller already set message->status; dma and pio irqs are blocked */
444static void giveback(struct driver_data *drv_data)
445{
446	struct spi_transfer* last_transfer;
447	unsigned long flags;
448	struct spi_message *msg;
449
450	spin_lock_irqsave(&drv_data->lock, flags);
451	msg = drv_data->cur_msg;
452	drv_data->cur_msg = NULL;
453	drv_data->cur_transfer = NULL;
454	queue_work(drv_data->workqueue, &drv_data->pump_messages);
455	spin_unlock_irqrestore(&drv_data->lock, flags);
456
457	last_transfer = list_entry(msg->transfers.prev,
458					struct spi_transfer,
459					transfer_list);
460
461	/* Delay if requested before any change in chip select */
462	if (last_transfer->delay_usecs)
463		udelay(last_transfer->delay_usecs);
464
465	/* Drop chip select UNLESS cs_change is true or we are returning
466	 * a message with an error, or next message is for another chip
467	 */
468	if (!last_transfer->cs_change)
469		cs_deassert(drv_data);
470	else {
471		struct spi_message *next_msg;
472
473		/* Holding of cs was hinted, but we need to make sure
474		 * the next message is for the same chip.  Don't waste
475		 * time with the following tests unless this was hinted.
476		 *
477		 * We cannot postpone this until pump_messages, because
478		 * after calling msg->complete (below) the driver that
479		 * sent the current message could be unloaded, which
480		 * could invalidate the cs_control() callback...
481		 */
482
483		/* get a pointer to the next message, if any */
484		spin_lock_irqsave(&drv_data->lock, flags);
485		if (list_empty(&drv_data->queue))
486			next_msg = NULL;
487		else
488			next_msg = list_entry(drv_data->queue.next,
489					struct spi_message, queue);
490		spin_unlock_irqrestore(&drv_data->lock, flags);
491
492		/* see if the next and current messages point
493		 * to the same chip
494		 */
495		if (next_msg && next_msg->spi != msg->spi)
496			next_msg = NULL;
497		if (!next_msg || msg->state == ERROR_STATE)
498			cs_deassert(drv_data);
499	}
500
501	msg->state = NULL;
502	if (msg->complete)
503		msg->complete(msg->context);
504
505	drv_data->cur_chip = NULL;
506}
507
508static int wait_ssp_rx_stall(void const __iomem *ioaddr)
509{
510	unsigned long limit = loops_per_jiffy << 1;
511
512	while ((read_SSSR(ioaddr) & SSSR_BSY) && --limit)
513		cpu_relax();
514
515	return limit;
516}
517
518static int wait_dma_channel_stop(int channel)
519{
520	unsigned long limit = loops_per_jiffy << 1;
521
522	while (!(DCSR(channel) & DCSR_STOPSTATE) && --limit)
523		cpu_relax();
524
525	return limit;
526}
527
528static void dma_error_stop(struct driver_data *drv_data, const char *msg)
529{
530	void __iomem *reg = drv_data->ioaddr;
531
532	/* Stop and reset */
533	DCSR(drv_data->rx_channel) = RESET_DMA_CHANNEL;
534	DCSR(drv_data->tx_channel) = RESET_DMA_CHANNEL;
535	write_SSSR_CS(drv_data, drv_data->clear_sr);
536	write_SSCR1(read_SSCR1(reg) & ~drv_data->dma_cr1, reg);
537	if (!pxa25x_ssp_comp(drv_data))
538		write_SSTO(0, reg);
539	flush(drv_data);
540	write_SSCR0(read_SSCR0(reg) & ~SSCR0_SSE, reg);
541
542	unmap_dma_buffers(drv_data);
543
544	dev_err(&drv_data->pdev->dev, "%s\n", msg);
545
546	drv_data->cur_msg->state = ERROR_STATE;
547	tasklet_schedule(&drv_data->pump_transfers);
548}
549
550static void dma_transfer_complete(struct driver_data *drv_data)
551{
552	void __iomem *reg = drv_data->ioaddr;
553	struct spi_message *msg = drv_data->cur_msg;
554
555	/* Clear and disable interrupts on SSP and DMA channels*/
556	write_SSCR1(read_SSCR1(reg) & ~drv_data->dma_cr1, reg);
557	write_SSSR_CS(drv_data, drv_data->clear_sr);
558	DCSR(drv_data->tx_channel) = RESET_DMA_CHANNEL;
559	DCSR(drv_data->rx_channel) = RESET_DMA_CHANNEL;
560
561	if (wait_dma_channel_stop(drv_data->rx_channel) == 0)
562		dev_err(&drv_data->pdev->dev,
563			"dma_handler: dma rx channel stop failed\n");
564
565	if (wait_ssp_rx_stall(drv_data->ioaddr) == 0)
566		dev_err(&drv_data->pdev->dev,
567			"dma_transfer: ssp rx stall failed\n");
568
569	unmap_dma_buffers(drv_data);
570
571	/* update the buffer pointer for the amount completed in dma */
572	drv_data->rx += drv_data->len -
573			(DCMD(drv_data->rx_channel) & DCMD_LENGTH);
574
575	/* read trailing data from fifo, it does not matter how many
576	 * bytes are in the fifo just read until buffer is full
577	 * or fifo is empty, which ever occurs first */
578	drv_data->read(drv_data);
579
580	/* return count of what was actually read */
581	msg->actual_length += drv_data->len -
582				(drv_data->rx_end - drv_data->rx);
583
584	/* Transfer delays and chip select release are
585	 * handled in pump_transfers or giveback
586	 */
587
588	/* Move to next transfer */
589	msg->state = next_transfer(drv_data);
590
591	/* Schedule transfer tasklet */
592	tasklet_schedule(&drv_data->pump_transfers);
593}
594
595static void dma_handler(int channel, void *data)
596{
597	struct driver_data *drv_data = data;
598	u32 irq_status = DCSR(channel) & DMA_INT_MASK;
599
600	if (irq_status & DCSR_BUSERR) {
601
602		if (channel == drv_data->tx_channel)
603			dma_error_stop(drv_data,
604					"dma_handler: "
605					"bad bus address on tx channel");
606		else
607			dma_error_stop(drv_data,
608					"dma_handler: "
609					"bad bus address on rx channel");
610		return;
611	}
612
613	/* PXA255x_SSP has no timeout interrupt, wait for tailing bytes */
614	if ((channel == drv_data->tx_channel)
615		&& (irq_status & DCSR_ENDINTR)
616		&& (drv_data->ssp_type == PXA25x_SSP)) {
617
618		/* Wait for rx to stall */
619		if (wait_ssp_rx_stall(drv_data->ioaddr) == 0)
620			dev_err(&drv_data->pdev->dev,
621				"dma_handler: ssp rx stall failed\n");
622
623		/* finish this transfer, start the next */
624		dma_transfer_complete(drv_data);
625	}
626}
627
628static irqreturn_t dma_transfer(struct driver_data *drv_data)
629{
630	u32 irq_status;
631	void __iomem *reg = drv_data->ioaddr;
632
633	irq_status = read_SSSR(reg) & drv_data->mask_sr;
634	if (irq_status & SSSR_ROR) {
635		dma_error_stop(drv_data, "dma_transfer: fifo overrun");
636		return IRQ_HANDLED;
637	}
638
639	/* Check for false positive timeout */
640	if ((irq_status & SSSR_TINT)
641		&& (DCSR(drv_data->tx_channel) & DCSR_RUN)) {
642		write_SSSR(SSSR_TINT, reg);
643		return IRQ_HANDLED;
644	}
645
646	if (irq_status & SSSR_TINT || drv_data->rx == drv_data->rx_end) {
647
648		/* Clear and disable timeout interrupt, do the rest in
649		 * dma_transfer_complete */
650		if (!pxa25x_ssp_comp(drv_data))
651			write_SSTO(0, reg);
652
653		/* finish this transfer, start the next */
654		dma_transfer_complete(drv_data);
655
656		return IRQ_HANDLED;
657	}
658
659	/* Opps problem detected */
660	return IRQ_NONE;
661}
662
663static void reset_sccr1(struct driver_data *drv_data)
664{
665	void __iomem *reg = drv_data->ioaddr;
666	struct chip_data *chip = drv_data->cur_chip;
667	u32 sccr1_reg;
668
669	sccr1_reg = read_SSCR1(reg) & ~drv_data->int_cr1;
670	sccr1_reg &= ~SSCR1_RFT;
671	sccr1_reg |= chip->threshold;
672	write_SSCR1(sccr1_reg, reg);
673}
674
675static void int_error_stop(struct driver_data *drv_data, const char* msg)
676{
677	void __iomem *reg = drv_data->ioaddr;
678
679	/* Stop and reset SSP */
680	write_SSSR_CS(drv_data, drv_data->clear_sr);
681	reset_sccr1(drv_data);
682	if (!pxa25x_ssp_comp(drv_data))
683		write_SSTO(0, reg);
684	flush(drv_data);
685	write_SSCR0(read_SSCR0(reg) & ~SSCR0_SSE, reg);
686
687	dev_err(&drv_data->pdev->dev, "%s\n", msg);
688
689	drv_data->cur_msg->state = ERROR_STATE;
690	tasklet_schedule(&drv_data->pump_transfers);
691}
692
693static void int_transfer_complete(struct driver_data *drv_data)
694{
695	void __iomem *reg = drv_data->ioaddr;
696
697	/* Stop SSP */
698	write_SSSR_CS(drv_data, drv_data->clear_sr);
699	reset_sccr1(drv_data);
700	if (!pxa25x_ssp_comp(drv_data))
701		write_SSTO(0, reg);
702
703	/* Update total byte transferred return count actual bytes read */
704	drv_data->cur_msg->actual_length += drv_data->len -
705				(drv_data->rx_end - drv_data->rx);
706
707	/* Transfer delays and chip select release are
708	 * handled in pump_transfers or giveback
709	 */
710
711	/* Move to next transfer */
712	drv_data->cur_msg->state = next_transfer(drv_data);
713
714	/* Schedule transfer tasklet */
715	tasklet_schedule(&drv_data->pump_transfers);
716}
717
718static irqreturn_t interrupt_transfer(struct driver_data *drv_data)
719{
720	void __iomem *reg = drv_data->ioaddr;
721
722	u32 irq_mask = (read_SSCR1(reg) & SSCR1_TIE) ?
723			drv_data->mask_sr : drv_data->mask_sr & ~SSSR_TFS;
724
725	u32 irq_status = read_SSSR(reg) & irq_mask;
726
727	if (irq_status & SSSR_ROR) {
728		int_error_stop(drv_data, "interrupt_transfer: fifo overrun");
729		return IRQ_HANDLED;
730	}
731
732	if (irq_status & SSSR_TINT) {
733		write_SSSR(SSSR_TINT, reg);
734		if (drv_data->read(drv_data)) {
735			int_transfer_complete(drv_data);
736			return IRQ_HANDLED;
737		}
738	}
739
740	/* Drain rx fifo, Fill tx fifo and prevent overruns */
741	do {
742		if (drv_data->read(drv_data)) {
743			int_transfer_complete(drv_data);
744			return IRQ_HANDLED;
745		}
746	} while (drv_data->write(drv_data));
747
748	if (drv_data->read(drv_data)) {
749		int_transfer_complete(drv_data);
750		return IRQ_HANDLED;
751	}
752
753	if (drv_data->tx == drv_data->tx_end) {
754		u32 bytes_left;
755		u32 sccr1_reg;
756
757		sccr1_reg = read_SSCR1(reg);
758		sccr1_reg &= ~SSCR1_TIE;
759
760		/*
761		 * PXA25x_SSP has no timeout, set up rx threshould for the
762		 * remaining RX bytes.
763		 */
764		if (pxa25x_ssp_comp(drv_data)) {
765
766			sccr1_reg &= ~SSCR1_RFT;
767
768			bytes_left = drv_data->rx_end - drv_data->rx;
769			switch (drv_data->n_bytes) {
770			case 4:
771				bytes_left >>= 1;
772			case 2:
773				bytes_left >>= 1;
774			}
775
776			if (bytes_left > RX_THRESH_DFLT)
777				bytes_left = RX_THRESH_DFLT;
778
779			sccr1_reg |= SSCR1_RxTresh(bytes_left);
780		}
781		write_SSCR1(sccr1_reg, reg);
782	}
783
784	/* We did something */
785	return IRQ_HANDLED;
786}
787
788static irqreturn_t ssp_int(int irq, void *dev_id)
789{
790	struct driver_data *drv_data = dev_id;
791	void __iomem *reg = drv_data->ioaddr;
792	u32 sccr1_reg = read_SSCR1(reg);
793	u32 mask = drv_data->mask_sr;
794	u32 status;
795
796	status = read_SSSR(reg);
797
798	/* Ignore possible writes if we don't need to write */
799	if (!(sccr1_reg & SSCR1_TIE))
800		mask &= ~SSSR_TFS;
801
802	if (!(status & mask))
803		return IRQ_NONE;
804
805	if (!drv_data->cur_msg) {
806
807		write_SSCR0(read_SSCR0(reg) & ~SSCR0_SSE, reg);
808		write_SSCR1(read_SSCR1(reg) & ~drv_data->int_cr1, reg);
809		if (!pxa25x_ssp_comp(drv_data))
810			write_SSTO(0, reg);
811		write_SSSR_CS(drv_data, drv_data->clear_sr);
812
813		dev_err(&drv_data->pdev->dev, "bad message state "
814			"in interrupt handler\n");
815
816		/* Never fail */
817		return IRQ_HANDLED;
818	}
819
820	return drv_data->transfer_handler(drv_data);
821}
822
823static int set_dma_burst_and_threshold(struct chip_data *chip,
824				struct spi_device *spi,
825				u8 bits_per_word, u32 *burst_code,
826				u32 *threshold)
827{
828	struct pxa2xx_spi_chip *chip_info =
829			(struct pxa2xx_spi_chip *)spi->controller_data;
830	int bytes_per_word;
831	int burst_bytes;
832	int thresh_words;
833	int req_burst_size;
834	int retval = 0;
835
836	/* Set the threshold (in registers) to equal the same amount of data
837	 * as represented by burst size (in bytes).  The computation below
838	 * is (burst_size rounded up to nearest 8 byte, word or long word)
839	 * divided by (bytes/register); the tx threshold is the inverse of
840	 * the rx, so that there will always be enough data in the rx fifo
841	 * to satisfy a burst, and there will always be enough space in the
842	 * tx fifo to accept a burst (a tx burst will overwrite the fifo if
843	 * there is not enough space), there must always remain enough empty
844	 * space in the rx fifo for any data loaded to the tx fifo.
845	 * Whenever burst_size (in bytes) equals bits/word, the fifo threshold
846	 * will be 8, or half the fifo;
847	 * The threshold can only be set to 2, 4 or 8, but not 16, because
848	 * to burst 16 to the tx fifo, the fifo would have to be empty;
849	 * however, the minimum fifo trigger level is 1, and the tx will
850	 * request service when the fifo is at this level, with only 15 spaces.
851	 */
852
853	/* find bytes/word */
854	if (bits_per_word <= 8)
855		bytes_per_word = 1;
856	else if (bits_per_word <= 16)
857		bytes_per_word = 2;
858	else
859		bytes_per_word = 4;
860
861	/* use struct pxa2xx_spi_chip->dma_burst_size if available */
862	if (chip_info)
863		req_burst_size = chip_info->dma_burst_size;
864	else {
865		switch (chip->dma_burst_size) {
866		default:
867			/* if the default burst size is not set,
868			 * do it now */
869			chip->dma_burst_size = DCMD_BURST8;
870		case DCMD_BURST8:
871			req_burst_size = 8;
872			break;
873		case DCMD_BURST16:
874			req_burst_size = 16;
875			break;
876		case DCMD_BURST32:
877			req_burst_size = 32;
878			break;
879		}
880	}
881	if (req_burst_size <= 8) {
882		*burst_code = DCMD_BURST8;
883		burst_bytes = 8;
884	} else if (req_burst_size <= 16) {
885		if (bytes_per_word == 1) {
886			/* don't burst more than 1/2 the fifo */
887			*burst_code = DCMD_BURST8;
888			burst_bytes = 8;
889			retval = 1;
890		} else {
891			*burst_code = DCMD_BURST16;
892			burst_bytes = 16;
893		}
894	} else {
895		if (bytes_per_word == 1) {
896			/* don't burst more than 1/2 the fifo */
897			*burst_code = DCMD_BURST8;
898			burst_bytes = 8;
899			retval = 1;
900		} else if (bytes_per_word == 2) {
901			/* don't burst more than 1/2 the fifo */
902			*burst_code = DCMD_BURST16;
903			burst_bytes = 16;
904			retval = 1;
905		} else {
906			*burst_code = DCMD_BURST32;
907			burst_bytes = 32;
908		}
909	}
910
911	thresh_words = burst_bytes / bytes_per_word;
912
913	/* thresh_words will be between 2 and 8 */
914	*threshold = (SSCR1_RxTresh(thresh_words) & SSCR1_RFT)
915			| (SSCR1_TxTresh(16-thresh_words) & SSCR1_TFT);
916
917	return retval;
918}
919
920static unsigned int ssp_get_clk_div(struct ssp_device *ssp, int rate)
921{
922	unsigned long ssp_clk = clk_get_rate(ssp->clk);
923
924	if (ssp->type == PXA25x_SSP || ssp->type == CE4100_SSP)
925		return ((ssp_clk / (2 * rate) - 1) & 0xff) << 8;
926	else
927		return ((ssp_clk / rate - 1) & 0xfff) << 8;
928}
929
930static void pump_transfers(unsigned long data)
931{
932	struct driver_data *drv_data = (struct driver_data *)data;
933	struct spi_message *message = NULL;
934	struct spi_transfer *transfer = NULL;
935	struct spi_transfer *previous = NULL;
936	struct chip_data *chip = NULL;
937	struct ssp_device *ssp = drv_data->ssp;
938	void __iomem *reg = drv_data->ioaddr;
939	u32 clk_div = 0;
940	u8 bits = 0;
941	u32 speed = 0;
942	u32 cr0;
943	u32 cr1;
944	u32 dma_thresh = drv_data->cur_chip->dma_threshold;
945	u32 dma_burst = drv_data->cur_chip->dma_burst_size;
946
947	/* Get current state information */
948	message = drv_data->cur_msg;
949	transfer = drv_data->cur_transfer;
950	chip = drv_data->cur_chip;
951
952	/* Handle for abort */
953	if (message->state == ERROR_STATE) {
954		message->status = -EIO;
955		giveback(drv_data);
956		return;
957	}
958
959	/* Handle end of message */
960	if (message->state == DONE_STATE) {
961		message->status = 0;
962		giveback(drv_data);
963		return;
964	}
965
966	/* Delay if requested at end of transfer before CS change */
967	if (message->state == RUNNING_STATE) {
968		previous = list_entry(transfer->transfer_list.prev,
969					struct spi_transfer,
970					transfer_list);
971		if (previous->delay_usecs)
972			udelay(previous->delay_usecs);
973
974		/* Drop chip select only if cs_change is requested */
975		if (previous->cs_change)
976			cs_deassert(drv_data);
977	}
978
979	/* Check for transfers that need multiple DMA segments */
980	if (transfer->len > MAX_DMA_LEN && chip->enable_dma) {
981
982		/* reject already-mapped transfers; PIO won't always work */
983		if (message->is_dma_mapped
984				|| transfer->rx_dma || transfer->tx_dma) {
985			dev_err(&drv_data->pdev->dev,
986				"pump_transfers: mapped transfer length "
987				"of %u is greater than %d\n",
988				transfer->len, MAX_DMA_LEN);
989			message->status = -EINVAL;
990			giveback(drv_data);
991			return;
992		}
993
994		/* warn ... we force this to PIO mode */
995		if (printk_ratelimit())
996			dev_warn(&message->spi->dev, "pump_transfers: "
997				"DMA disabled for transfer length %ld "
998				"greater than %d\n",
999				(long)drv_data->len, MAX_DMA_LEN);
1000	}
1001
1002	/* Setup the transfer state based on the type of transfer */
1003	if (flush(drv_data) == 0) {
1004		dev_err(&drv_data->pdev->dev, "pump_transfers: flush failed\n");
1005		message->status = -EIO;
1006		giveback(drv_data);
1007		return;
1008	}
1009	drv_data->n_bytes = chip->n_bytes;
1010	drv_data->dma_width = chip->dma_width;
1011	drv_data->tx = (void *)transfer->tx_buf;
1012	drv_data->tx_end = drv_data->tx + transfer->len;
1013	drv_data->rx = transfer->rx_buf;
1014	drv_data->rx_end = drv_data->rx + transfer->len;
1015	drv_data->rx_dma = transfer->rx_dma;
1016	drv_data->tx_dma = transfer->tx_dma;
1017	drv_data->len = transfer->len & DCMD_LENGTH;
1018	drv_data->write = drv_data->tx ? chip->write : null_writer;
1019	drv_data->read = drv_data->rx ? chip->read : null_reader;
1020
1021	/* Change speed and bit per word on a per transfer */
1022	cr0 = chip->cr0;
1023	if (transfer->speed_hz || transfer->bits_per_word) {
1024
1025		bits = chip->bits_per_word;
1026		speed = chip->speed_hz;
1027
1028		if (transfer->speed_hz)
1029			speed = transfer->speed_hz;
1030
1031		if (transfer->bits_per_word)
1032			bits = transfer->bits_per_word;
1033
1034		clk_div = ssp_get_clk_div(ssp, speed);
1035
1036		if (bits <= 8) {
1037			drv_data->n_bytes = 1;
1038			drv_data->dma_width = DCMD_WIDTH1;
1039			drv_data->read = drv_data->read != null_reader ?
1040						u8_reader : null_reader;
1041			drv_data->write = drv_data->write != null_writer ?
1042						u8_writer : null_writer;
1043		} else if (bits <= 16) {
1044			drv_data->n_bytes = 2;
1045			drv_data->dma_width = DCMD_WIDTH2;
1046			drv_data->read = drv_data->read != null_reader ?
1047						u16_reader : null_reader;
1048			drv_data->write = drv_data->write != null_writer ?
1049						u16_writer : null_writer;
1050		} else if (bits <= 32) {
1051			drv_data->n_bytes = 4;
1052			drv_data->dma_width = DCMD_WIDTH4;
1053			drv_data->read = drv_data->read != null_reader ?
1054						u32_reader : null_reader;
1055			drv_data->write = drv_data->write != null_writer ?
1056						u32_writer : null_writer;
1057		}
1058		/* if bits/word is changed in dma mode, then must check the
1059		 * thresholds and burst also */
1060		if (chip->enable_dma) {
1061			if (set_dma_burst_and_threshold(chip, message->spi,
1062							bits, &dma_burst,
1063							&dma_thresh))
1064				if (printk_ratelimit())
1065					dev_warn(&message->spi->dev,
1066						"pump_transfers: "
1067						"DMA burst size reduced to "
1068						"match bits_per_word\n");
1069		}
1070
1071		cr0 = clk_div
1072			| SSCR0_Motorola
1073			| SSCR0_DataSize(bits > 16 ? bits - 16 : bits)
1074			| SSCR0_SSE
1075			| (bits > 16 ? SSCR0_EDSS : 0);
1076	}
1077
1078	message->state = RUNNING_STATE;
1079
1080	/* Try to map dma buffer and do a dma transfer if successful, but
1081	 * only if the length is non-zero and less than MAX_DMA_LEN.
1082	 *
1083	 * Zero-length non-descriptor DMA is illegal on PXA2xx; force use
1084	 * of PIO instead.  Care is needed above because the transfer may
1085	 * have have been passed with buffers that are already dma mapped.
1086	 * A zero-length transfer in PIO mode will not try to write/read
1087	 * to/from the buffers
1088	 *
1089	 * REVISIT large transfers are exactly where we most want to be
1090	 * using DMA.  If this happens much, split those transfers into
1091	 * multiple DMA segments rather than forcing PIO.
1092	 */
1093	drv_data->dma_mapped = 0;
1094	if (drv_data->len > 0 && drv_data->len <= MAX_DMA_LEN)
1095		drv_data->dma_mapped = map_dma_buffers(drv_data);
1096	if (drv_data->dma_mapped) {
1097
1098		/* Ensure we have the correct interrupt handler */
1099		drv_data->transfer_handler = dma_transfer;
1100
1101		/* Setup rx DMA Channel */
1102		DCSR(drv_data->rx_channel) = RESET_DMA_CHANNEL;
1103		DSADR(drv_data->rx_channel) = drv_data->ssdr_physical;
1104		DTADR(drv_data->rx_channel) = drv_data->rx_dma;
1105		if (drv_data->rx == drv_data->null_dma_buf)
1106			/* No target address increment */
1107			DCMD(drv_data->rx_channel) = DCMD_FLOWSRC
1108							| drv_data->dma_width
1109							| dma_burst
1110							| drv_data->len;
1111		else
1112			DCMD(drv_data->rx_channel) = DCMD_INCTRGADDR
1113							| DCMD_FLOWSRC
1114							| drv_data->dma_width
1115							| dma_burst
1116							| drv_data->len;
1117
1118		/* Setup tx DMA Channel */
1119		DCSR(drv_data->tx_channel) = RESET_DMA_CHANNEL;
1120		DSADR(drv_data->tx_channel) = drv_data->tx_dma;
1121		DTADR(drv_data->tx_channel) = drv_data->ssdr_physical;
1122		if (drv_data->tx == drv_data->null_dma_buf)
1123			/* No source address increment */
1124			DCMD(drv_data->tx_channel) = DCMD_FLOWTRG
1125							| drv_data->dma_width
1126							| dma_burst
1127							| drv_data->len;
1128		else
1129			DCMD(drv_data->tx_channel) = DCMD_INCSRCADDR
1130							| DCMD_FLOWTRG
1131							| drv_data->dma_width
1132							| dma_burst
1133							| drv_data->len;
1134
1135		/* Enable dma end irqs on SSP to detect end of transfer */
1136		if (drv_data->ssp_type == PXA25x_SSP)
1137			DCMD(drv_data->tx_channel) |= DCMD_ENDIRQEN;
1138
1139		/* Clear status and start DMA engine */
1140		cr1 = chip->cr1 | dma_thresh | drv_data->dma_cr1;
1141		write_SSSR(drv_data->clear_sr, reg);
1142		DCSR(drv_data->rx_channel) |= DCSR_RUN;
1143		DCSR(drv_data->tx_channel) |= DCSR_RUN;
1144	} else {
1145		/* Ensure we have the correct interrupt handler	*/
1146		drv_data->transfer_handler = interrupt_transfer;
1147
1148		/* Clear status  */
1149		cr1 = chip->cr1 | chip->threshold | drv_data->int_cr1;
1150		write_SSSR_CS(drv_data, drv_data->clear_sr);
1151	}
1152
1153	/* see if we need to reload the config registers */
1154	if ((read_SSCR0(reg) != cr0)
1155		|| (read_SSCR1(reg) & SSCR1_CHANGE_MASK) !=
1156			(cr1 & SSCR1_CHANGE_MASK)) {
1157
1158		/* stop the SSP, and update the other bits */
1159		write_SSCR0(cr0 & ~SSCR0_SSE, reg);
1160		if (!pxa25x_ssp_comp(drv_data))
1161			write_SSTO(chip->timeout, reg);
1162		/* first set CR1 without interrupt and service enables */
1163		write_SSCR1(cr1 & SSCR1_CHANGE_MASK, reg);
1164		/* restart the SSP */
1165		write_SSCR0(cr0, reg);
1166
1167	} else {
1168		if (!pxa25x_ssp_comp(drv_data))
1169			write_SSTO(chip->timeout, reg);
1170	}
1171
1172	cs_assert(drv_data);
1173
1174	/* after chip select, release the data by enabling service
1175	 * requests and interrupts, without changing any mode bits */
1176	write_SSCR1(cr1, reg);
1177}
1178
1179static void pump_messages(struct work_struct *work)
1180{
1181	struct driver_data *drv_data =
1182		container_of(work, struct driver_data, pump_messages);
1183	unsigned long flags;
1184
1185	/* Lock queue and check for queue work */
1186	spin_lock_irqsave(&drv_data->lock, flags);
1187	if (list_empty(&drv_data->queue) || drv_data->run == QUEUE_STOPPED) {
1188		drv_data->busy = 0;
1189		spin_unlock_irqrestore(&drv_data->lock, flags);
1190		return;
1191	}
1192
1193	/* Make sure we are not already running a message */
1194	if (drv_data->cur_msg) {
1195		spin_unlock_irqrestore(&drv_data->lock, flags);
1196		return;
1197	}
1198
1199	/* Extract head of queue */
1200	drv_data->cur_msg = list_entry(drv_data->queue.next,
1201					struct spi_message, queue);
1202	list_del_init(&drv_data->cur_msg->queue);
1203
1204	/* Initial message state*/
1205	drv_data->cur_msg->state = START_STATE;
1206	drv_data->cur_transfer = list_entry(drv_data->cur_msg->transfers.next,
1207						struct spi_transfer,
1208						transfer_list);
1209
1210	/* prepare to setup the SSP, in pump_transfers, using the per
1211	 * chip configuration */
1212	drv_data->cur_chip = spi_get_ctldata(drv_data->cur_msg->spi);
1213
1214	/* Mark as busy and launch transfers */
1215	tasklet_schedule(&drv_data->pump_transfers);
1216
1217	drv_data->busy = 1;
1218	spin_unlock_irqrestore(&drv_data->lock, flags);
1219}
1220
1221static int transfer(struct spi_device *spi, struct spi_message *msg)
1222{
1223	struct driver_data *drv_data = spi_master_get_devdata(spi->master);
1224	unsigned long flags;
1225
1226	spin_lock_irqsave(&drv_data->lock, flags);
1227
1228	if (drv_data->run == QUEUE_STOPPED) {
1229		spin_unlock_irqrestore(&drv_data->lock, flags);
1230		return -ESHUTDOWN;
1231	}
1232
1233	msg->actual_length = 0;
1234	msg->status = -EINPROGRESS;
1235	msg->state = START_STATE;
1236
1237	list_add_tail(&msg->queue, &drv_data->queue);
1238
1239	if (drv_data->run == QUEUE_RUNNING && !drv_data->busy)
1240		queue_work(drv_data->workqueue, &drv_data->pump_messages);
1241
1242	spin_unlock_irqrestore(&drv_data->lock, flags);
1243
1244	return 0;
1245}
1246
1247static int setup_cs(struct spi_device *spi, struct chip_data *chip,
1248		    struct pxa2xx_spi_chip *chip_info)
1249{
1250	int err = 0;
1251
1252	if (chip == NULL || chip_info == NULL)
1253		return 0;
1254
1255	/* NOTE: setup() can be called multiple times, possibly with
1256	 * different chip_info, release previously requested GPIO
1257	 */
1258	if (gpio_is_valid(chip->gpio_cs))
1259		gpio_free(chip->gpio_cs);
1260
1261	/* If (*cs_control) is provided, ignore GPIO chip select */
1262	if (chip_info->cs_control) {
1263		chip->cs_control = chip_info->cs_control;
1264		return 0;
1265	}
1266
1267	if (gpio_is_valid(chip_info->gpio_cs)) {
1268		err = gpio_request(chip_info->gpio_cs, "SPI_CS");
1269		if (err) {
1270			dev_err(&spi->dev, "failed to request chip select "
1271					"GPIO%d\n", chip_info->gpio_cs);
1272			return err;
1273		}
1274
1275		chip->gpio_cs = chip_info->gpio_cs;
1276		chip->gpio_cs_inverted = spi->mode & SPI_CS_HIGH;
1277
1278		err = gpio_direction_output(chip->gpio_cs,
1279					!chip->gpio_cs_inverted);
1280	}
1281
1282	return err;
1283}
1284
1285static int setup(struct spi_device *spi)
1286{
1287	struct pxa2xx_spi_chip *chip_info = NULL;
1288	struct chip_data *chip;
1289	struct driver_data *drv_data = spi_master_get_devdata(spi->master);
1290	struct ssp_device *ssp = drv_data->ssp;
1291	unsigned int clk_div;
1292	uint tx_thres = TX_THRESH_DFLT;
1293	uint rx_thres = RX_THRESH_DFLT;
1294
1295	if (!pxa25x_ssp_comp(drv_data)
1296		&& (spi->bits_per_word < 4 || spi->bits_per_word > 32)) {
1297		dev_err(&spi->dev, "failed setup: ssp_type=%d, bits/wrd=%d "
1298				"b/w not 4-32 for type non-PXA25x_SSP\n",
1299				drv_data->ssp_type, spi->bits_per_word);
1300		return -EINVAL;
1301	} else if (pxa25x_ssp_comp(drv_data)
1302			&& (spi->bits_per_word < 4
1303				|| spi->bits_per_word > 16)) {
1304		dev_err(&spi->dev, "failed setup: ssp_type=%d, bits/wrd=%d "
1305				"b/w not 4-16 for type PXA25x_SSP\n",
1306				drv_data->ssp_type, spi->bits_per_word);
1307		return -EINVAL;
1308	}
1309
1310	/* Only alloc on first setup */
1311	chip = spi_get_ctldata(spi);
1312	if (!chip) {
1313		chip = kzalloc(sizeof(struct chip_data), GFP_KERNEL);
1314		if (!chip) {
1315			dev_err(&spi->dev,
1316				"failed setup: can't allocate chip data\n");
1317			return -ENOMEM;
1318		}
1319
1320		if (drv_data->ssp_type == CE4100_SSP) {
1321			if (spi->chip_select > 4) {
1322				dev_err(&spi->dev, "failed setup: "
1323				"cs number must not be > 4.\n");
1324				kfree(chip);
1325				return -EINVAL;
1326			}
1327
1328			chip->frm = spi->chip_select;
1329		} else
1330			chip->gpio_cs = -1;
1331		chip->enable_dma = 0;
1332		chip->timeout = TIMOUT_DFLT;
1333		chip->dma_burst_size = drv_data->master_info->enable_dma ?
1334					DCMD_BURST8 : 0;
1335	}
1336
1337	/* protocol drivers may change the chip settings, so...
1338	 * if chip_info exists, use it */
1339	chip_info = spi->controller_data;
1340
1341	/* chip_info isn't always needed */
1342	chip->cr1 = 0;
1343	if (chip_info) {
1344		if (chip_info->timeout)
1345			chip->timeout = chip_info->timeout;
1346		if (chip_info->tx_threshold)
1347			tx_thres = chip_info->tx_threshold;
1348		if (chip_info->rx_threshold)
1349			rx_thres = chip_info->rx_threshold;
1350		chip->enable_dma = drv_data->master_info->enable_dma;
1351		chip->dma_threshold = 0;
1352		if (chip_info->enable_loopback)
1353			chip->cr1 = SSCR1_LBM;
1354	}
1355
1356	chip->threshold = (SSCR1_RxTresh(rx_thres) & SSCR1_RFT) |
1357			(SSCR1_TxTresh(tx_thres) & SSCR1_TFT);
1358
1359	/* set dma burst and threshold outside of chip_info path so that if
1360	 * chip_info goes away after setting chip->enable_dma, the
1361	 * burst and threshold can still respond to changes in bits_per_word */
1362	if (chip->enable_dma) {
1363		/* set up legal burst and threshold for dma */
1364		if (set_dma_burst_and_threshold(chip, spi, spi->bits_per_word,
1365						&chip->dma_burst_size,
1366						&chip->dma_threshold)) {
1367			dev_warn(&spi->dev, "in setup: DMA burst size reduced "
1368					"to match bits_per_word\n");
1369		}
1370	}
1371
1372	clk_div = ssp_get_clk_div(ssp, spi->max_speed_hz);
1373	chip->speed_hz = spi->max_speed_hz;
1374
1375	chip->cr0 = clk_div
1376			| SSCR0_Motorola
1377			| SSCR0_DataSize(spi->bits_per_word > 16 ?
1378				spi->bits_per_word - 16 : spi->bits_per_word)
1379			| SSCR0_SSE
1380			| (spi->bits_per_word > 16 ? SSCR0_EDSS : 0);
1381	chip->cr1 &= ~(SSCR1_SPO | SSCR1_SPH);
1382	chip->cr1 |= (((spi->mode & SPI_CPHA) != 0) ? SSCR1_SPH : 0)
1383			| (((spi->mode & SPI_CPOL) != 0) ? SSCR1_SPO : 0);
1384
1385	/* NOTE:  PXA25x_SSP _could_ use external clocking ... */
1386	if (!pxa25x_ssp_comp(drv_data))
1387		dev_dbg(&spi->dev, "%ld Hz actual, %s\n",
1388			clk_get_rate(ssp->clk)
1389				/ (1 + ((chip->cr0 & SSCR0_SCR(0xfff)) >> 8)),
1390			chip->enable_dma ? "DMA" : "PIO");
1391	else
1392		dev_dbg(&spi->dev, "%ld Hz actual, %s\n",
1393			clk_get_rate(ssp->clk) / 2
1394				/ (1 + ((chip->cr0 & SSCR0_SCR(0x0ff)) >> 8)),
1395			chip->enable_dma ? "DMA" : "PIO");
1396
1397	if (spi->bits_per_word <= 8) {
1398		chip->n_bytes = 1;
1399		chip->dma_width = DCMD_WIDTH1;
1400		chip->read = u8_reader;
1401		chip->write = u8_writer;
1402	} else if (spi->bits_per_word <= 16) {
1403		chip->n_bytes = 2;
1404		chip->dma_width = DCMD_WIDTH2;
1405		chip->read = u16_reader;
1406		chip->write = u16_writer;
1407	} else if (spi->bits_per_word <= 32) {
1408		chip->cr0 |= SSCR0_EDSS;
1409		chip->n_bytes = 4;
1410		chip->dma_width = DCMD_WIDTH4;
1411		chip->read = u32_reader;
1412		chip->write = u32_writer;
1413	} else {
1414		dev_err(&spi->dev, "invalid wordsize\n");
1415		return -ENODEV;
1416	}
1417	chip->bits_per_word = spi->bits_per_word;
1418
1419	spi_set_ctldata(spi, chip);
1420
1421	if (drv_data->ssp_type == CE4100_SSP)
1422		return 0;
1423
1424	return setup_cs(spi, chip, chip_info);
1425}
1426
1427static void cleanup(struct spi_device *spi)
1428{
1429	struct chip_data *chip = spi_get_ctldata(spi);
1430	struct driver_data *drv_data = spi_master_get_devdata(spi->master);
1431
1432	if (!chip)
1433		return;
1434
1435	if (drv_data->ssp_type != CE4100_SSP && gpio_is_valid(chip->gpio_cs))
1436		gpio_free(chip->gpio_cs);
1437
1438	kfree(chip);
1439}
1440
1441static int __devinit init_queue(struct driver_data *drv_data)
1442{
1443	INIT_LIST_HEAD(&drv_data->queue);
1444	spin_lock_init(&drv_data->lock);
1445
1446	drv_data->run = QUEUE_STOPPED;
1447	drv_data->busy = 0;
1448
1449	tasklet_init(&drv_data->pump_transfers,
1450			pump_transfers,	(unsigned long)drv_data);
1451
1452	INIT_WORK(&drv_data->pump_messages, pump_messages);
1453	drv_data->workqueue = create_singlethread_workqueue(
1454				dev_name(drv_data->master->dev.parent));
1455	if (drv_data->workqueue == NULL)
1456		return -EBUSY;
1457
1458	return 0;
1459}
1460
1461static int start_queue(struct driver_data *drv_data)
1462{
1463	unsigned long flags;
1464
1465	spin_lock_irqsave(&drv_data->lock, flags);
1466
1467	if (drv_data->run == QUEUE_RUNNING || drv_data->busy) {
1468		spin_unlock_irqrestore(&drv_data->lock, flags);
1469		return -EBUSY;
1470	}
1471
1472	drv_data->run = QUEUE_RUNNING;
1473	drv_data->cur_msg = NULL;
1474	drv_data->cur_transfer = NULL;
1475	drv_data->cur_chip = NULL;
1476	spin_unlock_irqrestore(&drv_data->lock, flags);
1477
1478	queue_work(drv_data->workqueue, &drv_data->pump_messages);
1479
1480	return 0;
1481}
1482
1483static int stop_queue(struct driver_data *drv_data)
1484{
1485	unsigned long flags;
1486	unsigned limit = 500;
1487	int status = 0;
1488
1489	spin_lock_irqsave(&drv_data->lock, flags);
1490
1491	/* This is a bit lame, but is optimized for the common execution path.
1492	 * A wait_queue on the drv_data->busy could be used, but then the common
1493	 * execution path (pump_messages) would be required to call wake_up or
1494	 * friends on every SPI message. Do this instead */
1495	drv_data->run = QUEUE_STOPPED;
1496	while ((!list_empty(&drv_data->queue) || drv_data->busy) && limit--) {
1497		spin_unlock_irqrestore(&drv_data->lock, flags);
1498		msleep(10);
1499		spin_lock_irqsave(&drv_data->lock, flags);
1500	}
1501
1502	if (!list_empty(&drv_data->queue) || drv_data->busy)
1503		status = -EBUSY;
1504
1505	spin_unlock_irqrestore(&drv_data->lock, flags);
1506
1507	return status;
1508}
1509
1510static int destroy_queue(struct driver_data *drv_data)
1511{
1512	int status;
1513
1514	status = stop_queue(drv_data);
1515	/* we are unloading the module or failing to load (only two calls
1516	 * to this routine), and neither call can handle a return value.
1517	 * However, destroy_workqueue calls flush_workqueue, and that will
1518	 * block until all work is done.  If the reason that stop_queue
1519	 * timed out is that the work will never finish, then it does no
1520	 * good to call destroy_workqueue, so return anyway. */
1521	if (status != 0)
1522		return status;
1523
1524	destroy_workqueue(drv_data->workqueue);
1525
1526	return 0;
1527}
1528
1529static int __devinit pxa2xx_spi_probe(struct platform_device *pdev)
1530{
1531	struct device *dev = &pdev->dev;
1532	struct pxa2xx_spi_master *platform_info;
1533	struct spi_master *master;
1534	struct driver_data *drv_data;
1535	struct ssp_device *ssp;
1536	int status;
1537
1538	platform_info = dev->platform_data;
1539
1540	ssp = pxa_ssp_request(pdev->id, pdev->name);
1541	if (ssp == NULL) {
1542		dev_err(&pdev->dev, "failed to request SSP%d\n", pdev->id);
1543		return -ENODEV;
1544	}
1545
1546	/* Allocate master with space for drv_data and null dma buffer */
1547	master = spi_alloc_master(dev, sizeof(struct driver_data) + 16);
1548	if (!master) {
1549		dev_err(&pdev->dev, "cannot alloc spi_master\n");
1550		pxa_ssp_free(ssp);
1551		return -ENOMEM;
1552	}
1553	drv_data = spi_master_get_devdata(master);
1554	drv_data->master = master;
1555	drv_data->master_info = platform_info;
1556	drv_data->pdev = pdev;
1557	drv_data->ssp = ssp;
1558
1559	master->dev.parent = &pdev->dev;
1560	master->dev.of_node = pdev->dev.of_node;
1561	/* the spi->mode bits understood by this driver: */
1562	master->mode_bits = SPI_CPOL | SPI_CPHA | SPI_CS_HIGH;
1563
1564	master->bus_num = pdev->id;
1565	master->num_chipselect = platform_info->num_chipselect;
1566	master->dma_alignment = DMA_ALIGNMENT;
1567	master->cleanup = cleanup;
1568	master->setup = setup;
1569	master->transfer = transfer;
1570
1571	drv_data->ssp_type = ssp->type;
1572	drv_data->null_dma_buf = (u32 *)ALIGN((u32)(drv_data +
1573						sizeof(struct driver_data)), 8);
1574
1575	drv_data->ioaddr = ssp->mmio_base;
1576	drv_data->ssdr_physical = ssp->phys_base + SSDR;
1577	if (pxa25x_ssp_comp(drv_data)) {
1578		drv_data->int_cr1 = SSCR1_TIE | SSCR1_RIE;
1579		drv_data->dma_cr1 = 0;
1580		drv_data->clear_sr = SSSR_ROR;
1581		drv_data->mask_sr = SSSR_RFS | SSSR_TFS | SSSR_ROR;
1582	} else {
1583		drv_data->int_cr1 = SSCR1_TIE | SSCR1_RIE | SSCR1_TINTE;
1584		drv_data->dma_cr1 = SSCR1_TSRE | SSCR1_RSRE | SSCR1_TINTE;
1585		drv_data->clear_sr = SSSR_ROR | SSSR_TINT;
1586		drv_data->mask_sr = SSSR_TINT | SSSR_RFS | SSSR_TFS | SSSR_ROR;
1587	}
1588
1589	status = request_irq(ssp->irq, ssp_int, IRQF_SHARED, dev_name(dev),
1590			drv_data);
1591	if (status < 0) {
1592		dev_err(&pdev->dev, "cannot get IRQ %d\n", ssp->irq);
1593		goto out_error_master_alloc;
1594	}
1595
1596	/* Setup DMA if requested */
1597	drv_data->tx_channel = -1;
1598	drv_data->rx_channel = -1;
1599	if (platform_info->enable_dma) {
1600
1601		/* Get two DMA channels	(rx and tx) */
1602		drv_data->rx_channel = pxa_request_dma("pxa2xx_spi_ssp_rx",
1603							DMA_PRIO_HIGH,
1604							dma_handler,
1605							drv_data);
1606		if (drv_data->rx_channel < 0) {
1607			dev_err(dev, "problem (%d) requesting rx channel\n",
1608				drv_data->rx_channel);
1609			status = -ENODEV;
1610			goto out_error_irq_alloc;
1611		}
1612		drv_data->tx_channel = pxa_request_dma("pxa2xx_spi_ssp_tx",
1613							DMA_PRIO_MEDIUM,
1614							dma_handler,
1615							drv_data);
1616		if (drv_data->tx_channel < 0) {
1617			dev_err(dev, "problem (%d) requesting tx channel\n",
1618				drv_data->tx_channel);
1619			status = -ENODEV;
1620			goto out_error_dma_alloc;
1621		}
1622
1623		DRCMR(ssp->drcmr_rx) = DRCMR_MAPVLD | drv_data->rx_channel;
1624		DRCMR(ssp->drcmr_tx) = DRCMR_MAPVLD | drv_data->tx_channel;
1625	}
1626
1627	/* Enable SOC clock */
1628	clk_enable(ssp->clk);
1629
1630	/* Load default SSP configuration */
1631	write_SSCR0(0, drv_data->ioaddr);
1632	write_SSCR1(SSCR1_RxTresh(RX_THRESH_DFLT) |
1633				SSCR1_TxTresh(TX_THRESH_DFLT),
1634				drv_data->ioaddr);
1635	write_SSCR0(SSCR0_SCR(2)
1636			| SSCR0_Motorola
1637			| SSCR0_DataSize(8),
1638			drv_data->ioaddr);
1639	if (!pxa25x_ssp_comp(drv_data))
1640		write_SSTO(0, drv_data->ioaddr);
1641	write_SSPSP(0, drv_data->ioaddr);
1642
1643	/* Initial and start queue */
1644	status = init_queue(drv_data);
1645	if (status != 0) {
1646		dev_err(&pdev->dev, "problem initializing queue\n");
1647		goto out_error_clock_enabled;
1648	}
1649	status = start_queue(drv_data);
1650	if (status != 0) {
1651		dev_err(&pdev->dev, "problem starting queue\n");
1652		goto out_error_clock_enabled;
1653	}
1654
1655	/* Register with the SPI framework */
1656	platform_set_drvdata(pdev, drv_data);
1657	status = spi_register_master(master);
1658	if (status != 0) {
1659		dev_err(&pdev->dev, "problem registering spi master\n");
1660		goto out_error_queue_alloc;
1661	}
1662
1663	return status;
1664
1665out_error_queue_alloc:
1666	destroy_queue(drv_data);
1667
1668out_error_clock_enabled:
1669	clk_disable(ssp->clk);
1670
1671out_error_dma_alloc:
1672	if (drv_data->tx_channel != -1)
1673		pxa_free_dma(drv_data->tx_channel);
1674	if (drv_data->rx_channel != -1)
1675		pxa_free_dma(drv_data->rx_channel);
1676
1677out_error_irq_alloc:
1678	free_irq(ssp->irq, drv_data);
1679
1680out_error_master_alloc:
1681	spi_master_put(master);
1682	pxa_ssp_free(ssp);
1683	return status;
1684}
1685
1686static int pxa2xx_spi_remove(struct platform_device *pdev)
1687{
1688	struct driver_data *drv_data = platform_get_drvdata(pdev);
1689	struct ssp_device *ssp;
1690	int status = 0;
1691
1692	if (!drv_data)
1693		return 0;
1694	ssp = drv_data->ssp;
1695
1696	/* Remove the queue */
1697	status = destroy_queue(drv_data);
1698	if (status != 0)
1699		/* the kernel does not check the return status of this
1700		 * this routine (mod->exit, within the kernel).  Therefore
1701		 * nothing is gained by returning from here, the module is
1702		 * going away regardless, and we should not leave any more
1703		 * resources allocated than necessary.  We cannot free the
1704		 * message memory in drv_data->queue, but we can release the
1705		 * resources below.  I think the kernel should honor -EBUSY
1706		 * returns but... */
1707		dev_err(&pdev->dev, "pxa2xx_spi_remove: workqueue will not "
1708			"complete, message memory not freed\n");
1709
1710	/* Disable the SSP at the peripheral and SOC level */
1711	write_SSCR0(0, drv_data->ioaddr);
1712	clk_disable(ssp->clk);
1713
1714	/* Release DMA */
1715	if (drv_data->master_info->enable_dma) {
1716		DRCMR(ssp->drcmr_rx) = 0;
1717		DRCMR(ssp->drcmr_tx) = 0;
1718		pxa_free_dma(drv_data->tx_channel);
1719		pxa_free_dma(drv_data->rx_channel);
1720	}
1721
1722	/* Release IRQ */
1723	free_irq(ssp->irq, drv_data);
1724
1725	/* Release SSP */
1726	pxa_ssp_free(ssp);
1727
1728	/* Disconnect from the SPI framework */
1729	spi_unregister_master(drv_data->master);
1730
1731	/* Prevent double remove */
1732	platform_set_drvdata(pdev, NULL);
1733
1734	return 0;
1735}
1736
1737static void pxa2xx_spi_shutdown(struct platform_device *pdev)
1738{
1739	int status = 0;
1740
1741	if ((status = pxa2xx_spi_remove(pdev)) != 0)
1742		dev_err(&pdev->dev, "shutdown failed with %d\n", status);
1743}
1744
1745#ifdef CONFIG_PM
1746static int pxa2xx_spi_suspend(struct device *dev)
1747{
1748	struct driver_data *drv_data = dev_get_drvdata(dev);
1749	struct ssp_device *ssp = drv_data->ssp;
1750	int status = 0;
1751
1752	status = stop_queue(drv_data);
1753	if (status != 0)
1754		return status;
1755	write_SSCR0(0, drv_data->ioaddr);
1756	clk_disable(ssp->clk);
1757
1758	return 0;
1759}
1760
1761static int pxa2xx_spi_resume(struct device *dev)
1762{
1763	struct driver_data *drv_data = dev_get_drvdata(dev);
1764	struct ssp_device *ssp = drv_data->ssp;
1765	int status = 0;
1766
1767	if (drv_data->rx_channel != -1)
1768		DRCMR(drv_data->ssp->drcmr_rx) =
1769			DRCMR_MAPVLD | drv_data->rx_channel;
1770	if (drv_data->tx_channel != -1)
1771		DRCMR(drv_data->ssp->drcmr_tx) =
1772			DRCMR_MAPVLD | drv_data->tx_channel;
1773
1774	/* Enable the SSP clock */
1775	clk_enable(ssp->clk);
1776
1777	/* Start the queue running */
1778	status = start_queue(drv_data);
1779	if (status != 0) {
1780		dev_err(dev, "problem starting queue (%d)\n", status);
1781		return status;
1782	}
1783
1784	return 0;
1785}
1786
1787static const struct dev_pm_ops pxa2xx_spi_pm_ops = {
1788	.suspend	= pxa2xx_spi_suspend,
1789	.resume		= pxa2xx_spi_resume,
1790};
1791#endif
1792
1793static struct platform_driver driver = {
1794	.driver = {
1795		.name	= "pxa2xx-spi",
1796		.owner	= THIS_MODULE,
1797#ifdef CONFIG_PM
1798		.pm	= &pxa2xx_spi_pm_ops,
1799#endif
1800	},
1801	.probe = pxa2xx_spi_probe,
1802	.remove = pxa2xx_spi_remove,
1803	.shutdown = pxa2xx_spi_shutdown,
1804};
1805
1806static int __init pxa2xx_spi_init(void)
1807{
1808	return platform_driver_register(&driver);
1809}
1810subsys_initcall(pxa2xx_spi_init);
1811
1812static void __exit pxa2xx_spi_exit(void)
1813{
1814	platform_driver_unregister(&driver);
1815}
1816module_exit(pxa2xx_spi_exit);
1817