LXR linux/drivers/net/irda/pxaficp

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