4 * Copyright (C) 2011 Renesas Solutions Corp.
6 * Based on pxa2xx_spi.c:
7 * Copyright (C) 2005 Stephen Street / StreetFire Sound Labs
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; version 2 of the License.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
24 #include <linux/module.h>
25 #include <linux/kernel.h>
26 #include <linux/sched.h>
27 #include <linux/errno.h>
28 #include <linux/timer.h>
29 #include <linux/delay.h>
30 #include <linux/list.h>
31 #include <linux/workqueue.h>
32 #include <linux/interrupt.h>
33 #include <linux/platform_device.h>
35 #include <linux/spi/spi.h>
37 #define SPI_SH_TBR 0x00
38 #define SPI_SH_RBR 0x00
39 #define SPI_SH_CR1 0x08
40 #define SPI_SH_CR2 0x10
41 #define SPI_SH_CR3 0x18
42 #define SPI_SH_CR4 0x20
43 #define SPI_SH_CR5 0x28
46 #define SPI_SH_TBE 0x80
47 #define SPI_SH_TBF 0x40
48 #define SPI_SH_RBE 0x20
49 #define SPI_SH_RBF 0x10
50 #define SPI_SH_PFONRD 0x08
51 #define SPI_SH_SSDB 0x04
52 #define SPI_SH_SSD 0x02
53 #define SPI_SH_SSA 0x01
56 #define SPI_SH_RSTF 0x80
57 #define SPI_SH_LOOPBK 0x40
58 #define SPI_SH_CPOL 0x20
59 #define SPI_SH_CPHA 0x10
60 #define SPI_SH_L1M0 0x08
63 #define SPI_SH_MAX_BYTE 0xFF
66 #define SPI_SH_TBEI 0x80
67 #define SPI_SH_TBFI 0x40
68 #define SPI_SH_RBEI 0x20
69 #define SPI_SH_RBFI 0x10
70 #define SPI_SH_WPABRT 0x04
71 #define SPI_SH_SSS 0x01
74 #define SPI_SH_P1L0 0x80
75 #define SPI_SH_PP1L0 0x40
76 #define SPI_SH_MUXI 0x20
77 #define SPI_SH_MUXIRQ 0x10
79 #define SPI_SH_FIFO_SIZE 32
80 #define SPI_SH_SEND_TIMEOUT (3 * HZ)
81 #define SPI_SH_RECEIVE_TIMEOUT (HZ >> 3)
88 struct spi_master
*master
;
89 struct list_head queue
;
90 struct workqueue_struct
*workqueue
;
91 struct work_struct ws
;
93 wait_queue_head_t wait
;
98 static void spi_sh_write(struct spi_sh_data
*ss
, unsigned long data
,
102 iowrite8(data
, ss
->addr
+ (offset
>> 2));
103 else if (ss
->width
== 32)
104 iowrite32(data
, ss
->addr
+ offset
);
107 static unsigned long spi_sh_read(struct spi_sh_data
*ss
, unsigned long offset
)
110 return ioread8(ss
->addr
+ (offset
>> 2));
111 else if (ss
->width
== 32)
112 return ioread32(ss
->addr
+ offset
);
117 static void spi_sh_set_bit(struct spi_sh_data
*ss
, unsigned long val
,
118 unsigned long offset
)
122 tmp
= spi_sh_read(ss
, offset
);
124 spi_sh_write(ss
, tmp
, offset
);
127 static void spi_sh_clear_bit(struct spi_sh_data
*ss
, unsigned long val
,
128 unsigned long offset
)
132 tmp
= spi_sh_read(ss
, offset
);
134 spi_sh_write(ss
, tmp
, offset
);
137 static void clear_fifo(struct spi_sh_data
*ss
)
139 spi_sh_set_bit(ss
, SPI_SH_RSTF
, SPI_SH_CR2
);
140 spi_sh_clear_bit(ss
, SPI_SH_RSTF
, SPI_SH_CR2
);
143 static int spi_sh_wait_receive_buffer(struct spi_sh_data
*ss
)
145 int timeout
= 100000;
147 while (spi_sh_read(ss
, SPI_SH_CR1
) & SPI_SH_RBE
) {
155 static int spi_sh_wait_write_buffer_empty(struct spi_sh_data
*ss
)
157 int timeout
= 100000;
159 while (!(spi_sh_read(ss
, SPI_SH_CR1
) & SPI_SH_TBE
)) {
167 static int spi_sh_send(struct spi_sh_data
*ss
, struct spi_message
*mesg
,
168 struct spi_transfer
*t
)
178 spi_sh_set_bit(ss
, SPI_SH_SSA
, SPI_SH_CR1
);
180 data
= (unsigned char *)t
->tx_buf
;
182 cur_len
= min(SPI_SH_FIFO_SIZE
, remain
);
183 for (i
= 0; i
< cur_len
&&
184 !(spi_sh_read(ss
, SPI_SH_CR4
) &
186 !(spi_sh_read(ss
, SPI_SH_CR1
) & SPI_SH_TBF
);
188 spi_sh_write(ss
, (unsigned long)data
[i
], SPI_SH_TBR
);
190 if (spi_sh_read(ss
, SPI_SH_CR4
) & SPI_SH_WPABRT
) {
191 /* Abort SPI operation */
192 spi_sh_set_bit(ss
, SPI_SH_WPABRT
, SPI_SH_CR4
);
203 ss
->cr1
&= ~SPI_SH_TBE
;
204 spi_sh_set_bit(ss
, SPI_SH_TBE
, SPI_SH_CR4
);
205 ret
= wait_event_interruptible_timeout(ss
->wait
,
206 ss
->cr1
& SPI_SH_TBE
,
207 SPI_SH_SEND_TIMEOUT
);
208 if (ret
== 0 && !(ss
->cr1
& SPI_SH_TBE
)) {
209 printk(KERN_ERR
"%s: timeout\n", __func__
);
215 if (list_is_last(&t
->transfer_list
, &mesg
->transfers
)) {
216 tmp
= spi_sh_read(ss
, SPI_SH_CR1
);
217 tmp
= tmp
& ~(SPI_SH_SSD
| SPI_SH_SSDB
);
218 spi_sh_write(ss
, tmp
, SPI_SH_CR1
);
219 spi_sh_set_bit(ss
, SPI_SH_SSA
, SPI_SH_CR1
);
221 ss
->cr1
&= ~SPI_SH_TBE
;
222 spi_sh_set_bit(ss
, SPI_SH_TBE
, SPI_SH_CR4
);
223 ret
= wait_event_interruptible_timeout(ss
->wait
,
224 ss
->cr1
& SPI_SH_TBE
,
225 SPI_SH_SEND_TIMEOUT
);
226 if (ret
== 0 && (ss
->cr1
& SPI_SH_TBE
)) {
227 printk(KERN_ERR
"%s: timeout\n", __func__
);
235 static int spi_sh_receive(struct spi_sh_data
*ss
, struct spi_message
*mesg
,
236 struct spi_transfer
*t
)
245 if (t
->len
> SPI_SH_MAX_BYTE
)
246 spi_sh_write(ss
, SPI_SH_MAX_BYTE
, SPI_SH_CR3
);
248 spi_sh_write(ss
, t
->len
, SPI_SH_CR3
);
250 tmp
= spi_sh_read(ss
, SPI_SH_CR1
);
251 tmp
= tmp
& ~(SPI_SH_SSD
| SPI_SH_SSDB
);
252 spi_sh_write(ss
, tmp
, SPI_SH_CR1
);
253 spi_sh_set_bit(ss
, SPI_SH_SSA
, SPI_SH_CR1
);
255 spi_sh_wait_write_buffer_empty(ss
);
257 data
= (unsigned char *)t
->rx_buf
;
259 if (remain
>= SPI_SH_FIFO_SIZE
) {
260 ss
->cr1
&= ~SPI_SH_RBF
;
261 spi_sh_set_bit(ss
, SPI_SH_RBF
, SPI_SH_CR4
);
262 ret
= wait_event_interruptible_timeout(ss
->wait
,
263 ss
->cr1
& SPI_SH_RBF
,
264 SPI_SH_RECEIVE_TIMEOUT
);
266 spi_sh_read(ss
, SPI_SH_CR1
) & SPI_SH_RBE
) {
267 printk(KERN_ERR
"%s: timeout\n", __func__
);
272 cur_len
= min(SPI_SH_FIFO_SIZE
, remain
);
273 for (i
= 0; i
< cur_len
; i
++) {
274 if (spi_sh_wait_receive_buffer(ss
))
276 data
[i
] = (unsigned char)spi_sh_read(ss
, SPI_SH_RBR
);
283 /* deassert CS when SPI is receiving. */
284 if (t
->len
> SPI_SH_MAX_BYTE
) {
286 spi_sh_write(ss
, 1, SPI_SH_CR3
);
288 spi_sh_write(ss
, 0, SPI_SH_CR3
);
294 static void spi_sh_work(struct work_struct
*work
)
296 struct spi_sh_data
*ss
= container_of(work
, struct spi_sh_data
, ws
);
297 struct spi_message
*mesg
;
298 struct spi_transfer
*t
;
302 pr_debug("%s: enter\n", __func__
);
304 spin_lock_irqsave(&ss
->lock
, flags
);
305 while (!list_empty(&ss
->queue
)) {
306 mesg
= list_entry(ss
->queue
.next
, struct spi_message
, queue
);
307 list_del_init(&mesg
->queue
);
309 spin_unlock_irqrestore(&ss
->lock
, flags
);
310 list_for_each_entry(t
, &mesg
->transfers
, transfer_list
) {
311 pr_debug("tx_buf = %p, rx_buf = %p\n",
312 t
->tx_buf
, t
->rx_buf
);
313 pr_debug("len = %d, delay_usecs = %d\n",
314 t
->len
, t
->delay_usecs
);
317 ret
= spi_sh_send(ss
, mesg
, t
);
322 ret
= spi_sh_receive(ss
, mesg
, t
);
326 mesg
->actual_length
+= t
->len
;
328 spin_lock_irqsave(&ss
->lock
, flags
);
331 mesg
->complete(mesg
->context
);
335 spi_sh_set_bit(ss
, SPI_SH_SSD
, SPI_SH_CR1
);
338 spi_sh_clear_bit(ss
, SPI_SH_SSA
| SPI_SH_SSDB
| SPI_SH_SSD
,
343 spin_unlock_irqrestore(&ss
->lock
, flags
);
349 mesg
->complete(mesg
->context
);
351 spi_sh_clear_bit(ss
, SPI_SH_SSA
| SPI_SH_SSDB
| SPI_SH_SSD
,
357 static int spi_sh_setup(struct spi_device
*spi
)
359 struct spi_sh_data
*ss
= spi_master_get_devdata(spi
->master
);
361 if (!spi
->bits_per_word
)
362 spi
->bits_per_word
= 8;
364 pr_debug("%s: enter\n", __func__
);
366 spi_sh_write(ss
, 0xfe, SPI_SH_CR1
); /* SPI sycle stop */
367 spi_sh_write(ss
, 0x00, SPI_SH_CR1
); /* CR1 init */
368 spi_sh_write(ss
, 0x00, SPI_SH_CR3
); /* CR3 init */
373 spi_sh_write(ss
, spi_sh_read(ss
, SPI_SH_CR2
) | 0x07, SPI_SH_CR2
);
379 static int spi_sh_transfer(struct spi_device
*spi
, struct spi_message
*mesg
)
381 struct spi_sh_data
*ss
= spi_master_get_devdata(spi
->master
);
384 pr_debug("%s: enter\n", __func__
);
385 pr_debug("\tmode = %02x\n", spi
->mode
);
387 spin_lock_irqsave(&ss
->lock
, flags
);
389 mesg
->actual_length
= 0;
390 mesg
->status
= -EINPROGRESS
;
392 spi_sh_clear_bit(ss
, SPI_SH_SSA
, SPI_SH_CR1
);
394 list_add_tail(&mesg
->queue
, &ss
->queue
);
395 queue_work(ss
->workqueue
, &ss
->ws
);
397 spin_unlock_irqrestore(&ss
->lock
, flags
);
402 static void spi_sh_cleanup(struct spi_device
*spi
)
404 struct spi_sh_data
*ss
= spi_master_get_devdata(spi
->master
);
406 pr_debug("%s: enter\n", __func__
);
408 spi_sh_clear_bit(ss
, SPI_SH_SSA
| SPI_SH_SSDB
| SPI_SH_SSD
,
412 static irqreturn_t
spi_sh_irq(int irq
, void *_ss
)
414 struct spi_sh_data
*ss
= (struct spi_sh_data
*)_ss
;
417 cr1
= spi_sh_read(ss
, SPI_SH_CR1
);
418 if (cr1
& SPI_SH_TBE
)
419 ss
->cr1
|= SPI_SH_TBE
;
420 if (cr1
& SPI_SH_TBF
)
421 ss
->cr1
|= SPI_SH_TBF
;
422 if (cr1
& SPI_SH_RBE
)
423 ss
->cr1
|= SPI_SH_RBE
;
424 if (cr1
& SPI_SH_RBF
)
425 ss
->cr1
|= SPI_SH_RBF
;
428 spi_sh_clear_bit(ss
, ss
->cr1
, SPI_SH_CR4
);
435 static int __devexit
spi_sh_remove(struct platform_device
*pdev
)
437 struct spi_sh_data
*ss
= dev_get_drvdata(&pdev
->dev
);
439 spi_unregister_master(ss
->master
);
440 destroy_workqueue(ss
->workqueue
);
441 free_irq(ss
->irq
, ss
);
447 static int __devinit
spi_sh_probe(struct platform_device
*pdev
)
449 struct resource
*res
;
450 struct spi_master
*master
;
451 struct spi_sh_data
*ss
;
455 res
= platform_get_resource(pdev
, IORESOURCE_MEM
, 0);
456 if (unlikely(res
== NULL
)) {
457 dev_err(&pdev
->dev
, "invalid resource\n");
461 irq
= platform_get_irq(pdev
, 0);
463 dev_err(&pdev
->dev
, "platform_get_irq error\n");
467 master
= spi_alloc_master(&pdev
->dev
, sizeof(struct spi_sh_data
));
468 if (master
== NULL
) {
469 dev_err(&pdev
->dev
, "spi_alloc_master error.\n");
473 ss
= spi_master_get_devdata(master
);
474 dev_set_drvdata(&pdev
->dev
, ss
);
476 switch (res
->flags
& IORESOURCE_MEM_TYPE_MASK
) {
477 case IORESOURCE_MEM_8BIT
:
480 case IORESOURCE_MEM_32BIT
:
484 dev_err(&pdev
->dev
, "No support width\n");
490 ss
->addr
= ioremap(res
->start
, resource_size(res
));
491 if (ss
->addr
== NULL
) {
492 dev_err(&pdev
->dev
, "ioremap error.\n");
496 INIT_LIST_HEAD(&ss
->queue
);
497 spin_lock_init(&ss
->lock
);
498 INIT_WORK(&ss
->ws
, spi_sh_work
);
499 init_waitqueue_head(&ss
->wait
);
500 ss
->workqueue
= create_singlethread_workqueue(
501 dev_name(master
->dev
.parent
));
502 if (ss
->workqueue
== NULL
) {
503 dev_err(&pdev
->dev
, "create workqueue error\n");
508 ret
= request_irq(irq
, spi_sh_irq
, 0, "spi_sh", ss
);
510 dev_err(&pdev
->dev
, "request_irq error\n");
514 master
->num_chipselect
= 2;
515 master
->bus_num
= pdev
->id
;
516 master
->setup
= spi_sh_setup
;
517 master
->transfer
= spi_sh_transfer
;
518 master
->cleanup
= spi_sh_cleanup
;
520 ret
= spi_register_master(master
);
522 printk(KERN_ERR
"spi_register_master error.\n");
531 destroy_workqueue(ss
->workqueue
);
535 spi_master_put(master
);
540 static struct platform_driver spi_sh_driver
= {
541 .probe
= spi_sh_probe
,
542 .remove
= __devexit_p(spi_sh_remove
),
545 .owner
= THIS_MODULE
,
548 module_platform_driver(spi_sh_driver
);
550 MODULE_DESCRIPTION("SH SPI bus driver");
551 MODULE_LICENSE("GPL");
552 MODULE_AUTHOR("Yoshihiro Shimoda");
553 MODULE_ALIAS("platform:sh_spi");