Merge branch 'devel' of master.kernel.org:/home/rmk/linux-2.6-arm
[linux-2.6.git] / drivers / net / irda / pxaficp_ir.c
1 /*
2  * linux/drivers/net/irda/pxaficp_ir.c
3  *
4  * Based on sa1100_ir.c by Russell King
5  *
6  * Changes copyright (C) 2003-2005 MontaVista Software, Inc.
7  *
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.
11  *
12  * Infra-red driver (SIR/FIR) for the PXA2xx embedded microprocessor
13  *
14  */
15 #include <linux/module.h>
16 #include <linux/netdevice.h>
17 #include <linux/platform_device.h>
18 #include <linux/clk.h>
19
20 #include <net/irda/irda.h>
21 #include <net/irda/irmod.h>
22 #include <net/irda/wrapper.h>
23 #include <net/irda/irda_device.h>
24
25 #include <mach/dma.h>
26 #include <mach/irda.h>
27 #include <mach/hardware.h>
28 #include <mach/pxa-regs.h>
29 #include <mach/regs-uart.h>
30
31 #define FICP            __REG(0x40800000)  /* Start of FICP area */
32 #define ICCR0           __REG(0x40800000)  /* ICP Control Register 0 */
33 #define ICCR1           __REG(0x40800004)  /* ICP Control Register 1 */
34 #define ICCR2           __REG(0x40800008)  /* ICP Control Register 2 */
35 #define ICDR            __REG(0x4080000c)  /* ICP Data Register */
36 #define ICSR0           __REG(0x40800014)  /* ICP Status Register 0 */
37 #define ICSR1           __REG(0x40800018)  /* ICP Status Register 1 */
38
39 #define ICCR0_AME       (1 << 7)        /* Address match enable */
40 #define ICCR0_TIE       (1 << 6)        /* Transmit FIFO interrupt enable */
41 #define ICCR0_RIE       (1 << 5)        /* Recieve FIFO interrupt enable */
42 #define ICCR0_RXE       (1 << 4)        /* Receive enable */
43 #define ICCR0_TXE       (1 << 3)        /* Transmit enable */
44 #define ICCR0_TUS       (1 << 2)        /* Transmit FIFO underrun select */
45 #define ICCR0_LBM       (1 << 1)        /* Loopback mode */
46 #define ICCR0_ITR       (1 << 0)        /* IrDA transmission */
47
48 #define ICCR2_RXP       (1 << 3)        /* Receive Pin Polarity select */
49 #define ICCR2_TXP       (1 << 2)        /* Transmit Pin Polarity select */
50 #define ICCR2_TRIG      (3 << 0)        /* Receive FIFO Trigger threshold */
51 #define ICCR2_TRIG_8    (0 << 0)        /*      >= 8 bytes */
52 #define ICCR2_TRIG_16   (1 << 0)        /*      >= 16 bytes */
53 #define ICCR2_TRIG_32   (2 << 0)        /*      >= 32 bytes */
54
55 #ifdef CONFIG_PXA27x
56 #define ICSR0_EOC       (1 << 6)        /* DMA End of Descriptor Chain */
57 #endif
58 #define ICSR0_FRE       (1 << 5)        /* Framing error */
59 #define ICSR0_RFS       (1 << 4)        /* Receive FIFO service request */
60 #define ICSR0_TFS       (1 << 3)        /* Transnit FIFO service request */
61 #define ICSR0_RAB       (1 << 2)        /* Receiver abort */
62 #define ICSR0_TUR       (1 << 1)        /* Trunsmit FIFO underun */
63 #define ICSR0_EIF       (1 << 0)        /* End/Error in FIFO */
64
65 #define ICSR1_ROR       (1 << 6)        /* Receiver FIFO underrun  */
66 #define ICSR1_CRE       (1 << 5)        /* CRC error */
67 #define ICSR1_EOF       (1 << 4)        /* End of frame */
68 #define ICSR1_TNF       (1 << 3)        /* Transmit FIFO not full */
69 #define ICSR1_RNE       (1 << 2)        /* Receive FIFO not empty */
70 #define ICSR1_TBY       (1 << 1)        /* Tramsmiter busy flag */
71 #define ICSR1_RSY       (1 << 0)        /* Recevier synchronized flag */
72
73 #define IrSR_RXPL_NEG_IS_ZERO (1<<4)
74 #define IrSR_RXPL_POS_IS_ZERO 0x0
75 #define IrSR_TXPL_NEG_IS_ZERO (1<<3)
76 #define IrSR_TXPL_POS_IS_ZERO 0x0
77 #define IrSR_XMODE_PULSE_1_6  (1<<2)
78 #define IrSR_XMODE_PULSE_3_16 0x0
79 #define IrSR_RCVEIR_IR_MODE   (1<<1)
80 #define IrSR_RCVEIR_UART_MODE 0x0
81 #define IrSR_XMITIR_IR_MODE   (1<<0)
82 #define IrSR_XMITIR_UART_MODE 0x0
83
84 #define IrSR_IR_RECEIVE_ON (\
85                 IrSR_RXPL_NEG_IS_ZERO | \
86                 IrSR_TXPL_POS_IS_ZERO | \
87                 IrSR_XMODE_PULSE_3_16 | \
88                 IrSR_RCVEIR_IR_MODE   | \
89                 IrSR_XMITIR_UART_MODE)
90
91 #define IrSR_IR_TRANSMIT_ON (\
92                 IrSR_RXPL_NEG_IS_ZERO | \
93                 IrSR_TXPL_POS_IS_ZERO | \
94                 IrSR_XMODE_PULSE_3_16 | \
95                 IrSR_RCVEIR_UART_MODE | \
96                 IrSR_XMITIR_IR_MODE)
97
98 struct pxa_irda {
99         int                     speed;
100         int                     newspeed;
101         unsigned long           last_oscr;
102
103         unsigned char           *dma_rx_buff;
104         unsigned char           *dma_tx_buff;
105         dma_addr_t              dma_rx_buff_phy;
106         dma_addr_t              dma_tx_buff_phy;
107         unsigned int            dma_tx_buff_len;
108         int                     txdma;
109         int                     rxdma;
110
111         struct net_device_stats stats;
112         struct irlap_cb         *irlap;
113         struct qos_info         qos;
114
115         iobuff_t                tx_buff;
116         iobuff_t                rx_buff;
117
118         struct device           *dev;
119         struct pxaficp_platform_data *pdata;
120         struct clk              *fir_clk;
121         struct clk              *sir_clk;
122         struct clk              *cur_clk;
123 };
124
125 static inline void pxa_irda_disable_clk(struct pxa_irda *si)
126 {
127         if (si->cur_clk)
128                 clk_disable(si->cur_clk);
129         si->cur_clk = NULL;
130 }
131
132 static inline void pxa_irda_enable_firclk(struct pxa_irda *si)
133 {
134         si->cur_clk = si->fir_clk;
135         clk_enable(si->fir_clk);
136 }
137
138 static inline void pxa_irda_enable_sirclk(struct pxa_irda *si)
139 {
140         si->cur_clk = si->sir_clk;
141         clk_enable(si->sir_clk);
142 }
143
144
145 #define IS_FIR(si)              ((si)->speed >= 4000000)
146 #define IRDA_FRAME_SIZE_LIMIT   2047
147
148 inline static void pxa_irda_fir_dma_rx_start(struct pxa_irda *si)
149 {
150         DCSR(si->rxdma)  = DCSR_NODESC;
151         DSADR(si->rxdma) = __PREG(ICDR);
152         DTADR(si->rxdma) = si->dma_rx_buff_phy;
153         DCMD(si->rxdma) = DCMD_INCTRGADDR | DCMD_FLOWSRC |  DCMD_WIDTH1 | DCMD_BURST32 | IRDA_FRAME_SIZE_LIMIT;
154         DCSR(si->rxdma) |= DCSR_RUN;
155 }
156
157 inline static void pxa_irda_fir_dma_tx_start(struct pxa_irda *si)
158 {
159         DCSR(si->txdma)  = DCSR_NODESC;
160         DSADR(si->txdma) = si->dma_tx_buff_phy;
161         DTADR(si->txdma) = __PREG(ICDR);
162         DCMD(si->txdma) = DCMD_INCSRCADDR | DCMD_FLOWTRG |  DCMD_ENDIRQEN | DCMD_WIDTH1 | DCMD_BURST32 | si->dma_tx_buff_len;
163         DCSR(si->txdma) |= DCSR_RUN;
164 }
165
166 /*
167  * Set the IrDA communications speed.
168  */
169 static int pxa_irda_set_speed(struct pxa_irda *si, int speed)
170 {
171         unsigned long flags;
172         unsigned int divisor;
173
174         switch (speed) {
175         case 9600:      case 19200:     case 38400:
176         case 57600:     case 115200:
177
178                 /* refer to PXA250/210 Developer's Manual 10-7 */
179                 /*  BaudRate = 14.7456 MHz / (16*Divisor) */
180                 divisor = 14745600 / (16 * speed);
181
182                 local_irq_save(flags);
183
184                 if (IS_FIR(si)) {
185                         /* stop RX DMA */
186                         DCSR(si->rxdma) &= ~DCSR_RUN;
187                         /* disable FICP */
188                         ICCR0 = 0;
189                         pxa_irda_disable_clk(si);
190
191                         /* set board transceiver to SIR mode */
192                         si->pdata->transceiver_mode(si->dev, IR_SIRMODE);
193
194                         /* enable the STUART clock */
195                         pxa_irda_enable_sirclk(si);
196                 }
197
198                 /* disable STUART first */
199                 STIER = 0;
200
201                 /* access DLL & DLH */
202                 STLCR |= LCR_DLAB;
203                 STDLL = divisor & 0xff;
204                 STDLH = divisor >> 8;
205                 STLCR &= ~LCR_DLAB;
206
207                 si->speed = speed;
208                 STISR = IrSR_IR_RECEIVE_ON | IrSR_XMODE_PULSE_1_6;
209                 STIER = IER_UUE | IER_RLSE | IER_RAVIE | IER_RTIOE;
210
211                 local_irq_restore(flags);
212                 break;
213
214         case 4000000:
215                 local_irq_save(flags);
216
217                 /* disable STUART */
218                 STIER = 0;
219                 STISR = 0;
220                 pxa_irda_disable_clk(si);
221
222                 /* disable FICP first */
223                 ICCR0 = 0;
224
225                 /* set board transceiver to FIR mode */
226                 si->pdata->transceiver_mode(si->dev, IR_FIRMODE);
227
228                 /* enable the FICP clock */
229                 pxa_irda_enable_firclk(si);
230
231                 si->speed = speed;
232                 pxa_irda_fir_dma_rx_start(si);
233                 ICCR0 = ICCR0_ITR | ICCR0_RXE;
234
235                 local_irq_restore(flags);
236                 break;
237
238         default:
239                 return -EINVAL;
240         }
241
242         return 0;
243 }
244
245 /* SIR interrupt service routine. */
246 static irqreturn_t pxa_irda_sir_irq(int irq, void *dev_id)
247 {
248         struct net_device *dev = dev_id;
249         struct pxa_irda *si = netdev_priv(dev);
250         int iir, lsr, data;
251
252         iir = STIIR;
253
254         switch  (iir & 0x0F) {
255         case 0x06: /* Receiver Line Status */
256                 lsr = STLSR;
257                 while (lsr & LSR_FIFOE) {
258                         data = STRBR;
259                         if (lsr & (LSR_OE | LSR_PE | LSR_FE | LSR_BI)) {
260                                 printk(KERN_DEBUG "pxa_ir: sir receiving error\n");
261                                 si->stats.rx_errors++;
262                                 if (lsr & LSR_FE)
263                                         si->stats.rx_frame_errors++;
264                                 if (lsr & LSR_OE)
265                                         si->stats.rx_fifo_errors++;
266                         } else {
267                                 si->stats.rx_bytes++;
268                                 async_unwrap_char(dev, &si->stats, &si->rx_buff, data);
269                         }
270                         lsr = STLSR;
271                 }
272                 si->last_oscr = OSCR;
273                 break;
274
275         case 0x04: /* Received Data Available */
276                    /* forth through */
277
278         case 0x0C: /* Character Timeout Indication */
279                 do  {
280                     si->stats.rx_bytes++;
281                     async_unwrap_char(dev, &si->stats, &si->rx_buff, STRBR);
282                 } while (STLSR & LSR_DR);
283                 si->last_oscr = OSCR;
284                 break;
285
286         case 0x02: /* Transmit FIFO Data Request */
287                 while ((si->tx_buff.len) && (STLSR & LSR_TDRQ)) {
288                         STTHR = *si->tx_buff.data++;
289                         si->tx_buff.len -= 1;
290                 }
291
292                 if (si->tx_buff.len == 0) {
293                         si->stats.tx_packets++;
294                         si->stats.tx_bytes += si->tx_buff.data -
295                                               si->tx_buff.head;
296
297                         /* We need to ensure that the transmitter has finished. */
298                         while ((STLSR & LSR_TEMT) == 0)
299                                 cpu_relax();
300                         si->last_oscr = OSCR;
301
302                         /*
303                         * Ok, we've finished transmitting.  Now enable
304                         * the receiver.  Sometimes we get a receive IRQ
305                         * immediately after a transmit...
306                         */
307                         if (si->newspeed) {
308                                 pxa_irda_set_speed(si, si->newspeed);
309                                 si->newspeed = 0;
310                         } else {
311                                 /* enable IR Receiver, disable IR Transmitter */
312                                 STISR = IrSR_IR_RECEIVE_ON | IrSR_XMODE_PULSE_1_6;
313                                 /* enable STUART and receive interrupts */
314                                 STIER = IER_UUE | IER_RLSE | IER_RAVIE | IER_RTIOE;
315                         }
316                         /* I'm hungry! */
317                         netif_wake_queue(dev);
318                 }
319                 break;
320         }
321
322         return IRQ_HANDLED;
323 }
324
325 /* FIR Receive DMA interrupt handler */
326 static void pxa_irda_fir_dma_rx_irq(int channel, void *data)
327 {
328         int dcsr = DCSR(channel);
329
330         DCSR(channel) = dcsr & ~DCSR_RUN;
331
332         printk(KERN_DEBUG "pxa_ir: fir rx dma bus error %#x\n", dcsr);
333 }
334
335 /* FIR Transmit DMA interrupt handler */
336 static void pxa_irda_fir_dma_tx_irq(int channel, void *data)
337 {
338         struct net_device *dev = data;
339         struct pxa_irda *si = netdev_priv(dev);
340         int dcsr;
341
342         dcsr = DCSR(channel);
343         DCSR(channel) = dcsr & ~DCSR_RUN;
344
345         if (dcsr & DCSR_ENDINTR)  {
346                 si->stats.tx_packets++;
347                 si->stats.tx_bytes += si->dma_tx_buff_len;
348         } else {
349                 si->stats.tx_errors++;
350         }
351
352         while (ICSR1 & ICSR1_TBY)
353                 cpu_relax();
354         si->last_oscr = OSCR;
355
356         /*
357          * HACK: It looks like the TBY bit is dropped too soon.
358          * Without this delay things break.
359          */
360         udelay(120);
361
362         if (si->newspeed) {
363                 pxa_irda_set_speed(si, si->newspeed);
364                 si->newspeed = 0;
365         } else {
366                 int i = 64;
367
368                 ICCR0 = 0;
369                 pxa_irda_fir_dma_rx_start(si);
370                 while ((ICSR1 & ICSR1_RNE) && i--)
371                         (void)ICDR;
372                 ICCR0 = ICCR0_ITR | ICCR0_RXE;
373
374                 if (i < 0)
375                         printk(KERN_ERR "pxa_ir: cannot clear Rx FIFO!\n");
376         }
377         netif_wake_queue(dev);
378 }
379
380 /* EIF(Error in FIFO/End in Frame) handler for FIR */
381 static void pxa_irda_fir_irq_eif(struct pxa_irda *si, struct net_device *dev, int icsr0)
382 {
383         unsigned int len, stat, data;
384
385         /* Get the current data position. */
386         len = DTADR(si->rxdma) - si->dma_rx_buff_phy;
387
388         do {
389                 /* Read Status, and then Data.   */
390                 stat = ICSR1;
391                 rmb();
392                 data = ICDR;
393
394                 if (stat & (ICSR1_CRE | ICSR1_ROR)) {
395                         si->stats.rx_errors++;
396                         if (stat & ICSR1_CRE) {
397                                 printk(KERN_DEBUG "pxa_ir: fir receive CRC error\n");
398                                 si->stats.rx_crc_errors++;
399                         }
400                         if (stat & ICSR1_ROR) {
401                                 printk(KERN_DEBUG "pxa_ir: fir receive overrun\n");
402                                 si->stats.rx_over_errors++;
403                         }
404                 } else  {
405                         si->dma_rx_buff[len++] = data;
406                 }
407                 /* If we hit the end of frame, there's no point in continuing. */
408                 if (stat & ICSR1_EOF)
409                         break;
410         } while (ICSR0 & ICSR0_EIF);
411
412         if (stat & ICSR1_EOF) {
413                 /* end of frame. */
414                 struct sk_buff *skb;
415
416                 if (icsr0 & ICSR0_FRE) {
417                         printk(KERN_ERR "pxa_ir: dropping erroneous frame\n");
418                         si->stats.rx_dropped++;
419                         return;
420                 }
421
422                 skb = alloc_skb(len+1,GFP_ATOMIC);
423                 if (!skb)  {
424                         printk(KERN_ERR "pxa_ir: fir out of memory for receive skb\n");
425                         si->stats.rx_dropped++;
426                         return;
427                 }
428
429                 /* Align IP header to 20 bytes  */
430                 skb_reserve(skb, 1);
431                 skb_copy_to_linear_data(skb, si->dma_rx_buff, len);
432                 skb_put(skb, len);
433
434                 /* Feed it to IrLAP  */
435                 skb->dev = dev;
436                 skb_reset_mac_header(skb);
437                 skb->protocol = htons(ETH_P_IRDA);
438                 netif_rx(skb);
439
440                 si->stats.rx_packets++;
441                 si->stats.rx_bytes += len;
442         }
443 }
444
445 /* FIR interrupt handler */
446 static irqreturn_t pxa_irda_fir_irq(int irq, void *dev_id)
447 {
448         struct net_device *dev = dev_id;
449         struct pxa_irda *si = netdev_priv(dev);
450         int icsr0, i = 64;
451
452         /* stop RX DMA */
453         DCSR(si->rxdma) &= ~DCSR_RUN;
454         si->last_oscr = OSCR;
455         icsr0 = ICSR0;
456
457         if (icsr0 & (ICSR0_FRE | ICSR0_RAB)) {
458                 if (icsr0 & ICSR0_FRE) {
459                         printk(KERN_DEBUG "pxa_ir: fir receive frame error\n");
460                         si->stats.rx_frame_errors++;
461                 } else {
462                         printk(KERN_DEBUG "pxa_ir: fir receive abort\n");
463                         si->stats.rx_errors++;
464                 }
465                 ICSR0 = icsr0 & (ICSR0_FRE | ICSR0_RAB);
466         }
467
468         if (icsr0 & ICSR0_EIF) {
469                 /* An error in FIFO occured, or there is a end of frame */
470                 pxa_irda_fir_irq_eif(si, dev, icsr0);
471         }
472
473         ICCR0 = 0;
474         pxa_irda_fir_dma_rx_start(si);
475         while ((ICSR1 & ICSR1_RNE) && i--)
476                 (void)ICDR;
477         ICCR0 = ICCR0_ITR | ICCR0_RXE;
478
479         if (i < 0)
480                 printk(KERN_ERR "pxa_ir: cannot clear Rx FIFO!\n");
481
482         return IRQ_HANDLED;
483 }
484
485 /* hard_xmit interface of irda device */
486 static int pxa_irda_hard_xmit(struct sk_buff *skb, struct net_device *dev)
487 {
488         struct pxa_irda *si = netdev_priv(dev);
489         int speed = irda_get_next_speed(skb);
490
491         /*
492          * Does this packet contain a request to change the interface
493          * speed?  If so, remember it until we complete the transmission
494          * of this frame.
495          */
496         if (speed != si->speed && speed != -1)
497                 si->newspeed = speed;
498
499         /*
500          * If this is an empty frame, we can bypass a lot.
501          */
502         if (skb->len == 0) {
503                 if (si->newspeed) {
504                         si->newspeed = 0;
505                         pxa_irda_set_speed(si, speed);
506                 }
507                 dev_kfree_skb(skb);
508                 return 0;
509         }
510
511         netif_stop_queue(dev);
512
513         if (!IS_FIR(si)) {
514                 si->tx_buff.data = si->tx_buff.head;
515                 si->tx_buff.len  = async_wrap_skb(skb, si->tx_buff.data, si->tx_buff.truesize);
516
517                 /* Disable STUART interrupts and switch to transmit mode. */
518                 STIER = 0;
519                 STISR = IrSR_IR_TRANSMIT_ON | IrSR_XMODE_PULSE_1_6;
520
521                 /* enable STUART and transmit interrupts */
522                 STIER = IER_UUE | IER_TIE;
523         } else {
524                 unsigned long mtt = irda_get_mtt(skb);
525
526                 si->dma_tx_buff_len = skb->len;
527                 skb_copy_from_linear_data(skb, si->dma_tx_buff, skb->len);
528
529                 if (mtt)
530                         while ((unsigned)(OSCR - si->last_oscr)/4 < mtt)
531                                 cpu_relax();
532
533                 /* stop RX DMA,  disable FICP */
534                 DCSR(si->rxdma) &= ~DCSR_RUN;
535                 ICCR0 = 0;
536
537                 pxa_irda_fir_dma_tx_start(si);
538                 ICCR0 = ICCR0_ITR | ICCR0_TXE;
539         }
540
541         dev_kfree_skb(skb);
542         dev->trans_start = jiffies;
543         return 0;
544 }
545
546 static int pxa_irda_ioctl(struct net_device *dev, struct ifreq *ifreq, int cmd)
547 {
548         struct if_irda_req *rq = (struct if_irda_req *)ifreq;
549         struct pxa_irda *si = netdev_priv(dev);
550         int ret;
551
552         switch (cmd) {
553         case SIOCSBANDWIDTH:
554                 ret = -EPERM;
555                 if (capable(CAP_NET_ADMIN)) {
556                         /*
557                          * We are unable to set the speed if the
558                          * device is not running.
559                          */
560                         if (netif_running(dev)) {
561                                 ret = pxa_irda_set_speed(si,
562                                                 rq->ifr_baudrate);
563                         } else {
564                                 printk(KERN_INFO "pxa_ir: SIOCSBANDWIDTH: !netif_running\n");
565                                 ret = 0;
566                         }
567                 }
568                 break;
569
570         case SIOCSMEDIABUSY:
571                 ret = -EPERM;
572                 if (capable(CAP_NET_ADMIN)) {
573                         irda_device_set_media_busy(dev, TRUE);
574                         ret = 0;
575                 }
576                 break;
577
578         case SIOCGRECEIVING:
579                 ret = 0;
580                 rq->ifr_receiving = IS_FIR(si) ? 0
581                                         : si->rx_buff.state != OUTSIDE_FRAME;
582                 break;
583
584         default:
585                 ret = -EOPNOTSUPP;
586                 break;
587         }
588
589         return ret;
590 }
591
592 static struct net_device_stats *pxa_irda_stats(struct net_device *dev)
593 {
594         struct pxa_irda *si = netdev_priv(dev);
595         return &si->stats;
596 }
597
598 static void pxa_irda_startup(struct pxa_irda *si)
599 {
600         /* Disable STUART interrupts */
601         STIER = 0;
602         /* enable STUART interrupt to the processor */
603         STMCR = MCR_OUT2;
604         /* configure SIR frame format: StartBit - Data 7 ... Data 0 - Stop Bit */
605         STLCR = LCR_WLS0 | LCR_WLS1;
606         /* enable FIFO, we use FIFO to improve performance */
607         STFCR = FCR_TRFIFOE | FCR_ITL_32;
608
609         /* disable FICP */
610         ICCR0 = 0;
611         /* configure FICP ICCR2 */
612         ICCR2 = ICCR2_TXP | ICCR2_TRIG_32;
613
614         /* configure DMAC */
615         DRCMR(17) = si->rxdma | DRCMR_MAPVLD;
616         DRCMR(18) = si->txdma | DRCMR_MAPVLD;
617
618         /* force SIR reinitialization */
619         si->speed = 4000000;
620         pxa_irda_set_speed(si, 9600);
621
622         printk(KERN_DEBUG "pxa_ir: irda startup\n");
623 }
624
625 static void pxa_irda_shutdown(struct pxa_irda *si)
626 {
627         unsigned long flags;
628
629         local_irq_save(flags);
630
631         /* disable STUART and interrupt */
632         STIER = 0;
633         /* disable STUART SIR mode */
634         STISR = 0;
635
636         /* disable DMA */
637         DCSR(si->txdma) &= ~DCSR_RUN;
638         DCSR(si->rxdma) &= ~DCSR_RUN;
639         /* disable FICP */
640         ICCR0 = 0;
641
642         /* disable the STUART or FICP clocks */
643         pxa_irda_disable_clk(si);
644
645         DRCMR(17) = 0;
646         DRCMR(18) = 0;
647
648         local_irq_restore(flags);
649
650         /* power off board transceiver */
651         si->pdata->transceiver_mode(si->dev, IR_OFF);
652
653         printk(KERN_DEBUG "pxa_ir: irda shutdown\n");
654 }
655
656 static int pxa_irda_start(struct net_device *dev)
657 {
658         struct pxa_irda *si = netdev_priv(dev);
659         int err;
660
661         si->speed = 9600;
662
663         err = request_irq(IRQ_STUART, pxa_irda_sir_irq, 0, dev->name, dev);
664         if (err)
665                 goto err_irq1;
666
667         err = request_irq(IRQ_ICP, pxa_irda_fir_irq, 0, dev->name, dev);
668         if (err)
669                 goto err_irq2;
670
671         /*
672          * The interrupt must remain disabled for now.
673          */
674         disable_irq(IRQ_STUART);
675         disable_irq(IRQ_ICP);
676
677         err = -EBUSY;
678         si->rxdma = pxa_request_dma("FICP_RX",DMA_PRIO_LOW, pxa_irda_fir_dma_rx_irq, dev);
679         if (si->rxdma < 0)
680                 goto err_rx_dma;
681
682         si->txdma = pxa_request_dma("FICP_TX",DMA_PRIO_LOW, pxa_irda_fir_dma_tx_irq, dev);
683         if (si->txdma < 0)
684                 goto err_tx_dma;
685
686         err = -ENOMEM;
687         si->dma_rx_buff = dma_alloc_coherent(si->dev, IRDA_FRAME_SIZE_LIMIT,
688                                              &si->dma_rx_buff_phy, GFP_KERNEL );
689         if (!si->dma_rx_buff)
690                 goto err_dma_rx_buff;
691
692         si->dma_tx_buff = dma_alloc_coherent(si->dev, IRDA_FRAME_SIZE_LIMIT,
693                                              &si->dma_tx_buff_phy, GFP_KERNEL );
694         if (!si->dma_tx_buff)
695                 goto err_dma_tx_buff;
696
697         /* Setup the serial port for the initial speed. */
698         pxa_irda_startup(si);
699
700         /*
701          * Open a new IrLAP layer instance.
702          */
703         si->irlap = irlap_open(dev, &si->qos, "pxa");
704         err = -ENOMEM;
705         if (!si->irlap)
706                 goto err_irlap;
707
708         /*
709          * Now enable the interrupt and start the queue
710          */
711         enable_irq(IRQ_STUART);
712         enable_irq(IRQ_ICP);
713         netif_start_queue(dev);
714
715         printk(KERN_DEBUG "pxa_ir: irda driver opened\n");
716
717         return 0;
718
719 err_irlap:
720         pxa_irda_shutdown(si);
721         dma_free_coherent(si->dev, IRDA_FRAME_SIZE_LIMIT, si->dma_tx_buff, si->dma_tx_buff_phy);
722 err_dma_tx_buff:
723         dma_free_coherent(si->dev, IRDA_FRAME_SIZE_LIMIT, si->dma_rx_buff, si->dma_rx_buff_phy);
724 err_dma_rx_buff:
725         pxa_free_dma(si->txdma);
726 err_tx_dma:
727         pxa_free_dma(si->rxdma);
728 err_rx_dma:
729         free_irq(IRQ_ICP, dev);
730 err_irq2:
731         free_irq(IRQ_STUART, dev);
732 err_irq1:
733
734         return err;
735 }
736
737 static int pxa_irda_stop(struct net_device *dev)
738 {
739         struct pxa_irda *si = netdev_priv(dev);
740
741         netif_stop_queue(dev);
742
743         pxa_irda_shutdown(si);
744
745         /* Stop IrLAP */
746         if (si->irlap) {
747                 irlap_close(si->irlap);
748                 si->irlap = NULL;
749         }
750
751         free_irq(IRQ_STUART, dev);
752         free_irq(IRQ_ICP, dev);
753
754         pxa_free_dma(si->rxdma);
755         pxa_free_dma(si->txdma);
756
757         if (si->dma_rx_buff)
758                 dma_free_coherent(si->dev, IRDA_FRAME_SIZE_LIMIT, si->dma_tx_buff, si->dma_tx_buff_phy);
759         if (si->dma_tx_buff)
760                 dma_free_coherent(si->dev, IRDA_FRAME_SIZE_LIMIT, si->dma_rx_buff, si->dma_rx_buff_phy);
761
762         printk(KERN_DEBUG "pxa_ir: irda driver closed\n");
763         return 0;
764 }
765
766 static int pxa_irda_suspend(struct platform_device *_dev, pm_message_t state)
767 {
768         struct net_device *dev = platform_get_drvdata(_dev);
769         struct pxa_irda *si;
770
771         if (dev && netif_running(dev)) {
772                 si = netdev_priv(dev);
773                 netif_device_detach(dev);
774                 pxa_irda_shutdown(si);
775         }
776
777         return 0;
778 }
779
780 static int pxa_irda_resume(struct platform_device *_dev)
781 {
782         struct net_device *dev = platform_get_drvdata(_dev);
783         struct pxa_irda *si;
784
785         if (dev && netif_running(dev)) {
786                 si = netdev_priv(dev);
787                 pxa_irda_startup(si);
788                 netif_device_attach(dev);
789                 netif_wake_queue(dev);
790         }
791
792         return 0;
793 }
794
795
796 static int pxa_irda_init_iobuf(iobuff_t *io, int size)
797 {
798         io->head = kmalloc(size, GFP_KERNEL | GFP_DMA);
799         if (io->head != NULL) {
800                 io->truesize = size;
801                 io->in_frame = FALSE;
802                 io->state    = OUTSIDE_FRAME;
803                 io->data     = io->head;
804         }
805         return io->head ? 0 : -ENOMEM;
806 }
807
808 static int pxa_irda_probe(struct platform_device *pdev)
809 {
810         struct net_device *dev;
811         struct pxa_irda *si;
812         unsigned int baudrate_mask;
813         int err;
814
815         if (!pdev->dev.platform_data)
816                 return -ENODEV;
817
818         err = request_mem_region(__PREG(STUART), 0x24, "IrDA") ? 0 : -EBUSY;
819         if (err)
820                 goto err_mem_1;
821
822         err = request_mem_region(__PREG(FICP), 0x1c, "IrDA") ? 0 : -EBUSY;
823         if (err)
824                 goto err_mem_2;
825
826         dev = alloc_irdadev(sizeof(struct pxa_irda));
827         if (!dev)
828                 goto err_mem_3;
829
830         si = netdev_priv(dev);
831         si->dev = &pdev->dev;
832         si->pdata = pdev->dev.platform_data;
833
834         si->sir_clk = clk_get(&pdev->dev, "UARTCLK");
835         si->fir_clk = clk_get(&pdev->dev, "FICPCLK");
836         if (IS_ERR(si->sir_clk) || IS_ERR(si->fir_clk)) {
837                 err = PTR_ERR(IS_ERR(si->sir_clk) ? si->sir_clk : si->fir_clk);
838                 goto err_mem_4;
839         }
840
841         /*
842          * Initialise the SIR buffers
843          */
844         err = pxa_irda_init_iobuf(&si->rx_buff, 14384);
845         if (err)
846                 goto err_mem_4;
847         err = pxa_irda_init_iobuf(&si->tx_buff, 4000);
848         if (err)
849                 goto err_mem_5;
850
851         if (si->pdata->startup)
852                 err = si->pdata->startup(si->dev);
853         if (err)
854                 goto err_startup;
855
856         dev->hard_start_xmit    = pxa_irda_hard_xmit;
857         dev->open               = pxa_irda_start;
858         dev->stop               = pxa_irda_stop;
859         dev->do_ioctl           = pxa_irda_ioctl;
860         dev->get_stats          = pxa_irda_stats;
861
862         irda_init_max_qos_capabilies(&si->qos);
863
864         baudrate_mask = 0;
865         if (si->pdata->transceiver_cap & IR_SIRMODE)
866                 baudrate_mask |= IR_9600|IR_19200|IR_38400|IR_57600|IR_115200;
867         if (si->pdata->transceiver_cap & IR_FIRMODE)
868                 baudrate_mask |= IR_4000000 << 8;
869
870         si->qos.baud_rate.bits &= baudrate_mask;
871         si->qos.min_turn_time.bits = 7;  /* 1ms or more */
872
873         irda_qos_bits_to_value(&si->qos);
874
875         err = register_netdev(dev);
876
877         if (err == 0)
878                 dev_set_drvdata(&pdev->dev, dev);
879
880         if (err) {
881                 if (si->pdata->shutdown)
882                         si->pdata->shutdown(si->dev);
883 err_startup:
884                 kfree(si->tx_buff.head);
885 err_mem_5:
886                 kfree(si->rx_buff.head);
887 err_mem_4:
888                 if (si->sir_clk && !IS_ERR(si->sir_clk))
889                         clk_put(si->sir_clk);
890                 if (si->fir_clk && !IS_ERR(si->fir_clk))
891                         clk_put(si->fir_clk);
892                 free_netdev(dev);
893 err_mem_3:
894                 release_mem_region(__PREG(FICP), 0x1c);
895 err_mem_2:
896                 release_mem_region(__PREG(STUART), 0x24);
897         }
898 err_mem_1:
899         return err;
900 }
901
902 static int pxa_irda_remove(struct platform_device *_dev)
903 {
904         struct net_device *dev = platform_get_drvdata(_dev);
905
906         if (dev) {
907                 struct pxa_irda *si = netdev_priv(dev);
908                 unregister_netdev(dev);
909                 if (si->pdata->shutdown)
910                         si->pdata->shutdown(si->dev);
911                 kfree(si->tx_buff.head);
912                 kfree(si->rx_buff.head);
913                 clk_put(si->fir_clk);
914                 clk_put(si->sir_clk);
915                 free_netdev(dev);
916         }
917
918         release_mem_region(__PREG(STUART), 0x24);
919         release_mem_region(__PREG(FICP), 0x1c);
920
921         return 0;
922 }
923
924 static struct platform_driver pxa_ir_driver = {
925         .driver         = {
926                 .name   = "pxa2xx-ir",
927                 .owner  = THIS_MODULE,
928         },
929         .probe          = pxa_irda_probe,
930         .remove         = pxa_irda_remove,
931         .suspend        = pxa_irda_suspend,
932         .resume         = pxa_irda_resume,
933 };
934
935 static int __init pxa_irda_init(void)
936 {
937         return platform_driver_register(&pxa_ir_driver);
938 }
939
940 static void __exit pxa_irda_exit(void)
941 {
942         platform_driver_unregister(&pxa_ir_driver);
943 }
944
945 module_init(pxa_irda_init);
946 module_exit(pxa_irda_exit);
947
948 MODULE_LICENSE("GPL");
949 MODULE_ALIAS("platform:pxa2xx-ir");