2 * linux/drivers/net/irda/pxaficp_ir.c
4 * Based on sa1100_ir.c by Russell King
6 * Changes copyright (C) 2003-2005 MontaVista Software, Inc.
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License version 2 as
10 * published by the Free Software Foundation.
12 * Infra-red driver (SIR/FIR) for the PXA2xx embedded microprocessor
15 #include <linux/module.h>
16 #include <linux/types.h>
17 #include <linux/init.h>
18 #include <linux/errno.h>
19 #include <linux/netdevice.h>
20 #include <linux/slab.h>
21 #include <linux/rtnetlink.h>
22 #include <linux/interrupt.h>
23 #include <linux/dma-mapping.h>
24 #include <linux/platform_device.h>
27 #include <net/irda/irda.h>
28 #include <net/irda/irmod.h>
29 #include <net/irda/wrapper.h>
30 #include <net/irda/irda_device.h>
34 #include <asm/delay.h>
35 #include <asm/hardware.h>
36 #include <asm/arch/irda.h>
37 #include <asm/arch/pxa-regs.h>
39 #ifdef CONFIG_MACH_MAINSTONE
40 #include <asm/arch/mainstone.h>
43 #define IrSR_RXPL_NEG_IS_ZERO (1<<4)
44 #define IrSR_RXPL_POS_IS_ZERO 0x0
45 #define IrSR_TXPL_NEG_IS_ZERO (1<<3)
46 #define IrSR_TXPL_POS_IS_ZERO 0x0
47 #define IrSR_XMODE_PULSE_1_6 (1<<2)
48 #define IrSR_XMODE_PULSE_3_16 0x0
49 #define IrSR_RCVEIR_IR_MODE (1<<1)
50 #define IrSR_RCVEIR_UART_MODE 0x0
51 #define IrSR_XMITIR_IR_MODE (1<<0)
52 #define IrSR_XMITIR_UART_MODE 0x0
54 #define IrSR_IR_RECEIVE_ON (\
55 IrSR_RXPL_NEG_IS_ZERO | \
56 IrSR_TXPL_POS_IS_ZERO | \
57 IrSR_XMODE_PULSE_3_16 | \
58 IrSR_RCVEIR_IR_MODE | \
59 IrSR_XMITIR_UART_MODE)
61 #define IrSR_IR_TRANSMIT_ON (\
62 IrSR_RXPL_NEG_IS_ZERO | \
63 IrSR_TXPL_POS_IS_ZERO | \
64 IrSR_XMODE_PULSE_3_16 | \
65 IrSR_RCVEIR_UART_MODE | \
71 unsigned long last_oscr;
73 unsigned char *dma_rx_buff;
74 unsigned char *dma_tx_buff;
75 dma_addr_t dma_rx_buff_phy;
76 dma_addr_t dma_tx_buff_phy;
77 unsigned int dma_tx_buff_len;
81 struct net_device_stats stats;
82 struct irlap_cb *irlap;
89 struct pxaficp_platform_data *pdata;
93 #define IS_FIR(si) ((si)->speed >= 4000000)
94 #define IRDA_FRAME_SIZE_LIMIT 2047
96 inline static void pxa_irda_fir_dma_rx_start(struct pxa_irda *si)
98 DCSR(si->rxdma) = DCSR_NODESC;
99 DSADR(si->rxdma) = __PREG(ICDR);
100 DTADR(si->rxdma) = si->dma_rx_buff_phy;
101 DCMD(si->rxdma) = DCMD_INCTRGADDR | DCMD_FLOWSRC | DCMD_WIDTH1 | DCMD_BURST32 | IRDA_FRAME_SIZE_LIMIT;
102 DCSR(si->rxdma) |= DCSR_RUN;
105 inline static void pxa_irda_fir_dma_tx_start(struct pxa_irda *si)
107 DCSR(si->txdma) = DCSR_NODESC;
108 DSADR(si->txdma) = si->dma_tx_buff_phy;
109 DTADR(si->txdma) = __PREG(ICDR);
110 DCMD(si->txdma) = DCMD_INCSRCADDR | DCMD_FLOWTRG | DCMD_ENDIRQEN | DCMD_WIDTH1 | DCMD_BURST32 | si->dma_tx_buff_len;
111 DCSR(si->txdma) |= DCSR_RUN;
115 * Set the IrDA communications speed.
117 static int pxa_irda_set_speed(struct pxa_irda *si, int speed)
120 unsigned int divisor;
123 case 9600: case 19200: case 38400:
124 case 57600: case 115200:
126 /* refer to PXA250/210 Developer's Manual 10-7 */
127 /* BaudRate = 14.7456 MHz / (16*Divisor) */
128 divisor = 14745600 / (16 * speed);
130 local_irq_save(flags);
134 DCSR(si->rxdma) &= ~DCSR_RUN;
137 pxa_set_cken(CKEN13_FICP, 0);
139 /* set board transceiver to SIR mode */
140 si->pdata->transceiver_mode(si->dev, IR_SIRMODE);
142 /* configure GPIO46/47 */
143 pxa_gpio_mode(GPIO46_STRXD_MD);
144 pxa_gpio_mode(GPIO47_STTXD_MD);
146 /* enable the STUART clock */
147 pxa_set_cken(CKEN5_STUART, 1);
150 /* disable STUART first */
153 /* access DLL & DLH */
155 STDLL = divisor & 0xff;
156 STDLH = divisor >> 8;
160 STISR = IrSR_IR_RECEIVE_ON | IrSR_XMODE_PULSE_1_6;
161 STIER = IER_UUE | IER_RLSE | IER_RAVIE | IER_RTIOE;
163 local_irq_restore(flags);
167 local_irq_save(flags);
172 pxa_set_cken(CKEN5_STUART, 0);
174 /* disable FICP first */
177 /* set board transceiver to FIR mode */
178 si->pdata->transceiver_mode(si->dev, IR_FIRMODE);
180 /* configure GPIO46/47 */
181 pxa_gpio_mode(GPIO46_ICPRXD_MD);
182 pxa_gpio_mode(GPIO47_ICPTXD_MD);
184 /* enable the FICP clock */
185 pxa_set_cken(CKEN13_FICP, 1);
188 pxa_irda_fir_dma_rx_start(si);
189 ICCR0 = ICCR0_ITR | ICCR0_RXE;
191 local_irq_restore(flags);
201 /* SIR interrupt service routine. */
202 static irqreturn_t pxa_irda_sir_irq(int irq, void *dev_id, struct pt_regs *regs)
204 struct net_device *dev = dev_id;
205 struct pxa_irda *si = netdev_priv(dev);
210 switch (iir & 0x0F) {
211 case 0x06: /* Receiver Line Status */
213 while (lsr & LSR_FIFOE) {
215 if (lsr & (LSR_OE | LSR_PE | LSR_FE | LSR_BI)) {
216 printk(KERN_DEBUG "pxa_ir: sir receiving error\n");
217 si->stats.rx_errors++;
219 si->stats.rx_frame_errors++;
221 si->stats.rx_fifo_errors++;
223 si->stats.rx_bytes++;
224 async_unwrap_char(dev, &si->stats, &si->rx_buff, data);
228 dev->last_rx = jiffies;
229 si->last_oscr = OSCR;
232 case 0x04: /* Received Data Available */
235 case 0x0C: /* Character Timeout Indication */
237 si->stats.rx_bytes++;
238 async_unwrap_char(dev, &si->stats, &si->rx_buff, STRBR);
239 } while (STLSR & LSR_DR);
240 dev->last_rx = jiffies;
241 si->last_oscr = OSCR;
244 case 0x02: /* Transmit FIFO Data Request */
245 while ((si->tx_buff.len) && (STLSR & LSR_TDRQ)) {
246 STTHR = *si->tx_buff.data++;
247 si->tx_buff.len -= 1;
250 if (si->tx_buff.len == 0) {
251 si->stats.tx_packets++;
252 si->stats.tx_bytes += si->tx_buff.data -
255 /* We need to ensure that the transmitter has finished. */
256 while ((STLSR & LSR_TEMT) == 0)
258 si->last_oscr = OSCR;
261 * Ok, we've finished transmitting. Now enable
262 * the receiver. Sometimes we get a receive IRQ
263 * immediately after a transmit...
266 pxa_irda_set_speed(si, si->newspeed);
269 /* enable IR Receiver, disable IR Transmitter */
270 STISR = IrSR_IR_RECEIVE_ON | IrSR_XMODE_PULSE_1_6;
271 /* enable STUART and receive interrupts */
272 STIER = IER_UUE | IER_RLSE | IER_RAVIE | IER_RTIOE;
275 netif_wake_queue(dev);
283 /* FIR Receive DMA interrupt handler */
284 static void pxa_irda_fir_dma_rx_irq(int channel, void *data, struct pt_regs *regs)
286 int dcsr = DCSR(channel);
288 DCSR(channel) = dcsr & ~DCSR_RUN;
290 printk(KERN_DEBUG "pxa_ir: fir rx dma bus error %#x\n", dcsr);
293 /* FIR Transmit DMA interrupt handler */
294 static void pxa_irda_fir_dma_tx_irq(int channel, void *data, struct pt_regs *regs)
296 struct net_device *dev = data;
297 struct pxa_irda *si = netdev_priv(dev);
300 dcsr = DCSR(channel);
301 DCSR(channel) = dcsr & ~DCSR_RUN;
303 if (dcsr & DCSR_ENDINTR) {
304 si->stats.tx_packets++;
305 si->stats.tx_bytes += si->dma_tx_buff_len;
307 si->stats.tx_errors++;
310 while (ICSR1 & ICSR1_TBY)
312 si->last_oscr = OSCR;
315 * HACK: It looks like the TBY bit is dropped too soon.
316 * Without this delay things break.
321 pxa_irda_set_speed(si, si->newspeed);
325 pxa_irda_fir_dma_rx_start(si);
326 ICCR0 = ICCR0_ITR | ICCR0_RXE;
328 netif_wake_queue(dev);
331 /* EIF(Error in FIFO/End in Frame) handler for FIR */
332 static void pxa_irda_fir_irq_eif(struct pxa_irda *si, struct net_device *dev)
334 unsigned int len, stat, data;
336 /* Get the current data position. */
337 len = DTADR(si->rxdma) - si->dma_rx_buff_phy;
340 /* Read Status, and then Data. */
345 if (stat & (ICSR1_CRE | ICSR1_ROR)) {
346 si->stats.rx_errors++;
347 if (stat & ICSR1_CRE) {
348 printk(KERN_DEBUG "pxa_ir: fir receive CRC error\n");
349 si->stats.rx_crc_errors++;
351 if (stat & ICSR1_ROR) {
352 printk(KERN_DEBUG "pxa_ir: fir receive overrun\n");
353 si->stats.rx_frame_errors++;
356 si->dma_rx_buff[len++] = data;
358 /* If we hit the end of frame, there's no point in continuing. */
359 if (stat & ICSR1_EOF)
361 } while (ICSR0 & ICSR0_EIF);
363 if (stat & ICSR1_EOF) {
365 struct sk_buff *skb = alloc_skb(len+1,GFP_ATOMIC);
367 printk(KERN_ERR "pxa_ir: fir out of memory for receive skb\n");
368 si->stats.rx_dropped++;
372 /* Align IP header to 20 bytes */
374 memcpy(skb->data, si->dma_rx_buff, len);
377 /* Feed it to IrLAP */
379 skb->mac.raw = skb->data;
380 skb->protocol = htons(ETH_P_IRDA);
383 si->stats.rx_packets++;
384 si->stats.rx_bytes += len;
386 dev->last_rx = jiffies;
390 /* FIR interrupt handler */
391 static irqreturn_t pxa_irda_fir_irq(int irq, void *dev_id, struct pt_regs *regs)
393 struct net_device *dev = dev_id;
394 struct pxa_irda *si = netdev_priv(dev);
398 DCSR(si->rxdma) &= ~DCSR_RUN;
399 si->last_oscr = OSCR;
402 if (icsr0 & (ICSR0_FRE | ICSR0_RAB)) {
403 if (icsr0 & ICSR0_FRE) {
404 printk(KERN_DEBUG "pxa_ir: fir receive frame error\n");
405 si->stats.rx_frame_errors++;
407 printk(KERN_DEBUG "pxa_ir: fir receive abort\n");
408 si->stats.rx_errors++;
410 ICSR0 = icsr0 & (ICSR0_FRE | ICSR0_RAB);
413 if (icsr0 & ICSR0_EIF) {
414 /* An error in FIFO occured, or there is a end of frame */
415 pxa_irda_fir_irq_eif(si, dev);
419 pxa_irda_fir_dma_rx_start(si);
420 ICCR0 = ICCR0_ITR | ICCR0_RXE;
425 /* hard_xmit interface of irda device */
426 static int pxa_irda_hard_xmit(struct sk_buff *skb, struct net_device *dev)
428 struct pxa_irda *si = netdev_priv(dev);
429 int speed = irda_get_next_speed(skb);
432 * Does this packet contain a request to change the interface
433 * speed? If so, remember it until we complete the transmission
436 if (speed != si->speed && speed != -1)
437 si->newspeed = speed;
440 * If this is an empty frame, we can bypass a lot.
445 pxa_irda_set_speed(si, speed);
451 netif_stop_queue(dev);
454 si->tx_buff.data = si->tx_buff.head;
455 si->tx_buff.len = async_wrap_skb(skb, si->tx_buff.data, si->tx_buff.truesize);
457 /* Disable STUART interrupts and switch to transmit mode. */
459 STISR = IrSR_IR_TRANSMIT_ON | IrSR_XMODE_PULSE_1_6;
461 /* enable STUART and transmit interrupts */
462 STIER = IER_UUE | IER_TIE;
464 unsigned long mtt = irda_get_mtt(skb);
466 si->dma_tx_buff_len = skb->len;
467 memcpy(si->dma_tx_buff, skb->data, skb->len);
470 while ((unsigned)(OSCR - si->last_oscr)/4 < mtt)
473 /* stop RX DMA, disable FICP */
474 DCSR(si->rxdma) &= ~DCSR_RUN;
477 pxa_irda_fir_dma_tx_start(si);
478 ICCR0 = ICCR0_ITR | ICCR0_TXE;
482 dev->trans_start = jiffies;
486 static int pxa_irda_ioctl(struct net_device *dev, struct ifreq *ifreq, int cmd)
488 struct if_irda_req *rq = (struct if_irda_req *)ifreq;
489 struct pxa_irda *si = netdev_priv(dev);
495 if (capable(CAP_NET_ADMIN)) {
497 * We are unable to set the speed if the
498 * device is not running.
500 if (netif_running(dev)) {
501 ret = pxa_irda_set_speed(si,
504 printk(KERN_INFO "pxa_ir: SIOCSBANDWIDTH: !netif_running\n");
512 if (capable(CAP_NET_ADMIN)) {
513 irda_device_set_media_busy(dev, TRUE);
520 rq->ifr_receiving = IS_FIR(si) ? 0
521 : si->rx_buff.state != OUTSIDE_FRAME;
532 static struct net_device_stats *pxa_irda_stats(struct net_device *dev)
534 struct pxa_irda *si = netdev_priv(dev);
538 static void pxa_irda_startup(struct pxa_irda *si)
540 /* Disable STUART interrupts */
542 /* enable STUART interrupt to the processor */
544 /* configure SIR frame format: StartBit - Data 7 ... Data 0 - Stop Bit */
545 STLCR = LCR_WLS0 | LCR_WLS1;
546 /* enable FIFO, we use FIFO to improve performance */
547 STFCR = FCR_TRFIFOE | FCR_ITL_32;
551 /* configure FICP ICCR2 */
552 ICCR2 = ICCR2_TXP | ICCR2_TRIG_32;
555 DRCMR17 = si->rxdma | DRCMR_MAPVLD;
556 DRCMR18 = si->txdma | DRCMR_MAPVLD;
558 /* force SIR reinitialization */
560 pxa_irda_set_speed(si, 9600);
562 printk(KERN_DEBUG "pxa_ir: irda startup\n");
565 static void pxa_irda_shutdown(struct pxa_irda *si)
569 local_irq_save(flags);
571 /* disable STUART and interrupt */
573 /* disable STUART SIR mode */
575 /* disable the STUART clock */
576 pxa_set_cken(CKEN5_STUART, 0);
579 DCSR(si->txdma) &= ~DCSR_RUN;
580 DCSR(si->rxdma) &= ~DCSR_RUN;
583 /* disable the FICP clock */
584 pxa_set_cken(CKEN13_FICP, 0);
589 local_irq_restore(flags);
591 /* power off board transceiver */
592 si->pdata->transceiver_mode(si->dev, IR_OFF);
594 printk(KERN_DEBUG "pxa_ir: irda shutdown\n");
597 static int pxa_irda_start(struct net_device *dev)
599 struct pxa_irda *si = netdev_priv(dev);
604 err = request_irq(IRQ_STUART, pxa_irda_sir_irq, 0, dev->name, dev);
608 err = request_irq(IRQ_ICP, pxa_irda_fir_irq, 0, dev->name, dev);
613 * The interrupt must remain disabled for now.
615 disable_irq(IRQ_STUART);
616 disable_irq(IRQ_ICP);
619 si->rxdma = pxa_request_dma("FICP_RX",DMA_PRIO_LOW, pxa_irda_fir_dma_rx_irq, dev);
623 si->txdma = pxa_request_dma("FICP_TX",DMA_PRIO_LOW, pxa_irda_fir_dma_tx_irq, dev);
628 si->dma_rx_buff = dma_alloc_coherent(si->dev, IRDA_FRAME_SIZE_LIMIT,
629 &si->dma_rx_buff_phy, GFP_KERNEL );
630 if (!si->dma_rx_buff)
631 goto err_dma_rx_buff;
633 si->dma_tx_buff = dma_alloc_coherent(si->dev, IRDA_FRAME_SIZE_LIMIT,
634 &si->dma_tx_buff_phy, GFP_KERNEL );
635 if (!si->dma_tx_buff)
636 goto err_dma_tx_buff;
638 /* Setup the serial port for the initial speed. */
639 pxa_irda_startup(si);
642 * Open a new IrLAP layer instance.
644 si->irlap = irlap_open(dev, &si->qos, "pxa");
650 * Now enable the interrupt and start the queue
652 enable_irq(IRQ_STUART);
654 netif_start_queue(dev);
656 printk(KERN_DEBUG "pxa_ir: irda driver opened\n");
661 pxa_irda_shutdown(si);
662 dma_free_coherent(si->dev, IRDA_FRAME_SIZE_LIMIT, si->dma_tx_buff, si->dma_tx_buff_phy);
664 dma_free_coherent(si->dev, IRDA_FRAME_SIZE_LIMIT, si->dma_rx_buff, si->dma_rx_buff_phy);
666 pxa_free_dma(si->txdma);
668 pxa_free_dma(si->rxdma);
670 free_irq(IRQ_ICP, dev);
672 free_irq(IRQ_STUART, dev);
678 static int pxa_irda_stop(struct net_device *dev)
680 struct pxa_irda *si = netdev_priv(dev);
682 netif_stop_queue(dev);
684 pxa_irda_shutdown(si);
688 irlap_close(si->irlap);
692 free_irq(IRQ_STUART, dev);
693 free_irq(IRQ_ICP, dev);
695 pxa_free_dma(si->rxdma);
696 pxa_free_dma(si->txdma);
699 dma_free_coherent(si->dev, IRDA_FRAME_SIZE_LIMIT, si->dma_tx_buff, si->dma_tx_buff_phy);
701 dma_free_coherent(si->dev, IRDA_FRAME_SIZE_LIMIT, si->dma_rx_buff, si->dma_rx_buff_phy);
703 printk(KERN_DEBUG "pxa_ir: irda driver closed\n");
707 static int pxa_irda_suspend(struct device *_dev, pm_message_t state)
709 struct net_device *dev = dev_get_drvdata(_dev);
712 if (dev && netif_running(dev)) {
713 si = netdev_priv(dev);
714 netif_device_detach(dev);
715 pxa_irda_shutdown(si);
721 static int pxa_irda_resume(struct device *_dev)
723 struct net_device *dev = dev_get_drvdata(_dev);
726 if (dev && netif_running(dev)) {
727 si = netdev_priv(dev);
728 pxa_irda_startup(si);
729 netif_device_attach(dev);
730 netif_wake_queue(dev);
737 static int pxa_irda_init_iobuf(iobuff_t *io, int size)
739 io->head = kmalloc(size, GFP_KERNEL | GFP_DMA);
740 if (io->head != NULL) {
742 io->in_frame = FALSE;
743 io->state = OUTSIDE_FRAME;
746 return io->head ? 0 : -ENOMEM;
749 static int pxa_irda_probe(struct device *_dev)
751 struct platform_device *pdev = to_platform_device(_dev);
752 struct net_device *dev;
754 unsigned int baudrate_mask;
757 if (!pdev->dev.platform_data)
760 err = request_mem_region(__PREG(STUART), 0x24, "IrDA") ? 0 : -EBUSY;
764 err = request_mem_region(__PREG(FICP), 0x1c, "IrDA") ? 0 : -EBUSY;
768 dev = alloc_irdadev(sizeof(struct pxa_irda));
772 si = netdev_priv(dev);
773 si->dev = &pdev->dev;
774 si->pdata = pdev->dev.platform_data;
777 * Initialise the SIR buffers
779 err = pxa_irda_init_iobuf(&si->rx_buff, 14384);
782 err = pxa_irda_init_iobuf(&si->tx_buff, 4000);
786 dev->hard_start_xmit = pxa_irda_hard_xmit;
787 dev->open = pxa_irda_start;
788 dev->stop = pxa_irda_stop;
789 dev->do_ioctl = pxa_irda_ioctl;
790 dev->get_stats = pxa_irda_stats;
792 irda_init_max_qos_capabilies(&si->qos);
795 if (si->pdata->transceiver_cap & IR_SIRMODE)
796 baudrate_mask |= IR_9600|IR_19200|IR_38400|IR_57600|IR_115200;
797 if (si->pdata->transceiver_cap & IR_FIRMODE)
798 baudrate_mask |= IR_4000000 << 8;
800 si->qos.baud_rate.bits &= baudrate_mask;
801 si->qos.min_turn_time.bits = 7; /* 1ms or more */
803 irda_qos_bits_to_value(&si->qos);
805 err = register_netdev(dev);
808 dev_set_drvdata(&pdev->dev, dev);
811 kfree(si->tx_buff.head);
813 kfree(si->rx_buff.head);
817 release_mem_region(__PREG(FICP), 0x1c);
819 release_mem_region(__PREG(STUART), 0x24);
825 static int pxa_irda_remove(struct device *_dev)
827 struct net_device *dev = dev_get_drvdata(_dev);
830 struct pxa_irda *si = netdev_priv(dev);
831 unregister_netdev(dev);
832 kfree(si->tx_buff.head);
833 kfree(si->rx_buff.head);
837 release_mem_region(__PREG(STUART), 0x24);
838 release_mem_region(__PREG(FICP), 0x1c);
843 static struct device_driver pxa_ir_driver = {
845 .bus = &platform_bus_type,
846 .probe = pxa_irda_probe,
847 .remove = pxa_irda_remove,
848 .suspend = pxa_irda_suspend,
849 .resume = pxa_irda_resume,
852 static int __init pxa_irda_init(void)
854 return driver_register(&pxa_ir_driver);
857 static void __exit pxa_irda_exit(void)
859 driver_unregister(&pxa_ir_driver);
862 module_init(pxa_irda_init);
863 module_exit(pxa_irda_exit);
865 MODULE_LICENSE("GPL");